From acdc066970c47913074f7c6d2b8f12155accd38d Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Mon, 26 Apr 2021 20:30:05 +0200 Subject: [PATCH 01/42] v2-SNAPSHOT --- arpack/pom.xml | 4 ++-- benchmarks/pom.xml | 10 +++++----- blas/pom.xml | 4 ++-- lapack/pom.xml | 4 ++-- pom.xml | 2 +- 5 files changed, 12 insertions(+), 12 deletions(-) diff --git a/arpack/pom.xml b/arpack/pom.xml index e8bdf321..e47605a7 100644 --- a/arpack/pom.xml +++ b/arpack/pom.xml @@ -30,13 +30,13 @@ information or have any questions. dev.ludovic.netlib parent - 1.3.2 + 2-SNAPSHOT ../pom.xml dev.ludovic.netlib arpack - 1.3.2 + 2-SNAPSHOT jar diff --git a/benchmarks/pom.xml b/benchmarks/pom.xml index 0d383fd5..1777c078 100644 --- a/benchmarks/pom.xml +++ b/benchmarks/pom.xml @@ -30,13 +30,13 @@ information or have any questions. dev.ludovic.netlib parent - 1.3.2 + 2-SNAPSHOT ../pom.xml dev.ludovic.netlib benchmarks - 1.3.2 + 2-SNAPSHOT jar @@ -48,17 +48,17 @@ information or have any questions. dev.ludovic.netlib blas - 1.3.2 + 2-SNAPSHOT dev.ludovic.netlib arpack - 1.3.2 + 2-SNAPSHOT dev.ludovic.netlib lapack - 1.3.2 + 2-SNAPSHOT diff --git a/blas/pom.xml b/blas/pom.xml index d46a0807..34008d54 100644 --- a/blas/pom.xml +++ b/blas/pom.xml @@ -30,13 +30,13 @@ information or have any questions. dev.ludovic.netlib parent - 1.3.2 + 2-SNAPSHOT ../pom.xml dev.ludovic.netlib blas - 1.3.2 + 2-SNAPSHOT jar diff --git a/lapack/pom.xml b/lapack/pom.xml index 6ae32c50..dc187acc 100644 --- a/lapack/pom.xml +++ b/lapack/pom.xml @@ -30,13 +30,13 @@ information or have any questions. dev.ludovic.netlib parent - 1.3.2 + 2-SNAPSHOT ../pom.xml dev.ludovic.netlib lapack - 1.3.2 + 2-SNAPSHOT jar diff --git a/pom.xml b/pom.xml index 9421e210..6eeb15b8 100644 --- a/pom.xml +++ b/pom.xml @@ -29,7 +29,7 @@ information or have any questions. dev.ludovic.netlib parent - 1.3.2 + 2-SNAPSHOT pom Netlib From eced8ea4743a9736d5c4a74b4d867ec392bf654c Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Tue, 27 Apr 2021 19:12:49 +0200 Subject: [PATCH 02/42] Add JNI-based wrapper for BLAS --- blas/pom.xml | 8 + .../java/dev/ludovic/netlib/NativeBLAS.java | 5 + .../java/dev/ludovic/netlib/blas/JNIBLAS.java | 200 +++ blas/src/main/native/Makefile | 33 + blas/src/main/native/jni.c | 1440 +++++++++++++++++ .../dev/ludovic/netlib/blas/BLASTest.java | 10 +- .../dev/ludovic/netlib/blas/l2/DgemvTest.java | 56 +- .../dev/ludovic/netlib/blas/l2/SgemvTest.java | 56 +- pom.xml | 65 +- 9 files changed, 1852 insertions(+), 21 deletions(-) create mode 100644 blas/src/main/java/dev/ludovic/netlib/blas/JNIBLAS.java create mode 100644 blas/src/main/native/Makefile create mode 100644 blas/src/main/native/jni.c diff --git a/blas/pom.xml b/blas/pom.xml index 34008d54..41a65bd3 100644 --- a/blas/pom.xml +++ b/blas/pom.xml @@ -64,4 +64,12 @@ information or have any questions. test + + + + + maven-antrun-plugin + + + diff --git a/blas/src/main/java/dev/ludovic/netlib/NativeBLAS.java b/blas/src/main/java/dev/ludovic/netlib/NativeBLAS.java index e37be625..b3c59ccc 100644 --- a/blas/src/main/java/dev/ludovic/netlib/NativeBLAS.java +++ b/blas/src/main/java/dev/ludovic/netlib/NativeBLAS.java @@ -41,6 +41,11 @@ public static NativeBLAS getInstance() { } catch (Throwable t) { Logger.getLogger(NativeBLAS.class.getName()).warning("Failed to load implementation from:dev.ludovic.netlib.blas.ForeignLinkerBLAS"); } + try { + return dev.ludovic.netlib.blas.JNIBLAS.getInstance(); + } catch (Throwable t) { + Logger.getLogger(NativeBLAS.class.getName()).warning("Failed to load implementation from:dev.ludovic.netlib.blas.JNIBLAS"); + } throw new RuntimeException("Unable to load native implementation"); } } diff --git a/blas/src/main/java/dev/ludovic/netlib/blas/JNIBLAS.java b/blas/src/main/java/dev/ludovic/netlib/blas/JNIBLAS.java new file mode 100644 index 00000000..2b9fc894 --- /dev/null +++ b/blas/src/main/java/dev/ludovic/netlib/blas/JNIBLAS.java @@ -0,0 +1,200 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +package dev.ludovic.netlib.blas; + +import java.io.InputStream; +import java.io.IOException; +import java.nio.file.Files; +import java.nio.file.Path; +import java.nio.file.StandardCopyOption; +import java.nio.file.attribute.PosixFilePermissions; + +public final class JNIBLAS extends AbstractBLAS implements dev.ludovic.netlib.NativeBLAS { + + private static final JNIBLAS instance = new JNIBLAS(); + + protected JNIBLAS() { + String osName = System.getProperty("os.name"); + if (osName == null || osName.isEmpty()) { + throw new RuntimeException("Unable to load native implementation"); + } + String osArch = System.getProperty("os.arch"); + if (osArch == null || osArch.isEmpty()) { + throw new RuntimeException("Unable to load native implementation"); + } + + Path temp; + try (InputStream resource = this.getClass().getClassLoader().getResourceAsStream( + String.format("resources/native/%s-%s/libnetlibblasjni.so", osName, osArch))) { + assert resource != null; + Files.copy(resource, temp = Files.createTempFile("libnetlibblasjni.so", "", + PosixFilePermissions.asFileAttribute(PosixFilePermissions.fromString("rwxr-x---"))), + StandardCopyOption.REPLACE_EXISTING); + } catch (IOException e) { + throw new RuntimeException("Unable to load native implementation", e); + } + + System.load(temp.toString()); + } + + public static dev.ludovic.netlib.NativeBLAS getInstance() { + return instance; + } + + protected native double dasumK(int n, double[] x, int offsetx, int incx); + + protected native float sasumK(int n, float[] x, int offsetx, int incx); + + protected native void daxpyK(int n, double alpha, double[] x, int offsetx, int incx, double[] y, int offsety, int incy); + + protected native void saxpyK(int n, float alpha, float[] x, int offsetx, int incx, float[] y, int offsety, int incy); + + protected native void dcopyK(int n, double[] x, int offsetx, int incx, double[] y, int offsety, int incy); + + protected native void scopyK(int n, float[] x, int offsetx, int incx, float[] y, int offsety, int incy); + + protected native double ddotK(int n, double[] x, int offsetx, int incx, double[] y, int offsety, int incy); + + protected native float sdotK(int n, float[] x, int offsetx, int incx, float[] y, int offsety, int incy); + + protected native float sdsdotK(int n, float sb, float[] sx, int offsetsx, int incsx, float[] sy, int offsetsy, int incsy); + + protected native void dgbmvK(String trans, int m, int n, int kl, int ku, double alpha, double[] a, int offseta, int lda, double[] x, int offsetx, int incx, double beta, double[] y, int offsety, int incy); + + protected native void sgbmvK(String trans, int m, int n, int kl, int ku, float alpha, float[] a, int offseta, int lda, float[] x, int offsetx, int incx, float beta, float[] y, int offsety, int incy); + + protected native void dgemmK(String transa, String transb, int m, int n, int k, double alpha, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double beta, double[] c, int offsetc, int ldc); + + protected native void sgemmK(String transa, String transb, int m, int n, int k, float alpha, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float beta, float[] c, int offsetc, int ldc); + + protected native void dgemvK(String trans, int m, int n, double alpha, double[] a, int offseta, int lda, double[] x, int offsetx, int incx, double beta, double[] y, int offsety, int incy); + + protected native void sgemvK(String trans, int m, int n, float alpha, float[] a, int offseta, int lda, float[] x, int offsetx, int incx, float beta, float[] y, int offsety, int incy); + + protected native void dgerK(int m, int n, double alpha, double[] x, int offsetx, int incx, double[] y, int offsety, int incy, double[] a, int offseta, int lda); + + protected native void sgerK(int m, int n, float alpha, float[] x, int offsetx, int incx, float[] y, int offsety, int incy, float[] a, int offseta, int lda); + + protected native double dnrm2K(int n, double[] x, int offsetx, int incx); + + protected native float snrm2K(int n, float[] x, int offsetx, int incx); + + protected native void drotK(int n, double[] dx, int offsetdx, int incx, double[] dy, int offsetdy, int incy, double c, double s); + + protected native void srotK(int n, float[] sx, int offsetsx, int incx, float[] sy, int offsetsy, int incy, float c, float s); + + protected native void drotmK(int n, double[] dx, int offsetdx, int incx, double[] dy, int offsetdy, int incy, double[] dparam, int offsetdparam); + + protected native void srotmK(int n, float[] sx, int offsetsx, int incx, float[] sy, int offsetsy, int incy, float[] sparam, int offsetsparam); + + protected native void drotmgK(org.netlib.util.doubleW dd1, org.netlib.util.doubleW dd2, org.netlib.util.doubleW dx1, double dy1, double[] dparam, int offsetdparam); + + protected native void srotmgK(org.netlib.util.floatW sd1, org.netlib.util.floatW sd2, org.netlib.util.floatW sx1, float sy1, float[] sparam, int offsetsparam); + + protected native void dsbmvK(String uplo, int n, int k, double alpha, double[] a, int offseta, int lda, double[] x, int offsetx, int incx, double beta, double[] y, int offsety, int incy); + + protected native void ssbmvK(String uplo, int n, int k, float alpha, float[] a, int offseta, int lda, float[] x, int offsetx, int incx, float beta, float[] y, int offsety, int incy); + + protected native void dscalK(int n, double alpha, double[] x, int offsetx, int incx); + + protected native void sscalK(int n, float alpha, float[] x, int offsetx, int incx); + + protected native void dspmvK(String uplo, int n, double alpha, double[] a, int offseta, double[] x, int offsetx, int incx, double beta, double[] y, int offsety, int incy); + + protected native void sspmvK(String uplo, int n, float alpha, float[] a, int offseta, float[] x, int offsetx, int incx, float beta, float[] y, int offsety, int incy); + + protected native void dsprK(String uplo, int n, double alpha, double[] x, int offsetx, int incx, double[] a, int offseta); + + protected native void ssprK(String uplo, int n, float alpha, float[] x, int offsetx, int incx, float[] a, int offseta); + + protected native void dspr2K(String uplo, int n, double alpha, double[] x, int offsetx, int incx, double[] y, int offsety, int incy, double[] a, int offseta); + + protected native void sspr2K(String uplo, int n, float alpha, float[] x, int offsetx, int incx, float[] y, int offsety, int incy, float[] a, int offseta); + + protected native void dswapK(int n, double[] x, int offsetx, int incx, double[] y, int offsety, int incy); + + protected native void sswapK(int n, float[] x, int offsetx, int incx, float[] y, int offsety, int incy); + + protected native void dsymmK(String side, String uplo, int m, int n, double alpha, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double beta, double[] c, int offsetc, int ldc); + + protected native void ssymmK(String side, String uplo, int m, int n, float alpha, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float beta, float[] c, int offsetc, int ldc); + + protected native void dsymvK(String uplo, int n, double alpha, double[] a, int offseta, int lda, double[] x, int offsetx, int incx, double beta, double[] y, int offsety, int incy); + + protected native void ssymvK(String uplo, int n, float alpha, float[] a, int offseta, int lda, float[] x, int offsetx, int incx, float beta, float[] y, int offsety, int incy); + + protected native void dsyrK(String uplo, int n, double alpha, double[] x, int offsetx, int incx, double[] a, int offseta, int lda); + + protected native void ssyrK(String uplo, int n, float alpha, float[] x, int offsetx, int incx, float[] a, int offseta, int lda); + + protected native void dsyr2K(String uplo, int n, double alpha, double[] x, int offsetx, int incx, double[] y, int offsety, int incy, double[] a, int offseta, int lda); + + protected native void ssyr2K(String uplo, int n, float alpha, float[] x, int offsetx, int incx, float[] y, int offsety, int incy, float[] a, int offseta, int lda); + + protected native void dsyr2kK(String uplo, String trans, int n, int k, double alpha, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double beta, double[] c, int offsetc, int ldc); + + protected native void ssyr2kK(String uplo, String trans, int n, int k, float alpha, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float beta, float[] c, int offsetc, int ldc); + + protected native void dsyrkK(String uplo, String trans, int n, int k, double alpha, double[] a, int offseta, int lda, double beta, double[] c, int offsetc, int ldc); + + protected native void ssyrkK(String uplo, String trans, int n, int k, float alpha, float[] a, int offseta, int lda, float beta, float[] c, int offsetc, int ldc); + + protected native void dtbmvK(String uplo, String trans, String diag, int n, int k, double[] a, int offseta, int lda, double[] x, int offsetx, int incx); + + protected native void stbmvK(String uplo, String trans, String diag, int n, int k, float[] a, int offseta, int lda, float[] x, int offsetx, int incx); + + protected native void dtbsvK(String uplo, String trans, String diag, int n, int k, double[] a, int offseta, int lda, double[] x, int offsetx, int incx); + + protected native void stbsvK(String uplo, String trans, String diag, int n, int k, float[] a, int offseta, int lda, float[] x, int offsetx, int incx); + + protected native void dtpmvK(String uplo, String trans, String diag, int n, double[] a, int offseta, double[] x, int offsetx, int incx); + + protected native void stpmvK(String uplo, String trans, String diag, int n, float[] a, int offseta, float[] x, int offsetx, int incx); + + protected native void dtpsvK(String uplo, String trans, String diag, int n, double[] a, int offseta, double[] x, int offsetx, int incx); + + protected native void stpsvK(String uplo, String trans, String diag, int n, float[] a, int offseta, float[] x, int offsetx, int incx); + + protected native void dtrmmK(String side, String uplo, String transa, String diag, int m, int n, double alpha, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb); + + protected native void strmmK(String side, String uplo, String transa, String diag, int m, int n, float alpha, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb); + + protected native void dtrmvK(String uplo, String trans, String diag, int n, double[] a, int offseta, int lda, double[] x, int offsetx, int incx); + + protected native void strmvK(String uplo, String trans, String diag, int n, float[] a, int offseta, int lda, float[] x, int offsetx, int incx); + + protected native void dtrsmK(String side, String uplo, String transa, String diag, int m, int n, double alpha, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb); + + protected native void strsmK(String side, String uplo, String transa, String diag, int m, int n, float alpha, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb); + + protected native void dtrsvK(String uplo, String trans, String diag, int n, double[] a, int offseta, int lda, double[] x, int offsetx, int incx); + + protected native void strsvK(String uplo, String trans, String diag, int n, float[] a, int offseta, int lda, float[] x, int offsetx, int incx); + + protected native int idamaxK(int n, double[] dx, int offsetdx, int incdx); + + protected native int isamaxK(int n, float[] sx, int offsetsx, int incx); +} diff --git a/blas/src/main/native/Makefile b/blas/src/main/native/Makefile new file mode 100644 index 00000000..dded1334 --- /dev/null +++ b/blas/src/main/native/Makefile @@ -0,0 +1,33 @@ +# Copyright 2020, 2021, Ludovic Henry +# +# Permission is hereby granted, free of charge, to any person obtaining a copy +# of this software and associated documentation files (the "Software"), to deal +# in the Software without restriction, including without limitation the rights +# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell +# copies of the Software, and to permit persons to whom the Software is +# furnished to do so, subject to the following conditions: +# +# The above copyright notice and this permission notice shall be included in +# all copies or substantial portions of the Software. +# +# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR +# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, +# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE +# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER +# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, +# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE +# SOFTWARE. +# +# Please contact git@ludovic.dev or visit ludovic.dev if you need additional +# information or have any questions. + +$(OBJDIR) $(dir $(OUTPUT)): + mkdir -p $@ + +$(INPUTS:%.c=$(OBJDIR)/%.o): $(OBJDIR)/%.o: %.c | $(OBJDIR) + $(CC) $(CCFLAGS) -o $@ $< + +$(OUTPUT): $(INPUTS:%.c=$(OBJDIR)/%.o) | $(dir $(OUTPUT)) + $(LD) $(LDFLAGS) -o $@ $^ + +all: $(OUTPUT) diff --git a/blas/src/main/native/jni.c b/blas/src/main/native/jni.c new file mode 100644 index 00000000..86c7e6a4 --- /dev/null +++ b/blas/src/main/native/jni.c @@ -0,0 +1,1440 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of intge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +#include +#include +#include +#include + +#include "dev_ludovic_netlib_blas_JNIBLAS.h" + +#define UNUSED __attribute__((unused)) + +static jthrowable fail(JNIEnv *env, const char *klass_name, const char *msg) { + jclass klass = (*env)->FindClass(env, klass_name); + jmethodID constructor = (*env)->GetMethodID(env, klass, "", "(Ljava/lang/String;)V"); + return (*env)->NewObject(env, klass, constructor, (*env)->NewStringUTF(env, msg)); +} + +static jthrowable failOnCopy(JNIEnv *env) { + return fail(env, "java/lang/OutOfMemoryError", "Failed to copy from heap to native memory"); +} + +enum { + CBLAS_ROW_MAJOR = 101, + CBLAS_COL_MAJOR = 102, + + CBLAS_NO_TRANS = 111, + CBLAS_TRANS = 112, + CBLAS_CONJ_TRANS = 113, + + CBLAS_UPPER = 121, + CBLAS_LOWER = 122, + + CBLAS_NON_UNIT = 131, + CBLAS_UNIT = 132, + + CBLAS_LEFT = 141, + CBLAS_RIGHT = 142, +}; + +static int translate_trans(JNIEnv *env, jstring str, jthrowable *exc) { + int res = 0; + const char *utf = NULL; + *exc = NULL; + if ((*env)->GetStringUTFLength(env, str) != 1) goto failOnUnknownOp; + if (!(utf = (*env)->GetStringUTFChars(env, str, NULL))) goto failOnCopy; + switch (utf[0]) { + case 'N': res = CBLAS_NO_TRANS; break; + case 'T': res = CBLAS_TRANS; break; + case 'C': res = CBLAS_CONJ_TRANS; break; + default: goto failOnUnknownOp; + } +done: + if (utf) (*env)->ReleaseStringUTFChars(env, str, utf); + return res; +failOnUnknownOp: + *exc = fail(env, "java/lang/IllegalArgumentException", "Unknown transpose"); + goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static int translate_uplo(JNIEnv *env, jstring str, jthrowable *exc) { + int res = 0; + const char *utf = NULL; + *exc = NULL; + if ((*env)->GetStringUTFLength(env, str) <= 0) goto failOnUnknownOp; + if (!(utf = (*env)->GetStringUTFChars(env, str, NULL))) goto failOnCopy; + switch (utf[0]) { + case 'U': res = CBLAS_UPPER; break; + case 'L': res = CBLAS_LOWER; break; + default: goto failOnUnknownOp; + } +done: + if (utf) (*env)->ReleaseStringUTFChars(env, str, utf); + return res; +failOnUnknownOp: + *exc = fail(env, "java/lang/IllegalArgumentException", "Unknown uplo"); + goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static int translate_diag(JNIEnv *env, jstring str, jthrowable *exc) { + int res = 0; + const char *utf = NULL; + *exc = NULL; + if ((*env)->GetStringUTFLength(env, str) <= 0) goto failOnUnknownOp; + if (!(utf = (*env)->GetStringUTFChars(env, str, NULL))) goto failOnCopy; + switch (utf[0]) { + case 'N': res = CBLAS_NON_UNIT; break; + case 'U': res = CBLAS_UNIT; break; + default: goto failOnUnknownOp; + } +done: + if (utf) (*env)->ReleaseStringUTFChars(env, str, utf); + return res; +failOnUnknownOp: + *exc = fail(env, "java/lang/IllegalArgumentException", "Unknown diag"); + goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static int translate_side(JNIEnv *env, jstring str, jthrowable *exc) { + int res = 0; + const char *utf = NULL; + *exc = NULL; + if ((*env)->GetStringUTFLength(env, str) <= 0) goto failOnUnknownOp; + if (!(utf = (*env)->GetStringUTFChars(env, str, NULL))) goto failOnCopy; + switch (utf[0]) { + case 'L': res = CBLAS_LEFT; break; + case 'R': res = CBLAS_RIGHT; break; + default: goto failOnUnknownOp; + } +done: + if (utf) (*env)->ReleaseStringUTFChars(env, str, utf); + return res; +failOnUnknownOp: + *exc = fail(env, "java/lang/IllegalArgumentException", "Unknown side"); + goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static double (*cblas_dasum)(int n, double *x, int incx); + +jdouble Java_dev_ludovic_netlib_blas_JNIBLAS_dasumK(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray x, jint offsetx, jint incx) { + jdouble ret; + jthrowable excv = NULL, *exc = &excv; + double *nx = NULL; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + ret = cblas_dasum(n, nx + offsetx, incx); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (*exc) (*env)->Throw(env, *exc); + return ret; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static float (*cblas_sasum)(int n, float *x, int incx); + +jfloat Java_dev_ludovic_netlib_blas_JNIBLAS_sasumK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray x, jint offsetx, jint incx) { + jfloat ret; + jthrowable excv = NULL, *exc = &excv; + float *nx = NULL; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + ret = cblas_sasum(n, nx + offsetx, incx); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (*exc) (*env)->Throw(env, *exc); + return ret; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_daxpy)(int n, double alpha, double *x, int incx, double *y, int incy); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_daxpyK(JNIEnv *env, UNUSED jobject obj, + jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy) { + jthrowable excv = NULL, *exc = &excv; + double *nx = NULL, *ny = NULL; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; + cblas_daxpy(n, alpha, nx + offsetx, incx, ny + offsety, incy); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_saxpy)(int n, float alpha, float *x, int incx, float *y, int incy); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_saxpyK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy) { + jthrowable excv = NULL, *exc = &excv; + float *nx = NULL, *ny = NULL; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; + cblas_saxpy(n, alpha, nx + offsetx, incx, ny + offsety, incy); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_dcopy)(int n, double *x, int incx, double *y, int incy); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_dcopyK(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy) { + jthrowable excv = NULL, *exc = &excv; + double *nx = NULL, *ny = NULL; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; + cblas_dcopy(n, nx + offsetx, incx, ny + offsety, incy); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_scopy)(int n, float *x, int incx, float *y, int incy); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_scopyK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy) { + jthrowable excv = NULL, *exc = &excv; + float *nx = NULL, *ny = NULL; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; + cblas_scopy(n, nx + offsetx, incx, ny + offsety, incy); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static double (*cblas_ddot)(int n, double *x, int incx, double *y, int incy); + +jdouble Java_dev_ludovic_netlib_blas_JNIBLAS_ddotK(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy) { + jdouble ret; + jthrowable excv = NULL, *exc = &excv; + double *nx = NULL, *ny = NULL; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; + ret = cblas_ddot(n, nx + offsetx, incx, ny + offsety, incy); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); + if (*exc) (*env)->Throw(env, *exc); + return ret; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static float (*cblas_sdot)(int n, float *x, int incx, float *y, int incy); + +jfloat Java_dev_ludovic_netlib_blas_JNIBLAS_sdotK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy) { + jfloat ret; + jthrowable excv = NULL, *exc = &excv; + float *nx = NULL, *ny = NULL; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; + ret = cblas_sdot(n, nx + offsetx, incx, ny + offsety, incy); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); + if (*exc) (*env)->Throw(env, *exc); + return ret; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static float (*cblas_sdsdot)(int n, float sb, float *sx, int incsx, float *sy, int incsy); + +jfloat Java_dev_ludovic_netlib_blas_JNIBLAS_sdsdotK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloat sb, jfloatArray sx, jint offsetsx, jint incsx, jfloatArray sy, jint offsetsy, jint incsy) { + jfloat ret; + jthrowable excv = NULL, *exc = &excv; + float *nsx = NULL, *nsy = NULL; + if (!(nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto failOnCopy; + if (!(nsy = (*env)->GetPrimitiveArrayCritical(env, sy, NULL))) goto failOnCopy; + ret = cblas_sdsdot(n, sb, nsx + offsetsx, incsx, nsy + offsetsy, incsy); +done: + if (nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, nsx, JNI_ABORT); + if (nsy) (*env)->ReleasePrimitiveArrayCritical(env, sy, nsy, JNI_ABORT); + if (*exc) (*env)->Throw(env, *exc); + return ret; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_dgbmv)(int order, int trans, int m, int n, int kl, int ku, double alpha, double *a, int lda, double *x, int incx, double beta, double *y, int incy); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_dgbmvK(JNIEnv *env, UNUSED jobject obj, + jstring trans, jint m, jint n, jint kl, jint ku, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx, jdouble beta, jdoubleArray y, jint offsety, jint incy) { + jthrowable excv = NULL, *exc = &excv; + int ntrans; double *na = NULL, *nx = NULL, *ny = NULL; + if (!(ntrans = translate_trans(env, trans, exc))) goto failOnTranslate; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; + cblas_dgbmv(CBLAS_COL_MAJOR, ntrans, m, n, kl, ku, alpha, na + offseta, lda, nx + offsetx, incx, beta, ny + offsety, incy); +done: + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnTranslate: + /* exc has been set by translate_trans */ + goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_sgbmv)(int order, int trans, int m, int n, int kl, int ku, float alpha, float *a, int lda, float *x, int incx, float beta, float *y, int incy); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_sgbmvK(JNIEnv *env, UNUSED jobject obj, + jstring trans, jint m, jint n, jint kl, jint ku, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx, jfloat beta, jfloatArray y, jint offsety, jint incy) { + jthrowable excv = NULL, *exc = &excv; + int ntrans; float *na = NULL, *nx = NULL, *ny = NULL; + if (!(ntrans = translate_trans(env, trans, exc))) goto failOnTranslate; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; + cblas_sgbmv(CBLAS_COL_MAJOR, ntrans, m, n, kl, ku, alpha, na + offseta, lda, nx + offsetx, incx, beta, ny + offsety, incy); +done: + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnTranslate: + /* exc has been set by translate_trans */ + goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_dgemm)(int order, int transa, int transb, int m, int n, int k, double alpha, double *a, int lda, double *b, int ldb, double beta, double *c, int ldc); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_dgemmK(JNIEnv *env, UNUSED jobject obj, + jstring transa, jstring transb, jint m, jint n, jint k, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble beta, jdoubleArray c, jint offsetc, jint ldc) { + jthrowable excv = NULL, *exc = &excv; + int ntransa, ntransb; double *na = NULL, *nb = NULL, *nc = NULL; + if (!(ntransa = translate_trans(env, transa, exc))) goto failOnTranslate; + if (!(ntransb = translate_trans(env, transb, exc))) goto failOnTranslate; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; + if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto failOnCopy; + if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOnCopy; + cblas_dgemm(CBLAS_COL_MAJOR, ntransa, ntransb, m, n, k, alpha, na + offseta, lda, nb + offsetb, ldb, beta, nc + offsetc, ldc); +done: + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, JNI_ABORT); + if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnTranslate: + /* exc has been set by translate_trans */ + goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_sgemm)(int order, int transa, int transb, int m, int n, int k, float alpha, float *a, int lda, float *b, int ldb, float beta, float *c, int ldc); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_sgemmK(JNIEnv *env, UNUSED jobject obj, + jstring transa, jstring transb, jint m, jint n, jint k, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat beta, jfloatArray c, jint offsetc, jint ldc) { + jthrowable excv = NULL, *exc = &excv; + int ntransa, ntransb; float *na = NULL, *nb = NULL, *nc = NULL; + if (!(ntransa = translate_trans(env, transa, exc))) goto failOnTranslate; + if (!(ntransb = translate_trans(env, transb, exc))) goto failOnTranslate; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; + if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto failOnCopy; + if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOnCopy; + cblas_sgemm(CBLAS_COL_MAJOR, ntransa, ntransb, m, n, k, alpha, na + offseta, lda, nb + offsetb, ldb, beta, nc + offsetc, ldc); +done: + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, JNI_ABORT); + if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnTranslate: + /* exc has been set by translate_trans */ + goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_dgemv)(int order, int trans, int m, int n, double alpha, double *a, int lda, double *x, int incx, double beta, double *y, int incy); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_dgemvK(JNIEnv *env, UNUSED jobject obj, + jstring trans, jint m, jint n, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx, jdouble beta, jdoubleArray y, jint offsety, jint incy) { + jthrowable excv = NULL, *exc = &excv; + int ntrans; jdouble *na = NULL, *nx = NULL, *ny = NULL; + if (!(ntrans = translate_trans(env, trans, exc))) goto failOnTranslate; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; + cblas_dgemv(CBLAS_COL_MAJOR, ntrans, m, n, alpha, na + offseta, lda, nx + offsetx, incx, beta, ny + offsety, incy); +done: + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnTranslate: + /* exc has been set by translate_trans */ + goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_sgemv)(int order, int trans, int m, int n, float alpha, float *a, int lda, float *x, int incx, float beta, float *y, int incy); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_sgemvK(JNIEnv *env, UNUSED jobject obj, + jstring trans, jint m, jint n, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx, jfloat beta, jfloatArray y, jint offsety, jint incy) { + jthrowable excv = NULL, *exc = &excv; + int ntrans; float *na = NULL, *nx = NULL, *ny = NULL; + if (!(ntrans = translate_trans(env, trans, exc))) goto failOnTranslate; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; + cblas_sgemv(CBLAS_COL_MAJOR, ntrans, m, n, alpha, na + offseta, lda, nx + offsetx, incx, beta, ny + offsety, incy); +done: + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnTranslate: + /* exc has been set by translate_trans */ +goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_dger)(int order, int m, int n, double alpha, double *x, int incx, double *y, int incy, double *a, int lda); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_dgerK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy, jdoubleArray a, jint offseta, jint lda) { + jthrowable excv = NULL, *exc = &excv; + double *na = NULL, *nx = NULL, *ny = NULL; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; + cblas_dger(CBLAS_COL_MAJOR, m, n, alpha, nx + offsetx, incx, ny + offsety, incy, na + offseta, lda); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_sger)(int order, int m, int n, float alpha, float *x, int incx, float *y, int incy, float *a, int lda); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_sgerK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy, jfloatArray a, jint offseta, jint lda) { + jthrowable excv = NULL, *exc = &excv; + float *na = NULL, *nx = NULL, *ny = NULL; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; + cblas_sger(CBLAS_COL_MAJOR, m, n, alpha, nx + offsetx, incx, ny + offsety, incy, na + offseta, lda); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static double (*cblas_dnrm2)(int n, double *x, int incx); + +jdouble Java_dev_ludovic_netlib_blas_JNIBLAS_dnrm2K(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray x, jint offsetx, jint incx) { + jdouble ret; + jthrowable excv = NULL, *exc = &excv; + double *nx = NULL; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + ret = cblas_dnrm2(n, nx + offsetx, incx); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (*exc) (*env)->Throw(env, *exc); + return ret; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static float (*cblas_snrm2)(int n, float *x, int incx); + +jfloat Java_dev_ludovic_netlib_blas_JNIBLAS_snrm2K(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray x, jint offsetx, jint incx) { + jfloat ret; + jthrowable excv = NULL, *exc = &excv; + float *nx = NULL; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + ret = cblas_snrm2(n, nx + offsetx, incx); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (*exc) (*env)->Throw(env, *exc); + return ret; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_drot)(int n, double *dx, int incx, double *dy, int incy, double c, double s); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_drotK(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray dx, jint offsetdx, jint incx, jdoubleArray dy, jint offsetdy, jint incy, jdouble c, jdouble s) { + jthrowable excv = NULL, *exc = &excv; + double *ndx = NULL, *ndy = NULL; + if (!(ndx = (*env)->GetPrimitiveArrayCritical(env, dx, NULL))) goto failOnCopy; + if (!(ndy = (*env)->GetPrimitiveArrayCritical(env, dy, NULL))) goto failOnCopy; + cblas_drot(n, ndx + offsetdx, incx, ndy + offsetdy, incy, c, s); +done: + if (ndx) (*env)->ReleasePrimitiveArrayCritical(env, dx, ndx, 0); + if (ndy) (*env)->ReleasePrimitiveArrayCritical(env, dy, ndy, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_srot)(int n, float *sx, int incx, float *sy, int incy, float c, float s); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_srotK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray sx, jint offsetsx, jint incx, jfloatArray sy, jint offsetsy, jint incy, jfloat c, jfloat s) { + jthrowable excv = NULL, *exc = &excv; + float *nsx = NULL, *nsy = NULL; + if (!(nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto failOnCopy; + if (!(nsy = (*env)->GetPrimitiveArrayCritical(env, sy, NULL))) goto failOnCopy; + cblas_srot(n, nsx + offsetsx, incx, nsy + offsetsy, incy, c, s); +done: + if (nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, nsx, 0); + if (nsy) (*env)->ReleasePrimitiveArrayCritical(env, sy, nsy, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_drotm)(int n, double *dx, int incx, double *dy, int incy, double *dparam); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_drotmK(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray dx, jint offsetdx, jint incx, jdoubleArray dy, jint offsetdy, jint incy, jdoubleArray dparam, jint offsetdparam) { + jthrowable excv = NULL, *exc = &excv; + double *ndx = NULL, *ndy = NULL, *ndparam = NULL; + if (!(ndx = (*env)->GetPrimitiveArrayCritical(env, dx, NULL))) goto failOnCopy; + if (!(ndy = (*env)->GetPrimitiveArrayCritical(env, dy, NULL))) goto failOnCopy; + if (!(ndparam = (*env)->GetPrimitiveArrayCritical(env, dparam, NULL))) goto failOnCopy; + cblas_drotm(n, ndx + offsetdx, incx, ndy + offsetdy, incy, ndparam + offsetdparam); +done: + if (ndx) (*env)->ReleasePrimitiveArrayCritical(env, dx, ndx, JNI_ABORT); + if (ndy) (*env)->ReleasePrimitiveArrayCritical(env, dy, ndy, 0); + if (ndparam) (*env)->ReleasePrimitiveArrayCritical(env, dparam, ndparam, JNI_ABORT); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_srotm)(int n, float *sx, int incx, float *sy, int incy, float *sparam); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_srotmK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray sx, jint offsetsx, jint incx, jfloatArray sy, jint offsetsy, jint incy, jfloatArray sparam, jint offsetsparam) { + jthrowable excv = NULL, *exc = &excv; + float *nsx = NULL, *nsy = NULL, *nsparam = NULL; + if (!(nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto failOnCopy; + if (!(nsy = (*env)->GetPrimitiveArrayCritical(env, sy, NULL))) goto failOnCopy; + if (!(nsparam = (*env)->GetPrimitiveArrayCritical(env, sparam, NULL))) goto failOnCopy; + cblas_srotm(n, nsx + offsetsx, incx, nsy + offsetsy, incy, nsparam + offsetsparam); +done: + if (nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, nsx, JNI_ABORT); + if (nsy) (*env)->ReleasePrimitiveArrayCritical(env, sy, nsy, 0); + if (nsparam) (*env)->ReleasePrimitiveArrayCritical(env, sparam, nsparam, JNI_ABORT); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_drotmg)(jobject dd1, jobject dd2, jobject dx1, double dy1, double *dparam); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_drotmgK(JNIEnv *env, UNUSED jobject obj, + UNUSED jobject dd1, UNUSED jobject dd2, UNUSED jobject dx1, UNUSED jdouble dy1, UNUSED jdoubleArray dparam, UNUSED jint offsetdparam) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*cblas_srotmg)(jobject sd1, jobject sd2, jobject sx1, float sy1, float *sparam); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_srotmgK(JNIEnv *env, UNUSED jobject obj, + UNUSED jobject sd1, UNUSED jobject sd2, UNUSED jobject sx1, UNUSED jfloat sy1, UNUSED jfloatArray sparam, UNUSED jint offsetsparam) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*cblas_dsbmv)(int order, int uplo, int n, int k, double alpha, double *a, int lda, double *x, int incx, double beta, double *y, int incy); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_dsbmvK(JNIEnv *env, UNUSED jobject obj, + UNUSED jstring uplo, UNUSED jint n, UNUSED jint k, UNUSED jdouble alpha, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jdoubleArray x, UNUSED jint offsetx, UNUSED jint incx, UNUSED jdouble beta, UNUSED jdoubleArray y, UNUSED jint offsety, UNUSED jint incy) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*cblas_ssbmv)(int order, int uplo, int n, int k, float alpha, float *a, int lda, float *x, int incx, float beta, float *y, int incy); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_ssbmvK(JNIEnv *env, UNUSED jobject obj, + UNUSED jstring uplo, UNUSED jint n, UNUSED jint k, UNUSED jfloat alpha, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jfloatArray x, UNUSED jint offsetx, UNUSED jint incx, UNUSED jfloat beta, UNUSED jfloatArray y, UNUSED jint offsety, UNUSED jint incy) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*cblas_dscal)(int n, double alpha, double *x, int incx); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_dscalK(JNIEnv *env, UNUSED jobject obj, + jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx) { + jthrowable excv = NULL, *exc = &excv; + double *nx = NULL; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + cblas_dscal(n, alpha, nx + offsetx, incx); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_sscal)(int n, float alpha, float *x, int incx); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_sscalK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx) { + jthrowable excv = NULL, *exc = &excv; + float *nx = NULL; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + cblas_sscal(n, alpha, nx + offsetx, incx); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_dspmv)(int order, int uplo, int n, double alpha, double *a, double *x, int incx, double beta, double *y, int incy); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_dspmvK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jdouble alpha, jdoubleArray a, jint offseta, jdoubleArray x, jint offsetx, jint incx, jdouble beta, jdoubleArray y, jint offsety, jint incy) { + jthrowable excv = NULL, *exc = &excv; + int nuplo; double *na = NULL, *nx = NULL, *ny = NULL; + if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; + cblas_dspmv(CBLAS_COL_MAJOR, nuplo, n, alpha, na + offseta, nx + offsetx, incx, beta, ny + offsety, incy); +done: + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnTranslate: + /* exc has been set by translate_uplo */ + goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_sspmv)(int order, int uplo, int n, float alpha, float *a, float *x, int incx, float beta, float *y, int incy); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_sspmvK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jfloat alpha, jfloatArray a, jint offseta, jfloatArray x, jint offsetx, jint incx, jfloat beta, jfloatArray y, jint offsety, jint incy) { + jthrowable excv = NULL, *exc = &excv; + int nuplo; float *na = NULL, *nx = NULL, *ny = NULL; + if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; + cblas_sspmv(CBLAS_COL_MAJOR, nuplo, n, alpha, na + offseta, nx + offsetx, incx, beta, ny + offsety, incy); +done: + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnTranslate: + /* exc has been set by translate_uplo */ + goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_dspr)(int order, int uplo, int n, double alpha, double *x, int incx, double *a); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_dsprK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray a, jint offseta) { + jthrowable excv = NULL, *exc = &excv; + int nuplo; double *na = NULL, *nx = NULL; + if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; + cblas_dspr(CBLAS_COL_MAJOR, nuplo, n, alpha, nx + offsetx, incx, na + offseta); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnTranslate: + /* exc has been set by translate_uplo */ + goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_sspr)(int order, int uplo, int n, float alpha, float *x, int incx, float *a); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_ssprK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray a, jint offseta) { + jthrowable excv = NULL, *exc = &excv; + int nuplo; float *na = NULL, *nx = NULL; + if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; + cblas_sspr(CBLAS_COL_MAJOR, nuplo, n, alpha, nx + offsetx, incx, na + offseta); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnTranslate: + /* exc has been set by translate_uplo */ + goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_dspr2)(int order, int uplo, int n, double alpha, double *x, int incx, double *y, int incy, double *a); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_dspr2K(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy, jdoubleArray a, jint offseta) { + jthrowable excv = NULL, *exc = &excv; + int nuplo; double *na = NULL, *nx = NULL, *ny = NULL; + if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; + cblas_dspr2(CBLAS_COL_MAJOR, nuplo, n, alpha, nx + offsetx, incx, ny + offsety, incy, na + offseta); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnTranslate: + /* exc has been set by translate_uplo */ + goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_sspr2)(int order, int uplo, int n, float alpha, float *x, int incx, float *y, int incy, float *a); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_sspr2K(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy, jfloatArray a, jint offseta) { + jthrowable excv = NULL, *exc = &excv; + int nuplo; float *na = NULL, *nx = NULL, *ny = NULL; + if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; + cblas_sspr2(CBLAS_COL_MAJOR, nuplo, n, alpha, nx + offsetx, incx, ny + offsety, incy, na + offseta); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnTranslate: + /* exc has been set by translate_uplo */ + goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_dswap)(int n, double *x, int incx, double *y, int incy); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_dswapK(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy) { + jthrowable excv = NULL, *exc = &excv; + double *nx = NULL, *ny = NULL; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; + cblas_dswap(n, nx + offsetx, incx, ny + offsety, incy); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, 0); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_sswap)(int n, float *x, int incx, float *y, int incy); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_sswapK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy) { + jthrowable excv = NULL, *exc = &excv; + float *nx = NULL, *ny = NULL; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; + cblas_sswap(n, nx + offsetx, incx, ny + offsety, incy); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, 0); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_dsymm)(int order, int side, int uplo, int m, int n, double alpha, double *a, int lda, double *b, int ldb, double beta, double *c, int ldc); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_dsymmK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring uplo, jint m, jint n, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble beta, jdoubleArray c, jint offsetc, jint ldc) { + jthrowable excv = NULL, *exc = &excv; + int nside, nuplo; double *na = NULL, *nb = NULL, *nc = NULL; + if (!(nside = translate_side(env, side, exc))) goto failOnTranslate; + if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; + if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto failOnCopy; + if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOnCopy; + cblas_dsymm(CBLAS_COL_MAJOR, nside, nuplo, m, n, alpha, na + offseta, lda, nb + offsetb, ldb, beta, nc + offsetc, ldc); +done: + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, JNI_ABORT); + if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnTranslate: + /* exc has been set by translate_side or translate_uplo */ + goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_ssymm)(int order, int side, int uplo, int m, int n, float alpha, float *a, int lda, float *b, int ldb, float beta, float *c, int ldc); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_ssymmK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring uplo, jint m, jint n, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat beta, jfloatArray c, jint offsetc, jint ldc) { + jthrowable excv = NULL, *exc = &excv; + int nside, nuplo; float *na = NULL, *nb = NULL, *nc = NULL; + if (!(nside = translate_side(env, side, exc))) goto failOnTranslate; + if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; + if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto failOnCopy; + if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOnCopy; + cblas_ssymm(CBLAS_COL_MAJOR, nside, nuplo, m, n, alpha, na + offseta, lda, nb + offsetb, ldb, beta, nc + offsetc, ldc); +done: + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, JNI_ABORT); + if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnTranslate: + /* exc has been set by translate_side or translate_uplo */ + goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_dsymv)(int order, int uplo, int n, double alpha, double *a, int lda, double *x, int incx, double beta, double *y, int incy); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_dsymvK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx, jdouble beta, jdoubleArray y, jint offsety, jint incy) { + jthrowable excv = NULL, *exc = &excv; + int nuplo; double *na = NULL, *nx = NULL, *ny = NULL; + if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; + cblas_dsymv(CBLAS_COL_MAJOR, nuplo, n, alpha, na + offseta, lda, nx + offsetx, incx, beta, ny + offsety, incy); +done: + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnTranslate: + /* exc has been set by translate_uplo */ + goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_ssymv)(int order, int uplo, int n, float alpha, float *a, int lda, float *x, int incx, float beta, float *y, int incy); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_ssymvK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx, jfloat beta, jfloatArray y, jint offsety, jint incy) { + jthrowable excv = NULL, *exc = &excv; + int nuplo; float *na = NULL, *nx = NULL, *ny = NULL; + if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; + cblas_ssymv(CBLAS_COL_MAJOR, nuplo, n, alpha, na + offseta, lda, nx + offsetx, incx, beta, ny + offsety, incy); +done: + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnTranslate: + /* exc has been set by translate_uplo */ + goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_dsyr)(int order, int uplo, int n, double alpha, double *x, int incx, double *a, int lda); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_dsyrK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray a, jint offseta, jint lda) { + jthrowable excv = NULL, *exc = &excv; + int nuplo; double *na = NULL, *nx = NULL; + if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; + cblas_dsyr(CBLAS_COL_MAJOR, nuplo, n, alpha, nx + offsetx, incx, na + offseta, lda); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnTranslate: + /* exc has been set by translate_uplo */ + goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_ssyr)(int order, int uplo, int n, float alpha, float *x, int incx, float *a, int lda); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_ssyrK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray a, jint offseta, jint lda) { + jthrowable excv = NULL, *exc = &excv; + int nuplo; float *na = NULL, *nx = NULL; + if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; + cblas_ssyr(CBLAS_COL_MAJOR, nuplo, n, alpha, nx + offsetx, incx, na + offseta, lda); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnTranslate: + /* exc has been set by translate_uplo */ + goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_dsyr2)(int order, int uplo, int n, double alpha, double *x, int incx, double *y, int incy, double *a, int lda); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_dsyr2K(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy, jdoubleArray a, jint offseta, jint lda) { + jthrowable excv = NULL, *exc = &excv; + int nuplo; double *na = NULL, *nx = NULL, *ny = NULL; + if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; + cblas_dsyr2(CBLAS_COL_MAJOR, nuplo, n, alpha, nx + offsetx, incx, ny + offsety, incy, na + offseta, lda); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnTranslate: + /* exc has been set by translate_uplo */ + goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_ssyr2)(int order, int uplo, int n, float alpha, float *x, int incx, float *y, int incy, float *a, int lda); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_ssyr2K(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy, jfloatArray a, jint offseta, jint lda) { + jthrowable excv = NULL, *exc = &excv; + int nuplo; float *na = NULL, *nx = NULL, *ny = NULL; + if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; + cblas_ssyr2(CBLAS_COL_MAJOR, nuplo, n, alpha, nx + offsetx, incx, ny + offsety, incy, na + offseta, lda); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnTranslate: + /* exc has been set by translate_uplo */ + goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_dsyr2k)(int order, int uplo, int trans, int n, int k, double alpha, double *a, int lda, double *b, int ldb, double beta, double *c, int ldc); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_dsyr2kK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jstring trans, jint n, jint k, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble beta, jdoubleArray c, jint offsetc, jint ldc) { + jthrowable excv = NULL, *exc = &excv; + int nuplo, ntrans; double *na = NULL, *nb = NULL, *nc = NULL; + if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; + if (!(ntrans = translate_trans(env, trans, exc))) goto failOnTranslate; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; + if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto failOnCopy; + if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOnCopy; + cblas_dsyr2k(CBLAS_COL_MAJOR, nuplo, ntrans, n, k, alpha, na + offseta, lda, nb + offsetb, ldb, beta, nc + offsetc, ldc); +done: + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, JNI_ABORT); + if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnTranslate: + /* exc has been set by translate_uplo or translate_trans */ + goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_ssyr2k)(int order, int uplo, int trans, int n, int k, float alpha, float *a, int lda, float *b, int ldb, float beta, float *c, int ldc); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_ssyr2kK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jstring trans, jint n, jint k, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat beta, jfloatArray c, jint offsetc, jint ldc) { + jthrowable excv = NULL, *exc = &excv; + int nuplo, ntrans; float *na = NULL, *nb = NULL, *nc = NULL; + if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; + if (!(ntrans = translate_trans(env, trans, exc))) goto failOnTranslate; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; + if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto failOnCopy; + if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOnCopy; + cblas_ssyr2k(CBLAS_COL_MAJOR, nuplo, ntrans, n, k, alpha, na + offseta, lda, nb + offsetb, ldb, beta, nc + offsetc, ldc); +done: + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, JNI_ABORT); + if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnTranslate: + /* exc has been set by translate_uplo or translate_trans */ + goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_dsyrk)(int order, int uplo, int trans, int n, int k, double alpha, double *a, int lda, double beta, double *c, int ldc); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_dsyrkK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jstring trans, jint n, jint k, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdouble beta, jdoubleArray c, jint offsetc, jint ldc) { + jthrowable excv = NULL, *exc = &excv; + int nuplo, ntrans; double *na = NULL, *nc = NULL; + if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; + if (!(ntrans = translate_trans(env, trans, exc))) goto failOnTranslate; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; + if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOnCopy; + cblas_dsyrk(CBLAS_COL_MAJOR, nuplo, ntrans, n, k, alpha, na + offseta, lda, beta, nc + offsetc, ldc); +done: + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnTranslate: + /* exc has been set by translate_uplo or translate_trans */ + goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_ssyrk)(int order, int uplo, int trans, int n, int k, float alpha, float *a, int lda, float beta, float *c, int ldc); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_ssyrkK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jstring trans, jint n, jint k, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloat beta, jfloatArray c, jint offsetc, jint ldc) { + jthrowable excv = NULL, *exc = &excv; + int nuplo, ntrans; float *na = NULL, *nc = NULL; + if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; + if (!(ntrans = translate_trans(env, trans, exc))) goto failOnTranslate; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; + if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOnCopy; + cblas_ssyrk(CBLAS_COL_MAJOR, nuplo, ntrans, n, k, alpha, na + offseta, lda, beta, nc + offsetc, ldc); +done: + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, 0); + if (*exc) (*env)->Throw(env, *exc); + return; +failOnTranslate: + /* exc has been set by translate_uplo or translate_trans */ + goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void (*cblas_dtbmv)(int order, int uplo, int trans, int diag, int n, int k, double *a, int lda, double *x, int incx); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_dtbmvK(UNUSED JNIEnv *env, UNUSED jobject obj, + UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jint k, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jdoubleArray x, UNUSED jint offsetx, UNUSED jint incx) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*cblas_stbmv)(int order, int uplo, int trans, int diag, int n, int k, float *a, int lda, float *x, int incx); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_stbmvK(UNUSED JNIEnv *env, UNUSED jobject obj, + UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jint k, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jfloatArray x, UNUSED jint offsetx, UNUSED jint incx) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*cblas_dtbsv)(int order, int uplo, int trans, int diag, int n, int k, double *a, int lda, double *x, int incx); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_dtbsvK(JNIEnv *env, UNUSED jobject obj, + UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jint k, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jdoubleArray x, UNUSED jint offsetx, UNUSED jint incx) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*cblas_stbsv)(int order, int uplo, int trans, int diag, int n, int k, float *a, int lda, float *x, int incx); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_stbsvK(JNIEnv *env, UNUSED jobject obj, + UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jint k, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jfloatArray x, UNUSED jint offsetx, UNUSED jint incx) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*cblas_dtpmv)(int order, int uplo, int trans, int diag, int n, double *a, double *x, int incx); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_dtpmvK(JNIEnv *env, UNUSED jobject obj, + UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jdoubleArray x, UNUSED jint offsetx, UNUSED jint incx) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*cblas_stpmv)(int order, int uplo, int trans, int diag, int n, float *a, float *x, int incx); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_stpmvK(JNIEnv *env, UNUSED jobject obj, + UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jfloatArray x, UNUSED jint offsetx, UNUSED jint incx) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*cblas_dtpsv)(int order, int uplo, int trans, int diag, int n, double *a, double *x, int incx); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_dtpsvK(JNIEnv *env, UNUSED jobject obj, + UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jdoubleArray x, UNUSED jint offsetx, UNUSED jint incx) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*cblas_stpsv)(int order, int uplo, int trans, int diag, int n, float *a, float *x, int incx); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_stpsvK(JNIEnv *env, UNUSED jobject obj, + UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jfloatArray x, UNUSED jint offsetx, UNUSED jint incx) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*cblas_dtrmm)(int order, int side, int uplo, int transa, int diag, int m, int n, double alpha, double *a, int lda, double *b, int ldb); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_dtrmmK(JNIEnv *env, UNUSED jobject obj, + UNUSED jstring side, UNUSED jstring uplo, UNUSED jstring transa, UNUSED jstring diag, UNUSED jint m, UNUSED jint n, UNUSED jdouble alpha, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jdoubleArray b, UNUSED jint offsetb, UNUSED jint ldb) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*cblas_strmm)(int order, int side, int uplo, int transa, int diag, int m, int n, float alpha, float *a, int lda, float *b, int ldb); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_strmmK(JNIEnv *env, UNUSED jobject obj, + UNUSED jstring side, UNUSED jstring uplo, UNUSED jstring transa, UNUSED jstring diag, UNUSED jint m, UNUSED jint n, UNUSED jfloat alpha, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jfloatArray b, UNUSED jint offsetb, UNUSED jint ldb) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*cblas_dtrmv)(int order, int uplo, int trans, int diag, int n, double *a, int lda, double *x, int incx); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_dtrmvK(JNIEnv *env, UNUSED jobject obj, + UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jdoubleArray x, UNUSED jint offsetx, UNUSED jint incx) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*cblas_strmv)(int order, int uplo, int trans, int diag, int n, float *a, int lda, float *x, int incx); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_strmvK(JNIEnv *env, UNUSED jobject obj, + UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jfloatArray x, UNUSED jint offsetx, UNUSED jint incx) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*cblas_dtrsm)(int order, int side, int uplo, int transa, int diag, int m, int n, double alpha, double *a, int lda, double *b, int ldb); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_dtrsmK(JNIEnv *env, UNUSED jobject obj, + UNUSED jstring side, UNUSED jstring uplo, UNUSED jstring transa, UNUSED jstring diag, UNUSED jint m, UNUSED jint n, UNUSED jdouble alpha, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jdoubleArray b, UNUSED jint offsetb, UNUSED jint ldb) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*cblas_strsm)(int order, int side, int uplo, int transa, int diag, int m, int n, float alpha, float *a, int lda, float *b, int ldb); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_strsmK(JNIEnv *env, UNUSED jobject obj, + UNUSED jstring side, UNUSED jstring uplo, UNUSED jstring transa, UNUSED jstring diag, UNUSED jint m, UNUSED jint n, UNUSED jfloat alpha, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jfloatArray b, UNUSED jint offsetb, UNUSED jint ldb) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*cblas_dtrsv)(int order, int uplo, int trans, int diag, int n, double *a, int lda, double *x, int incx); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_dtrsvK(JNIEnv *env, UNUSED jobject obj, + UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jdoubleArray x, UNUSED jint offsetx, UNUSED jint incx) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*cblas_strsv)(int order, int uplo, int trans, int diag, int n, float *a, int lda, float *x, int incx); + +void Java_dev_ludovic_netlib_blas_JNIBLAS_strsvK(JNIEnv *env, UNUSED jobject obj, + UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jfloatArray x, UNUSED jint offsetx, UNUSED jint incx) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static int (*cblas_idamax)(int n, double *dx, int incdx); + +jint Java_dev_ludovic_netlib_blas_JNIBLAS_idamaxK(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray dx, jint offsetdx, jint incdx) { + jint ret; + jthrowable excv = NULL, *exc = &excv; + double *ndx = NULL; + if (!(ndx = (*env)->GetPrimitiveArrayCritical(env, dx, NULL))) goto failOnCopy; + ret = cblas_idamax(n, ndx + offsetdx, incdx); +done: + if (ndx) (*env)->ReleasePrimitiveArrayCritical(env, dx, ndx, JNI_ABORT); + if (*exc) (*env)->Throw(env, *exc); + return ret; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static int (*cblas_isamax)(int n, float *sx, int incx); + +jint Java_dev_ludovic_netlib_blas_JNIBLAS_isamaxK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray sx, jint offsetsx, jint incx) { + jint ret; + jthrowable excv = NULL, *exc = &excv; + float *nsx = NULL; + if (!(nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto failOnCopy; + ret = cblas_isamax(n, nsx + offsetsx, incx); +done: + if (nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, nsx, JNI_ABORT); + if (*exc) (*env)->Throw(env, *exc); + return ret; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static void *blas; + +jstring get_system_property(JNIEnv *env, jstring key, jstring def) { + jclass klass = (*env)->FindClass(env, "java/lang/System"); + jmethodID method = (*env)->GetStaticMethodID(env, klass, "getProperty", "(Ljava/lang/String;Ljava/lang/String;)Ljava/lang/String;"); + return (jstring)(*env)->CallStaticObjectMethod(env, klass, method, key, def); +} + +jint JNI_OnLoad(JavaVM *vm, UNUSED void *reserved) { + JNIEnv *env; + if ((*vm)->GetEnv(vm, (void**)&env, JNI_VERSION_1_6) != JNI_OK) { + return -1; + } + + char blas_name[1024]; + jstring native_lib_path = get_system_property(env, (*env)->NewStringUTF(env, "dev.ludovic.netlib.blas.nativeLibPath"), NULL); + jstring native_lib = get_system_property(env, (*env)->NewStringUTF(env, "dev.ludovic.netlib.blas.nativeLib"), (*env)->NewStringUTF(env, "blas")); + if (native_lib_path) { + const char *utf = (*env)->GetStringUTFChars(env, native_lib_path, NULL); + strncpy(blas_name, utf, sizeof(blas_name)); + blas_name[sizeof(blas_name) - 1] = '\0'; + (*env)->ReleaseStringUTFChars(env, native_lib_path, utf); + } else { + const char *utf = (*env)->GetStringUTFChars(env, native_lib, NULL); + snprintf(blas_name, sizeof(blas_name), "lib%s.so", utf); + (*env)->ReleaseStringUTFChars(env, native_lib, utf); + } + + blas = dlopen(blas_name, RTLD_LAZY); + if (!blas) { + return -1; + } + +#define LOAD_SYMBOL(name) \ + name = dlsym(blas, #name); \ + if (!name) { \ + return -1; \ + } + + LOAD_SYMBOL(cblas_dasum); + LOAD_SYMBOL(cblas_sasum); + LOAD_SYMBOL(cblas_daxpy); + LOAD_SYMBOL(cblas_saxpy); + LOAD_SYMBOL(cblas_dcopy); + LOAD_SYMBOL(cblas_scopy); + LOAD_SYMBOL(cblas_ddot); + LOAD_SYMBOL(cblas_sdot); + LOAD_SYMBOL(cblas_sdsdot); + LOAD_SYMBOL(cblas_dgbmv); + LOAD_SYMBOL(cblas_sgbmv); + LOAD_SYMBOL(cblas_dgemm); + LOAD_SYMBOL(cblas_sgemm); + LOAD_SYMBOL(cblas_dgemv); + LOAD_SYMBOL(cblas_sgemv); + LOAD_SYMBOL(cblas_dger); + LOAD_SYMBOL(cblas_sger); + LOAD_SYMBOL(cblas_dnrm2); + LOAD_SYMBOL(cblas_snrm2); + LOAD_SYMBOL(cblas_drot); + LOAD_SYMBOL(cblas_srot); + LOAD_SYMBOL(cblas_drotm); + LOAD_SYMBOL(cblas_srotm); + LOAD_SYMBOL(cblas_drotmg); + LOAD_SYMBOL(cblas_srotmg); + LOAD_SYMBOL(cblas_dsbmv); + LOAD_SYMBOL(cblas_ssbmv); + LOAD_SYMBOL(cblas_dscal); + LOAD_SYMBOL(cblas_sscal); + LOAD_SYMBOL(cblas_dspmv); + LOAD_SYMBOL(cblas_sspmv); + LOAD_SYMBOL(cblas_dspr); + LOAD_SYMBOL(cblas_sspr); + LOAD_SYMBOL(cblas_dspr2); + LOAD_SYMBOL(cblas_sspr2); + LOAD_SYMBOL(cblas_dswap); + LOAD_SYMBOL(cblas_sswap); + LOAD_SYMBOL(cblas_dsymm); + LOAD_SYMBOL(cblas_ssymm); + LOAD_SYMBOL(cblas_dsymv); + LOAD_SYMBOL(cblas_ssymv); + LOAD_SYMBOL(cblas_dsyr); + LOAD_SYMBOL(cblas_ssyr); + LOAD_SYMBOL(cblas_dsyr2); + LOAD_SYMBOL(cblas_ssyr2); + LOAD_SYMBOL(cblas_dsyr2k); + LOAD_SYMBOL(cblas_ssyr2k); + LOAD_SYMBOL(cblas_dsyrk); + LOAD_SYMBOL(cblas_ssyrk); + LOAD_SYMBOL(cblas_dtbmv); + LOAD_SYMBOL(cblas_stbmv); + LOAD_SYMBOL(cblas_dtbsv); + LOAD_SYMBOL(cblas_stbsv); + LOAD_SYMBOL(cblas_dtpmv); + LOAD_SYMBOL(cblas_stpmv); + LOAD_SYMBOL(cblas_dtpsv); + LOAD_SYMBOL(cblas_stpsv); + LOAD_SYMBOL(cblas_dtrmm); + LOAD_SYMBOL(cblas_strmm); + LOAD_SYMBOL(cblas_dtrmv); + LOAD_SYMBOL(cblas_strmv); + LOAD_SYMBOL(cblas_dtrsm); + LOAD_SYMBOL(cblas_strsm); + LOAD_SYMBOL(cblas_dtrsv); + LOAD_SYMBOL(cblas_strsv); + LOAD_SYMBOL(cblas_idamax); + LOAD_SYMBOL(cblas_isamax); + +#undef LOAD_SYMBOL + + return JNI_VERSION_1_6; +} + +void JNI_OnUnload(UNUSED JavaVM *vm, UNUSED void *reserved) { + dlclose(blas); +} diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/BLASTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/BLASTest.java index 816aeadf..f6efa9f4 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/BLASTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/BLASTest.java @@ -52,6 +52,10 @@ private static Stream BLASImplementations() { } catch (NoClassDefFoundError e) { } + instances = Stream.concat(instances, Stream.of( + Arguments.of(dev.ludovic.netlib.blas.JNIBLAS.getInstance()) + )); + String[] fullVersion = System.getProperty("java.version").split("[+.\\-]+", 2); int major = Integer.parseInt(fullVersion[0]); if (major >= 11) { @@ -64,8 +68,12 @@ private static Stream BLASImplementations() { )); } if (major >= 16) { + /* FIXME: enabling VectorizedBLAS breaks JNI... */ + // instances = Stream.concat(instances, Stream.of( + // Arguments.of(dev.ludovic.netlib.blas.VectorizedBLAS.getInstance()), + // Arguments.of(dev.ludovic.netlib.blas.ForeignLinkerBLAS.getInstance()) + // )); instances = Stream.concat(instances, Stream.of( - Arguments.of(dev.ludovic.netlib.blas.VectorizedBLAS.getInstance()), Arguments.of(dev.ludovic.netlib.blas.ForeignLinkerBLAS.getInstance()) )); } diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/DgemvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l2/DgemvTest.java index 0d9223a9..ac01c472 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l2/DgemvTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l2/DgemvTest.java @@ -34,20 +34,60 @@ public class DgemvTest extends BLASTest { void testSanity(BLAS blas) { double[] expected, dYcopy; - blas.dgemv("N", M, N, 1.0, dgeA, M, dX, 1, 2.0, expected = dY.clone(), 1); - blas.dgemv("N", M, N, 1.0, dgeA, M, dX, 1, 2.0, dYcopy = dY.clone(), 1); + f2j.dgemv("N", M, N, 1.0, dgeA, M, dX, 1, 1.0, expected = dY.clone(), 1); + blas.dgemv("N", M, N, 1.0, dgeA, M, dX, 1, 1.0, dYcopy = dY.clone(), 1); assertArrayEquals(expected, dYcopy, depsilon); - blas.dgemv("T", N, M, 1.0, dgeAT, N, dX, 1, 2.0, expected = dY.clone(), 1); - blas.dgemv("T", N, M, 1.0, dgeAT, N, dX, 1, 2.0, dYcopy = dY.clone(), 1); + f2j.dgemv("N", M, N, 0.5, dgeA, M, dX, 1, 1.0, expected = dY.clone(), 1); + blas.dgemv("N", M, N, 0.5, dgeA, M, dX, 1, 1.0, dYcopy = dY.clone(), 1); assertArrayEquals(expected, dYcopy, depsilon); - blas.dgemv("N", M, N, 2.0, dgeA, M, dX, 1, 2.0, expected = dY.clone(), 1); - blas.dgemv("N", M, N, 2.0, dgeA, M, dX, 1, 2.0, dYcopy = dY.clone(), 1); + f2j.dgemv("N", M, N, -0.5, dgeA, M, dX, 1, 1.0, expected = dY.clone(), 1); + blas.dgemv("N", M, N, -0.5, dgeA, M, dX, 1, 1.0, dYcopy = dY.clone(), 1); assertArrayEquals(expected, dYcopy, depsilon); - blas.dgemv("T", N, M, 2.0, dgeAT, N, dX, 1, 2.0, expected = dY.clone(), 1); - blas.dgemv("T", N, M, 2.0, dgeAT, N, dX, 1, 2.0, dYcopy = dY.clone(), 1); + f2j.dgemv("N", M, N, 0.0, dgeA, M, dX, 1, 1.0, expected = dY.clone(), 1); + blas.dgemv("N", M, N, 0.0, dgeA, M, dX, 1, 1.0, dYcopy = dY.clone(), 1); + assertArrayEquals(expected, dYcopy, depsilon); + + f2j.dgemv("N", M, N, 1.0, dgeA, M, dX, 1, 0.5, expected = dY.clone(), 1); + blas.dgemv("N", M, N, 1.0, dgeA, M, dX, 1, 0.5, dYcopy = dY.clone(), 1); + assertArrayEquals(expected, dYcopy, depsilon); + + f2j.dgemv("N", M, N, 1.0, dgeA, M, dX, 1, -0.5, expected = dY.clone(), 1); + blas.dgemv("N", M, N, 1.0, dgeA, M, dX, 1, -0.5, dYcopy = dY.clone(), 1); + assertArrayEquals(expected, dYcopy, depsilon); + + f2j.dgemv("N", M, N, 1.0, dgeA, M, dX, 1, 0.0, expected = dY.clone(), 1); + blas.dgemv("N", M, N, 1.0, dgeA, M, dX, 1, 0.0, dYcopy = dY.clone(), 1); + assertArrayEquals(expected, dYcopy, depsilon); + + f2j.dgemv("T", M, N, 1.0, dgeA, M, dX, 1, 1.0, expected = dY.clone(), 1); + blas.dgemv("T", M, N, 1.0, dgeA, M, dX, 1, 1.0, dYcopy = dY.clone(), 1); + assertArrayEquals(expected, dYcopy, depsilon); + + f2j.dgemv("T", M, N, 0.5, dgeA, M, dX, 1, 1.0, expected = dY.clone(), 1); + blas.dgemv("T", M, N, 0.5, dgeA, M, dX, 1, 1.0, dYcopy = dY.clone(), 1); + assertArrayEquals(expected, dYcopy, depsilon); + + f2j.dgemv("T", M, N, -0.5, dgeA, M, dX, 1, 1.0, expected = dY.clone(), 1); + blas.dgemv("T", M, N, -0.5, dgeA, M, dX, 1, 1.0, dYcopy = dY.clone(), 1); + assertArrayEquals(expected, dYcopy, depsilon); + + f2j.dgemv("T", M, N, 0.0, dgeA, M, dX, 1, 1.0, expected = dY.clone(), 1); + blas.dgemv("T", M, N, 0.0, dgeA, M, dX, 1, 1.0, dYcopy = dY.clone(), 1); + assertArrayEquals(expected, dYcopy, depsilon); + + f2j.dgemv("T", M, N, 1.0, dgeA, M, dX, 1, 0.5, expected = dY.clone(), 1); + blas.dgemv("T", M, N, 1.0, dgeA, M, dX, 1, 0.5, dYcopy = dY.clone(), 1); + assertArrayEquals(expected, dYcopy, depsilon); + + f2j.dgemv("T", M, N, 1.0, dgeA, M, dX, 1, -0.5, expected = dY.clone(), 1); + blas.dgemv("T", M, N, 1.0, dgeA, M, dX, 1, -0.5, dYcopy = dY.clone(), 1); + assertArrayEquals(expected, dYcopy, depsilon); + + f2j.dgemv("T", M, N, 1.0, dgeA, M, dX, 1, 0.0, expected = dY.clone(), 1); + blas.dgemv("T", M, N, 1.0, dgeA, M, dX, 1, 0.0, dYcopy = dY.clone(), 1); assertArrayEquals(expected, dYcopy, depsilon); } } diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/SgemvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l2/SgemvTest.java index 2834a052..564ccbdc 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l2/SgemvTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l2/SgemvTest.java @@ -34,20 +34,60 @@ public class SgemvTest extends BLASTest { void testSanity(BLAS blas) { float[] expected, sYcopy; - blas.sgemv("N", M, N, 1.0f, sgeA, M, sX, 1, 2.0f, expected = sY.clone(), 1); - blas.sgemv("N", M, N, 1.0f, sgeA, M, sX, 1, 2.0f, sYcopy = sY.clone(), 1); + f2j.sgemv("N", M, N, 1.0f, sgeA, M, sX, 1, 1.0f, expected = sY.clone(), 1); + blas.sgemv("N", M, N, 1.0f, sgeA, M, sX, 1, 1.0f, sYcopy = sY.clone(), 1); assertArrayEquals(expected, sYcopy, sepsilon); - blas.sgemv("T", N, M, 1.0f, sgeAT, N, sX, 1, 2.0f, expected = sY.clone(), 1); - blas.sgemv("T", N, M, 1.0f, sgeAT, N, sX, 1, 2.0f, sYcopy = sY.clone(), 1); + f2j.sgemv("N", M, N, 0.5f, sgeA, M, sX, 1, 1.0f, expected = sY.clone(), 1); + blas.sgemv("N", M, N, 0.5f, sgeA, M, sX, 1, 1.0f, sYcopy = sY.clone(), 1); assertArrayEquals(expected, sYcopy, sepsilon); - blas.sgemv("N", M, N, 2.0f, sgeA, M, sX, 1, 2.0f, expected = sY.clone(), 1); - blas.sgemv("N", M, N, 2.0f, sgeA, M, sX, 1, 2.0f, sYcopy = sY.clone(), 1); + f2j.sgemv("N", M, N, -0.5f, sgeA, M, sX, 1, 1.0f, expected = sY.clone(), 1); + blas.sgemv("N", M, N, -0.5f, sgeA, M, sX, 1, 1.0f, sYcopy = sY.clone(), 1); assertArrayEquals(expected, sYcopy, sepsilon); - blas.sgemv("T", N, M, 2.0f, sgeAT, N, sX, 1, 2.0f, expected = sY.clone(), 1); - blas.sgemv("T", N, M, 2.0f, sgeAT, N, sX, 1, 2.0f, sYcopy = sY.clone(), 1); + f2j.sgemv("N", M, N, 0.0f, sgeA, M, sX, 1, 1.0f, expected = sY.clone(), 1); + blas.sgemv("N", M, N, 0.0f, sgeA, M, sX, 1, 1.0f, sYcopy = sY.clone(), 1); + assertArrayEquals(expected, sYcopy, sepsilon); + + f2j.sgemv("N", M, N, 1.0f, sgeA, M, sX, 1, 0.5f, expected = sY.clone(), 1); + blas.sgemv("N", M, N, 1.0f, sgeA, M, sX, 1, 0.5f, sYcopy = sY.clone(), 1); + assertArrayEquals(expected, sYcopy, sepsilon); + + f2j.sgemv("N", M, N, 1.0f, sgeA, M, sX, 1, -0.5f, expected = sY.clone(), 1); + blas.sgemv("N", M, N, 1.0f, sgeA, M, sX, 1, -0.5f, sYcopy = sY.clone(), 1); + assertArrayEquals(expected, sYcopy, sepsilon); + + f2j.sgemv("N", M, N, 1.0f, sgeA, M, sX, 1, 0.0f, expected = sY.clone(), 1); + blas.sgemv("N", M, N, 1.0f, sgeA, M, sX, 1, 0.0f, sYcopy = sY.clone(), 1); + assertArrayEquals(expected, sYcopy, sepsilon); + + f2j.sgemv("T", M, N, 1.0f, sgeA, M, sX, 1, 1.0f, expected = sY.clone(), 1); + blas.sgemv("T", M, N, 1.0f, sgeA, M, sX, 1, 1.0f, sYcopy = sY.clone(), 1); + assertArrayEquals(expected, sYcopy, sepsilon); + + f2j.sgemv("T", M, N, 0.5f, sgeA, M, sX, 1, 1.0f, expected = sY.clone(), 1); + blas.sgemv("T", M, N, 0.5f, sgeA, M, sX, 1, 1.0f, sYcopy = sY.clone(), 1); + assertArrayEquals(expected, sYcopy, sepsilon); + + f2j.sgemv("T", M, N, -0.5f, sgeA, M, sX, 1, 1.0f, expected = sY.clone(), 1); + blas.sgemv("T", M, N, -0.5f, sgeA, M, sX, 1, 1.0f, sYcopy = sY.clone(), 1); + assertArrayEquals(expected, sYcopy, sepsilon); + + f2j.sgemv("T", M, N, 0.0f, sgeA, M, sX, 1, 1.0f, expected = sY.clone(), 1); + blas.sgemv("T", M, N, 0.0f, sgeA, M, sX, 1, 1.0f, sYcopy = sY.clone(), 1); + assertArrayEquals(expected, sYcopy, sepsilon); + + f2j.sgemv("T", M, N, 1.0f, sgeA, M, sX, 1, 0.5f, expected = sY.clone(), 1); + blas.sgemv("T", M, N, 1.0f, sgeA, M, sX, 1, 0.5f, sYcopy = sY.clone(), 1); + assertArrayEquals(expected, sYcopy, sepsilon); + + f2j.sgemv("T", M, N, 1.0f, sgeA, M, sX, 1, -0.5f, expected = sY.clone(), 1); + blas.sgemv("T", M, N, 1.0f, sgeA, M, sX, 1, -0.5f, sYcopy = sY.clone(), 1); + assertArrayEquals(expected, sYcopy, sepsilon); + + f2j.sgemv("T", M, N, 1.0f, sgeA, M, sX, 1, 0.0f, expected = sY.clone(), 1); + blas.sgemv("T", M, N, 1.0f, sgeA, M, sX, 1, 0.0f, sYcopy = sY.clone(), 1); assertArrayEquals(expected, sYcopy, sepsilon); } } diff --git a/pom.xml b/pom.xml index 6eeb15b8..d66de8d8 100644 --- a/pom.xml +++ b/pom.xml @@ -145,6 +145,9 @@ information or have any questions. ${javac.target} ${javac.target} ${javac.target} + + -h${project.build.directory}/include + @@ -168,10 +171,6 @@ information or have any questions. - - maven-resources-plugin - 2.6 - maven-site-plugin 3.3 @@ -197,6 +196,64 @@ information or have any questions. maven-gpg-plugin 1.5 + + maven-antrun-plugin + 3.0.0 + + + compile + + run + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + maven-resources-plugin + 3.2.0 + + + copy-resources + process-classes + + copy-resources + + + ${project.build.outputDirectory}/resources/native + + + ${project.build.directory}/native + false + + + + + + From ef0a7b3faf2037204e38b27628928daeb02f90fb Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Tue, 27 Apr 2021 19:12:55 +0200 Subject: [PATCH 03/42] Print which implementation is currently running for benchmark Since java or native can mean more things, let's just log it out. --- .../java/dev/ludovic/netlib/benchmarks/blas/BLASBenchmark.java | 1 + 1 file changed, 1 insertion(+) diff --git a/benchmarks/src/main/java/dev/ludovic/netlib/benchmarks/blas/BLASBenchmark.java b/benchmarks/src/main/java/dev/ludovic/netlib/benchmarks/blas/BLASBenchmark.java index f20b6daa..b2ae6ae7 100644 --- a/benchmarks/src/main/java/dev/ludovic/netlib/benchmarks/blas/BLASBenchmark.java +++ b/benchmarks/src/main/java/dev/ludovic/netlib/benchmarks/blas/BLASBenchmark.java @@ -57,6 +57,7 @@ public void setupImplementation() { break; default: throw new IllegalArgumentException("Unknown implementation = " + implementation); } + System.out.println("implementation = " + blas.getClass().getName()); } private final Random rand = new Random(0); From f7bc7e10a59f0363f97860e6163b337f18fcca88 Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Tue, 27 Apr 2021 19:13:40 +0200 Subject: [PATCH 04/42] Add JDK17 profile, just in case. --- pom.xml | 9 +++++++++ 1 file changed, 9 insertions(+) diff --git a/pom.xml b/pom.xml index d66de8d8..984cafeb 100644 --- a/pom.xml +++ b/pom.xml @@ -81,6 +81,15 @@ information or have any questions. --add-modules=jdk.incubator.vector,jdk.incubator.foreign + + jdk17 + + 17 + + + --add-modules=jdk.incubator.vector,jdk.incubator.foreign + + From 676339b400e489da3eed1fa4609b99b401017bf4 Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Tue, 27 Apr 2021 22:27:52 +0200 Subject: [PATCH 05/42] Try JNIBLAS before ForeignLinkerBLAS The former is faster because it doesn't require to copy memory from the heap to native memory --- blas/src/main/java/dev/ludovic/netlib/NativeBLAS.java | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/blas/src/main/java/dev/ludovic/netlib/NativeBLAS.java b/blas/src/main/java/dev/ludovic/netlib/NativeBLAS.java index b3c59ccc..bb93e25a 100644 --- a/blas/src/main/java/dev/ludovic/netlib/NativeBLAS.java +++ b/blas/src/main/java/dev/ludovic/netlib/NativeBLAS.java @@ -37,14 +37,14 @@ public static NativeBLAS getInstance() { Logger.getLogger(NativeBLAS.class.getName()).warning("Failed to load implementation from:dev.ludovic.netlib.blas.NetlibNativeBLAS"); } try { - return dev.ludovic.netlib.blas.ForeignLinkerBLAS.getInstance(); + return dev.ludovic.netlib.blas.JNIBLAS.getInstance(); } catch (Throwable t) { - Logger.getLogger(NativeBLAS.class.getName()).warning("Failed to load implementation from:dev.ludovic.netlib.blas.ForeignLinkerBLAS"); + Logger.getLogger(NativeBLAS.class.getName()).warning("Failed to load implementation from:dev.ludovic.netlib.blas.JNIBLAS"); } try { - return dev.ludovic.netlib.blas.JNIBLAS.getInstance(); + return dev.ludovic.netlib.blas.ForeignLinkerBLAS.getInstance(); } catch (Throwable t) { - Logger.getLogger(NativeBLAS.class.getName()).warning("Failed to load implementation from:dev.ludovic.netlib.blas.JNIBLAS"); + Logger.getLogger(NativeBLAS.class.getName()).warning("Failed to load implementation from:dev.ludovic.netlib.blas.ForeignLinkerBLAS"); } throw new RuntimeException("Unable to load native implementation"); } From c46b5469e1ee3a6bed1eb86bbd92c2499f85357d Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Wed, 28 Apr 2021 16:11:03 +0200 Subject: [PATCH 06/42] Use Fortran symbols directly Still without using any external library. --- blas/src/main/native/jni.c | 1300 ++++++++++++++++-------------------- 1 file changed, 576 insertions(+), 724 deletions(-) diff --git a/blas/src/main/native/jni.c b/blas/src/main/native/jni.c index 86c7e6a4..a8a1d7c4 100644 --- a/blas/src/main/native/jni.c +++ b/blas/src/main/native/jni.c @@ -24,7 +24,6 @@ */ #include -#include #include #include @@ -32,1294 +31,1145 @@ #define UNUSED __attribute__((unused)) -static jthrowable fail(JNIEnv *env, const char *klass_name, const char *msg) { - jclass klass = (*env)->FindClass(env, klass_name); - jmethodID constructor = (*env)->GetMethodID(env, klass, "", "(Ljava/lang/String;)V"); - return (*env)->NewObject(env, klass, constructor, (*env)->NewStringUTF(env, msg)); -} - -static jthrowable failOnCopy(JNIEnv *env) { - return fail(env, "java/lang/OutOfMemoryError", "Failed to copy from heap to native memory"); -} - -enum { - CBLAS_ROW_MAJOR = 101, - CBLAS_COL_MAJOR = 102, - - CBLAS_NO_TRANS = 111, - CBLAS_TRANS = 112, - CBLAS_CONJ_TRANS = 113, - - CBLAS_UPPER = 121, - CBLAS_LOWER = 122, - - CBLAS_NON_UNIT = 131, - CBLAS_UNIT = 132, - - CBLAS_LEFT = 141, - CBLAS_RIGHT = 142, -}; - -static int translate_trans(JNIEnv *env, jstring str, jthrowable *exc) { - int res = 0; - const char *utf = NULL; - *exc = NULL; - if ((*env)->GetStringUTFLength(env, str) != 1) goto failOnUnknownOp; - if (!(utf = (*env)->GetStringUTFChars(env, str, NULL))) goto failOnCopy; - switch (utf[0]) { - case 'N': res = CBLAS_NO_TRANS; break; - case 'T': res = CBLAS_TRANS; break; - case 'C': res = CBLAS_CONJ_TRANS; break; - default: goto failOnUnknownOp; - } -done: - if (utf) (*env)->ReleaseStringUTFChars(env, str, utf); - return res; -failOnUnknownOp: - *exc = fail(env, "java/lang/IllegalArgumentException", "Unknown transpose"); - goto done; -failOnCopy: - *exc = failOnCopy(env); - goto done; -} +#define TRUE 1 +#define FALSE 0 -static int translate_uplo(JNIEnv *env, jstring str, jthrowable *exc) { - int res = 0; - const char *utf = NULL; - *exc = NULL; - if ((*env)->GetStringUTFLength(env, str) <= 0) goto failOnUnknownOp; - if (!(utf = (*env)->GetStringUTFChars(env, str, NULL))) goto failOnCopy; - switch (utf[0]) { - case 'U': res = CBLAS_UPPER; break; - case 'L': res = CBLAS_LOWER; break; - default: goto failOnUnknownOp; - } -done: - if (utf) (*env)->ReleaseStringUTFChars(env, str, utf); - return res; -failOnUnknownOp: - *exc = fail(env, "java/lang/IllegalArgumentException", "Unknown uplo"); - goto done; -failOnCopy: - *exc = failOnCopy(env); - goto done; -} - -static int translate_diag(JNIEnv *env, jstring str, jthrowable *exc) { - int res = 0; - const char *utf = NULL; - *exc = NULL; - if ((*env)->GetStringUTFLength(env, str) <= 0) goto failOnUnknownOp; - if (!(utf = (*env)->GetStringUTFChars(env, str, NULL))) goto failOnCopy; - switch (utf[0]) { - case 'N': res = CBLAS_NON_UNIT; break; - case 'U': res = CBLAS_UNIT; break; - default: goto failOnUnknownOp; - } -done: - if (utf) (*env)->ReleaseStringUTFChars(env, str, utf); - return res; -failOnUnknownOp: - *exc = fail(env, "java/lang/IllegalArgumentException", "Unknown diag"); - goto done; -failOnCopy: - *exc = failOnCopy(env); - goto done; -} - -static int translate_side(JNIEnv *env, jstring str, jthrowable *exc) { - int res = 0; - const char *utf = NULL; - *exc = NULL; - if ((*env)->GetStringUTFLength(env, str) <= 0) goto failOnUnknownOp; - if (!(utf = (*env)->GetStringUTFChars(env, str, NULL))) goto failOnCopy; - switch (utf[0]) { - case 'L': res = CBLAS_LEFT; break; - case 'R': res = CBLAS_RIGHT; break; - default: goto failOnUnknownOp; - } -done: - if (utf) (*env)->ReleaseStringUTFChars(env, str, utf); - return res; -failOnUnknownOp: - *exc = fail(env, "java/lang/IllegalArgumentException", "Unknown side"); - goto done; -failOnCopy: - *exc = failOnCopy(env); - goto done; +static void throwOOM(JNIEnv *env) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } -static double (*cblas_dasum)(int n, double *x, int incx); +static double (*dasum_)(int *n, double *x, int *incx); jdouble Java_dev_ludovic_netlib_blas_JNIBLAS_dasumK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray x, jint offsetx, jint incx) { jdouble ret; - jthrowable excv = NULL, *exc = &excv; + jboolean failedOOM = FALSE; double *nx = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - ret = cblas_dasum(n, nx + offsetx, incx); + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + ret = dasum_(&n, nx + offsetx, &incx); done: if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return ret; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static float (*cblas_sasum)(int n, float *x, int incx); +static float (*sasum_)(int *n, float *x, int *incx); jfloat Java_dev_ludovic_netlib_blas_JNIBLAS_sasumK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray x, jint offsetx, jint incx) { jfloat ret; - jthrowable excv = NULL, *exc = &excv; + jboolean failedOOM = FALSE; float *nx = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - ret = cblas_sasum(n, nx + offsetx, incx); + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + ret = sasum_(&n, nx + offsetx, &incx); done: if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return ret; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_daxpy)(int n, double alpha, double *x, int incx, double *y, int incy); +static void (*daxpy_)(int *n, double *alpha, double *x, int *incx, double *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_daxpyK(JNIEnv *env, UNUSED jobject obj, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy) { - jthrowable excv = NULL, *exc = &excv; + jboolean failedOOM = FALSE; double *nx = NULL, *ny = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; - cblas_daxpy(n, alpha, nx + offsetx, incx, ny + offsety, incy); + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + daxpy_(&n, &alpha, nx + offsetx, &incx, ny + offsety, &incy); done: if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_saxpy)(int n, float alpha, float *x, int incx, float *y, int incy); +static void (*saxpy_)(int *n, float *alpha, float *x, int *incx, float *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_saxpyK(JNIEnv *env, UNUSED jobject obj, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy) { - jthrowable excv = NULL, *exc = &excv; + jboolean failedOOM = FALSE; float *nx = NULL, *ny = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; - cblas_saxpy(n, alpha, nx + offsetx, incx, ny + offsety, incy); + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + saxpy_(&n, &alpha, nx + offsetx, &incx, ny + offsety, &incy); done: if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_dcopy)(int n, double *x, int incx, double *y, int incy); +static void (*dcopy_)(int *n, double *x, int *incx, double *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_dcopyK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy) { - jthrowable excv = NULL, *exc = &excv; + jboolean failedOOM = FALSE; double *nx = NULL, *ny = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; - cblas_dcopy(n, nx + offsetx, incx, ny + offsety, incy); + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + dcopy_(&n, nx + offsetx, &incx, ny + offsety, &incy); done: if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_scopy)(int n, float *x, int incx, float *y, int incy); +static void (*scopy_)(int *n, float *x, int *incx, float *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_scopyK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy) { - jthrowable excv = NULL, *exc = &excv; + jboolean failedOOM = FALSE; float *nx = NULL, *ny = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; - cblas_scopy(n, nx + offsetx, incx, ny + offsety, incy); + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + scopy_(&n, nx + offsetx, &incx, ny + offsety, &incy); done: if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static double (*cblas_ddot)(int n, double *x, int incx, double *y, int incy); +static double (*ddot_)(int *n, double *x, int *incx, double *y, int *incy); jdouble Java_dev_ludovic_netlib_blas_JNIBLAS_ddotK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy) { + jboolean failedOOM = FALSE; jdouble ret; - jthrowable excv = NULL, *exc = &excv; double *nx = NULL, *ny = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; - ret = cblas_ddot(n, nx + offsetx, incx, ny + offsety, incy); + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + ret = ddot_(&n, nx + offsetx, &incx, ny + offsety, &incy); done: if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return ret; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static float (*cblas_sdot)(int n, float *x, int incx, float *y, int incy); +static float (*sdot_)(int *n, float *x, int *incx, float *y, int *incy); jfloat Java_dev_ludovic_netlib_blas_JNIBLAS_sdotK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy) { jfloat ret; - jthrowable excv = NULL, *exc = &excv; + jboolean failedOOM = FALSE; float *nx = NULL, *ny = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; - ret = cblas_sdot(n, nx + offsetx, incx, ny + offsety, incy); + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + ret = sdot_(&n, nx + offsetx, &incx, ny + offsety, &incy); done: if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return ret; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static float (*cblas_sdsdot)(int n, float sb, float *sx, int incsx, float *sy, int incsy); +static float (*sdsdot_)(int *n, float *sb, float *sx, int *incsx, float *sy, int *incsy); jfloat Java_dev_ludovic_netlib_blas_JNIBLAS_sdsdotK(JNIEnv *env, UNUSED jobject obj, jint n, jfloat sb, jfloatArray sx, jint offsetsx, jint incsx, jfloatArray sy, jint offsetsy, jint incsy) { jfloat ret; - jthrowable excv = NULL, *exc = &excv; + jboolean failedOOM = FALSE; float *nsx = NULL, *nsy = NULL; - if (!(nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto failOnCopy; - if (!(nsy = (*env)->GetPrimitiveArrayCritical(env, sy, NULL))) goto failOnCopy; - ret = cblas_sdsdot(n, sb, nsx + offsetsx, incsx, nsy + offsetsy, incsy); + if (!(nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto failOOM; + if (!(nsy = (*env)->GetPrimitiveArrayCritical(env, sy, NULL))) goto failOOM; + ret = sdsdot_(&n, &sb, nsx + offsetsx, &incsx, nsy + offsetsy, &incsy); done: if (nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, nsx, JNI_ABORT); if (nsy) (*env)->ReleasePrimitiveArrayCritical(env, sy, nsy, JNI_ABORT); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return ret; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_dgbmv)(int order, int trans, int m, int n, int kl, int ku, double alpha, double *a, int lda, double *x, int incx, double beta, double *y, int incy); +static void (*dgbmv_)(const char *trans, int *m, int *n, int *kl, int *ku, double *alpha, double *a, int *lda, double *x, int *incx, double *beta, double *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_dgbmvK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint m, jint n, jint kl, jint ku, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx, jdouble beta, jdoubleArray y, jint offsety, jint incy) { - jthrowable excv = NULL, *exc = &excv; - int ntrans; double *na = NULL, *nx = NULL, *ny = NULL; - if (!(ntrans = translate_trans(env, trans, exc))) goto failOnTranslate; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; - cblas_dgbmv(CBLAS_COL_MAJOR, ntrans, m, n, kl, ku, alpha, na + offseta, lda, nx + offsetx, incx, beta, ny + offsety, incy); + jboolean failedOOM = FALSE; + const char *ntrans = NULL; double *na = NULL, *nx = NULL, *ny = NULL; + if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto failOOM; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + dgbmv_(ntrans, &m, &n, &kl, &ku, &alpha, na + offseta, &lda, nx + offsetx, &incx, &beta, ny + offsety, &incy); done: + if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnTranslate: - /* exc has been set by translate_trans */ - goto done; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_sgbmv)(int order, int trans, int m, int n, int kl, int ku, float alpha, float *a, int lda, float *x, int incx, float beta, float *y, int incy); +static void (*sgbmv_)(const char *trans, int *m, int *n, int *kl, int *ku, float *alpha, float *a, int *lda, float *x, int *incx, float *beta, float *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_sgbmvK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint m, jint n, jint kl, jint ku, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx, jfloat beta, jfloatArray y, jint offsety, jint incy) { - jthrowable excv = NULL, *exc = &excv; - int ntrans; float *na = NULL, *nx = NULL, *ny = NULL; - if (!(ntrans = translate_trans(env, trans, exc))) goto failOnTranslate; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; - cblas_sgbmv(CBLAS_COL_MAJOR, ntrans, m, n, kl, ku, alpha, na + offseta, lda, nx + offsetx, incx, beta, ny + offsety, incy); + jboolean failedOOM = FALSE; + const char *ntrans = NULL; float *na = NULL, *nx = NULL, *ny = NULL; + if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto failOOM; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + sgbmv_(ntrans, &m, &n, &kl, &ku, &alpha, na + offseta, &lda, nx + offsetx, &incx, &beta, ny + offsety, &incy); done: + if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnTranslate: - /* exc has been set by translate_trans */ - goto done; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_dgemm)(int order, int transa, int transb, int m, int n, int k, double alpha, double *a, int lda, double *b, int ldb, double beta, double *c, int ldc); +static void (*dgemm_)(const char *transa, const char *transb, int *m, int *n, int *k, double *alpha, double *a, int *lda, double *b, int *ldb, double *beta, double *c, int *ldc); void Java_dev_ludovic_netlib_blas_JNIBLAS_dgemmK(JNIEnv *env, UNUSED jobject obj, jstring transa, jstring transb, jint m, jint n, jint k, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble beta, jdoubleArray c, jint offsetc, jint ldc) { - jthrowable excv = NULL, *exc = &excv; - int ntransa, ntransb; double *na = NULL, *nb = NULL, *nc = NULL; - if (!(ntransa = translate_trans(env, transa, exc))) goto failOnTranslate; - if (!(ntransb = translate_trans(env, transb, exc))) goto failOnTranslate; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; - if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto failOnCopy; - if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOnCopy; - cblas_dgemm(CBLAS_COL_MAJOR, ntransa, ntransb, m, n, k, alpha, na + offseta, lda, nb + offsetb, ldb, beta, nc + offsetc, ldc); + jboolean failedOOM = FALSE; + const char *ntransa = NULL, *ntransb = NULL; double *na = NULL, *nb = NULL, *nc = NULL; + if (!(ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) goto failOOM; + if (!(ntransb = (*env)->GetStringUTFChars(env, transb, NULL))) goto failOOM; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto failOOM; + if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOOM; + dgemm_(ntransa, ntransb, &m, &n, &k, &alpha, na + offseta, &lda, nb + offsetb, &ldb, &beta, nc + offsetc, &ldc); done: + if (ntransa) (*env)->ReleaseStringUTFChars(env, transa, ntransa); + if (ntransb) (*env)->ReleaseStringUTFChars(env, transb, ntransb); if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, JNI_ABORT); if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnTranslate: - /* exc has been set by translate_trans */ - goto done; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_sgemm)(int order, int transa, int transb, int m, int n, int k, float alpha, float *a, int lda, float *b, int ldb, float beta, float *c, int ldc); +static void (*sgemm_)(const char *transa, const char *transb, int *m, int *n, int *k, float *alpha, float *a, int *lda, float *b, int *ldb, float *beta, float *c, int *ldc); void Java_dev_ludovic_netlib_blas_JNIBLAS_sgemmK(JNIEnv *env, UNUSED jobject obj, jstring transa, jstring transb, jint m, jint n, jint k, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat beta, jfloatArray c, jint offsetc, jint ldc) { - jthrowable excv = NULL, *exc = &excv; - int ntransa, ntransb; float *na = NULL, *nb = NULL, *nc = NULL; - if (!(ntransa = translate_trans(env, transa, exc))) goto failOnTranslate; - if (!(ntransb = translate_trans(env, transb, exc))) goto failOnTranslate; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; - if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto failOnCopy; - if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOnCopy; - cblas_sgemm(CBLAS_COL_MAJOR, ntransa, ntransb, m, n, k, alpha, na + offseta, lda, nb + offsetb, ldb, beta, nc + offsetc, ldc); + jboolean failedOOM = FALSE; + const char *ntransa = NULL, *ntransb = NULL; float *na = NULL, *nb = NULL, *nc = NULL; + if (!(ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) goto failOOM; + if (!(ntransb = (*env)->GetStringUTFChars(env, transb, NULL))) goto failOOM; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto failOOM; + if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOOM; + sgemm_(ntransa, ntransb, &m, &n, &k, &alpha, na + offseta, &lda, nb + offsetb, &ldb, &beta, nc + offsetc, &ldc); done: + if (ntransa) (*env)->ReleaseStringUTFChars(env, transa, ntransa); + if (ntransb) (*env)->ReleaseStringUTFChars(env, transb, ntransb); if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, JNI_ABORT); if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnTranslate: - /* exc has been set by translate_trans */ - goto done; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_dgemv)(int order, int trans, int m, int n, double alpha, double *a, int lda, double *x, int incx, double beta, double *y, int incy); +static void (*dgemv_)(const char *trans, int *m, int *n, double *alpha, double *a, int *lda, double *x, int *incx, double *beta, double *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_dgemvK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint m, jint n, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx, jdouble beta, jdoubleArray y, jint offsety, jint incy) { - jthrowable excv = NULL, *exc = &excv; - int ntrans; jdouble *na = NULL, *nx = NULL, *ny = NULL; - if (!(ntrans = translate_trans(env, trans, exc))) goto failOnTranslate; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; - cblas_dgemv(CBLAS_COL_MAJOR, ntrans, m, n, alpha, na + offseta, lda, nx + offsetx, incx, beta, ny + offsety, incy); + jboolean failedOOM = FALSE; + const char *ntrans = NULL; jdouble *na = NULL, *nx = NULL, *ny = NULL; + if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto failOOM; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + dgemv_(ntrans, &m, &n, &alpha, na + offseta, &lda, nx + offsetx, &incx, &beta, ny + offsety, &incy); done: + if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnTranslate: - /* exc has been set by translate_trans */ - goto done; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_sgemv)(int order, int trans, int m, int n, float alpha, float *a, int lda, float *x, int incx, float beta, float *y, int incy); +static void (*sgemv_)(const char *trans, int *m, int *n, float *alpha, float *a, int *lda, float *x, int *incx, float *beta, float *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_sgemvK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint m, jint n, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx, jfloat beta, jfloatArray y, jint offsety, jint incy) { - jthrowable excv = NULL, *exc = &excv; - int ntrans; float *na = NULL, *nx = NULL, *ny = NULL; - if (!(ntrans = translate_trans(env, trans, exc))) goto failOnTranslate; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; - cblas_sgemv(CBLAS_COL_MAJOR, ntrans, m, n, alpha, na + offseta, lda, nx + offsetx, incx, beta, ny + offsety, incy); + jboolean failedOOM = FALSE; + const char *ntrans = NULL; float *na = NULL, *nx = NULL, *ny = NULL; + if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto failOOM; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + sgemv_(ntrans, &m, &n, &alpha, na + offseta, &lda, nx + offsetx, &incx, &beta, ny + offsety, &incy); done: + if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnTranslate: - /* exc has been set by translate_trans */ -goto done; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_dger)(int order, int m, int n, double alpha, double *x, int incx, double *y, int incy, double *a, int lda); +static void (*dger_)(int *m, int *n, double *alpha, double *x, int *incx, double *y, int *incy, double *a, int *lda); void Java_dev_ludovic_netlib_blas_JNIBLAS_dgerK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy, jdoubleArray a, jint offseta, jint lda) { - jthrowable excv = NULL, *exc = &excv; + jboolean failedOOM = FALSE; double *na = NULL, *nx = NULL, *ny = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; - cblas_dger(CBLAS_COL_MAJOR, m, n, alpha, nx + offsetx, incx, ny + offsety, incy, na + offseta, lda); + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + dger_(&m, &n, &alpha, nx + offsetx, &incx, ny + offsety, &incy, na + offseta, &lda); done: if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_sger)(int order, int m, int n, float alpha, float *x, int incx, float *y, int incy, float *a, int lda); +static void (*sger_)(int *m, int *n, float *alpha, float *x, int *incx, float *y, int *incy, float *a, int *lda); void Java_dev_ludovic_netlib_blas_JNIBLAS_sgerK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy, jfloatArray a, jint offseta, jint lda) { - jthrowable excv = NULL, *exc = &excv; + jboolean failedOOM = FALSE; float *na = NULL, *nx = NULL, *ny = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; - cblas_sger(CBLAS_COL_MAJOR, m, n, alpha, nx + offsetx, incx, ny + offsety, incy, na + offseta, lda); + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + sger_(&m, &n, &alpha, nx + offsetx, &incx, ny + offsety, &incy, na + offseta, &lda); done: if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static double (*cblas_dnrm2)(int n, double *x, int incx); +static double (*dnrm2_)(int *n, double *x, int *incx); jdouble Java_dev_ludovic_netlib_blas_JNIBLAS_dnrm2K(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray x, jint offsetx, jint incx) { jdouble ret; - jthrowable excv = NULL, *exc = &excv; + jboolean failedOOM = FALSE; double *nx = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - ret = cblas_dnrm2(n, nx + offsetx, incx); + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + ret = dnrm2_(&n, nx + offsetx, &incx); done: if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return ret; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static float (*cblas_snrm2)(int n, float *x, int incx); +static float (*snrm2_)(int *n, float *x, int *incx); jfloat Java_dev_ludovic_netlib_blas_JNIBLAS_snrm2K(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray x, jint offsetx, jint incx) { jfloat ret; - jthrowable excv = NULL, *exc = &excv; + jboolean failedOOM = FALSE; float *nx = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - ret = cblas_snrm2(n, nx + offsetx, incx); + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + ret = snrm2_(&n, nx + offsetx, &incx); done: if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return ret; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_drot)(int n, double *dx, int incx, double *dy, int incy, double c, double s); +static void (*drot_)(int *n, double *dx, int *incx, double *dy, int *incy, double *c, double *s); void Java_dev_ludovic_netlib_blas_JNIBLAS_drotK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray dx, jint offsetdx, jint incx, jdoubleArray dy, jint offsetdy, jint incy, jdouble c, jdouble s) { - jthrowable excv = NULL, *exc = &excv; + jboolean failedOOM = FALSE; double *ndx = NULL, *ndy = NULL; - if (!(ndx = (*env)->GetPrimitiveArrayCritical(env, dx, NULL))) goto failOnCopy; - if (!(ndy = (*env)->GetPrimitiveArrayCritical(env, dy, NULL))) goto failOnCopy; - cblas_drot(n, ndx + offsetdx, incx, ndy + offsetdy, incy, c, s); + if (!(ndx = (*env)->GetPrimitiveArrayCritical(env, dx, NULL))) goto failOOM; + if (!(ndy = (*env)->GetPrimitiveArrayCritical(env, dy, NULL))) goto failOOM; + drot_(&n, ndx + offsetdx, &incx, ndy + offsetdy, &incy, &c, &s); done: if (ndx) (*env)->ReleasePrimitiveArrayCritical(env, dx, ndx, 0); if (ndy) (*env)->ReleasePrimitiveArrayCritical(env, dy, ndy, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_srot)(int n, float *sx, int incx, float *sy, int incy, float c, float s); +static void (*srot_)(int *n, float *sx, int *incx, float *sy, int *incy, float *c, float *s); void Java_dev_ludovic_netlib_blas_JNIBLAS_srotK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray sx, jint offsetsx, jint incx, jfloatArray sy, jint offsetsy, jint incy, jfloat c, jfloat s) { - jthrowable excv = NULL, *exc = &excv; + jboolean failedOOM = FALSE; float *nsx = NULL, *nsy = NULL; - if (!(nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto failOnCopy; - if (!(nsy = (*env)->GetPrimitiveArrayCritical(env, sy, NULL))) goto failOnCopy; - cblas_srot(n, nsx + offsetsx, incx, nsy + offsetsy, incy, c, s); + if (!(nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto failOOM; + if (!(nsy = (*env)->GetPrimitiveArrayCritical(env, sy, NULL))) goto failOOM; + srot_(&n, nsx + offsetsx, &incx, nsy + offsetsy, &incy, &c, &s); done: if (nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, nsx, 0); if (nsy) (*env)->ReleasePrimitiveArrayCritical(env, sy, nsy, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_drotm)(int n, double *dx, int incx, double *dy, int incy, double *dparam); +static void (*drotm_)(int *n, double *dx, int *incx, double *dy, int *incy, double *dparam); void Java_dev_ludovic_netlib_blas_JNIBLAS_drotmK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray dx, jint offsetdx, jint incx, jdoubleArray dy, jint offsetdy, jint incy, jdoubleArray dparam, jint offsetdparam) { - jthrowable excv = NULL, *exc = &excv; + jboolean failedOOM = FALSE; double *ndx = NULL, *ndy = NULL, *ndparam = NULL; - if (!(ndx = (*env)->GetPrimitiveArrayCritical(env, dx, NULL))) goto failOnCopy; - if (!(ndy = (*env)->GetPrimitiveArrayCritical(env, dy, NULL))) goto failOnCopy; - if (!(ndparam = (*env)->GetPrimitiveArrayCritical(env, dparam, NULL))) goto failOnCopy; - cblas_drotm(n, ndx + offsetdx, incx, ndy + offsetdy, incy, ndparam + offsetdparam); + if (!(ndx = (*env)->GetPrimitiveArrayCritical(env, dx, NULL))) goto failOOM; + if (!(ndy = (*env)->GetPrimitiveArrayCritical(env, dy, NULL))) goto failOOM; + if (!(ndparam = (*env)->GetPrimitiveArrayCritical(env, dparam, NULL))) goto failOOM; + drotm_(&n, ndx + offsetdx, &incx, ndy + offsetdy, &incy, ndparam + offsetdparam); done: if (ndx) (*env)->ReleasePrimitiveArrayCritical(env, dx, ndx, JNI_ABORT); if (ndy) (*env)->ReleasePrimitiveArrayCritical(env, dy, ndy, 0); if (ndparam) (*env)->ReleasePrimitiveArrayCritical(env, dparam, ndparam, JNI_ABORT); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_srotm)(int n, float *sx, int incx, float *sy, int incy, float *sparam); +static void (*srotm_)(int *n, float *sx, int *incx, float *sy, int *incy, float *sparam); void Java_dev_ludovic_netlib_blas_JNIBLAS_srotmK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray sx, jint offsetsx, jint incx, jfloatArray sy, jint offsetsy, jint incy, jfloatArray sparam, jint offsetsparam) { - jthrowable excv = NULL, *exc = &excv; + jboolean failedOOM = FALSE; float *nsx = NULL, *nsy = NULL, *nsparam = NULL; - if (!(nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto failOnCopy; - if (!(nsy = (*env)->GetPrimitiveArrayCritical(env, sy, NULL))) goto failOnCopy; - if (!(nsparam = (*env)->GetPrimitiveArrayCritical(env, sparam, NULL))) goto failOnCopy; - cblas_srotm(n, nsx + offsetsx, incx, nsy + offsetsy, incy, nsparam + offsetsparam); + if (!(nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto failOOM; + if (!(nsy = (*env)->GetPrimitiveArrayCritical(env, sy, NULL))) goto failOOM; + if (!(nsparam = (*env)->GetPrimitiveArrayCritical(env, sparam, NULL))) goto failOOM; + srotm_(&n, nsx + offsetsx, &incx, nsy + offsetsy, &incy, nsparam + offsetsparam); done: if (nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, nsx, JNI_ABORT); if (nsy) (*env)->ReleasePrimitiveArrayCritical(env, sy, nsy, 0); if (nsparam) (*env)->ReleasePrimitiveArrayCritical(env, sparam, nsparam, JNI_ABORT); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_drotmg)(jobject dd1, jobject dd2, jobject dx1, double dy1, double *dparam); +static void (*drotmg_)(double *dd1, double *dd2, double *dx1, double *dy1, double *dparam); void Java_dev_ludovic_netlib_blas_JNIBLAS_drotmgK(JNIEnv *env, UNUSED jobject obj, UNUSED jobject dd1, UNUSED jobject dd2, UNUSED jobject dx1, UNUSED jdouble dy1, UNUSED jdoubleArray dparam, UNUSED jint offsetdparam) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static void (*cblas_srotmg)(jobject sd1, jobject sd2, jobject sx1, float sy1, float *sparam); +static void (*srotmg_)(float *sd1, float *sd2, float *sx1, float *sy1, float *sparam); void Java_dev_ludovic_netlib_blas_JNIBLAS_srotmgK(JNIEnv *env, UNUSED jobject obj, UNUSED jobject sd1, UNUSED jobject sd2, UNUSED jobject sx1, UNUSED jfloat sy1, UNUSED jfloatArray sparam, UNUSED jint offsetsparam) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static void (*cblas_dsbmv)(int order, int uplo, int n, int k, double alpha, double *a, int lda, double *x, int incx, double beta, double *y, int incy); +static void (*dsbmv_)(const char *uplo, int *n, int *k, double *alpha, double *a, int *lda, double *x, int *incx, double *beta, double *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_dsbmvK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring uplo, UNUSED jint n, UNUSED jint k, UNUSED jdouble alpha, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jdoubleArray x, UNUSED jint offsetx, UNUSED jint incx, UNUSED jdouble beta, UNUSED jdoubleArray y, UNUSED jint offsety, UNUSED jint incy) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static void (*cblas_ssbmv)(int order, int uplo, int n, int k, float alpha, float *a, int lda, float *x, int incx, float beta, float *y, int incy); +static void (*ssbmv_)(const char *uplo, int *n, int *k, float *alpha, float *a, int *lda, float *x, int *incx, float *beta, float *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_ssbmvK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring uplo, UNUSED jint n, UNUSED jint k, UNUSED jfloat alpha, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jfloatArray x, UNUSED jint offsetx, UNUSED jint incx, UNUSED jfloat beta, UNUSED jfloatArray y, UNUSED jint offsety, UNUSED jint incy) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static void (*cblas_dscal)(int n, double alpha, double *x, int incx); +static void (*dscal_)(int *n, double *alpha, double *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_dscalK(JNIEnv *env, UNUSED jobject obj, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx) { - jthrowable excv = NULL, *exc = &excv; + jboolean failedOOM = FALSE; double *nx = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - cblas_dscal(n, alpha, nx + offsetx, incx); + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + dscal_(&n, &alpha, nx + offsetx, &incx); done: if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_sscal)(int n, float alpha, float *x, int incx); +static void (*sscal_)(int *n, float *alpha, float *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_sscalK(JNIEnv *env, UNUSED jobject obj, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx) { - jthrowable excv = NULL, *exc = &excv; + jboolean failedOOM = FALSE; float *nx = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - cblas_sscal(n, alpha, nx + offsetx, incx); + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + sscal_(&n, &alpha, nx + offsetx, &incx); done: if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_dspmv)(int order, int uplo, int n, double alpha, double *a, double *x, int incx, double beta, double *y, int incy); +static void (*dspmv_)(const char *uplo, int *n, double *alpha, double *a, double *x, int *incx, double *beta, double *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_dspmvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdouble alpha, jdoubleArray a, jint offseta, jdoubleArray x, jint offsetx, jint incx, jdouble beta, jdoubleArray y, jint offsety, jint incy) { - jthrowable excv = NULL, *exc = &excv; - int nuplo; double *na = NULL, *nx = NULL, *ny = NULL; - if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; - cblas_dspmv(CBLAS_COL_MAJOR, nuplo, n, alpha, na + offseta, nx + offsetx, incx, beta, ny + offsety, incy); + jboolean failedOOM = FALSE; + const char *nuplo = NULL; double *na = NULL, *nx = NULL, *ny = NULL; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + dspmv_(nuplo, &n, &alpha, na + offseta, nx + offsetx, &incx, &beta, ny + offsety, &incy); done: + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnTranslate: - /* exc has been set by translate_uplo */ - goto done; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_sspmv)(int order, int uplo, int n, float alpha, float *a, float *x, int incx, float beta, float *y, int incy); +static void (*sspmv_)(const char *uplo, int *n, float *alpha, float *a, float *x, int *incx, float *beta, float *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_sspmvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloat alpha, jfloatArray a, jint offseta, jfloatArray x, jint offsetx, jint incx, jfloat beta, jfloatArray y, jint offsety, jint incy) { - jthrowable excv = NULL, *exc = &excv; - int nuplo; float *na = NULL, *nx = NULL, *ny = NULL; - if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; - cblas_sspmv(CBLAS_COL_MAJOR, nuplo, n, alpha, na + offseta, nx + offsetx, incx, beta, ny + offsety, incy); + jboolean failedOOM = FALSE; + const char *nuplo = NULL; float *na = NULL, *nx = NULL, *ny = NULL; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + sspmv_(nuplo, &n, &alpha, na + offseta, nx + offsetx, &incx, &beta, ny + offsety, &incy); done: + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnTranslate: - /* exc has been set by translate_uplo */ - goto done; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_dspr)(int order, int uplo, int n, double alpha, double *x, int incx, double *a); +static void (*dspr_)(const char *uplo, int *n, double *alpha, double *x, int *incx, double *a); void Java_dev_ludovic_netlib_blas_JNIBLAS_dsprK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray a, jint offseta) { - jthrowable excv = NULL, *exc = &excv; - int nuplo; double *na = NULL, *nx = NULL; - if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; - cblas_dspr(CBLAS_COL_MAJOR, nuplo, n, alpha, nx + offsetx, incx, na + offseta); + jboolean failedOOM = FALSE; + const char *nuplo = NULL; double *na = NULL, *nx = NULL; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + dspr_(nuplo, &n, &alpha, nx + offsetx, &incx, na + offseta); done: + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnTranslate: - /* exc has been set by translate_uplo */ - goto done; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_sspr)(int order, int uplo, int n, float alpha, float *x, int incx, float *a); +static void (*sspr_)(const char *uplo, int *n, float *alpha, float *x, int *incx, float *a); void Java_dev_ludovic_netlib_blas_JNIBLAS_ssprK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray a, jint offseta) { - jthrowable excv = NULL, *exc = &excv; - int nuplo; float *na = NULL, *nx = NULL; - if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; - cblas_sspr(CBLAS_COL_MAJOR, nuplo, n, alpha, nx + offsetx, incx, na + offseta); + jboolean failedOOM = FALSE; + const char *nuplo = NULL; float *na = NULL, *nx = NULL; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + sspr_(nuplo, &n, &alpha, nx + offsetx, &incx, na + offseta); done: + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnTranslate: - /* exc has been set by translate_uplo */ - goto done; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_dspr2)(int order, int uplo, int n, double alpha, double *x, int incx, double *y, int incy, double *a); +static void (*dspr2_)(const char *uplo, int *n, double *alpha, double *x, int *incx, double *y, int *incy, double *a); void Java_dev_ludovic_netlib_blas_JNIBLAS_dspr2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy, jdoubleArray a, jint offseta) { - jthrowable excv = NULL, *exc = &excv; - int nuplo; double *na = NULL, *nx = NULL, *ny = NULL; - if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; - cblas_dspr2(CBLAS_COL_MAJOR, nuplo, n, alpha, nx + offsetx, incx, ny + offsety, incy, na + offseta); + jboolean failedOOM = FALSE; + const char *nuplo = NULL; double *na = NULL, *nx = NULL, *ny = NULL; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + dspr2_(nuplo, &n, &alpha, nx + offsetx, &incx, ny + offsety, &incy, na + offseta); done: + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnTranslate: - /* exc has been set by translate_uplo */ - goto done; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_sspr2)(int order, int uplo, int n, float alpha, float *x, int incx, float *y, int incy, float *a); +static void (*sspr2_)(const char *uplo, int *n, float *alpha, float *x, int *incx, float *y, int *incy, float *a); void Java_dev_ludovic_netlib_blas_JNIBLAS_sspr2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy, jfloatArray a, jint offseta) { - jthrowable excv = NULL, *exc = &excv; - int nuplo; float *na = NULL, *nx = NULL, *ny = NULL; - if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; - cblas_sspr2(CBLAS_COL_MAJOR, nuplo, n, alpha, nx + offsetx, incx, ny + offsety, incy, na + offseta); + jboolean failedOOM = FALSE; + const char *nuplo = NULL; float *na = NULL, *nx = NULL, *ny = NULL; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + sspr2_(nuplo, &n, &alpha, nx + offsetx, &incx, ny + offsety, &incy, na + offseta); done: + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnTranslate: - /* exc has been set by translate_uplo */ - goto done; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_dswap)(int n, double *x, int incx, double *y, int incy); +static void (*dswap_)(int *n, double *x, int *incx, double *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_dswapK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy) { - jthrowable excv = NULL, *exc = &excv; + jboolean failedOOM = FALSE; double *nx = NULL, *ny = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; - cblas_dswap(n, nx + offsetx, incx, ny + offsety, incy); + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + dswap_(&n, nx + offsetx, &incx, ny + offsety, &incy); done: if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, 0); if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_sswap)(int n, float *x, int incx, float *y, int incy); +static void (*sswap_)(int *n, float *x, int *incx, float *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_sswapK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy) { - jthrowable excv = NULL, *exc = &excv; + jboolean failedOOM = FALSE; float *nx = NULL, *ny = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; - cblas_sswap(n, nx + offsetx, incx, ny + offsety, incy); + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + sswap_(&n, nx + offsetx, &incx, ny + offsety, &incy); done: if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, 0); if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_dsymm)(int order, int side, int uplo, int m, int n, double alpha, double *a, int lda, double *b, int ldb, double beta, double *c, int ldc); +static void (*dsymm_)(const char *side, const char *uplo, int *m, int *n, double *alpha, double *a, int *lda, double *b, int *ldb, double *beta, double *c, int *ldc); void Java_dev_ludovic_netlib_blas_JNIBLAS_dsymmK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring uplo, jint m, jint n, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble beta, jdoubleArray c, jint offsetc, jint ldc) { - jthrowable excv = NULL, *exc = &excv; - int nside, nuplo; double *na = NULL, *nb = NULL, *nc = NULL; - if (!(nside = translate_side(env, side, exc))) goto failOnTranslate; - if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; - if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto failOnCopy; - if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOnCopy; - cblas_dsymm(CBLAS_COL_MAJOR, nside, nuplo, m, n, alpha, na + offseta, lda, nb + offsetb, ldb, beta, nc + offsetc, ldc); + jboolean failedOOM = FALSE; + const char *nside = NULL, *nuplo = NULL; double *na = NULL, *nb = NULL, *nc = NULL; + if (!(nside = (*env)->GetStringUTFChars(env, side, NULL))) goto failOOM; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto failOOM; + if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOOM; + dsymm_(nside, nuplo, &m, &n, &alpha, na + offseta, &lda, nb + offsetb, &ldb, &beta, nc + offsetc, &ldc); done: + if (nside) (*env)->ReleaseStringUTFChars(env, side, nside); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, JNI_ABORT); if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnTranslate: - /* exc has been set by translate_side or translate_uplo */ - goto done; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_ssymm)(int order, int side, int uplo, int m, int n, float alpha, float *a, int lda, float *b, int ldb, float beta, float *c, int ldc); +static void (*ssymm_)(const char *side, const char *uplo, int *m, int *n, float *alpha, float *a, int *lda, float *b, int *ldb, float *beta, float *c, int *ldc); void Java_dev_ludovic_netlib_blas_JNIBLAS_ssymmK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring uplo, jint m, jint n, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat beta, jfloatArray c, jint offsetc, jint ldc) { - jthrowable excv = NULL, *exc = &excv; - int nside, nuplo; float *na = NULL, *nb = NULL, *nc = NULL; - if (!(nside = translate_side(env, side, exc))) goto failOnTranslate; - if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; - if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto failOnCopy; - if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOnCopy; - cblas_ssymm(CBLAS_COL_MAJOR, nside, nuplo, m, n, alpha, na + offseta, lda, nb + offsetb, ldb, beta, nc + offsetc, ldc); + jboolean failedOOM = FALSE; + const char *nside = NULL, *nuplo = NULL; float *na = NULL, *nb = NULL, *nc = NULL; + if (!(nside = (*env)->GetStringUTFChars(env, side, NULL))) goto failOOM; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto failOOM; + if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOOM; + ssymm_(nside, nuplo, &m, &n, &alpha, na + offseta, &lda, nb + offsetb, &ldb, &beta, nc + offsetc, &ldc); done: + if (nside) (*env)->ReleaseStringUTFChars(env, side, nside); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, JNI_ABORT); if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnTranslate: - /* exc has been set by translate_side or translate_uplo */ - goto done; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_dsymv)(int order, int uplo, int n, double alpha, double *a, int lda, double *x, int incx, double beta, double *y, int incy); +static void (*dsymv_)(const char *uplo, int *n, double *alpha, double *a, int *lda, double *x, int *incx, double *beta, double *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_dsymvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx, jdouble beta, jdoubleArray y, jint offsety, jint incy) { - jthrowable excv = NULL, *exc = &excv; - int nuplo; double *na = NULL, *nx = NULL, *ny = NULL; - if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; - cblas_dsymv(CBLAS_COL_MAJOR, nuplo, n, alpha, na + offseta, lda, nx + offsetx, incx, beta, ny + offsety, incy); + jboolean failedOOM = FALSE; + const char *nuplo = NULL; double *na = NULL, *nx = NULL, *ny = NULL; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + dsymv_(nuplo, &n, &alpha, na + offseta, &lda, nx + offsetx, &incx, &beta, ny + offsety, &incy); done: + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnTranslate: - /* exc has been set by translate_uplo */ - goto done; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_ssymv)(int order, int uplo, int n, float alpha, float *a, int lda, float *x, int incx, float beta, float *y, int incy); +static void (*ssymv_)(const char *uplo, int *n, float *alpha, float *a, int *lda, float *x, int *incx, float *beta, float *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_ssymvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx, jfloat beta, jfloatArray y, jint offsety, jint incy) { - jthrowable excv = NULL, *exc = &excv; - int nuplo; float *na = NULL, *nx = NULL, *ny = NULL; - if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; - cblas_ssymv(CBLAS_COL_MAJOR, nuplo, n, alpha, na + offseta, lda, nx + offsetx, incx, beta, ny + offsety, incy); + jboolean failedOOM = FALSE; + const char *nuplo = NULL; float *na = NULL, *nx = NULL, *ny = NULL; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + ssymv_(nuplo, &n, &alpha, na + offseta, &lda, nx + offsetx, &incx, &beta, ny + offsety, &incy); done: + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnTranslate: - /* exc has been set by translate_uplo */ - goto done; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_dsyr)(int order, int uplo, int n, double alpha, double *x, int incx, double *a, int lda); +static void (*dsyr_)(const char *uplo, int *n, double *alpha, double *x, int *incx, double *a, int *lda); void Java_dev_ludovic_netlib_blas_JNIBLAS_dsyrK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray a, jint offseta, jint lda) { - jthrowable excv = NULL, *exc = &excv; - int nuplo; double *na = NULL, *nx = NULL; - if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; - cblas_dsyr(CBLAS_COL_MAJOR, nuplo, n, alpha, nx + offsetx, incx, na + offseta, lda); + jboolean failedOOM = FALSE; + const char *nuplo = NULL; double *na = NULL, *nx = NULL; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + dsyr_(nuplo, &n, &alpha, nx + offsetx, &incx, na + offseta, &lda); done: + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnTranslate: - /* exc has been set by translate_uplo */ - goto done; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_ssyr)(int order, int uplo, int n, float alpha, float *x, int incx, float *a, int lda); +static void (*ssyr_)(const char *uplo, int *n, float *alpha, float *x, int *incx, float *a, int *lda); void Java_dev_ludovic_netlib_blas_JNIBLAS_ssyrK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray a, jint offseta, jint lda) { - jthrowable excv = NULL, *exc = &excv; - int nuplo; float *na = NULL, *nx = NULL; - if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; - cblas_ssyr(CBLAS_COL_MAJOR, nuplo, n, alpha, nx + offsetx, incx, na + offseta, lda); + jboolean failedOOM = FALSE; + const char *nuplo = NULL; float *na = NULL, *nx = NULL; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + ssyr_(nuplo, &n, &alpha, nx + offsetx, &incx, na + offseta, &lda); done: + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnTranslate: - /* exc has been set by translate_uplo */ - goto done; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_dsyr2)(int order, int uplo, int n, double alpha, double *x, int incx, double *y, int incy, double *a, int lda); +static void (*dsyr2_)(const char *uplo, int *n, double *alpha, double *x, int *incx, double *y, int *incy, double *a, int *lda); void Java_dev_ludovic_netlib_blas_JNIBLAS_dsyr2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy, jdoubleArray a, jint offseta, jint lda) { - jthrowable excv = NULL, *exc = &excv; - int nuplo; double *na = NULL, *nx = NULL, *ny = NULL; - if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; - cblas_dsyr2(CBLAS_COL_MAJOR, nuplo, n, alpha, nx + offsetx, incx, ny + offsety, incy, na + offseta, lda); + jboolean failedOOM = FALSE; + const char *nuplo = NULL; double *na = NULL, *nx = NULL, *ny = NULL; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + dsyr2_(nuplo, &n, &alpha, nx + offsetx, &incx, ny + offsety, &incy, na + offseta, &lda); done: + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnTranslate: - /* exc has been set by translate_uplo */ - goto done; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_ssyr2)(int order, int uplo, int n, float alpha, float *x, int incx, float *y, int incy, float *a, int lda); +static void (*ssyr2_)(const char *uplo, int *n, float *alpha, float *x, int *incx, float *y, int *incy, float *a, int *lda); void Java_dev_ludovic_netlib_blas_JNIBLAS_ssyr2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy, jfloatArray a, jint offseta, jint lda) { - jthrowable excv = NULL, *exc = &excv; - int nuplo; float *na = NULL, *nx = NULL, *ny = NULL; - if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOnCopy; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOnCopy; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; - cblas_ssyr2(CBLAS_COL_MAJOR, nuplo, n, alpha, nx + offsetx, incx, ny + offsety, incy, na + offseta, lda); + jboolean failedOOM = FALSE; + const char *nuplo = NULL; float *na = NULL, *nx = NULL, *ny = NULL; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + ssyr2_(nuplo, &n, &alpha, nx + offsetx, &incx, ny + offsety, &incy, na + offseta, &lda); done: + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnTranslate: - /* exc has been set by translate_uplo */ - goto done; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_dsyr2k)(int order, int uplo, int trans, int n, int k, double alpha, double *a, int lda, double *b, int ldb, double beta, double *c, int ldc); +static void (*dsyr2k_)(const char *uplo, const char *trans, int *n, int *k, double *alpha, double *a, int *lda, double *b, int *ldb, double *beta, double *c, int *ldc); void Java_dev_ludovic_netlib_blas_JNIBLAS_dsyr2kK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jint n, jint k, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble beta, jdoubleArray c, jint offsetc, jint ldc) { - jthrowable excv = NULL, *exc = &excv; - int nuplo, ntrans; double *na = NULL, *nb = NULL, *nc = NULL; - if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; - if (!(ntrans = translate_trans(env, trans, exc))) goto failOnTranslate; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; - if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto failOnCopy; - if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOnCopy; - cblas_dsyr2k(CBLAS_COL_MAJOR, nuplo, ntrans, n, k, alpha, na + offseta, lda, nb + offsetb, ldb, beta, nc + offsetc, ldc); + jboolean failedOOM = FALSE; + const char *nuplo = NULL, *ntrans = NULL; double *na = NULL, *nb = NULL, *nc = NULL; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; + if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto failOOM; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto failOOM; + if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOOM; + dsyr2k_(nuplo, ntrans, &n, &k, &alpha, na + offseta, &lda, nb + offsetb, &ldb, &beta, nc + offsetc, &ldc); done: + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, JNI_ABORT); if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnTranslate: - /* exc has been set by translate_uplo or translate_trans */ - goto done; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_ssyr2k)(int order, int uplo, int trans, int n, int k, float alpha, float *a, int lda, float *b, int ldb, float beta, float *c, int ldc); +static void (*ssyr2k_)(const char *uplo, const char *trans, int *n, int *k, float *alpha, float *a, int *lda, float *b, int *ldb, float *beta, float *c, int *ldc); void Java_dev_ludovic_netlib_blas_JNIBLAS_ssyr2kK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jint n, jint k, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat beta, jfloatArray c, jint offsetc, jint ldc) { - jthrowable excv = NULL, *exc = &excv; - int nuplo, ntrans; float *na = NULL, *nb = NULL, *nc = NULL; - if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; - if (!(ntrans = translate_trans(env, trans, exc))) goto failOnTranslate; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; - if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto failOnCopy; - if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOnCopy; - cblas_ssyr2k(CBLAS_COL_MAJOR, nuplo, ntrans, n, k, alpha, na + offseta, lda, nb + offsetb, ldb, beta, nc + offsetc, ldc); + jboolean failedOOM = FALSE; + const char *nuplo = NULL, *ntrans = NULL; float *na = NULL, *nb = NULL, *nc = NULL; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; + if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto failOOM; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto failOOM; + if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOOM; + ssyr2k_(nuplo, ntrans, &n, &k, &alpha, na + offseta, &lda, nb + offsetb, &ldb, &beta, nc + offsetc, &ldc); done: + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, JNI_ABORT); if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnTranslate: - /* exc has been set by translate_uplo or translate_trans */ - goto done; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_dsyrk)(int order, int uplo, int trans, int n, int k, double alpha, double *a, int lda, double beta, double *c, int ldc); +static void (*dsyrk_)(const char *uplo, const char *trans, int *n, int *k, double *alpha, double *a, int *lda, double *beta, double *c, int *ldc); void Java_dev_ludovic_netlib_blas_JNIBLAS_dsyrkK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jint n, jint k, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdouble beta, jdoubleArray c, jint offsetc, jint ldc) { - jthrowable excv = NULL, *exc = &excv; - int nuplo, ntrans; double *na = NULL, *nc = NULL; - if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; - if (!(ntrans = translate_trans(env, trans, exc))) goto failOnTranslate; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; - if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOnCopy; - cblas_dsyrk(CBLAS_COL_MAJOR, nuplo, ntrans, n, k, alpha, na + offseta, lda, beta, nc + offsetc, ldc); + jboolean failedOOM = FALSE; + const char *nuplo = NULL, *ntrans = NULL; double *na = NULL, *nc = NULL; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; + if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto failOOM; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOOM; + dsyrk_(nuplo, ntrans, &n, &k, &alpha, na + offseta, &lda, &beta, nc + offsetc, &ldc); done: + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnTranslate: - /* exc has been set by translate_uplo or translate_trans */ - goto done; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_ssyrk)(int order, int uplo, int trans, int n, int k, float alpha, float *a, int lda, float beta, float *c, int ldc); +static void (*ssyrk_)(const char *uplo, const char *trans, int *n, int *k, float *alpha, float *a, int *lda, float *beta, float *c, int *ldc); void Java_dev_ludovic_netlib_blas_JNIBLAS_ssyrkK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jint n, jint k, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloat beta, jfloatArray c, jint offsetc, jint ldc) { - jthrowable excv = NULL, *exc = &excv; - int nuplo, ntrans; float *na = NULL, *nc = NULL; - if (!(nuplo = translate_uplo(env, uplo, exc))) goto failOnTranslate; - if (!(ntrans = translate_trans(env, trans, exc))) goto failOnTranslate; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOnCopy; - if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOnCopy; - cblas_ssyrk(CBLAS_COL_MAJOR, nuplo, ntrans, n, k, alpha, na + offseta, lda, beta, nc + offsetc, ldc); + jboolean failedOOM = FALSE; + const char *nuplo = NULL, *ntrans = NULL; float *na = NULL, *nc = NULL; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; + if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto failOOM; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOOM; + ssyrk_(nuplo, ntrans, &n, &k, &alpha, na + offseta, &lda, &beta, nc + offsetc, &ldc); done: + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, 0); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return; -failOnTranslate: - /* exc has been set by translate_uplo or translate_trans */ - goto done; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static void (*cblas_dtbmv)(int order, int uplo, int trans, int diag, int n, int k, double *a, int lda, double *x, int incx); +static void (*dtbmv_)(const char *uplo, const char *trans, const char *diag, int *n, int *k, double *a, int *lda, double *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_dtbmvK(UNUSED JNIEnv *env, UNUSED jobject obj, UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jint k, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jdoubleArray x, UNUSED jint offsetx, UNUSED jint incx) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static void (*cblas_stbmv)(int order, int uplo, int trans, int diag, int n, int k, float *a, int lda, float *x, int incx); +static void (*stbmv_)(const char *uplo, const char *trans, const char *diag, int *n, int *k, float *a, int *lda, float *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_stbmvK(UNUSED JNIEnv *env, UNUSED jobject obj, UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jint k, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jfloatArray x, UNUSED jint offsetx, UNUSED jint incx) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static void (*cblas_dtbsv)(int order, int uplo, int trans, int diag, int n, int k, double *a, int lda, double *x, int incx); +static void (*dtbsv_)(const char *uplo, const char *trans, const char *diag, int *n, int *k, double *a, int *lda, double *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_dtbsvK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jint k, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jdoubleArray x, UNUSED jint offsetx, UNUSED jint incx) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static void (*cblas_stbsv)(int order, int uplo, int trans, int diag, int n, int k, float *a, int lda, float *x, int incx); +static void (*stbsv_)(const char *uplo, const char *trans, const char *diag, int *n, int *k, float *a, int *lda, float *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_stbsvK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jint k, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jfloatArray x, UNUSED jint offsetx, UNUSED jint incx) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static void (*cblas_dtpmv)(int order, int uplo, int trans, int diag, int n, double *a, double *x, int incx); +static void (*dtpmv_)(const char *uplo, const char *trans, const char *diag, int *n, double *a, double *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_dtpmvK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jdoubleArray x, UNUSED jint offsetx, UNUSED jint incx) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static void (*cblas_stpmv)(int order, int uplo, int trans, int diag, int n, float *a, float *x, int incx); +static void (*stpmv_)(const char *uplo, const char *trans, const char *diag, int *n, float *a, float *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_stpmvK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jfloatArray x, UNUSED jint offsetx, UNUSED jint incx) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static void (*cblas_dtpsv)(int order, int uplo, int trans, int diag, int n, double *a, double *x, int incx); +static void (*dtpsv_)(const char *uplo, const char *trans, const char *diag, int *n, double *a, double *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_dtpsvK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jdoubleArray x, UNUSED jint offsetx, UNUSED jint incx) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static void (*cblas_stpsv)(int order, int uplo, int trans, int diag, int n, float *a, float *x, int incx); +static void (*stpsv_)(const char *uplo, const char *trans, const char *diag, int *n, float *a, float *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_stpsvK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jfloatArray x, UNUSED jint offsetx, UNUSED jint incx) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static void (*cblas_dtrmm)(int order, int side, int uplo, int transa, int diag, int m, int n, double alpha, double *a, int lda, double *b, int ldb); +static void (*dtrmm_)(const char *side, const char *uplo, const char *transa, const char *diag, int *m, int *n, double *alpha, double *a, int *lda, double *b, int *ldb); void Java_dev_ludovic_netlib_blas_JNIBLAS_dtrmmK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring side, UNUSED jstring uplo, UNUSED jstring transa, UNUSED jstring diag, UNUSED jint m, UNUSED jint n, UNUSED jdouble alpha, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jdoubleArray b, UNUSED jint offsetb, UNUSED jint ldb) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static void (*cblas_strmm)(int order, int side, int uplo, int transa, int diag, int m, int n, float alpha, float *a, int lda, float *b, int ldb); +static void (*strmm_)(const char *side, const char *uplo, const char *transa, const char *diag, int *m, int *n, float *alpha, float *a, int *lda, float *b, int *ldb); void Java_dev_ludovic_netlib_blas_JNIBLAS_strmmK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring side, UNUSED jstring uplo, UNUSED jstring transa, UNUSED jstring diag, UNUSED jint m, UNUSED jint n, UNUSED jfloat alpha, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jfloatArray b, UNUSED jint offsetb, UNUSED jint ldb) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static void (*cblas_dtrmv)(int order, int uplo, int trans, int diag, int n, double *a, int lda, double *x, int incx); +static void (*dtrmv_)(const char *uplo, const char *trans, const char *diag, int *n, double *a, int *lda, double *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_dtrmvK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jdoubleArray x, UNUSED jint offsetx, UNUSED jint incx) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static void (*cblas_strmv)(int order, int uplo, int trans, int diag, int n, float *a, int lda, float *x, int incx); +static void (*strmv_)(const char *uplo, const char *trans, const char *diag, int *n, float *a, int *lda, float *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_strmvK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jfloatArray x, UNUSED jint offsetx, UNUSED jint incx) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static void (*cblas_dtrsm)(int order, int side, int uplo, int transa, int diag, int m, int n, double alpha, double *a, int lda, double *b, int ldb); +static void (*dtrsm_)(const char *side, const char *uplo, const char *transa, const char *diag, int *m, int *n, double *alpha, double *a, int *lda, double *b, int *ldb); void Java_dev_ludovic_netlib_blas_JNIBLAS_dtrsmK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring side, UNUSED jstring uplo, UNUSED jstring transa, UNUSED jstring diag, UNUSED jint m, UNUSED jint n, UNUSED jdouble alpha, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jdoubleArray b, UNUSED jint offsetb, UNUSED jint ldb) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static void (*cblas_strsm)(int order, int side, int uplo, int transa, int diag, int m, int n, float alpha, float *a, int lda, float *b, int ldb); +static void (*strsm_)(const char *side, const char *uplo, const char *transa, const char *diag, int *m, int *n, float *alpha, float *a, int *lda, float *b, int *ldb); void Java_dev_ludovic_netlib_blas_JNIBLAS_strsmK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring side, UNUSED jstring uplo, UNUSED jstring transa, UNUSED jstring diag, UNUSED jint m, UNUSED jint n, UNUSED jfloat alpha, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jfloatArray b, UNUSED jint offsetb, UNUSED jint ldb) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static void (*cblas_dtrsv)(int order, int uplo, int trans, int diag, int n, double *a, int lda, double *x, int incx); +static void (*dtrsv_)(const char *uplo, const char *trans, const char *diag, int *n, double *a, int *lda, double *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_dtrsvK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jdoubleArray x, UNUSED jint offsetx, UNUSED jint incx) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static void (*cblas_strsv)(int order, int uplo, int trans, int diag, int n, float *a, int lda, float *x, int incx); +static void (*strsv_)(const char *uplo, const char *trans, const char *diag, int *n, float *a, int *lda, float *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_strsvK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jfloatArray x, UNUSED jint offsetx, UNUSED jint incx) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static int (*cblas_idamax)(int n, double *dx, int incdx); +static int (*idamax_)(int *n, double *dx, int *incdx); jint Java_dev_ludovic_netlib_blas_JNIBLAS_idamaxK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray dx, jint offsetdx, jint incdx) { jint ret; - jthrowable excv = NULL, *exc = &excv; + jboolean failedOOM = FALSE; double *ndx = NULL; - if (!(ndx = (*env)->GetPrimitiveArrayCritical(env, dx, NULL))) goto failOnCopy; - ret = cblas_idamax(n, ndx + offsetdx, incdx); + if (!(ndx = (*env)->GetPrimitiveArrayCritical(env, dx, NULL))) goto failOOM; + // It returns 1-based index because that's how Fortran works + ret = idamax_(&n, ndx + offsetdx, &incdx) - 1; done: if (ndx) (*env)->ReleasePrimitiveArrayCritical(env, dx, ndx, JNI_ABORT); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return ret; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } -static int (*cblas_isamax)(int n, float *sx, int incx); +static int (*isamax_)(int *n, float *sx, int *incsx); jint Java_dev_ludovic_netlib_blas_JNIBLAS_isamaxK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray sx, jint offsetsx, jint incx) { + jint n, jfloatArray sx, jint offsetsx, jint incsx) { jint ret; - jthrowable excv = NULL, *exc = &excv; + jboolean failedOOM = FALSE; float *nsx = NULL; - if (!(nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto failOnCopy; - ret = cblas_isamax(n, nsx + offsetsx, incx); + if (!(nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto failOOM; + // It returns 1-based index because that's how Fortran works + ret = isamax_(&n, nsx + offsetsx, &incsx) - 1; done: if (nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, nsx, JNI_ABORT); - if (*exc) (*env)->Throw(env, *exc); + if (failedOOM) throwOOM(env); return ret; -failOnCopy: - *exc = failOnCopy(env); +failOOM: + failedOOM = TRUE; goto done; } @@ -1342,13 +1192,15 @@ jint JNI_OnLoad(JavaVM *vm, UNUSED void *reserved) { jstring native_lib = get_system_property(env, (*env)->NewStringUTF(env, "dev.ludovic.netlib.blas.nativeLib"), (*env)->NewStringUTF(env, "blas")); if (native_lib_path) { const char *utf = (*env)->GetStringUTFChars(env, native_lib_path, NULL); - strncpy(blas_name, utf, sizeof(blas_name)); - blas_name[sizeof(blas_name) - 1] = '\0'; + snprintf(blas_name, sizeof(blas_name), "%s", utf); (*env)->ReleaseStringUTFChars(env, native_lib_path, utf); - } else { + } else if (native_lib) { const char *utf = (*env)->GetStringUTFChars(env, native_lib, NULL); snprintf(blas_name, sizeof(blas_name), "lib%s.so", utf); (*env)->ReleaseStringUTFChars(env, native_lib, utf); + } else { + /* native_lib should always be non-NULL */ + return -1; } blas = dlopen(blas_name, RTLD_LAZY); @@ -1362,73 +1214,73 @@ jint JNI_OnLoad(JavaVM *vm, UNUSED void *reserved) { return -1; \ } - LOAD_SYMBOL(cblas_dasum); - LOAD_SYMBOL(cblas_sasum); - LOAD_SYMBOL(cblas_daxpy); - LOAD_SYMBOL(cblas_saxpy); - LOAD_SYMBOL(cblas_dcopy); - LOAD_SYMBOL(cblas_scopy); - LOAD_SYMBOL(cblas_ddot); - LOAD_SYMBOL(cblas_sdot); - LOAD_SYMBOL(cblas_sdsdot); - LOAD_SYMBOL(cblas_dgbmv); - LOAD_SYMBOL(cblas_sgbmv); - LOAD_SYMBOL(cblas_dgemm); - LOAD_SYMBOL(cblas_sgemm); - LOAD_SYMBOL(cblas_dgemv); - LOAD_SYMBOL(cblas_sgemv); - LOAD_SYMBOL(cblas_dger); - LOAD_SYMBOL(cblas_sger); - LOAD_SYMBOL(cblas_dnrm2); - LOAD_SYMBOL(cblas_snrm2); - LOAD_SYMBOL(cblas_drot); - LOAD_SYMBOL(cblas_srot); - LOAD_SYMBOL(cblas_drotm); - LOAD_SYMBOL(cblas_srotm); - LOAD_SYMBOL(cblas_drotmg); - LOAD_SYMBOL(cblas_srotmg); - LOAD_SYMBOL(cblas_dsbmv); - LOAD_SYMBOL(cblas_ssbmv); - LOAD_SYMBOL(cblas_dscal); - LOAD_SYMBOL(cblas_sscal); - LOAD_SYMBOL(cblas_dspmv); - LOAD_SYMBOL(cblas_sspmv); - LOAD_SYMBOL(cblas_dspr); - LOAD_SYMBOL(cblas_sspr); - LOAD_SYMBOL(cblas_dspr2); - LOAD_SYMBOL(cblas_sspr2); - LOAD_SYMBOL(cblas_dswap); - LOAD_SYMBOL(cblas_sswap); - LOAD_SYMBOL(cblas_dsymm); - LOAD_SYMBOL(cblas_ssymm); - LOAD_SYMBOL(cblas_dsymv); - LOAD_SYMBOL(cblas_ssymv); - LOAD_SYMBOL(cblas_dsyr); - LOAD_SYMBOL(cblas_ssyr); - LOAD_SYMBOL(cblas_dsyr2); - LOAD_SYMBOL(cblas_ssyr2); - LOAD_SYMBOL(cblas_dsyr2k); - LOAD_SYMBOL(cblas_ssyr2k); - LOAD_SYMBOL(cblas_dsyrk); - LOAD_SYMBOL(cblas_ssyrk); - LOAD_SYMBOL(cblas_dtbmv); - LOAD_SYMBOL(cblas_stbmv); - LOAD_SYMBOL(cblas_dtbsv); - LOAD_SYMBOL(cblas_stbsv); - LOAD_SYMBOL(cblas_dtpmv); - LOAD_SYMBOL(cblas_stpmv); - LOAD_SYMBOL(cblas_dtpsv); - LOAD_SYMBOL(cblas_stpsv); - LOAD_SYMBOL(cblas_dtrmm); - LOAD_SYMBOL(cblas_strmm); - LOAD_SYMBOL(cblas_dtrmv); - LOAD_SYMBOL(cblas_strmv); - LOAD_SYMBOL(cblas_dtrsm); - LOAD_SYMBOL(cblas_strsm); - LOAD_SYMBOL(cblas_dtrsv); - LOAD_SYMBOL(cblas_strsv); - LOAD_SYMBOL(cblas_idamax); - LOAD_SYMBOL(cblas_isamax); + LOAD_SYMBOL(dasum_); + LOAD_SYMBOL(sasum_); + LOAD_SYMBOL(daxpy_); + LOAD_SYMBOL(saxpy_); + LOAD_SYMBOL(dcopy_); + LOAD_SYMBOL(scopy_); + LOAD_SYMBOL(ddot_); + LOAD_SYMBOL(sdot_); + LOAD_SYMBOL(sdsdot_); + LOAD_SYMBOL(dgbmv_); + LOAD_SYMBOL(sgbmv_); + LOAD_SYMBOL(dgemm_); + LOAD_SYMBOL(sgemm_); + LOAD_SYMBOL(dgemv_); + LOAD_SYMBOL(sgemv_); + LOAD_SYMBOL(dger_); + LOAD_SYMBOL(sger_); + LOAD_SYMBOL(dnrm2_); + LOAD_SYMBOL(snrm2_); + LOAD_SYMBOL(drot_); + LOAD_SYMBOL(srot_); + LOAD_SYMBOL(drotm_); + LOAD_SYMBOL(srotm_); + LOAD_SYMBOL(drotmg_); + LOAD_SYMBOL(srotmg_); + LOAD_SYMBOL(dsbmv_); + LOAD_SYMBOL(ssbmv_); + LOAD_SYMBOL(dscal_); + LOAD_SYMBOL(sscal_); + LOAD_SYMBOL(dspmv_); + LOAD_SYMBOL(sspmv_); + LOAD_SYMBOL(dspr_); + LOAD_SYMBOL(sspr_); + LOAD_SYMBOL(dspr2_); + LOAD_SYMBOL(sspr2_); + LOAD_SYMBOL(dswap_); + LOAD_SYMBOL(sswap_); + LOAD_SYMBOL(dsymm_); + LOAD_SYMBOL(ssymm_); + LOAD_SYMBOL(dsymv_); + LOAD_SYMBOL(ssymv_); + LOAD_SYMBOL(dsyr_); + LOAD_SYMBOL(ssyr_); + LOAD_SYMBOL(dsyr2_); + LOAD_SYMBOL(ssyr2_); + LOAD_SYMBOL(dsyr2k_); + LOAD_SYMBOL(ssyr2k_); + LOAD_SYMBOL(dsyrk_); + LOAD_SYMBOL(ssyrk_); + LOAD_SYMBOL(dtbmv_); + LOAD_SYMBOL(stbmv_); + LOAD_SYMBOL(dtbsv_); + LOAD_SYMBOL(stbsv_); + LOAD_SYMBOL(dtpmv_); + LOAD_SYMBOL(stpmv_); + LOAD_SYMBOL(dtpsv_); + LOAD_SYMBOL(stpsv_); + LOAD_SYMBOL(dtrmm_); + LOAD_SYMBOL(strmm_); + LOAD_SYMBOL(dtrmv_); + LOAD_SYMBOL(strmv_); + LOAD_SYMBOL(dtrsm_); + LOAD_SYMBOL(strsm_); + LOAD_SYMBOL(dtrsv_); + LOAD_SYMBOL(strsv_); + LOAD_SYMBOL(idamax_); + LOAD_SYMBOL(isamax_); #undef LOAD_SYMBOL From 2b8e25150f5beb8fe7544b04c85d1ca03d74031b Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Wed, 28 Apr 2021 16:14:05 +0200 Subject: [PATCH 07/42] Remove leftover debug comments --- .../dev/ludovic/netlib/blas/l2/DgemvTest.java | 35 +++++++++++++++++++ 1 file changed, 35 insertions(+) diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/DgemvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l2/DgemvTest.java index ac01c472..32ab15d2 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l2/DgemvTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l2/DgemvTest.java @@ -64,30 +64,65 @@ void testSanity(BLAS blas) { f2j.dgemv("T", M, N, 1.0, dgeA, M, dX, 1, 1.0, expected = dY.clone(), 1); blas.dgemv("T", M, N, 1.0, dgeA, M, dX, 1, 1.0, dYcopy = dY.clone(), 1); + // for (int i = 0; i < M; i++) { + // if (Math.abs(expected[i] - dYcopy[i]) > depsilon) { + // System.err.print(String.format("(0) %f != %f at %d\n", expected[i], dYcopy[i], i)); + // } + // } assertArrayEquals(expected, dYcopy, depsilon); f2j.dgemv("T", M, N, 0.5, dgeA, M, dX, 1, 1.0, expected = dY.clone(), 1); blas.dgemv("T", M, N, 0.5, dgeA, M, dX, 1, 1.0, dYcopy = dY.clone(), 1); + // for (int i = 0; i < M; i++) { + // if (Math.abs(expected[i] - dYcopy[i]) > depsilon) { + // System.err.print(String.format("(1) %f != %f at %d\n", expected[i], dYcopy[i], i)); + // } + // } assertArrayEquals(expected, dYcopy, depsilon); f2j.dgemv("T", M, N, -0.5, dgeA, M, dX, 1, 1.0, expected = dY.clone(), 1); blas.dgemv("T", M, N, -0.5, dgeA, M, dX, 1, 1.0, dYcopy = dY.clone(), 1); + // for (int i = 0; i < M; i++) { + // if (Math.abs(expected[i] - dYcopy[i]) > depsilon) { + // System.err.print(String.format("(2) %f != %f at %d\n", expected[i], dYcopy[i], i)); + // } + // } assertArrayEquals(expected, dYcopy, depsilon); f2j.dgemv("T", M, N, 0.0, dgeA, M, dX, 1, 1.0, expected = dY.clone(), 1); blas.dgemv("T", M, N, 0.0, dgeA, M, dX, 1, 1.0, dYcopy = dY.clone(), 1); + // for (int i = 0; i < M; i++) { + // if (Math.abs(expected[i] - dYcopy[i]) > depsilon) { + // System.err.print(String.format("(3) %f != %f at %d\n", expected[i], dYcopy[i], i)); + // } + // } assertArrayEquals(expected, dYcopy, depsilon); f2j.dgemv("T", M, N, 1.0, dgeA, M, dX, 1, 0.5, expected = dY.clone(), 1); blas.dgemv("T", M, N, 1.0, dgeA, M, dX, 1, 0.5, dYcopy = dY.clone(), 1); + // for (int i = 0; i < M; i++) { + // if (Math.abs(expected[i] - dYcopy[i]) > depsilon) { + // System.err.print(String.format("(4) %f != %f at %d\n", expected[i], dYcopy[i], i)); + // } + // } assertArrayEquals(expected, dYcopy, depsilon); f2j.dgemv("T", M, N, 1.0, dgeA, M, dX, 1, -0.5, expected = dY.clone(), 1); blas.dgemv("T", M, N, 1.0, dgeA, M, dX, 1, -0.5, dYcopy = dY.clone(), 1); + // for (int i = 0; i < M; i++) { + // if (Math.abs(expected[i] - dYcopy[i]) > depsilon) { + // System.err.print(String.format("(5) %f != %f at %d\n", expected[i], dYcopy[i], i)); + // } + // } assertArrayEquals(expected, dYcopy, depsilon); f2j.dgemv("T", M, N, 1.0, dgeA, M, dX, 1, 0.0, expected = dY.clone(), 1); blas.dgemv("T", M, N, 1.0, dgeA, M, dX, 1, 0.0, dYcopy = dY.clone(), 1); + // for (int i = 0; i < M; i++) { + // if (Math.abs(expected[i] - dYcopy[i]) > depsilon) { + // System.err.print(String.format("(6) %f != %f at %d\n", expected[i], dYcopy[i], i)); + // } + // } assertArrayEquals(expected, dYcopy, depsilon); } } From 7e3300e3434d30d73cdfcfb749e3c7b7d507f542 Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Wed, 28 Apr 2021 16:19:51 +0200 Subject: [PATCH 08/42] Rename dev.ludovic.netlib.blas.VectorizedBLAS to dev.ludovic.netlib.blas.VectorBLAS This aligns with dev.ludovic.netlib.blas.ForeignLinkerBLAS --- blas/src/main/java/dev/ludovic/netlib/JavaBLAS.java | 4 ++-- .../main/java/dev/ludovic/netlib/blas/VectorizedBLAS.java | 6 +++--- blas/src/test/java/dev/ludovic/netlib/blas/BLASTest.java | 4 ++-- 3 files changed, 7 insertions(+), 7 deletions(-) diff --git a/blas/src/main/java/dev/ludovic/netlib/JavaBLAS.java b/blas/src/main/java/dev/ludovic/netlib/JavaBLAS.java index 2bdfb4e4..55e68a32 100644 --- a/blas/src/main/java/dev/ludovic/netlib/JavaBLAS.java +++ b/blas/src/main/java/dev/ludovic/netlib/JavaBLAS.java @@ -35,9 +35,9 @@ public static JavaBLAS getInstance() { int major = Integer.parseInt(fullVersion[0]); if (major >= 16) { try { - return dev.ludovic.netlib.blas.VectorizedBLAS.getInstance(); + return dev.ludovic.netlib.blas.VectorBLAS.getInstance(); } catch (Throwable t) { - Logger.getLogger(JavaBLAS.class.getName()).warning("Failed to load implementation from:dev.ludovic.netlib.blas.VectorizedBLAS"); + Logger.getLogger(JavaBLAS.class.getName()).warning("Failed to load implementation from:dev.ludovic.netlib.blas.VectorBLAS"); } } if (major >= 11) { diff --git a/blas/src/main/java/dev/ludovic/netlib/blas/VectorizedBLAS.java b/blas/src/main/java/dev/ludovic/netlib/blas/VectorizedBLAS.java index 4c55f0e9..1d566e58 100644 --- a/blas/src/main/java/dev/ludovic/netlib/blas/VectorizedBLAS.java +++ b/blas/src/main/java/dev/ludovic/netlib/blas/VectorizedBLAS.java @@ -32,14 +32,14 @@ import jdk.incubator.vector.VectorOperators; import jdk.incubator.vector.VectorSpecies; -public class VectorizedBLAS extends Java11BLAS implements dev.ludovic.netlib.JavaBLAS { +public class VectorBLAS extends Java11BLAS implements dev.ludovic.netlib.JavaBLAS { private static final VectorSpecies FMAX = FloatVector.SPECIES_MAX; private static final VectorSpecies DMAX = DoubleVector.SPECIES_MAX; - private static final VectorizedBLAS instance = new VectorizedBLAS(); + private static final VectorBLAS instance = new VectorBLAS(); - protected VectorizedBLAS() {} + protected VectorBLAS() {} public static dev.ludovic.netlib.JavaBLAS getInstance() { return instance; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/BLASTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/BLASTest.java index f6efa9f4..93ea1af3 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/BLASTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/BLASTest.java @@ -68,9 +68,9 @@ private static Stream BLASImplementations() { )); } if (major >= 16) { - /* FIXME: enabling VectorizedBLAS breaks JNI... */ + /* FIXME: enabling VectorBLAS breaks JNI... */ // instances = Stream.concat(instances, Stream.of( - // Arguments.of(dev.ludovic.netlib.blas.VectorizedBLAS.getInstance()), + // Arguments.of(dev.ludovic.netlib.blas.VectorBLAS.getInstance()), // Arguments.of(dev.ludovic.netlib.blas.ForeignLinkerBLAS.getInstance()) // )); instances = Stream.concat(instances, Stream.of( From f2eb51d69f6861e741063249368294b07b1090ad Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Wed, 28 Apr 2021 16:23:25 +0200 Subject: [PATCH 09/42] fixup! Rename dev.ludovic.netlib.blas.VectorizedBLAS to dev.ludovic.netlib.blas.VectorBLAS --- .../ludovic/netlib/blas/{VectorizedBLAS.java => VectorBLAS.java} | 0 1 file changed, 0 insertions(+), 0 deletions(-) rename blas/src/main/java/dev/ludovic/netlib/blas/{VectorizedBLAS.java => VectorBLAS.java} (100%) diff --git a/blas/src/main/java/dev/ludovic/netlib/blas/VectorizedBLAS.java b/blas/src/main/java/dev/ludovic/netlib/blas/VectorBLAS.java similarity index 100% rename from blas/src/main/java/dev/ludovic/netlib/blas/VectorizedBLAS.java rename to blas/src/main/java/dev/ludovic/netlib/blas/VectorBLAS.java From ebeb566e9aac76261aa48d00eb80ebd5a764a93a Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Wed, 28 Apr 2021 00:00:12 +0200 Subject: [PATCH 10/42] Remove com.github.fommil from BLAS fully and WIP for LAPACK --- .../netlib/benchmarks/blas/BLASBenchmark.java | 2 +- .../benchmarks/lapack/LAPACKBenchmark.java | 2 +- blas/pom.xml | 7 +- .../java/dev/ludovic/netlib/NativeBLAS.java | 5 - .../blas/{NetlibWrapper.java => F2jBLAS.java} | 244 +- .../dev/ludovic/netlib/blas/Java8BLAS.java | 87 +- .../ludovic/netlib/blas/NetlibF2jBLAS.java | 54 - .../ludovic/netlib/blas/NetlibNativeBLAS.java | 49 - .../dev/ludovic/netlib/blas/BLASTest.java | 17 +- lapack/pom.xml | 15 +- .../java/dev/ludovic/netlib/JavaLAPACK.java | 2 +- .../java/dev/ludovic/netlib/NativeLAPACK.java | 4 +- .../{NetlibWrapper.java => F2jLAPACK.java} | 1456 +++--- .../dev/ludovic/netlib/lapack/JNILAPACK.java | 1485 ++++++ .../netlib/lapack/NetlibF2jLAPACK.java | 45 - .../netlib/lapack/NetlibNativeLAPACK.java | 49 - lapack/src/main/native/Makefile | 33 + lapack/src/main/native/jni.c | 4535 +++++++++++++++++ .../dev/ludovic/netlib/lapack/LAPACKTest.java | 11 +- 19 files changed, 6939 insertions(+), 1163 deletions(-) rename blas/src/main/java/dev/ludovic/netlib/blas/{NetlibWrapper.java => F2jBLAS.java} (56%) delete mode 100644 blas/src/main/java/dev/ludovic/netlib/blas/NetlibF2jBLAS.java delete mode 100644 blas/src/main/java/dev/ludovic/netlib/blas/NetlibNativeBLAS.java rename lapack/src/main/java/dev/ludovic/netlib/lapack/{NetlibWrapper.java => F2jLAPACK.java} (64%) create mode 100644 lapack/src/main/java/dev/ludovic/netlib/lapack/JNILAPACK.java delete mode 100644 lapack/src/main/java/dev/ludovic/netlib/lapack/NetlibF2jLAPACK.java delete mode 100644 lapack/src/main/java/dev/ludovic/netlib/lapack/NetlibNativeLAPACK.java create mode 100644 lapack/src/main/native/Makefile create mode 100644 lapack/src/main/native/jni.c diff --git a/benchmarks/src/main/java/dev/ludovic/netlib/benchmarks/blas/BLASBenchmark.java b/benchmarks/src/main/java/dev/ludovic/netlib/benchmarks/blas/BLASBenchmark.java index b2ae6ae7..12fad1df 100644 --- a/benchmarks/src/main/java/dev/ludovic/netlib/benchmarks/blas/BLASBenchmark.java +++ b/benchmarks/src/main/java/dev/ludovic/netlib/benchmarks/blas/BLASBenchmark.java @@ -47,7 +47,7 @@ public abstract class BLASBenchmark { public void setupImplementation() { switch (implementation) { case "f2j": - blas = dev.ludovic.netlib.blas.NetlibF2jBLAS.getInstance(); + blas = dev.ludovic.netlib.blas.F2jBLAS.getInstance(); break; case "java": blas = dev.ludovic.netlib.JavaBLAS.getInstance(); diff --git a/benchmarks/src/main/java/dev/ludovic/netlib/benchmarks/lapack/LAPACKBenchmark.java b/benchmarks/src/main/java/dev/ludovic/netlib/benchmarks/lapack/LAPACKBenchmark.java index b0fc4664..e1f72f95 100644 --- a/benchmarks/src/main/java/dev/ludovic/netlib/benchmarks/lapack/LAPACKBenchmark.java +++ b/benchmarks/src/main/java/dev/ludovic/netlib/benchmarks/lapack/LAPACKBenchmark.java @@ -43,7 +43,7 @@ public abstract class LAPACKBenchmark { public void setupImplementation() { switch (implementation) { case "f2j": - lapack = dev.ludovic.netlib.lapack.NetlibF2jLAPACK.getInstance(); + lapack = dev.ludovic.netlib.lapack.F2jLAPACK.getInstance(); break; case "java": lapack = dev.ludovic.netlib.JavaLAPACK.getInstance(); diff --git a/blas/pom.xml b/blas/pom.xml index 41a65bd3..e19a0505 100644 --- a/blas/pom.xml +++ b/blas/pom.xml @@ -41,14 +41,13 @@ information or have any questions. 5.5.2 - 1.1.2 - com.github.fommil.netlib - core - ${netlib.java.version} + net.sourceforge.f2j + arpack_combined_all + 0.1 diff --git a/blas/src/main/java/dev/ludovic/netlib/NativeBLAS.java b/blas/src/main/java/dev/ludovic/netlib/NativeBLAS.java index bb93e25a..ac456528 100644 --- a/blas/src/main/java/dev/ludovic/netlib/NativeBLAS.java +++ b/blas/src/main/java/dev/ludovic/netlib/NativeBLAS.java @@ -31,11 +31,6 @@ public interface NativeBLAS extends BLAS { public static NativeBLAS getInstance() { - try { - return dev.ludovic.netlib.blas.NetlibNativeBLAS.getInstance(); - } catch (Throwable t) { - Logger.getLogger(NativeBLAS.class.getName()).warning("Failed to load implementation from:dev.ludovic.netlib.blas.NetlibNativeBLAS"); - } try { return dev.ludovic.netlib.blas.JNIBLAS.getInstance(); } catch (Throwable t) { diff --git a/blas/src/main/java/dev/ludovic/netlib/blas/NetlibWrapper.java b/blas/src/main/java/dev/ludovic/netlib/blas/F2jBLAS.java similarity index 56% rename from blas/src/main/java/dev/ludovic/netlib/blas/NetlibWrapper.java rename to blas/src/main/java/dev/ludovic/netlib/blas/F2jBLAS.java index 32684a0b..3d9ca786 100644 --- a/blas/src/main/java/dev/ludovic/netlib/blas/NetlibWrapper.java +++ b/blas/src/main/java/dev/ludovic/netlib/blas/F2jBLAS.java @@ -27,279 +27,217 @@ import dev.ludovic.netlib.BLAS; -abstract class NetlibWrapper extends AbstractBLAS { +public final class F2jBLAS extends AbstractBLAS implements dev.ludovic.netlib.JavaBLAS { - private final com.github.fommil.netlib.BLAS blas; + private static final F2jBLAS instance = new F2jBLAS(); - protected NetlibWrapper(com.github.fommil.netlib.BLAS _blas) { - blas = _blas; + protected F2jBLAS() {} + + public static dev.ludovic.netlib.JavaBLAS getInstance() { + return instance; } protected double dasumK(int n, double[] x, int offsetx, int incx) { - return blas.dasum(n, x, offsetx, incx); + return org.netlib.blas.Dasum.dasum(n, x, offsetx, incx); } - protected float sasumK(int n, float[] x, int offsetx, int incx) { - return blas.sasum(n, x, offsetx, incx); + return org.netlib.blas.Sasum.sasum(n, x, offsetx, incx); } - protected void daxpyK(int n, double alpha, double[] x, int offsetx, int incx, double[] y, int offsety, int incy) { - blas.daxpy(n, alpha, x, offsetx, incx, y, offsety, incy); + org.netlib.blas.Daxpy.daxpy(n, alpha, x, offsetx, incx, y, offsety, incy); } - protected void saxpyK(int n, float alpha, float[] x, int offsetx, int incx, float[] y, int offsety, int incy) { - blas.saxpy(n, alpha, x, offsetx, incx, y, offsety, incy); + org.netlib.blas.Saxpy.saxpy(n, alpha, x, offsetx, incx, y, offsety, incy); } - protected void dcopyK(int n, double[] x, int offsetx, int incx, double[] y, int offsety, int incy) { - blas.dcopy(n, x, offsetx, incx, y, offsety, incy); + org.netlib.blas.Dcopy.dcopy(n, x, offsetx, incx, y, offsety, incy); } - protected void scopyK(int n, float[] x, int offsetx, int incx, float[] y, int offsety, int incy) { - blas.scopy(n, x, offsetx, incx, y, offsety, incy); + org.netlib.blas.Scopy.scopy(n, x, offsetx, incx, y, offsety, incy); } - protected double ddotK(int n, double[] x, int offsetx, int incx, double[] y, int offsety, int incy) { - return blas.ddot(n, x, offsetx, incx, y, offsety, incy); + return org.netlib.blas.Ddot.ddot(n, x, offsetx, incx, y, offsety, incy); } - protected float sdotK(int n, float[] x, int offsetx, int incx, float[] y, int offsety, int incy) { - return blas.sdot(n, x, offsetx, incx, y, offsety, incy); + return org.netlib.blas.Sdot.sdot(n, x, offsetx, incx, y, offsety, incy); } - - protected float sdsdotK(int n, float sb, float[] sx, int _sx_offset, int incx, float[] sy, int _sy_offset, int incy) { - return blas.sdsdot(n, sb, sx, _sx_offset, incx, sy, _sy_offset, incy); + protected float sdsdotK(int n, float sb, float[] x, int offsetx, int incx, float[] y, int offsety, int incy) { + return org.netlib.blas.Sdsdot.sdsdot(n, sb, x, offsetx, incx, y, offsety, incy); } - protected void dgbmvK(String trans, int m, int n, int kl, int ku, double alpha, double[] a, int offseta, int lda, double[] x, int offsetx, int incx, double beta, double[] y, int offsety, int incy) { - blas.dgbmv(trans, m, n, kl, ku, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); + org.netlib.blas.Dgbmv.dgbmv(trans, m, n, kl, ku, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); } - protected void sgbmvK(String trans, int m, int n, int kl, int ku, float alpha, float[] a, int offseta, int lda, float[] x, int offsetx, int incx, float beta, float[] y, int offsety, int incy) { - blas.sgbmv(trans, m, n, kl, ku, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); + org.netlib.blas.Sgbmv.sgbmv(trans, m, n, kl, ku, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); } - protected void dgemmK(String transa, String transb, int m, int n, int k, double alpha, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double beta, double[] c, int offsetc, int ldc) { - blas.dgemm(transa, transb, m, n, k, alpha, a, offseta, lda, b, offsetb, ldb, beta, c, offsetc, ldc); + org.netlib.blas.Dgemm.dgemm(transa, transb, m, n, k, alpha, a, offseta, lda, b, offsetb, ldb, beta, c, offsetc, ldc); } - protected void sgemmK(String transa, String transb, int m, int n, int k, float alpha, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float beta, float[] c, int offsetc, int ldc) { - blas.sgemm(transa, transb, m, n, k, alpha, a, offseta, lda, b, offsetb, ldb, beta, c, offsetc, ldc); + org.netlib.blas.Sgemm.sgemm(transa, transb, m, n, k, alpha, a, offseta, lda, b, offsetb, ldb, beta, c, offsetc, ldc); } - protected void dgemvK(String trans, int m, int n, double alpha, double[] a, int offseta, int lda, double[] x, int offsetx, int incx, double beta, double[] y, int offsety, int incy) { - blas.dgemv(trans, m, n, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); + org.netlib.blas.Dgemv.dgemv(trans, m, n, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); } - protected void sgemvK(String trans, int m, int n, float alpha, float[] a, int offseta, int lda, float[] x, int offsetx, int incx, float beta, float[] y, int offsety, int incy) { - blas.sgemv(trans, m, n, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); + org.netlib.blas.Sgemv.sgemv(trans, m, n, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); } - protected void dgerK(int m, int n, double alpha, double[] x, int offsetx, int incx, double[] y, int offsety, int incy, double[] a, int offseta, int lda) { - blas.dger(m, n, alpha, x, offsetx, incx, y, offsety, incy, a, offseta, lda); + org.netlib.blas.Dger.dger(m, n, alpha, x, offsetx, incx, y, offsety, incy, a, offseta, lda); } - protected void sgerK(int m, int n, float alpha, float[] x, int offsetx, int incx, float[] y, int offsety, int incy, float[] a, int offseta, int lda) { - blas.sger(m, n, alpha, x, offsetx, incx, y, offsety, incy, a, offseta, lda); + org.netlib.blas.Sger.sger(m, n, alpha, x, offsetx, incx, y, offsety, incy, a, offseta, lda); } - protected double dnrm2K(int n, double[] x, int offsetx, int incx) { - return blas.dnrm2(n, x, offsetx, incx); + return org.netlib.blas.Dnrm2.dnrm2(n, x, offsetx, incx); } - protected float snrm2K(int n, float[] x, int offsetx, int incx) { - return blas.snrm2(n, x, offsetx, incx); + return org.netlib.blas.Snrm2.snrm2(n, x, offsetx, incx); } - - protected void drotK(int n, double[] dx, int offsetdx, int incx, double[] dy, int offsetdy, int incy, double c, double s) { - blas.drot(n, dx, offsetdx, incx, dy, offsetdy, incy, c, s); + protected void drotK(int n, double[] x, int offsetx, int incx, double[] y, int offsety, int incy, double c, double s) { + org.netlib.blas.Drot.drot(n, x, offsetx, incx, y, offsety, incy, c, s); } - - protected void srotK(int n, float[] sx, int _sx_offset, int incx, float[] sy, int _sy_offset, int incy, float c, float s) { - blas.srot(n, sx, _sx_offset, incx, sy, _sy_offset, incy, c, s); + protected void srotK(int n, float[] x, int offsetx, int incx, float[] y, int offsety, int incy, float c, float s) { + org.netlib.blas.Srot.srot(n, x, offsetx, incx, y, offsety, incy, c, s); } - - protected void drotmK(int n, double[] dx, int offsetdx, int incx, double[] dy, int offsetdy, int incy, double[] dparam, int _dparam_offset) { - blas.drotm(n, dx, offsetdx, incx, dy, offsetdy, incy, dparam, _dparam_offset); + protected void drotmK(int n, double[] x, int offsetx, int incx, double[] y, int offsety, int incy, double[] param, int offsetparam) { + org.netlib.blas.Drotm.drotm(n, x, offsetx, incx, y, offsety, incy, param, offsetparam); } - - protected void srotmK(int n, float[] sx, int _sx_offset, int incx, float[] sy, int _sy_offset, int incy, float[] sparam, int _sparam_offset) { - blas.srotm(n, sx, _sx_offset, incx, sy, _sy_offset, incy, sparam, _sparam_offset); + protected void srotmK(int n, float[] x, int offsetx, int incx, float[] y, int offsety, int incy, float[] param, int offsetparam) { + org.netlib.blas.Srotm.srotm(n, x, offsetx, incx, y, offsety, incy, param, offsetparam); } - - protected void drotmgK(org.netlib.util.doubleW dd1, org.netlib.util.doubleW dd2, org.netlib.util.doubleW dx1, double dy1, double[] dparam, int _dparam_offset) { - blas.drotmg(dd1, dd2, dx1, dy1, dparam, _dparam_offset); + protected void drotmgK(org.netlib.util.doubleW dd1, org.netlib.util.doubleW dd2, org.netlib.util.doubleW dx1, double dy1, double[] param, int offsetparam) { + org.netlib.blas.Drotmg.drotmg(dd1, dd2, dx1, dy1, param, offsetparam); } - - protected void srotmgK(org.netlib.util.floatW sd1, org.netlib.util.floatW sd2, org.netlib.util.floatW sx1, float sy1, float[] sparam, int _sparam_offset) { - blas.srotmg(sd1, sd2, sx1, sy1, sparam, _sparam_offset); + protected void srotmgK(org.netlib.util.floatW sd1, org.netlib.util.floatW sd2, org.netlib.util.floatW sx1, float sy1, float[] param, int offsetparam) { + org.netlib.blas.Srotmg.srotmg(sd1, sd2, sx1, sy1, param, offsetparam); } - protected void dsbmvK(String uplo, int n, int k, double alpha, double[] a, int offseta, int lda, double[] x, int offsetx, int incx, double beta, double[] y, int offsety, int incy) { - blas.dsbmv(uplo, n, k, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); + org.netlib.blas.Dsbmv.dsbmv(uplo, n, k, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); } - protected void ssbmvK(String uplo, int n, int k, float alpha, float[] a, int offseta, int lda, float[] x, int offsetx, int incx, float beta, float[] y, int offsety, int incy) { - blas.ssbmv(uplo, n, k, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); + org.netlib.blas.Ssbmv.ssbmv(uplo, n, k, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); } - protected void dscalK(int n, double alpha, double[] x, int offsetx, int incx) { - blas.dscal(n, alpha, x, offsetx, incx); + org.netlib.blas.Dscal.dscal(n, alpha, x, offsetx, incx); } - protected void sscalK(int n, float alpha, float[] x, int offsetx, int incx) { - blas.sscal(n, alpha, x, offsetx, incx); + org.netlib.blas.Sscal.sscal(n, alpha, x, offsetx, incx); } - protected void dspmvK(String uplo, int n, double alpha, double[] a, int offseta, double[] x, int offsetx, int incx, double beta, double[] y, int offsety, int incy) { - blas.dspmv(uplo, n, alpha, a, offseta, x, offsetx, incx, beta, y, offsety, incy); + org.netlib.blas.Dspmv.dspmv(uplo, n, alpha, a, offseta, x, offsetx, incx, beta, y, offsety, incy); } - - protected void sspmvK(String uplo, int n, float alpha, float[] ap, int offsetap, float[] x, int offsetx, int incx, float beta, float[] y, int offsety, int incy) { - blas.sspmv(uplo, n, alpha, ap, offsetap, x, offsetx, incx, beta, y, offsety, incy); + protected void sspmvK(String uplo, int n, float alpha, float[] a, int offseta, float[] x, int offsetx, int incx, float beta, float[] y, int offsety, int incy) { + org.netlib.blas.Sspmv.sspmv(uplo, n, alpha, a, offseta, x, offsetx, incx, beta, y, offsety, incy); } - protected void dsprK(String uplo, int n, double alpha, double[] x, int offsetx, int incx, double[] a, int offseta) { - blas.dspr(uplo, n, alpha, x, offsetx, incx, a, offseta); + org.netlib.blas.Dspr.dspr(uplo, n, alpha, x, offsetx, incx, a, offseta); } - - protected void ssprK(String uplo, int n, float alpha, float[] x, int offsetx, int incx, float[] ap, int offsetap) { - blas.sspr(uplo, n, alpha, x, offsetx, incx, ap, offsetap); + protected void ssprK(String uplo, int n, float alpha, float[] x, int offsetx, int incx, float[] a, int offseta) { + org.netlib.blas.Sspr.sspr(uplo, n, alpha, x, offsetx, incx, a, offseta); } - - protected void dspr2K(String uplo, int n, double alpha, double[] x, int offsetx, int incx, double[] y, int offsety, int incy, double[] ap, int offsetap) { - blas.dspr2(uplo, n, alpha, x, offsetx, incx, y, offsety, incy, ap, offsetap); + protected void dspr2K(String uplo, int n, double alpha, double[] x, int offsetx, int incx, double[] y, int offsety, int incy, double[] a, int offseta) { + org.netlib.blas.Dspr2.dspr2(uplo, n, alpha, x, offsetx, incx, y, offsety, incy, a, offseta); } - - protected void sspr2K(String uplo, int n, float alpha, float[] x, int offsetx, int incx, float[] y, int offsety, int incy, float[] ap, int offsetap) { - blas.sspr2(uplo, n, alpha, x, offsetx, incx, y, offsety, incy, ap, offsetap); + protected void sspr2K(String uplo, int n, float alpha, float[] x, int offsetx, int incx, float[] y, int offsety, int incy, float[] a, int offseta) { + org.netlib.blas.Sspr2.sspr2(uplo, n, alpha, x, offsetx, incx, y, offsety, incy, a, offseta); } - protected void dswapK(int n, double[] x, int offsetx, int incx, double[] y, int offsety, int incy) { - blas.dswap(n, x, offsetx, incx, y, offsety, incy); + org.netlib.blas.Dswap.dswap(n, x, offsetx, incx, y, offsety, incy); } - protected void sswapK(int n, float[] x, int offsetx, int incx, float[] y, int offsety, int incy) { - blas.sswap(n, x, offsetx, incx, y, offsety, incy); + org.netlib.blas.Sswap.sswap(n, x, offsetx, incx, y, offsety, incy); } - protected void dsymmK(String side, String uplo, int m, int n, double alpha, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double beta, double[] c, int offsetc, int ldc) { - blas.dsymm(side, uplo, m, n, alpha, a, offseta, lda, b, offsetb, ldb, beta, c, offsetc, ldc); + org.netlib.blas.Dsymm.dsymm(side, uplo, m, n, alpha, a, offseta, lda, b, offsetb, ldb, beta, c, offsetc, ldc); } - protected void ssymmK(String side, String uplo, int m, int n, float alpha, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float beta, float[] c, int offsetc, int ldc) { - blas.ssymm(side, uplo, m, n, alpha, a, offseta, lda, b, offsetb, ldb, beta, c, offsetc, ldc); + org.netlib.blas.Ssymm.ssymm(side, uplo, m, n, alpha, a, offseta, lda, b, offsetb, ldb, beta, c, offsetc, ldc); } - protected void dsymvK(String uplo, int n, double alpha, double[] a, int offseta, int lda, double[] x, int offsetx, int incx, double beta, double[] y, int offsety, int incy) { - blas.dsymv(uplo, n, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); + org.netlib.blas.Dsymv.dsymv(uplo, n, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); } - protected void ssymvK(String uplo, int n, float alpha, float[] a, int offseta, int lda, float[] x, int offsetx, int incx, float beta, float[] y, int offsety, int incy) { - blas.ssymv(uplo, n, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); + org.netlib.blas.Ssymv.ssymv(uplo, n, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); } - protected void dsyrK(String uplo, int n, double alpha, double[] x, int offsetx, int incx, double[] a, int offseta, int lda) { - blas.dsyr(uplo, n, alpha, x, offsetx, incx, a, offseta, lda); + org.netlib.blas.Dsyr.dsyr(uplo, n, alpha, x, offsetx, incx, a, offseta, lda); } - protected void ssyrK(String uplo, int n, float alpha, float[] x, int offsetx, int incx, float[] a, int offseta, int lda) { - blas.ssyr(uplo, n, alpha, x, offsetx, incx, a, offseta, lda); + org.netlib.blas.Ssyr.ssyr(uplo, n, alpha, x, offsetx, incx, a, offseta, lda); } - protected void dsyr2K(String uplo, int n, double alpha, double[] x, int offsetx, int incx, double[] y, int offsety, int incy, double[] a, int offseta, int lda) { - blas.dsyr2(uplo, n, alpha, x, offsetx, incx, y, offsety, incy, a, offseta, lda); + org.netlib.blas.Dsyr2.dsyr2(uplo, n, alpha, x, offsetx, incx, y, offsety, incy, a, offseta, lda); } - protected void ssyr2K(String uplo, int n, float alpha, float[] x, int offsetx, int incx, float[] y, int offsety, int incy, float[] a, int offseta, int lda) { - blas.ssyr2(uplo, n, alpha, x, offsetx, incx, y, offsety, incy, a, offseta, lda); + org.netlib.blas.Ssyr2.ssyr2(uplo, n, alpha, x, offsetx, incx, y, offsety, incy, a, offseta, lda); } - protected void dsyr2kK(String uplo, String trans, int n, int k, double alpha, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double beta, double[] c, int offsetc, int ldc) { - blas.dsyr2k(uplo, trans, n, k, alpha, a, offseta, lda, b, offsetb, ldb, beta, c, offsetc, ldc); + org.netlib.blas.Dsyr2k.dsyr2k(uplo, trans, n, k, alpha, a, offseta, lda, b, offsetb, ldb, beta, c, offsetc, ldc); } - protected void ssyr2kK(String uplo, String trans, int n, int k, float alpha, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float beta, float[] c, int offsetc, int ldc) { - blas.ssyr2k(uplo, trans, n, k, alpha, a, offseta, lda, b, offsetb, ldb, beta, c, offsetc, ldc); + org.netlib.blas.Ssyr2k.ssyr2k(uplo, trans, n, k, alpha, a, offseta, lda, b, offsetb, ldb, beta, c, offsetc, ldc); } - protected void dsyrkK(String uplo, String trans, int n, int k, double alpha, double[] a, int offseta, int lda, double beta, double[] c, int offsetc, int ldc) { - blas.dsyrk(uplo, trans, n, k, alpha, a, offseta, lda, beta, c, offsetc, ldc); + org.netlib.blas.Dsyrk.dsyrk(uplo, trans, n, k, alpha, a, offseta, lda, beta, c, offsetc, ldc); } - protected void ssyrkK(String uplo, String trans, int n, int k, float alpha, float[] a, int offseta, int lda, float beta, float[] c, int offsetc, int ldc) { - blas.ssyrk(uplo, trans, n, k, alpha, a, offseta, lda, beta, c, offsetc, ldc); + org.netlib.blas.Ssyrk.ssyrk(uplo, trans, n, k, alpha, a, offseta, lda, beta, c, offsetc, ldc); } - protected void dtbmvK(String uplo, String trans, String diag, int n, int k, double[] a, int offseta, int lda, double[] x, int offsetx, int incx) { - blas.dtbmv(uplo, trans, diag, n, k, a, offseta, lda, x, offsetx, incx); + org.netlib.blas.Dtbmv.dtbmv(uplo, trans, diag, n, k, a, offseta, lda, x, offsetx, incx); } - protected void stbmvK(String uplo, String trans, String diag, int n, int k, float[] a, int offseta, int lda, float[] x, int offsetx, int incx) { - blas.stbmv(uplo, trans, diag, n, k, a, offseta, lda, x, offsetx, incx); + org.netlib.blas.Stbmv.stbmv(uplo, trans, diag, n, k, a, offseta, lda, x, offsetx, incx); } - protected void dtbsvK(String uplo, String trans, String diag, int n, int k, double[] a, int offseta, int lda, double[] x, int offsetx, int incx) { - blas.dtbsv(uplo, trans, diag, n, k, a, offseta, lda, x, offsetx, incx); + org.netlib.blas.Dtbsv.dtbsv(uplo, trans, diag, n, k, a, offseta, lda, x, offsetx, incx); } - protected void stbsvK(String uplo, String trans, String diag, int n, int k, float[] a, int offseta, int lda, float[] x, int offsetx, int incx) { - blas.stbsv(uplo, trans, diag, n, k, a, offseta, lda, x, offsetx, incx); + org.netlib.blas.Stbsv.stbsv(uplo, trans, diag, n, k, a, offseta, lda, x, offsetx, incx); } - - protected void dtpmvK(String uplo, String trans, String diag, int n, double[] ap, int offsetap, double[] x, int offsetx, int incx) { - blas.dtpmv(uplo, trans, diag, n, ap, offsetap, x, offsetx, incx); + protected void dtpmvK(String uplo, String trans, String diag, int n, double[] a, int offseta, double[] x, int offsetx, int incx) { + org.netlib.blas.Dtpmv.dtpmv(uplo, trans, diag, n, a, offseta, x, offsetx, incx); } - - protected void stpmvK(String uplo, String trans, String diag, int n, float[] ap, int offsetap, float[] x, int offsetx, int incx) { - blas.stpmv(uplo, trans, diag, n, ap, offsetap, x, offsetx, incx); + protected void stpmvK(String uplo, String trans, String diag, int n, float[] a, int offseta, float[] x, int offsetx, int incx) { + org.netlib.blas.Stpmv.stpmv(uplo, trans, diag, n, a, offseta, x, offsetx, incx); } - - protected void dtpsvK(String uplo, String trans, String diag, int n, double[] ap, int offsetap, double[] x, int offsetx, int incx) { - blas.dtpsv(uplo, trans, diag, n, ap, offsetap, x, offsetx, incx); + protected void dtpsvK(String uplo, String trans, String diag, int n, double[] a, int offseta, double[] x, int offsetx, int incx) { + org.netlib.blas.Dtpsv.dtpsv(uplo, trans, diag, n, a, offseta, x, offsetx, incx); } - - protected void stpsvK(String uplo, String trans, String diag, int n, float[] ap, int offsetap, float[] x, int offsetx, int incx) { - blas.stpsv(uplo, trans, diag, n, ap, offsetap, x, offsetx, incx); + protected void stpsvK(String uplo, String trans, String diag, int n, float[] a, int offseta, float[] x, int offsetx, int incx) { + org.netlib.blas.Stpsv.stpsv(uplo, trans, diag, n, a, offseta, x, offsetx, incx); } - protected void dtrmmK(String side, String uplo, String transa, String diag, int m, int n, double alpha, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb) { - blas.dtrmm(side, uplo, transa, diag, m, n, alpha, a, offseta, lda, b, offsetb, ldb); + org.netlib.blas.Dtrmm.dtrmm(side, uplo, transa, diag, m, n, alpha, a, offseta, lda, b, offsetb, ldb); } - protected void strmmK(String side, String uplo, String transa, String diag, int m, int n, float alpha, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb) { - blas.strmm(side, uplo, transa, diag, m, n, alpha, a, offseta, lda, b, offsetb, ldb); + org.netlib.blas.Strmm.strmm(side, uplo, transa, diag, m, n, alpha, a, offseta, lda, b, offsetb, ldb); } - protected void dtrmvK(String uplo, String trans, String diag, int n, double[] a, int offseta, int lda, double[] x, int offsetx, int incx) { - blas.dtrmv(uplo, trans, diag, n, a, offseta, lda, x, offsetx, incx); + org.netlib.blas.Dtrmv.dtrmv(uplo, trans, diag, n, a, offseta, lda, x, offsetx, incx); } - protected void strmvK(String uplo, String trans, String diag, int n, float[] a, int offseta, int lda, float[] x, int offsetx, int incx) { - blas.strmv(uplo, trans, diag, n, a, offseta, lda, x, offsetx, incx); + org.netlib.blas.Strmv.strmv(uplo, trans, diag, n, a, offseta, lda, x, offsetx, incx); } - protected void dtrsmK(String side, String uplo, String transa, String diag, int m, int n, double alpha, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb) { - blas.dtrsm(side, uplo, transa, diag, m, n, alpha, a, offseta, lda, b, offsetb, ldb); + org.netlib.blas.Dtrsm.dtrsm(side, uplo, transa, diag, m, n, alpha, a, offseta, lda, b, offsetb, ldb); } - protected void strsmK(String side, String uplo, String transa, String diag, int m, int n, float alpha, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb) { - blas.strsm(side, uplo, transa, diag, m, n, alpha, a, offseta, lda, b, offsetb, ldb); + org.netlib.blas.Strsm.strsm(side, uplo, transa, diag, m, n, alpha, a, offseta, lda, b, offsetb, ldb); } - protected void dtrsvK(String uplo, String trans, String diag, int n, double[] a, int offseta, int lda, double[] x, int offsetx, int incx) { - blas.dtrsv(uplo, trans, diag, n, a, offseta, lda, x, offsetx, incx); + org.netlib.blas.Dtrsv.dtrsv(uplo, trans, diag, n, a, offseta, lda, x, offsetx, incx); } - protected void strsvK(String uplo, String trans, String diag, int n, float[] a, int offseta, int lda, float[] x, int offsetx, int incx) { - blas.strsv(uplo, trans, diag, n, a, offseta, lda, x, offsetx, incx); + org.netlib.blas.Strsv.strsv(uplo, trans, diag, n, a, offseta, lda, x, offsetx, incx); } - protected int idamaxK(int n, double[] x, int offsetx, int incx) { - return blas.idamax(n, x, offsetx, incx); + // F2j returns 1-based index because that's how Fortran works + return org.netlib.blas.Idamax.idamax(n, x, offsetx, incx) - 1; } - - protected int isamaxK(int n, float[] sx, int _sx_offset, int incx) { - return blas.isamax(n, sx, _sx_offset, incx); + protected int isamaxK(int n, float[] x, int offsetx, int incx) { + // F2j returns 1-based index because that's how Fortran works + return org.netlib.blas.Isamax.isamax(n, x, offsetx, incx) - 1; } } diff --git a/blas/src/main/java/dev/ludovic/netlib/blas/Java8BLAS.java b/blas/src/main/java/dev/ludovic/netlib/blas/Java8BLAS.java index 5505e3e3..f4178558 100644 --- a/blas/src/main/java/dev/ludovic/netlib/blas/Java8BLAS.java +++ b/blas/src/main/java/dev/ludovic/netlib/blas/Java8BLAS.java @@ -29,9 +29,6 @@ public class Java8BLAS extends AbstractBLAS implements dev.ludovic.netlib.JavaBLAS { - //FIXME: remove dependency on F2jBLAS - private static final com.github.fommil.netlib.F2jBLAS f2j = new com.github.fommil.netlib.F2jBLAS(); - private static final Java8BLAS instance = new Java8BLAS(); protected Java8BLAS() {} @@ -243,10 +240,10 @@ protected float sdsdotK(int n, float sb, float[] x, int offsetx, int incx, float } protected void dgbmvK(String trans, int m, int n, int kl, int ku, double alpha, double[] a, int offseta, int lda, double[] x, int offsetx, int incx, double beta, double[] y, int offsety, int incy) { - f2j.dgbmv(trans, m, n, kl, ku, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); + org.netlib.blas.Dgbmv.dgbmv(trans, m, n, kl, ku, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); } protected void sgbmvK(String trans, int m, int n, int kl, int ku, float alpha, float[] a, int offseta, int lda, float[] x, int offsetx, int incx, float beta, float[] y, int offsety, int incy) { - f2j.sgbmv(trans, m, n, kl, ku, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); + org.netlib.blas.Sgbmv.sgbmv(trans, m, n, kl, ku, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); } protected void dgemmK(String transa, String transb, int m, int n, int k, double alpha, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double beta, double[] c, int offsetc, int ldc) { @@ -3018,27 +3015,27 @@ protected void srotK(int n, float[] x, int offsetx, int incx, float[] y, int off } protected void drotmK(int n, double[] x, int offsetx, int incx, double[] y, int offsety, int incy, double[] param, int offsetparam) { - f2j.drotm(n, x, offsetx, incx, y, offsety, incy, param, offsetparam); + org.netlib.blas.Drotm.drotm(n, x, offsetx, incx, y, offsety, incy, param, offsetparam); } protected void srotmK(int n, float[] x, int offsetx, int incx, float[] y, int offsety, int incy, float[] param, int offsetparam) { - f2j.srotm(n, x, offsetx, incx, y, offsety, incy, param, offsetparam); + org.netlib.blas.Srotm.srotm(n, x, offsetx, incx, y, offsety, incy, param, offsetparam); } protected void drotmgK(org.netlib.util.doubleW dd1, org.netlib.util.doubleW dd2, org.netlib.util.doubleW dx1, double dy1, double[] param, int offsetparam) { - f2j.drotmg(dd1, dd2, dx1, dy1, param, offsetparam); + org.netlib.blas.Drotmg.drotmg(dd1, dd2, dx1, dy1, param, offsetparam); } protected void srotmgK(org.netlib.util.floatW sd1, org.netlib.util.floatW sd2, org.netlib.util.floatW sx1, float sy1, float[] param, int offsetparam) { - f2j.srotmg(sd1, sd2, sx1, sy1, param, offsetparam); + org.netlib.blas.Srotmg.srotmg(sd1, sd2, sx1, sy1, param, offsetparam); } protected void dsbmvK(String uplo, int n, int k, double alpha, double[] a, int offseta, int lda, double[] x, int offsetx, int incx, double beta, double[] y, int offsety, int incy) { - f2j.dsbmv(uplo, n, k, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); + org.netlib.blas.Dsbmv.dsbmv(uplo, n, k, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); } protected void ssbmvK(String uplo, int n, int k, float alpha, float[] a, int offseta, int lda, float[] x, int offsetx, int incx, float beta, float[] y, int offsety, int incy) { - f2j.ssbmv(uplo, n, k, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); + org.netlib.blas.Ssbmv.ssbmv(uplo, n, k, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); } protected void dscalK(int n, double alpha, double[] x, int offsetx, int incx) { @@ -3442,19 +3439,19 @@ protected void sspmvL(int n, float alpha, float[] a, int offseta, float[] x, int } protected void dsprK(String uplo, int n, double alpha, double[] x, int offsetx, int incx, double[] a, int offseta) { - f2j.dspr(uplo, n, alpha, x, offsetx, incx, a, offseta); + org.netlib.blas.Dspr.dspr(uplo, n, alpha, x, offsetx, incx, a, offseta); } protected void ssprK(String uplo, int n, float alpha, float[] x, int offsetx, int incx, float[] a, int offseta) { - f2j.sspr(uplo, n, alpha, x, offsetx, incx, a, offseta); + org.netlib.blas.Sspr.sspr(uplo, n, alpha, x, offsetx, incx, a, offseta); } protected void dspr2K(String uplo, int n, double alpha, double[] x, int offsetx, int incx, double[] y, int offsety, int incy, double[] a, int offseta) { - f2j.dspr2(uplo, n, alpha, x, offsetx, incx, y, offsety, incy, a, offseta); + org.netlib.blas.Dspr2.dspr2(uplo, n, alpha, x, offsetx, incx, y, offsety, incy, a, offseta); } protected void sspr2K(String uplo, int n, float alpha, float[] x, int offsetx, int incx, float[] y, int offsety, int incy, float[] a, int offseta) { - f2j.sspr2(uplo, n, alpha, x, offsetx, incx, y, offsety, incy, a, offseta); + org.netlib.blas.Sspr2.sspr2(uplo, n, alpha, x, offsetx, incx, y, offsety, incy, a, offseta); } protected void dswapK(int n, double[] x, int offsetx, int incx, double[] y, int offsety, int incy) { @@ -4088,12 +4085,12 @@ protected void dsymmLL(int m, int n, double alpha, double[] a, int offseta, int protected void dsymmRU(int m, int n, double alpha, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double beta, double[] c, int offsetc, int ldc) { // C := alpha*B*A + beta*C - f2j.dsymm("R", "U", m, n, alpha, a, offseta, lda, b, offsetb, ldb, beta, c, offsetc, ldc); + org.netlib.blas.Dsymm.dsymm("R", "U", m, n, alpha, a, offseta, lda, b, offsetb, ldb, beta, c, offsetc, ldc); } protected void dsymmRL(int m, int n, double alpha, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double beta, double[] c, int offsetc, int ldc) { // C := alpha*B*A + beta*C - f2j.dsymm("R", "L", m, n, alpha, a, offseta, lda, b, offsetb, ldb, beta, c, offsetc, ldc); + org.netlib.blas.Dsymm.dsymm("R", "L", m, n, alpha, a, offseta, lda, b, offsetb, ldb, beta, c, offsetc, ldc); } protected void ssymmK(String side, String uplo, int m, int n, float alpha, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float beta, float[] c, int offsetc, int ldc) { @@ -4676,12 +4673,12 @@ protected void ssymmLL(int m, int n, float alpha, float[] a, int offseta, int ld protected void ssymmRU(int m, int n, float alpha, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float beta, float[] c, int offsetc, int ldc) { // C := alpha*B*A + beta*C - f2j.ssymm("R", "U", m, n, alpha, a, offseta, lda, b, offsetb, ldb, beta, c, offsetc, ldc); + org.netlib.blas.Ssymm.ssymm("R", "U", m, n, alpha, a, offseta, lda, b, offsetb, ldb, beta, c, offsetc, ldc); } protected void ssymmRL(int m, int n, float alpha, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float beta, float[] c, int offsetc, int ldc) { // C := alpha*B*A + beta*C - f2j.ssymm("R", "L", m, n, alpha, a, offseta, lda, b, offsetb, ldb, beta, c, offsetc, ldc); + org.netlib.blas.Ssymm.ssymm("R", "L", m, n, alpha, a, offseta, lda, b, offsetb, ldb, beta, c, offsetc, ldc); } protected void dsymvK(String uplo, int n, double alpha, double[] a, int offseta, int lda, double[] x, int offsetx, int incx, double beta, double[] y, int offsety, int incy) { @@ -5055,108 +5052,108 @@ protected void ssymvL(int n, float alpha, float[] a, int offseta, int lda, float } protected void dsyrK(String uplo, int n, double alpha, double[] x, int offsetx, int incx, double[] a, int offseta, int lda) { - f2j.dsyr(uplo, n, alpha, x, offsetx, incx, a, offseta, lda); + org.netlib.blas.Dsyr.dsyr(uplo, n, alpha, x, offsetx, incx, a, offseta, lda); } protected void ssyrK(String uplo, int n, float alpha, float[] x, int offsetx, int incx, float[] a, int offseta, int lda) { - f2j.ssyr(uplo, n, alpha, x, offsetx, incx, a, offseta, lda); + org.netlib.blas.Ssyr.ssyr(uplo, n, alpha, x, offsetx, incx, a, offseta, lda); } protected void dsyr2K(String uplo, int n, double alpha, double[] x, int offsetx, int incx, double[] y, int offsety, int incy, double[] a, int offseta, int lda) { - f2j.dsyr2(uplo, n, alpha, x, offsetx, incx, y, offsety, incy, a, offseta, lda); + org.netlib.blas.Dsyr2.dsyr2(uplo, n, alpha, x, offsetx, incx, y, offsety, incy, a, offseta, lda); } protected void ssyr2K(String uplo, int n, float alpha, float[] x, int offsetx, int incx, float[] y, int offsety, int incy, float[] a, int offseta, int lda) { - f2j.ssyr2(uplo, n, alpha, x, offsetx, incx, y, offsety, incy, a, offseta, lda); + org.netlib.blas.Ssyr2.ssyr2(uplo, n, alpha, x, offsetx, incx, y, offsety, incy, a, offseta, lda); } protected void dsyr2kK(String uplo, String trans, int n, int k, double alpha, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double beta, double[] c, int offsetc, int ldc) { - f2j.dsyr2k(uplo, trans, n, k, alpha, a, offseta, lda, b, offsetb, ldb, beta, c, offsetc, ldc); + org.netlib.blas.Dsyr2k.dsyr2k(uplo, trans, n, k, alpha, a, offseta, lda, b, offsetb, ldb, beta, c, offsetc, ldc); } protected void ssyr2kK(String uplo, String trans, int n, int k, float alpha, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float beta, float[] c, int offsetc, int ldc) { - f2j.ssyr2k(uplo, trans, n, k, alpha, a, offseta, lda, b, offsetb, ldb, beta, c, offsetc, ldc); + org.netlib.blas.Ssyr2k.ssyr2k(uplo, trans, n, k, alpha, a, offseta, lda, b, offsetb, ldb, beta, c, offsetc, ldc); } protected void dsyrkK(String uplo, String trans, int n, int k, double alpha, double[] a, int offseta, int lda, double beta, double[] c, int offsetc, int ldc) { - f2j.dsyrk(uplo, trans, n, k, alpha, a, offseta, lda, beta, c, offsetc, ldc); + org.netlib.blas.Dsyrk.dsyrk(uplo, trans, n, k, alpha, a, offseta, lda, beta, c, offsetc, ldc); } protected void ssyrkK(String uplo, String trans, int n, int k, float alpha, float[] a, int offseta, int lda, float beta, float[] c, int offsetc, int ldc) { - f2j.ssyrk(uplo, trans, n, k, alpha, a, offseta, lda, beta, c, offsetc, ldc); + org.netlib.blas.Ssyrk.ssyrk(uplo, trans, n, k, alpha, a, offseta, lda, beta, c, offsetc, ldc); } protected void dtbmvK(String uplo, String trans, String diag, int n, int k, double[] a, int offseta, int lda, double[] x, int offsetx, int incx) { - f2j.dtbmv(uplo, trans, diag, n, k, a, offseta, lda, x, offsetx, incx); + org.netlib.blas.Dtbmv.dtbmv(uplo, trans, diag, n, k, a, offseta, lda, x, offsetx, incx); } protected void stbmvK(String uplo, String trans, String diag, int n, int k, float[] a, int offseta, int lda, float[] x, int offsetx, int incx) { - f2j.stbmv(uplo, trans, diag, n, k, a, offseta, lda, x, offsetx, incx); + org.netlib.blas.Stbmv.stbmv(uplo, trans, diag, n, k, a, offseta, lda, x, offsetx, incx); } protected void dtbsvK(String uplo, String trans, String diag, int n, int k, double[] a, int offseta, int lda, double[] x, int offsetx, int incx) { - f2j.dtbsv(uplo, trans, diag, n, k, a, offseta, lda, x, offsetx, incx); + org.netlib.blas.Dtbsv.dtbsv(uplo, trans, diag, n, k, a, offseta, lda, x, offsetx, incx); } protected void stbsvK(String uplo, String trans, String diag, int n, int k, float[] a, int offseta, int lda, float[] x, int offsetx, int incx) { - f2j.stbsv(uplo, trans, diag, n, k, a, offseta, lda, x, offsetx, incx); + org.netlib.blas.Stbsv.stbsv(uplo, trans, diag, n, k, a, offseta, lda, x, offsetx, incx); } protected void dtpmvK(String uplo, String trans, String diag, int n, double[] a, int offseta, double[] x, int offsetx, int incx) { - f2j.dtpmv(uplo, trans, diag, n, a, offseta, x, offsetx, incx); + org.netlib.blas.Dtpmv.dtpmv(uplo, trans, diag, n, a, offseta, x, offsetx, incx); } protected void stpmvK(String uplo, String trans, String diag, int n, float[] a, int offseta, float[] x, int offsetx, int incx) { - f2j.stpmv(uplo, trans, diag, n, a, offseta, x, offsetx, incx); + org.netlib.blas.Stpmv.stpmv(uplo, trans, diag, n, a, offseta, x, offsetx, incx); } protected void dtpsvK(String uplo, String trans, String diag, int n, double[] a, int offseta, double[] x, int offsetx, int incx) { - f2j.dtpsv(uplo, trans, diag, n, a, offseta, x, offsetx, incx); + org.netlib.blas.Dtpsv.dtpsv(uplo, trans, diag, n, a, offseta, x, offsetx, incx); } protected void stpsvK(String uplo, String trans, String diag, int n, float[] a, int offseta, float[] x, int offsetx, int incx) { - f2j.stpsv(uplo, trans, diag, n, a, offseta, x, offsetx, incx); + org.netlib.blas.Stpsv.stpsv(uplo, trans, diag, n, a, offseta, x, offsetx, incx); } protected void dtrmmK(String side, String uplo, String transa, String diag, int m, int n, double alpha, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb) { - f2j.dtrmm(side, uplo, transa, diag, m, n, alpha, a, offseta, lda, b, offsetb, ldb); + org.netlib.blas.Dtrmm.dtrmm(side, uplo, transa, diag, m, n, alpha, a, offseta, lda, b, offsetb, ldb); } protected void strmmK(String side, String uplo, String transa, String diag, int m, int n, float alpha, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb) { - f2j.strmm(side, uplo, transa, diag, m, n, alpha, a, offseta, lda, b, offsetb, ldb); + org.netlib.blas.Strmm.strmm(side, uplo, transa, diag, m, n, alpha, a, offseta, lda, b, offsetb, ldb); } protected void dtrmvK(String uplo, String trans, String diag, int n, double[] a, int offseta, int lda, double[] x, int offsetx, int incx) { - f2j.dtrmv(uplo, trans, diag, n, a, offseta, lda, x, offsetx, incx); + org.netlib.blas.Dtrmv.dtrmv(uplo, trans, diag, n, a, offseta, lda, x, offsetx, incx); } protected void strmvK(String uplo, String trans, String diag, int n, float[] a, int offseta, int lda, float[] x, int offsetx, int incx) { - f2j.strmv(uplo, trans, diag, n, a, offseta, lda, x, offsetx, incx); + org.netlib.blas.Strmv.strmv(uplo, trans, diag, n, a, offseta, lda, x, offsetx, incx); } protected void dtrsmK(String side, String uplo, String transa, String diag, int m, int n, double alpha, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb) { - f2j.dtrsm(side, uplo, transa, diag, m, n, alpha, a, offseta, lda, b, offsetb, ldb); + org.netlib.blas.Dtrsm.dtrsm(side, uplo, transa, diag, m, n, alpha, a, offseta, lda, b, offsetb, ldb); } protected void strsmK(String side, String uplo, String transa, String diag, int m, int n, float alpha, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb) { - f2j.strsm(side, uplo, transa, diag, m, n, alpha, a, offseta, lda, b, offsetb, ldb); + org.netlib.blas.Strsm.strsm(side, uplo, transa, diag, m, n, alpha, a, offseta, lda, b, offsetb, ldb); } protected void dtrsvK(String uplo, String trans, String diag, int n, double[] a, int offseta, int lda, double[] x, int offsetx, int incx) { - f2j.dtrsv(uplo, trans, diag, n, a, offseta, lda, x, offsetx, incx); + org.netlib.blas.Dtrsv.dtrsv(uplo, trans, diag, n, a, offseta, lda, x, offsetx, incx); } protected void strsvK(String uplo, String trans, String diag, int n, float[] a, int offseta, int lda, float[] x, int offsetx, int incx) { - f2j.strsv(uplo, trans, diag, n, a, offseta, lda, x, offsetx, incx); + org.netlib.blas.Strsv.strsv(uplo, trans, diag, n, a, offseta, lda, x, offsetx, incx); } protected int idamaxK(int n, double[] x, int offsetx, int incx) { //FIXME: figure out why f2j is faster than previous implementation - return f2j.idamax(n, x, offsetx, incx) - 1; + return org.netlib.blas.Idamax.idamax(n, x, offsetx, incx) - 1; } protected int isamaxK(int n, float[] x, int offsetx, int incx) { //FIXME: figure out why f2j is faster than previous implementation - return f2j.isamax(n, x, offsetx, incx) - 1; + return org.netlib.blas.Isamax.isamax(n, x, offsetx, incx) - 1; } } diff --git a/blas/src/main/java/dev/ludovic/netlib/blas/NetlibF2jBLAS.java b/blas/src/main/java/dev/ludovic/netlib/blas/NetlibF2jBLAS.java deleted file mode 100644 index 79c2c5ab..00000000 --- a/blas/src/main/java/dev/ludovic/netlib/blas/NetlibF2jBLAS.java +++ /dev/null @@ -1,54 +0,0 @@ -/* - * Copyright 2020, 2021, Ludovic Henry - * - * Permission is hereby granted, free of charge, to any person obtaining a copy - * of this software and associated documentation files (the "Software"), to deal - * in the Software without restriction, including without limitation the rights - * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell - * copies of the Software, and to permit persons to whom the Software is - * furnished to do so, subject to the following conditions: - * - * The above copyright notice and this permission notice shall be included in - * all copies or substantial portions of the Software. - * - * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR - * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, - * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE - * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER - * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, - * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE - * SOFTWARE. - * - * Please contact git@ludovic.dev or visit ludovic.dev if you need additional - * information or have any questions. - */ - -package dev.ludovic.netlib.blas; - -import dev.ludovic.netlib.BLAS; - -public final class NetlibF2jBLAS extends NetlibWrapper implements dev.ludovic.netlib.JavaBLAS { - - private static final NetlibF2jBLAS instance; - - static { - instance = new NetlibF2jBLAS(new com.github.fommil.netlib.F2jBLAS()); - } - - protected NetlibF2jBLAS(com.github.fommil.netlib.BLAS _blas) { - super(_blas); - } - - public static dev.ludovic.netlib.JavaBLAS getInstance() { - return instance; - } - - protected int idamaxK(int n, double[] x, int offsetx, int incx) { - // F2j returns 1-based index because that's how Fortran works - return super.idamaxK(n, x, offsetx, incx) - 1; - } - protected int isamaxK(int n, float[] x, int offsetx, int incx) { - // F2j returns 1-based index because that's how Fortran works - return super.isamaxK(n, x, offsetx, incx) - 1; - } -} diff --git a/blas/src/main/java/dev/ludovic/netlib/blas/NetlibNativeBLAS.java b/blas/src/main/java/dev/ludovic/netlib/blas/NetlibNativeBLAS.java deleted file mode 100644 index a4e6ad8c..00000000 --- a/blas/src/main/java/dev/ludovic/netlib/blas/NetlibNativeBLAS.java +++ /dev/null @@ -1,49 +0,0 @@ -/* - * Copyright 2020, 2021, Ludovic Henry - * - * Permission is hereby granted, free of charge, to any person obtaining a copy - * of this software and associated documentation files (the "Software"), to deal - * in the Software without restriction, including without limitation the rights - * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell - * copies of the Software, and to permit persons to whom the Software is - * furnished to do so, subject to the following conditions: - * - * The above copyright notice and this permission notice shall be included in - * all copies or substantial portions of the Software. - * - * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR - * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, - * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE - * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER - * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, - * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE - * SOFTWARE. - * - * Please contact git@ludovic.dev or visit ludovic.dev if you need additional - * information or have any questions. - */ - -package dev.ludovic.netlib.blas; - -import dev.ludovic.netlib.BLAS; - -public final class NetlibNativeBLAS extends NetlibWrapper implements dev.ludovic.netlib.NativeBLAS { - - private static final NetlibNativeBLAS instance; - - static { - com.github.fommil.netlib.BLAS blas = com.github.fommil.netlib.BLAS.getInstance(); - if (blas instanceof com.github.fommil.netlib.F2jBLAS) { - throw new RuntimeException("Unable to load native implementation"); - } - instance = new NetlibNativeBLAS(blas); - } - - protected NetlibNativeBLAS(com.github.fommil.netlib.BLAS _blas) { - super(_blas); - } - - public static dev.ludovic.netlib.NativeBLAS getInstance() { - return instance; - } -} diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/BLASTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/BLASTest.java index 93ea1af3..1639640f 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/BLASTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/BLASTest.java @@ -37,24 +37,13 @@ public class BLASTest { final static double depsilon = 1e-11d; final static float sepsilon = 1e-3f; - final static BLAS f2j = dev.ludovic.netlib.blas.NetlibF2jBLAS.getInstance(); + final static BLAS f2j = dev.ludovic.netlib.blas.F2jBLAS.getInstance(); private static Stream BLASImplementations() { Stream instances = Stream.of( - Arguments.of(dev.ludovic.netlib.blas.NetlibF2jBLAS.getInstance()) - ); - - try { - instances = Stream.concat(instances, Stream.of( - Arguments.of(dev.ludovic.netlib.blas.NetlibNativeBLAS.getInstance()) - )); - } catch (ExceptionInInitializerError e) { - } catch (NoClassDefFoundError e) { - } - - instances = Stream.concat(instances, Stream.of( + Arguments.of(dev.ludovic.netlib.blas.F2jBLAS.getInstance()), Arguments.of(dev.ludovic.netlib.blas.JNIBLAS.getInstance()) - )); + ); String[] fullVersion = System.getProperty("java.version").split("[+.\\-]+", 2); int major = Integer.parseInt(fullVersion[0]); diff --git a/lapack/pom.xml b/lapack/pom.xml index dc187acc..871de9fa 100644 --- a/lapack/pom.xml +++ b/lapack/pom.xml @@ -41,14 +41,13 @@ information or have any questions. 5.5.2 - 1.1.2 - com.github.fommil.netlib - core - ${netlib.java.version} + net.sourceforge.f2j + arpack_combined_all + 0.1 @@ -64,4 +63,12 @@ information or have any questions. test + + + + + maven-antrun-plugin + + + diff --git a/lapack/src/main/java/dev/ludovic/netlib/JavaLAPACK.java b/lapack/src/main/java/dev/ludovic/netlib/JavaLAPACK.java index 9b60a174..bb3a6fc0 100644 --- a/lapack/src/main/java/dev/ludovic/netlib/JavaLAPACK.java +++ b/lapack/src/main/java/dev/ludovic/netlib/JavaLAPACK.java @@ -28,6 +28,6 @@ public interface JavaLAPACK extends LAPACK { public static JavaLAPACK getInstance() { - return dev.ludovic.netlib.lapack.NetlibF2jLAPACK.getInstance(); + return dev.ludovic.netlib.lapack.F2jLAPACK.getInstance(); } } diff --git a/lapack/src/main/java/dev/ludovic/netlib/NativeLAPACK.java b/lapack/src/main/java/dev/ludovic/netlib/NativeLAPACK.java index 7dab083c..0cda29f9 100644 --- a/lapack/src/main/java/dev/ludovic/netlib/NativeLAPACK.java +++ b/lapack/src/main/java/dev/ludovic/netlib/NativeLAPACK.java @@ -32,9 +32,9 @@ public interface NativeLAPACK extends LAPACK { public static NativeLAPACK getInstance() { try { - return dev.ludovic.netlib.lapack.NetlibNativeLAPACK.getInstance(); + return dev.ludovic.netlib.lapack.JNILAPACK.getInstance(); } catch (Throwable t) { - Logger.getLogger(NativeLAPACK.class.getName()).warning("Failed to load implementation from:dev.ludovic.netlib.lapack.NetlibNativeLAPACK"); + Logger.getLogger(NativeLAPACK.class.getName()).warning("Failed to load implementation from:dev.ludovic.netlib.lapack.JNILAPACK"); } throw new RuntimeException("Unable to load native implementation"); } diff --git a/lapack/src/main/java/dev/ludovic/netlib/lapack/NetlibWrapper.java b/lapack/src/main/java/dev/ludovic/netlib/lapack/F2jLAPACK.java similarity index 64% rename from lapack/src/main/java/dev/ludovic/netlib/lapack/NetlibWrapper.java rename to lapack/src/main/java/dev/ludovic/netlib/lapack/F2jLAPACK.java index e24025d6..3c85f8db 100644 --- a/lapack/src/main/java/dev/ludovic/netlib/lapack/NetlibWrapper.java +++ b/lapack/src/main/java/dev/ludovic/netlib/lapack/F2jLAPACK.java @@ -27,2903 +27,2905 @@ import dev.ludovic.netlib.LAPACK; -abstract class NetlibWrapper extends AbstractLAPACK { +public final class F2jLAPACK extends AbstractLAPACK implements dev.ludovic.netlib.JavaLAPACK { - private final com.github.fommil.netlib.LAPACK lapack; + private static final F2jLAPACK instance = new F2jLAPACK(); - protected NetlibWrapper(com.github.fommil.netlib.LAPACK _lapack) { - lapack = _lapack; + protected F2jLAPACK() {} + + public static dev.ludovic.netlib.JavaLAPACK getInstance() { + return instance; } protected void dbdsdcK(String uplo, String compq, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, double[] q, int _q_offset, int[] iq, int _iq_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dbdsdc(uplo, compq, n, d, _d_offset, e, _e_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, q, _q_offset, iq, _iq_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dbdsdc.dbdsdc(uplo, compq, n, d, _d_offset, e, _e_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, q, _q_offset, iq, _iq_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void dbdsqrK(String uplo, int n, int ncvt, int nru, int ncc, double[] d, int _d_offset, double[] e, int _e_offset, double[] vt, int _vt_offset, int ldvt, double[] u, int _u_offset, int ldu, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dbdsqr(uplo, n, ncvt, nru, ncc, d, _d_offset, e, _e_offset, vt, _vt_offset, ldvt, u, _u_offset, ldu, c, _c_offset, Ldc, work, _work_offset, info); + org.netlib.lapack.Dbdsqr.dbdsqr(uplo, n, ncvt, nru, ncc, d, _d_offset, e, _e_offset, vt, _vt_offset, ldvt, u, _u_offset, ldu, c, _c_offset, Ldc, work, _work_offset, info); } protected void ddisnaK(String job, int m, int n, double[] d, int _d_offset, double[] sep, int _sep_offset, org.netlib.util.intW info) { - lapack.ddisna(job, m, n, d, _d_offset, sep, _sep_offset, info); + org.netlib.lapack.Ddisna.ddisna(job, m, n, d, _d_offset, sep, _sep_offset, info); } protected void dgbbrdK(String vect, int m, int n, int ncc, int kl, int ku, double[] ab, int _ab_offset, int ldab, double[] d, int _d_offset, double[] e, int _e_offset, double[] q, int _q_offset, int ldq, double[] pt, int _pt_offset, int ldpt, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dgbbrd(vect, m, n, ncc, kl, ku, ab, _ab_offset, ldab, d, _d_offset, e, _e_offset, q, _q_offset, ldq, pt, _pt_offset, ldpt, c, _c_offset, Ldc, work, _work_offset, info); + org.netlib.lapack.Dgbbrd.dgbbrd(vect, m, n, ncc, kl, ku, ab, _ab_offset, ldab, d, _d_offset, e, _e_offset, q, _q_offset, ldq, pt, _pt_offset, ldpt, c, _c_offset, Ldc, work, _work_offset, info); } protected void dgbconK(String norm, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dgbcon(norm, n, kl, ku, ab, _ab_offset, ldab, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dgbcon.dgbcon(norm, n, kl, ku, ab, _ab_offset, ldab, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); } protected void dgbequK(int m, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, double[] r, int _r_offset, double[] c, int _c_offset, org.netlib.util.doubleW rowcnd, org.netlib.util.doubleW colcnd, org.netlib.util.doubleW amax, org.netlib.util.intW info) { - lapack.dgbequ(m, n, kl, ku, ab, _ab_offset, ldab, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, info); + org.netlib.lapack.Dgbequ.dgbequ(m, n, kl, ku, ab, _ab_offset, ldab, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, info); } protected void dgbrfsK(String trans, int n, int kl, int ku, int nrhs, double[] ab, int _ab_offset, int ldab, double[] afb, int _afb_offset, int ldafb, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dgbrfs(trans, n, kl, ku, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dgbrfs.dgbrfs(trans, n, kl, ku, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void dgbsvK(int n, int kl, int ku, int nrhs, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.dgbsv(n, kl, ku, nrhs, ab, _ab_offset, ldab, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + org.netlib.lapack.Dgbsv.dgbsv(n, kl, ku, nrhs, ab, _ab_offset, ldab, ipiv, _ipiv_offset, b, _b_offset, ldb, info); } protected void dgbsvxK(String fact, String trans, int n, int kl, int ku, int nrhs, double[] ab, int _ab_offset, int ldab, double[] afb, int _afb_offset, int ldafb, int[] ipiv, int _ipiv_offset, org.netlib.util.StringW equed, double[] r, int _r_offset, double[] c, int _c_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dgbsvx(fact, trans, n, kl, ku, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, ipiv, _ipiv_offset, equed, r, _r_offset, c, _c_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dgbsvx.dgbsvx(fact, trans, n, kl, ku, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, ipiv, _ipiv_offset, equed, r, _r_offset, c, _c_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void dgbtf2K(int m, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { - lapack.dgbtf2(m, n, kl, ku, ab, _ab_offset, ldab, ipiv, _ipiv_offset, info); + org.netlib.lapack.Dgbtf2.dgbtf2(m, n, kl, ku, ab, _ab_offset, ldab, ipiv, _ipiv_offset, info); } protected void dgbtrfK(int m, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { - lapack.dgbtrf(m, n, kl, ku, ab, _ab_offset, ldab, ipiv, _ipiv_offset, info); + org.netlib.lapack.Dgbtrf.dgbtrf(m, n, kl, ku, ab, _ab_offset, ldab, ipiv, _ipiv_offset, info); } protected void dgbtrsK(String trans, int n, int kl, int ku, int nrhs, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.dgbtrs(trans, n, kl, ku, nrhs, ab, _ab_offset, ldab, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + org.netlib.lapack.Dgbtrs.dgbtrs(trans, n, kl, ku, nrhs, ab, _ab_offset, ldab, ipiv, _ipiv_offset, b, _b_offset, ldb, info); } protected void dgebakK(String job, String side, int n, int ilo, int ihi, double[] scale, int _scale_offset, int m, double[] v, int _v_offset, int ldv, org.netlib.util.intW info) { - lapack.dgebak(job, side, n, ilo, ihi, scale, _scale_offset, m, v, _v_offset, ldv, info); + org.netlib.lapack.Dgebak.dgebak(job, side, n, ilo, ihi, scale, _scale_offset, m, v, _v_offset, ldv, info); } protected void dgebalK(String job, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] scale, int _scale_offset, org.netlib.util.intW info) { - lapack.dgebal(job, n, a, _a_offset, lda, ilo, ihi, scale, _scale_offset, info); + org.netlib.lapack.Dgebal.dgebal(job, n, a, _a_offset, lda, ilo, ihi, scale, _scale_offset, info); } protected void dgebd2K(int m, int n, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tauq, int _tauq_offset, double[] taup, int _taup_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dgebd2(m, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tauq, _tauq_offset, taup, _taup_offset, work, _work_offset, info); + org.netlib.lapack.Dgebd2.dgebd2(m, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tauq, _tauq_offset, taup, _taup_offset, work, _work_offset, info); } protected void dgebrdK(int m, int n, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tauq, int _tauq_offset, double[] taup, int _taup_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dgebrd(m, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tauq, _tauq_offset, taup, _taup_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Dgebrd.dgebrd(m, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tauq, _tauq_offset, taup, _taup_offset, work, _work_offset, lwork, info); } protected void dgeconK(String norm, int n, double[] a, int _a_offset, int lda, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dgecon(norm, n, a, _a_offset, lda, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dgecon.dgecon(norm, n, a, _a_offset, lda, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); } protected void dgeequK(int m, int n, double[] a, int _a_offset, int lda, double[] r, int _r_offset, double[] c, int _c_offset, org.netlib.util.doubleW rowcnd, org.netlib.util.doubleW colcnd, org.netlib.util.doubleW amax, org.netlib.util.intW info) { - lapack.dgeequ(m, n, a, _a_offset, lda, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, info); + org.netlib.lapack.Dgeequ.dgeequ(m, n, a, _a_offset, lda, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, info); } protected void dgeesK(String jobvs, String sort, java.lang.Object select, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW sdim, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vs, int _vs_offset, int ldvs, double[] work, int _work_offset, int lwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info) { - lapack.dgees(jobvs, sort, select, n, a, _a_offset, lda, sdim, wr, _wr_offset, wi, _wi_offset, vs, _vs_offset, ldvs, work, _work_offset, lwork, bwork, _bwork_offset, info); + org.netlib.lapack.Dgees.dgees(jobvs, sort, select, n, a, _a_offset, lda, sdim, wr, _wr_offset, wi, _wi_offset, vs, _vs_offset, ldvs, work, _work_offset, lwork, bwork, _bwork_offset, info); } protected void dgeesxK(String jobvs, String sort, java.lang.Object select, String sense, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW sdim, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vs, int _vs_offset, int ldvs, org.netlib.util.doubleW rconde, org.netlib.util.doubleW rcondv, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info) { - lapack.dgeesx(jobvs, sort, select, sense, n, a, _a_offset, lda, sdim, wr, _wr_offset, wi, _wi_offset, vs, _vs_offset, ldvs, rconde, rcondv, work, _work_offset, lwork, iwork, _iwork_offset, liwork, bwork, _bwork_offset, info); + org.netlib.lapack.Dgeesx.dgeesx(jobvs, sort, select, sense, n, a, _a_offset, lda, sdim, wr, _wr_offset, wi, _wi_offset, vs, _vs_offset, ldvs, rconde, rcondv, work, _work_offset, lwork, iwork, _iwork_offset, liwork, bwork, _bwork_offset, info); } protected void dgeevK(String jobvl, String jobvr, int n, double[] a, int _a_offset, int lda, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dgeev(jobvl, jobvr, n, a, _a_offset, lda, wr, _wr_offset, wi, _wi_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, work, _work_offset, lwork, info); + org.netlib.lapack.Dgeev.dgeev(jobvl, jobvr, n, a, _a_offset, lda, wr, _wr_offset, wi, _wi_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, work, _work_offset, lwork, info); } protected void dgeevxK(String balanc, String jobvl, String jobvr, String sense, int n, double[] a, int _a_offset, int lda, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] scale, int _scale_offset, org.netlib.util.doubleW abnrm, double[] rconde, int _rconde_offset, double[] rcondv, int _rcondv_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dgeevx(balanc, jobvl, jobvr, sense, n, a, _a_offset, lda, wr, _wr_offset, wi, _wi_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, ilo, ihi, scale, _scale_offset, abnrm, rconde, _rconde_offset, rcondv, _rcondv_offset, work, _work_offset, lwork, iwork, _iwork_offset, info); + org.netlib.lapack.Dgeevx.dgeevx(balanc, jobvl, jobvr, sense, n, a, _a_offset, lda, wr, _wr_offset, wi, _wi_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, ilo, ihi, scale, _scale_offset, abnrm, rconde, _rconde_offset, rcondv, _rcondv_offset, work, _work_offset, lwork, iwork, _iwork_offset, info); } protected void dgegsK(String jobvsl, String jobvsr, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vsl, int _vsl_offset, int ldvsl, double[] vsr, int _vsr_offset, int ldvsr, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dgegs(jobvsl, jobvsr, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vsl, _vsl_offset, ldvsl, vsr, _vsr_offset, ldvsr, work, _work_offset, lwork, info); + org.netlib.lapack.Dgegs.dgegs(jobvsl, jobvsr, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vsl, _vsl_offset, ldvsl, vsr, _vsr_offset, ldvsr, work, _work_offset, lwork, info); } protected void dgegvK(String jobvl, String jobvr, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dgegv(jobvl, jobvr, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, work, _work_offset, lwork, info); + org.netlib.lapack.Dgegv.dgegv(jobvl, jobvr, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, work, _work_offset, lwork, info); } protected void dgehd2K(int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dgehd2(n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + org.netlib.lapack.Dgehd2.dgehd2(n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); } protected void dgehrdK(int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dgehrd(n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Dgehrd.dgehrd(n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); } protected void dgelq2K(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dgelq2(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + org.netlib.lapack.Dgelq2.dgelq2(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); } protected void dgelqfK(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dgelqf(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Dgelqf.dgelqf(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); } protected void dgelsK(String trans, int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dgels(trans, m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, work, _work_offset, lwork, info); + org.netlib.lapack.Dgels.dgels(trans, m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, work, _work_offset, lwork, info); } protected void dgelsdK(int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] s, int _s_offset, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dgelsd(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, s, _s_offset, rcond, rank, work, _work_offset, lwork, iwork, _iwork_offset, info); + org.netlib.lapack.Dgelsd.dgelsd(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, s, _s_offset, rcond, rank, work, _work_offset, lwork, iwork, _iwork_offset, info); } protected void dgelssK(int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] s, int _s_offset, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dgelss(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, s, _s_offset, rcond, rank, work, _work_offset, lwork, info); + org.netlib.lapack.Dgelss.dgelss(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, s, _s_offset, rcond, rank, work, _work_offset, lwork, info); } protected void dgelsxK(int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, int[] jpvt, int _jpvt_offset, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dgelsx(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, jpvt, _jpvt_offset, rcond, rank, work, _work_offset, info); + org.netlib.lapack.Dgelsx.dgelsx(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, jpvt, _jpvt_offset, rcond, rank, work, _work_offset, info); } protected void dgelsyK(int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, int[] jpvt, int _jpvt_offset, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dgelsy(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, jpvt, _jpvt_offset, rcond, rank, work, _work_offset, lwork, info); + org.netlib.lapack.Dgelsy.dgelsy(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, jpvt, _jpvt_offset, rcond, rank, work, _work_offset, lwork, info); } protected void dgeql2K(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dgeql2(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + org.netlib.lapack.Dgeql2.dgeql2(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); } protected void dgeqlfK(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dgeqlf(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Dgeqlf.dgeqlf(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); } protected void dgeqp3K(int m, int n, double[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dgeqp3(m, n, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Dgeqp3.dgeqp3(m, n, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, work, _work_offset, lwork, info); } protected void dgeqpfK(int m, int n, double[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dgeqpf(m, n, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, work, _work_offset, info); + org.netlib.lapack.Dgeqpf.dgeqpf(m, n, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, work, _work_offset, info); } protected void dgeqr2K(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dgeqr2(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + org.netlib.lapack.Dgeqr2.dgeqr2(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); } protected void dgeqrfK(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dgeqrf(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Dgeqrf.dgeqrf(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); } protected void dgerfsK(String trans, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dgerfs(trans, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dgerfs.dgerfs(trans, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void dgerq2K(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dgerq2(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + org.netlib.lapack.Dgerq2.dgerq2(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); } protected void dgerqfK(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dgerqf(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Dgerqf.dgerqf(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); } protected void dgesc2K(int n, double[] a, int _a_offset, int lda, double[] rhs, int _rhs_offset, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset, org.netlib.util.doubleW scale) { - lapack.dgesc2(n, a, _a_offset, lda, rhs, _rhs_offset, ipiv, _ipiv_offset, jpiv, _jpiv_offset, scale); + org.netlib.lapack.Dgesc2.dgesc2(n, a, _a_offset, lda, rhs, _rhs_offset, ipiv, _ipiv_offset, jpiv, _jpiv_offset, scale); } protected void dgesddK(String jobz, int m, int n, double[] a, int _a_offset, int lda, double[] s, int _s_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dgesdd(jobz, m, n, a, _a_offset, lda, s, _s_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, work, _work_offset, lwork, iwork, _iwork_offset, info); + org.netlib.lapack.Dgesdd.dgesdd(jobz, m, n, a, _a_offset, lda, s, _s_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, work, _work_offset, lwork, iwork, _iwork_offset, info); } protected void dgesvK(int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.dgesv(n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + org.netlib.lapack.Dgesv.dgesv(n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, info); } protected void dgesvdK(String jobu, String jobvt, int m, int n, double[] a, int _a_offset, int lda, double[] s, int _s_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dgesvd(jobu, jobvt, m, n, a, _a_offset, lda, s, _s_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, work, _work_offset, lwork, info); + org.netlib.lapack.Dgesvd.dgesvd(jobu, jobvt, m, n, a, _a_offset, lda, s, _s_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, work, _work_offset, lwork, info); } protected void dgesvxK(String fact, String trans, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, org.netlib.util.StringW equed, double[] r, int _r_offset, double[] c, int _c_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dgesvx(fact, trans, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, equed, r, _r_offset, c, _c_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dgesvx.dgesvx(fact, trans, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, equed, r, _r_offset, c, _c_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void dgetc2K(int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset, org.netlib.util.intW info) { - lapack.dgetc2(n, a, _a_offset, lda, ipiv, _ipiv_offset, jpiv, _jpiv_offset, info); + org.netlib.lapack.Dgetc2.dgetc2(n, a, _a_offset, lda, ipiv, _ipiv_offset, jpiv, _jpiv_offset, info); } protected void dgetf2K(int m, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { - lapack.dgetf2(m, n, a, _a_offset, lda, ipiv, _ipiv_offset, info); + org.netlib.lapack.Dgetf2.dgetf2(m, n, a, _a_offset, lda, ipiv, _ipiv_offset, info); } protected void dgetrfK(int m, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { - lapack.dgetrf(m, n, a, _a_offset, lda, ipiv, _ipiv_offset, info); + org.netlib.lapack.Dgetrf.dgetrf(m, n, a, _a_offset, lda, ipiv, _ipiv_offset, info); } protected void dgetriK(int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dgetri(n, a, _a_offset, lda, ipiv, _ipiv_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Dgetri.dgetri(n, a, _a_offset, lda, ipiv, _ipiv_offset, work, _work_offset, lwork, info); } protected void dgetrsK(String trans, int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.dgetrs(trans, n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + org.netlib.lapack.Dgetrs.dgetrs(trans, n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, info); } protected void dggbakK(String job, String side, int n, int ilo, int ihi, double[] lscale, int _lscale_offset, double[] rscale, int _rscale_offset, int m, double[] v, int _v_offset, int ldv, org.netlib.util.intW info) { - lapack.dggbak(job, side, n, ilo, ihi, lscale, _lscale_offset, rscale, _rscale_offset, m, v, _v_offset, ldv, info); + org.netlib.lapack.Dggbak.dggbak(job, side, n, ilo, ihi, lscale, _lscale_offset, rscale, _rscale_offset, m, v, _v_offset, ldv, info); } protected void dggbalK(String job, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] lscale, int _lscale_offset, double[] rscale, int _rscale_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dggbal(job, n, a, _a_offset, lda, b, _b_offset, ldb, ilo, ihi, lscale, _lscale_offset, rscale, _rscale_offset, work, _work_offset, info); + org.netlib.lapack.Dggbal.dggbal(job, n, a, _a_offset, lda, b, _b_offset, ldb, ilo, ihi, lscale, _lscale_offset, rscale, _rscale_offset, work, _work_offset, info); } protected void dggesK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW sdim, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vsl, int _vsl_offset, int ldvsl, double[] vsr, int _vsr_offset, int ldvsr, double[] work, int _work_offset, int lwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info) { - lapack.dgges(jobvsl, jobvsr, sort, selctg, n, a, _a_offset, lda, b, _b_offset, ldb, sdim, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vsl, _vsl_offset, ldvsl, vsr, _vsr_offset, ldvsr, work, _work_offset, lwork, bwork, _bwork_offset, info); + org.netlib.lapack.Dgges.dgges(jobvsl, jobvsr, sort, selctg, n, a, _a_offset, lda, b, _b_offset, ldb, sdim, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vsl, _vsl_offset, ldvsl, vsr, _vsr_offset, ldvsr, work, _work_offset, lwork, bwork, _bwork_offset, info); } protected void dggesxK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, String sense, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW sdim, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vsl, int _vsl_offset, int ldvsl, double[] vsr, int _vsr_offset, int ldvsr, double[] rconde, int _rconde_offset, double[] rcondv, int _rcondv_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info) { - lapack.dggesx(jobvsl, jobvsr, sort, selctg, sense, n, a, _a_offset, lda, b, _b_offset, ldb, sdim, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vsl, _vsl_offset, ldvsl, vsr, _vsr_offset, ldvsr, rconde, _rconde_offset, rcondv, _rcondv_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, bwork, _bwork_offset, info); + org.netlib.lapack.Dggesx.dggesx(jobvsl, jobvsr, sort, selctg, sense, n, a, _a_offset, lda, b, _b_offset, ldb, sdim, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vsl, _vsl_offset, ldvsl, vsr, _vsr_offset, ldvsr, rconde, _rconde_offset, rcondv, _rcondv_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, bwork, _bwork_offset, info); } protected void dggevK(String jobvl, String jobvr, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dggev(jobvl, jobvr, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, work, _work_offset, lwork, info); + org.netlib.lapack.Dggev.dggev(jobvl, jobvr, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, work, _work_offset, lwork, info); } protected void dggevxK(String balanc, String jobvl, String jobvr, String sense, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] lscale, int _lscale_offset, double[] rscale, int _rscale_offset, org.netlib.util.doubleW abnrm, org.netlib.util.doubleW bbnrm, double[] rconde, int _rconde_offset, double[] rcondv, int _rcondv_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info) { - lapack.dggevx(balanc, jobvl, jobvr, sense, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, ilo, ihi, lscale, _lscale_offset, rscale, _rscale_offset, abnrm, bbnrm, rconde, _rconde_offset, rcondv, _rcondv_offset, work, _work_offset, lwork, iwork, _iwork_offset, bwork, _bwork_offset, info); + org.netlib.lapack.Dggevx.dggevx(balanc, jobvl, jobvr, sense, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, ilo, ihi, lscale, _lscale_offset, rscale, _rscale_offset, abnrm, bbnrm, rconde, _rconde_offset, rcondv, _rcondv_offset, work, _work_offset, lwork, iwork, _iwork_offset, bwork, _bwork_offset, info); } protected void dggglmK(int n, int m, int p, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] d, int _d_offset, double[] x, int _x_offset, double[] y, int _y_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dggglm(n, m, p, a, _a_offset, lda, b, _b_offset, ldb, d, _d_offset, x, _x_offset, y, _y_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Dggglm.dggglm(n, m, p, a, _a_offset, lda, b, _b_offset, ldb, d, _d_offset, x, _x_offset, y, _y_offset, work, _work_offset, lwork, info); } protected void dgghrdK(String compq, String compz, int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, org.netlib.util.intW info) { - lapack.dgghrd(compq, compz, n, ilo, ihi, a, _a_offset, lda, b, _b_offset, ldb, q, _q_offset, ldq, z, _z_offset, ldz, info); + org.netlib.lapack.Dgghrd.dgghrd(compq, compz, n, ilo, ihi, a, _a_offset, lda, b, _b_offset, ldb, q, _q_offset, ldq, z, _z_offset, ldz, info); } protected void dgglseK(int m, int n, int p, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] c, int _c_offset, double[] d, int _d_offset, double[] x, int _x_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dgglse(m, n, p, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, d, _d_offset, x, _x_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Dgglse.dgglse(m, n, p, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, d, _d_offset, x, _x_offset, work, _work_offset, lwork, info); } protected void dggqrfK(int n, int m, int p, double[] a, int _a_offset, int lda, double[] taua, int _taua_offset, double[] b, int _b_offset, int ldb, double[] taub, int _taub_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dggqrf(n, m, p, a, _a_offset, lda, taua, _taua_offset, b, _b_offset, ldb, taub, _taub_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Dggqrf.dggqrf(n, m, p, a, _a_offset, lda, taua, _taua_offset, b, _b_offset, ldb, taub, _taub_offset, work, _work_offset, lwork, info); } protected void dggrqfK(int m, int p, int n, double[] a, int _a_offset, int lda, double[] taua, int _taua_offset, double[] b, int _b_offset, int ldb, double[] taub, int _taub_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dggrqf(m, p, n, a, _a_offset, lda, taua, _taua_offset, b, _b_offset, ldb, taub, _taub_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Dggrqf.dggrqf(m, p, n, a, _a_offset, lda, taua, _taua_offset, b, _b_offset, ldb, taub, _taub_offset, work, _work_offset, lwork, info); } protected void dggsvdK(String jobu, String jobv, String jobq, int m, int n, int p, org.netlib.util.intW k, org.netlib.util.intW l, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alpha, int _alpha_offset, double[] beta, int _beta_offset, double[] u, int _u_offset, int ldu, double[] v, int _v_offset, int ldv, double[] q, int _q_offset, int ldq, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dggsvd(jobu, jobv, jobq, m, n, p, k, l, a, _a_offset, lda, b, _b_offset, ldb, alpha, _alpha_offset, beta, _beta_offset, u, _u_offset, ldu, v, _v_offset, ldv, q, _q_offset, ldq, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dggsvd.dggsvd(jobu, jobv, jobq, m, n, p, k, l, a, _a_offset, lda, b, _b_offset, ldb, alpha, _alpha_offset, beta, _beta_offset, u, _u_offset, ldu, v, _v_offset, ldv, q, _q_offset, ldq, work, _work_offset, iwork, _iwork_offset, info); } protected void dggsvpK(String jobu, String jobv, String jobq, int m, int p, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double tola, double tolb, org.netlib.util.intW k, org.netlib.util.intW l, double[] u, int _u_offset, int ldu, double[] v, int _v_offset, int ldv, double[] q, int _q_offset, int ldq, int[] iwork, int _iwork_offset, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dggsvp(jobu, jobv, jobq, m, p, n, a, _a_offset, lda, b, _b_offset, ldb, tola, tolb, k, l, u, _u_offset, ldu, v, _v_offset, ldv, q, _q_offset, ldq, iwork, _iwork_offset, tau, _tau_offset, work, _work_offset, info); + org.netlib.lapack.Dggsvp.dggsvp(jobu, jobv, jobq, m, p, n, a, _a_offset, lda, b, _b_offset, ldb, tola, tolb, k, l, u, _u_offset, ldu, v, _v_offset, ldv, q, _q_offset, ldq, iwork, _iwork_offset, tau, _tau_offset, work, _work_offset, info); } protected void dgtconK(String norm, int n, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dgtcon(norm, n, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dgtcon.dgtcon(norm, n, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); } protected void dgtrfsK(String trans, int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] dlf, int _dlf_offset, double[] df, int _df_offset, double[] duf, int _duf_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dgtrfs(trans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, dlf, _dlf_offset, df, _df_offset, duf, _duf_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dgtrfs.dgtrfs(trans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, dlf, _dlf_offset, df, _df_offset, duf, _duf_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void dgtsvK(int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.dgtsv(n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, b, _b_offset, ldb, info); + org.netlib.lapack.Dgtsv.dgtsv(n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, b, _b_offset, ldb, info); } protected void dgtsvxK(String fact, String trans, int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] dlf, int _dlf_offset, double[] df, int _df_offset, double[] duf, int _duf_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dgtsvx(fact, trans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, dlf, _dlf_offset, df, _df_offset, duf, _duf_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dgtsvx.dgtsvx(fact, trans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, dlf, _dlf_offset, df, _df_offset, duf, _duf_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void dgttrfK(int n, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { - lapack.dgttrf(n, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, info); + org.netlib.lapack.Dgttrf.dgttrf(n, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, info); } protected void dgttrsK(String trans, int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.dgttrs(trans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + org.netlib.lapack.Dgttrs.dgttrs(trans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, info); } protected void dgtts2K(int itrans, int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb) { - lapack.dgtts2(itrans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb); + org.netlib.lapack.Dgtts2.dgtts2(itrans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb); } protected void dhgeqzK(String job, String compq, String compz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] t, int _t_offset, int ldt, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dhgeqz(job, compq, compz, n, ilo, ihi, h, _h_offset, ldh, t, _t_offset, ldt, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, q, _q_offset, ldq, z, _z_offset, ldz, work, _work_offset, lwork, info); + org.netlib.lapack.Dhgeqz.dhgeqz(job, compq, compz, n, ilo, ihi, h, _h_offset, ldh, t, _t_offset, ldt, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, q, _q_offset, ldq, z, _z_offset, ldz, work, _work_offset, lwork, info); } protected void dhseinK(String side, String eigsrc, String initv, boolean[] select, int _select_offset, int n, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, double[] work, int _work_offset, int[] ifaill, int _ifaill_offset, int[] ifailr, int _ifailr_offset, org.netlib.util.intW info) { - lapack.dhsein(side, eigsrc, initv, select, _select_offset, n, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, mm, m, work, _work_offset, ifaill, _ifaill_offset, ifailr, _ifailr_offset, info); + org.netlib.lapack.Dhsein.dhsein(side, eigsrc, initv, select, _select_offset, n, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, mm, m, work, _work_offset, ifaill, _ifaill_offset, ifailr, _ifailr_offset, info); } protected void dhseqrK(String job, String compz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dhseqr(job, compz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, z, _z_offset, ldz, work, _work_offset, lwork, info); + org.netlib.lapack.Dhseqr.dhseqr(job, compz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, z, _z_offset, ldz, work, _work_offset, lwork, info); } protected boolean disnanK(double din) { - return lapack.disnan(din); + return org.netlib.lapack.Disnan.disnan(din); } protected void dlabadK(org.netlib.util.doubleW small, org.netlib.util.doubleW large) { - lapack.dlabad(small, large); + org.netlib.lapack.Dlabad.dlabad(small, large); } protected void dlabrdK(int m, int n, int nb, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tauq, int _tauq_offset, double[] taup, int _taup_offset, double[] x, int _x_offset, int ldx, double[] y, int _y_offset, int ldy) { - lapack.dlabrd(m, n, nb, a, _a_offset, lda, d, _d_offset, e, _e_offset, tauq, _tauq_offset, taup, _taup_offset, x, _x_offset, ldx, y, _y_offset, ldy); + org.netlib.lapack.Dlabrd.dlabrd(m, n, nb, a, _a_offset, lda, d, _d_offset, e, _e_offset, tauq, _tauq_offset, taup, _taup_offset, x, _x_offset, ldx, y, _y_offset, ldy); } protected void dlacn2K(int n, double[] v, int _v_offset, double[] x, int _x_offset, int[] isgn, int _isgn_offset, org.netlib.util.doubleW est, org.netlib.util.intW kase, int[] isave, int _isave_offset) { - lapack.dlacn2(n, v, _v_offset, x, _x_offset, isgn, _isgn_offset, est, kase, isave, _isave_offset); + org.netlib.lapack.Dlacn2.dlacn2(n, v, _v_offset, x, _x_offset, isgn, _isgn_offset, est, kase, isave, _isave_offset); } protected void dlaconK(int n, double[] v, int _v_offset, double[] x, int _x_offset, int[] isgn, int _isgn_offset, org.netlib.util.doubleW est, org.netlib.util.intW kase) { - lapack.dlacon(n, v, _v_offset, x, _x_offset, isgn, _isgn_offset, est, kase); + org.netlib.lapack.Dlacon.dlacon(n, v, _v_offset, x, _x_offset, isgn, _isgn_offset, est, kase); } protected void dlacpyK(String uplo, int m, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb) { - lapack.dlacpy(uplo, m, n, a, _a_offset, lda, b, _b_offset, ldb); + org.netlib.lapack.Dlacpy.dlacpy(uplo, m, n, a, _a_offset, lda, b, _b_offset, ldb); } protected void dladivK(double a, double b, double c, double d, org.netlib.util.doubleW p, org.netlib.util.doubleW q) { - lapack.dladiv(a, b, c, d, p, q); + org.netlib.lapack.Dladiv.dladiv(a, b, c, d, p, q); } protected void dlae2K(double a, double b, double c, org.netlib.util.doubleW rt1, org.netlib.util.doubleW rt2) { - lapack.dlae2(a, b, c, rt1, rt2); + org.netlib.lapack.Dlae2.dlae2(a, b, c, rt1, rt2); } protected void dlaebzK(int ijob, int nitmax, int n, int mmax, int minp, int nbmin, double abstol, double reltol, double pivmin, double[] d, int _d_offset, double[] e, int _e_offset, double[] e2, int _e2_offset, int[] nval, int _nval_offset, double[] ab, int _ab_offset, double[] c, int _c_offset, org.netlib.util.intW mout, int[] nab, int _nab_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dlaebz(ijob, nitmax, n, mmax, minp, nbmin, abstol, reltol, pivmin, d, _d_offset, e, _e_offset, e2, _e2_offset, nval, _nval_offset, ab, _ab_offset, c, _c_offset, mout, nab, _nab_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dlaebz.dlaebz(ijob, nitmax, n, mmax, minp, nbmin, abstol, reltol, pivmin, d, _d_offset, e, _e_offset, e2, _e2_offset, nval, _nval_offset, ab, _ab_offset, c, _c_offset, mout, nab, _nab_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void dlaed0K(int icompq, int qsiz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] q, int _q_offset, int ldq, double[] qstore, int _qstore_offset, int ldqs, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dlaed0(icompq, qsiz, n, d, _d_offset, e, _e_offset, q, _q_offset, ldq, qstore, _qstore_offset, ldqs, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dlaed0.dlaed0(icompq, qsiz, n, d, _d_offset, e, _e_offset, q, _q_offset, ldq, qstore, _qstore_offset, ldqs, work, _work_offset, iwork, _iwork_offset, info); } protected void dlaed1K(int n, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.doubleW rho, int cutpnt, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dlaed1(n, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, cutpnt, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dlaed1.dlaed1(n, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, cutpnt, work, _work_offset, iwork, _iwork_offset, info); } protected void dlaed2K(org.netlib.util.intW k, int n, int n1, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.doubleW rho, double[] z, int _z_offset, double[] dlamda, int _dlamda_offset, double[] w, int _w_offset, double[] q2, int _q2_offset, int[] indx, int _indx_offset, int[] indxc, int _indxc_offset, int[] indxp, int _indxp_offset, int[] coltyp, int _coltyp_offset, org.netlib.util.intW info) { - lapack.dlaed2(k, n, n1, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, z, _z_offset, dlamda, _dlamda_offset, w, _w_offset, q2, _q2_offset, indx, _indx_offset, indxc, _indxc_offset, indxp, _indxp_offset, coltyp, _coltyp_offset, info); + org.netlib.lapack.Dlaed2.dlaed2(k, n, n1, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, z, _z_offset, dlamda, _dlamda_offset, w, _w_offset, q2, _q2_offset, indx, _indx_offset, indxc, _indxc_offset, indxp, _indxp_offset, coltyp, _coltyp_offset, info); } protected void dlaed3K(int k, int n, int n1, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, double rho, double[] dlamda, int _dlamda_offset, double[] q2, int _q2_offset, int[] indx, int _indx_offset, int[] ctot, int _ctot_offset, double[] w, int _w_offset, double[] s, int _s_offset, org.netlib.util.intW info) { - lapack.dlaed3(k, n, n1, d, _d_offset, q, _q_offset, ldq, rho, dlamda, _dlamda_offset, q2, _q2_offset, indx, _indx_offset, ctot, _ctot_offset, w, _w_offset, s, _s_offset, info); + org.netlib.lapack.Dlaed3.dlaed3(k, n, n1, d, _d_offset, q, _q_offset, ldq, rho, dlamda, _dlamda_offset, q2, _q2_offset, indx, _indx_offset, ctot, _ctot_offset, w, _w_offset, s, _s_offset, info); } protected void dlaed4K(int n, int i, double[] d, int _d_offset, double[] z, int _z_offset, double[] delta, int _delta_offset, double rho, org.netlib.util.doubleW dlam, org.netlib.util.intW info) { - lapack.dlaed4(n, i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, dlam, info); + org.netlib.lapack.Dlaed4.dlaed4(n, i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, dlam, info); } protected void dlaed5K(int i, double[] d, int _d_offset, double[] z, int _z_offset, double[] delta, int _delta_offset, double rho, org.netlib.util.doubleW dlam) { - lapack.dlaed5(i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, dlam); + org.netlib.lapack.Dlaed5.dlaed5(i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, dlam); } protected void dlaed6K(int kniter, boolean orgati, double rho, double[] d, int _d_offset, double[] z, int _z_offset, double finit, org.netlib.util.doubleW tau, org.netlib.util.intW info) { - lapack.dlaed6(kniter, orgati, rho, d, _d_offset, z, _z_offset, finit, tau, info); + org.netlib.lapack.Dlaed6.dlaed6(kniter, orgati, rho, d, _d_offset, z, _z_offset, finit, tau, info); } protected void dlaed7K(int icompq, int n, int qsiz, int tlvls, int curlvl, int curpbm, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.doubleW rho, int cutpnt, double[] qstore, int _qstore_offset, int[] qptr, int _qptr_offset, int[] prmptr, int _prmptr_offset, int[] perm, int _perm_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, double[] givnum, int _givnum_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dlaed7(icompq, n, qsiz, tlvls, curlvl, curpbm, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, cutpnt, qstore, _qstore_offset, qptr, _qptr_offset, prmptr, _prmptr_offset, perm, _perm_offset, givptr, _givptr_offset, givcol, _givcol_offset, givnum, _givnum_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dlaed7.dlaed7(icompq, n, qsiz, tlvls, curlvl, curpbm, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, cutpnt, qstore, _qstore_offset, qptr, _qptr_offset, prmptr, _prmptr_offset, perm, _perm_offset, givptr, _givptr_offset, givcol, _givcol_offset, givnum, _givnum_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void dlaed8K(int icompq, org.netlib.util.intW k, int n, int qsiz, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.doubleW rho, int cutpnt, double[] z, int _z_offset, double[] dlamda, int _dlamda_offset, double[] q2, int _q2_offset, int ldq2, double[] w, int _w_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, double[] givnum, int _givnum_offset, int[] indxp, int _indxp_offset, int[] indx, int _indx_offset, org.netlib.util.intW info) { - lapack.dlaed8(icompq, k, n, qsiz, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, cutpnt, z, _z_offset, dlamda, _dlamda_offset, q2, _q2_offset, ldq2, w, _w_offset, perm, _perm_offset, givptr, givcol, _givcol_offset, givnum, _givnum_offset, indxp, _indxp_offset, indx, _indx_offset, info); + org.netlib.lapack.Dlaed8.dlaed8(icompq, k, n, qsiz, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, cutpnt, z, _z_offset, dlamda, _dlamda_offset, q2, _q2_offset, ldq2, w, _w_offset, perm, _perm_offset, givptr, givcol, _givcol_offset, givnum, _givnum_offset, indxp, _indxp_offset, indx, _indx_offset, info); } protected void dlaed9K(int k, int kstart, int kstop, int n, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, double rho, double[] dlamda, int _dlamda_offset, double[] w, int _w_offset, double[] s, int _s_offset, int lds, org.netlib.util.intW info) { - lapack.dlaed9(k, kstart, kstop, n, d, _d_offset, q, _q_offset, ldq, rho, dlamda, _dlamda_offset, w, _w_offset, s, _s_offset, lds, info); + org.netlib.lapack.Dlaed9.dlaed9(k, kstart, kstop, n, d, _d_offset, q, _q_offset, ldq, rho, dlamda, _dlamda_offset, w, _w_offset, s, _s_offset, lds, info); } protected void dlaedaK(int n, int tlvls, int curlvl, int curpbm, int[] prmptr, int _prmptr_offset, int[] perm, int _perm_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, double[] givnum, int _givnum_offset, double[] q, int _q_offset, int[] qptr, int _qptr_offset, double[] z, int _z_offset, double[] ztemp, int _ztemp_offset, org.netlib.util.intW info) { - lapack.dlaeda(n, tlvls, curlvl, curpbm, prmptr, _prmptr_offset, perm, _perm_offset, givptr, _givptr_offset, givcol, _givcol_offset, givnum, _givnum_offset, q, _q_offset, qptr, _qptr_offset, z, _z_offset, ztemp, _ztemp_offset, info); + org.netlib.lapack.Dlaeda.dlaeda(n, tlvls, curlvl, curpbm, prmptr, _prmptr_offset, perm, _perm_offset, givptr, _givptr_offset, givcol, _givcol_offset, givnum, _givnum_offset, q, _q_offset, qptr, _qptr_offset, z, _z_offset, ztemp, _ztemp_offset, info); } protected void dlaeinK(boolean rightv, boolean noinit, int n, double[] h, int _h_offset, int ldh, double wr, double wi, double[] vr, int _vr_offset, double[] vi, int _vi_offset, double[] b, int _b_offset, int ldb, double[] work, int _work_offset, double eps3, double smlnum, double bignum, org.netlib.util.intW info) { - lapack.dlaein(rightv, noinit, n, h, _h_offset, ldh, wr, wi, vr, _vr_offset, vi, _vi_offset, b, _b_offset, ldb, work, _work_offset, eps3, smlnum, bignum, info); + org.netlib.lapack.Dlaein.dlaein(rightv, noinit, n, h, _h_offset, ldh, wr, wi, vr, _vr_offset, vi, _vi_offset, b, _b_offset, ldb, work, _work_offset, eps3, smlnum, bignum, info); } protected void dlaev2K(double a, double b, double c, org.netlib.util.doubleW rt1, org.netlib.util.doubleW rt2, org.netlib.util.doubleW cs1, org.netlib.util.doubleW sn1) { - lapack.dlaev2(a, b, c, rt1, rt2, cs1, sn1); + org.netlib.lapack.Dlaev2.dlaev2(a, b, c, rt1, rt2, cs1, sn1); } protected void dlaexcK(boolean wantq, int n, double[] t, int _t_offset, int ldt, double[] q, int _q_offset, int ldq, int j1, int n1, int n2, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dlaexc(wantq, n, t, _t_offset, ldt, q, _q_offset, ldq, j1, n1, n2, work, _work_offset, info); + org.netlib.lapack.Dlaexc.dlaexc(wantq, n, t, _t_offset, ldt, q, _q_offset, ldq, j1, n1, n2, work, _work_offset, info); } protected void dlag2K(double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double safmin, org.netlib.util.doubleW scale1, org.netlib.util.doubleW scale2, org.netlib.util.doubleW wr1, org.netlib.util.doubleW wr2, org.netlib.util.doubleW wi) { - lapack.dlag2(a, _a_offset, lda, b, _b_offset, ldb, safmin, scale1, scale2, wr1, wr2, wi); + org.netlib.lapack.Dlag2.dlag2(a, _a_offset, lda, b, _b_offset, ldb, safmin, scale1, scale2, wr1, wr2, wi); } protected void dlag2sK(int m, int n, double[] a, int _a_offset, int lda, float[] sa, int _sa_offset, int ldsa, org.netlib.util.intW info) { - lapack.dlag2s(m, n, a, _a_offset, lda, sa, _sa_offset, ldsa, info); + org.netlib.lapack.Dlag2s.dlag2s(m, n, a, _a_offset, lda, sa, _sa_offset, ldsa, info); } protected void dlags2K(boolean upper, double a1, double a2, double a3, double b1, double b2, double b3, org.netlib.util.doubleW csu, org.netlib.util.doubleW snu, org.netlib.util.doubleW csv, org.netlib.util.doubleW snv, org.netlib.util.doubleW csq, org.netlib.util.doubleW snq) { - lapack.dlags2(upper, a1, a2, a3, b1, b2, b3, csu, snu, csv, snv, csq, snq); + org.netlib.lapack.Dlags2.dlags2(upper, a1, a2, a3, b1, b2, b3, csu, snu, csv, snv, csq, snq); } protected void dlagtfK(int n, double[] a, int _a_offset, double lambda, double[] b, int _b_offset, double[] c, int _c_offset, double tol, double[] d, int _d_offset, int[] in, int _in_offset, org.netlib.util.intW info) { - lapack.dlagtf(n, a, _a_offset, lambda, b, _b_offset, c, _c_offset, tol, d, _d_offset, in, _in_offset, info); + org.netlib.lapack.Dlagtf.dlagtf(n, a, _a_offset, lambda, b, _b_offset, c, _c_offset, tol, d, _d_offset, in, _in_offset, info); } protected void dlagtmK(String trans, int n, int nrhs, double alpha, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] x, int _x_offset, int ldx, double beta, double[] b, int _b_offset, int ldb) { - lapack.dlagtm(trans, n, nrhs, alpha, dl, _dl_offset, d, _d_offset, du, _du_offset, x, _x_offset, ldx, beta, b, _b_offset, ldb); + org.netlib.lapack.Dlagtm.dlagtm(trans, n, nrhs, alpha, dl, _dl_offset, d, _d_offset, du, _du_offset, x, _x_offset, ldx, beta, b, _b_offset, ldb); } protected void dlagtsK(int job, int n, double[] a, int _a_offset, double[] b, int _b_offset, double[] c, int _c_offset, double[] d, int _d_offset, int[] in, int _in_offset, double[] y, int _y_offset, org.netlib.util.doubleW tol, org.netlib.util.intW info) { - lapack.dlagts(job, n, a, _a_offset, b, _b_offset, c, _c_offset, d, _d_offset, in, _in_offset, y, _y_offset, tol, info); + org.netlib.lapack.Dlagts.dlagts(job, n, a, _a_offset, b, _b_offset, c, _c_offset, d, _d_offset, in, _in_offset, y, _y_offset, tol, info); } protected void dlagv2K(double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, org.netlib.util.doubleW csl, org.netlib.util.doubleW snl, org.netlib.util.doubleW csr, org.netlib.util.doubleW snr) { - lapack.dlagv2(a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, csl, snl, csr, snr); + org.netlib.lapack.Dlagv2.dlagv2(a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, csl, snl, csr, snr); } protected void dlahqrK(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, int iloz, int ihiz, double[] z, int _z_offset, int ldz, org.netlib.util.intW info) { - lapack.dlahqr(wantt, wantz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, iloz, ihiz, z, _z_offset, ldz, info); + org.netlib.lapack.Dlahqr.dlahqr(wantt, wantz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, iloz, ihiz, z, _z_offset, ldz, info); } protected void dlahr2K(int n, int k, int nb, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] t, int _t_offset, int ldt, double[] y, int _y_offset, int ldy) { - lapack.dlahr2(n, k, nb, a, _a_offset, lda, tau, _tau_offset, t, _t_offset, ldt, y, _y_offset, ldy); + org.netlib.lapack.Dlahr2.dlahr2(n, k, nb, a, _a_offset, lda, tau, _tau_offset, t, _t_offset, ldt, y, _y_offset, ldy); } protected void dlahrdK(int n, int k, int nb, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] t, int _t_offset, int ldt, double[] y, int _y_offset, int ldy) { - lapack.dlahrd(n, k, nb, a, _a_offset, lda, tau, _tau_offset, t, _t_offset, ldt, y, _y_offset, ldy); + org.netlib.lapack.Dlahrd.dlahrd(n, k, nb, a, _a_offset, lda, tau, _tau_offset, t, _t_offset, ldt, y, _y_offset, ldy); } protected void dlaic1K(int job, int j, double[] x, int _x_offset, double sest, double[] w, int _w_offset, double gamma, org.netlib.util.doubleW sestpr, org.netlib.util.doubleW s, org.netlib.util.doubleW c) { - lapack.dlaic1(job, j, x, _x_offset, sest, w, _w_offset, gamma, sestpr, s, c); + org.netlib.lapack.Dlaic1.dlaic1(job, j, x, _x_offset, sest, w, _w_offset, gamma, sestpr, s, c); } protected boolean dlaisnanK(double din1, double din2) { - return lapack.dlaisnan(din1, din2); + return org.netlib.lapack.Dlaisnan.dlaisnan(din1, din2); } protected void dlaln2K(boolean ltrans, int na, int nw, double smin, double ca, double[] a, int _a_offset, int lda, double d1, double d2, double[] b, int _b_offset, int ldb, double wr, double wi, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW scale, org.netlib.util.doubleW xnorm, org.netlib.util.intW info) { - lapack.dlaln2(ltrans, na, nw, smin, ca, a, _a_offset, lda, d1, d2, b, _b_offset, ldb, wr, wi, x, _x_offset, ldx, scale, xnorm, info); + org.netlib.lapack.Dlaln2.dlaln2(ltrans, na, nw, smin, ca, a, _a_offset, lda, d1, d2, b, _b_offset, ldb, wr, wi, x, _x_offset, ldx, scale, xnorm, info); } protected void dlals0K(int icompq, int nl, int nr, int sqre, int nrhs, double[] b, int _b_offset, int ldb, double[] bx, int _bx_offset, int ldbx, int[] perm, int _perm_offset, int givptr, int[] givcol, int _givcol_offset, int ldgcol, double[] givnum, int _givnum_offset, int ldgnum, double[] poles, int _poles_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, double[] z, int _z_offset, int k, double c, double s, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dlals0(icompq, nl, nr, sqre, nrhs, b, _b_offset, ldb, bx, _bx_offset, ldbx, perm, _perm_offset, givptr, givcol, _givcol_offset, ldgcol, givnum, _givnum_offset, ldgnum, poles, _poles_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, k, c, s, work, _work_offset, info); + org.netlib.lapack.Dlals0.dlals0(icompq, nl, nr, sqre, nrhs, b, _b_offset, ldb, bx, _bx_offset, ldbx, perm, _perm_offset, givptr, givcol, _givcol_offset, ldgcol, givnum, _givnum_offset, ldgnum, poles, _poles_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, k, c, s, work, _work_offset, info); } protected void dlalsaK(int icompq, int smlsiz, int n, int nrhs, double[] b, int _b_offset, int ldb, double[] bx, int _bx_offset, int ldbx, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int[] k, int _k_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, double[] z, int _z_offset, double[] poles, int _poles_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, int ldgcol, int[] perm, int _perm_offset, double[] givnum, int _givnum_offset, double[] c, int _c_offset, double[] s, int _s_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dlalsa(icompq, smlsiz, n, nrhs, b, _b_offset, ldb, bx, _bx_offset, ldbx, u, _u_offset, ldu, vt, _vt_offset, k, _k_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, poles, _poles_offset, givptr, _givptr_offset, givcol, _givcol_offset, ldgcol, perm, _perm_offset, givnum, _givnum_offset, c, _c_offset, s, _s_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dlalsa.dlalsa(icompq, smlsiz, n, nrhs, b, _b_offset, ldb, bx, _bx_offset, ldbx, u, _u_offset, ldu, vt, _vt_offset, k, _k_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, poles, _poles_offset, givptr, _givptr_offset, givcol, _givcol_offset, ldgcol, perm, _perm_offset, givnum, _givnum_offset, c, _c_offset, s, _s_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void dlalsdK(String uplo, int smlsiz, int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] b, int _b_offset, int ldb, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dlalsd(uplo, smlsiz, n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb, rcond, rank, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dlalsd.dlalsd(uplo, smlsiz, n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb, rcond, rank, work, _work_offset, iwork, _iwork_offset, info); } protected void dlamrgK(int n1, int n2, double[] a, int _a_offset, int dtrd1, int dtrd2, int[] index, int _index_offset) { - lapack.dlamrg(n1, n2, a, _a_offset, dtrd1, dtrd2, index, _index_offset); + org.netlib.lapack.Dlamrg.dlamrg(n1, n2, a, _a_offset, dtrd1, dtrd2, index, _index_offset); } protected int dlanegK(int n, double[] d, int _d_offset, double[] lld, int _lld_offset, double sigma, double pivmin, int r) { - return lapack.dlaneg(n, d, _d_offset, lld, _lld_offset, sigma, pivmin, r); + return org.netlib.lapack.Dlaneg.dlaneg(n, d, _d_offset, lld, _lld_offset, sigma, pivmin, r); } protected double dlangbK(String norm, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, double[] work, int _work_offset) { - return lapack.dlangb(norm, n, kl, ku, ab, _ab_offset, ldab, work, _work_offset); + return org.netlib.lapack.Dlangb.dlangb(norm, n, kl, ku, ab, _ab_offset, ldab, work, _work_offset); } protected double dlangeK(String norm, int m, int n, double[] a, int _a_offset, int lda, double[] work, int _work_offset) { - return lapack.dlange(norm, m, n, a, _a_offset, lda, work, _work_offset); + return org.netlib.lapack.Dlange.dlange(norm, m, n, a, _a_offset, lda, work, _work_offset); } protected double dlangtK(String norm, int n, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset) { - return lapack.dlangt(norm, n, dl, _dl_offset, d, _d_offset, du, _du_offset); + return org.netlib.lapack.Dlangt.dlangt(norm, n, dl, _dl_offset, d, _d_offset, du, _du_offset); } protected double dlanhsK(String norm, int n, double[] a, int _a_offset, int lda, double[] work, int _work_offset) { - return lapack.dlanhs(norm, n, a, _a_offset, lda, work, _work_offset); + return org.netlib.lapack.Dlanhs.dlanhs(norm, n, a, _a_offset, lda, work, _work_offset); } protected double dlansbK(String norm, String uplo, int n, int k, double[] ab, int _ab_offset, int ldab, double[] work, int _work_offset) { - return lapack.dlansb(norm, uplo, n, k, ab, _ab_offset, ldab, work, _work_offset); + return org.netlib.lapack.Dlansb.dlansb(norm, uplo, n, k, ab, _ab_offset, ldab, work, _work_offset); } protected double dlanspK(String norm, String uplo, int n, double[] ap, int _ap_offset, double[] work, int _work_offset) { - return lapack.dlansp(norm, uplo, n, ap, _ap_offset, work, _work_offset); + return org.netlib.lapack.Dlansp.dlansp(norm, uplo, n, ap, _ap_offset, work, _work_offset); } protected double dlanstK(String norm, int n, double[] d, int _d_offset, double[] e, int _e_offset) { - return lapack.dlanst(norm, n, d, _d_offset, e, _e_offset); + return org.netlib.lapack.Dlanst.dlanst(norm, n, d, _d_offset, e, _e_offset); } protected double dlansyK(String norm, String uplo, int n, double[] a, int _a_offset, int lda, double[] work, int _work_offset) { - return lapack.dlansy(norm, uplo, n, a, _a_offset, lda, work, _work_offset); + return org.netlib.lapack.Dlansy.dlansy(norm, uplo, n, a, _a_offset, lda, work, _work_offset); } protected double dlantbK(String norm, String uplo, String diag, int n, int k, double[] ab, int _ab_offset, int ldab, double[] work, int _work_offset) { - return lapack.dlantb(norm, uplo, diag, n, k, ab, _ab_offset, ldab, work, _work_offset); + return org.netlib.lapack.Dlantb.dlantb(norm, uplo, diag, n, k, ab, _ab_offset, ldab, work, _work_offset); } protected double dlantpK(String norm, String uplo, String diag, int n, double[] ap, int _ap_offset, double[] work, int _work_offset) { - return lapack.dlantp(norm, uplo, diag, n, ap, _ap_offset, work, _work_offset); + return org.netlib.lapack.Dlantp.dlantp(norm, uplo, diag, n, ap, _ap_offset, work, _work_offset); } protected double dlantrK(String norm, String uplo, String diag, int m, int n, double[] a, int _a_offset, int lda, double[] work, int _work_offset) { - return lapack.dlantr(norm, uplo, diag, m, n, a, _a_offset, lda, work, _work_offset); + return org.netlib.lapack.Dlantr.dlantr(norm, uplo, diag, m, n, a, _a_offset, lda, work, _work_offset); } protected void dlanv2K(org.netlib.util.doubleW a, org.netlib.util.doubleW b, org.netlib.util.doubleW c, org.netlib.util.doubleW d, org.netlib.util.doubleW rt1r, org.netlib.util.doubleW rt1i, org.netlib.util.doubleW rt2r, org.netlib.util.doubleW rt2i, org.netlib.util.doubleW cs, org.netlib.util.doubleW sn) { - lapack.dlanv2(a, b, c, d, rt1r, rt1i, rt2r, rt2i, cs, sn); + org.netlib.lapack.Dlanv2.dlanv2(a, b, c, d, rt1r, rt1i, rt2r, rt2i, cs, sn); } protected void dlapllK(int n, double[] x, int _x_offset, int incx, double[] y, int _y_offset, int incy, org.netlib.util.doubleW ssmin) { - lapack.dlapll(n, x, _x_offset, incx, y, _y_offset, incy, ssmin); + org.netlib.lapack.Dlapll.dlapll(n, x, _x_offset, incx, y, _y_offset, incy, ssmin); } protected void dlapmtK(boolean forwrd, int m, int n, double[] x, int _x_offset, int ldx, int[] k, int _k_offset) { - lapack.dlapmt(forwrd, m, n, x, _x_offset, ldx, k, _k_offset); + org.netlib.lapack.Dlapmt.dlapmt(forwrd, m, n, x, _x_offset, ldx, k, _k_offset); } protected double dlapy2K(double x, double y) { - return lapack.dlapy2(x, y); + return org.netlib.lapack.Dlapy2.dlapy2(x, y); } protected double dlapy3K(double x, double y, double z) { - return lapack.dlapy3(x, y, z); + return org.netlib.lapack.Dlapy3.dlapy3(x, y, z); } protected void dlaqgbK(int m, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, double[] r, int _r_offset, double[] c, int _c_offset, double rowcnd, double colcnd, double amax, org.netlib.util.StringW equed) { - lapack.dlaqgb(m, n, kl, ku, ab, _ab_offset, ldab, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, equed); + org.netlib.lapack.Dlaqgb.dlaqgb(m, n, kl, ku, ab, _ab_offset, ldab, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, equed); } protected void dlaqgeK(int m, int n, double[] a, int _a_offset, int lda, double[] r, int _r_offset, double[] c, int _c_offset, double rowcnd, double colcnd, double amax, org.netlib.util.StringW equed) { - lapack.dlaqge(m, n, a, _a_offset, lda, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, equed); + org.netlib.lapack.Dlaqge.dlaqge(m, n, a, _a_offset, lda, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, equed); } protected void dlaqp2K(int m, int n, int offset, double[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, double[] tau, int _tau_offset, double[] vn1, int _vn1_offset, double[] vn2, int _vn2_offset, double[] work, int _work_offset) { - lapack.dlaqp2(m, n, offset, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, vn1, _vn1_offset, vn2, _vn2_offset, work, _work_offset); + org.netlib.lapack.Dlaqp2.dlaqp2(m, n, offset, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, vn1, _vn1_offset, vn2, _vn2_offset, work, _work_offset); } protected void dlaqpsK(int m, int n, int offset, int nb, org.netlib.util.intW kb, double[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, double[] tau, int _tau_offset, double[] vn1, int _vn1_offset, double[] vn2, int _vn2_offset, double[] auxv, int _auxv_offset, double[] f, int _f_offset, int ldf) { - lapack.dlaqps(m, n, offset, nb, kb, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, vn1, _vn1_offset, vn2, _vn2_offset, auxv, _auxv_offset, f, _f_offset, ldf); + org.netlib.lapack.Dlaqps.dlaqps(m, n, offset, nb, kb, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, vn1, _vn1_offset, vn2, _vn2_offset, auxv, _auxv_offset, f, _f_offset, ldf); } protected void dlaqr0K(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, int iloz, int ihiz, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dlaqr0(wantt, wantz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, iloz, ihiz, z, _z_offset, ldz, work, _work_offset, lwork, info); + org.netlib.lapack.Dlaqr0.dlaqr0(wantt, wantz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, iloz, ihiz, z, _z_offset, ldz, work, _work_offset, lwork, info); } protected void dlaqr1K(int n, double[] h, int _h_offset, int ldh, double sr1, double si1, double sr2, double si2, double[] v, int _v_offset) { - lapack.dlaqr1(n, h, _h_offset, ldh, sr1, si1, sr2, si2, v, _v_offset); + org.netlib.lapack.Dlaqr1.dlaqr1(n, h, _h_offset, ldh, sr1, si1, sr2, si2, v, _v_offset); } protected void dlaqr2K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, double[] h, int _h_offset, int ldh, int iloz, int ihiz, double[] z, int _z_offset, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, double[] sr, int _sr_offset, double[] si, int _si_offset, double[] v, int _v_offset, int ldv, int nh, double[] t, int _t_offset, int ldt, int nv, double[] wv, int _wv_offset, int ldwv, double[] work, int _work_offset, int lwork) { - lapack.dlaqr2(wantt, wantz, n, ktop, kbot, nw, h, _h_offset, ldh, iloz, ihiz, z, _z_offset, ldz, ns, nd, sr, _sr_offset, si, _si_offset, v, _v_offset, ldv, nh, t, _t_offset, ldt, nv, wv, _wv_offset, ldwv, work, _work_offset, lwork); + org.netlib.lapack.Dlaqr2.dlaqr2(wantt, wantz, n, ktop, kbot, nw, h, _h_offset, ldh, iloz, ihiz, z, _z_offset, ldz, ns, nd, sr, _sr_offset, si, _si_offset, v, _v_offset, ldv, nh, t, _t_offset, ldt, nv, wv, _wv_offset, ldwv, work, _work_offset, lwork); } protected void dlaqr3K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, double[] h, int _h_offset, int ldh, int iloz, int ihiz, double[] z, int _z_offset, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, double[] sr, int _sr_offset, double[] si, int _si_offset, double[] v, int _v_offset, int ldv, int nh, double[] t, int _t_offset, int ldt, int nv, double[] wv, int _wv_offset, int ldwv, double[] work, int _work_offset, int lwork) { - lapack.dlaqr3(wantt, wantz, n, ktop, kbot, nw, h, _h_offset, ldh, iloz, ihiz, z, _z_offset, ldz, ns, nd, sr, _sr_offset, si, _si_offset, v, _v_offset, ldv, nh, t, _t_offset, ldt, nv, wv, _wv_offset, ldwv, work, _work_offset, lwork); + org.netlib.lapack.Dlaqr3.dlaqr3(wantt, wantz, n, ktop, kbot, nw, h, _h_offset, ldh, iloz, ihiz, z, _z_offset, ldz, ns, nd, sr, _sr_offset, si, _si_offset, v, _v_offset, ldv, nh, t, _t_offset, ldt, nv, wv, _wv_offset, ldwv, work, _work_offset, lwork); } protected void dlaqr4K(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, int iloz, int ihiz, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dlaqr4(wantt, wantz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, iloz, ihiz, z, _z_offset, ldz, work, _work_offset, lwork, info); + org.netlib.lapack.Dlaqr4.dlaqr4(wantt, wantz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, iloz, ihiz, z, _z_offset, ldz, work, _work_offset, lwork, info); } protected void dlaqr5K(boolean wantt, boolean wantz, int kacc22, int n, int ktop, int kbot, int nshfts, double[] sr, int _sr_offset, double[] si, int _si_offset, double[] h, int _h_offset, int ldh, int iloz, int ihiz, double[] z, int _z_offset, int ldz, double[] v, int _v_offset, int ldv, double[] u, int _u_offset, int ldu, int nv, double[] wv, int _wv_offset, int ldwv, int nh, double[] wh, int _wh_offset, int ldwh) { - lapack.dlaqr5(wantt, wantz, kacc22, n, ktop, kbot, nshfts, sr, _sr_offset, si, _si_offset, h, _h_offset, ldh, iloz, ihiz, z, _z_offset, ldz, v, _v_offset, ldv, u, _u_offset, ldu, nv, wv, _wv_offset, ldwv, nh, wh, _wh_offset, ldwh); + org.netlib.lapack.Dlaqr5.dlaqr5(wantt, wantz, kacc22, n, ktop, kbot, nshfts, sr, _sr_offset, si, _si_offset, h, _h_offset, ldh, iloz, ihiz, z, _z_offset, ldz, v, _v_offset, ldv, u, _u_offset, ldu, nv, wv, _wv_offset, ldwv, nh, wh, _wh_offset, ldwh); } protected void dlaqsbK(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] s, int _s_offset, double scond, double amax, org.netlib.util.StringW equed) { - lapack.dlaqsb(uplo, n, kd, ab, _ab_offset, ldab, s, _s_offset, scond, amax, equed); + org.netlib.lapack.Dlaqsb.dlaqsb(uplo, n, kd, ab, _ab_offset, ldab, s, _s_offset, scond, amax, equed); } protected void dlaqspK(String uplo, int n, double[] ap, int _ap_offset, double[] s, int _s_offset, double scond, double amax, org.netlib.util.StringW equed) { - lapack.dlaqsp(uplo, n, ap, _ap_offset, s, _s_offset, scond, amax, equed); + org.netlib.lapack.Dlaqsp.dlaqsp(uplo, n, ap, _ap_offset, s, _s_offset, scond, amax, equed); } protected void dlaqsyK(String uplo, int n, double[] a, int _a_offset, int lda, double[] s, int _s_offset, double scond, double amax, org.netlib.util.StringW equed) { - lapack.dlaqsy(uplo, n, a, _a_offset, lda, s, _s_offset, scond, amax, equed); + org.netlib.lapack.Dlaqsy.dlaqsy(uplo, n, a, _a_offset, lda, s, _s_offset, scond, amax, equed); } protected void dlaqtrK(boolean ltran, boolean lreal, int n, double[] t, int _t_offset, int ldt, double[] b, int _b_offset, double w, org.netlib.util.doubleW scale, double[] x, int _x_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dlaqtr(ltran, lreal, n, t, _t_offset, ldt, b, _b_offset, w, scale, x, _x_offset, work, _work_offset, info); + org.netlib.lapack.Dlaqtr.dlaqtr(ltran, lreal, n, t, _t_offset, ldt, b, _b_offset, w, scale, x, _x_offset, work, _work_offset, info); } protected void dlar1vK(int n, int b1, int bn, double lambda, double[] d, int _d_offset, double[] l, int _l_offset, double[] ld, int _ld_offset, double[] lld, int _lld_offset, double pivmin, double gaptol, double[] z, int _z_offset, boolean wantnc, org.netlib.util.intW negcnt, org.netlib.util.doubleW ztz, org.netlib.util.doubleW mingma, org.netlib.util.intW r, int[] isuppz, int _isuppz_offset, org.netlib.util.doubleW nrminv, org.netlib.util.doubleW resid, org.netlib.util.doubleW rqcorr, double[] work, int _work_offset) { - lapack.dlar1v(n, b1, bn, lambda, d, _d_offset, l, _l_offset, ld, _ld_offset, lld, _lld_offset, pivmin, gaptol, z, _z_offset, wantnc, negcnt, ztz, mingma, r, isuppz, _isuppz_offset, nrminv, resid, rqcorr, work, _work_offset); + org.netlib.lapack.Dlar1v.dlar1v(n, b1, bn, lambda, d, _d_offset, l, _l_offset, ld, _ld_offset, lld, _lld_offset, pivmin, gaptol, z, _z_offset, wantnc, negcnt, ztz, mingma, r, isuppz, _isuppz_offset, nrminv, resid, rqcorr, work, _work_offset); } protected void dlar2vK(int n, double[] x, int _x_offset, double[] y, int _y_offset, double[] z, int _z_offset, int incx, double[] c, int _c_offset, double[] s, int _s_offset, int incc) { - lapack.dlar2v(n, x, _x_offset, y, _y_offset, z, _z_offset, incx, c, _c_offset, s, _s_offset, incc); + org.netlib.lapack.Dlar2v.dlar2v(n, x, _x_offset, y, _y_offset, z, _z_offset, incx, c, _c_offset, s, _s_offset, incc); } protected void dlarfK(String side, int m, int n, double[] v, int _v_offset, int incv, double tau, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset) { - lapack.dlarf(side, m, n, v, _v_offset, incv, tau, c, _c_offset, Ldc, work, _work_offset); + org.netlib.lapack.Dlarf.dlarf(side, m, n, v, _v_offset, incv, tau, c, _c_offset, Ldc, work, _work_offset); } protected void dlarfbK(String side, String trans, String direct, String storev, int m, int n, int k, double[] v, int _v_offset, int ldv, double[] t, int _t_offset, int ldt, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int ldwork) { - lapack.dlarfb(side, trans, direct, storev, m, n, k, v, _v_offset, ldv, t, _t_offset, ldt, c, _c_offset, Ldc, work, _work_offset, ldwork); + org.netlib.lapack.Dlarfb.dlarfb(side, trans, direct, storev, m, n, k, v, _v_offset, ldv, t, _t_offset, ldt, c, _c_offset, Ldc, work, _work_offset, ldwork); } protected void dlarfgK(int n, org.netlib.util.doubleW alpha, double[] x, int _x_offset, int incx, org.netlib.util.doubleW tau) { - lapack.dlarfg(n, alpha, x, _x_offset, incx, tau); + org.netlib.lapack.Dlarfg.dlarfg(n, alpha, x, _x_offset, incx, tau); } protected void dlarftK(String direct, String storev, int n, int k, double[] v, int _v_offset, int ldv, double[] tau, int _tau_offset, double[] t, int _t_offset, int ldt) { - lapack.dlarft(direct, storev, n, k, v, _v_offset, ldv, tau, _tau_offset, t, _t_offset, ldt); + org.netlib.lapack.Dlarft.dlarft(direct, storev, n, k, v, _v_offset, ldv, tau, _tau_offset, t, _t_offset, ldt); } protected void dlarfxK(String side, int m, int n, double[] v, int _v_offset, double tau, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset) { - lapack.dlarfx(side, m, n, v, _v_offset, tau, c, _c_offset, Ldc, work, _work_offset); + org.netlib.lapack.Dlarfx.dlarfx(side, m, n, v, _v_offset, tau, c, _c_offset, Ldc, work, _work_offset); } protected void dlargvK(int n, double[] x, int _x_offset, int incx, double[] y, int _y_offset, int incy, double[] c, int _c_offset, int incc) { - lapack.dlargv(n, x, _x_offset, incx, y, _y_offset, incy, c, _c_offset, incc); + org.netlib.lapack.Dlargv.dlargv(n, x, _x_offset, incx, y, _y_offset, incy, c, _c_offset, incc); } protected void dlarnvK(int idist, int[] iseed, int _iseed_offset, int n, double[] x, int _x_offset) { - lapack.dlarnv(idist, iseed, _iseed_offset, n, x, _x_offset); + org.netlib.lapack.Dlarnv.dlarnv(idist, iseed, _iseed_offset, n, x, _x_offset); } protected void dlarraK(int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] e2, int _e2_offset, double spltol, double tnrm, org.netlib.util.intW nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW info) { - lapack.dlarra(n, d, _d_offset, e, _e_offset, e2, _e2_offset, spltol, tnrm, nsplit, isplit, _isplit_offset, info); + org.netlib.lapack.Dlarra.dlarra(n, d, _d_offset, e, _e_offset, e2, _e2_offset, spltol, tnrm, nsplit, isplit, _isplit_offset, info); } protected void dlarrbK(int n, double[] d, int _d_offset, double[] lld, int _lld_offset, int ifirst, int ilast, double rtol1, double rtol2, int offset, double[] w, int _w_offset, double[] wgap, int _wgap_offset, double[] werr, int _werr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, double pivmin, double spdiam, int twist, org.netlib.util.intW info) { - lapack.dlarrb(n, d, _d_offset, lld, _lld_offset, ifirst, ilast, rtol1, rtol2, offset, w, _w_offset, wgap, _wgap_offset, werr, _werr_offset, work, _work_offset, iwork, _iwork_offset, pivmin, spdiam, twist, info); + org.netlib.lapack.Dlarrb.dlarrb(n, d, _d_offset, lld, _lld_offset, ifirst, ilast, rtol1, rtol2, offset, w, _w_offset, wgap, _wgap_offset, werr, _werr_offset, work, _work_offset, iwork, _iwork_offset, pivmin, spdiam, twist, info); } protected void dlarrcK(String jobt, int n, double vl, double vu, double[] d, int _d_offset, double[] e, int _e_offset, double pivmin, org.netlib.util.intW eigcnt, org.netlib.util.intW lcnt, org.netlib.util.intW rcnt, org.netlib.util.intW info) { - lapack.dlarrc(jobt, n, vl, vu, d, _d_offset, e, _e_offset, pivmin, eigcnt, lcnt, rcnt, info); + org.netlib.lapack.Dlarrc.dlarrc(jobt, n, vl, vu, d, _d_offset, e, _e_offset, pivmin, eigcnt, lcnt, rcnt, info); } protected void dlarrdK(String range, String order, int n, double vl, double vu, int il, int iu, double[] gers, int _gers_offset, double reltol, double[] d, int _d_offset, double[] e, int _e_offset, double[] e2, int _e2_offset, double pivmin, int nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW m, double[] w, int _w_offset, double[] werr, int _werr_offset, org.netlib.util.doubleW wl, org.netlib.util.doubleW wu, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dlarrd(range, order, n, vl, vu, il, iu, gers, _gers_offset, reltol, d, _d_offset, e, _e_offset, e2, _e2_offset, pivmin, nsplit, isplit, _isplit_offset, m, w, _w_offset, werr, _werr_offset, wl, wu, iblock, _iblock_offset, indexw, _indexw_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dlarrd.dlarrd(range, order, n, vl, vu, il, iu, gers, _gers_offset, reltol, d, _d_offset, e, _e_offset, e2, _e2_offset, pivmin, nsplit, isplit, _isplit_offset, m, w, _w_offset, werr, _werr_offset, wl, wu, iblock, _iblock_offset, indexw, _indexw_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void dlarreK(String range, int n, org.netlib.util.doubleW vl, org.netlib.util.doubleW vu, int il, int iu, double[] d, int _d_offset, double[] e, int _e_offset, double[] e2, int _e2_offset, double rtol1, double rtol2, double spltol, org.netlib.util.intW nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW m, double[] w, int _w_offset, double[] werr, int _werr_offset, double[] wgap, int _wgap_offset, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, double[] gers, int _gers_offset, org.netlib.util.doubleW pivmin, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dlarre(range, n, vl, vu, il, iu, d, _d_offset, e, _e_offset, e2, _e2_offset, rtol1, rtol2, spltol, nsplit, isplit, _isplit_offset, m, w, _w_offset, werr, _werr_offset, wgap, _wgap_offset, iblock, _iblock_offset, indexw, _indexw_offset, gers, _gers_offset, pivmin, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dlarre.dlarre(range, n, vl, vu, il, iu, d, _d_offset, e, _e_offset, e2, _e2_offset, rtol1, rtol2, spltol, nsplit, isplit, _isplit_offset, m, w, _w_offset, werr, _werr_offset, wgap, _wgap_offset, iblock, _iblock_offset, indexw, _indexw_offset, gers, _gers_offset, pivmin, work, _work_offset, iwork, _iwork_offset, info); } protected void dlarrfK(int n, double[] d, int _d_offset, double[] l, int _l_offset, double[] ld, int _ld_offset, int clstrt, int clend, double[] w, int _w_offset, double[] wgap, int _wgap_offset, double[] werr, int _werr_offset, double spdiam, double clgapl, double clgapr, double pivmin, org.netlib.util.doubleW sigma, double[] dplus, int _dplus_offset, double[] lplus, int _lplus_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dlarrf(n, d, _d_offset, l, _l_offset, ld, _ld_offset, clstrt, clend, w, _w_offset, wgap, _wgap_offset, werr, _werr_offset, spdiam, clgapl, clgapr, pivmin, sigma, dplus, _dplus_offset, lplus, _lplus_offset, work, _work_offset, info); + org.netlib.lapack.Dlarrf.dlarrf(n, d, _d_offset, l, _l_offset, ld, _ld_offset, clstrt, clend, w, _w_offset, wgap, _wgap_offset, werr, _werr_offset, spdiam, clgapl, clgapr, pivmin, sigma, dplus, _dplus_offset, lplus, _lplus_offset, work, _work_offset, info); } protected void dlarrjK(int n, double[] d, int _d_offset, double[] e2, int _e2_offset, int ifirst, int ilast, double rtol, int offset, double[] w, int _w_offset, double[] werr, int _werr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, double pivmin, double spdiam, org.netlib.util.intW info) { - lapack.dlarrj(n, d, _d_offset, e2, _e2_offset, ifirst, ilast, rtol, offset, w, _w_offset, werr, _werr_offset, work, _work_offset, iwork, _iwork_offset, pivmin, spdiam, info); + org.netlib.lapack.Dlarrj.dlarrj(n, d, _d_offset, e2, _e2_offset, ifirst, ilast, rtol, offset, w, _w_offset, werr, _werr_offset, work, _work_offset, iwork, _iwork_offset, pivmin, spdiam, info); } protected void dlarrkK(int n, int iw, double gl, double gu, double[] d, int _d_offset, double[] e2, int _e2_offset, double pivmin, double reltol, org.netlib.util.doubleW w, org.netlib.util.doubleW werr, org.netlib.util.intW info) { - lapack.dlarrk(n, iw, gl, gu, d, _d_offset, e2, _e2_offset, pivmin, reltol, w, werr, info); + org.netlib.lapack.Dlarrk.dlarrk(n, iw, gl, gu, d, _d_offset, e2, _e2_offset, pivmin, reltol, w, werr, info); } protected void dlarrrK(int n, double[] d, int _d_offset, double[] e, int _e_offset, org.netlib.util.intW info) { - lapack.dlarrr(n, d, _d_offset, e, _e_offset, info); + org.netlib.lapack.Dlarrr.dlarrr(n, d, _d_offset, e, _e_offset, info); } protected void dlarrvK(int n, double vl, double vu, double[] d, int _d_offset, double[] l, int _l_offset, double pivmin, int[] isplit, int _isplit_offset, int m, int dol, int dou, double minrgp, org.netlib.util.doubleW rtol1, org.netlib.util.doubleW rtol2, double[] w, int _w_offset, double[] werr, int _werr_offset, double[] wgap, int _wgap_offset, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, double[] gers, int _gers_offset, double[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dlarrv(n, vl, vu, d, _d_offset, l, _l_offset, pivmin, isplit, _isplit_offset, m, dol, dou, minrgp, rtol1, rtol2, w, _w_offset, werr, _werr_offset, wgap, _wgap_offset, iblock, _iblock_offset, indexw, _indexw_offset, gers, _gers_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dlarrv.dlarrv(n, vl, vu, d, _d_offset, l, _l_offset, pivmin, isplit, _isplit_offset, m, dol, dou, minrgp, rtol1, rtol2, w, _w_offset, werr, _werr_offset, wgap, _wgap_offset, iblock, _iblock_offset, indexw, _indexw_offset, gers, _gers_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void dlartgK(double f, double g, org.netlib.util.doubleW cs, org.netlib.util.doubleW sn, org.netlib.util.doubleW r) { - lapack.dlartg(f, g, cs, sn, r); + org.netlib.lapack.Dlartg.dlartg(f, g, cs, sn, r); } protected void dlartvK(int n, double[] x, int _x_offset, int incx, double[] y, int _y_offset, int incy, double[] c, int _c_offset, double[] s, int _s_offset, int incc) { - lapack.dlartv(n, x, _x_offset, incx, y, _y_offset, incy, c, _c_offset, s, _s_offset, incc); + org.netlib.lapack.Dlartv.dlartv(n, x, _x_offset, incx, y, _y_offset, incy, c, _c_offset, s, _s_offset, incc); } protected void dlaruvK(int[] iseed, int _iseed_offset, int n, double[] x, int _x_offset) { - lapack.dlaruv(iseed, _iseed_offset, n, x, _x_offset); + org.netlib.lapack.Dlaruv.dlaruv(iseed, _iseed_offset, n, x, _x_offset); } protected void dlarzK(String side, int m, int n, int l, double[] v, int _v_offset, int incv, double tau, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset) { - lapack.dlarz(side, m, n, l, v, _v_offset, incv, tau, c, _c_offset, Ldc, work, _work_offset); + org.netlib.lapack.Dlarz.dlarz(side, m, n, l, v, _v_offset, incv, tau, c, _c_offset, Ldc, work, _work_offset); } protected void dlarzbK(String side, String trans, String direct, String storev, int m, int n, int k, int l, double[] v, int _v_offset, int ldv, double[] t, int _t_offset, int ldt, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int ldwork) { - lapack.dlarzb(side, trans, direct, storev, m, n, k, l, v, _v_offset, ldv, t, _t_offset, ldt, c, _c_offset, Ldc, work, _work_offset, ldwork); + org.netlib.lapack.Dlarzb.dlarzb(side, trans, direct, storev, m, n, k, l, v, _v_offset, ldv, t, _t_offset, ldt, c, _c_offset, Ldc, work, _work_offset, ldwork); } protected void dlarztK(String direct, String storev, int n, int k, double[] v, int _v_offset, int ldv, double[] tau, int _tau_offset, double[] t, int _t_offset, int ldt) { - lapack.dlarzt(direct, storev, n, k, v, _v_offset, ldv, tau, _tau_offset, t, _t_offset, ldt); + org.netlib.lapack.Dlarzt.dlarzt(direct, storev, n, k, v, _v_offset, ldv, tau, _tau_offset, t, _t_offset, ldt); } protected void dlas2K(double f, double g, double h, org.netlib.util.doubleW ssmin, org.netlib.util.doubleW ssmax) { - lapack.dlas2(f, g, h, ssmin, ssmax); + org.netlib.lapack.Dlas2.dlas2(f, g, h, ssmin, ssmax); } protected void dlasclK(String type, int kl, int ku, double cfrom, double cto, int m, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info) { - lapack.dlascl(type, kl, ku, cfrom, cto, m, n, a, _a_offset, lda, info); + org.netlib.lapack.Dlascl.dlascl(type, kl, ku, cfrom, cto, m, n, a, _a_offset, lda, info); } protected void dlasd0K(int n, int sqre, double[] d, int _d_offset, double[] e, int _e_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, int smlsiz, int[] iwork, int _iwork_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dlasd0(n, sqre, d, _d_offset, e, _e_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, smlsiz, iwork, _iwork_offset, work, _work_offset, info); + org.netlib.lapack.Dlasd0.dlasd0(n, sqre, d, _d_offset, e, _e_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, smlsiz, iwork, _iwork_offset, work, _work_offset, info); } protected void dlasd1K(int nl, int nr, int sqre, double[] d, int _d_offset, org.netlib.util.doubleW alpha, org.netlib.util.doubleW beta, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, int[] idxq, int _idxq_offset, int[] iwork, int _iwork_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dlasd1(nl, nr, sqre, d, _d_offset, alpha, beta, u, _u_offset, ldu, vt, _vt_offset, ldvt, idxq, _idxq_offset, iwork, _iwork_offset, work, _work_offset, info); + org.netlib.lapack.Dlasd1.dlasd1(nl, nr, sqre, d, _d_offset, alpha, beta, u, _u_offset, ldu, vt, _vt_offset, ldvt, idxq, _idxq_offset, iwork, _iwork_offset, work, _work_offset, info); } protected void dlasd2K(int nl, int nr, int sqre, org.netlib.util.intW k, double[] d, int _d_offset, double[] z, int _z_offset, double alpha, double beta, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, double[] dsigma, int _dsigma_offset, double[] u2, int _u2_offset, int ldu2, double[] vt2, int _vt2_offset, int ldvt2, int[] idxp, int _idxp_offset, int[] idx, int _idx_offset, int[] idxc, int _idxc_offset, int[] idxq, int _idxq_offset, int[] coltyp, int _coltyp_offset, org.netlib.util.intW info) { - lapack.dlasd2(nl, nr, sqre, k, d, _d_offset, z, _z_offset, alpha, beta, u, _u_offset, ldu, vt, _vt_offset, ldvt, dsigma, _dsigma_offset, u2, _u2_offset, ldu2, vt2, _vt2_offset, ldvt2, idxp, _idxp_offset, idx, _idx_offset, idxc, _idxc_offset, idxq, _idxq_offset, coltyp, _coltyp_offset, info); + org.netlib.lapack.Dlasd2.dlasd2(nl, nr, sqre, k, d, _d_offset, z, _z_offset, alpha, beta, u, _u_offset, ldu, vt, _vt_offset, ldvt, dsigma, _dsigma_offset, u2, _u2_offset, ldu2, vt2, _vt2_offset, ldvt2, idxp, _idxp_offset, idx, _idx_offset, idxc, _idxc_offset, idxq, _idxq_offset, coltyp, _coltyp_offset, info); } protected void dlasd3K(int nl, int nr, int sqre, int k, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, double[] dsigma, int _dsigma_offset, double[] u, int _u_offset, int ldu, double[] u2, int _u2_offset, int ldu2, double[] vt, int _vt_offset, int ldvt, double[] vt2, int _vt2_offset, int ldvt2, int[] idxc, int _idxc_offset, int[] ctot, int _ctot_offset, double[] z, int _z_offset, org.netlib.util.intW info) { - lapack.dlasd3(nl, nr, sqre, k, d, _d_offset, q, _q_offset, ldq, dsigma, _dsigma_offset, u, _u_offset, ldu, u2, _u2_offset, ldu2, vt, _vt_offset, ldvt, vt2, _vt2_offset, ldvt2, idxc, _idxc_offset, ctot, _ctot_offset, z, _z_offset, info); + org.netlib.lapack.Dlasd3.dlasd3(nl, nr, sqre, k, d, _d_offset, q, _q_offset, ldq, dsigma, _dsigma_offset, u, _u_offset, ldu, u2, _u2_offset, ldu2, vt, _vt_offset, ldvt, vt2, _vt2_offset, ldvt2, idxc, _idxc_offset, ctot, _ctot_offset, z, _z_offset, info); } protected void dlasd4K(int n, int i, double[] d, int _d_offset, double[] z, int _z_offset, double[] delta, int _delta_offset, double rho, org.netlib.util.doubleW sigma, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dlasd4(n, i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, sigma, work, _work_offset, info); + org.netlib.lapack.Dlasd4.dlasd4(n, i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, sigma, work, _work_offset, info); } protected void dlasd5K(int i, double[] d, int _d_offset, double[] z, int _z_offset, double[] delta, int _delta_offset, double rho, org.netlib.util.doubleW dsigma, double[] work, int _work_offset) { - lapack.dlasd5(i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, dsigma, work, _work_offset); + org.netlib.lapack.Dlasd5.dlasd5(i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, dsigma, work, _work_offset); } protected void dlasd6K(int icompq, int nl, int nr, int sqre, double[] d, int _d_offset, double[] vf, int _vf_offset, double[] vl, int _vl_offset, org.netlib.util.doubleW alpha, org.netlib.util.doubleW beta, int[] idxq, int _idxq_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, int ldgcol, double[] givnum, int _givnum_offset, int ldgnum, double[] poles, int _poles_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, double[] z, int _z_offset, org.netlib.util.intW k, org.netlib.util.doubleW c, org.netlib.util.doubleW s, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dlasd6(icompq, nl, nr, sqre, d, _d_offset, vf, _vf_offset, vl, _vl_offset, alpha, beta, idxq, _idxq_offset, perm, _perm_offset, givptr, givcol, _givcol_offset, ldgcol, givnum, _givnum_offset, ldgnum, poles, _poles_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, k, c, s, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dlasd6.dlasd6(icompq, nl, nr, sqre, d, _d_offset, vf, _vf_offset, vl, _vl_offset, alpha, beta, idxq, _idxq_offset, perm, _perm_offset, givptr, givcol, _givcol_offset, ldgcol, givnum, _givnum_offset, ldgnum, poles, _poles_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, k, c, s, work, _work_offset, iwork, _iwork_offset, info); } protected void dlasd7K(int icompq, int nl, int nr, int sqre, org.netlib.util.intW k, double[] d, int _d_offset, double[] z, int _z_offset, double[] zw, int _zw_offset, double[] vf, int _vf_offset, double[] vfw, int _vfw_offset, double[] vl, int _vl_offset, double[] vlw, int _vlw_offset, double alpha, double beta, double[] dsigma, int _dsigma_offset, int[] idx, int _idx_offset, int[] idxp, int _idxp_offset, int[] idxq, int _idxq_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, int ldgcol, double[] givnum, int _givnum_offset, int ldgnum, org.netlib.util.doubleW c, org.netlib.util.doubleW s, org.netlib.util.intW info) { - lapack.dlasd7(icompq, nl, nr, sqre, k, d, _d_offset, z, _z_offset, zw, _zw_offset, vf, _vf_offset, vfw, _vfw_offset, vl, _vl_offset, vlw, _vlw_offset, alpha, beta, dsigma, _dsigma_offset, idx, _idx_offset, idxp, _idxp_offset, idxq, _idxq_offset, perm, _perm_offset, givptr, givcol, _givcol_offset, ldgcol, givnum, _givnum_offset, ldgnum, c, s, info); + org.netlib.lapack.Dlasd7.dlasd7(icompq, nl, nr, sqre, k, d, _d_offset, z, _z_offset, zw, _zw_offset, vf, _vf_offset, vfw, _vfw_offset, vl, _vl_offset, vlw, _vlw_offset, alpha, beta, dsigma, _dsigma_offset, idx, _idx_offset, idxp, _idxp_offset, idxq, _idxq_offset, perm, _perm_offset, givptr, givcol, _givcol_offset, ldgcol, givnum, _givnum_offset, ldgnum, c, s, info); } protected void dlasd8K(int icompq, int k, double[] d, int _d_offset, double[] z, int _z_offset, double[] vf, int _vf_offset, double[] vl, int _vl_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, int lddifr, double[] dsigma, int _dsigma_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dlasd8(icompq, k, d, _d_offset, z, _z_offset, vf, _vf_offset, vl, _vl_offset, difl, _difl_offset, difr, _difr_offset, lddifr, dsigma, _dsigma_offset, work, _work_offset, info); + org.netlib.lapack.Dlasd8.dlasd8(icompq, k, d, _d_offset, z, _z_offset, vf, _vf_offset, vl, _vl_offset, difl, _difl_offset, difr, _difr_offset, lddifr, dsigma, _dsigma_offset, work, _work_offset, info); } protected void dlasdaK(int icompq, int smlsiz, int n, int sqre, double[] d, int _d_offset, double[] e, int _e_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int[] k, int _k_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, double[] z, int _z_offset, double[] poles, int _poles_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, int ldgcol, int[] perm, int _perm_offset, double[] givnum, int _givnum_offset, double[] c, int _c_offset, double[] s, int _s_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dlasda(icompq, smlsiz, n, sqre, d, _d_offset, e, _e_offset, u, _u_offset, ldu, vt, _vt_offset, k, _k_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, poles, _poles_offset, givptr, _givptr_offset, givcol, _givcol_offset, ldgcol, perm, _perm_offset, givnum, _givnum_offset, c, _c_offset, s, _s_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dlasda.dlasda(icompq, smlsiz, n, sqre, d, _d_offset, e, _e_offset, u, _u_offset, ldu, vt, _vt_offset, k, _k_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, poles, _poles_offset, givptr, _givptr_offset, givcol, _givcol_offset, ldgcol, perm, _perm_offset, givnum, _givnum_offset, c, _c_offset, s, _s_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void dlasdqK(String uplo, int sqre, int n, int ncvt, int nru, int ncc, double[] d, int _d_offset, double[] e, int _e_offset, double[] vt, int _vt_offset, int ldvt, double[] u, int _u_offset, int ldu, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dlasdq(uplo, sqre, n, ncvt, nru, ncc, d, _d_offset, e, _e_offset, vt, _vt_offset, ldvt, u, _u_offset, ldu, c, _c_offset, Ldc, work, _work_offset, info); + org.netlib.lapack.Dlasdq.dlasdq(uplo, sqre, n, ncvt, nru, ncc, d, _d_offset, e, _e_offset, vt, _vt_offset, ldvt, u, _u_offset, ldu, c, _c_offset, Ldc, work, _work_offset, info); } protected void dlasdtK(int n, org.netlib.util.intW lvl, org.netlib.util.intW nd, int[] inode, int _inode_offset, int[] ndiml, int _ndiml_offset, int[] ndimr, int _ndimr_offset, int msub) { - lapack.dlasdt(n, lvl, nd, inode, _inode_offset, ndiml, _ndiml_offset, ndimr, _ndimr_offset, msub); + org.netlib.lapack.Dlasdt.dlasdt(n, lvl, nd, inode, _inode_offset, ndiml, _ndiml_offset, ndimr, _ndimr_offset, msub); } protected void dlasetK(String uplo, int m, int n, double alpha, double beta, double[] a, int _a_offset, int lda) { - lapack.dlaset(uplo, m, n, alpha, beta, a, _a_offset, lda); + org.netlib.lapack.Dlaset.dlaset(uplo, m, n, alpha, beta, a, _a_offset, lda); } protected void dlasq1K(int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dlasq1(n, d, _d_offset, e, _e_offset, work, _work_offset, info); + org.netlib.lapack.Dlasq1.dlasq1(n, d, _d_offset, e, _e_offset, work, _work_offset, info); } protected void dlasq2K(int n, double[] z, int _z_offset, org.netlib.util.intW info) { - lapack.dlasq2(n, z, _z_offset, info); + org.netlib.lapack.Dlasq2.dlasq2(n, z, _z_offset, info); } protected void dlasq3K(int i0, org.netlib.util.intW n0, double[] z, int _z_offset, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW sigma, org.netlib.util.doubleW desig, org.netlib.util.doubleW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee) { - lapack.dlasq3(i0, n0, z, _z_offset, pp, dmin, sigma, desig, qmax, nfail, iter, ndiv, ieee); + org.netlib.lapack.Dlasq3.dlasq3(i0, n0, z, _z_offset, pp, dmin, sigma, desig, qmax, nfail, iter, ndiv, ieee); } protected void dlasq4K(int i0, int n0, double[] z, int _z_offset, int pp, int n0in, double dmin, double dmin1, double dmin2, double dn, double dn1, double dn2, org.netlib.util.doubleW tau, org.netlib.util.intW ttype) { - lapack.dlasq4(i0, n0, z, _z_offset, pp, n0in, dmin, dmin1, dmin2, dn, dn1, dn2, tau, ttype); + org.netlib.lapack.Dlasq4.dlasq4(i0, n0, z, _z_offset, pp, n0in, dmin, dmin1, dmin2, dn, dn1, dn2, tau, ttype); } protected void dlasq5K(int i0, int n0, double[] z, int _z_offset, int pp, double tau, org.netlib.util.doubleW dmin, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dnm1, org.netlib.util.doubleW dnm2, boolean ieee) { - lapack.dlasq5(i0, n0, z, _z_offset, pp, tau, dmin, dmin1, dmin2, dn, dnm1, dnm2, ieee); + org.netlib.lapack.Dlasq5.dlasq5(i0, n0, z, _z_offset, pp, tau, dmin, dmin1, dmin2, dn, dnm1, dnm2, ieee); } protected void dlasq6K(int i0, int n0, double[] z, int _z_offset, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dnm1, org.netlib.util.doubleW dnm2) { - lapack.dlasq6(i0, n0, z, _z_offset, pp, dmin, dmin1, dmin2, dn, dnm1, dnm2); + org.netlib.lapack.Dlasq6.dlasq6(i0, n0, z, _z_offset, pp, dmin, dmin1, dmin2, dn, dnm1, dnm2); } protected void dlasrK(String side, String pivot, String direct, int m, int n, double[] c, int _c_offset, double[] s, int _s_offset, double[] a, int _a_offset, int lda) { - lapack.dlasr(side, pivot, direct, m, n, c, _c_offset, s, _s_offset, a, _a_offset, lda); + org.netlib.lapack.Dlasr.dlasr(side, pivot, direct, m, n, c, _c_offset, s, _s_offset, a, _a_offset, lda); } protected void dlasrtK(String id, int n, double[] d, int _d_offset, org.netlib.util.intW info) { - lapack.dlasrt(id, n, d, _d_offset, info); + org.netlib.lapack.Dlasrt.dlasrt(id, n, d, _d_offset, info); } protected void dlassqK(int n, double[] x, int _x_offset, int incx, org.netlib.util.doubleW scale, org.netlib.util.doubleW sumsq) { - lapack.dlassq(n, x, _x_offset, incx, scale, sumsq); + org.netlib.lapack.Dlassq.dlassq(n, x, _x_offset, incx, scale, sumsq); } protected void dlasv2K(double f, double g, double h, org.netlib.util.doubleW ssmin, org.netlib.util.doubleW ssmax, org.netlib.util.doubleW snr, org.netlib.util.doubleW csr, org.netlib.util.doubleW snl, org.netlib.util.doubleW csl) { - lapack.dlasv2(f, g, h, ssmin, ssmax, snr, csr, snl, csl); + org.netlib.lapack.Dlasv2.dlasv2(f, g, h, ssmin, ssmax, snr, csr, snl, csl); } protected void dlaswpK(int n, double[] a, int _a_offset, int lda, int k1, int k2, int[] ipiv, int _ipiv_offset, int incx) { - lapack.dlaswp(n, a, _a_offset, lda, k1, k2, ipiv, _ipiv_offset, incx); + org.netlib.lapack.Dlaswp.dlaswp(n, a, _a_offset, lda, k1, k2, ipiv, _ipiv_offset, incx); } protected void dlasy2K(boolean ltranl, boolean ltranr, int isgn, int n1, int n2, double[] tl, int _tl_offset, int ldtl, double[] tr, int _tr_offset, int ldtr, double[] b, int _b_offset, int ldb, org.netlib.util.doubleW scale, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW xnorm, org.netlib.util.intW info) { - lapack.dlasy2(ltranl, ltranr, isgn, n1, n2, tl, _tl_offset, ldtl, tr, _tr_offset, ldtr, b, _b_offset, ldb, scale, x, _x_offset, ldx, xnorm, info); + org.netlib.lapack.Dlasy2.dlasy2(ltranl, ltranr, isgn, n1, n2, tl, _tl_offset, ldtl, tr, _tr_offset, ldtr, b, _b_offset, ldb, scale, x, _x_offset, ldx, xnorm, info); } protected void dlasyfK(String uplo, int n, int nb, org.netlib.util.intW kb, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] w, int _w_offset, int ldw, org.netlib.util.intW info) { - lapack.dlasyf(uplo, n, nb, kb, a, _a_offset, lda, ipiv, _ipiv_offset, w, _w_offset, ldw, info); + org.netlib.lapack.Dlasyf.dlasyf(uplo, n, nb, kb, a, _a_offset, lda, ipiv, _ipiv_offset, w, _w_offset, ldw, info); } protected void dlatbsK(String uplo, String trans, String diag, String normin, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] x, int _x_offset, org.netlib.util.doubleW scale, double[] cnorm, int _cnorm_offset, org.netlib.util.intW info) { - lapack.dlatbs(uplo, trans, diag, normin, n, kd, ab, _ab_offset, ldab, x, _x_offset, scale, cnorm, _cnorm_offset, info); + org.netlib.lapack.Dlatbs.dlatbs(uplo, trans, diag, normin, n, kd, ab, _ab_offset, ldab, x, _x_offset, scale, cnorm, _cnorm_offset, info); } protected void dlatdfK(int ijob, int n, double[] z, int _z_offset, int ldz, double[] rhs, int _rhs_offset, org.netlib.util.doubleW rdsum, org.netlib.util.doubleW rdscal, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset) { - lapack.dlatdf(ijob, n, z, _z_offset, ldz, rhs, _rhs_offset, rdsum, rdscal, ipiv, _ipiv_offset, jpiv, _jpiv_offset); + org.netlib.lapack.Dlatdf.dlatdf(ijob, n, z, _z_offset, ldz, rhs, _rhs_offset, rdsum, rdscal, ipiv, _ipiv_offset, jpiv, _jpiv_offset); } protected void dlatpsK(String uplo, String trans, String diag, String normin, int n, double[] ap, int _ap_offset, double[] x, int _x_offset, org.netlib.util.doubleW scale, double[] cnorm, int _cnorm_offset, org.netlib.util.intW info) { - lapack.dlatps(uplo, trans, diag, normin, n, ap, _ap_offset, x, _x_offset, scale, cnorm, _cnorm_offset, info); + org.netlib.lapack.Dlatps.dlatps(uplo, trans, diag, normin, n, ap, _ap_offset, x, _x_offset, scale, cnorm, _cnorm_offset, info); } protected void dlatrdK(String uplo, int n, int nb, double[] a, int _a_offset, int lda, double[] e, int _e_offset, double[] tau, int _tau_offset, double[] w, int _w_offset, int ldw) { - lapack.dlatrd(uplo, n, nb, a, _a_offset, lda, e, _e_offset, tau, _tau_offset, w, _w_offset, ldw); + org.netlib.lapack.Dlatrd.dlatrd(uplo, n, nb, a, _a_offset, lda, e, _e_offset, tau, _tau_offset, w, _w_offset, ldw); } protected void dlatrsK(String uplo, String trans, String diag, String normin, int n, double[] a, int _a_offset, int lda, double[] x, int _x_offset, org.netlib.util.doubleW scale, double[] cnorm, int _cnorm_offset, org.netlib.util.intW info) { - lapack.dlatrs(uplo, trans, diag, normin, n, a, _a_offset, lda, x, _x_offset, scale, cnorm, _cnorm_offset, info); + org.netlib.lapack.Dlatrs.dlatrs(uplo, trans, diag, normin, n, a, _a_offset, lda, x, _x_offset, scale, cnorm, _cnorm_offset, info); } protected void dlatrzK(int m, int n, int l, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset) { - lapack.dlatrz(m, n, l, a, _a_offset, lda, tau, _tau_offset, work, _work_offset); + org.netlib.lapack.Dlatrz.dlatrz(m, n, l, a, _a_offset, lda, tau, _tau_offset, work, _work_offset); } protected void dlatzmK(String side, int m, int n, double[] v, int _v_offset, int incv, double tau, double[] c1, int _c1_offset, double[] c2, int _c2_offset, int Ldc, double[] work, int _work_offset) { - lapack.dlatzm(side, m, n, v, _v_offset, incv, tau, c1, _c1_offset, c2, _c2_offset, Ldc, work, _work_offset); + org.netlib.lapack.Dlatzm.dlatzm(side, m, n, v, _v_offset, incv, tau, c1, _c1_offset, c2, _c2_offset, Ldc, work, _work_offset); } protected void dlauu2K(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info) { - lapack.dlauu2(uplo, n, a, _a_offset, lda, info); + org.netlib.lapack.Dlauu2.dlauu2(uplo, n, a, _a_offset, lda, info); } protected void dlauumK(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info) { - lapack.dlauum(uplo, n, a, _a_offset, lda, info); + org.netlib.lapack.Dlauum.dlauum(uplo, n, a, _a_offset, lda, info); } protected void dlazq3K(int i0, org.netlib.util.intW n0, double[] z, int _z_offset, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW sigma, org.netlib.util.doubleW desig, org.netlib.util.doubleW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee, org.netlib.util.intW ttype, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dn1, org.netlib.util.doubleW dn2, org.netlib.util.doubleW tau) { - lapack.dlazq3(i0, n0, z, _z_offset, pp, dmin, sigma, desig, qmax, nfail, iter, ndiv, ieee, ttype, dmin1, dmin2, dn, dn1, dn2, tau); + org.netlib.lapack.Dlazq3.dlazq3(i0, n0, z, _z_offset, pp, dmin, sigma, desig, qmax, nfail, iter, ndiv, ieee, ttype, dmin1, dmin2, dn, dn1, dn2, tau); } protected void dlazq4K(int i0, int n0, double[] z, int _z_offset, int pp, int n0in, double dmin, double dmin1, double dmin2, double dn, double dn1, double dn2, org.netlib.util.doubleW tau, org.netlib.util.intW ttype, org.netlib.util.doubleW g) { - lapack.dlazq4(i0, n0, z, _z_offset, pp, n0in, dmin, dmin1, dmin2, dn, dn1, dn2, tau, ttype, g); + org.netlib.lapack.Dlazq4.dlazq4(i0, n0, z, _z_offset, pp, n0in, dmin, dmin1, dmin2, dn, dn1, dn2, tau, ttype, g); } protected void dopgtrK(String uplo, int n, double[] ap, int _ap_offset, double[] tau, int _tau_offset, double[] q, int _q_offset, int ldq, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dopgtr(uplo, n, ap, _ap_offset, tau, _tau_offset, q, _q_offset, ldq, work, _work_offset, info); + org.netlib.lapack.Dopgtr.dopgtr(uplo, n, ap, _ap_offset, tau, _tau_offset, q, _q_offset, ldq, work, _work_offset, info); } protected void dopmtrK(String side, String uplo, String trans, int m, int n, double[] ap, int _ap_offset, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dopmtr(side, uplo, trans, m, n, ap, _ap_offset, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + org.netlib.lapack.Dopmtr.dopmtr(side, uplo, trans, m, n, ap, _ap_offset, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); } protected void dorg2lK(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dorg2l(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + org.netlib.lapack.Dorg2l.dorg2l(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); } protected void dorg2rK(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dorg2r(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + org.netlib.lapack.Dorg2r.dorg2r(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); } protected void dorgbrK(String vect, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dorgbr(vect, m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Dorgbr.dorgbr(vect, m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); } protected void dorghrK(int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dorghr(n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Dorghr.dorghr(n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); } protected void dorgl2K(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dorgl2(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + org.netlib.lapack.Dorgl2.dorgl2(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); } protected void dorglqK(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dorglq(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Dorglq.dorglq(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); } protected void dorgqlK(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dorgql(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Dorgql.dorgql(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); } protected void dorgqrK(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dorgqr(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Dorgqr.dorgqr(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); } protected void dorgr2K(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dorgr2(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + org.netlib.lapack.Dorgr2.dorgr2(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); } protected void dorgrqK(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dorgrq(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Dorgrq.dorgrq(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); } protected void dorgtrK(String uplo, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dorgtr(uplo, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Dorgtr.dorgtr(uplo, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); } protected void dorm2lK(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dorm2l(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + org.netlib.lapack.Dorm2l.dorm2l(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); } protected void dorm2rK(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dorm2r(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + org.netlib.lapack.Dorm2r.dorm2r(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); } protected void dormbrK(String vect, String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dormbr(vect, side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + org.netlib.lapack.Dormbr.dormbr(vect, side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); } protected void dormhrK(String side, String trans, int m, int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dormhr(side, trans, m, n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + org.netlib.lapack.Dormhr.dormhr(side, trans, m, n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); } protected void dorml2K(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dorml2(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + org.netlib.lapack.Dorml2.dorml2(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); } protected void dormlqK(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dormlq(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + org.netlib.lapack.Dormlq.dormlq(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); } protected void dormqlK(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dormql(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + org.netlib.lapack.Dormql.dormql(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); } protected void dormqrK(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dormqr(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + org.netlib.lapack.Dormqr.dormqr(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); } protected void dormr2K(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dormr2(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + org.netlib.lapack.Dormr2.dormr2(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); } protected void dormr3K(String side, String trans, int m, int n, int k, int l, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dormr3(side, trans, m, n, k, l, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + org.netlib.lapack.Dormr3.dormr3(side, trans, m, n, k, l, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); } protected void dormrqK(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dormrq(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + org.netlib.lapack.Dormrq.dormrq(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); } protected void dormrzK(String side, String trans, int m, int n, int k, int l, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dormrz(side, trans, m, n, k, l, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + org.netlib.lapack.Dormrz.dormrz(side, trans, m, n, k, l, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); } protected void dormtrK(String side, String uplo, String trans, int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dormtr(side, uplo, trans, m, n, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + org.netlib.lapack.Dormtr.dormtr(side, uplo, trans, m, n, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); } protected void dpbconK(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dpbcon(uplo, n, kd, ab, _ab_offset, ldab, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dpbcon.dpbcon(uplo, n, kd, ab, _ab_offset, ldab, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); } protected void dpbequK(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] s, int _s_offset, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info) { - lapack.dpbequ(uplo, n, kd, ab, _ab_offset, ldab, s, _s_offset, scond, amax, info); + org.netlib.lapack.Dpbequ.dpbequ(uplo, n, kd, ab, _ab_offset, ldab, s, _s_offset, scond, amax, info); } protected void dpbrfsK(String uplo, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] afb, int _afb_offset, int ldafb, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dpbrfs(uplo, n, kd, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dpbrfs.dpbrfs(uplo, n, kd, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void dpbstfK(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, org.netlib.util.intW info) { - lapack.dpbstf(uplo, n, kd, ab, _ab_offset, ldab, info); + org.netlib.lapack.Dpbstf.dpbstf(uplo, n, kd, ab, _ab_offset, ldab, info); } protected void dpbsvK(String uplo, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.dpbsv(uplo, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, info); + org.netlib.lapack.Dpbsv.dpbsv(uplo, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, info); } protected void dpbsvxK(String fact, String uplo, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] afb, int _afb_offset, int ldafb, org.netlib.util.StringW equed, double[] s, int _s_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dpbsvx(fact, uplo, n, kd, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, equed, s, _s_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dpbsvx.dpbsvx(fact, uplo, n, kd, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, equed, s, _s_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void dpbtf2K(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, org.netlib.util.intW info) { - lapack.dpbtf2(uplo, n, kd, ab, _ab_offset, ldab, info); + org.netlib.lapack.Dpbtf2.dpbtf2(uplo, n, kd, ab, _ab_offset, ldab, info); } protected void dpbtrfK(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, org.netlib.util.intW info) { - lapack.dpbtrf(uplo, n, kd, ab, _ab_offset, ldab, info); + org.netlib.lapack.Dpbtrf.dpbtrf(uplo, n, kd, ab, _ab_offset, ldab, info); } protected void dpbtrsK(String uplo, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.dpbtrs(uplo, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, info); + org.netlib.lapack.Dpbtrs.dpbtrs(uplo, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, info); } protected void dpoconK(String uplo, int n, double[] a, int _a_offset, int lda, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dpocon(uplo, n, a, _a_offset, lda, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dpocon.dpocon(uplo, n, a, _a_offset, lda, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); } protected void dpoequK(int n, double[] a, int _a_offset, int lda, double[] s, int _s_offset, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info) { - lapack.dpoequ(n, a, _a_offset, lda, s, _s_offset, scond, amax, info); + org.netlib.lapack.Dpoequ.dpoequ(n, a, _a_offset, lda, s, _s_offset, scond, amax, info); } protected void dporfsK(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dporfs(uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dporfs.dporfs(uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void dposvK(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.dposv(uplo, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, info); + org.netlib.lapack.Dposv.dposv(uplo, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, info); } protected void dposvxK(String fact, String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, org.netlib.util.StringW equed, double[] s, int _s_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dposvx(fact, uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, equed, s, _s_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dposvx.dposvx(fact, uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, equed, s, _s_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void dpotf2K(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info) { - lapack.dpotf2(uplo, n, a, _a_offset, lda, info); + org.netlib.lapack.Dpotf2.dpotf2(uplo, n, a, _a_offset, lda, info); } protected void dpotrfK(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info) { - lapack.dpotrf(uplo, n, a, _a_offset, lda, info); + org.netlib.lapack.Dpotrf.dpotrf(uplo, n, a, _a_offset, lda, info); } protected void dpotriK(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info) { - lapack.dpotri(uplo, n, a, _a_offset, lda, info); + org.netlib.lapack.Dpotri.dpotri(uplo, n, a, _a_offset, lda, info); } protected void dpotrsK(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.dpotrs(uplo, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, info); + org.netlib.lapack.Dpotrs.dpotrs(uplo, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, info); } protected void dppconK(String uplo, int n, double[] ap, int _ap_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dppcon(uplo, n, ap, _ap_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dppcon.dppcon(uplo, n, ap, _ap_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); } protected void dppequK(String uplo, int n, double[] ap, int _ap_offset, double[] s, int _s_offset, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info) { - lapack.dppequ(uplo, n, ap, _ap_offset, s, _s_offset, scond, amax, info); + org.netlib.lapack.Dppequ.dppequ(uplo, n, ap, _ap_offset, s, _s_offset, scond, amax, info); } protected void dpprfsK(String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] afp, int _afp_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dpprfs(uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dpprfs.dpprfs(uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void dppsvK(String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.dppsv(uplo, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, info); + org.netlib.lapack.Dppsv.dppsv(uplo, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, info); } protected void dppsvxK(String fact, String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] afp, int _afp_offset, org.netlib.util.StringW equed, double[] s, int _s_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dppsvx(fact, uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, equed, s, _s_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dppsvx.dppsvx(fact, uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, equed, s, _s_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void dpptrfK(String uplo, int n, double[] ap, int _ap_offset, org.netlib.util.intW info) { - lapack.dpptrf(uplo, n, ap, _ap_offset, info); + org.netlib.lapack.Dpptrf.dpptrf(uplo, n, ap, _ap_offset, info); } protected void dpptriK(String uplo, int n, double[] ap, int _ap_offset, org.netlib.util.intW info) { - lapack.dpptri(uplo, n, ap, _ap_offset, info); + org.netlib.lapack.Dpptri.dpptri(uplo, n, ap, _ap_offset, info); } protected void dpptrsK(String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.dpptrs(uplo, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, info); + org.netlib.lapack.Dpptrs.dpptrs(uplo, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, info); } protected void dptconK(int n, double[] d, int _d_offset, double[] e, int _e_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dptcon(n, d, _d_offset, e, _e_offset, anorm, rcond, work, _work_offset, info); + org.netlib.lapack.Dptcon.dptcon(n, d, _d_offset, e, _e_offset, anorm, rcond, work, _work_offset, info); } protected void dpteqrK(String compz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dpteqr(compz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, info); + org.netlib.lapack.Dpteqr.dpteqr(compz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, info); } protected void dptrfsK(int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] df, int _df_offset, double[] ef, int _ef_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dptrfs(n, nrhs, d, _d_offset, e, _e_offset, df, _df_offset, ef, _ef_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, info); + org.netlib.lapack.Dptrfs.dptrfs(n, nrhs, d, _d_offset, e, _e_offset, df, _df_offset, ef, _ef_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, info); } protected void dptsvK(int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.dptsv(n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb, info); + org.netlib.lapack.Dptsv.dptsv(n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb, info); } protected void dptsvxK(String fact, int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] df, int _df_offset, double[] ef, int _ef_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dptsvx(fact, n, nrhs, d, _d_offset, e, _e_offset, df, _df_offset, ef, _ef_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, info); + org.netlib.lapack.Dptsvx.dptsvx(fact, n, nrhs, d, _d_offset, e, _e_offset, df, _df_offset, ef, _ef_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, info); } protected void dpttrfK(int n, double[] d, int _d_offset, double[] e, int _e_offset, org.netlib.util.intW info) { - lapack.dpttrf(n, d, _d_offset, e, _e_offset, info); + org.netlib.lapack.Dpttrf.dpttrf(n, d, _d_offset, e, _e_offset, info); } protected void dpttrsK(int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.dpttrs(n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb, info); + org.netlib.lapack.Dpttrs.dpttrs(n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb, info); } protected void dptts2K(int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] b, int _b_offset, int ldb) { - lapack.dptts2(n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb); + org.netlib.lapack.Dptts2.dptts2(n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb); } protected void drsclK(int n, double sa, double[] sx, int _sx_offset, int incx) { - lapack.drscl(n, sa, sx, _sx_offset, incx); + org.netlib.lapack.Drscl.drscl(n, sa, sx, _sx_offset, incx); } protected void dsbevK(String jobz, String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dsbev(jobz, uplo, n, kd, ab, _ab_offset, ldab, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); + org.netlib.lapack.Dsbev.dsbev(jobz, uplo, n, kd, ab, _ab_offset, ldab, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); } protected void dsbevdK(String jobz, String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - lapack.dsbevd(jobz, uplo, n, kd, ab, _ab_offset, ldab, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + org.netlib.lapack.Dsbevd.dsbevd(jobz, uplo, n, kd, ab, _ab_offset, ldab, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); } protected void dsbevxK(String jobz, String range, String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] q, int _q_offset, int ldq, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - lapack.dsbevx(jobz, range, uplo, n, kd, ab, _ab_offset, ldab, q, _q_offset, ldq, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + org.netlib.lapack.Dsbevx.dsbevx(jobz, range, uplo, n, kd, ab, _ab_offset, ldab, q, _q_offset, ldq, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); } protected void dsbgstK(String vect, String uplo, int n, int ka, int kb, double[] ab, int _ab_offset, int ldab, double[] bb, int _bb_offset, int ldbb, double[] x, int _x_offset, int ldx, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dsbgst(vect, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, x, _x_offset, ldx, work, _work_offset, info); + org.netlib.lapack.Dsbgst.dsbgst(vect, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, x, _x_offset, ldx, work, _work_offset, info); } protected void dsbgvK(String jobz, String uplo, int n, int ka, int kb, double[] ab, int _ab_offset, int ldab, double[] bb, int _bb_offset, int ldbb, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dsbgv(jobz, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); + org.netlib.lapack.Dsbgv.dsbgv(jobz, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); } protected void dsbgvdK(String jobz, String uplo, int n, int ka, int kb, double[] ab, int _ab_offset, int ldab, double[] bb, int _bb_offset, int ldbb, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - lapack.dsbgvd(jobz, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + org.netlib.lapack.Dsbgvd.dsbgvd(jobz, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); } protected void dsbgvxK(String jobz, String range, String uplo, int n, int ka, int kb, double[] ab, int _ab_offset, int ldab, double[] bb, int _bb_offset, int ldbb, double[] q, int _q_offset, int ldq, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - lapack.dsbgvx(jobz, range, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, q, _q_offset, ldq, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + org.netlib.lapack.Dsbgvx.dsbgvx(jobz, range, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, q, _q_offset, ldq, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); } protected void dsbtrdK(String vect, String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] d, int _d_offset, double[] e, int _e_offset, double[] q, int _q_offset, int ldq, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dsbtrd(vect, uplo, n, kd, ab, _ab_offset, ldab, d, _d_offset, e, _e_offset, q, _q_offset, ldq, work, _work_offset, info); + org.netlib.lapack.Dsbtrd.dsbtrd(vect, uplo, n, kd, ab, _ab_offset, ldab, d, _d_offset, e, _e_offset, q, _q_offset, ldq, work, _work_offset, info); } protected void dsgesvK(int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] work, int _work_offset, float[] swork, int _swork_offset, org.netlib.util.intW iter, org.netlib.util.intW info) { - lapack.dsgesv(n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, work, _work_offset, swork, _swork_offset, iter, info); + org.netlib.lapack.Dsgesv.dsgesv(n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, work, _work_offset, swork, _swork_offset, iter, info); } protected void dspconK(String uplo, int n, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dspcon(uplo, n, ap, _ap_offset, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dspcon.dspcon(uplo, n, ap, _ap_offset, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); } protected void dspevK(String jobz, String uplo, int n, double[] ap, int _ap_offset, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dspev(jobz, uplo, n, ap, _ap_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); + org.netlib.lapack.Dspev.dspev(jobz, uplo, n, ap, _ap_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); } protected void dspevdK(String jobz, String uplo, int n, double[] ap, int _ap_offset, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - lapack.dspevd(jobz, uplo, n, ap, _ap_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + org.netlib.lapack.Dspevd.dspevd(jobz, uplo, n, ap, _ap_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); } protected void dspevxK(String jobz, String range, String uplo, int n, double[] ap, int _ap_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - lapack.dspevx(jobz, range, uplo, n, ap, _ap_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + org.netlib.lapack.Dspevx.dspevx(jobz, range, uplo, n, ap, _ap_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); } protected void dspgstK(int itype, String uplo, int n, double[] ap, int _ap_offset, double[] bp, int _bp_offset, org.netlib.util.intW info) { - lapack.dspgst(itype, uplo, n, ap, _ap_offset, bp, _bp_offset, info); + org.netlib.lapack.Dspgst.dspgst(itype, uplo, n, ap, _ap_offset, bp, _bp_offset, info); } protected void dspgvK(int itype, String jobz, String uplo, int n, double[] ap, int _ap_offset, double[] bp, int _bp_offset, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dspgv(itype, jobz, uplo, n, ap, _ap_offset, bp, _bp_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); + org.netlib.lapack.Dspgv.dspgv(itype, jobz, uplo, n, ap, _ap_offset, bp, _bp_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); } protected void dspgvdK(int itype, String jobz, String uplo, int n, double[] ap, int _ap_offset, double[] bp, int _bp_offset, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - lapack.dspgvd(itype, jobz, uplo, n, ap, _ap_offset, bp, _bp_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + org.netlib.lapack.Dspgvd.dspgvd(itype, jobz, uplo, n, ap, _ap_offset, bp, _bp_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); } protected void dspgvxK(int itype, String jobz, String range, String uplo, int n, double[] ap, int _ap_offset, double[] bp, int _bp_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - lapack.dspgvx(itype, jobz, range, uplo, n, ap, _ap_offset, bp, _bp_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + org.netlib.lapack.Dspgvx.dspgvx(itype, jobz, range, uplo, n, ap, _ap_offset, bp, _bp_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); } protected void dsprfsK(String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] afp, int _afp_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dsprfs(uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dsprfs.dsprfs(uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void dspsvK(String uplo, int n, int nrhs, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.dspsv(uplo, n, nrhs, ap, _ap_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + org.netlib.lapack.Dspsv.dspsv(uplo, n, nrhs, ap, _ap_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, info); } protected void dspsvxK(String fact, String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] afp, int _afp_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dspsvx(fact, uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dspsvx.dspsvx(fact, uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void dsptrdK(String uplo, int n, double[] ap, int _ap_offset, double[] d, int _d_offset, double[] e, int _e_offset, double[] tau, int _tau_offset, org.netlib.util.intW info) { - lapack.dsptrd(uplo, n, ap, _ap_offset, d, _d_offset, e, _e_offset, tau, _tau_offset, info); + org.netlib.lapack.Dsptrd.dsptrd(uplo, n, ap, _ap_offset, d, _d_offset, e, _e_offset, tau, _tau_offset, info); } protected void dsptrfK(String uplo, int n, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { - lapack.dsptrf(uplo, n, ap, _ap_offset, ipiv, _ipiv_offset, info); + org.netlib.lapack.Dsptrf.dsptrf(uplo, n, ap, _ap_offset, ipiv, _ipiv_offset, info); } protected void dsptriK(String uplo, int n, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dsptri(uplo, n, ap, _ap_offset, ipiv, _ipiv_offset, work, _work_offset, info); + org.netlib.lapack.Dsptri.dsptri(uplo, n, ap, _ap_offset, ipiv, _ipiv_offset, work, _work_offset, info); } protected void dsptrsK(String uplo, int n, int nrhs, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.dsptrs(uplo, n, nrhs, ap, _ap_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + org.netlib.lapack.Dsptrs.dsptrs(uplo, n, nrhs, ap, _ap_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, info); } protected void dstebzK(String range, String order, int n, double vl, double vu, int il, int iu, double abstol, double[] d, int _d_offset, double[] e, int _e_offset, org.netlib.util.intW m, org.netlib.util.intW nsplit, double[] w, int _w_offset, int[] iblock, int _iblock_offset, int[] isplit, int _isplit_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dstebz(range, order, n, vl, vu, il, iu, abstol, d, _d_offset, e, _e_offset, m, nsplit, w, _w_offset, iblock, _iblock_offset, isplit, _isplit_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dstebz.dstebz(range, order, n, vl, vu, il, iu, abstol, d, _d_offset, e, _e_offset, m, nsplit, w, _w_offset, iblock, _iblock_offset, isplit, _isplit_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void dstedcK(String compz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - lapack.dstedc(compz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + org.netlib.lapack.Dstedc.dstedc(compz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); } protected void dstegrK(String jobz, String range, int n, double[] d, int _d_offset, double[] e, int _e_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - lapack.dstegr(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + org.netlib.lapack.Dstegr.dstegr(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); } protected void dsteinK(int n, double[] d, int _d_offset, double[] e, int _e_offset, int m, double[] w, int _w_offset, int[] iblock, int _iblock_offset, int[] isplit, int _isplit_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - lapack.dstein(n, d, _d_offset, e, _e_offset, m, w, _w_offset, iblock, _iblock_offset, isplit, _isplit_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + org.netlib.lapack.Dstein.dstein(n, d, _d_offset, e, _e_offset, m, w, _w_offset, iblock, _iblock_offset, isplit, _isplit_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); } protected void dstemrK(String jobz, String range, int n, double[] d, int _d_offset, double[] e, int _e_offset, double vl, double vu, int il, int iu, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, int nzc, int[] isuppz, int _isuppz_offset, org.netlib.util.booleanW tryrac, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - lapack.dstemr(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, m, w, _w_offset, z, _z_offset, ldz, nzc, isuppz, _isuppz_offset, tryrac, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + org.netlib.lapack.Dstemr.dstemr(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, m, w, _w_offset, z, _z_offset, ldz, nzc, isuppz, _isuppz_offset, tryrac, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); } protected void dsteqrK(String compz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dsteqr(compz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, info); + org.netlib.lapack.Dsteqr.dsteqr(compz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, info); } protected void dsterfK(int n, double[] d, int _d_offset, double[] e, int _e_offset, org.netlib.util.intW info) { - lapack.dsterf(n, d, _d_offset, e, _e_offset, info); + org.netlib.lapack.Dsterf.dsterf(n, d, _d_offset, e, _e_offset, info); } protected void dstevK(String jobz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dstev(jobz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, info); + org.netlib.lapack.Dstev.dstev(jobz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, info); } protected void dstevdK(String jobz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - lapack.dstevd(jobz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + org.netlib.lapack.Dstevd.dstevd(jobz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); } protected void dstevrK(String jobz, String range, int n, double[] d, int _d_offset, double[] e, int _e_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - lapack.dstevr(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + org.netlib.lapack.Dstevr.dstevr(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); } protected void dstevxK(String jobz, String range, int n, double[] d, int _d_offset, double[] e, int _e_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - lapack.dstevx(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + org.netlib.lapack.Dstevx.dstevx(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); } protected void dsyconK(String uplo, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dsycon(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dsycon.dsycon(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); } protected void dsyevK(String jobz, String uplo, int n, double[] a, int _a_offset, int lda, double[] w, int _w_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dsyev(jobz, uplo, n, a, _a_offset, lda, w, _w_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Dsyev.dsyev(jobz, uplo, n, a, _a_offset, lda, w, _w_offset, work, _work_offset, lwork, info); } protected void dsyevdK(String jobz, String uplo, int n, double[] a, int _a_offset, int lda, double[] w, int _w_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - lapack.dsyevd(jobz, uplo, n, a, _a_offset, lda, w, _w_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + org.netlib.lapack.Dsyevd.dsyevd(jobz, uplo, n, a, _a_offset, lda, w, _w_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); } protected void dsyevrK(String jobz, String range, String uplo, int n, double[] a, int _a_offset, int lda, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - lapack.dsyevr(jobz, range, uplo, n, a, _a_offset, lda, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + org.netlib.lapack.Dsyevr.dsyevr(jobz, range, uplo, n, a, _a_offset, lda, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); } protected void dsyevxK(String jobz, String range, String uplo, int n, double[] a, int _a_offset, int lda, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - lapack.dsyevx(jobz, range, uplo, n, a, _a_offset, lda, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, ifail, _ifail_offset, info); + org.netlib.lapack.Dsyevx.dsyevx(jobz, range, uplo, n, a, _a_offset, lda, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, ifail, _ifail_offset, info); } protected void dsygs2K(int itype, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.dsygs2(itype, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, info); + org.netlib.lapack.Dsygs2.dsygs2(itype, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, info); } protected void dsygstK(int itype, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.dsygst(itype, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, info); + org.netlib.lapack.Dsygst.dsygst(itype, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, info); } protected void dsygvK(int itype, String jobz, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] w, int _w_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dsygv(itype, jobz, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, w, _w_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Dsygv.dsygv(itype, jobz, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, w, _w_offset, work, _work_offset, lwork, info); } protected void dsygvdK(int itype, String jobz, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] w, int _w_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - lapack.dsygvd(itype, jobz, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, w, _w_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + org.netlib.lapack.Dsygvd.dsygvd(itype, jobz, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, w, _w_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); } protected void dsygvxK(int itype, String jobz, String range, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - lapack.dsygvx(itype, jobz, range, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, ifail, _ifail_offset, info); + org.netlib.lapack.Dsygvx.dsygvx(itype, jobz, range, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, ifail, _ifail_offset, info); } protected void dsyrfsK(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dsyrfs(uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dsyrfs.dsyrfs(uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void dsysvK(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dsysv(uplo, n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, work, _work_offset, lwork, info); + org.netlib.lapack.Dsysv.dsysv(uplo, n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, work, _work_offset, lwork, info); } protected void dsysvxK(String fact, String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dsysvx(fact, uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, lwork, iwork, _iwork_offset, info); + org.netlib.lapack.Dsysvx.dsysvx(fact, uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, lwork, iwork, _iwork_offset, info); } protected void dsytd2K(String uplo, int n, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tau, int _tau_offset, org.netlib.util.intW info) { - lapack.dsytd2(uplo, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tau, _tau_offset, info); + org.netlib.lapack.Dsytd2.dsytd2(uplo, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tau, _tau_offset, info); } protected void dsytf2K(String uplo, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { - lapack.dsytf2(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, info); + org.netlib.lapack.Dsytf2.dsytf2(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, info); } protected void dsytrdK(String uplo, int n, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dsytrd(uplo, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tau, _tau_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Dsytrd.dsytrd(uplo, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tau, _tau_offset, work, _work_offset, lwork, info); } protected void dsytrfK(String uplo, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dsytrf(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Dsytrf.dsytrf(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, work, _work_offset, lwork, info); } protected void dsytriK(String uplo, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dsytri(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, work, _work_offset, info); + org.netlib.lapack.Dsytri.dsytri(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, work, _work_offset, info); } protected void dsytrsK(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.dsytrs(uplo, n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + org.netlib.lapack.Dsytrs.dsytrs(uplo, n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, info); } protected void dtbconK(String norm, String uplo, String diag, int n, int kd, double[] ab, int _ab_offset, int ldab, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dtbcon(norm, uplo, diag, n, kd, ab, _ab_offset, ldab, rcond, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dtbcon.dtbcon(norm, uplo, diag, n, kd, ab, _ab_offset, ldab, rcond, work, _work_offset, iwork, _iwork_offset, info); } protected void dtbrfsK(String uplo, String trans, String diag, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dtbrfs(uplo, trans, diag, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dtbrfs.dtbrfs(uplo, trans, diag, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void dtbtrsK(String uplo, String trans, String diag, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.dtbtrs(uplo, trans, diag, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, info); + org.netlib.lapack.Dtbtrs.dtbtrs(uplo, trans, diag, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, info); } protected void dtgevcK(String side, String howmny, boolean[] select, int _select_offset, int n, double[] s, int _s_offset, int lds, double[] p, int _p_offset, int ldp, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dtgevc(side, howmny, select, _select_offset, n, s, _s_offset, lds, p, _p_offset, ldp, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, mm, m, work, _work_offset, info); + org.netlib.lapack.Dtgevc.dtgevc(side, howmny, select, _select_offset, n, s, _s_offset, lds, p, _p_offset, ldp, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, mm, m, work, _work_offset, info); } protected void dtgex2K(boolean wantq, boolean wantz, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, int j1, int n1, int n2, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dtgex2(wantq, wantz, n, a, _a_offset, lda, b, _b_offset, ldb, q, _q_offset, ldq, z, _z_offset, ldz, j1, n1, n2, work, _work_offset, lwork, info); + org.netlib.lapack.Dtgex2.dtgex2(wantq, wantz, n, a, _a_offset, lda, b, _b_offset, ldb, q, _q_offset, ldq, z, _z_offset, ldz, j1, n1, n2, work, _work_offset, lwork, info); } protected void dtgexcK(boolean wantq, boolean wantz, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, org.netlib.util.intW ifst, org.netlib.util.intW ilst, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dtgexc(wantq, wantz, n, a, _a_offset, lda, b, _b_offset, ldb, q, _q_offset, ldq, z, _z_offset, ldz, ifst, ilst, work, _work_offset, lwork, info); + org.netlib.lapack.Dtgexc.dtgexc(wantq, wantz, n, a, _a_offset, lda, b, _b_offset, ldb, q, _q_offset, ldq, z, _z_offset, ldz, ifst, ilst, work, _work_offset, lwork, info); } protected void dtgsenK(int ijob, boolean wantq, boolean wantz, boolean[] select, int _select_offset, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, org.netlib.util.intW m, org.netlib.util.doubleW pl, org.netlib.util.doubleW pr, double[] dif, int _dif_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - lapack.dtgsen(ijob, wantq, wantz, select, _select_offset, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, q, _q_offset, ldq, z, _z_offset, ldz, m, pl, pr, dif, _dif_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + org.netlib.lapack.Dtgsen.dtgsen(ijob, wantq, wantz, select, _select_offset, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, q, _q_offset, ldq, z, _z_offset, ldz, m, pl, pr, dif, _dif_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); } protected void dtgsjaK(String jobu, String jobv, String jobq, int m, int p, int n, int k, int l, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double tola, double tolb, double[] alpha, int _alpha_offset, double[] beta, int _beta_offset, double[] u, int _u_offset, int ldu, double[] v, int _v_offset, int ldv, double[] q, int _q_offset, int ldq, double[] work, int _work_offset, org.netlib.util.intW ncycle, org.netlib.util.intW info) { - lapack.dtgsja(jobu, jobv, jobq, m, p, n, k, l, a, _a_offset, lda, b, _b_offset, ldb, tola, tolb, alpha, _alpha_offset, beta, _beta_offset, u, _u_offset, ldu, v, _v_offset, ldv, q, _q_offset, ldq, work, _work_offset, ncycle, info); + org.netlib.lapack.Dtgsja.dtgsja(jobu, jobv, jobq, m, p, n, k, l, a, _a_offset, lda, b, _b_offset, ldb, tola, tolb, alpha, _alpha_offset, beta, _beta_offset, u, _u_offset, ldu, v, _v_offset, ldv, q, _q_offset, ldq, work, _work_offset, ncycle, info); } protected void dtgsnaK(String job, String howmny, boolean[] select, int _select_offset, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] s, int _s_offset, double[] dif, int _dif_offset, int mm, org.netlib.util.intW m, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dtgsna(job, howmny, select, _select_offset, n, a, _a_offset, lda, b, _b_offset, ldb, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, s, _s_offset, dif, _dif_offset, mm, m, work, _work_offset, lwork, iwork, _iwork_offset, info); + org.netlib.lapack.Dtgsna.dtgsna(job, howmny, select, _select_offset, n, a, _a_offset, lda, b, _b_offset, ldb, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, s, _s_offset, dif, _dif_offset, mm, m, work, _work_offset, lwork, iwork, _iwork_offset, info); } protected void dtgsy2K(String trans, int ijob, int m, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] c, int _c_offset, int Ldc, double[] d, int _d_offset, int ldd, double[] e, int _e_offset, int lde, double[] f, int _f_offset, int ldf, org.netlib.util.doubleW scale, org.netlib.util.doubleW rdsum, org.netlib.util.doubleW rdscal, int[] iwork, int _iwork_offset, org.netlib.util.intW pq, org.netlib.util.intW info) { - lapack.dtgsy2(trans, ijob, m, n, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, Ldc, d, _d_offset, ldd, e, _e_offset, lde, f, _f_offset, ldf, scale, rdsum, rdscal, iwork, _iwork_offset, pq, info); + org.netlib.lapack.Dtgsy2.dtgsy2(trans, ijob, m, n, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, Ldc, d, _d_offset, ldd, e, _e_offset, lde, f, _f_offset, ldf, scale, rdsum, rdscal, iwork, _iwork_offset, pq, info); } protected void dtgsylK(String trans, int ijob, int m, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] c, int _c_offset, int Ldc, double[] d, int _d_offset, int ldd, double[] e, int _e_offset, int lde, double[] f, int _f_offset, int ldf, org.netlib.util.doubleW scale, org.netlib.util.doubleW dif, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dtgsyl(trans, ijob, m, n, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, Ldc, d, _d_offset, ldd, e, _e_offset, lde, f, _f_offset, ldf, scale, dif, work, _work_offset, lwork, iwork, _iwork_offset, info); + org.netlib.lapack.Dtgsyl.dtgsyl(trans, ijob, m, n, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, Ldc, d, _d_offset, ldd, e, _e_offset, lde, f, _f_offset, ldf, scale, dif, work, _work_offset, lwork, iwork, _iwork_offset, info); } protected void dtpconK(String norm, String uplo, String diag, int n, double[] ap, int _ap_offset, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dtpcon(norm, uplo, diag, n, ap, _ap_offset, rcond, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dtpcon.dtpcon(norm, uplo, diag, n, ap, _ap_offset, rcond, work, _work_offset, iwork, _iwork_offset, info); } protected void dtprfsK(String uplo, String trans, String diag, int n, int nrhs, double[] ap, int _ap_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dtprfs(uplo, trans, diag, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dtprfs.dtprfs(uplo, trans, diag, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void dtptriK(String uplo, String diag, int n, double[] ap, int _ap_offset, org.netlib.util.intW info) { - lapack.dtptri(uplo, diag, n, ap, _ap_offset, info); + org.netlib.lapack.Dtptri.dtptri(uplo, diag, n, ap, _ap_offset, info); } protected void dtptrsK(String uplo, String trans, String diag, int n, int nrhs, double[] ap, int _ap_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.dtptrs(uplo, trans, diag, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, info); + org.netlib.lapack.Dtptrs.dtptrs(uplo, trans, diag, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, info); } protected void dtrconK(String norm, String uplo, String diag, int n, double[] a, int _a_offset, int lda, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dtrcon(norm, uplo, diag, n, a, _a_offset, lda, rcond, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dtrcon.dtrcon(norm, uplo, diag, n, a, _a_offset, lda, rcond, work, _work_offset, iwork, _iwork_offset, info); } protected void dtrevcK(String side, String howmny, boolean[] select, int _select_offset, int n, double[] t, int _t_offset, int ldt, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dtrevc(side, howmny, select, _select_offset, n, t, _t_offset, ldt, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, mm, m, work, _work_offset, info); + org.netlib.lapack.Dtrevc.dtrevc(side, howmny, select, _select_offset, n, t, _t_offset, ldt, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, mm, m, work, _work_offset, info); } protected void dtrexcK(String compq, int n, double[] t, int _t_offset, int ldt, double[] q, int _q_offset, int ldq, org.netlib.util.intW ifst, org.netlib.util.intW ilst, double[] work, int _work_offset, org.netlib.util.intW info) { - lapack.dtrexc(compq, n, t, _t_offset, ldt, q, _q_offset, ldq, ifst, ilst, work, _work_offset, info); + org.netlib.lapack.Dtrexc.dtrexc(compq, n, t, _t_offset, ldt, q, _q_offset, ldq, ifst, ilst, work, _work_offset, info); } protected void dtrrfsK(String uplo, String trans, String diag, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dtrrfs(uplo, trans, diag, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Dtrrfs.dtrrfs(uplo, trans, diag, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void dtrsenK(String job, String compq, boolean[] select, int _select_offset, int n, double[] t, int _t_offset, int ldt, double[] q, int _q_offset, int ldq, double[] wr, int _wr_offset, double[] wi, int _wi_offset, org.netlib.util.intW m, org.netlib.util.doubleW s, org.netlib.util.doubleW sep, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - lapack.dtrsen(job, compq, select, _select_offset, n, t, _t_offset, ldt, q, _q_offset, ldq, wr, _wr_offset, wi, _wi_offset, m, s, sep, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + org.netlib.lapack.Dtrsen.dtrsen(job, compq, select, _select_offset, n, t, _t_offset, ldt, q, _q_offset, ldq, wr, _wr_offset, wi, _wi_offset, m, s, sep, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); } protected void dtrsnaK(String job, String howmny, boolean[] select, int _select_offset, int n, double[] t, int _t_offset, int ldt, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] s, int _s_offset, double[] sep, int _sep_offset, int mm, org.netlib.util.intW m, double[] work, int _work_offset, int ldwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.dtrsna(job, howmny, select, _select_offset, n, t, _t_offset, ldt, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, s, _s_offset, sep, _sep_offset, mm, m, work, _work_offset, ldwork, iwork, _iwork_offset, info); + org.netlib.lapack.Dtrsna.dtrsna(job, howmny, select, _select_offset, n, t, _t_offset, ldt, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, s, _s_offset, sep, _sep_offset, mm, m, work, _work_offset, ldwork, iwork, _iwork_offset, info); } protected void dtrsylK(String trana, String tranb, int isgn, int m, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] c, int _c_offset, int Ldc, org.netlib.util.doubleW scale, org.netlib.util.intW info) { - lapack.dtrsyl(trana, tranb, isgn, m, n, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, Ldc, scale, info); + org.netlib.lapack.Dtrsyl.dtrsyl(trana, tranb, isgn, m, n, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, Ldc, scale, info); } protected void dtrti2K(String uplo, String diag, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info) { - lapack.dtrti2(uplo, diag, n, a, _a_offset, lda, info); + org.netlib.lapack.Dtrti2.dtrti2(uplo, diag, n, a, _a_offset, lda, info); } protected void dtrtriK(String uplo, String diag, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info) { - lapack.dtrtri(uplo, diag, n, a, _a_offset, lda, info); + org.netlib.lapack.Dtrtri.dtrtri(uplo, diag, n, a, _a_offset, lda, info); } protected void dtrtrsK(String uplo, String trans, String diag, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.dtrtrs(uplo, trans, diag, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, info); + org.netlib.lapack.Dtrtrs.dtrtrs(uplo, trans, diag, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, info); } protected void dtzrqfK(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, org.netlib.util.intW info) { - lapack.dtzrqf(m, n, a, _a_offset, lda, tau, _tau_offset, info); + org.netlib.lapack.Dtzrqf.dtzrqf(m, n, a, _a_offset, lda, tau, _tau_offset, info); } protected void dtzrzfK(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.dtzrzf(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Dtzrzf.dtzrzf(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); } protected int ieeeckK(int ispec, float zero, float one) { - return lapack.ieeeck(ispec, zero, one); + return org.netlib.lapack.Ieeeck.ieeeck(ispec, zero, one); } protected int ilaenvK(int ispec, String name, String opts, int n1, int n2, int n3, int n4) { - return lapack.ilaenv(ispec, name, opts, n1, n2, n3, n4); + return org.netlib.lapack.Ilaenv.ilaenv(ispec, name, opts, n1, n2, n3, n4); } protected void ilaverK(org.netlib.util.intW vers_major, org.netlib.util.intW vers_minor, org.netlib.util.intW vers_patch) { - lapack.ilaver(vers_major, vers_minor, vers_patch); + org.netlib.lapack.Ilaver.ilaver(vers_major, vers_minor, vers_patch); } protected int iparmqK(int ispec, String name, String opts, int n, int ilo, int ihi, int lwork) { - return lapack.iparmq(ispec, name, opts, n, ilo, ihi, lwork); + return org.netlib.lapack.Iparmq.iparmq(ispec, name, opts, n, ilo, ihi, lwork); } protected boolean lsamenK(int n, String ca, String cb) { - return lapack.lsamen(n, ca, cb); + return org.netlib.lapack.Lsamen.lsamen(n, ca, cb); } protected void sbdsdcK(String uplo, String compq, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, float[] q, int _q_offset, int[] iq, int _iq_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.sbdsdc(uplo, compq, n, d, _d_offset, e, _e_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, q, _q_offset, iq, _iq_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Sbdsdc.sbdsdc(uplo, compq, n, d, _d_offset, e, _e_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, q, _q_offset, iq, _iq_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void sbdsqrK(String uplo, int n, int ncvt, int nru, int ncc, float[] d, int _d_offset, float[] e, int _e_offset, float[] vt, int _vt_offset, int ldvt, float[] u, int _u_offset, int ldu, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.sbdsqr(uplo, n, ncvt, nru, ncc, d, _d_offset, e, _e_offset, vt, _vt_offset, ldvt, u, _u_offset, ldu, c, _c_offset, Ldc, work, _work_offset, info); + org.netlib.lapack.Sbdsqr.sbdsqr(uplo, n, ncvt, nru, ncc, d, _d_offset, e, _e_offset, vt, _vt_offset, ldvt, u, _u_offset, ldu, c, _c_offset, Ldc, work, _work_offset, info); } protected void sdisnaK(String job, int m, int n, float[] d, int _d_offset, float[] sep, int _sep_offset, org.netlib.util.intW info) { - lapack.sdisna(job, m, n, d, _d_offset, sep, _sep_offset, info); + org.netlib.lapack.Sdisna.sdisna(job, m, n, d, _d_offset, sep, _sep_offset, info); } protected void sgbbrdK(String vect, int m, int n, int ncc, int kl, int ku, float[] ab, int _ab_offset, int ldab, float[] d, int _d_offset, float[] e, int _e_offset, float[] q, int _q_offset, int ldq, float[] pt, int _pt_offset, int ldpt, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.sgbbrd(vect, m, n, ncc, kl, ku, ab, _ab_offset, ldab, d, _d_offset, e, _e_offset, q, _q_offset, ldq, pt, _pt_offset, ldpt, c, _c_offset, Ldc, work, _work_offset, info); + org.netlib.lapack.Sgbbrd.sgbbrd(vect, m, n, ncc, kl, ku, ab, _ab_offset, ldab, d, _d_offset, e, _e_offset, q, _q_offset, ldq, pt, _pt_offset, ldpt, c, _c_offset, Ldc, work, _work_offset, info); } protected void sgbconK(String norm, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.sgbcon(norm, n, kl, ku, ab, _ab_offset, ldab, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Sgbcon.sgbcon(norm, n, kl, ku, ab, _ab_offset, ldab, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); } protected void sgbequK(int m, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, float[] r, int _r_offset, float[] c, int _c_offset, org.netlib.util.floatW rowcnd, org.netlib.util.floatW colcnd, org.netlib.util.floatW amax, org.netlib.util.intW info) { - lapack.sgbequ(m, n, kl, ku, ab, _ab_offset, ldab, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, info); + org.netlib.lapack.Sgbequ.sgbequ(m, n, kl, ku, ab, _ab_offset, ldab, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, info); } protected void sgbrfsK(String trans, int n, int kl, int ku, int nrhs, float[] ab, int _ab_offset, int ldab, float[] afb, int _afb_offset, int ldafb, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.sgbrfs(trans, n, kl, ku, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Sgbrfs.sgbrfs(trans, n, kl, ku, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void sgbsvK(int n, int kl, int ku, int nrhs, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.sgbsv(n, kl, ku, nrhs, ab, _ab_offset, ldab, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + org.netlib.lapack.Sgbsv.sgbsv(n, kl, ku, nrhs, ab, _ab_offset, ldab, ipiv, _ipiv_offset, b, _b_offset, ldb, info); } protected void sgbsvxK(String fact, String trans, int n, int kl, int ku, int nrhs, float[] ab, int _ab_offset, int ldab, float[] afb, int _afb_offset, int ldafb, int[] ipiv, int _ipiv_offset, org.netlib.util.StringW equed, float[] r, int _r_offset, float[] c, int _c_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.sgbsvx(fact, trans, n, kl, ku, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, ipiv, _ipiv_offset, equed, r, _r_offset, c, _c_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Sgbsvx.sgbsvx(fact, trans, n, kl, ku, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, ipiv, _ipiv_offset, equed, r, _r_offset, c, _c_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void sgbtf2K(int m, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { - lapack.sgbtf2(m, n, kl, ku, ab, _ab_offset, ldab, ipiv, _ipiv_offset, info); + org.netlib.lapack.Sgbtf2.sgbtf2(m, n, kl, ku, ab, _ab_offset, ldab, ipiv, _ipiv_offset, info); } protected void sgbtrfK(int m, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { - lapack.sgbtrf(m, n, kl, ku, ab, _ab_offset, ldab, ipiv, _ipiv_offset, info); + org.netlib.lapack.Sgbtrf.sgbtrf(m, n, kl, ku, ab, _ab_offset, ldab, ipiv, _ipiv_offset, info); } protected void sgbtrsK(String trans, int n, int kl, int ku, int nrhs, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.sgbtrs(trans, n, kl, ku, nrhs, ab, _ab_offset, ldab, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + org.netlib.lapack.Sgbtrs.sgbtrs(trans, n, kl, ku, nrhs, ab, _ab_offset, ldab, ipiv, _ipiv_offset, b, _b_offset, ldb, info); } protected void sgebakK(String job, String side, int n, int ilo, int ihi, float[] scale, int _scale_offset, int m, float[] v, int _v_offset, int ldv, org.netlib.util.intW info) { - lapack.sgebak(job, side, n, ilo, ihi, scale, _scale_offset, m, v, _v_offset, ldv, info); + org.netlib.lapack.Sgebak.sgebak(job, side, n, ilo, ihi, scale, _scale_offset, m, v, _v_offset, ldv, info); } protected void sgebalK(String job, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] scale, int _scale_offset, org.netlib.util.intW info) { - lapack.sgebal(job, n, a, _a_offset, lda, ilo, ihi, scale, _scale_offset, info); + org.netlib.lapack.Sgebal.sgebal(job, n, a, _a_offset, lda, ilo, ihi, scale, _scale_offset, info); } protected void sgebd2K(int m, int n, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tauq, int _tauq_offset, float[] taup, int _taup_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.sgebd2(m, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tauq, _tauq_offset, taup, _taup_offset, work, _work_offset, info); + org.netlib.lapack.Sgebd2.sgebd2(m, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tauq, _tauq_offset, taup, _taup_offset, work, _work_offset, info); } protected void sgebrdK(int m, int n, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tauq, int _tauq_offset, float[] taup, int _taup_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sgebrd(m, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tauq, _tauq_offset, taup, _taup_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Sgebrd.sgebrd(m, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tauq, _tauq_offset, taup, _taup_offset, work, _work_offset, lwork, info); } protected void sgeconK(String norm, int n, float[] a, int _a_offset, int lda, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.sgecon(norm, n, a, _a_offset, lda, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Sgecon.sgecon(norm, n, a, _a_offset, lda, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); } protected void sgeequK(int m, int n, float[] a, int _a_offset, int lda, float[] r, int _r_offset, float[] c, int _c_offset, org.netlib.util.floatW rowcnd, org.netlib.util.floatW colcnd, org.netlib.util.floatW amax, org.netlib.util.intW info) { - lapack.sgeequ(m, n, a, _a_offset, lda, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, info); + org.netlib.lapack.Sgeequ.sgeequ(m, n, a, _a_offset, lda, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, info); } protected void sgeesK(String jobvs, String sort, java.lang.Object select, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW sdim, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vs, int _vs_offset, int ldvs, float[] work, int _work_offset, int lwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info) { - lapack.sgees(jobvs, sort, select, n, a, _a_offset, lda, sdim, wr, _wr_offset, wi, _wi_offset, vs, _vs_offset, ldvs, work, _work_offset, lwork, bwork, _bwork_offset, info); + org.netlib.lapack.Sgees.sgees(jobvs, sort, select, n, a, _a_offset, lda, sdim, wr, _wr_offset, wi, _wi_offset, vs, _vs_offset, ldvs, work, _work_offset, lwork, bwork, _bwork_offset, info); } protected void sgeesxK(String jobvs, String sort, java.lang.Object select, String sense, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW sdim, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vs, int _vs_offset, int ldvs, org.netlib.util.floatW rconde, org.netlib.util.floatW rcondv, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info) { - lapack.sgeesx(jobvs, sort, select, sense, n, a, _a_offset, lda, sdim, wr, _wr_offset, wi, _wi_offset, vs, _vs_offset, ldvs, rconde, rcondv, work, _work_offset, lwork, iwork, _iwork_offset, liwork, bwork, _bwork_offset, info); + org.netlib.lapack.Sgeesx.sgeesx(jobvs, sort, select, sense, n, a, _a_offset, lda, sdim, wr, _wr_offset, wi, _wi_offset, vs, _vs_offset, ldvs, rconde, rcondv, work, _work_offset, lwork, iwork, _iwork_offset, liwork, bwork, _bwork_offset, info); } protected void sgeevK(String jobvl, String jobvr, int n, float[] a, int _a_offset, int lda, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sgeev(jobvl, jobvr, n, a, _a_offset, lda, wr, _wr_offset, wi, _wi_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, work, _work_offset, lwork, info); + org.netlib.lapack.Sgeev.sgeev(jobvl, jobvr, n, a, _a_offset, lda, wr, _wr_offset, wi, _wi_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, work, _work_offset, lwork, info); } protected void sgeevxK(String balanc, String jobvl, String jobvr, String sense, int n, float[] a, int _a_offset, int lda, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] scale, int _scale_offset, org.netlib.util.floatW abnrm, float[] rconde, int _rconde_offset, float[] rcondv, int _rcondv_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.sgeevx(balanc, jobvl, jobvr, sense, n, a, _a_offset, lda, wr, _wr_offset, wi, _wi_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, ilo, ihi, scale, _scale_offset, abnrm, rconde, _rconde_offset, rcondv, _rcondv_offset, work, _work_offset, lwork, iwork, _iwork_offset, info); + org.netlib.lapack.Sgeevx.sgeevx(balanc, jobvl, jobvr, sense, n, a, _a_offset, lda, wr, _wr_offset, wi, _wi_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, ilo, ihi, scale, _scale_offset, abnrm, rconde, _rconde_offset, rcondv, _rcondv_offset, work, _work_offset, lwork, iwork, _iwork_offset, info); } protected void sgegsK(String jobvsl, String jobvsr, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vsl, int _vsl_offset, int ldvsl, float[] vsr, int _vsr_offset, int ldvsr, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sgegs(jobvsl, jobvsr, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vsl, _vsl_offset, ldvsl, vsr, _vsr_offset, ldvsr, work, _work_offset, lwork, info); + org.netlib.lapack.Sgegs.sgegs(jobvsl, jobvsr, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vsl, _vsl_offset, ldvsl, vsr, _vsr_offset, ldvsr, work, _work_offset, lwork, info); } protected void sgegvK(String jobvl, String jobvr, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sgegv(jobvl, jobvr, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, work, _work_offset, lwork, info); + org.netlib.lapack.Sgegv.sgegv(jobvl, jobvr, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, work, _work_offset, lwork, info); } protected void sgehd2K(int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.sgehd2(n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + org.netlib.lapack.Sgehd2.sgehd2(n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); } protected void sgehrdK(int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sgehrd(n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Sgehrd.sgehrd(n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); } protected void sgelq2K(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.sgelq2(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + org.netlib.lapack.Sgelq2.sgelq2(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); } protected void sgelqfK(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sgelqf(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Sgelqf.sgelqf(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); } protected void sgelsK(String trans, int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sgels(trans, m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, work, _work_offset, lwork, info); + org.netlib.lapack.Sgels.sgels(trans, m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, work, _work_offset, lwork, info); } protected void sgelsdK(int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] s, int _s_offset, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.sgelsd(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, s, _s_offset, rcond, rank, work, _work_offset, lwork, iwork, _iwork_offset, info); + org.netlib.lapack.Sgelsd.sgelsd(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, s, _s_offset, rcond, rank, work, _work_offset, lwork, iwork, _iwork_offset, info); } protected void sgelssK(int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] s, int _s_offset, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sgelss(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, s, _s_offset, rcond, rank, work, _work_offset, lwork, info); + org.netlib.lapack.Sgelss.sgelss(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, s, _s_offset, rcond, rank, work, _work_offset, lwork, info); } protected void sgelsxK(int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, int[] jpvt, int _jpvt_offset, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.sgelsx(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, jpvt, _jpvt_offset, rcond, rank, work, _work_offset, info); + org.netlib.lapack.Sgelsx.sgelsx(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, jpvt, _jpvt_offset, rcond, rank, work, _work_offset, info); } protected void sgelsyK(int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, int[] jpvt, int _jpvt_offset, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sgelsy(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, jpvt, _jpvt_offset, rcond, rank, work, _work_offset, lwork, info); + org.netlib.lapack.Sgelsy.sgelsy(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, jpvt, _jpvt_offset, rcond, rank, work, _work_offset, lwork, info); } protected void sgeql2K(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.sgeql2(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + org.netlib.lapack.Sgeql2.sgeql2(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); } protected void sgeqlfK(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sgeqlf(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Sgeqlf.sgeqlf(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); } protected void sgeqp3K(int m, int n, float[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sgeqp3(m, n, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Sgeqp3.sgeqp3(m, n, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, work, _work_offset, lwork, info); } protected void sgeqpfK(int m, int n, float[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.sgeqpf(m, n, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, work, _work_offset, info); + org.netlib.lapack.Sgeqpf.sgeqpf(m, n, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, work, _work_offset, info); } protected void sgeqr2K(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.sgeqr2(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + org.netlib.lapack.Sgeqr2.sgeqr2(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); } protected void sgeqrfK(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sgeqrf(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Sgeqrf.sgeqrf(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); } protected void sgerfsK(String trans, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.sgerfs(trans, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Sgerfs.sgerfs(trans, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void sgerq2K(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.sgerq2(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + org.netlib.lapack.Sgerq2.sgerq2(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); } protected void sgerqfK(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sgerqf(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Sgerqf.sgerqf(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); } protected void sgesc2K(int n, float[] a, int _a_offset, int lda, float[] rhs, int _rhs_offset, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset, org.netlib.util.floatW scale) { - lapack.sgesc2(n, a, _a_offset, lda, rhs, _rhs_offset, ipiv, _ipiv_offset, jpiv, _jpiv_offset, scale); + org.netlib.lapack.Sgesc2.sgesc2(n, a, _a_offset, lda, rhs, _rhs_offset, ipiv, _ipiv_offset, jpiv, _jpiv_offset, scale); } protected void sgesddK(String jobz, int m, int n, float[] a, int _a_offset, int lda, float[] s, int _s_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.sgesdd(jobz, m, n, a, _a_offset, lda, s, _s_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, work, _work_offset, lwork, iwork, _iwork_offset, info); + org.netlib.lapack.Sgesdd.sgesdd(jobz, m, n, a, _a_offset, lda, s, _s_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, work, _work_offset, lwork, iwork, _iwork_offset, info); } protected void sgesvK(int n, int nrhs, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.sgesv(n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + org.netlib.lapack.Sgesv.sgesv(n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, info); } protected void sgesvdK(String jobu, String jobvt, int m, int n, float[] a, int _a_offset, int lda, float[] s, int _s_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sgesvd(jobu, jobvt, m, n, a, _a_offset, lda, s, _s_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, work, _work_offset, lwork, info); + org.netlib.lapack.Sgesvd.sgesvd(jobu, jobvt, m, n, a, _a_offset, lda, s, _s_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, work, _work_offset, lwork, info); } protected void sgesvxK(String fact, String trans, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, org.netlib.util.StringW equed, float[] r, int _r_offset, float[] c, int _c_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.sgesvx(fact, trans, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, equed, r, _r_offset, c, _c_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Sgesvx.sgesvx(fact, trans, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, equed, r, _r_offset, c, _c_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void sgetc2K(int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset, org.netlib.util.intW info) { - lapack.sgetc2(n, a, _a_offset, lda, ipiv, _ipiv_offset, jpiv, _jpiv_offset, info); + org.netlib.lapack.Sgetc2.sgetc2(n, a, _a_offset, lda, ipiv, _ipiv_offset, jpiv, _jpiv_offset, info); } protected void sgetf2K(int m, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { - lapack.sgetf2(m, n, a, _a_offset, lda, ipiv, _ipiv_offset, info); + org.netlib.lapack.Sgetf2.sgetf2(m, n, a, _a_offset, lda, ipiv, _ipiv_offset, info); } protected void sgetrfK(int m, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { - lapack.sgetrf(m, n, a, _a_offset, lda, ipiv, _ipiv_offset, info); + org.netlib.lapack.Sgetrf.sgetrf(m, n, a, _a_offset, lda, ipiv, _ipiv_offset, info); } protected void sgetriK(int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sgetri(n, a, _a_offset, lda, ipiv, _ipiv_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Sgetri.sgetri(n, a, _a_offset, lda, ipiv, _ipiv_offset, work, _work_offset, lwork, info); } protected void sgetrsK(String trans, int n, int nrhs, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.sgetrs(trans, n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + org.netlib.lapack.Sgetrs.sgetrs(trans, n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, info); } protected void sggbakK(String job, String side, int n, int ilo, int ihi, float[] lscale, int _lscale_offset, float[] rscale, int _rscale_offset, int m, float[] v, int _v_offset, int ldv, org.netlib.util.intW info) { - lapack.sggbak(job, side, n, ilo, ihi, lscale, _lscale_offset, rscale, _rscale_offset, m, v, _v_offset, ldv, info); + org.netlib.lapack.Sggbak.sggbak(job, side, n, ilo, ihi, lscale, _lscale_offset, rscale, _rscale_offset, m, v, _v_offset, ldv, info); } protected void sggbalK(String job, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] lscale, int _lscale_offset, float[] rscale, int _rscale_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.sggbal(job, n, a, _a_offset, lda, b, _b_offset, ldb, ilo, ihi, lscale, _lscale_offset, rscale, _rscale_offset, work, _work_offset, info); + org.netlib.lapack.Sggbal.sggbal(job, n, a, _a_offset, lda, b, _b_offset, ldb, ilo, ihi, lscale, _lscale_offset, rscale, _rscale_offset, work, _work_offset, info); } protected void sggesK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW sdim, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vsl, int _vsl_offset, int ldvsl, float[] vsr, int _vsr_offset, int ldvsr, float[] work, int _work_offset, int lwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info) { - lapack.sgges(jobvsl, jobvsr, sort, selctg, n, a, _a_offset, lda, b, _b_offset, ldb, sdim, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vsl, _vsl_offset, ldvsl, vsr, _vsr_offset, ldvsr, work, _work_offset, lwork, bwork, _bwork_offset, info); + org.netlib.lapack.Sgges.sgges(jobvsl, jobvsr, sort, selctg, n, a, _a_offset, lda, b, _b_offset, ldb, sdim, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vsl, _vsl_offset, ldvsl, vsr, _vsr_offset, ldvsr, work, _work_offset, lwork, bwork, _bwork_offset, info); } protected void sggesxK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, String sense, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW sdim, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vsl, int _vsl_offset, int ldvsl, float[] vsr, int _vsr_offset, int ldvsr, float[] rconde, int _rconde_offset, float[] rcondv, int _rcondv_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info) { - lapack.sggesx(jobvsl, jobvsr, sort, selctg, sense, n, a, _a_offset, lda, b, _b_offset, ldb, sdim, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vsl, _vsl_offset, ldvsl, vsr, _vsr_offset, ldvsr, rconde, _rconde_offset, rcondv, _rcondv_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, bwork, _bwork_offset, info); + org.netlib.lapack.Sggesx.sggesx(jobvsl, jobvsr, sort, selctg, sense, n, a, _a_offset, lda, b, _b_offset, ldb, sdim, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vsl, _vsl_offset, ldvsl, vsr, _vsr_offset, ldvsr, rconde, _rconde_offset, rcondv, _rcondv_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, bwork, _bwork_offset, info); } protected void sggevK(String jobvl, String jobvr, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sggev(jobvl, jobvr, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, work, _work_offset, lwork, info); + org.netlib.lapack.Sggev.sggev(jobvl, jobvr, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, work, _work_offset, lwork, info); } protected void sggevxK(String balanc, String jobvl, String jobvr, String sense, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] lscale, int _lscale_offset, float[] rscale, int _rscale_offset, org.netlib.util.floatW abnrm, org.netlib.util.floatW bbnrm, float[] rconde, int _rconde_offset, float[] rcondv, int _rcondv_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info) { - lapack.sggevx(balanc, jobvl, jobvr, sense, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, ilo, ihi, lscale, _lscale_offset, rscale, _rscale_offset, abnrm, bbnrm, rconde, _rconde_offset, rcondv, _rcondv_offset, work, _work_offset, lwork, iwork, _iwork_offset, bwork, _bwork_offset, info); + org.netlib.lapack.Sggevx.sggevx(balanc, jobvl, jobvr, sense, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, ilo, ihi, lscale, _lscale_offset, rscale, _rscale_offset, abnrm, bbnrm, rconde, _rconde_offset, rcondv, _rcondv_offset, work, _work_offset, lwork, iwork, _iwork_offset, bwork, _bwork_offset, info); } protected void sggglmK(int n, int m, int p, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] d, int _d_offset, float[] x, int _x_offset, float[] y, int _y_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sggglm(n, m, p, a, _a_offset, lda, b, _b_offset, ldb, d, _d_offset, x, _x_offset, y, _y_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Sggglm.sggglm(n, m, p, a, _a_offset, lda, b, _b_offset, ldb, d, _d_offset, x, _x_offset, y, _y_offset, work, _work_offset, lwork, info); } protected void sgghrdK(String compq, String compz, int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, org.netlib.util.intW info) { - lapack.sgghrd(compq, compz, n, ilo, ihi, a, _a_offset, lda, b, _b_offset, ldb, q, _q_offset, ldq, z, _z_offset, ldz, info); + org.netlib.lapack.Sgghrd.sgghrd(compq, compz, n, ilo, ihi, a, _a_offset, lda, b, _b_offset, ldb, q, _q_offset, ldq, z, _z_offset, ldz, info); } protected void sgglseK(int m, int n, int p, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] c, int _c_offset, float[] d, int _d_offset, float[] x, int _x_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sgglse(m, n, p, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, d, _d_offset, x, _x_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Sgglse.sgglse(m, n, p, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, d, _d_offset, x, _x_offset, work, _work_offset, lwork, info); } protected void sggqrfK(int n, int m, int p, float[] a, int _a_offset, int lda, float[] taua, int _taua_offset, float[] b, int _b_offset, int ldb, float[] taub, int _taub_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sggqrf(n, m, p, a, _a_offset, lda, taua, _taua_offset, b, _b_offset, ldb, taub, _taub_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Sggqrf.sggqrf(n, m, p, a, _a_offset, lda, taua, _taua_offset, b, _b_offset, ldb, taub, _taub_offset, work, _work_offset, lwork, info); } protected void sggrqfK(int m, int p, int n, float[] a, int _a_offset, int lda, float[] taua, int _taua_offset, float[] b, int _b_offset, int ldb, float[] taub, int _taub_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sggrqf(m, p, n, a, _a_offset, lda, taua, _taua_offset, b, _b_offset, ldb, taub, _taub_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Sggrqf.sggrqf(m, p, n, a, _a_offset, lda, taua, _taua_offset, b, _b_offset, ldb, taub, _taub_offset, work, _work_offset, lwork, info); } protected void sggsvdK(String jobu, String jobv, String jobq, int m, int n, int p, org.netlib.util.intW k, org.netlib.util.intW l, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alpha, int _alpha_offset, float[] beta, int _beta_offset, float[] u, int _u_offset, int ldu, float[] v, int _v_offset, int ldv, float[] q, int _q_offset, int ldq, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.sggsvd(jobu, jobv, jobq, m, n, p, k, l, a, _a_offset, lda, b, _b_offset, ldb, alpha, _alpha_offset, beta, _beta_offset, u, _u_offset, ldu, v, _v_offset, ldv, q, _q_offset, ldq, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Sggsvd.sggsvd(jobu, jobv, jobq, m, n, p, k, l, a, _a_offset, lda, b, _b_offset, ldb, alpha, _alpha_offset, beta, _beta_offset, u, _u_offset, ldu, v, _v_offset, ldv, q, _q_offset, ldq, work, _work_offset, iwork, _iwork_offset, info); } protected void sggsvpK(String jobu, String jobv, String jobq, int m, int p, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float tola, float tolb, org.netlib.util.intW k, org.netlib.util.intW l, float[] u, int _u_offset, int ldu, float[] v, int _v_offset, int ldv, float[] q, int _q_offset, int ldq, int[] iwork, int _iwork_offset, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.sggsvp(jobu, jobv, jobq, m, p, n, a, _a_offset, lda, b, _b_offset, ldb, tola, tolb, k, l, u, _u_offset, ldu, v, _v_offset, ldv, q, _q_offset, ldq, iwork, _iwork_offset, tau, _tau_offset, work, _work_offset, info); + org.netlib.lapack.Sggsvp.sggsvp(jobu, jobv, jobq, m, p, n, a, _a_offset, lda, b, _b_offset, ldb, tola, tolb, k, l, u, _u_offset, ldu, v, _v_offset, ldv, q, _q_offset, ldq, iwork, _iwork_offset, tau, _tau_offset, work, _work_offset, info); } protected void sgtconK(String norm, int n, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.sgtcon(norm, n, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Sgtcon.sgtcon(norm, n, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); } protected void sgtrfsK(String trans, int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] dlf, int _dlf_offset, float[] df, int _df_offset, float[] duf, int _duf_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.sgtrfs(trans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, dlf, _dlf_offset, df, _df_offset, duf, _duf_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Sgtrfs.sgtrfs(trans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, dlf, _dlf_offset, df, _df_offset, duf, _duf_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void sgtsvK(int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.sgtsv(n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, b, _b_offset, ldb, info); + org.netlib.lapack.Sgtsv.sgtsv(n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, b, _b_offset, ldb, info); } protected void sgtsvxK(String fact, String trans, int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] dlf, int _dlf_offset, float[] df, int _df_offset, float[] duf, int _duf_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.sgtsvx(fact, trans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, dlf, _dlf_offset, df, _df_offset, duf, _duf_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Sgtsvx.sgtsvx(fact, trans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, dlf, _dlf_offset, df, _df_offset, duf, _duf_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void sgttrfK(int n, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { - lapack.sgttrf(n, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, info); + org.netlib.lapack.Sgttrf.sgttrf(n, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, info); } protected void sgttrsK(String trans, int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.sgttrs(trans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + org.netlib.lapack.Sgttrs.sgttrs(trans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, info); } protected void sgtts2K(int itrans, int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb) { - lapack.sgtts2(itrans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb); + org.netlib.lapack.Sgtts2.sgtts2(itrans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb); } protected void shgeqzK(String job, String compq, String compz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] t, int _t_offset, int ldt, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.shgeqz(job, compq, compz, n, ilo, ihi, h, _h_offset, ldh, t, _t_offset, ldt, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, q, _q_offset, ldq, z, _z_offset, ldz, work, _work_offset, lwork, info); + org.netlib.lapack.Shgeqz.shgeqz(job, compq, compz, n, ilo, ihi, h, _h_offset, ldh, t, _t_offset, ldt, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, q, _q_offset, ldq, z, _z_offset, ldz, work, _work_offset, lwork, info); } protected void shseinK(String side, String eigsrc, String initv, boolean[] select, int _select_offset, int n, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, float[] work, int _work_offset, int[] ifaill, int _ifaill_offset, int[] ifailr, int _ifailr_offset, org.netlib.util.intW info) { - lapack.shsein(side, eigsrc, initv, select, _select_offset, n, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, mm, m, work, _work_offset, ifaill, _ifaill_offset, ifailr, _ifailr_offset, info); + org.netlib.lapack.Shsein.shsein(side, eigsrc, initv, select, _select_offset, n, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, mm, m, work, _work_offset, ifaill, _ifaill_offset, ifailr, _ifailr_offset, info); } protected void shseqrK(String job, String compz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.shseqr(job, compz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, z, _z_offset, ldz, work, _work_offset, lwork, info); + org.netlib.lapack.Shseqr.shseqr(job, compz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, z, _z_offset, ldz, work, _work_offset, lwork, info); } protected boolean sisnanK(float sin) { - return lapack.sisnan(sin); + return org.netlib.lapack.Sisnan.sisnan(sin); } protected void slabadK(org.netlib.util.floatW small, org.netlib.util.floatW large) { - lapack.slabad(small, large); + org.netlib.lapack.Slabad.slabad(small, large); } protected void slabrdK(int m, int n, int nb, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tauq, int _tauq_offset, float[] taup, int _taup_offset, float[] x, int _x_offset, int ldx, float[] y, int _y_offset, int ldy) { - lapack.slabrd(m, n, nb, a, _a_offset, lda, d, _d_offset, e, _e_offset, tauq, _tauq_offset, taup, _taup_offset, x, _x_offset, ldx, y, _y_offset, ldy); + org.netlib.lapack.Slabrd.slabrd(m, n, nb, a, _a_offset, lda, d, _d_offset, e, _e_offset, tauq, _tauq_offset, taup, _taup_offset, x, _x_offset, ldx, y, _y_offset, ldy); } protected void slacn2K(int n, float[] v, int _v_offset, float[] x, int _x_offset, int[] isgn, int _isgn_offset, org.netlib.util.floatW est, org.netlib.util.intW kase, int[] isave, int _isave_offset) { - lapack.slacn2(n, v, _v_offset, x, _x_offset, isgn, _isgn_offset, est, kase, isave, _isave_offset); + org.netlib.lapack.Slacn2.slacn2(n, v, _v_offset, x, _x_offset, isgn, _isgn_offset, est, kase, isave, _isave_offset); } protected void slaconK(int n, float[] v, int _v_offset, float[] x, int _x_offset, int[] isgn, int _isgn_offset, org.netlib.util.floatW est, org.netlib.util.intW kase) { - lapack.slacon(n, v, _v_offset, x, _x_offset, isgn, _isgn_offset, est, kase); + org.netlib.lapack.Slacon.slacon(n, v, _v_offset, x, _x_offset, isgn, _isgn_offset, est, kase); } protected void slacpyK(String uplo, int m, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb) { - lapack.slacpy(uplo, m, n, a, _a_offset, lda, b, _b_offset, ldb); + org.netlib.lapack.Slacpy.slacpy(uplo, m, n, a, _a_offset, lda, b, _b_offset, ldb); } protected void sladivK(float a, float b, float c, float d, org.netlib.util.floatW p, org.netlib.util.floatW q) { - lapack.sladiv(a, b, c, d, p, q); + org.netlib.lapack.Sladiv.sladiv(a, b, c, d, p, q); } protected void slae2K(float a, float b, float c, org.netlib.util.floatW rt1, org.netlib.util.floatW rt2) { - lapack.slae2(a, b, c, rt1, rt2); + org.netlib.lapack.Slae2.slae2(a, b, c, rt1, rt2); } protected void slaebzK(int ijob, int nitmax, int n, int mmax, int minp, int nbmin, float abstol, float reltol, float pivmin, float[] d, int _d_offset, float[] e, int _e_offset, float[] e2, int _e2_offset, int[] nval, int _nval_offset, float[] ab, int _ab_offset, float[] c, int _c_offset, org.netlib.util.intW mout, int[] nab, int _nab_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.slaebz(ijob, nitmax, n, mmax, minp, nbmin, abstol, reltol, pivmin, d, _d_offset, e, _e_offset, e2, _e2_offset, nval, _nval_offset, ab, _ab_offset, c, _c_offset, mout, nab, _nab_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Slaebz.slaebz(ijob, nitmax, n, mmax, minp, nbmin, abstol, reltol, pivmin, d, _d_offset, e, _e_offset, e2, _e2_offset, nval, _nval_offset, ab, _ab_offset, c, _c_offset, mout, nab, _nab_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void slaed0K(int icompq, int qsiz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] q, int _q_offset, int ldq, float[] qstore, int _qstore_offset, int ldqs, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.slaed0(icompq, qsiz, n, d, _d_offset, e, _e_offset, q, _q_offset, ldq, qstore, _qstore_offset, ldqs, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Slaed0.slaed0(icompq, qsiz, n, d, _d_offset, e, _e_offset, q, _q_offset, ldq, qstore, _qstore_offset, ldqs, work, _work_offset, iwork, _iwork_offset, info); } protected void slaed1K(int n, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.floatW rho, int cutpnt, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.slaed1(n, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, cutpnt, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Slaed1.slaed1(n, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, cutpnt, work, _work_offset, iwork, _iwork_offset, info); } protected void slaed2K(org.netlib.util.intW k, int n, int n1, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.floatW rho, float[] z, int _z_offset, float[] dlamda, int _dlamda_offset, float[] w, int _w_offset, float[] q2, int _q2_offset, int[] indx, int _indx_offset, int[] indxc, int _indxc_offset, int[] indxp, int _indxp_offset, int[] coltyp, int _coltyp_offset, org.netlib.util.intW info) { - lapack.slaed2(k, n, n1, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, z, _z_offset, dlamda, _dlamda_offset, w, _w_offset, q2, _q2_offset, indx, _indx_offset, indxc, _indxc_offset, indxp, _indxp_offset, coltyp, _coltyp_offset, info); + org.netlib.lapack.Slaed2.slaed2(k, n, n1, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, z, _z_offset, dlamda, _dlamda_offset, w, _w_offset, q2, _q2_offset, indx, _indx_offset, indxc, _indxc_offset, indxp, _indxp_offset, coltyp, _coltyp_offset, info); } protected void slaed3K(int k, int n, int n1, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, float rho, float[] dlamda, int _dlamda_offset, float[] q2, int _q2_offset, int[] indx, int _indx_offset, int[] ctot, int _ctot_offset, float[] w, int _w_offset, float[] s, int _s_offset, org.netlib.util.intW info) { - lapack.slaed3(k, n, n1, d, _d_offset, q, _q_offset, ldq, rho, dlamda, _dlamda_offset, q2, _q2_offset, indx, _indx_offset, ctot, _ctot_offset, w, _w_offset, s, _s_offset, info); + org.netlib.lapack.Slaed3.slaed3(k, n, n1, d, _d_offset, q, _q_offset, ldq, rho, dlamda, _dlamda_offset, q2, _q2_offset, indx, _indx_offset, ctot, _ctot_offset, w, _w_offset, s, _s_offset, info); } protected void slaed4K(int n, int i, float[] d, int _d_offset, float[] z, int _z_offset, float[] delta, int _delta_offset, float rho, org.netlib.util.floatW dlam, org.netlib.util.intW info) { - lapack.slaed4(n, i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, dlam, info); + org.netlib.lapack.Slaed4.slaed4(n, i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, dlam, info); } protected void slaed5K(int i, float[] d, int _d_offset, float[] z, int _z_offset, float[] delta, int _delta_offset, float rho, org.netlib.util.floatW dlam) { - lapack.slaed5(i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, dlam); + org.netlib.lapack.Slaed5.slaed5(i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, dlam); } protected void slaed6K(int kniter, boolean orgati, float rho, float[] d, int _d_offset, float[] z, int _z_offset, float finit, org.netlib.util.floatW tau, org.netlib.util.intW info) { - lapack.slaed6(kniter, orgati, rho, d, _d_offset, z, _z_offset, finit, tau, info); + org.netlib.lapack.Slaed6.slaed6(kniter, orgati, rho, d, _d_offset, z, _z_offset, finit, tau, info); } protected void slaed7K(int icompq, int n, int qsiz, int tlvls, int curlvl, int curpbm, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.floatW rho, int cutpnt, float[] qstore, int _qstore_offset, int[] qptr, int _qptr_offset, int[] prmptr, int _prmptr_offset, int[] perm, int _perm_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, float[] givnum, int _givnum_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.slaed7(icompq, n, qsiz, tlvls, curlvl, curpbm, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, cutpnt, qstore, _qstore_offset, qptr, _qptr_offset, prmptr, _prmptr_offset, perm, _perm_offset, givptr, _givptr_offset, givcol, _givcol_offset, givnum, _givnum_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Slaed7.slaed7(icompq, n, qsiz, tlvls, curlvl, curpbm, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, cutpnt, qstore, _qstore_offset, qptr, _qptr_offset, prmptr, _prmptr_offset, perm, _perm_offset, givptr, _givptr_offset, givcol, _givcol_offset, givnum, _givnum_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void slaed8K(int icompq, org.netlib.util.intW k, int n, int qsiz, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.floatW rho, int cutpnt, float[] z, int _z_offset, float[] dlamda, int _dlamda_offset, float[] q2, int _q2_offset, int ldq2, float[] w, int _w_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, float[] givnum, int _givnum_offset, int[] indxp, int _indxp_offset, int[] indx, int _indx_offset, org.netlib.util.intW info) { - lapack.slaed8(icompq, k, n, qsiz, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, cutpnt, z, _z_offset, dlamda, _dlamda_offset, q2, _q2_offset, ldq2, w, _w_offset, perm, _perm_offset, givptr, givcol, _givcol_offset, givnum, _givnum_offset, indxp, _indxp_offset, indx, _indx_offset, info); + org.netlib.lapack.Slaed8.slaed8(icompq, k, n, qsiz, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, cutpnt, z, _z_offset, dlamda, _dlamda_offset, q2, _q2_offset, ldq2, w, _w_offset, perm, _perm_offset, givptr, givcol, _givcol_offset, givnum, _givnum_offset, indxp, _indxp_offset, indx, _indx_offset, info); } protected void slaed9K(int k, int kstart, int kstop, int n, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, float rho, float[] dlamda, int _dlamda_offset, float[] w, int _w_offset, float[] s, int _s_offset, int lds, org.netlib.util.intW info) { - lapack.slaed9(k, kstart, kstop, n, d, _d_offset, q, _q_offset, ldq, rho, dlamda, _dlamda_offset, w, _w_offset, s, _s_offset, lds, info); + org.netlib.lapack.Slaed9.slaed9(k, kstart, kstop, n, d, _d_offset, q, _q_offset, ldq, rho, dlamda, _dlamda_offset, w, _w_offset, s, _s_offset, lds, info); } protected void slaedaK(int n, int tlvls, int curlvl, int curpbm, int[] prmptr, int _prmptr_offset, int[] perm, int _perm_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, float[] givnum, int _givnum_offset, float[] q, int _q_offset, int[] qptr, int _qptr_offset, float[] z, int _z_offset, float[] ztemp, int _ztemp_offset, org.netlib.util.intW info) { - lapack.slaeda(n, tlvls, curlvl, curpbm, prmptr, _prmptr_offset, perm, _perm_offset, givptr, _givptr_offset, givcol, _givcol_offset, givnum, _givnum_offset, q, _q_offset, qptr, _qptr_offset, z, _z_offset, ztemp, _ztemp_offset, info); + org.netlib.lapack.Slaeda.slaeda(n, tlvls, curlvl, curpbm, prmptr, _prmptr_offset, perm, _perm_offset, givptr, _givptr_offset, givcol, _givcol_offset, givnum, _givnum_offset, q, _q_offset, qptr, _qptr_offset, z, _z_offset, ztemp, _ztemp_offset, info); } protected void slaeinK(boolean rightv, boolean noinit, int n, float[] h, int _h_offset, int ldh, float wr, float wi, float[] vr, int _vr_offset, float[] vi, int _vi_offset, float[] b, int _b_offset, int ldb, float[] work, int _work_offset, float eps3, float smlnum, float bignum, org.netlib.util.intW info) { - lapack.slaein(rightv, noinit, n, h, _h_offset, ldh, wr, wi, vr, _vr_offset, vi, _vi_offset, b, _b_offset, ldb, work, _work_offset, eps3, smlnum, bignum, info); + org.netlib.lapack.Slaein.slaein(rightv, noinit, n, h, _h_offset, ldh, wr, wi, vr, _vr_offset, vi, _vi_offset, b, _b_offset, ldb, work, _work_offset, eps3, smlnum, bignum, info); } protected void slaev2K(float a, float b, float c, org.netlib.util.floatW rt1, org.netlib.util.floatW rt2, org.netlib.util.floatW cs1, org.netlib.util.floatW sn1) { - lapack.slaev2(a, b, c, rt1, rt2, cs1, sn1); + org.netlib.lapack.Slaev2.slaev2(a, b, c, rt1, rt2, cs1, sn1); } protected void slaexcK(boolean wantq, int n, float[] t, int _t_offset, int ldt, float[] q, int _q_offset, int ldq, int j1, int n1, int n2, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.slaexc(wantq, n, t, _t_offset, ldt, q, _q_offset, ldq, j1, n1, n2, work, _work_offset, info); + org.netlib.lapack.Slaexc.slaexc(wantq, n, t, _t_offset, ldt, q, _q_offset, ldq, j1, n1, n2, work, _work_offset, info); } protected void slag2K(float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float safmin, org.netlib.util.floatW scale1, org.netlib.util.floatW scale2, org.netlib.util.floatW wr1, org.netlib.util.floatW wr2, org.netlib.util.floatW wi) { - lapack.slag2(a, _a_offset, lda, b, _b_offset, ldb, safmin, scale1, scale2, wr1, wr2, wi); + org.netlib.lapack.Slag2.slag2(a, _a_offset, lda, b, _b_offset, ldb, safmin, scale1, scale2, wr1, wr2, wi); } protected void slag2dK(int m, int n, float[] sa, int _sa_offset, int ldsa, double[] a, int _a_offset, int lda, org.netlib.util.intW info) { - lapack.slag2d(m, n, sa, _sa_offset, ldsa, a, _a_offset, lda, info); + org.netlib.lapack.Slag2d.slag2d(m, n, sa, _sa_offset, ldsa, a, _a_offset, lda, info); } protected void slags2K(boolean upper, float a1, float a2, float a3, float b1, float b2, float b3, org.netlib.util.floatW csu, org.netlib.util.floatW snu, org.netlib.util.floatW csv, org.netlib.util.floatW snv, org.netlib.util.floatW csq, org.netlib.util.floatW snq) { - lapack.slags2(upper, a1, a2, a3, b1, b2, b3, csu, snu, csv, snv, csq, snq); + org.netlib.lapack.Slags2.slags2(upper, a1, a2, a3, b1, b2, b3, csu, snu, csv, snv, csq, snq); } protected void slagtfK(int n, float[] a, int _a_offset, float lambda, float[] b, int _b_offset, float[] c, int _c_offset, float tol, float[] d, int _d_offset, int[] in, int _in_offset, org.netlib.util.intW info) { - lapack.slagtf(n, a, _a_offset, lambda, b, _b_offset, c, _c_offset, tol, d, _d_offset, in, _in_offset, info); + org.netlib.lapack.Slagtf.slagtf(n, a, _a_offset, lambda, b, _b_offset, c, _c_offset, tol, d, _d_offset, in, _in_offset, info); } protected void slagtmK(String trans, int n, int nrhs, float alpha, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] x, int _x_offset, int ldx, float beta, float[] b, int _b_offset, int ldb) { - lapack.slagtm(trans, n, nrhs, alpha, dl, _dl_offset, d, _d_offset, du, _du_offset, x, _x_offset, ldx, beta, b, _b_offset, ldb); + org.netlib.lapack.Slagtm.slagtm(trans, n, nrhs, alpha, dl, _dl_offset, d, _d_offset, du, _du_offset, x, _x_offset, ldx, beta, b, _b_offset, ldb); } protected void slagtsK(int job, int n, float[] a, int _a_offset, float[] b, int _b_offset, float[] c, int _c_offset, float[] d, int _d_offset, int[] in, int _in_offset, float[] y, int _y_offset, org.netlib.util.floatW tol, org.netlib.util.intW info) { - lapack.slagts(job, n, a, _a_offset, b, _b_offset, c, _c_offset, d, _d_offset, in, _in_offset, y, _y_offset, tol, info); + org.netlib.lapack.Slagts.slagts(job, n, a, _a_offset, b, _b_offset, c, _c_offset, d, _d_offset, in, _in_offset, y, _y_offset, tol, info); } protected void slagv2K(float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, org.netlib.util.floatW csl, org.netlib.util.floatW snl, org.netlib.util.floatW csr, org.netlib.util.floatW snr) { - lapack.slagv2(a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, csl, snl, csr, snr); + org.netlib.lapack.Slagv2.slagv2(a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, csl, snl, csr, snr); } protected void slahqrK(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, int iloz, int ihiz, float[] z, int _z_offset, int ldz, org.netlib.util.intW info) { - lapack.slahqr(wantt, wantz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, iloz, ihiz, z, _z_offset, ldz, info); + org.netlib.lapack.Slahqr.slahqr(wantt, wantz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, iloz, ihiz, z, _z_offset, ldz, info); } protected void slahr2K(int n, int k, int nb, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] t, int _t_offset, int ldt, float[] y, int _y_offset, int ldy) { - lapack.slahr2(n, k, nb, a, _a_offset, lda, tau, _tau_offset, t, _t_offset, ldt, y, _y_offset, ldy); + org.netlib.lapack.Slahr2.slahr2(n, k, nb, a, _a_offset, lda, tau, _tau_offset, t, _t_offset, ldt, y, _y_offset, ldy); } protected void slahrdK(int n, int k, int nb, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] t, int _t_offset, int ldt, float[] y, int _y_offset, int ldy) { - lapack.slahrd(n, k, nb, a, _a_offset, lda, tau, _tau_offset, t, _t_offset, ldt, y, _y_offset, ldy); + org.netlib.lapack.Slahrd.slahrd(n, k, nb, a, _a_offset, lda, tau, _tau_offset, t, _t_offset, ldt, y, _y_offset, ldy); } protected void slaic1K(int job, int j, float[] x, int _x_offset, float sest, float[] w, int _w_offset, float gamma, org.netlib.util.floatW sestpr, org.netlib.util.floatW s, org.netlib.util.floatW c) { - lapack.slaic1(job, j, x, _x_offset, sest, w, _w_offset, gamma, sestpr, s, c); + org.netlib.lapack.Slaic1.slaic1(job, j, x, _x_offset, sest, w, _w_offset, gamma, sestpr, s, c); } protected boolean slaisnanK(float sin1, float sin2) { - return lapack.slaisnan(sin1, sin2); + return org.netlib.lapack.Slaisnan.slaisnan(sin1, sin2); } protected void slaln2K(boolean ltrans, int na, int nw, float smin, float ca, float[] a, int _a_offset, int lda, float d1, float d2, float[] b, int _b_offset, int ldb, float wr, float wi, float[] x, int _x_offset, int ldx, org.netlib.util.floatW scale, org.netlib.util.floatW xnorm, org.netlib.util.intW info) { - lapack.slaln2(ltrans, na, nw, smin, ca, a, _a_offset, lda, d1, d2, b, _b_offset, ldb, wr, wi, x, _x_offset, ldx, scale, xnorm, info); + org.netlib.lapack.Slaln2.slaln2(ltrans, na, nw, smin, ca, a, _a_offset, lda, d1, d2, b, _b_offset, ldb, wr, wi, x, _x_offset, ldx, scale, xnorm, info); } protected void slals0K(int icompq, int nl, int nr, int sqre, int nrhs, float[] b, int _b_offset, int ldb, float[] bx, int _bx_offset, int ldbx, int[] perm, int _perm_offset, int givptr, int[] givcol, int _givcol_offset, int ldgcol, float[] givnum, int _givnum_offset, int ldgnum, float[] poles, int _poles_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, float[] z, int _z_offset, int k, float c, float s, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.slals0(icompq, nl, nr, sqre, nrhs, b, _b_offset, ldb, bx, _bx_offset, ldbx, perm, _perm_offset, givptr, givcol, _givcol_offset, ldgcol, givnum, _givnum_offset, ldgnum, poles, _poles_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, k, c, s, work, _work_offset, info); + org.netlib.lapack.Slals0.slals0(icompq, nl, nr, sqre, nrhs, b, _b_offset, ldb, bx, _bx_offset, ldbx, perm, _perm_offset, givptr, givcol, _givcol_offset, ldgcol, givnum, _givnum_offset, ldgnum, poles, _poles_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, k, c, s, work, _work_offset, info); } protected void slalsaK(int icompq, int smlsiz, int n, int nrhs, float[] b, int _b_offset, int ldb, float[] bx, int _bx_offset, int ldbx, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int[] k, int _k_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, float[] z, int _z_offset, float[] poles, int _poles_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, int ldgcol, int[] perm, int _perm_offset, float[] givnum, int _givnum_offset, float[] c, int _c_offset, float[] s, int _s_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.slalsa(icompq, smlsiz, n, nrhs, b, _b_offset, ldb, bx, _bx_offset, ldbx, u, _u_offset, ldu, vt, _vt_offset, k, _k_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, poles, _poles_offset, givptr, _givptr_offset, givcol, _givcol_offset, ldgcol, perm, _perm_offset, givnum, _givnum_offset, c, _c_offset, s, _s_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Slalsa.slalsa(icompq, smlsiz, n, nrhs, b, _b_offset, ldb, bx, _bx_offset, ldbx, u, _u_offset, ldu, vt, _vt_offset, k, _k_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, poles, _poles_offset, givptr, _givptr_offset, givcol, _givcol_offset, ldgcol, perm, _perm_offset, givnum, _givnum_offset, c, _c_offset, s, _s_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void slalsdK(String uplo, int smlsiz, int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] b, int _b_offset, int ldb, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.slalsd(uplo, smlsiz, n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb, rcond, rank, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Slalsd.slalsd(uplo, smlsiz, n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb, rcond, rank, work, _work_offset, iwork, _iwork_offset, info); } protected void slamrgK(int n1, int n2, float[] a, int _a_offset, int strd1, int strd2, int[] index, int _index_offset) { - lapack.slamrg(n1, n2, a, _a_offset, strd1, strd2, index, _index_offset); + org.netlib.lapack.Slamrg.slamrg(n1, n2, a, _a_offset, strd1, strd2, index, _index_offset); } protected int slanegK(int n, float[] d, int _d_offset, float[] lld, int _lld_offset, float sigma, float pivmin, int r) { - return lapack.slaneg(n, d, _d_offset, lld, _lld_offset, sigma, pivmin, r); + return org.netlib.lapack.Slaneg.slaneg(n, d, _d_offset, lld, _lld_offset, sigma, pivmin, r); } protected float slangbK(String norm, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, float[] work, int _work_offset) { - return lapack.slangb(norm, n, kl, ku, ab, _ab_offset, ldab, work, _work_offset); + return org.netlib.lapack.Slangb.slangb(norm, n, kl, ku, ab, _ab_offset, ldab, work, _work_offset); } protected float slangeK(String norm, int m, int n, float[] a, int _a_offset, int lda, float[] work, int _work_offset) { - return lapack.slange(norm, m, n, a, _a_offset, lda, work, _work_offset); + return org.netlib.lapack.Slange.slange(norm, m, n, a, _a_offset, lda, work, _work_offset); } protected float slangtK(String norm, int n, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset) { - return lapack.slangt(norm, n, dl, _dl_offset, d, _d_offset, du, _du_offset); + return org.netlib.lapack.Slangt.slangt(norm, n, dl, _dl_offset, d, _d_offset, du, _du_offset); } protected float slanhsK(String norm, int n, float[] a, int _a_offset, int lda, float[] work, int _work_offset) { - return lapack.slanhs(norm, n, a, _a_offset, lda, work, _work_offset); + return org.netlib.lapack.Slanhs.slanhs(norm, n, a, _a_offset, lda, work, _work_offset); } protected float slansbK(String norm, String uplo, int n, int k, float[] ab, int _ab_offset, int ldab, float[] work, int _work_offset) { - return lapack.slansb(norm, uplo, n, k, ab, _ab_offset, ldab, work, _work_offset); + return org.netlib.lapack.Slansb.slansb(norm, uplo, n, k, ab, _ab_offset, ldab, work, _work_offset); } protected float slanspK(String norm, String uplo, int n, float[] ap, int _ap_offset, float[] work, int _work_offset) { - return lapack.slansp(norm, uplo, n, ap, _ap_offset, work, _work_offset); + return org.netlib.lapack.Slansp.slansp(norm, uplo, n, ap, _ap_offset, work, _work_offset); } protected float slanstK(String norm, int n, float[] d, int _d_offset, float[] e, int _e_offset) { - return lapack.slanst(norm, n, d, _d_offset, e, _e_offset); + return org.netlib.lapack.Slanst.slanst(norm, n, d, _d_offset, e, _e_offset); } protected float slansyK(String norm, String uplo, int n, float[] a, int _a_offset, int lda, float[] work, int _work_offset) { - return lapack.slansy(norm, uplo, n, a, _a_offset, lda, work, _work_offset); + return org.netlib.lapack.Slansy.slansy(norm, uplo, n, a, _a_offset, lda, work, _work_offset); } protected float slantbK(String norm, String uplo, String diag, int n, int k, float[] ab, int _ab_offset, int ldab, float[] work, int _work_offset) { - return lapack.slantb(norm, uplo, diag, n, k, ab, _ab_offset, ldab, work, _work_offset); + return org.netlib.lapack.Slantb.slantb(norm, uplo, diag, n, k, ab, _ab_offset, ldab, work, _work_offset); } protected float slantpK(String norm, String uplo, String diag, int n, float[] ap, int _ap_offset, float[] work, int _work_offset) { - return lapack.slantp(norm, uplo, diag, n, ap, _ap_offset, work, _work_offset); + return org.netlib.lapack.Slantp.slantp(norm, uplo, diag, n, ap, _ap_offset, work, _work_offset); } protected float slantrK(String norm, String uplo, String diag, int m, int n, float[] a, int _a_offset, int lda, float[] work, int _work_offset) { - return lapack.slantr(norm, uplo, diag, m, n, a, _a_offset, lda, work, _work_offset); + return org.netlib.lapack.Slantr.slantr(norm, uplo, diag, m, n, a, _a_offset, lda, work, _work_offset); } protected void slanv2K(org.netlib.util.floatW a, org.netlib.util.floatW b, org.netlib.util.floatW c, org.netlib.util.floatW d, org.netlib.util.floatW rt1r, org.netlib.util.floatW rt1i, org.netlib.util.floatW rt2r, org.netlib.util.floatW rt2i, org.netlib.util.floatW cs, org.netlib.util.floatW sn) { - lapack.slanv2(a, b, c, d, rt1r, rt1i, rt2r, rt2i, cs, sn); + org.netlib.lapack.Slanv2.slanv2(a, b, c, d, rt1r, rt1i, rt2r, rt2i, cs, sn); } protected void slapllK(int n, float[] x, int _x_offset, int incx, float[] y, int _y_offset, int incy, org.netlib.util.floatW ssmin) { - lapack.slapll(n, x, _x_offset, incx, y, _y_offset, incy, ssmin); + org.netlib.lapack.Slapll.slapll(n, x, _x_offset, incx, y, _y_offset, incy, ssmin); } protected void slapmtK(boolean forwrd, int m, int n, float[] x, int _x_offset, int ldx, int[] k, int _k_offset) { - lapack.slapmt(forwrd, m, n, x, _x_offset, ldx, k, _k_offset); + org.netlib.lapack.Slapmt.slapmt(forwrd, m, n, x, _x_offset, ldx, k, _k_offset); } protected float slapy2K(float x, float y) { - return lapack.slapy2(x, y); + return org.netlib.lapack.Slapy2.slapy2(x, y); } protected float slapy3K(float x, float y, float z) { - return lapack.slapy3(x, y, z); + return org.netlib.lapack.Slapy3.slapy3(x, y, z); } protected void slaqgbK(int m, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, float[] r, int _r_offset, float[] c, int _c_offset, float rowcnd, float colcnd, float amax, org.netlib.util.StringW equed) { - lapack.slaqgb(m, n, kl, ku, ab, _ab_offset, ldab, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, equed); + org.netlib.lapack.Slaqgb.slaqgb(m, n, kl, ku, ab, _ab_offset, ldab, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, equed); } protected void slaqgeK(int m, int n, float[] a, int _a_offset, int lda, float[] r, int _r_offset, float[] c, int _c_offset, float rowcnd, float colcnd, float amax, org.netlib.util.StringW equed) { - lapack.slaqge(m, n, a, _a_offset, lda, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, equed); + org.netlib.lapack.Slaqge.slaqge(m, n, a, _a_offset, lda, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, equed); } protected void slaqp2K(int m, int n, int offset, float[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, float[] tau, int _tau_offset, float[] vn1, int _vn1_offset, float[] vn2, int _vn2_offset, float[] work, int _work_offset) { - lapack.slaqp2(m, n, offset, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, vn1, _vn1_offset, vn2, _vn2_offset, work, _work_offset); + org.netlib.lapack.Slaqp2.slaqp2(m, n, offset, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, vn1, _vn1_offset, vn2, _vn2_offset, work, _work_offset); } protected void slaqpsK(int m, int n, int offset, int nb, org.netlib.util.intW kb, float[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, float[] tau, int _tau_offset, float[] vn1, int _vn1_offset, float[] vn2, int _vn2_offset, float[] auxv, int _auxv_offset, float[] f, int _f_offset, int ldf) { - lapack.slaqps(m, n, offset, nb, kb, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, vn1, _vn1_offset, vn2, _vn2_offset, auxv, _auxv_offset, f, _f_offset, ldf); + org.netlib.lapack.Slaqps.slaqps(m, n, offset, nb, kb, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, vn1, _vn1_offset, vn2, _vn2_offset, auxv, _auxv_offset, f, _f_offset, ldf); } protected void slaqr0K(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, int iloz, int ihiz, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.slaqr0(wantt, wantz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, iloz, ihiz, z, _z_offset, ldz, work, _work_offset, lwork, info); + org.netlib.lapack.Slaqr0.slaqr0(wantt, wantz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, iloz, ihiz, z, _z_offset, ldz, work, _work_offset, lwork, info); } protected void slaqr1K(int n, float[] h, int _h_offset, int ldh, float sr1, float si1, float sr2, float si2, float[] v, int _v_offset) { - lapack.slaqr1(n, h, _h_offset, ldh, sr1, si1, sr2, si2, v, _v_offset); + org.netlib.lapack.Slaqr1.slaqr1(n, h, _h_offset, ldh, sr1, si1, sr2, si2, v, _v_offset); } protected void slaqr2K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, float[] h, int _h_offset, int ldh, int iloz, int ihiz, float[] z, int _z_offset, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, float[] sr, int _sr_offset, float[] si, int _si_offset, float[] v, int _v_offset, int ldv, int nh, float[] t, int _t_offset, int ldt, int nv, float[] wv, int _wv_offset, int ldwv, float[] work, int _work_offset, int lwork) { - lapack.slaqr2(wantt, wantz, n, ktop, kbot, nw, h, _h_offset, ldh, iloz, ihiz, z, _z_offset, ldz, ns, nd, sr, _sr_offset, si, _si_offset, v, _v_offset, ldv, nh, t, _t_offset, ldt, nv, wv, _wv_offset, ldwv, work, _work_offset, lwork); + org.netlib.lapack.Slaqr2.slaqr2(wantt, wantz, n, ktop, kbot, nw, h, _h_offset, ldh, iloz, ihiz, z, _z_offset, ldz, ns, nd, sr, _sr_offset, si, _si_offset, v, _v_offset, ldv, nh, t, _t_offset, ldt, nv, wv, _wv_offset, ldwv, work, _work_offset, lwork); } protected void slaqr3K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, float[] h, int _h_offset, int ldh, int iloz, int ihiz, float[] z, int _z_offset, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, float[] sr, int _sr_offset, float[] si, int _si_offset, float[] v, int _v_offset, int ldv, int nh, float[] t, int _t_offset, int ldt, int nv, float[] wv, int _wv_offset, int ldwv, float[] work, int _work_offset, int lwork) { - lapack.slaqr3(wantt, wantz, n, ktop, kbot, nw, h, _h_offset, ldh, iloz, ihiz, z, _z_offset, ldz, ns, nd, sr, _sr_offset, si, _si_offset, v, _v_offset, ldv, nh, t, _t_offset, ldt, nv, wv, _wv_offset, ldwv, work, _work_offset, lwork); + org.netlib.lapack.Slaqr3.slaqr3(wantt, wantz, n, ktop, kbot, nw, h, _h_offset, ldh, iloz, ihiz, z, _z_offset, ldz, ns, nd, sr, _sr_offset, si, _si_offset, v, _v_offset, ldv, nh, t, _t_offset, ldt, nv, wv, _wv_offset, ldwv, work, _work_offset, lwork); } protected void slaqr4K(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, int iloz, int ihiz, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.slaqr4(wantt, wantz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, iloz, ihiz, z, _z_offset, ldz, work, _work_offset, lwork, info); + org.netlib.lapack.Slaqr4.slaqr4(wantt, wantz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, iloz, ihiz, z, _z_offset, ldz, work, _work_offset, lwork, info); } protected void slaqr5K(boolean wantt, boolean wantz, int kacc22, int n, int ktop, int kbot, int nshfts, float[] sr, int _sr_offset, float[] si, int _si_offset, float[] h, int _h_offset, int ldh, int iloz, int ihiz, float[] z, int _z_offset, int ldz, float[] v, int _v_offset, int ldv, float[] u, int _u_offset, int ldu, int nv, float[] wv, int _wv_offset, int ldwv, int nh, float[] wh, int _wh_offset, int ldwh) { - lapack.slaqr5(wantt, wantz, kacc22, n, ktop, kbot, nshfts, sr, _sr_offset, si, _si_offset, h, _h_offset, ldh, iloz, ihiz, z, _z_offset, ldz, v, _v_offset, ldv, u, _u_offset, ldu, nv, wv, _wv_offset, ldwv, nh, wh, _wh_offset, ldwh); + org.netlib.lapack.Slaqr5.slaqr5(wantt, wantz, kacc22, n, ktop, kbot, nshfts, sr, _sr_offset, si, _si_offset, h, _h_offset, ldh, iloz, ihiz, z, _z_offset, ldz, v, _v_offset, ldv, u, _u_offset, ldu, nv, wv, _wv_offset, ldwv, nh, wh, _wh_offset, ldwh); } protected void slaqsbK(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] s, int _s_offset, float scond, float amax, org.netlib.util.StringW equed) { - lapack.slaqsb(uplo, n, kd, ab, _ab_offset, ldab, s, _s_offset, scond, amax, equed); + org.netlib.lapack.Slaqsb.slaqsb(uplo, n, kd, ab, _ab_offset, ldab, s, _s_offset, scond, amax, equed); } protected void slaqspK(String uplo, int n, float[] ap, int _ap_offset, float[] s, int _s_offset, float scond, float amax, org.netlib.util.StringW equed) { - lapack.slaqsp(uplo, n, ap, _ap_offset, s, _s_offset, scond, amax, equed); + org.netlib.lapack.Slaqsp.slaqsp(uplo, n, ap, _ap_offset, s, _s_offset, scond, amax, equed); } protected void slaqsyK(String uplo, int n, float[] a, int _a_offset, int lda, float[] s, int _s_offset, float scond, float amax, org.netlib.util.StringW equed) { - lapack.slaqsy(uplo, n, a, _a_offset, lda, s, _s_offset, scond, amax, equed); + org.netlib.lapack.Slaqsy.slaqsy(uplo, n, a, _a_offset, lda, s, _s_offset, scond, amax, equed); } protected void slaqtrK(boolean ltran, boolean lreal, int n, float[] t, int _t_offset, int ldt, float[] b, int _b_offset, float w, org.netlib.util.floatW scale, float[] x, int _x_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.slaqtr(ltran, lreal, n, t, _t_offset, ldt, b, _b_offset, w, scale, x, _x_offset, work, _work_offset, info); + org.netlib.lapack.Slaqtr.slaqtr(ltran, lreal, n, t, _t_offset, ldt, b, _b_offset, w, scale, x, _x_offset, work, _work_offset, info); } protected void slar1vK(int n, int b1, int bn, float lambda, float[] d, int _d_offset, float[] l, int _l_offset, float[] ld, int _ld_offset, float[] lld, int _lld_offset, float pivmin, float gaptol, float[] z, int _z_offset, boolean wantnc, org.netlib.util.intW negcnt, org.netlib.util.floatW ztz, org.netlib.util.floatW mingma, org.netlib.util.intW r, int[] isuppz, int _isuppz_offset, org.netlib.util.floatW nrminv, org.netlib.util.floatW resid, org.netlib.util.floatW rqcorr, float[] work, int _work_offset) { - lapack.slar1v(n, b1, bn, lambda, d, _d_offset, l, _l_offset, ld, _ld_offset, lld, _lld_offset, pivmin, gaptol, z, _z_offset, wantnc, negcnt, ztz, mingma, r, isuppz, _isuppz_offset, nrminv, resid, rqcorr, work, _work_offset); + org.netlib.lapack.Slar1v.slar1v(n, b1, bn, lambda, d, _d_offset, l, _l_offset, ld, _ld_offset, lld, _lld_offset, pivmin, gaptol, z, _z_offset, wantnc, negcnt, ztz, mingma, r, isuppz, _isuppz_offset, nrminv, resid, rqcorr, work, _work_offset); } protected void slar2vK(int n, float[] x, int _x_offset, float[] y, int _y_offset, float[] z, int _z_offset, int incx, float[] c, int _c_offset, float[] s, int _s_offset, int incc) { - lapack.slar2v(n, x, _x_offset, y, _y_offset, z, _z_offset, incx, c, _c_offset, s, _s_offset, incc); + org.netlib.lapack.Slar2v.slar2v(n, x, _x_offset, y, _y_offset, z, _z_offset, incx, c, _c_offset, s, _s_offset, incc); } protected void slarfK(String side, int m, int n, float[] v, int _v_offset, int incv, float tau, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset) { - lapack.slarf(side, m, n, v, _v_offset, incv, tau, c, _c_offset, Ldc, work, _work_offset); + org.netlib.lapack.Slarf.slarf(side, m, n, v, _v_offset, incv, tau, c, _c_offset, Ldc, work, _work_offset); } protected void slarfbK(String side, String trans, String direct, String storev, int m, int n, int k, float[] v, int _v_offset, int ldv, float[] t, int _t_offset, int ldt, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int ldwork) { - lapack.slarfb(side, trans, direct, storev, m, n, k, v, _v_offset, ldv, t, _t_offset, ldt, c, _c_offset, Ldc, work, _work_offset, ldwork); + org.netlib.lapack.Slarfb.slarfb(side, trans, direct, storev, m, n, k, v, _v_offset, ldv, t, _t_offset, ldt, c, _c_offset, Ldc, work, _work_offset, ldwork); } protected void slarfgK(int n, org.netlib.util.floatW alpha, float[] x, int _x_offset, int incx, org.netlib.util.floatW tau) { - lapack.slarfg(n, alpha, x, _x_offset, incx, tau); + org.netlib.lapack.Slarfg.slarfg(n, alpha, x, _x_offset, incx, tau); } protected void slarftK(String direct, String storev, int n, int k, float[] v, int _v_offset, int ldv, float[] tau, int _tau_offset, float[] t, int _t_offset, int ldt) { - lapack.slarft(direct, storev, n, k, v, _v_offset, ldv, tau, _tau_offset, t, _t_offset, ldt); + org.netlib.lapack.Slarft.slarft(direct, storev, n, k, v, _v_offset, ldv, tau, _tau_offset, t, _t_offset, ldt); } protected void slarfxK(String side, int m, int n, float[] v, int _v_offset, float tau, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset) { - lapack.slarfx(side, m, n, v, _v_offset, tau, c, _c_offset, Ldc, work, _work_offset); + org.netlib.lapack.Slarfx.slarfx(side, m, n, v, _v_offset, tau, c, _c_offset, Ldc, work, _work_offset); } protected void slargvK(int n, float[] x, int _x_offset, int incx, float[] y, int _y_offset, int incy, float[] c, int _c_offset, int incc) { - lapack.slargv(n, x, _x_offset, incx, y, _y_offset, incy, c, _c_offset, incc); + org.netlib.lapack.Slargv.slargv(n, x, _x_offset, incx, y, _y_offset, incy, c, _c_offset, incc); } protected void slarnvK(int idist, int[] iseed, int _iseed_offset, int n, float[] x, int _x_offset) { - lapack.slarnv(idist, iseed, _iseed_offset, n, x, _x_offset); + org.netlib.lapack.Slarnv.slarnv(idist, iseed, _iseed_offset, n, x, _x_offset); } protected void slarraK(int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] e2, int _e2_offset, float spltol, float tnrm, org.netlib.util.intW nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW info) { - lapack.slarra(n, d, _d_offset, e, _e_offset, e2, _e2_offset, spltol, tnrm, nsplit, isplit, _isplit_offset, info); + org.netlib.lapack.Slarra.slarra(n, d, _d_offset, e, _e_offset, e2, _e2_offset, spltol, tnrm, nsplit, isplit, _isplit_offset, info); } protected void slarrbK(int n, float[] d, int _d_offset, float[] lld, int _lld_offset, int ifirst, int ilast, float rtol1, float rtol2, int offset, float[] w, int _w_offset, float[] wgap, int _wgap_offset, float[] werr, int _werr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, float pivmin, float spdiam, int twist, org.netlib.util.intW info) { - lapack.slarrb(n, d, _d_offset, lld, _lld_offset, ifirst, ilast, rtol1, rtol2, offset, w, _w_offset, wgap, _wgap_offset, werr, _werr_offset, work, _work_offset, iwork, _iwork_offset, pivmin, spdiam, twist, info); + org.netlib.lapack.Slarrb.slarrb(n, d, _d_offset, lld, _lld_offset, ifirst, ilast, rtol1, rtol2, offset, w, _w_offset, wgap, _wgap_offset, werr, _werr_offset, work, _work_offset, iwork, _iwork_offset, pivmin, spdiam, twist, info); } protected void slarrcK(String jobt, int n, float vl, float vu, float[] d, int _d_offset, float[] e, int _e_offset, float pivmin, org.netlib.util.intW eigcnt, org.netlib.util.intW lcnt, org.netlib.util.intW rcnt, org.netlib.util.intW info) { - lapack.slarrc(jobt, n, vl, vu, d, _d_offset, e, _e_offset, pivmin, eigcnt, lcnt, rcnt, info); + org.netlib.lapack.Slarrc.slarrc(jobt, n, vl, vu, d, _d_offset, e, _e_offset, pivmin, eigcnt, lcnt, rcnt, info); } protected void slarrdK(String range, String order, int n, float vl, float vu, int il, int iu, float[] gers, int _gers_offset, float reltol, float[] d, int _d_offset, float[] e, int _e_offset, float[] e2, int _e2_offset, float pivmin, int nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW m, float[] w, int _w_offset, float[] werr, int _werr_offset, org.netlib.util.floatW wl, org.netlib.util.floatW wu, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.slarrd(range, order, n, vl, vu, il, iu, gers, _gers_offset, reltol, d, _d_offset, e, _e_offset, e2, _e2_offset, pivmin, nsplit, isplit, _isplit_offset, m, w, _w_offset, werr, _werr_offset, wl, wu, iblock, _iblock_offset, indexw, _indexw_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Slarrd.slarrd(range, order, n, vl, vu, il, iu, gers, _gers_offset, reltol, d, _d_offset, e, _e_offset, e2, _e2_offset, pivmin, nsplit, isplit, _isplit_offset, m, w, _w_offset, werr, _werr_offset, wl, wu, iblock, _iblock_offset, indexw, _indexw_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void slarreK(String range, int n, org.netlib.util.floatW vl, org.netlib.util.floatW vu, int il, int iu, float[] d, int _d_offset, float[] e, int _e_offset, float[] e2, int _e2_offset, float rtol1, float rtol2, float spltol, org.netlib.util.intW nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW m, float[] w, int _w_offset, float[] werr, int _werr_offset, float[] wgap, int _wgap_offset, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, float[] gers, int _gers_offset, org.netlib.util.floatW pivmin, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.slarre(range, n, vl, vu, il, iu, d, _d_offset, e, _e_offset, e2, _e2_offset, rtol1, rtol2, spltol, nsplit, isplit, _isplit_offset, m, w, _w_offset, werr, _werr_offset, wgap, _wgap_offset, iblock, _iblock_offset, indexw, _indexw_offset, gers, _gers_offset, pivmin, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Slarre.slarre(range, n, vl, vu, il, iu, d, _d_offset, e, _e_offset, e2, _e2_offset, rtol1, rtol2, spltol, nsplit, isplit, _isplit_offset, m, w, _w_offset, werr, _werr_offset, wgap, _wgap_offset, iblock, _iblock_offset, indexw, _indexw_offset, gers, _gers_offset, pivmin, work, _work_offset, iwork, _iwork_offset, info); } protected void slarrfK(int n, float[] d, int _d_offset, float[] l, int _l_offset, float[] ld, int _ld_offset, int clstrt, int clend, float[] w, int _w_offset, float[] wgap, int _wgap_offset, float[] werr, int _werr_offset, float spdiam, float clgapl, float clgapr, float pivmin, org.netlib.util.floatW sigma, float[] dplus, int _dplus_offset, float[] lplus, int _lplus_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.slarrf(n, d, _d_offset, l, _l_offset, ld, _ld_offset, clstrt, clend, w, _w_offset, wgap, _wgap_offset, werr, _werr_offset, spdiam, clgapl, clgapr, pivmin, sigma, dplus, _dplus_offset, lplus, _lplus_offset, work, _work_offset, info); + org.netlib.lapack.Slarrf.slarrf(n, d, _d_offset, l, _l_offset, ld, _ld_offset, clstrt, clend, w, _w_offset, wgap, _wgap_offset, werr, _werr_offset, spdiam, clgapl, clgapr, pivmin, sigma, dplus, _dplus_offset, lplus, _lplus_offset, work, _work_offset, info); } protected void slarrjK(int n, float[] d, int _d_offset, float[] e2, int _e2_offset, int ifirst, int ilast, float rtol, int offset, float[] w, int _w_offset, float[] werr, int _werr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, float pivmin, float spdiam, org.netlib.util.intW info) { - lapack.slarrj(n, d, _d_offset, e2, _e2_offset, ifirst, ilast, rtol, offset, w, _w_offset, werr, _werr_offset, work, _work_offset, iwork, _iwork_offset, pivmin, spdiam, info); + org.netlib.lapack.Slarrj.slarrj(n, d, _d_offset, e2, _e2_offset, ifirst, ilast, rtol, offset, w, _w_offset, werr, _werr_offset, work, _work_offset, iwork, _iwork_offset, pivmin, spdiam, info); } protected void slarrkK(int n, int iw, float gl, float gu, float[] d, int _d_offset, float[] e2, int _e2_offset, float pivmin, float reltol, org.netlib.util.floatW w, org.netlib.util.floatW werr, org.netlib.util.intW info) { - lapack.slarrk(n, iw, gl, gu, d, _d_offset, e2, _e2_offset, pivmin, reltol, w, werr, info); + org.netlib.lapack.Slarrk.slarrk(n, iw, gl, gu, d, _d_offset, e2, _e2_offset, pivmin, reltol, w, werr, info); } protected void slarrrK(int n, float[] d, int _d_offset, float[] e, int _e_offset, org.netlib.util.intW info) { - lapack.slarrr(n, d, _d_offset, e, _e_offset, info); + org.netlib.lapack.Slarrr.slarrr(n, d, _d_offset, e, _e_offset, info); } protected void slarrvK(int n, float vl, float vu, float[] d, int _d_offset, float[] l, int _l_offset, float pivmin, int[] isplit, int _isplit_offset, int m, int dol, int dou, float minrgp, org.netlib.util.floatW rtol1, org.netlib.util.floatW rtol2, float[] w, int _w_offset, float[] werr, int _werr_offset, float[] wgap, int _wgap_offset, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, float[] gers, int _gers_offset, float[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.slarrv(n, vl, vu, d, _d_offset, l, _l_offset, pivmin, isplit, _isplit_offset, m, dol, dou, minrgp, rtol1, rtol2, w, _w_offset, werr, _werr_offset, wgap, _wgap_offset, iblock, _iblock_offset, indexw, _indexw_offset, gers, _gers_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Slarrv.slarrv(n, vl, vu, d, _d_offset, l, _l_offset, pivmin, isplit, _isplit_offset, m, dol, dou, minrgp, rtol1, rtol2, w, _w_offset, werr, _werr_offset, wgap, _wgap_offset, iblock, _iblock_offset, indexw, _indexw_offset, gers, _gers_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void slartgK(float f, float g, org.netlib.util.floatW cs, org.netlib.util.floatW sn, org.netlib.util.floatW r) { - lapack.slartg(f, g, cs, sn, r); + org.netlib.lapack.Slartg.slartg(f, g, cs, sn, r); } protected void slartvK(int n, float[] x, int _x_offset, int incx, float[] y, int _y_offset, int incy, float[] c, int _c_offset, float[] s, int _s_offset, int incc) { - lapack.slartv(n, x, _x_offset, incx, y, _y_offset, incy, c, _c_offset, s, _s_offset, incc); + org.netlib.lapack.Slartv.slartv(n, x, _x_offset, incx, y, _y_offset, incy, c, _c_offset, s, _s_offset, incc); } protected void slaruvK(int[] iseed, int _iseed_offset, int n, float[] x, int _x_offset) { - lapack.slaruv(iseed, _iseed_offset, n, x, _x_offset); + org.netlib.lapack.Slaruv.slaruv(iseed, _iseed_offset, n, x, _x_offset); } protected void slarzK(String side, int m, int n, int l, float[] v, int _v_offset, int incv, float tau, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset) { - lapack.slarz(side, m, n, l, v, _v_offset, incv, tau, c, _c_offset, Ldc, work, _work_offset); + org.netlib.lapack.Slarz.slarz(side, m, n, l, v, _v_offset, incv, tau, c, _c_offset, Ldc, work, _work_offset); } protected void slarzbK(String side, String trans, String direct, String storev, int m, int n, int k, int l, float[] v, int _v_offset, int ldv, float[] t, int _t_offset, int ldt, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int ldwork) { - lapack.slarzb(side, trans, direct, storev, m, n, k, l, v, _v_offset, ldv, t, _t_offset, ldt, c, _c_offset, Ldc, work, _work_offset, ldwork); + org.netlib.lapack.Slarzb.slarzb(side, trans, direct, storev, m, n, k, l, v, _v_offset, ldv, t, _t_offset, ldt, c, _c_offset, Ldc, work, _work_offset, ldwork); } protected void slarztK(String direct, String storev, int n, int k, float[] v, int _v_offset, int ldv, float[] tau, int _tau_offset, float[] t, int _t_offset, int ldt) { - lapack.slarzt(direct, storev, n, k, v, _v_offset, ldv, tau, _tau_offset, t, _t_offset, ldt); + org.netlib.lapack.Slarzt.slarzt(direct, storev, n, k, v, _v_offset, ldv, tau, _tau_offset, t, _t_offset, ldt); } protected void slas2K(float f, float g, float h, org.netlib.util.floatW ssmin, org.netlib.util.floatW ssmax) { - lapack.slas2(f, g, h, ssmin, ssmax); + org.netlib.lapack.Slas2.slas2(f, g, h, ssmin, ssmax); } protected void slasclK(String type, int kl, int ku, float cfrom, float cto, int m, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info) { - lapack.slascl(type, kl, ku, cfrom, cto, m, n, a, _a_offset, lda, info); + org.netlib.lapack.Slascl.slascl(type, kl, ku, cfrom, cto, m, n, a, _a_offset, lda, info); } protected void slasd0K(int n, int sqre, float[] d, int _d_offset, float[] e, int _e_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, int smlsiz, int[] iwork, int _iwork_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.slasd0(n, sqre, d, _d_offset, e, _e_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, smlsiz, iwork, _iwork_offset, work, _work_offset, info); + org.netlib.lapack.Slasd0.slasd0(n, sqre, d, _d_offset, e, _e_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, smlsiz, iwork, _iwork_offset, work, _work_offset, info); } protected void slasd1K(int nl, int nr, int sqre, float[] d, int _d_offset, org.netlib.util.floatW alpha, org.netlib.util.floatW beta, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, int[] idxq, int _idxq_offset, int[] iwork, int _iwork_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.slasd1(nl, nr, sqre, d, _d_offset, alpha, beta, u, _u_offset, ldu, vt, _vt_offset, ldvt, idxq, _idxq_offset, iwork, _iwork_offset, work, _work_offset, info); + org.netlib.lapack.Slasd1.slasd1(nl, nr, sqre, d, _d_offset, alpha, beta, u, _u_offset, ldu, vt, _vt_offset, ldvt, idxq, _idxq_offset, iwork, _iwork_offset, work, _work_offset, info); } protected void slasd2K(int nl, int nr, int sqre, org.netlib.util.intW k, float[] d, int _d_offset, float[] z, int _z_offset, float alpha, float beta, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, float[] dsigma, int _dsigma_offset, float[] u2, int _u2_offset, int ldu2, float[] vt2, int _vt2_offset, int ldvt2, int[] idxp, int _idxp_offset, int[] idx, int _idx_offset, int[] idxc, int _idxc_offset, int[] idxq, int _idxq_offset, int[] coltyp, int _coltyp_offset, org.netlib.util.intW info) { - lapack.slasd2(nl, nr, sqre, k, d, _d_offset, z, _z_offset, alpha, beta, u, _u_offset, ldu, vt, _vt_offset, ldvt, dsigma, _dsigma_offset, u2, _u2_offset, ldu2, vt2, _vt2_offset, ldvt2, idxp, _idxp_offset, idx, _idx_offset, idxc, _idxc_offset, idxq, _idxq_offset, coltyp, _coltyp_offset, info); + org.netlib.lapack.Slasd2.slasd2(nl, nr, sqre, k, d, _d_offset, z, _z_offset, alpha, beta, u, _u_offset, ldu, vt, _vt_offset, ldvt, dsigma, _dsigma_offset, u2, _u2_offset, ldu2, vt2, _vt2_offset, ldvt2, idxp, _idxp_offset, idx, _idx_offset, idxc, _idxc_offset, idxq, _idxq_offset, coltyp, _coltyp_offset, info); } protected void slasd3K(int nl, int nr, int sqre, int k, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, float[] dsigma, int _dsigma_offset, float[] u, int _u_offset, int ldu, float[] u2, int _u2_offset, int ldu2, float[] vt, int _vt_offset, int ldvt, float[] vt2, int _vt2_offset, int ldvt2, int[] idxc, int _idxc_offset, int[] ctot, int _ctot_offset, float[] z, int _z_offset, org.netlib.util.intW info) { - lapack.slasd3(nl, nr, sqre, k, d, _d_offset, q, _q_offset, ldq, dsigma, _dsigma_offset, u, _u_offset, ldu, u2, _u2_offset, ldu2, vt, _vt_offset, ldvt, vt2, _vt2_offset, ldvt2, idxc, _idxc_offset, ctot, _ctot_offset, z, _z_offset, info); + org.netlib.lapack.Slasd3.slasd3(nl, nr, sqre, k, d, _d_offset, q, _q_offset, ldq, dsigma, _dsigma_offset, u, _u_offset, ldu, u2, _u2_offset, ldu2, vt, _vt_offset, ldvt, vt2, _vt2_offset, ldvt2, idxc, _idxc_offset, ctot, _ctot_offset, z, _z_offset, info); } protected void slasd4K(int n, int i, float[] d, int _d_offset, float[] z, int _z_offset, float[] delta, int _delta_offset, float rho, org.netlib.util.floatW sigma, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.slasd4(n, i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, sigma, work, _work_offset, info); + org.netlib.lapack.Slasd4.slasd4(n, i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, sigma, work, _work_offset, info); } protected void slasd5K(int i, float[] d, int _d_offset, float[] z, int _z_offset, float[] delta, int _delta_offset, float rho, org.netlib.util.floatW dsigma, float[] work, int _work_offset) { - lapack.slasd5(i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, dsigma, work, _work_offset); + org.netlib.lapack.Slasd5.slasd5(i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, dsigma, work, _work_offset); } protected void slasd6K(int icompq, int nl, int nr, int sqre, float[] d, int _d_offset, float[] vf, int _vf_offset, float[] vl, int _vl_offset, org.netlib.util.floatW alpha, org.netlib.util.floatW beta, int[] idxq, int _idxq_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, int ldgcol, float[] givnum, int _givnum_offset, int ldgnum, float[] poles, int _poles_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, float[] z, int _z_offset, org.netlib.util.intW k, org.netlib.util.floatW c, org.netlib.util.floatW s, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.slasd6(icompq, nl, nr, sqre, d, _d_offset, vf, _vf_offset, vl, _vl_offset, alpha, beta, idxq, _idxq_offset, perm, _perm_offset, givptr, givcol, _givcol_offset, ldgcol, givnum, _givnum_offset, ldgnum, poles, _poles_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, k, c, s, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Slasd6.slasd6(icompq, nl, nr, sqre, d, _d_offset, vf, _vf_offset, vl, _vl_offset, alpha, beta, idxq, _idxq_offset, perm, _perm_offset, givptr, givcol, _givcol_offset, ldgcol, givnum, _givnum_offset, ldgnum, poles, _poles_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, k, c, s, work, _work_offset, iwork, _iwork_offset, info); } protected void slasd7K(int icompq, int nl, int nr, int sqre, org.netlib.util.intW k, float[] d, int _d_offset, float[] z, int _z_offset, float[] zw, int _zw_offset, float[] vf, int _vf_offset, float[] vfw, int _vfw_offset, float[] vl, int _vl_offset, float[] vlw, int _vlw_offset, float alpha, float beta, float[] dsigma, int _dsigma_offset, int[] idx, int _idx_offset, int[] idxp, int _idxp_offset, int[] idxq, int _idxq_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, int ldgcol, float[] givnum, int _givnum_offset, int ldgnum, org.netlib.util.floatW c, org.netlib.util.floatW s, org.netlib.util.intW info) { - lapack.slasd7(icompq, nl, nr, sqre, k, d, _d_offset, z, _z_offset, zw, _zw_offset, vf, _vf_offset, vfw, _vfw_offset, vl, _vl_offset, vlw, _vlw_offset, alpha, beta, dsigma, _dsigma_offset, idx, _idx_offset, idxp, _idxp_offset, idxq, _idxq_offset, perm, _perm_offset, givptr, givcol, _givcol_offset, ldgcol, givnum, _givnum_offset, ldgnum, c, s, info); + org.netlib.lapack.Slasd7.slasd7(icompq, nl, nr, sqre, k, d, _d_offset, z, _z_offset, zw, _zw_offset, vf, _vf_offset, vfw, _vfw_offset, vl, _vl_offset, vlw, _vlw_offset, alpha, beta, dsigma, _dsigma_offset, idx, _idx_offset, idxp, _idxp_offset, idxq, _idxq_offset, perm, _perm_offset, givptr, givcol, _givcol_offset, ldgcol, givnum, _givnum_offset, ldgnum, c, s, info); } protected void slasd8K(int icompq, int k, float[] d, int _d_offset, float[] z, int _z_offset, float[] vf, int _vf_offset, float[] vl, int _vl_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, int lddifr, float[] dsigma, int _dsigma_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.slasd8(icompq, k, d, _d_offset, z, _z_offset, vf, _vf_offset, vl, _vl_offset, difl, _difl_offset, difr, _difr_offset, lddifr, dsigma, _dsigma_offset, work, _work_offset, info); + org.netlib.lapack.Slasd8.slasd8(icompq, k, d, _d_offset, z, _z_offset, vf, _vf_offset, vl, _vl_offset, difl, _difl_offset, difr, _difr_offset, lddifr, dsigma, _dsigma_offset, work, _work_offset, info); } protected void slasdaK(int icompq, int smlsiz, int n, int sqre, float[] d, int _d_offset, float[] e, int _e_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int[] k, int _k_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, float[] z, int _z_offset, float[] poles, int _poles_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, int ldgcol, int[] perm, int _perm_offset, float[] givnum, int _givnum_offset, float[] c, int _c_offset, float[] s, int _s_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.slasda(icompq, smlsiz, n, sqre, d, _d_offset, e, _e_offset, u, _u_offset, ldu, vt, _vt_offset, k, _k_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, poles, _poles_offset, givptr, _givptr_offset, givcol, _givcol_offset, ldgcol, perm, _perm_offset, givnum, _givnum_offset, c, _c_offset, s, _s_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Slasda.slasda(icompq, smlsiz, n, sqre, d, _d_offset, e, _e_offset, u, _u_offset, ldu, vt, _vt_offset, k, _k_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, poles, _poles_offset, givptr, _givptr_offset, givcol, _givcol_offset, ldgcol, perm, _perm_offset, givnum, _givnum_offset, c, _c_offset, s, _s_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void slasdqK(String uplo, int sqre, int n, int ncvt, int nru, int ncc, float[] d, int _d_offset, float[] e, int _e_offset, float[] vt, int _vt_offset, int ldvt, float[] u, int _u_offset, int ldu, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.slasdq(uplo, sqre, n, ncvt, nru, ncc, d, _d_offset, e, _e_offset, vt, _vt_offset, ldvt, u, _u_offset, ldu, c, _c_offset, Ldc, work, _work_offset, info); + org.netlib.lapack.Slasdq.slasdq(uplo, sqre, n, ncvt, nru, ncc, d, _d_offset, e, _e_offset, vt, _vt_offset, ldvt, u, _u_offset, ldu, c, _c_offset, Ldc, work, _work_offset, info); } protected void slasdtK(int n, org.netlib.util.intW lvl, org.netlib.util.intW nd, int[] inode, int _inode_offset, int[] ndiml, int _ndiml_offset, int[] ndimr, int _ndimr_offset, int msub) { - lapack.slasdt(n, lvl, nd, inode, _inode_offset, ndiml, _ndiml_offset, ndimr, _ndimr_offset, msub); + org.netlib.lapack.Slasdt.slasdt(n, lvl, nd, inode, _inode_offset, ndiml, _ndiml_offset, ndimr, _ndimr_offset, msub); } protected void slasetK(String uplo, int m, int n, float alpha, float beta, float[] a, int _a_offset, int lda) { - lapack.slaset(uplo, m, n, alpha, beta, a, _a_offset, lda); + org.netlib.lapack.Slaset.slaset(uplo, m, n, alpha, beta, a, _a_offset, lda); } protected void slasq1K(int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.slasq1(n, d, _d_offset, e, _e_offset, work, _work_offset, info); + org.netlib.lapack.Slasq1.slasq1(n, d, _d_offset, e, _e_offset, work, _work_offset, info); } protected void slasq2K(int n, float[] z, int _z_offset, org.netlib.util.intW info) { - lapack.slasq2(n, z, _z_offset, info); + org.netlib.lapack.Slasq2.slasq2(n, z, _z_offset, info); } protected void slasq3K(int i0, org.netlib.util.intW n0, float[] z, int _z_offset, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW sigma, org.netlib.util.floatW desig, org.netlib.util.floatW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee) { - lapack.slasq3(i0, n0, z, _z_offset, pp, dmin, sigma, desig, qmax, nfail, iter, ndiv, ieee); + org.netlib.lapack.Slasq3.slasq3(i0, n0, z, _z_offset, pp, dmin, sigma, desig, qmax, nfail, iter, ndiv, ieee); } protected void slasq4K(int i0, int n0, float[] z, int _z_offset, int pp, int n0in, float dmin, float dmin1, float dmin2, float dn, float dn1, float dn2, org.netlib.util.floatW tau, org.netlib.util.intW ttype) { - lapack.slasq4(i0, n0, z, _z_offset, pp, n0in, dmin, dmin1, dmin2, dn, dn1, dn2, tau, ttype); + org.netlib.lapack.Slasq4.slasq4(i0, n0, z, _z_offset, pp, n0in, dmin, dmin1, dmin2, dn, dn1, dn2, tau, ttype); } protected void slasq5K(int i0, int n0, float[] z, int _z_offset, int pp, float tau, org.netlib.util.floatW dmin, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dnm1, org.netlib.util.floatW dnm2, boolean ieee) { - lapack.slasq5(i0, n0, z, _z_offset, pp, tau, dmin, dmin1, dmin2, dn, dnm1, dnm2, ieee); + org.netlib.lapack.Slasq5.slasq5(i0, n0, z, _z_offset, pp, tau, dmin, dmin1, dmin2, dn, dnm1, dnm2, ieee); } protected void slasq6K(int i0, int n0, float[] z, int _z_offset, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dnm1, org.netlib.util.floatW dnm2) { - lapack.slasq6(i0, n0, z, _z_offset, pp, dmin, dmin1, dmin2, dn, dnm1, dnm2); + org.netlib.lapack.Slasq6.slasq6(i0, n0, z, _z_offset, pp, dmin, dmin1, dmin2, dn, dnm1, dnm2); } protected void slasrK(String side, String pivot, String direct, int m, int n, float[] c, int _c_offset, float[] s, int _s_offset, float[] a, int _a_offset, int lda) { - lapack.slasr(side, pivot, direct, m, n, c, _c_offset, s, _s_offset, a, _a_offset, lda); + org.netlib.lapack.Slasr.slasr(side, pivot, direct, m, n, c, _c_offset, s, _s_offset, a, _a_offset, lda); } protected void slasrtK(String id, int n, float[] d, int _d_offset, org.netlib.util.intW info) { - lapack.slasrt(id, n, d, _d_offset, info); + org.netlib.lapack.Slasrt.slasrt(id, n, d, _d_offset, info); } protected void slassqK(int n, float[] x, int _x_offset, int incx, org.netlib.util.floatW scale, org.netlib.util.floatW sumsq) { - lapack.slassq(n, x, _x_offset, incx, scale, sumsq); + org.netlib.lapack.Slassq.slassq(n, x, _x_offset, incx, scale, sumsq); } protected void slasv2K(float f, float g, float h, org.netlib.util.floatW ssmin, org.netlib.util.floatW ssmax, org.netlib.util.floatW snr, org.netlib.util.floatW csr, org.netlib.util.floatW snl, org.netlib.util.floatW csl) { - lapack.slasv2(f, g, h, ssmin, ssmax, snr, csr, snl, csl); + org.netlib.lapack.Slasv2.slasv2(f, g, h, ssmin, ssmax, snr, csr, snl, csl); } protected void slaswpK(int n, float[] a, int _a_offset, int lda, int k1, int k2, int[] ipiv, int _ipiv_offset, int incx) { - lapack.slaswp(n, a, _a_offset, lda, k1, k2, ipiv, _ipiv_offset, incx); + org.netlib.lapack.Slaswp.slaswp(n, a, _a_offset, lda, k1, k2, ipiv, _ipiv_offset, incx); } protected void slasy2K(boolean ltranl, boolean ltranr, int isgn, int n1, int n2, float[] tl, int _tl_offset, int ldtl, float[] tr, int _tr_offset, int ldtr, float[] b, int _b_offset, int ldb, org.netlib.util.floatW scale, float[] x, int _x_offset, int ldx, org.netlib.util.floatW xnorm, org.netlib.util.intW info) { - lapack.slasy2(ltranl, ltranr, isgn, n1, n2, tl, _tl_offset, ldtl, tr, _tr_offset, ldtr, b, _b_offset, ldb, scale, x, _x_offset, ldx, xnorm, info); + org.netlib.lapack.Slasy2.slasy2(ltranl, ltranr, isgn, n1, n2, tl, _tl_offset, ldtl, tr, _tr_offset, ldtr, b, _b_offset, ldb, scale, x, _x_offset, ldx, xnorm, info); } protected void slasyfK(String uplo, int n, int nb, org.netlib.util.intW kb, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] w, int _w_offset, int ldw, org.netlib.util.intW info) { - lapack.slasyf(uplo, n, nb, kb, a, _a_offset, lda, ipiv, _ipiv_offset, w, _w_offset, ldw, info); + org.netlib.lapack.Slasyf.slasyf(uplo, n, nb, kb, a, _a_offset, lda, ipiv, _ipiv_offset, w, _w_offset, ldw, info); } protected void slatbsK(String uplo, String trans, String diag, String normin, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] x, int _x_offset, org.netlib.util.floatW scale, float[] cnorm, int _cnorm_offset, org.netlib.util.intW info) { - lapack.slatbs(uplo, trans, diag, normin, n, kd, ab, _ab_offset, ldab, x, _x_offset, scale, cnorm, _cnorm_offset, info); + org.netlib.lapack.Slatbs.slatbs(uplo, trans, diag, normin, n, kd, ab, _ab_offset, ldab, x, _x_offset, scale, cnorm, _cnorm_offset, info); } protected void slatdfK(int ijob, int n, float[] z, int _z_offset, int ldz, float[] rhs, int _rhs_offset, org.netlib.util.floatW rdsum, org.netlib.util.floatW rdscal, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset) { - lapack.slatdf(ijob, n, z, _z_offset, ldz, rhs, _rhs_offset, rdsum, rdscal, ipiv, _ipiv_offset, jpiv, _jpiv_offset); + org.netlib.lapack.Slatdf.slatdf(ijob, n, z, _z_offset, ldz, rhs, _rhs_offset, rdsum, rdscal, ipiv, _ipiv_offset, jpiv, _jpiv_offset); } protected void slatpsK(String uplo, String trans, String diag, String normin, int n, float[] ap, int _ap_offset, float[] x, int _x_offset, org.netlib.util.floatW scale, float[] cnorm, int _cnorm_offset, org.netlib.util.intW info) { - lapack.slatps(uplo, trans, diag, normin, n, ap, _ap_offset, x, _x_offset, scale, cnorm, _cnorm_offset, info); + org.netlib.lapack.Slatps.slatps(uplo, trans, diag, normin, n, ap, _ap_offset, x, _x_offset, scale, cnorm, _cnorm_offset, info); } protected void slatrdK(String uplo, int n, int nb, float[] a, int _a_offset, int lda, float[] e, int _e_offset, float[] tau, int _tau_offset, float[] w, int _w_offset, int ldw) { - lapack.slatrd(uplo, n, nb, a, _a_offset, lda, e, _e_offset, tau, _tau_offset, w, _w_offset, ldw); + org.netlib.lapack.Slatrd.slatrd(uplo, n, nb, a, _a_offset, lda, e, _e_offset, tau, _tau_offset, w, _w_offset, ldw); } protected void slatrsK(String uplo, String trans, String diag, String normin, int n, float[] a, int _a_offset, int lda, float[] x, int _x_offset, org.netlib.util.floatW scale, float[] cnorm, int _cnorm_offset, org.netlib.util.intW info) { - lapack.slatrs(uplo, trans, diag, normin, n, a, _a_offset, lda, x, _x_offset, scale, cnorm, _cnorm_offset, info); + org.netlib.lapack.Slatrs.slatrs(uplo, trans, diag, normin, n, a, _a_offset, lda, x, _x_offset, scale, cnorm, _cnorm_offset, info); } protected void slatrzK(int m, int n, int l, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset) { - lapack.slatrz(m, n, l, a, _a_offset, lda, tau, _tau_offset, work, _work_offset); + org.netlib.lapack.Slatrz.slatrz(m, n, l, a, _a_offset, lda, tau, _tau_offset, work, _work_offset); } protected void slatzmK(String side, int m, int n, float[] v, int _v_offset, int incv, float tau, float[] c1, int _c1_offset, float[] c2, int _c2_offset, int Ldc, float[] work, int _work_offset) { - lapack.slatzm(side, m, n, v, _v_offset, incv, tau, c1, _c1_offset, c2, _c2_offset, Ldc, work, _work_offset); + org.netlib.lapack.Slatzm.slatzm(side, m, n, v, _v_offset, incv, tau, c1, _c1_offset, c2, _c2_offset, Ldc, work, _work_offset); } protected void slauu2K(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info) { - lapack.slauu2(uplo, n, a, _a_offset, lda, info); + org.netlib.lapack.Slauu2.slauu2(uplo, n, a, _a_offset, lda, info); } protected void slauumK(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info) { - lapack.slauum(uplo, n, a, _a_offset, lda, info); + org.netlib.lapack.Slauum.slauum(uplo, n, a, _a_offset, lda, info); } protected void slazq3K(int i0, org.netlib.util.intW n0, float[] z, int _z_offset, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW sigma, org.netlib.util.floatW desig, org.netlib.util.floatW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee, org.netlib.util.intW ttype, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dn1, org.netlib.util.floatW dn2, org.netlib.util.floatW tau) { - lapack.slazq3(i0, n0, z, _z_offset, pp, dmin, sigma, desig, qmax, nfail, iter, ndiv, ieee, ttype, dmin1, dmin2, dn, dn1, dn2, tau); + org.netlib.lapack.Slazq3.slazq3(i0, n0, z, _z_offset, pp, dmin, sigma, desig, qmax, nfail, iter, ndiv, ieee, ttype, dmin1, dmin2, dn, dn1, dn2, tau); } protected void slazq4K(int i0, int n0, float[] z, int _z_offset, int pp, int n0in, float dmin, float dmin1, float dmin2, float dn, float dn1, float dn2, org.netlib.util.floatW tau, org.netlib.util.intW ttype, org.netlib.util.floatW g) { - lapack.slazq4(i0, n0, z, _z_offset, pp, n0in, dmin, dmin1, dmin2, dn, dn1, dn2, tau, ttype, g); + org.netlib.lapack.Slazq4.slazq4(i0, n0, z, _z_offset, pp, n0in, dmin, dmin1, dmin2, dn, dn1, dn2, tau, ttype, g); } protected void sopgtrK(String uplo, int n, float[] ap, int _ap_offset, float[] tau, int _tau_offset, float[] q, int _q_offset, int ldq, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.sopgtr(uplo, n, ap, _ap_offset, tau, _tau_offset, q, _q_offset, ldq, work, _work_offset, info); + org.netlib.lapack.Sopgtr.sopgtr(uplo, n, ap, _ap_offset, tau, _tau_offset, q, _q_offset, ldq, work, _work_offset, info); } protected void sopmtrK(String side, String uplo, String trans, int m, int n, float[] ap, int _ap_offset, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.sopmtr(side, uplo, trans, m, n, ap, _ap_offset, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + org.netlib.lapack.Sopmtr.sopmtr(side, uplo, trans, m, n, ap, _ap_offset, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); } protected void sorg2lK(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.sorg2l(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + org.netlib.lapack.Sorg2l.sorg2l(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); } protected void sorg2rK(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.sorg2r(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + org.netlib.lapack.Sorg2r.sorg2r(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); } protected void sorgbrK(String vect, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sorgbr(vect, m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Sorgbr.sorgbr(vect, m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); } protected void sorghrK(int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sorghr(n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Sorghr.sorghr(n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); } protected void sorgl2K(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.sorgl2(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + org.netlib.lapack.Sorgl2.sorgl2(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); } protected void sorglqK(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sorglq(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Sorglq.sorglq(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); } protected void sorgqlK(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sorgql(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Sorgql.sorgql(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); } protected void sorgqrK(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sorgqr(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Sorgqr.sorgqr(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); } protected void sorgr2K(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.sorgr2(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + org.netlib.lapack.Sorgr2.sorgr2(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); } protected void sorgrqK(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sorgrq(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Sorgrq.sorgrq(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); } protected void sorgtrK(String uplo, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sorgtr(uplo, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Sorgtr.sorgtr(uplo, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); } protected void sorm2lK(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.sorm2l(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + org.netlib.lapack.Sorm2l.sorm2l(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); } protected void sorm2rK(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.sorm2r(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + org.netlib.lapack.Sorm2r.sorm2r(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); } protected void sormbrK(String vect, String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sormbr(vect, side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + org.netlib.lapack.Sormbr.sormbr(vect, side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); } protected void sormhrK(String side, String trans, int m, int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sormhr(side, trans, m, n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + org.netlib.lapack.Sormhr.sormhr(side, trans, m, n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); } protected void sorml2K(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.sorml2(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + org.netlib.lapack.Sorml2.sorml2(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); } protected void sormlqK(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sormlq(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + org.netlib.lapack.Sormlq.sormlq(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); } protected void sormqlK(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sormql(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + org.netlib.lapack.Sormql.sormql(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); } protected void sormqrK(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sormqr(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + org.netlib.lapack.Sormqr.sormqr(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); } protected void sormr2K(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.sormr2(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + org.netlib.lapack.Sormr2.sormr2(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); } protected void sormr3K(String side, String trans, int m, int n, int k, int l, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.sormr3(side, trans, m, n, k, l, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + org.netlib.lapack.Sormr3.sormr3(side, trans, m, n, k, l, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); } protected void sormrqK(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sormrq(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + org.netlib.lapack.Sormrq.sormrq(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); } protected void sormrzK(String side, String trans, int m, int n, int k, int l, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sormrz(side, trans, m, n, k, l, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + org.netlib.lapack.Sormrz.sormrz(side, trans, m, n, k, l, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); } protected void sormtrK(String side, String uplo, String trans, int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.sormtr(side, uplo, trans, m, n, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + org.netlib.lapack.Sormtr.sormtr(side, uplo, trans, m, n, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); } protected void spbconK(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.spbcon(uplo, n, kd, ab, _ab_offset, ldab, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Spbcon.spbcon(uplo, n, kd, ab, _ab_offset, ldab, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); } protected void spbequK(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] s, int _s_offset, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info) { - lapack.spbequ(uplo, n, kd, ab, _ab_offset, ldab, s, _s_offset, scond, amax, info); + org.netlib.lapack.Spbequ.spbequ(uplo, n, kd, ab, _ab_offset, ldab, s, _s_offset, scond, amax, info); } protected void spbrfsK(String uplo, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] afb, int _afb_offset, int ldafb, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.spbrfs(uplo, n, kd, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Spbrfs.spbrfs(uplo, n, kd, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void spbstfK(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, org.netlib.util.intW info) { - lapack.spbstf(uplo, n, kd, ab, _ab_offset, ldab, info); + org.netlib.lapack.Spbstf.spbstf(uplo, n, kd, ab, _ab_offset, ldab, info); } protected void spbsvK(String uplo, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.spbsv(uplo, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, info); + org.netlib.lapack.Spbsv.spbsv(uplo, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, info); } protected void spbsvxK(String fact, String uplo, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] afb, int _afb_offset, int ldafb, org.netlib.util.StringW equed, float[] s, int _s_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.spbsvx(fact, uplo, n, kd, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, equed, s, _s_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Spbsvx.spbsvx(fact, uplo, n, kd, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, equed, s, _s_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void spbtf2K(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, org.netlib.util.intW info) { - lapack.spbtf2(uplo, n, kd, ab, _ab_offset, ldab, info); + org.netlib.lapack.Spbtf2.spbtf2(uplo, n, kd, ab, _ab_offset, ldab, info); } protected void spbtrfK(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, org.netlib.util.intW info) { - lapack.spbtrf(uplo, n, kd, ab, _ab_offset, ldab, info); + org.netlib.lapack.Spbtrf.spbtrf(uplo, n, kd, ab, _ab_offset, ldab, info); } protected void spbtrsK(String uplo, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.spbtrs(uplo, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, info); + org.netlib.lapack.Spbtrs.spbtrs(uplo, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, info); } protected void spoconK(String uplo, int n, float[] a, int _a_offset, int lda, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.spocon(uplo, n, a, _a_offset, lda, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Spocon.spocon(uplo, n, a, _a_offset, lda, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); } protected void spoequK(int n, float[] a, int _a_offset, int lda, float[] s, int _s_offset, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info) { - lapack.spoequ(n, a, _a_offset, lda, s, _s_offset, scond, amax, info); + org.netlib.lapack.Spoequ.spoequ(n, a, _a_offset, lda, s, _s_offset, scond, amax, info); } protected void sporfsK(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.sporfs(uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Sporfs.sporfs(uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void sposvK(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.sposv(uplo, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, info); + org.netlib.lapack.Sposv.sposv(uplo, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, info); } protected void sposvxK(String fact, String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, org.netlib.util.StringW equed, float[] s, int _s_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.sposvx(fact, uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, equed, s, _s_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Sposvx.sposvx(fact, uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, equed, s, _s_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void spotf2K(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info) { - lapack.spotf2(uplo, n, a, _a_offset, lda, info); + org.netlib.lapack.Spotf2.spotf2(uplo, n, a, _a_offset, lda, info); } protected void spotrfK(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info) { - lapack.spotrf(uplo, n, a, _a_offset, lda, info); + org.netlib.lapack.Spotrf.spotrf(uplo, n, a, _a_offset, lda, info); } protected void spotriK(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info) { - lapack.spotri(uplo, n, a, _a_offset, lda, info); + org.netlib.lapack.Spotri.spotri(uplo, n, a, _a_offset, lda, info); } protected void spotrsK(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.spotrs(uplo, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, info); + org.netlib.lapack.Spotrs.spotrs(uplo, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, info); } protected void sppconK(String uplo, int n, float[] ap, int _ap_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.sppcon(uplo, n, ap, _ap_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Sppcon.sppcon(uplo, n, ap, _ap_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); } protected void sppequK(String uplo, int n, float[] ap, int _ap_offset, float[] s, int _s_offset, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info) { - lapack.sppequ(uplo, n, ap, _ap_offset, s, _s_offset, scond, amax, info); + org.netlib.lapack.Sppequ.sppequ(uplo, n, ap, _ap_offset, s, _s_offset, scond, amax, info); } protected void spprfsK(String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] afp, int _afp_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.spprfs(uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Spprfs.spprfs(uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void sppsvK(String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.sppsv(uplo, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, info); + org.netlib.lapack.Sppsv.sppsv(uplo, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, info); } protected void sppsvxK(String fact, String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] afp, int _afp_offset, org.netlib.util.StringW equed, float[] s, int _s_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.sppsvx(fact, uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, equed, s, _s_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Sppsvx.sppsvx(fact, uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, equed, s, _s_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void spptrfK(String uplo, int n, float[] ap, int _ap_offset, org.netlib.util.intW info) { - lapack.spptrf(uplo, n, ap, _ap_offset, info); + org.netlib.lapack.Spptrf.spptrf(uplo, n, ap, _ap_offset, info); } protected void spptriK(String uplo, int n, float[] ap, int _ap_offset, org.netlib.util.intW info) { - lapack.spptri(uplo, n, ap, _ap_offset, info); + org.netlib.lapack.Spptri.spptri(uplo, n, ap, _ap_offset, info); } protected void spptrsK(String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.spptrs(uplo, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, info); + org.netlib.lapack.Spptrs.spptrs(uplo, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, info); } protected void sptconK(int n, float[] d, int _d_offset, float[] e, int _e_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.sptcon(n, d, _d_offset, e, _e_offset, anorm, rcond, work, _work_offset, info); + org.netlib.lapack.Sptcon.sptcon(n, d, _d_offset, e, _e_offset, anorm, rcond, work, _work_offset, info); } protected void spteqrK(String compz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.spteqr(compz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, info); + org.netlib.lapack.Spteqr.spteqr(compz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, info); } protected void sptrfsK(int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] df, int _df_offset, float[] ef, int _ef_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.sptrfs(n, nrhs, d, _d_offset, e, _e_offset, df, _df_offset, ef, _ef_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, info); + org.netlib.lapack.Sptrfs.sptrfs(n, nrhs, d, _d_offset, e, _e_offset, df, _df_offset, ef, _ef_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, info); } protected void sptsvK(int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.sptsv(n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb, info); + org.netlib.lapack.Sptsv.sptsv(n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb, info); } protected void sptsvxK(String fact, int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] df, int _df_offset, float[] ef, int _ef_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.sptsvx(fact, n, nrhs, d, _d_offset, e, _e_offset, df, _df_offset, ef, _ef_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, info); + org.netlib.lapack.Sptsvx.sptsvx(fact, n, nrhs, d, _d_offset, e, _e_offset, df, _df_offset, ef, _ef_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, info); } protected void spttrfK(int n, float[] d, int _d_offset, float[] e, int _e_offset, org.netlib.util.intW info) { - lapack.spttrf(n, d, _d_offset, e, _e_offset, info); + org.netlib.lapack.Spttrf.spttrf(n, d, _d_offset, e, _e_offset, info); } protected void spttrsK(int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.spttrs(n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb, info); + org.netlib.lapack.Spttrs.spttrs(n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb, info); } protected void sptts2K(int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] b, int _b_offset, int ldb) { - lapack.sptts2(n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb); + org.netlib.lapack.Sptts2.sptts2(n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb); } protected void srsclK(int n, float sa, float[] sx, int _sx_offset, int incx) { - lapack.srscl(n, sa, sx, _sx_offset, incx); + org.netlib.lapack.Srscl.srscl(n, sa, sx, _sx_offset, incx); } protected void ssbevK(String jobz, String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.ssbev(jobz, uplo, n, kd, ab, _ab_offset, ldab, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); + org.netlib.lapack.Ssbev.ssbev(jobz, uplo, n, kd, ab, _ab_offset, ldab, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); } protected void ssbevdK(String jobz, String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - lapack.ssbevd(jobz, uplo, n, kd, ab, _ab_offset, ldab, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + org.netlib.lapack.Ssbevd.ssbevd(jobz, uplo, n, kd, ab, _ab_offset, ldab, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); } protected void ssbevxK(String jobz, String range, String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] q, int _q_offset, int ldq, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - lapack.ssbevx(jobz, range, uplo, n, kd, ab, _ab_offset, ldab, q, _q_offset, ldq, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + org.netlib.lapack.Ssbevx.ssbevx(jobz, range, uplo, n, kd, ab, _ab_offset, ldab, q, _q_offset, ldq, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); } protected void ssbgstK(String vect, String uplo, int n, int ka, int kb, float[] ab, int _ab_offset, int ldab, float[] bb, int _bb_offset, int ldbb, float[] x, int _x_offset, int ldx, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.ssbgst(vect, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, x, _x_offset, ldx, work, _work_offset, info); + org.netlib.lapack.Ssbgst.ssbgst(vect, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, x, _x_offset, ldx, work, _work_offset, info); } protected void ssbgvK(String jobz, String uplo, int n, int ka, int kb, float[] ab, int _ab_offset, int ldab, float[] bb, int _bb_offset, int ldbb, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.ssbgv(jobz, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); + org.netlib.lapack.Ssbgv.ssbgv(jobz, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); } protected void ssbgvdK(String jobz, String uplo, int n, int ka, int kb, float[] ab, int _ab_offset, int ldab, float[] bb, int _bb_offset, int ldbb, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - lapack.ssbgvd(jobz, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + org.netlib.lapack.Ssbgvd.ssbgvd(jobz, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); } protected void ssbgvxK(String jobz, String range, String uplo, int n, int ka, int kb, float[] ab, int _ab_offset, int ldab, float[] bb, int _bb_offset, int ldbb, float[] q, int _q_offset, int ldq, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - lapack.ssbgvx(jobz, range, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, q, _q_offset, ldq, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + org.netlib.lapack.Ssbgvx.ssbgvx(jobz, range, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, q, _q_offset, ldq, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); } protected void ssbtrdK(String vect, String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] d, int _d_offset, float[] e, int _e_offset, float[] q, int _q_offset, int ldq, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.ssbtrd(vect, uplo, n, kd, ab, _ab_offset, ldab, d, _d_offset, e, _e_offset, q, _q_offset, ldq, work, _work_offset, info); + org.netlib.lapack.Ssbtrd.ssbtrd(vect, uplo, n, kd, ab, _ab_offset, ldab, d, _d_offset, e, _e_offset, q, _q_offset, ldq, work, _work_offset, info); } protected void sspconK(String uplo, int n, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.sspcon(uplo, n, ap, _ap_offset, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Sspcon.sspcon(uplo, n, ap, _ap_offset, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); } protected void sspevK(String jobz, String uplo, int n, float[] ap, int _ap_offset, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.sspev(jobz, uplo, n, ap, _ap_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); + org.netlib.lapack.Sspev.sspev(jobz, uplo, n, ap, _ap_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); } protected void sspevdK(String jobz, String uplo, int n, float[] ap, int _ap_offset, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - lapack.sspevd(jobz, uplo, n, ap, _ap_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + org.netlib.lapack.Sspevd.sspevd(jobz, uplo, n, ap, _ap_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); } protected void sspevxK(String jobz, String range, String uplo, int n, float[] ap, int _ap_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - lapack.sspevx(jobz, range, uplo, n, ap, _ap_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + org.netlib.lapack.Sspevx.sspevx(jobz, range, uplo, n, ap, _ap_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); } protected void sspgstK(int itype, String uplo, int n, float[] ap, int _ap_offset, float[] bp, int _bp_offset, org.netlib.util.intW info) { - lapack.sspgst(itype, uplo, n, ap, _ap_offset, bp, _bp_offset, info); + org.netlib.lapack.Sspgst.sspgst(itype, uplo, n, ap, _ap_offset, bp, _bp_offset, info); } protected void sspgvK(int itype, String jobz, String uplo, int n, float[] ap, int _ap_offset, float[] bp, int _bp_offset, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.sspgv(itype, jobz, uplo, n, ap, _ap_offset, bp, _bp_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); + org.netlib.lapack.Sspgv.sspgv(itype, jobz, uplo, n, ap, _ap_offset, bp, _bp_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); } protected void sspgvdK(int itype, String jobz, String uplo, int n, float[] ap, int _ap_offset, float[] bp, int _bp_offset, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - lapack.sspgvd(itype, jobz, uplo, n, ap, _ap_offset, bp, _bp_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + org.netlib.lapack.Sspgvd.sspgvd(itype, jobz, uplo, n, ap, _ap_offset, bp, _bp_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); } protected void sspgvxK(int itype, String jobz, String range, String uplo, int n, float[] ap, int _ap_offset, float[] bp, int _bp_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - lapack.sspgvx(itype, jobz, range, uplo, n, ap, _ap_offset, bp, _bp_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + org.netlib.lapack.Sspgvx.sspgvx(itype, jobz, range, uplo, n, ap, _ap_offset, bp, _bp_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); } protected void ssprfsK(String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] afp, int _afp_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.ssprfs(uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Ssprfs.ssprfs(uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void sspsvK(String uplo, int n, int nrhs, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.sspsv(uplo, n, nrhs, ap, _ap_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + org.netlib.lapack.Sspsv.sspsv(uplo, n, nrhs, ap, _ap_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, info); } protected void sspsvxK(String fact, String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] afp, int _afp_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.sspsvx(fact, uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Sspsvx.sspsvx(fact, uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void ssptrdK(String uplo, int n, float[] ap, int _ap_offset, float[] d, int _d_offset, float[] e, int _e_offset, float[] tau, int _tau_offset, org.netlib.util.intW info) { - lapack.ssptrd(uplo, n, ap, _ap_offset, d, _d_offset, e, _e_offset, tau, _tau_offset, info); + org.netlib.lapack.Ssptrd.ssptrd(uplo, n, ap, _ap_offset, d, _d_offset, e, _e_offset, tau, _tau_offset, info); } protected void ssptrfK(String uplo, int n, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { - lapack.ssptrf(uplo, n, ap, _ap_offset, ipiv, _ipiv_offset, info); + org.netlib.lapack.Ssptrf.ssptrf(uplo, n, ap, _ap_offset, ipiv, _ipiv_offset, info); } protected void ssptriK(String uplo, int n, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.ssptri(uplo, n, ap, _ap_offset, ipiv, _ipiv_offset, work, _work_offset, info); + org.netlib.lapack.Ssptri.ssptri(uplo, n, ap, _ap_offset, ipiv, _ipiv_offset, work, _work_offset, info); } protected void ssptrsK(String uplo, int n, int nrhs, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.ssptrs(uplo, n, nrhs, ap, _ap_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + org.netlib.lapack.Ssptrs.ssptrs(uplo, n, nrhs, ap, _ap_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, info); } protected void sstebzK(String range, String order, int n, float vl, float vu, int il, int iu, float abstol, float[] d, int _d_offset, float[] e, int _e_offset, org.netlib.util.intW m, org.netlib.util.intW nsplit, float[] w, int _w_offset, int[] iblock, int _iblock_offset, int[] isplit, int _isplit_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.sstebz(range, order, n, vl, vu, il, iu, abstol, d, _d_offset, e, _e_offset, m, nsplit, w, _w_offset, iblock, _iblock_offset, isplit, _isplit_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Sstebz.sstebz(range, order, n, vl, vu, il, iu, abstol, d, _d_offset, e, _e_offset, m, nsplit, w, _w_offset, iblock, _iblock_offset, isplit, _isplit_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void sstedcK(String compz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - lapack.sstedc(compz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + org.netlib.lapack.Sstedc.sstedc(compz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); } protected void sstegrK(String jobz, String range, int n, float[] d, int _d_offset, float[] e, int _e_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - lapack.sstegr(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + org.netlib.lapack.Sstegr.sstegr(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); } protected void ssteinK(int n, float[] d, int _d_offset, float[] e, int _e_offset, int m, float[] w, int _w_offset, int[] iblock, int _iblock_offset, int[] isplit, int _isplit_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - lapack.sstein(n, d, _d_offset, e, _e_offset, m, w, _w_offset, iblock, _iblock_offset, isplit, _isplit_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + org.netlib.lapack.Sstein.sstein(n, d, _d_offset, e, _e_offset, m, w, _w_offset, iblock, _iblock_offset, isplit, _isplit_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); } protected void sstemrK(String jobz, String range, int n, float[] d, int _d_offset, float[] e, int _e_offset, float vl, float vu, int il, int iu, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, int nzc, int[] isuppz, int _isuppz_offset, org.netlib.util.booleanW tryrac, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - lapack.sstemr(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, m, w, _w_offset, z, _z_offset, ldz, nzc, isuppz, _isuppz_offset, tryrac, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + org.netlib.lapack.Sstemr.sstemr(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, m, w, _w_offset, z, _z_offset, ldz, nzc, isuppz, _isuppz_offset, tryrac, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); } protected void ssteqrK(String compz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.ssteqr(compz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, info); + org.netlib.lapack.Ssteqr.ssteqr(compz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, info); } protected void ssterfK(int n, float[] d, int _d_offset, float[] e, int _e_offset, org.netlib.util.intW info) { - lapack.ssterf(n, d, _d_offset, e, _e_offset, info); + org.netlib.lapack.Ssterf.ssterf(n, d, _d_offset, e, _e_offset, info); } protected void sstevK(String jobz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.sstev(jobz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, info); + org.netlib.lapack.Sstev.sstev(jobz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, info); } protected void sstevdK(String jobz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - lapack.sstevd(jobz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + org.netlib.lapack.Sstevd.sstevd(jobz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); } protected void sstevrK(String jobz, String range, int n, float[] d, int _d_offset, float[] e, int _e_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - lapack.sstevr(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + org.netlib.lapack.Sstevr.sstevr(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); } protected void sstevxK(String jobz, String range, int n, float[] d, int _d_offset, float[] e, int _e_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - lapack.sstevx(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + org.netlib.lapack.Sstevx.sstevx(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); } protected void ssyconK(String uplo, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.ssycon(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Ssycon.ssycon(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); } protected void ssyevK(String jobz, String uplo, int n, float[] a, int _a_offset, int lda, float[] w, int _w_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.ssyev(jobz, uplo, n, a, _a_offset, lda, w, _w_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Ssyev.ssyev(jobz, uplo, n, a, _a_offset, lda, w, _w_offset, work, _work_offset, lwork, info); } protected void ssyevdK(String jobz, String uplo, int n, float[] a, int _a_offset, int lda, float[] w, int _w_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - lapack.ssyevd(jobz, uplo, n, a, _a_offset, lda, w, _w_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + org.netlib.lapack.Ssyevd.ssyevd(jobz, uplo, n, a, _a_offset, lda, w, _w_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); } protected void ssyevrK(String jobz, String range, String uplo, int n, float[] a, int _a_offset, int lda, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - lapack.ssyevr(jobz, range, uplo, n, a, _a_offset, lda, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + org.netlib.lapack.Ssyevr.ssyevr(jobz, range, uplo, n, a, _a_offset, lda, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); } protected void ssyevxK(String jobz, String range, String uplo, int n, float[] a, int _a_offset, int lda, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - lapack.ssyevx(jobz, range, uplo, n, a, _a_offset, lda, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, ifail, _ifail_offset, info); + org.netlib.lapack.Ssyevx.ssyevx(jobz, range, uplo, n, a, _a_offset, lda, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, ifail, _ifail_offset, info); } protected void ssygs2K(int itype, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.ssygs2(itype, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, info); + org.netlib.lapack.Ssygs2.ssygs2(itype, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, info); } protected void ssygstK(int itype, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.ssygst(itype, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, info); + org.netlib.lapack.Ssygst.ssygst(itype, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, info); } protected void ssygvK(int itype, String jobz, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] w, int _w_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.ssygv(itype, jobz, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, w, _w_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Ssygv.ssygv(itype, jobz, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, w, _w_offset, work, _work_offset, lwork, info); } protected void ssygvdK(int itype, String jobz, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] w, int _w_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - lapack.ssygvd(itype, jobz, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, w, _w_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + org.netlib.lapack.Ssygvd.ssygvd(itype, jobz, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, w, _w_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); } protected void ssygvxK(int itype, String jobz, String range, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - lapack.ssygvx(itype, jobz, range, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, ifail, _ifail_offset, info); + org.netlib.lapack.Ssygvx.ssygvx(itype, jobz, range, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, ifail, _ifail_offset, info); } protected void ssyrfsK(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.ssyrfs(uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Ssyrfs.ssyrfs(uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void ssysvK(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.ssysv(uplo, n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, work, _work_offset, lwork, info); + org.netlib.lapack.Ssysv.ssysv(uplo, n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, work, _work_offset, lwork, info); } protected void ssysvxK(String fact, String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.ssysvx(fact, uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, lwork, iwork, _iwork_offset, info); + org.netlib.lapack.Ssysvx.ssysvx(fact, uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, lwork, iwork, _iwork_offset, info); } protected void ssytd2K(String uplo, int n, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tau, int _tau_offset, org.netlib.util.intW info) { - lapack.ssytd2(uplo, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tau, _tau_offset, info); + org.netlib.lapack.Ssytd2.ssytd2(uplo, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tau, _tau_offset, info); } protected void ssytf2K(String uplo, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { - lapack.ssytf2(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, info); + org.netlib.lapack.Ssytf2.ssytf2(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, info); } protected void ssytrdK(String uplo, int n, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.ssytrd(uplo, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tau, _tau_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Ssytrd.ssytrd(uplo, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tau, _tau_offset, work, _work_offset, lwork, info); } protected void ssytrfK(String uplo, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.ssytrf(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Ssytrf.ssytrf(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, work, _work_offset, lwork, info); } protected void ssytriK(String uplo, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.ssytri(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, work, _work_offset, info); + org.netlib.lapack.Ssytri.ssytri(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, work, _work_offset, info); } protected void ssytrsK(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.ssytrs(uplo, n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + org.netlib.lapack.Ssytrs.ssytrs(uplo, n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, info); } protected void stbconK(String norm, String uplo, String diag, int n, int kd, float[] ab, int _ab_offset, int ldab, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.stbcon(norm, uplo, diag, n, kd, ab, _ab_offset, ldab, rcond, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Stbcon.stbcon(norm, uplo, diag, n, kd, ab, _ab_offset, ldab, rcond, work, _work_offset, iwork, _iwork_offset, info); } protected void stbrfsK(String uplo, String trans, String diag, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.stbrfs(uplo, trans, diag, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Stbrfs.stbrfs(uplo, trans, diag, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void stbtrsK(String uplo, String trans, String diag, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.stbtrs(uplo, trans, diag, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, info); + org.netlib.lapack.Stbtrs.stbtrs(uplo, trans, diag, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, info); } protected void stgevcK(String side, String howmny, boolean[] select, int _select_offset, int n, float[] s, int _s_offset, int lds, float[] p, int _p_offset, int ldp, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.stgevc(side, howmny, select, _select_offset, n, s, _s_offset, lds, p, _p_offset, ldp, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, mm, m, work, _work_offset, info); + org.netlib.lapack.Stgevc.stgevc(side, howmny, select, _select_offset, n, s, _s_offset, lds, p, _p_offset, ldp, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, mm, m, work, _work_offset, info); } protected void stgex2K(boolean wantq, boolean wantz, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, int j1, int n1, int n2, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.stgex2(wantq, wantz, n, a, _a_offset, lda, b, _b_offset, ldb, q, _q_offset, ldq, z, _z_offset, ldz, j1, n1, n2, work, _work_offset, lwork, info); + org.netlib.lapack.Stgex2.stgex2(wantq, wantz, n, a, _a_offset, lda, b, _b_offset, ldb, q, _q_offset, ldq, z, _z_offset, ldz, j1, n1, n2, work, _work_offset, lwork, info); } protected void stgexcK(boolean wantq, boolean wantz, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, org.netlib.util.intW ifst, org.netlib.util.intW ilst, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.stgexc(wantq, wantz, n, a, _a_offset, lda, b, _b_offset, ldb, q, _q_offset, ldq, z, _z_offset, ldz, ifst, ilst, work, _work_offset, lwork, info); + org.netlib.lapack.Stgexc.stgexc(wantq, wantz, n, a, _a_offset, lda, b, _b_offset, ldb, q, _q_offset, ldq, z, _z_offset, ldz, ifst, ilst, work, _work_offset, lwork, info); } protected void stgsenK(int ijob, boolean wantq, boolean wantz, boolean[] select, int _select_offset, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, org.netlib.util.intW m, org.netlib.util.floatW pl, org.netlib.util.floatW pr, float[] dif, int _dif_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - lapack.stgsen(ijob, wantq, wantz, select, _select_offset, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, q, _q_offset, ldq, z, _z_offset, ldz, m, pl, pr, dif, _dif_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + org.netlib.lapack.Stgsen.stgsen(ijob, wantq, wantz, select, _select_offset, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, q, _q_offset, ldq, z, _z_offset, ldz, m, pl, pr, dif, _dif_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); } protected void stgsjaK(String jobu, String jobv, String jobq, int m, int p, int n, int k, int l, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float tola, float tolb, float[] alpha, int _alpha_offset, float[] beta, int _beta_offset, float[] u, int _u_offset, int ldu, float[] v, int _v_offset, int ldv, float[] q, int _q_offset, int ldq, float[] work, int _work_offset, org.netlib.util.intW ncycle, org.netlib.util.intW info) { - lapack.stgsja(jobu, jobv, jobq, m, p, n, k, l, a, _a_offset, lda, b, _b_offset, ldb, tola, tolb, alpha, _alpha_offset, beta, _beta_offset, u, _u_offset, ldu, v, _v_offset, ldv, q, _q_offset, ldq, work, _work_offset, ncycle, info); + org.netlib.lapack.Stgsja.stgsja(jobu, jobv, jobq, m, p, n, k, l, a, _a_offset, lda, b, _b_offset, ldb, tola, tolb, alpha, _alpha_offset, beta, _beta_offset, u, _u_offset, ldu, v, _v_offset, ldv, q, _q_offset, ldq, work, _work_offset, ncycle, info); } protected void stgsnaK(String job, String howmny, boolean[] select, int _select_offset, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] s, int _s_offset, float[] dif, int _dif_offset, int mm, org.netlib.util.intW m, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.stgsna(job, howmny, select, _select_offset, n, a, _a_offset, lda, b, _b_offset, ldb, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, s, _s_offset, dif, _dif_offset, mm, m, work, _work_offset, lwork, iwork, _iwork_offset, info); + org.netlib.lapack.Stgsna.stgsna(job, howmny, select, _select_offset, n, a, _a_offset, lda, b, _b_offset, ldb, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, s, _s_offset, dif, _dif_offset, mm, m, work, _work_offset, lwork, iwork, _iwork_offset, info); } protected void stgsy2K(String trans, int ijob, int m, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] c, int _c_offset, int Ldc, float[] d, int _d_offset, int ldd, float[] e, int _e_offset, int lde, float[] f, int _f_offset, int ldf, org.netlib.util.floatW scale, org.netlib.util.floatW rdsum, org.netlib.util.floatW rdscal, int[] iwork, int _iwork_offset, org.netlib.util.intW pq, org.netlib.util.intW info) { - lapack.stgsy2(trans, ijob, m, n, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, Ldc, d, _d_offset, ldd, e, _e_offset, lde, f, _f_offset, ldf, scale, rdsum, rdscal, iwork, _iwork_offset, pq, info); + org.netlib.lapack.Stgsy2.stgsy2(trans, ijob, m, n, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, Ldc, d, _d_offset, ldd, e, _e_offset, lde, f, _f_offset, ldf, scale, rdsum, rdscal, iwork, _iwork_offset, pq, info); } protected void stgsylK(String trans, int ijob, int m, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] c, int _c_offset, int Ldc, float[] d, int _d_offset, int ldd, float[] e, int _e_offset, int lde, float[] f, int _f_offset, int ldf, org.netlib.util.floatW scale, org.netlib.util.floatW dif, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.stgsyl(trans, ijob, m, n, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, Ldc, d, _d_offset, ldd, e, _e_offset, lde, f, _f_offset, ldf, scale, dif, work, _work_offset, lwork, iwork, _iwork_offset, info); + org.netlib.lapack.Stgsyl.stgsyl(trans, ijob, m, n, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, Ldc, d, _d_offset, ldd, e, _e_offset, lde, f, _f_offset, ldf, scale, dif, work, _work_offset, lwork, iwork, _iwork_offset, info); } protected void stpconK(String norm, String uplo, String diag, int n, float[] ap, int _ap_offset, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.stpcon(norm, uplo, diag, n, ap, _ap_offset, rcond, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Stpcon.stpcon(norm, uplo, diag, n, ap, _ap_offset, rcond, work, _work_offset, iwork, _iwork_offset, info); } protected void stprfsK(String uplo, String trans, String diag, int n, int nrhs, float[] ap, int _ap_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.stprfs(uplo, trans, diag, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Stprfs.stprfs(uplo, trans, diag, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void stptriK(String uplo, String diag, int n, float[] ap, int _ap_offset, org.netlib.util.intW info) { - lapack.stptri(uplo, diag, n, ap, _ap_offset, info); + org.netlib.lapack.Stptri.stptri(uplo, diag, n, ap, _ap_offset, info); } protected void stptrsK(String uplo, String trans, String diag, int n, int nrhs, float[] ap, int _ap_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.stptrs(uplo, trans, diag, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, info); + org.netlib.lapack.Stptrs.stptrs(uplo, trans, diag, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, info); } protected void strconK(String norm, String uplo, String diag, int n, float[] a, int _a_offset, int lda, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.strcon(norm, uplo, diag, n, a, _a_offset, lda, rcond, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Strcon.strcon(norm, uplo, diag, n, a, _a_offset, lda, rcond, work, _work_offset, iwork, _iwork_offset, info); } protected void strevcK(String side, String howmny, boolean[] select, int _select_offset, int n, float[] t, int _t_offset, int ldt, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.strevc(side, howmny, select, _select_offset, n, t, _t_offset, ldt, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, mm, m, work, _work_offset, info); + org.netlib.lapack.Strevc.strevc(side, howmny, select, _select_offset, n, t, _t_offset, ldt, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, mm, m, work, _work_offset, info); } protected void strexcK(String compq, int n, float[] t, int _t_offset, int ldt, float[] q, int _q_offset, int ldq, org.netlib.util.intW ifst, org.netlib.util.intW ilst, float[] work, int _work_offset, org.netlib.util.intW info) { - lapack.strexc(compq, n, t, _t_offset, ldt, q, _q_offset, ldq, ifst, ilst, work, _work_offset, info); + org.netlib.lapack.Strexc.strexc(compq, n, t, _t_offset, ldt, q, _q_offset, ldq, ifst, ilst, work, _work_offset, info); } protected void strrfsK(String uplo, String trans, String diag, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.strrfs(uplo, trans, diag, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + org.netlib.lapack.Strrfs.strrfs(uplo, trans, diag, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); } protected void strsenK(String job, String compq, boolean[] select, int _select_offset, int n, float[] t, int _t_offset, int ldt, float[] q, int _q_offset, int ldq, float[] wr, int _wr_offset, float[] wi, int _wi_offset, org.netlib.util.intW m, org.netlib.util.floatW s, org.netlib.util.floatW sep, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - lapack.strsen(job, compq, select, _select_offset, n, t, _t_offset, ldt, q, _q_offset, ldq, wr, _wr_offset, wi, _wi_offset, m, s, sep, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + org.netlib.lapack.Strsen.strsen(job, compq, select, _select_offset, n, t, _t_offset, ldt, q, _q_offset, ldq, wr, _wr_offset, wi, _wi_offset, m, s, sep, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); } protected void strsnaK(String job, String howmny, boolean[] select, int _select_offset, int n, float[] t, int _t_offset, int ldt, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] s, int _s_offset, float[] sep, int _sep_offset, int mm, org.netlib.util.intW m, float[] work, int _work_offset, int ldwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - lapack.strsna(job, howmny, select, _select_offset, n, t, _t_offset, ldt, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, s, _s_offset, sep, _sep_offset, mm, m, work, _work_offset, ldwork, iwork, _iwork_offset, info); + org.netlib.lapack.Strsna.strsna(job, howmny, select, _select_offset, n, t, _t_offset, ldt, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, s, _s_offset, sep, _sep_offset, mm, m, work, _work_offset, ldwork, iwork, _iwork_offset, info); } protected void strsylK(String trana, String tranb, int isgn, int m, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] c, int _c_offset, int Ldc, org.netlib.util.floatW scale, org.netlib.util.intW info) { - lapack.strsyl(trana, tranb, isgn, m, n, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, Ldc, scale, info); + org.netlib.lapack.Strsyl.strsyl(trana, tranb, isgn, m, n, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, Ldc, scale, info); } protected void strti2K(String uplo, String diag, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info) { - lapack.strti2(uplo, diag, n, a, _a_offset, lda, info); + org.netlib.lapack.Strti2.strti2(uplo, diag, n, a, _a_offset, lda, info); } protected void strtriK(String uplo, String diag, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info) { - lapack.strtri(uplo, diag, n, a, _a_offset, lda, info); + org.netlib.lapack.Strtri.strtri(uplo, diag, n, a, _a_offset, lda, info); } protected void strtrsK(String uplo, String trans, String diag, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - lapack.strtrs(uplo, trans, diag, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, info); + org.netlib.lapack.Strtrs.strtrs(uplo, trans, diag, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, info); } protected void stzrqfK(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, org.netlib.util.intW info) { - lapack.stzrqf(m, n, a, _a_offset, lda, tau, _tau_offset, info); + org.netlib.lapack.Stzrqf.stzrqf(m, n, a, _a_offset, lda, tau, _tau_offset, info); } protected void stzrzfK(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - lapack.stzrzf(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + org.netlib.lapack.Stzrzf.stzrzf(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); } protected double dlamchK(String cmach) { - return lapack.dlamch(cmach); + return org.netlib.lapack.Dlamch.dlamch(cmach); } protected void dlamc1K(org.netlib.util.intW beta, org.netlib.util.intW t, org.netlib.util.booleanW rnd, org.netlib.util.booleanW ieee1) { - lapack.dlamc1(beta, t, rnd, ieee1); + org.netlib.lapack.Dlamc1.dlamc1(beta, t, rnd, ieee1); } protected void dlamc2K(org.netlib.util.intW beta, org.netlib.util.intW t, org.netlib.util.booleanW rnd, org.netlib.util.doubleW eps, org.netlib.util.intW emin, org.netlib.util.doubleW rmin, org.netlib.util.intW emax, org.netlib.util.doubleW rmax) { - lapack.dlamc2(beta, t, rnd, eps, emin, rmin, emax, rmax); + org.netlib.lapack.Dlamc2.dlamc2(beta, t, rnd, eps, emin, rmin, emax, rmax); } protected double dlamc3K(double a, double b) { - return lapack.dlamc3(a, b); + return org.netlib.lapack.Dlamc3.dlamc3(a, b); } protected void dlamc4K(org.netlib.util.intW emin, double start, int base) { - lapack.dlamc4(emin, start, base); + org.netlib.lapack.Dlamc4.dlamc4(emin, start, base); } protected void dlamc5K(int beta, int p, int emin, boolean ieee, org.netlib.util.intW emax, org.netlib.util.doubleW rmax) { - lapack.dlamc5(beta, p, emin, ieee, emax, rmax); + org.netlib.lapack.Dlamc5.dlamc5(beta, p, emin, ieee, emax, rmax); } protected double dsecndK() { - return lapack.dsecnd(); + return org.netlib.lapack.Dsecnd.dsecnd(); } protected boolean lsameK(String ca, String cb) { - return lapack.lsame(ca, cb); + return org.netlib.lapack.Lsame.lsame(ca, cb); } protected float secondK() { - return lapack.second(); + return org.netlib.lapack.Second.second(); } protected float slamchK(String cmach) { - return lapack.slamch(cmach); + return org.netlib.lapack.Slamch.slamch(cmach); } protected void slamc1K(org.netlib.util.intW beta, org.netlib.util.intW t, org.netlib.util.booleanW rnd, org.netlib.util.booleanW ieee1) { - lapack.slamc1(beta, t, rnd, ieee1); + org.netlib.lapack.Slamc1.slamc1(beta, t, rnd, ieee1); } protected void slamc2K(org.netlib.util.intW beta, org.netlib.util.intW t, org.netlib.util.booleanW rnd, org.netlib.util.floatW eps, org.netlib.util.intW emin, org.netlib.util.floatW rmin, org.netlib.util.intW emax, org.netlib.util.floatW rmax) { - lapack.slamc2(beta, t, rnd, eps, emin, rmin, emax, rmax); + org.netlib.lapack.Slamc2.slamc2(beta, t, rnd, eps, emin, rmin, emax, rmax); } protected float slamc3K(float a, float b) { - return lapack.slamc3(a, b); + return org.netlib.lapack.Slamc3.slamc3(a, b); } protected void slamc4K(org.netlib.util.intW emin, float start, int base) { - lapack.slamc4(emin, start, base); + org.netlib.lapack.Slamc4.slamc4(emin, start, base); } protected void slamc5K(int beta, int p, int emin, boolean ieee, org.netlib.util.intW emax, org.netlib.util.floatW rmax) { - lapack.slamc5(beta, p, emin, ieee, emax, rmax); + org.netlib.lapack.Slamc5.slamc5(beta, p, emin, ieee, emax, rmax); } } diff --git a/lapack/src/main/java/dev/ludovic/netlib/lapack/JNILAPACK.java b/lapack/src/main/java/dev/ludovic/netlib/lapack/JNILAPACK.java new file mode 100644 index 00000000..ea0699af --- /dev/null +++ b/lapack/src/main/java/dev/ludovic/netlib/lapack/JNILAPACK.java @@ -0,0 +1,1485 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +package dev.ludovic.netlib.lapack; + +import dev.ludovic.netlib.LAPACK; + +public final class JNILAPACK extends AbstractLAPACK implements dev.ludovic.netlib.NativeLAPACK { + + private static final JNILAPACK instance = new JNILAPACK(); + + protected JNILAPACK() {} + + public static dev.ludovic.netlib.NativeLAPACK getInstance() { + return instance; + } + + protected native void dbdsdcK(String uplo, String compq, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, double[] q, int _q_offset, int[] iq, int _iq_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dbdsqrK(String uplo, int n, int ncvt, int nru, int ncc, double[] d, int _d_offset, double[] e, int _e_offset, double[] vt, int _vt_offset, int ldvt, double[] u, int _u_offset, int ldu, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void ddisnaK(String job, int m, int n, double[] d, int _d_offset, double[] sep, int _sep_offset, org.netlib.util.intW info); + + protected native void dgbbrdK(String vect, int m, int n, int ncc, int kl, int ku, double[] ab, int _ab_offset, int ldab, double[] d, int _d_offset, double[] e, int _e_offset, double[] q, int _q_offset, int ldq, double[] pt, int _pt_offset, int ldpt, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dgbconK(String norm, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dgbequK(int m, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, double[] r, int _r_offset, double[] c, int _c_offset, org.netlib.util.doubleW rowcnd, org.netlib.util.doubleW colcnd, org.netlib.util.doubleW amax, org.netlib.util.intW info); + + protected native void dgbrfsK(String trans, int n, int kl, int ku, int nrhs, double[] ab, int _ab_offset, int ldab, double[] afb, int _afb_offset, int ldafb, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dgbsvK(int n, int kl, int ku, int nrhs, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void dgbsvxK(String fact, String trans, int n, int kl, int ku, int nrhs, double[] ab, int _ab_offset, int ldab, double[] afb, int _afb_offset, int ldafb, int[] ipiv, int _ipiv_offset, org.netlib.util.StringW equed, double[] r, int _r_offset, double[] c, int _c_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dgbtf2K(int m, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + + protected native void dgbtrfK(int m, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + + protected native void dgbtrsK(String trans, int n, int kl, int ku, int nrhs, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void dgebakK(String job, String side, int n, int ilo, int ihi, double[] scale, int _scale_offset, int m, double[] v, int _v_offset, int ldv, org.netlib.util.intW info); + + protected native void dgebalK(String job, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] scale, int _scale_offset, org.netlib.util.intW info); + + protected native void dgebd2K(int m, int n, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tauq, int _tauq_offset, double[] taup, int _taup_offset, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dgebrdK(int m, int n, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tauq, int _tauq_offset, double[] taup, int _taup_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dgeconK(String norm, int n, double[] a, int _a_offset, int lda, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dgeequK(int m, int n, double[] a, int _a_offset, int lda, double[] r, int _r_offset, double[] c, int _c_offset, org.netlib.util.doubleW rowcnd, org.netlib.util.doubleW colcnd, org.netlib.util.doubleW amax, org.netlib.util.intW info); + + protected native void dgeesK(String jobvs, String sort, java.lang.Object select, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW sdim, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vs, int _vs_offset, int ldvs, double[] work, int _work_offset, int lwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + + protected native void dgeesxK(String jobvs, String sort, java.lang.Object select, String sense, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW sdim, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vs, int _vs_offset, int ldvs, org.netlib.util.doubleW rconde, org.netlib.util.doubleW rcondv, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + + protected native void dgeevK(String jobvl, String jobvr, int n, double[] a, int _a_offset, int lda, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dgeevxK(String balanc, String jobvl, String jobvr, String sense, int n, double[] a, int _a_offset, int lda, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] scale, int _scale_offset, org.netlib.util.doubleW abnrm, double[] rconde, int _rconde_offset, double[] rcondv, int _rcondv_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dgegsK(String jobvsl, String jobvsr, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vsl, int _vsl_offset, int ldvsl, double[] vsr, int _vsr_offset, int ldvsr, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dgegvK(String jobvl, String jobvr, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dgehd2K(int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dgehrdK(int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dgelq2K(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dgelqfK(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dgelsK(String trans, int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dgelsdK(int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] s, int _s_offset, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dgelssK(int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] s, int _s_offset, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dgelsxK(int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, int[] jpvt, int _jpvt_offset, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dgelsyK(int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, int[] jpvt, int _jpvt_offset, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dgeql2K(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dgeqlfK(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dgeqp3K(int m, int n, double[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dgeqpfK(int m, int n, double[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dgeqr2K(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dgeqrfK(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dgerfsK(String trans, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dgerq2K(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dgerqfK(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dgesc2K(int n, double[] a, int _a_offset, int lda, double[] rhs, int _rhs_offset, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset, org.netlib.util.doubleW scale); + + protected native void dgesddK(String jobz, int m, int n, double[] a, int _a_offset, int lda, double[] s, int _s_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dgesvK(int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void dgesvdK(String jobu, String jobvt, int m, int n, double[] a, int _a_offset, int lda, double[] s, int _s_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dgesvxK(String fact, String trans, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, org.netlib.util.StringW equed, double[] r, int _r_offset, double[] c, int _c_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dgetc2K(int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset, org.netlib.util.intW info); + + protected native void dgetf2K(int m, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + + protected native void dgetrfK(int m, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + + protected native void dgetriK(int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dgetrsK(String trans, int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void dggbakK(String job, String side, int n, int ilo, int ihi, double[] lscale, int _lscale_offset, double[] rscale, int _rscale_offset, int m, double[] v, int _v_offset, int ldv, org.netlib.util.intW info); + + protected native void dggbalK(String job, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] lscale, int _lscale_offset, double[] rscale, int _rscale_offset, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dggesK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW sdim, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vsl, int _vsl_offset, int ldvsl, double[] vsr, int _vsr_offset, int ldvsr, double[] work, int _work_offset, int lwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + + protected native void dggesxK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, String sense, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW sdim, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vsl, int _vsl_offset, int ldvsl, double[] vsr, int _vsr_offset, int ldvsr, double[] rconde, int _rconde_offset, double[] rcondv, int _rcondv_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + + protected native void dggevK(String jobvl, String jobvr, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dggevxK(String balanc, String jobvl, String jobvr, String sense, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] lscale, int _lscale_offset, double[] rscale, int _rscale_offset, org.netlib.util.doubleW abnrm, org.netlib.util.doubleW bbnrm, double[] rconde, int _rconde_offset, double[] rcondv, int _rcondv_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + + protected native void dggglmK(int n, int m, int p, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] d, int _d_offset, double[] x, int _x_offset, double[] y, int _y_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dgghrdK(String compq, String compz, int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, org.netlib.util.intW info); + + protected native void dgglseK(int m, int n, int p, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] c, int _c_offset, double[] d, int _d_offset, double[] x, int _x_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dggqrfK(int n, int m, int p, double[] a, int _a_offset, int lda, double[] taua, int _taua_offset, double[] b, int _b_offset, int ldb, double[] taub, int _taub_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dggrqfK(int m, int p, int n, double[] a, int _a_offset, int lda, double[] taua, int _taua_offset, double[] b, int _b_offset, int ldb, double[] taub, int _taub_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dggsvdK(String jobu, String jobv, String jobq, int m, int n, int p, org.netlib.util.intW k, org.netlib.util.intW l, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alpha, int _alpha_offset, double[] beta, int _beta_offset, double[] u, int _u_offset, int ldu, double[] v, int _v_offset, int ldv, double[] q, int _q_offset, int ldq, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dggsvpK(String jobu, String jobv, String jobq, int m, int p, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double tola, double tolb, org.netlib.util.intW k, org.netlib.util.intW l, double[] u, int _u_offset, int ldu, double[] v, int _v_offset, int ldv, double[] q, int _q_offset, int ldq, int[] iwork, int _iwork_offset, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dgtconK(String norm, int n, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dgtrfsK(String trans, int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] dlf, int _dlf_offset, double[] df, int _df_offset, double[] duf, int _duf_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dgtsvK(int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void dgtsvxK(String fact, String trans, int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] dlf, int _dlf_offset, double[] df, int _df_offset, double[] duf, int _duf_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dgttrfK(int n, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + + protected native void dgttrsK(String trans, int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void dgtts2K(int itrans, int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb); + + protected native void dhgeqzK(String job, String compq, String compz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] t, int _t_offset, int ldt, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dhseinK(String side, String eigsrc, String initv, boolean[] select, int _select_offset, int n, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, double[] work, int _work_offset, int[] ifaill, int _ifaill_offset, int[] ifailr, int _ifailr_offset, org.netlib.util.intW info); + + protected native void dhseqrK(String job, String compz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native boolean disnanK(double din); + + protected native void dlabadK(org.netlib.util.doubleW small, org.netlib.util.doubleW large); + + protected native void dlabrdK(int m, int n, int nb, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tauq, int _tauq_offset, double[] taup, int _taup_offset, double[] x, int _x_offset, int ldx, double[] y, int _y_offset, int ldy); + + protected native void dlacn2K(int n, double[] v, int _v_offset, double[] x, int _x_offset, int[] isgn, int _isgn_offset, org.netlib.util.doubleW est, org.netlib.util.intW kase, int[] isave, int _isave_offset); + + protected native void dlaconK(int n, double[] v, int _v_offset, double[] x, int _x_offset, int[] isgn, int _isgn_offset, org.netlib.util.doubleW est, org.netlib.util.intW kase); + + protected native void dlacpyK(String uplo, int m, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb); + + protected native void dladivK(double a, double b, double c, double d, org.netlib.util.doubleW p, org.netlib.util.doubleW q); + + protected native void dlae2K(double a, double b, double c, org.netlib.util.doubleW rt1, org.netlib.util.doubleW rt2); + + protected native void dlaebzK(int ijob, int nitmax, int n, int mmax, int minp, int nbmin, double abstol, double reltol, double pivmin, double[] d, int _d_offset, double[] e, int _e_offset, double[] e2, int _e2_offset, int[] nval, int _nval_offset, double[] ab, int _ab_offset, double[] c, int _c_offset, org.netlib.util.intW mout, int[] nab, int _nab_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dlaed0K(int icompq, int qsiz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] q, int _q_offset, int ldq, double[] qstore, int _qstore_offset, int ldqs, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dlaed1K(int n, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.doubleW rho, int cutpnt, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dlaed2K(org.netlib.util.intW k, int n, int n1, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.doubleW rho, double[] z, int _z_offset, double[] dlamda, int _dlamda_offset, double[] w, int _w_offset, double[] q2, int _q2_offset, int[] indx, int _indx_offset, int[] indxc, int _indxc_offset, int[] indxp, int _indxp_offset, int[] coltyp, int _coltyp_offset, org.netlib.util.intW info); + + protected native void dlaed3K(int k, int n, int n1, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, double rho, double[] dlamda, int _dlamda_offset, double[] q2, int _q2_offset, int[] indx, int _indx_offset, int[] ctot, int _ctot_offset, double[] w, int _w_offset, double[] s, int _s_offset, org.netlib.util.intW info); + + protected native void dlaed4K(int n, int i, double[] d, int _d_offset, double[] z, int _z_offset, double[] delta, int _delta_offset, double rho, org.netlib.util.doubleW dlam, org.netlib.util.intW info); + + protected native void dlaed5K(int i, double[] d, int _d_offset, double[] z, int _z_offset, double[] delta, int _delta_offset, double rho, org.netlib.util.doubleW dlam); + + protected native void dlaed6K(int kniter, boolean orgati, double rho, double[] d, int _d_offset, double[] z, int _z_offset, double finit, org.netlib.util.doubleW tau, org.netlib.util.intW info); + + protected native void dlaed7K(int icompq, int n, int qsiz, int tlvls, int curlvl, int curpbm, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.doubleW rho, int cutpnt, double[] qstore, int _qstore_offset, int[] qptr, int _qptr_offset, int[] prmptr, int _prmptr_offset, int[] perm, int _perm_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, double[] givnum, int _givnum_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dlaed8K(int icompq, org.netlib.util.intW k, int n, int qsiz, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.doubleW rho, int cutpnt, double[] z, int _z_offset, double[] dlamda, int _dlamda_offset, double[] q2, int _q2_offset, int ldq2, double[] w, int _w_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, double[] givnum, int _givnum_offset, int[] indxp, int _indxp_offset, int[] indx, int _indx_offset, org.netlib.util.intW info); + + protected native void dlaed9K(int k, int kstart, int kstop, int n, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, double rho, double[] dlamda, int _dlamda_offset, double[] w, int _w_offset, double[] s, int _s_offset, int lds, org.netlib.util.intW info); + + protected native void dlaedaK(int n, int tlvls, int curlvl, int curpbm, int[] prmptr, int _prmptr_offset, int[] perm, int _perm_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, double[] givnum, int _givnum_offset, double[] q, int _q_offset, int[] qptr, int _qptr_offset, double[] z, int _z_offset, double[] ztemp, int _ztemp_offset, org.netlib.util.intW info); + + protected native void dlaeinK(boolean rightv, boolean noinit, int n, double[] h, int _h_offset, int ldh, double wr, double wi, double[] vr, int _vr_offset, double[] vi, int _vi_offset, double[] b, int _b_offset, int ldb, double[] work, int _work_offset, double eps3, double smlnum, double bignum, org.netlib.util.intW info); + + protected native void dlaev2K(double a, double b, double c, org.netlib.util.doubleW rt1, org.netlib.util.doubleW rt2, org.netlib.util.doubleW cs1, org.netlib.util.doubleW sn1); + + protected native void dlaexcK(boolean wantq, int n, double[] t, int _t_offset, int ldt, double[] q, int _q_offset, int ldq, int j1, int n1, int n2, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dlag2K(double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double safmin, org.netlib.util.doubleW scale1, org.netlib.util.doubleW scale2, org.netlib.util.doubleW wr1, org.netlib.util.doubleW wr2, org.netlib.util.doubleW wi); + + protected native void dlag2sK(int m, int n, double[] a, int _a_offset, int lda, float[] sa, int _sa_offset, int ldsa, org.netlib.util.intW info); + + protected native void dlags2K(boolean upper, double a1, double a2, double a3, double b1, double b2, double b3, org.netlib.util.doubleW csu, org.netlib.util.doubleW snu, org.netlib.util.doubleW csv, org.netlib.util.doubleW snv, org.netlib.util.doubleW csq, org.netlib.util.doubleW snq); + + protected native void dlagtfK(int n, double[] a, int _a_offset, double lambda, double[] b, int _b_offset, double[] c, int _c_offset, double tol, double[] d, int _d_offset, int[] in, int _in_offset, org.netlib.util.intW info); + + protected native void dlagtmK(String trans, int n, int nrhs, double alpha, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] x, int _x_offset, int ldx, double beta, double[] b, int _b_offset, int ldb); + + protected native void dlagtsK(int job, int n, double[] a, int _a_offset, double[] b, int _b_offset, double[] c, int _c_offset, double[] d, int _d_offset, int[] in, int _in_offset, double[] y, int _y_offset, org.netlib.util.doubleW tol, org.netlib.util.intW info); + + protected native void dlagv2K(double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, org.netlib.util.doubleW csl, org.netlib.util.doubleW snl, org.netlib.util.doubleW csr, org.netlib.util.doubleW snr); + + protected native void dlahqrK(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, int iloz, int ihiz, double[] z, int _z_offset, int ldz, org.netlib.util.intW info); + + protected native void dlahr2K(int n, int k, int nb, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] t, int _t_offset, int ldt, double[] y, int _y_offset, int ldy); + + protected native void dlahrdK(int n, int k, int nb, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] t, int _t_offset, int ldt, double[] y, int _y_offset, int ldy); + + protected native void dlaic1K(int job, int j, double[] x, int _x_offset, double sest, double[] w, int _w_offset, double gamma, org.netlib.util.doubleW sestpr, org.netlib.util.doubleW s, org.netlib.util.doubleW c); + + protected native boolean dlaisnanK(double din1, double din2); + + protected native void dlaln2K(boolean ltrans, int na, int nw, double smin, double ca, double[] a, int _a_offset, int lda, double d1, double d2, double[] b, int _b_offset, int ldb, double wr, double wi, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW scale, org.netlib.util.doubleW xnorm, org.netlib.util.intW info); + + protected native void dlals0K(int icompq, int nl, int nr, int sqre, int nrhs, double[] b, int _b_offset, int ldb, double[] bx, int _bx_offset, int ldbx, int[] perm, int _perm_offset, int givptr, int[] givcol, int _givcol_offset, int ldgcol, double[] givnum, int _givnum_offset, int ldgnum, double[] poles, int _poles_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, double[] z, int _z_offset, int k, double c, double s, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dlalsaK(int icompq, int smlsiz, int n, int nrhs, double[] b, int _b_offset, int ldb, double[] bx, int _bx_offset, int ldbx, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int[] k, int _k_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, double[] z, int _z_offset, double[] poles, int _poles_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, int ldgcol, int[] perm, int _perm_offset, double[] givnum, int _givnum_offset, double[] c, int _c_offset, double[] s, int _s_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dlalsdK(String uplo, int smlsiz, int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] b, int _b_offset, int ldb, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dlamrgK(int n1, int n2, double[] a, int _a_offset, int dtrd1, int dtrd2, int[] index, int _index_offset); + + protected native int dlanegK(int n, double[] d, int _d_offset, double[] lld, int _lld_offset, double sigma, double pivmin, int r); + + protected native double dlangbK(String norm, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, double[] work, int _work_offset); + + protected native double dlangeK(String norm, int m, int n, double[] a, int _a_offset, int lda, double[] work, int _work_offset); + + protected native double dlangtK(String norm, int n, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset); + + protected native double dlanhsK(String norm, int n, double[] a, int _a_offset, int lda, double[] work, int _work_offset); + + protected native double dlansbK(String norm, String uplo, int n, int k, double[] ab, int _ab_offset, int ldab, double[] work, int _work_offset); + + protected native double dlanspK(String norm, String uplo, int n, double[] ap, int _ap_offset, double[] work, int _work_offset); + + protected native double dlanstK(String norm, int n, double[] d, int _d_offset, double[] e, int _e_offset); + + protected native double dlansyK(String norm, String uplo, int n, double[] a, int _a_offset, int lda, double[] work, int _work_offset); + + protected native double dlantbK(String norm, String uplo, String diag, int n, int k, double[] ab, int _ab_offset, int ldab, double[] work, int _work_offset); + + protected native double dlantpK(String norm, String uplo, String diag, int n, double[] ap, int _ap_offset, double[] work, int _work_offset); + + protected native double dlantrK(String norm, String uplo, String diag, int m, int n, double[] a, int _a_offset, int lda, double[] work, int _work_offset); + + protected native void dlanv2K(org.netlib.util.doubleW a, org.netlib.util.doubleW b, org.netlib.util.doubleW c, org.netlib.util.doubleW d, org.netlib.util.doubleW rt1r, org.netlib.util.doubleW rt1i, org.netlib.util.doubleW rt2r, org.netlib.util.doubleW rt2i, org.netlib.util.doubleW cs, org.netlib.util.doubleW sn); + + protected native void dlapllK(int n, double[] x, int _x_offset, int incx, double[] y, int _y_offset, int incy, org.netlib.util.doubleW ssmin); + + protected native void dlapmtK(boolean forwrd, int m, int n, double[] x, int _x_offset, int ldx, int[] k, int _k_offset); + + protected native double dlapy2K(double x, double y); + + protected native double dlapy3K(double x, double y, double z); + + protected native void dlaqgbK(int m, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, double[] r, int _r_offset, double[] c, int _c_offset, double rowcnd, double colcnd, double amax, org.netlib.util.StringW equed); + + protected native void dlaqgeK(int m, int n, double[] a, int _a_offset, int lda, double[] r, int _r_offset, double[] c, int _c_offset, double rowcnd, double colcnd, double amax, org.netlib.util.StringW equed); + + protected native void dlaqp2K(int m, int n, int offset, double[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, double[] tau, int _tau_offset, double[] vn1, int _vn1_offset, double[] vn2, int _vn2_offset, double[] work, int _work_offset); + + protected native void dlaqpsK(int m, int n, int offset, int nb, org.netlib.util.intW kb, double[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, double[] tau, int _tau_offset, double[] vn1, int _vn1_offset, double[] vn2, int _vn2_offset, double[] auxv, int _auxv_offset, double[] f, int _f_offset, int ldf); + + protected native void dlaqr0K(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, int iloz, int ihiz, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dlaqr1K(int n, double[] h, int _h_offset, int ldh, double sr1, double si1, double sr2, double si2, double[] v, int _v_offset); + + protected native void dlaqr2K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, double[] h, int _h_offset, int ldh, int iloz, int ihiz, double[] z, int _z_offset, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, double[] sr, int _sr_offset, double[] si, int _si_offset, double[] v, int _v_offset, int ldv, int nh, double[] t, int _t_offset, int ldt, int nv, double[] wv, int _wv_offset, int ldwv, double[] work, int _work_offset, int lwork); + + protected native void dlaqr3K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, double[] h, int _h_offset, int ldh, int iloz, int ihiz, double[] z, int _z_offset, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, double[] sr, int _sr_offset, double[] si, int _si_offset, double[] v, int _v_offset, int ldv, int nh, double[] t, int _t_offset, int ldt, int nv, double[] wv, int _wv_offset, int ldwv, double[] work, int _work_offset, int lwork); + + protected native void dlaqr4K(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, int iloz, int ihiz, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dlaqr5K(boolean wantt, boolean wantz, int kacc22, int n, int ktop, int kbot, int nshfts, double[] sr, int _sr_offset, double[] si, int _si_offset, double[] h, int _h_offset, int ldh, int iloz, int ihiz, double[] z, int _z_offset, int ldz, double[] v, int _v_offset, int ldv, double[] u, int _u_offset, int ldu, int nv, double[] wv, int _wv_offset, int ldwv, int nh, double[] wh, int _wh_offset, int ldwh); + + protected native void dlaqsbK(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] s, int _s_offset, double scond, double amax, org.netlib.util.StringW equed); + + protected native void dlaqspK(String uplo, int n, double[] ap, int _ap_offset, double[] s, int _s_offset, double scond, double amax, org.netlib.util.StringW equed); + + protected native void dlaqsyK(String uplo, int n, double[] a, int _a_offset, int lda, double[] s, int _s_offset, double scond, double amax, org.netlib.util.StringW equed); + + protected native void dlaqtrK(boolean ltran, boolean lreal, int n, double[] t, int _t_offset, int ldt, double[] b, int _b_offset, double w, org.netlib.util.doubleW scale, double[] x, int _x_offset, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dlar1vK(int n, int b1, int bn, double lambda, double[] d, int _d_offset, double[] l, int _l_offset, double[] ld, int _ld_offset, double[] lld, int _lld_offset, double pivmin, double gaptol, double[] z, int _z_offset, boolean wantnc, org.netlib.util.intW negcnt, org.netlib.util.doubleW ztz, org.netlib.util.doubleW mingma, org.netlib.util.intW r, int[] isuppz, int _isuppz_offset, org.netlib.util.doubleW nrminv, org.netlib.util.doubleW resid, org.netlib.util.doubleW rqcorr, double[] work, int _work_offset); + + protected native void dlar2vK(int n, double[] x, int _x_offset, double[] y, int _y_offset, double[] z, int _z_offset, int incx, double[] c, int _c_offset, double[] s, int _s_offset, int incc); + + protected native void dlarfK(String side, int m, int n, double[] v, int _v_offset, int incv, double tau, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset); + + protected native void dlarfbK(String side, String trans, String direct, String storev, int m, int n, int k, double[] v, int _v_offset, int ldv, double[] t, int _t_offset, int ldt, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int ldwork); + + protected native void dlarfgK(int n, org.netlib.util.doubleW alpha, double[] x, int _x_offset, int incx, org.netlib.util.doubleW tau); + + protected native void dlarftK(String direct, String storev, int n, int k, double[] v, int _v_offset, int ldv, double[] tau, int _tau_offset, double[] t, int _t_offset, int ldt); + + protected native void dlarfxK(String side, int m, int n, double[] v, int _v_offset, double tau, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset); + + protected native void dlargvK(int n, double[] x, int _x_offset, int incx, double[] y, int _y_offset, int incy, double[] c, int _c_offset, int incc); + + protected native void dlarnvK(int idist, int[] iseed, int _iseed_offset, int n, double[] x, int _x_offset); + + protected native void dlarraK(int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] e2, int _e2_offset, double spltol, double tnrm, org.netlib.util.intW nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW info); + + protected native void dlarrbK(int n, double[] d, int _d_offset, double[] lld, int _lld_offset, int ifirst, int ilast, double rtol1, double rtol2, int offset, double[] w, int _w_offset, double[] wgap, int _wgap_offset, double[] werr, int _werr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, double pivmin, double spdiam, int twist, org.netlib.util.intW info); + + protected native void dlarrcK(String jobt, int n, double vl, double vu, double[] d, int _d_offset, double[] e, int _e_offset, double pivmin, org.netlib.util.intW eigcnt, org.netlib.util.intW lcnt, org.netlib.util.intW rcnt, org.netlib.util.intW info); + + protected native void dlarrdK(String range, String order, int n, double vl, double vu, int il, int iu, double[] gers, int _gers_offset, double reltol, double[] d, int _d_offset, double[] e, int _e_offset, double[] e2, int _e2_offset, double pivmin, int nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW m, double[] w, int _w_offset, double[] werr, int _werr_offset, org.netlib.util.doubleW wl, org.netlib.util.doubleW wu, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dlarreK(String range, int n, org.netlib.util.doubleW vl, org.netlib.util.doubleW vu, int il, int iu, double[] d, int _d_offset, double[] e, int _e_offset, double[] e2, int _e2_offset, double rtol1, double rtol2, double spltol, org.netlib.util.intW nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW m, double[] w, int _w_offset, double[] werr, int _werr_offset, double[] wgap, int _wgap_offset, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, double[] gers, int _gers_offset, org.netlib.util.doubleW pivmin, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dlarrfK(int n, double[] d, int _d_offset, double[] l, int _l_offset, double[] ld, int _ld_offset, int clstrt, int clend, double[] w, int _w_offset, double[] wgap, int _wgap_offset, double[] werr, int _werr_offset, double spdiam, double clgapl, double clgapr, double pivmin, org.netlib.util.doubleW sigma, double[] dplus, int _dplus_offset, double[] lplus, int _lplus_offset, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dlarrjK(int n, double[] d, int _d_offset, double[] e2, int _e2_offset, int ifirst, int ilast, double rtol, int offset, double[] w, int _w_offset, double[] werr, int _werr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, double pivmin, double spdiam, org.netlib.util.intW info); + + protected native void dlarrkK(int n, int iw, double gl, double gu, double[] d, int _d_offset, double[] e2, int _e2_offset, double pivmin, double reltol, org.netlib.util.doubleW w, org.netlib.util.doubleW werr, org.netlib.util.intW info); + + protected native void dlarrrK(int n, double[] d, int _d_offset, double[] e, int _e_offset, org.netlib.util.intW info); + + protected native void dlarrvK(int n, double vl, double vu, double[] d, int _d_offset, double[] l, int _l_offset, double pivmin, int[] isplit, int _isplit_offset, int m, int dol, int dou, double minrgp, org.netlib.util.doubleW rtol1, org.netlib.util.doubleW rtol2, double[] w, int _w_offset, double[] werr, int _werr_offset, double[] wgap, int _wgap_offset, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, double[] gers, int _gers_offset, double[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dlartgK(double f, double g, org.netlib.util.doubleW cs, org.netlib.util.doubleW sn, org.netlib.util.doubleW r); + + protected native void dlartvK(int n, double[] x, int _x_offset, int incx, double[] y, int _y_offset, int incy, double[] c, int _c_offset, double[] s, int _s_offset, int incc); + + protected native void dlaruvK(int[] iseed, int _iseed_offset, int n, double[] x, int _x_offset); + + protected native void dlarzK(String side, int m, int n, int l, double[] v, int _v_offset, int incv, double tau, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset); + + protected native void dlarzbK(String side, String trans, String direct, String storev, int m, int n, int k, int l, double[] v, int _v_offset, int ldv, double[] t, int _t_offset, int ldt, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int ldwork); + + protected native void dlarztK(String direct, String storev, int n, int k, double[] v, int _v_offset, int ldv, double[] tau, int _tau_offset, double[] t, int _t_offset, int ldt); + + protected native void dlas2K(double f, double g, double h, org.netlib.util.doubleW ssmin, org.netlib.util.doubleW ssmax); + + protected native void dlasclK(String type, int kl, int ku, double cfrom, double cto, int m, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + + protected native void dlasd0K(int n, int sqre, double[] d, int _d_offset, double[] e, int _e_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, int smlsiz, int[] iwork, int _iwork_offset, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dlasd1K(int nl, int nr, int sqre, double[] d, int _d_offset, org.netlib.util.doubleW alpha, org.netlib.util.doubleW beta, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, int[] idxq, int _idxq_offset, int[] iwork, int _iwork_offset, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dlasd2K(int nl, int nr, int sqre, org.netlib.util.intW k, double[] d, int _d_offset, double[] z, int _z_offset, double alpha, double beta, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, double[] dsigma, int _dsigma_offset, double[] u2, int _u2_offset, int ldu2, double[] vt2, int _vt2_offset, int ldvt2, int[] idxp, int _idxp_offset, int[] idx, int _idx_offset, int[] idxc, int _idxc_offset, int[] idxq, int _idxq_offset, int[] coltyp, int _coltyp_offset, org.netlib.util.intW info); + + protected native void dlasd3K(int nl, int nr, int sqre, int k, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, double[] dsigma, int _dsigma_offset, double[] u, int _u_offset, int ldu, double[] u2, int _u2_offset, int ldu2, double[] vt, int _vt_offset, int ldvt, double[] vt2, int _vt2_offset, int ldvt2, int[] idxc, int _idxc_offset, int[] ctot, int _ctot_offset, double[] z, int _z_offset, org.netlib.util.intW info); + + protected native void dlasd4K(int n, int i, double[] d, int _d_offset, double[] z, int _z_offset, double[] delta, int _delta_offset, double rho, org.netlib.util.doubleW sigma, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dlasd5K(int i, double[] d, int _d_offset, double[] z, int _z_offset, double[] delta, int _delta_offset, double rho, org.netlib.util.doubleW dsigma, double[] work, int _work_offset); + + protected native void dlasd6K(int icompq, int nl, int nr, int sqre, double[] d, int _d_offset, double[] vf, int _vf_offset, double[] vl, int _vl_offset, org.netlib.util.doubleW alpha, org.netlib.util.doubleW beta, int[] idxq, int _idxq_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, int ldgcol, double[] givnum, int _givnum_offset, int ldgnum, double[] poles, int _poles_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, double[] z, int _z_offset, org.netlib.util.intW k, org.netlib.util.doubleW c, org.netlib.util.doubleW s, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dlasd7K(int icompq, int nl, int nr, int sqre, org.netlib.util.intW k, double[] d, int _d_offset, double[] z, int _z_offset, double[] zw, int _zw_offset, double[] vf, int _vf_offset, double[] vfw, int _vfw_offset, double[] vl, int _vl_offset, double[] vlw, int _vlw_offset, double alpha, double beta, double[] dsigma, int _dsigma_offset, int[] idx, int _idx_offset, int[] idxp, int _idxp_offset, int[] idxq, int _idxq_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, int ldgcol, double[] givnum, int _givnum_offset, int ldgnum, org.netlib.util.doubleW c, org.netlib.util.doubleW s, org.netlib.util.intW info); + + protected native void dlasd8K(int icompq, int k, double[] d, int _d_offset, double[] z, int _z_offset, double[] vf, int _vf_offset, double[] vl, int _vl_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, int lddifr, double[] dsigma, int _dsigma_offset, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dlasdaK(int icompq, int smlsiz, int n, int sqre, double[] d, int _d_offset, double[] e, int _e_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int[] k, int _k_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, double[] z, int _z_offset, double[] poles, int _poles_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, int ldgcol, int[] perm, int _perm_offset, double[] givnum, int _givnum_offset, double[] c, int _c_offset, double[] s, int _s_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dlasdqK(String uplo, int sqre, int n, int ncvt, int nru, int ncc, double[] d, int _d_offset, double[] e, int _e_offset, double[] vt, int _vt_offset, int ldvt, double[] u, int _u_offset, int ldu, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dlasdtK(int n, org.netlib.util.intW lvl, org.netlib.util.intW nd, int[] inode, int _inode_offset, int[] ndiml, int _ndiml_offset, int[] ndimr, int _ndimr_offset, int msub); + + protected native void dlasetK(String uplo, int m, int n, double alpha, double beta, double[] a, int _a_offset, int lda); + + protected native void dlasq1K(int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dlasq2K(int n, double[] z, int _z_offset, org.netlib.util.intW info); + + protected native void dlasq3K(int i0, org.netlib.util.intW n0, double[] z, int _z_offset, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW sigma, org.netlib.util.doubleW desig, org.netlib.util.doubleW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee); + + protected native void dlasq4K(int i0, int n0, double[] z, int _z_offset, int pp, int n0in, double dmin, double dmin1, double dmin2, double dn, double dn1, double dn2, org.netlib.util.doubleW tau, org.netlib.util.intW ttype); + + protected native void dlasq5K(int i0, int n0, double[] z, int _z_offset, int pp, double tau, org.netlib.util.doubleW dmin, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dnm1, org.netlib.util.doubleW dnm2, boolean ieee); + + protected native void dlasq6K(int i0, int n0, double[] z, int _z_offset, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dnm1, org.netlib.util.doubleW dnm2); + + protected native void dlasrK(String side, String pivot, String direct, int m, int n, double[] c, int _c_offset, double[] s, int _s_offset, double[] a, int _a_offset, int lda); + + protected native void dlasrtK(String id, int n, double[] d, int _d_offset, org.netlib.util.intW info); + + protected native void dlassqK(int n, double[] x, int _x_offset, int incx, org.netlib.util.doubleW scale, org.netlib.util.doubleW sumsq); + + protected native void dlasv2K(double f, double g, double h, org.netlib.util.doubleW ssmin, org.netlib.util.doubleW ssmax, org.netlib.util.doubleW snr, org.netlib.util.doubleW csr, org.netlib.util.doubleW snl, org.netlib.util.doubleW csl); + + protected native void dlaswpK(int n, double[] a, int _a_offset, int lda, int k1, int k2, int[] ipiv, int _ipiv_offset, int incx); + + protected native void dlasy2K(boolean ltranl, boolean ltranr, int isgn, int n1, int n2, double[] tl, int _tl_offset, int ldtl, double[] tr, int _tr_offset, int ldtr, double[] b, int _b_offset, int ldb, org.netlib.util.doubleW scale, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW xnorm, org.netlib.util.intW info); + + protected native void dlasyfK(String uplo, int n, int nb, org.netlib.util.intW kb, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] w, int _w_offset, int ldw, org.netlib.util.intW info); + + protected native void dlatbsK(String uplo, String trans, String diag, String normin, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] x, int _x_offset, org.netlib.util.doubleW scale, double[] cnorm, int _cnorm_offset, org.netlib.util.intW info); + + protected native void dlatdfK(int ijob, int n, double[] z, int _z_offset, int ldz, double[] rhs, int _rhs_offset, org.netlib.util.doubleW rdsum, org.netlib.util.doubleW rdscal, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset); + + protected native void dlatpsK(String uplo, String trans, String diag, String normin, int n, double[] ap, int _ap_offset, double[] x, int _x_offset, org.netlib.util.doubleW scale, double[] cnorm, int _cnorm_offset, org.netlib.util.intW info); + + protected native void dlatrdK(String uplo, int n, int nb, double[] a, int _a_offset, int lda, double[] e, int _e_offset, double[] tau, int _tau_offset, double[] w, int _w_offset, int ldw); + + protected native void dlatrsK(String uplo, String trans, String diag, String normin, int n, double[] a, int _a_offset, int lda, double[] x, int _x_offset, org.netlib.util.doubleW scale, double[] cnorm, int _cnorm_offset, org.netlib.util.intW info); + + protected native void dlatrzK(int m, int n, int l, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset); + + protected native void dlatzmK(String side, int m, int n, double[] v, int _v_offset, int incv, double tau, double[] c1, int _c1_offset, double[] c2, int _c2_offset, int Ldc, double[] work, int _work_offset); + + protected native void dlauu2K(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + + protected native void dlauumK(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + + protected native void dlazq3K(int i0, org.netlib.util.intW n0, double[] z, int _z_offset, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW sigma, org.netlib.util.doubleW desig, org.netlib.util.doubleW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee, org.netlib.util.intW ttype, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dn1, org.netlib.util.doubleW dn2, org.netlib.util.doubleW tau); + + protected native void dlazq4K(int i0, int n0, double[] z, int _z_offset, int pp, int n0in, double dmin, double dmin1, double dmin2, double dn, double dn1, double dn2, org.netlib.util.doubleW tau, org.netlib.util.intW ttype, org.netlib.util.doubleW g); + + protected native void dopgtrK(String uplo, int n, double[] ap, int _ap_offset, double[] tau, int _tau_offset, double[] q, int _q_offset, int ldq, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dopmtrK(String side, String uplo, String trans, int m, int n, double[] ap, int _ap_offset, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dorg2lK(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dorg2rK(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dorgbrK(String vect, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dorghrK(int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dorgl2K(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dorglqK(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dorgqlK(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dorgqrK(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dorgr2K(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dorgrqK(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dorgtrK(String uplo, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dorm2lK(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dorm2rK(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dormbrK(String vect, String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dormhrK(String side, String trans, int m, int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dorml2K(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dormlqK(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dormqlK(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dormqrK(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dormr2K(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dormr3K(String side, String trans, int m, int n, int k, int l, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dormrqK(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dormrzK(String side, String trans, int m, int n, int k, int l, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dormtrK(String side, String uplo, String trans, int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dpbconK(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dpbequK(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] s, int _s_offset, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info); + + protected native void dpbrfsK(String uplo, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] afb, int _afb_offset, int ldafb, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dpbstfK(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, org.netlib.util.intW info); + + protected native void dpbsvK(String uplo, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void dpbsvxK(String fact, String uplo, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] afb, int _afb_offset, int ldafb, org.netlib.util.StringW equed, double[] s, int _s_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dpbtf2K(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, org.netlib.util.intW info); + + protected native void dpbtrfK(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, org.netlib.util.intW info); + + protected native void dpbtrsK(String uplo, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void dpoconK(String uplo, int n, double[] a, int _a_offset, int lda, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dpoequK(int n, double[] a, int _a_offset, int lda, double[] s, int _s_offset, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info); + + protected native void dporfsK(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dposvK(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void dposvxK(String fact, String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, org.netlib.util.StringW equed, double[] s, int _s_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dpotf2K(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + + protected native void dpotrfK(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + + protected native void dpotriK(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + + protected native void dpotrsK(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void dppconK(String uplo, int n, double[] ap, int _ap_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dppequK(String uplo, int n, double[] ap, int _ap_offset, double[] s, int _s_offset, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info); + + protected native void dpprfsK(String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] afp, int _afp_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dppsvK(String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void dppsvxK(String fact, String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] afp, int _afp_offset, org.netlib.util.StringW equed, double[] s, int _s_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dpptrfK(String uplo, int n, double[] ap, int _ap_offset, org.netlib.util.intW info); + + protected native void dpptriK(String uplo, int n, double[] ap, int _ap_offset, org.netlib.util.intW info); + + protected native void dpptrsK(String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void dptconK(int n, double[] d, int _d_offset, double[] e, int _e_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dpteqrK(String compz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dptrfsK(int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] df, int _df_offset, double[] ef, int _ef_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dptsvK(int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void dptsvxK(String fact, int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] df, int _df_offset, double[] ef, int _ef_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dpttrfK(int n, double[] d, int _d_offset, double[] e, int _e_offset, org.netlib.util.intW info); + + protected native void dpttrsK(int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void dptts2K(int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] b, int _b_offset, int ldb); + + protected native void drsclK(int n, double sa, double[] sx, int _sx_offset, int incx); + + protected native void dsbevK(String jobz, String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dsbevdK(String jobz, String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + + protected native void dsbevxK(String jobz, String range, String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] q, int _q_offset, int ldq, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + + protected native void dsbgstK(String vect, String uplo, int n, int ka, int kb, double[] ab, int _ab_offset, int ldab, double[] bb, int _bb_offset, int ldbb, double[] x, int _x_offset, int ldx, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dsbgvK(String jobz, String uplo, int n, int ka, int kb, double[] ab, int _ab_offset, int ldab, double[] bb, int _bb_offset, int ldbb, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dsbgvdK(String jobz, String uplo, int n, int ka, int kb, double[] ab, int _ab_offset, int ldab, double[] bb, int _bb_offset, int ldbb, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + + protected native void dsbgvxK(String jobz, String range, String uplo, int n, int ka, int kb, double[] ab, int _ab_offset, int ldab, double[] bb, int _bb_offset, int ldbb, double[] q, int _q_offset, int ldq, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + + protected native void dsbtrdK(String vect, String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] d, int _d_offset, double[] e, int _e_offset, double[] q, int _q_offset, int ldq, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dsgesvK(int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] work, int _work_offset, float[] swork, int _swork_offset, org.netlib.util.intW iter, org.netlib.util.intW info); + + protected native void dspconK(String uplo, int n, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dspevK(String jobz, String uplo, int n, double[] ap, int _ap_offset, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dspevdK(String jobz, String uplo, int n, double[] ap, int _ap_offset, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + + protected native void dspevxK(String jobz, String range, String uplo, int n, double[] ap, int _ap_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + + protected native void dspgstK(int itype, String uplo, int n, double[] ap, int _ap_offset, double[] bp, int _bp_offset, org.netlib.util.intW info); + + protected native void dspgvK(int itype, String jobz, String uplo, int n, double[] ap, int _ap_offset, double[] bp, int _bp_offset, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dspgvdK(int itype, String jobz, String uplo, int n, double[] ap, int _ap_offset, double[] bp, int _bp_offset, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + + protected native void dspgvxK(int itype, String jobz, String range, String uplo, int n, double[] ap, int _ap_offset, double[] bp, int _bp_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + + protected native void dsprfsK(String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] afp, int _afp_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dspsvK(String uplo, int n, int nrhs, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void dspsvxK(String fact, String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] afp, int _afp_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dsptrdK(String uplo, int n, double[] ap, int _ap_offset, double[] d, int _d_offset, double[] e, int _e_offset, double[] tau, int _tau_offset, org.netlib.util.intW info); + + protected native void dsptrfK(String uplo, int n, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + + protected native void dsptriK(String uplo, int n, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dsptrsK(String uplo, int n, int nrhs, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void dstebzK(String range, String order, int n, double vl, double vu, int il, int iu, double abstol, double[] d, int _d_offset, double[] e, int _e_offset, org.netlib.util.intW m, org.netlib.util.intW nsplit, double[] w, int _w_offset, int[] iblock, int _iblock_offset, int[] isplit, int _isplit_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dstedcK(String compz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + + protected native void dstegrK(String jobz, String range, int n, double[] d, int _d_offset, double[] e, int _e_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + + protected native void dsteinK(int n, double[] d, int _d_offset, double[] e, int _e_offset, int m, double[] w, int _w_offset, int[] iblock, int _iblock_offset, int[] isplit, int _isplit_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + + protected native void dstemrK(String jobz, String range, int n, double[] d, int _d_offset, double[] e, int _e_offset, double vl, double vu, int il, int iu, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, int nzc, int[] isuppz, int _isuppz_offset, org.netlib.util.booleanW tryrac, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + + protected native void dsteqrK(String compz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dsterfK(int n, double[] d, int _d_offset, double[] e, int _e_offset, org.netlib.util.intW info); + + protected native void dstevK(String jobz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dstevdK(String jobz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + + protected native void dstevrK(String jobz, String range, int n, double[] d, int _d_offset, double[] e, int _e_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + + protected native void dstevxK(String jobz, String range, int n, double[] d, int _d_offset, double[] e, int _e_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + + protected native void dsyconK(String uplo, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dsyevK(String jobz, String uplo, int n, double[] a, int _a_offset, int lda, double[] w, int _w_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dsyevdK(String jobz, String uplo, int n, double[] a, int _a_offset, int lda, double[] w, int _w_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + + protected native void dsyevrK(String jobz, String range, String uplo, int n, double[] a, int _a_offset, int lda, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + + protected native void dsyevxK(String jobz, String range, String uplo, int n, double[] a, int _a_offset, int lda, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + + protected native void dsygs2K(int itype, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void dsygstK(int itype, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void dsygvK(int itype, String jobz, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] w, int _w_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dsygvdK(int itype, String jobz, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] w, int _w_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + + protected native void dsygvxK(int itype, String jobz, String range, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + + protected native void dsyrfsK(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dsysvK(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dsysvxK(String fact, String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dsytd2K(String uplo, int n, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tau, int _tau_offset, org.netlib.util.intW info); + + protected native void dsytf2K(String uplo, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + + protected native void dsytrdK(String uplo, int n, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dsytrfK(String uplo, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dsytriK(String uplo, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dsytrsK(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void dtbconK(String norm, String uplo, String diag, int n, int kd, double[] ab, int _ab_offset, int ldab, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dtbrfsK(String uplo, String trans, String diag, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dtbtrsK(String uplo, String trans, String diag, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void dtgevcK(String side, String howmny, boolean[] select, int _select_offset, int n, double[] s, int _s_offset, int lds, double[] p, int _p_offset, int ldp, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dtgex2K(boolean wantq, boolean wantz, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, int j1, int n1, int n2, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dtgexcK(boolean wantq, boolean wantz, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, org.netlib.util.intW ifst, org.netlib.util.intW ilst, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void dtgsenK(int ijob, boolean wantq, boolean wantz, boolean[] select, int _select_offset, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, org.netlib.util.intW m, org.netlib.util.doubleW pl, org.netlib.util.doubleW pr, double[] dif, int _dif_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + + protected native void dtgsjaK(String jobu, String jobv, String jobq, int m, int p, int n, int k, int l, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double tola, double tolb, double[] alpha, int _alpha_offset, double[] beta, int _beta_offset, double[] u, int _u_offset, int ldu, double[] v, int _v_offset, int ldv, double[] q, int _q_offset, int ldq, double[] work, int _work_offset, org.netlib.util.intW ncycle, org.netlib.util.intW info); + + protected native void dtgsnaK(String job, String howmny, boolean[] select, int _select_offset, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] s, int _s_offset, double[] dif, int _dif_offset, int mm, org.netlib.util.intW m, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dtgsy2K(String trans, int ijob, int m, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] c, int _c_offset, int Ldc, double[] d, int _d_offset, int ldd, double[] e, int _e_offset, int lde, double[] f, int _f_offset, int ldf, org.netlib.util.doubleW scale, org.netlib.util.doubleW rdsum, org.netlib.util.doubleW rdscal, int[] iwork, int _iwork_offset, org.netlib.util.intW pq, org.netlib.util.intW info); + + protected native void dtgsylK(String trans, int ijob, int m, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] c, int _c_offset, int Ldc, double[] d, int _d_offset, int ldd, double[] e, int _e_offset, int lde, double[] f, int _f_offset, int ldf, org.netlib.util.doubleW scale, org.netlib.util.doubleW dif, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dtpconK(String norm, String uplo, String diag, int n, double[] ap, int _ap_offset, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dtprfsK(String uplo, String trans, String diag, int n, int nrhs, double[] ap, int _ap_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dtptriK(String uplo, String diag, int n, double[] ap, int _ap_offset, org.netlib.util.intW info); + + protected native void dtptrsK(String uplo, String trans, String diag, int n, int nrhs, double[] ap, int _ap_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void dtrconK(String norm, String uplo, String diag, int n, double[] a, int _a_offset, int lda, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dtrevcK(String side, String howmny, boolean[] select, int _select_offset, int n, double[] t, int _t_offset, int ldt, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dtrexcK(String compq, int n, double[] t, int _t_offset, int ldt, double[] q, int _q_offset, int ldq, org.netlib.util.intW ifst, org.netlib.util.intW ilst, double[] work, int _work_offset, org.netlib.util.intW info); + + protected native void dtrrfsK(String uplo, String trans, String diag, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dtrsenK(String job, String compq, boolean[] select, int _select_offset, int n, double[] t, int _t_offset, int ldt, double[] q, int _q_offset, int ldq, double[] wr, int _wr_offset, double[] wi, int _wi_offset, org.netlib.util.intW m, org.netlib.util.doubleW s, org.netlib.util.doubleW sep, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + + protected native void dtrsnaK(String job, String howmny, boolean[] select, int _select_offset, int n, double[] t, int _t_offset, int ldt, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] s, int _s_offset, double[] sep, int _sep_offset, int mm, org.netlib.util.intW m, double[] work, int _work_offset, int ldwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void dtrsylK(String trana, String tranb, int isgn, int m, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] c, int _c_offset, int Ldc, org.netlib.util.doubleW scale, org.netlib.util.intW info); + + protected native void dtrti2K(String uplo, String diag, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + + protected native void dtrtriK(String uplo, String diag, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + + protected native void dtrtrsK(String uplo, String trans, String diag, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void dtzrqfK(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, org.netlib.util.intW info); + + protected native void dtzrzfK(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native int ieeeckK(int ispec, float zero, float one); + + protected native int ilaenvK(int ispec, String name, String opts, int n1, int n2, int n3, int n4); + + protected native void ilaverK(org.netlib.util.intW vers_major, org.netlib.util.intW vers_minor, org.netlib.util.intW vers_patch); + + protected native int iparmqK(int ispec, String name, String opts, int n, int ilo, int ihi, int lwork); + + protected native boolean lsamenK(int n, String ca, String cb); + + protected native void sbdsdcK(String uplo, String compq, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, float[] q, int _q_offset, int[] iq, int _iq_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void sbdsqrK(String uplo, int n, int ncvt, int nru, int ncc, float[] d, int _d_offset, float[] e, int _e_offset, float[] vt, int _vt_offset, int ldvt, float[] u, int _u_offset, int ldu, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void sdisnaK(String job, int m, int n, float[] d, int _d_offset, float[] sep, int _sep_offset, org.netlib.util.intW info); + + protected native void sgbbrdK(String vect, int m, int n, int ncc, int kl, int ku, float[] ab, int _ab_offset, int ldab, float[] d, int _d_offset, float[] e, int _e_offset, float[] q, int _q_offset, int ldq, float[] pt, int _pt_offset, int ldpt, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void sgbconK(String norm, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void sgbequK(int m, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, float[] r, int _r_offset, float[] c, int _c_offset, org.netlib.util.floatW rowcnd, org.netlib.util.floatW colcnd, org.netlib.util.floatW amax, org.netlib.util.intW info); + + protected native void sgbrfsK(String trans, int n, int kl, int ku, int nrhs, float[] ab, int _ab_offset, int ldab, float[] afb, int _afb_offset, int ldafb, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void sgbsvK(int n, int kl, int ku, int nrhs, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void sgbsvxK(String fact, String trans, int n, int kl, int ku, int nrhs, float[] ab, int _ab_offset, int ldab, float[] afb, int _afb_offset, int ldafb, int[] ipiv, int _ipiv_offset, org.netlib.util.StringW equed, float[] r, int _r_offset, float[] c, int _c_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void sgbtf2K(int m, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + + protected native void sgbtrfK(int m, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + + protected native void sgbtrsK(String trans, int n, int kl, int ku, int nrhs, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void sgebakK(String job, String side, int n, int ilo, int ihi, float[] scale, int _scale_offset, int m, float[] v, int _v_offset, int ldv, org.netlib.util.intW info); + + protected native void sgebalK(String job, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] scale, int _scale_offset, org.netlib.util.intW info); + + protected native void sgebd2K(int m, int n, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tauq, int _tauq_offset, float[] taup, int _taup_offset, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void sgebrdK(int m, int n, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tauq, int _tauq_offset, float[] taup, int _taup_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sgeconK(String norm, int n, float[] a, int _a_offset, int lda, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void sgeequK(int m, int n, float[] a, int _a_offset, int lda, float[] r, int _r_offset, float[] c, int _c_offset, org.netlib.util.floatW rowcnd, org.netlib.util.floatW colcnd, org.netlib.util.floatW amax, org.netlib.util.intW info); + + protected native void sgeesK(String jobvs, String sort, java.lang.Object select, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW sdim, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vs, int _vs_offset, int ldvs, float[] work, int _work_offset, int lwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + + protected native void sgeesxK(String jobvs, String sort, java.lang.Object select, String sense, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW sdim, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vs, int _vs_offset, int ldvs, org.netlib.util.floatW rconde, org.netlib.util.floatW rcondv, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + + protected native void sgeevK(String jobvl, String jobvr, int n, float[] a, int _a_offset, int lda, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sgeevxK(String balanc, String jobvl, String jobvr, String sense, int n, float[] a, int _a_offset, int lda, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] scale, int _scale_offset, org.netlib.util.floatW abnrm, float[] rconde, int _rconde_offset, float[] rcondv, int _rcondv_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void sgegsK(String jobvsl, String jobvsr, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vsl, int _vsl_offset, int ldvsl, float[] vsr, int _vsr_offset, int ldvsr, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sgegvK(String jobvl, String jobvr, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sgehd2K(int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void sgehrdK(int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sgelq2K(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void sgelqfK(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sgelsK(String trans, int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sgelsdK(int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] s, int _s_offset, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void sgelssK(int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] s, int _s_offset, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sgelsxK(int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, int[] jpvt, int _jpvt_offset, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void sgelsyK(int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, int[] jpvt, int _jpvt_offset, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sgeql2K(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void sgeqlfK(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sgeqp3K(int m, int n, float[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sgeqpfK(int m, int n, float[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void sgeqr2K(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void sgeqrfK(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sgerfsK(String trans, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void sgerq2K(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void sgerqfK(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sgesc2K(int n, float[] a, int _a_offset, int lda, float[] rhs, int _rhs_offset, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset, org.netlib.util.floatW scale); + + protected native void sgesddK(String jobz, int m, int n, float[] a, int _a_offset, int lda, float[] s, int _s_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void sgesvK(int n, int nrhs, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void sgesvdK(String jobu, String jobvt, int m, int n, float[] a, int _a_offset, int lda, float[] s, int _s_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sgesvxK(String fact, String trans, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, org.netlib.util.StringW equed, float[] r, int _r_offset, float[] c, int _c_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void sgetc2K(int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset, org.netlib.util.intW info); + + protected native void sgetf2K(int m, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + + protected native void sgetrfK(int m, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + + protected native void sgetriK(int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sgetrsK(String trans, int n, int nrhs, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void sggbakK(String job, String side, int n, int ilo, int ihi, float[] lscale, int _lscale_offset, float[] rscale, int _rscale_offset, int m, float[] v, int _v_offset, int ldv, org.netlib.util.intW info); + + protected native void sggbalK(String job, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] lscale, int _lscale_offset, float[] rscale, int _rscale_offset, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void sggesK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW sdim, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vsl, int _vsl_offset, int ldvsl, float[] vsr, int _vsr_offset, int ldvsr, float[] work, int _work_offset, int lwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + + protected native void sggesxK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, String sense, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW sdim, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vsl, int _vsl_offset, int ldvsl, float[] vsr, int _vsr_offset, int ldvsr, float[] rconde, int _rconde_offset, float[] rcondv, int _rcondv_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + + protected native void sggevK(String jobvl, String jobvr, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sggevxK(String balanc, String jobvl, String jobvr, String sense, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] lscale, int _lscale_offset, float[] rscale, int _rscale_offset, org.netlib.util.floatW abnrm, org.netlib.util.floatW bbnrm, float[] rconde, int _rconde_offset, float[] rcondv, int _rcondv_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + + protected native void sggglmK(int n, int m, int p, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] d, int _d_offset, float[] x, int _x_offset, float[] y, int _y_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sgghrdK(String compq, String compz, int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, org.netlib.util.intW info); + + protected native void sgglseK(int m, int n, int p, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] c, int _c_offset, float[] d, int _d_offset, float[] x, int _x_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sggqrfK(int n, int m, int p, float[] a, int _a_offset, int lda, float[] taua, int _taua_offset, float[] b, int _b_offset, int ldb, float[] taub, int _taub_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sggrqfK(int m, int p, int n, float[] a, int _a_offset, int lda, float[] taua, int _taua_offset, float[] b, int _b_offset, int ldb, float[] taub, int _taub_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sggsvdK(String jobu, String jobv, String jobq, int m, int n, int p, org.netlib.util.intW k, org.netlib.util.intW l, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alpha, int _alpha_offset, float[] beta, int _beta_offset, float[] u, int _u_offset, int ldu, float[] v, int _v_offset, int ldv, float[] q, int _q_offset, int ldq, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void sggsvpK(String jobu, String jobv, String jobq, int m, int p, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float tola, float tolb, org.netlib.util.intW k, org.netlib.util.intW l, float[] u, int _u_offset, int ldu, float[] v, int _v_offset, int ldv, float[] q, int _q_offset, int ldq, int[] iwork, int _iwork_offset, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void sgtconK(String norm, int n, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void sgtrfsK(String trans, int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] dlf, int _dlf_offset, float[] df, int _df_offset, float[] duf, int _duf_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void sgtsvK(int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void sgtsvxK(String fact, String trans, int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] dlf, int _dlf_offset, float[] df, int _df_offset, float[] duf, int _duf_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void sgttrfK(int n, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + + protected native void sgttrsK(String trans, int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void sgtts2K(int itrans, int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb); + + protected native void shgeqzK(String job, String compq, String compz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] t, int _t_offset, int ldt, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void shseinK(String side, String eigsrc, String initv, boolean[] select, int _select_offset, int n, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, float[] work, int _work_offset, int[] ifaill, int _ifaill_offset, int[] ifailr, int _ifailr_offset, org.netlib.util.intW info); + + protected native void shseqrK(String job, String compz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native boolean sisnanK(float sin); + + protected native void slabadK(org.netlib.util.floatW small, org.netlib.util.floatW large); + + protected native void slabrdK(int m, int n, int nb, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tauq, int _tauq_offset, float[] taup, int _taup_offset, float[] x, int _x_offset, int ldx, float[] y, int _y_offset, int ldy); + + protected native void slacn2K(int n, float[] v, int _v_offset, float[] x, int _x_offset, int[] isgn, int _isgn_offset, org.netlib.util.floatW est, org.netlib.util.intW kase, int[] isave, int _isave_offset); + + protected native void slaconK(int n, float[] v, int _v_offset, float[] x, int _x_offset, int[] isgn, int _isgn_offset, org.netlib.util.floatW est, org.netlib.util.intW kase); + + protected native void slacpyK(String uplo, int m, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb); + + protected native void sladivK(float a, float b, float c, float d, org.netlib.util.floatW p, org.netlib.util.floatW q); + + protected native void slae2K(float a, float b, float c, org.netlib.util.floatW rt1, org.netlib.util.floatW rt2); + + protected native void slaebzK(int ijob, int nitmax, int n, int mmax, int minp, int nbmin, float abstol, float reltol, float pivmin, float[] d, int _d_offset, float[] e, int _e_offset, float[] e2, int _e2_offset, int[] nval, int _nval_offset, float[] ab, int _ab_offset, float[] c, int _c_offset, org.netlib.util.intW mout, int[] nab, int _nab_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void slaed0K(int icompq, int qsiz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] q, int _q_offset, int ldq, float[] qstore, int _qstore_offset, int ldqs, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void slaed1K(int n, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.floatW rho, int cutpnt, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void slaed2K(org.netlib.util.intW k, int n, int n1, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.floatW rho, float[] z, int _z_offset, float[] dlamda, int _dlamda_offset, float[] w, int _w_offset, float[] q2, int _q2_offset, int[] indx, int _indx_offset, int[] indxc, int _indxc_offset, int[] indxp, int _indxp_offset, int[] coltyp, int _coltyp_offset, org.netlib.util.intW info); + + protected native void slaed3K(int k, int n, int n1, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, float rho, float[] dlamda, int _dlamda_offset, float[] q2, int _q2_offset, int[] indx, int _indx_offset, int[] ctot, int _ctot_offset, float[] w, int _w_offset, float[] s, int _s_offset, org.netlib.util.intW info); + + protected native void slaed4K(int n, int i, float[] d, int _d_offset, float[] z, int _z_offset, float[] delta, int _delta_offset, float rho, org.netlib.util.floatW dlam, org.netlib.util.intW info); + + protected native void slaed5K(int i, float[] d, int _d_offset, float[] z, int _z_offset, float[] delta, int _delta_offset, float rho, org.netlib.util.floatW dlam); + + protected native void slaed6K(int kniter, boolean orgati, float rho, float[] d, int _d_offset, float[] z, int _z_offset, float finit, org.netlib.util.floatW tau, org.netlib.util.intW info); + + protected native void slaed7K(int icompq, int n, int qsiz, int tlvls, int curlvl, int curpbm, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.floatW rho, int cutpnt, float[] qstore, int _qstore_offset, int[] qptr, int _qptr_offset, int[] prmptr, int _prmptr_offset, int[] perm, int _perm_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, float[] givnum, int _givnum_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void slaed8K(int icompq, org.netlib.util.intW k, int n, int qsiz, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.floatW rho, int cutpnt, float[] z, int _z_offset, float[] dlamda, int _dlamda_offset, float[] q2, int _q2_offset, int ldq2, float[] w, int _w_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, float[] givnum, int _givnum_offset, int[] indxp, int _indxp_offset, int[] indx, int _indx_offset, org.netlib.util.intW info); + + protected native void slaed9K(int k, int kstart, int kstop, int n, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, float rho, float[] dlamda, int _dlamda_offset, float[] w, int _w_offset, float[] s, int _s_offset, int lds, org.netlib.util.intW info); + + protected native void slaedaK(int n, int tlvls, int curlvl, int curpbm, int[] prmptr, int _prmptr_offset, int[] perm, int _perm_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, float[] givnum, int _givnum_offset, float[] q, int _q_offset, int[] qptr, int _qptr_offset, float[] z, int _z_offset, float[] ztemp, int _ztemp_offset, org.netlib.util.intW info); + + protected native void slaeinK(boolean rightv, boolean noinit, int n, float[] h, int _h_offset, int ldh, float wr, float wi, float[] vr, int _vr_offset, float[] vi, int _vi_offset, float[] b, int _b_offset, int ldb, float[] work, int _work_offset, float eps3, float smlnum, float bignum, org.netlib.util.intW info); + + protected native void slaev2K(float a, float b, float c, org.netlib.util.floatW rt1, org.netlib.util.floatW rt2, org.netlib.util.floatW cs1, org.netlib.util.floatW sn1); + + protected native void slaexcK(boolean wantq, int n, float[] t, int _t_offset, int ldt, float[] q, int _q_offset, int ldq, int j1, int n1, int n2, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void slag2K(float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float safmin, org.netlib.util.floatW scale1, org.netlib.util.floatW scale2, org.netlib.util.floatW wr1, org.netlib.util.floatW wr2, org.netlib.util.floatW wi); + + protected native void slag2dK(int m, int n, float[] sa, int _sa_offset, int ldsa, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + + protected native void slags2K(boolean upper, float a1, float a2, float a3, float b1, float b2, float b3, org.netlib.util.floatW csu, org.netlib.util.floatW snu, org.netlib.util.floatW csv, org.netlib.util.floatW snv, org.netlib.util.floatW csq, org.netlib.util.floatW snq); + + protected native void slagtfK(int n, float[] a, int _a_offset, float lambda, float[] b, int _b_offset, float[] c, int _c_offset, float tol, float[] d, int _d_offset, int[] in, int _in_offset, org.netlib.util.intW info); + + protected native void slagtmK(String trans, int n, int nrhs, float alpha, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] x, int _x_offset, int ldx, float beta, float[] b, int _b_offset, int ldb); + + protected native void slagtsK(int job, int n, float[] a, int _a_offset, float[] b, int _b_offset, float[] c, int _c_offset, float[] d, int _d_offset, int[] in, int _in_offset, float[] y, int _y_offset, org.netlib.util.floatW tol, org.netlib.util.intW info); + + protected native void slagv2K(float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, org.netlib.util.floatW csl, org.netlib.util.floatW snl, org.netlib.util.floatW csr, org.netlib.util.floatW snr); + + protected native void slahqrK(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, int iloz, int ihiz, float[] z, int _z_offset, int ldz, org.netlib.util.intW info); + + protected native void slahr2K(int n, int k, int nb, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] t, int _t_offset, int ldt, float[] y, int _y_offset, int ldy); + + protected native void slahrdK(int n, int k, int nb, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] t, int _t_offset, int ldt, float[] y, int _y_offset, int ldy); + + protected native void slaic1K(int job, int j, float[] x, int _x_offset, float sest, float[] w, int _w_offset, float gamma, org.netlib.util.floatW sestpr, org.netlib.util.floatW s, org.netlib.util.floatW c); + + protected native boolean slaisnanK(float sin1, float sin2); + + protected native void slaln2K(boolean ltrans, int na, int nw, float smin, float ca, float[] a, int _a_offset, int lda, float d1, float d2, float[] b, int _b_offset, int ldb, float wr, float wi, float[] x, int _x_offset, int ldx, org.netlib.util.floatW scale, org.netlib.util.floatW xnorm, org.netlib.util.intW info); + + protected native void slals0K(int icompq, int nl, int nr, int sqre, int nrhs, float[] b, int _b_offset, int ldb, float[] bx, int _bx_offset, int ldbx, int[] perm, int _perm_offset, int givptr, int[] givcol, int _givcol_offset, int ldgcol, float[] givnum, int _givnum_offset, int ldgnum, float[] poles, int _poles_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, float[] z, int _z_offset, int k, float c, float s, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void slalsaK(int icompq, int smlsiz, int n, int nrhs, float[] b, int _b_offset, int ldb, float[] bx, int _bx_offset, int ldbx, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int[] k, int _k_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, float[] z, int _z_offset, float[] poles, int _poles_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, int ldgcol, int[] perm, int _perm_offset, float[] givnum, int _givnum_offset, float[] c, int _c_offset, float[] s, int _s_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void slalsdK(String uplo, int smlsiz, int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] b, int _b_offset, int ldb, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void slamrgK(int n1, int n2, float[] a, int _a_offset, int strd1, int strd2, int[] index, int _index_offset); + + protected native int slanegK(int n, float[] d, int _d_offset, float[] lld, int _lld_offset, float sigma, float pivmin, int r); + + protected native float slangbK(String norm, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, float[] work, int _work_offset); + + protected native float slangeK(String norm, int m, int n, float[] a, int _a_offset, int lda, float[] work, int _work_offset); + + protected native float slangtK(String norm, int n, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset); + + protected native float slanhsK(String norm, int n, float[] a, int _a_offset, int lda, float[] work, int _work_offset); + + protected native float slansbK(String norm, String uplo, int n, int k, float[] ab, int _ab_offset, int ldab, float[] work, int _work_offset); + + protected native float slanspK(String norm, String uplo, int n, float[] ap, int _ap_offset, float[] work, int _work_offset); + + protected native float slanstK(String norm, int n, float[] d, int _d_offset, float[] e, int _e_offset); + + protected native float slansyK(String norm, String uplo, int n, float[] a, int _a_offset, int lda, float[] work, int _work_offset); + + protected native float slantbK(String norm, String uplo, String diag, int n, int k, float[] ab, int _ab_offset, int ldab, float[] work, int _work_offset); + + protected native float slantpK(String norm, String uplo, String diag, int n, float[] ap, int _ap_offset, float[] work, int _work_offset); + + protected native float slantrK(String norm, String uplo, String diag, int m, int n, float[] a, int _a_offset, int lda, float[] work, int _work_offset); + + protected native void slanv2K(org.netlib.util.floatW a, org.netlib.util.floatW b, org.netlib.util.floatW c, org.netlib.util.floatW d, org.netlib.util.floatW rt1r, org.netlib.util.floatW rt1i, org.netlib.util.floatW rt2r, org.netlib.util.floatW rt2i, org.netlib.util.floatW cs, org.netlib.util.floatW sn); + + protected native void slapllK(int n, float[] x, int _x_offset, int incx, float[] y, int _y_offset, int incy, org.netlib.util.floatW ssmin); + + protected native void slapmtK(boolean forwrd, int m, int n, float[] x, int _x_offset, int ldx, int[] k, int _k_offset); + + protected native float slapy2K(float x, float y); + + protected native float slapy3K(float x, float y, float z); + + protected native void slaqgbK(int m, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, float[] r, int _r_offset, float[] c, int _c_offset, float rowcnd, float colcnd, float amax, org.netlib.util.StringW equed); + + protected native void slaqgeK(int m, int n, float[] a, int _a_offset, int lda, float[] r, int _r_offset, float[] c, int _c_offset, float rowcnd, float colcnd, float amax, org.netlib.util.StringW equed); + + protected native void slaqp2K(int m, int n, int offset, float[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, float[] tau, int _tau_offset, float[] vn1, int _vn1_offset, float[] vn2, int _vn2_offset, float[] work, int _work_offset); + + protected native void slaqpsK(int m, int n, int offset, int nb, org.netlib.util.intW kb, float[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, float[] tau, int _tau_offset, float[] vn1, int _vn1_offset, float[] vn2, int _vn2_offset, float[] auxv, int _auxv_offset, float[] f, int _f_offset, int ldf); + + protected native void slaqr0K(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, int iloz, int ihiz, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void slaqr1K(int n, float[] h, int _h_offset, int ldh, float sr1, float si1, float sr2, float si2, float[] v, int _v_offset); + + protected native void slaqr2K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, float[] h, int _h_offset, int ldh, int iloz, int ihiz, float[] z, int _z_offset, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, float[] sr, int _sr_offset, float[] si, int _si_offset, float[] v, int _v_offset, int ldv, int nh, float[] t, int _t_offset, int ldt, int nv, float[] wv, int _wv_offset, int ldwv, float[] work, int _work_offset, int lwork); + + protected native void slaqr3K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, float[] h, int _h_offset, int ldh, int iloz, int ihiz, float[] z, int _z_offset, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, float[] sr, int _sr_offset, float[] si, int _si_offset, float[] v, int _v_offset, int ldv, int nh, float[] t, int _t_offset, int ldt, int nv, float[] wv, int _wv_offset, int ldwv, float[] work, int _work_offset, int lwork); + + protected native void slaqr4K(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, int iloz, int ihiz, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void slaqr5K(boolean wantt, boolean wantz, int kacc22, int n, int ktop, int kbot, int nshfts, float[] sr, int _sr_offset, float[] si, int _si_offset, float[] h, int _h_offset, int ldh, int iloz, int ihiz, float[] z, int _z_offset, int ldz, float[] v, int _v_offset, int ldv, float[] u, int _u_offset, int ldu, int nv, float[] wv, int _wv_offset, int ldwv, int nh, float[] wh, int _wh_offset, int ldwh); + + protected native void slaqsbK(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] s, int _s_offset, float scond, float amax, org.netlib.util.StringW equed); + + protected native void slaqspK(String uplo, int n, float[] ap, int _ap_offset, float[] s, int _s_offset, float scond, float amax, org.netlib.util.StringW equed); + + protected native void slaqsyK(String uplo, int n, float[] a, int _a_offset, int lda, float[] s, int _s_offset, float scond, float amax, org.netlib.util.StringW equed); + + protected native void slaqtrK(boolean ltran, boolean lreal, int n, float[] t, int _t_offset, int ldt, float[] b, int _b_offset, float w, org.netlib.util.floatW scale, float[] x, int _x_offset, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void slar1vK(int n, int b1, int bn, float lambda, float[] d, int _d_offset, float[] l, int _l_offset, float[] ld, int _ld_offset, float[] lld, int _lld_offset, float pivmin, float gaptol, float[] z, int _z_offset, boolean wantnc, org.netlib.util.intW negcnt, org.netlib.util.floatW ztz, org.netlib.util.floatW mingma, org.netlib.util.intW r, int[] isuppz, int _isuppz_offset, org.netlib.util.floatW nrminv, org.netlib.util.floatW resid, org.netlib.util.floatW rqcorr, float[] work, int _work_offset); + + protected native void slar2vK(int n, float[] x, int _x_offset, float[] y, int _y_offset, float[] z, int _z_offset, int incx, float[] c, int _c_offset, float[] s, int _s_offset, int incc); + + protected native void slarfK(String side, int m, int n, float[] v, int _v_offset, int incv, float tau, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset); + + protected native void slarfbK(String side, String trans, String direct, String storev, int m, int n, int k, float[] v, int _v_offset, int ldv, float[] t, int _t_offset, int ldt, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int ldwork); + + protected native void slarfgK(int n, org.netlib.util.floatW alpha, float[] x, int _x_offset, int incx, org.netlib.util.floatW tau); + + protected native void slarftK(String direct, String storev, int n, int k, float[] v, int _v_offset, int ldv, float[] tau, int _tau_offset, float[] t, int _t_offset, int ldt); + + protected native void slarfxK(String side, int m, int n, float[] v, int _v_offset, float tau, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset); + + protected native void slargvK(int n, float[] x, int _x_offset, int incx, float[] y, int _y_offset, int incy, float[] c, int _c_offset, int incc); + + protected native void slarnvK(int idist, int[] iseed, int _iseed_offset, int n, float[] x, int _x_offset); + + protected native void slarraK(int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] e2, int _e2_offset, float spltol, float tnrm, org.netlib.util.intW nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW info); + + protected native void slarrbK(int n, float[] d, int _d_offset, float[] lld, int _lld_offset, int ifirst, int ilast, float rtol1, float rtol2, int offset, float[] w, int _w_offset, float[] wgap, int _wgap_offset, float[] werr, int _werr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, float pivmin, float spdiam, int twist, org.netlib.util.intW info); + + protected native void slarrcK(String jobt, int n, float vl, float vu, float[] d, int _d_offset, float[] e, int _e_offset, float pivmin, org.netlib.util.intW eigcnt, org.netlib.util.intW lcnt, org.netlib.util.intW rcnt, org.netlib.util.intW info); + + protected native void slarrdK(String range, String order, int n, float vl, float vu, int il, int iu, float[] gers, int _gers_offset, float reltol, float[] d, int _d_offset, float[] e, int _e_offset, float[] e2, int _e2_offset, float pivmin, int nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW m, float[] w, int _w_offset, float[] werr, int _werr_offset, org.netlib.util.floatW wl, org.netlib.util.floatW wu, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void slarreK(String range, int n, org.netlib.util.floatW vl, org.netlib.util.floatW vu, int il, int iu, float[] d, int _d_offset, float[] e, int _e_offset, float[] e2, int _e2_offset, float rtol1, float rtol2, float spltol, org.netlib.util.intW nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW m, float[] w, int _w_offset, float[] werr, int _werr_offset, float[] wgap, int _wgap_offset, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, float[] gers, int _gers_offset, org.netlib.util.floatW pivmin, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void slarrfK(int n, float[] d, int _d_offset, float[] l, int _l_offset, float[] ld, int _ld_offset, int clstrt, int clend, float[] w, int _w_offset, float[] wgap, int _wgap_offset, float[] werr, int _werr_offset, float spdiam, float clgapl, float clgapr, float pivmin, org.netlib.util.floatW sigma, float[] dplus, int _dplus_offset, float[] lplus, int _lplus_offset, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void slarrjK(int n, float[] d, int _d_offset, float[] e2, int _e2_offset, int ifirst, int ilast, float rtol, int offset, float[] w, int _w_offset, float[] werr, int _werr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, float pivmin, float spdiam, org.netlib.util.intW info); + + protected native void slarrkK(int n, int iw, float gl, float gu, float[] d, int _d_offset, float[] e2, int _e2_offset, float pivmin, float reltol, org.netlib.util.floatW w, org.netlib.util.floatW werr, org.netlib.util.intW info); + + protected native void slarrrK(int n, float[] d, int _d_offset, float[] e, int _e_offset, org.netlib.util.intW info); + + protected native void slarrvK(int n, float vl, float vu, float[] d, int _d_offset, float[] l, int _l_offset, float pivmin, int[] isplit, int _isplit_offset, int m, int dol, int dou, float minrgp, org.netlib.util.floatW rtol1, org.netlib.util.floatW rtol2, float[] w, int _w_offset, float[] werr, int _werr_offset, float[] wgap, int _wgap_offset, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, float[] gers, int _gers_offset, float[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void slartgK(float f, float g, org.netlib.util.floatW cs, org.netlib.util.floatW sn, org.netlib.util.floatW r); + + protected native void slartvK(int n, float[] x, int _x_offset, int incx, float[] y, int _y_offset, int incy, float[] c, int _c_offset, float[] s, int _s_offset, int incc); + + protected native void slaruvK(int[] iseed, int _iseed_offset, int n, float[] x, int _x_offset); + + protected native void slarzK(String side, int m, int n, int l, float[] v, int _v_offset, int incv, float tau, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset); + + protected native void slarzbK(String side, String trans, String direct, String storev, int m, int n, int k, int l, float[] v, int _v_offset, int ldv, float[] t, int _t_offset, int ldt, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int ldwork); + + protected native void slarztK(String direct, String storev, int n, int k, float[] v, int _v_offset, int ldv, float[] tau, int _tau_offset, float[] t, int _t_offset, int ldt); + + protected native void slas2K(float f, float g, float h, org.netlib.util.floatW ssmin, org.netlib.util.floatW ssmax); + + protected native void slasclK(String type, int kl, int ku, float cfrom, float cto, int m, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + + protected native void slasd0K(int n, int sqre, float[] d, int _d_offset, float[] e, int _e_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, int smlsiz, int[] iwork, int _iwork_offset, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void slasd1K(int nl, int nr, int sqre, float[] d, int _d_offset, org.netlib.util.floatW alpha, org.netlib.util.floatW beta, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, int[] idxq, int _idxq_offset, int[] iwork, int _iwork_offset, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void slasd2K(int nl, int nr, int sqre, org.netlib.util.intW k, float[] d, int _d_offset, float[] z, int _z_offset, float alpha, float beta, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, float[] dsigma, int _dsigma_offset, float[] u2, int _u2_offset, int ldu2, float[] vt2, int _vt2_offset, int ldvt2, int[] idxp, int _idxp_offset, int[] idx, int _idx_offset, int[] idxc, int _idxc_offset, int[] idxq, int _idxq_offset, int[] coltyp, int _coltyp_offset, org.netlib.util.intW info); + + protected native void slasd3K(int nl, int nr, int sqre, int k, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, float[] dsigma, int _dsigma_offset, float[] u, int _u_offset, int ldu, float[] u2, int _u2_offset, int ldu2, float[] vt, int _vt_offset, int ldvt, float[] vt2, int _vt2_offset, int ldvt2, int[] idxc, int _idxc_offset, int[] ctot, int _ctot_offset, float[] z, int _z_offset, org.netlib.util.intW info); + + protected native void slasd4K(int n, int i, float[] d, int _d_offset, float[] z, int _z_offset, float[] delta, int _delta_offset, float rho, org.netlib.util.floatW sigma, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void slasd5K(int i, float[] d, int _d_offset, float[] z, int _z_offset, float[] delta, int _delta_offset, float rho, org.netlib.util.floatW dsigma, float[] work, int _work_offset); + + protected native void slasd6K(int icompq, int nl, int nr, int sqre, float[] d, int _d_offset, float[] vf, int _vf_offset, float[] vl, int _vl_offset, org.netlib.util.floatW alpha, org.netlib.util.floatW beta, int[] idxq, int _idxq_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, int ldgcol, float[] givnum, int _givnum_offset, int ldgnum, float[] poles, int _poles_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, float[] z, int _z_offset, org.netlib.util.intW k, org.netlib.util.floatW c, org.netlib.util.floatW s, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void slasd7K(int icompq, int nl, int nr, int sqre, org.netlib.util.intW k, float[] d, int _d_offset, float[] z, int _z_offset, float[] zw, int _zw_offset, float[] vf, int _vf_offset, float[] vfw, int _vfw_offset, float[] vl, int _vl_offset, float[] vlw, int _vlw_offset, float alpha, float beta, float[] dsigma, int _dsigma_offset, int[] idx, int _idx_offset, int[] idxp, int _idxp_offset, int[] idxq, int _idxq_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, int ldgcol, float[] givnum, int _givnum_offset, int ldgnum, org.netlib.util.floatW c, org.netlib.util.floatW s, org.netlib.util.intW info); + + protected native void slasd8K(int icompq, int k, float[] d, int _d_offset, float[] z, int _z_offset, float[] vf, int _vf_offset, float[] vl, int _vl_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, int lddifr, float[] dsigma, int _dsigma_offset, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void slasdaK(int icompq, int smlsiz, int n, int sqre, float[] d, int _d_offset, float[] e, int _e_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int[] k, int _k_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, float[] z, int _z_offset, float[] poles, int _poles_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, int ldgcol, int[] perm, int _perm_offset, float[] givnum, int _givnum_offset, float[] c, int _c_offset, float[] s, int _s_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void slasdqK(String uplo, int sqre, int n, int ncvt, int nru, int ncc, float[] d, int _d_offset, float[] e, int _e_offset, float[] vt, int _vt_offset, int ldvt, float[] u, int _u_offset, int ldu, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void slasdtK(int n, org.netlib.util.intW lvl, org.netlib.util.intW nd, int[] inode, int _inode_offset, int[] ndiml, int _ndiml_offset, int[] ndimr, int _ndimr_offset, int msub); + + protected native void slasetK(String uplo, int m, int n, float alpha, float beta, float[] a, int _a_offset, int lda); + + protected native void slasq1K(int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void slasq2K(int n, float[] z, int _z_offset, org.netlib.util.intW info); + + protected native void slasq3K(int i0, org.netlib.util.intW n0, float[] z, int _z_offset, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW sigma, org.netlib.util.floatW desig, org.netlib.util.floatW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee); + + protected native void slasq4K(int i0, int n0, float[] z, int _z_offset, int pp, int n0in, float dmin, float dmin1, float dmin2, float dn, float dn1, float dn2, org.netlib.util.floatW tau, org.netlib.util.intW ttype); + + protected native void slasq5K(int i0, int n0, float[] z, int _z_offset, int pp, float tau, org.netlib.util.floatW dmin, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dnm1, org.netlib.util.floatW dnm2, boolean ieee); + + protected native void slasq6K(int i0, int n0, float[] z, int _z_offset, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dnm1, org.netlib.util.floatW dnm2); + + protected native void slasrK(String side, String pivot, String direct, int m, int n, float[] c, int _c_offset, float[] s, int _s_offset, float[] a, int _a_offset, int lda); + + protected native void slasrtK(String id, int n, float[] d, int _d_offset, org.netlib.util.intW info); + + protected native void slassqK(int n, float[] x, int _x_offset, int incx, org.netlib.util.floatW scale, org.netlib.util.floatW sumsq); + + protected native void slasv2K(float f, float g, float h, org.netlib.util.floatW ssmin, org.netlib.util.floatW ssmax, org.netlib.util.floatW snr, org.netlib.util.floatW csr, org.netlib.util.floatW snl, org.netlib.util.floatW csl); + + protected native void slaswpK(int n, float[] a, int _a_offset, int lda, int k1, int k2, int[] ipiv, int _ipiv_offset, int incx); + + protected native void slasy2K(boolean ltranl, boolean ltranr, int isgn, int n1, int n2, float[] tl, int _tl_offset, int ldtl, float[] tr, int _tr_offset, int ldtr, float[] b, int _b_offset, int ldb, org.netlib.util.floatW scale, float[] x, int _x_offset, int ldx, org.netlib.util.floatW xnorm, org.netlib.util.intW info); + + protected native void slasyfK(String uplo, int n, int nb, org.netlib.util.intW kb, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] w, int _w_offset, int ldw, org.netlib.util.intW info); + + protected native void slatbsK(String uplo, String trans, String diag, String normin, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] x, int _x_offset, org.netlib.util.floatW scale, float[] cnorm, int _cnorm_offset, org.netlib.util.intW info); + + protected native void slatdfK(int ijob, int n, float[] z, int _z_offset, int ldz, float[] rhs, int _rhs_offset, org.netlib.util.floatW rdsum, org.netlib.util.floatW rdscal, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset); + + protected native void slatpsK(String uplo, String trans, String diag, String normin, int n, float[] ap, int _ap_offset, float[] x, int _x_offset, org.netlib.util.floatW scale, float[] cnorm, int _cnorm_offset, org.netlib.util.intW info); + + protected native void slatrdK(String uplo, int n, int nb, float[] a, int _a_offset, int lda, float[] e, int _e_offset, float[] tau, int _tau_offset, float[] w, int _w_offset, int ldw); + + protected native void slatrsK(String uplo, String trans, String diag, String normin, int n, float[] a, int _a_offset, int lda, float[] x, int _x_offset, org.netlib.util.floatW scale, float[] cnorm, int _cnorm_offset, org.netlib.util.intW info); + + protected native void slatrzK(int m, int n, int l, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset); + + protected native void slatzmK(String side, int m, int n, float[] v, int _v_offset, int incv, float tau, float[] c1, int _c1_offset, float[] c2, int _c2_offset, int Ldc, float[] work, int _work_offset); + + protected native void slauu2K(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + + protected native void slauumK(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + + protected native void slazq3K(int i0, org.netlib.util.intW n0, float[] z, int _z_offset, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW sigma, org.netlib.util.floatW desig, org.netlib.util.floatW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee, org.netlib.util.intW ttype, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dn1, org.netlib.util.floatW dn2, org.netlib.util.floatW tau); + + protected native void slazq4K(int i0, int n0, float[] z, int _z_offset, int pp, int n0in, float dmin, float dmin1, float dmin2, float dn, float dn1, float dn2, org.netlib.util.floatW tau, org.netlib.util.intW ttype, org.netlib.util.floatW g); + + protected native void sopgtrK(String uplo, int n, float[] ap, int _ap_offset, float[] tau, int _tau_offset, float[] q, int _q_offset, int ldq, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void sopmtrK(String side, String uplo, String trans, int m, int n, float[] ap, int _ap_offset, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void sorg2lK(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void sorg2rK(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void sorgbrK(String vect, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sorghrK(int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sorgl2K(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void sorglqK(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sorgqlK(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sorgqrK(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sorgr2K(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void sorgrqK(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sorgtrK(String uplo, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sorm2lK(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void sorm2rK(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void sormbrK(String vect, String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sormhrK(String side, String trans, int m, int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sorml2K(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void sormlqK(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sormqlK(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sormqrK(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sormr2K(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void sormr3K(String side, String trans, int m, int n, int k, int l, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void sormrqK(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sormrzK(String side, String trans, int m, int n, int k, int l, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void sormtrK(String side, String uplo, String trans, int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void spbconK(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void spbequK(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] s, int _s_offset, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info); + + protected native void spbrfsK(String uplo, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] afb, int _afb_offset, int ldafb, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void spbstfK(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, org.netlib.util.intW info); + + protected native void spbsvK(String uplo, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void spbsvxK(String fact, String uplo, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] afb, int _afb_offset, int ldafb, org.netlib.util.StringW equed, float[] s, int _s_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void spbtf2K(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, org.netlib.util.intW info); + + protected native void spbtrfK(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, org.netlib.util.intW info); + + protected native void spbtrsK(String uplo, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void spoconK(String uplo, int n, float[] a, int _a_offset, int lda, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void spoequK(int n, float[] a, int _a_offset, int lda, float[] s, int _s_offset, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info); + + protected native void sporfsK(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void sposvK(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void sposvxK(String fact, String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, org.netlib.util.StringW equed, float[] s, int _s_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void spotf2K(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + + protected native void spotrfK(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + + protected native void spotriK(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + + protected native void spotrsK(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void sppconK(String uplo, int n, float[] ap, int _ap_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void sppequK(String uplo, int n, float[] ap, int _ap_offset, float[] s, int _s_offset, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info); + + protected native void spprfsK(String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] afp, int _afp_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void sppsvK(String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void sppsvxK(String fact, String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] afp, int _afp_offset, org.netlib.util.StringW equed, float[] s, int _s_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void spptrfK(String uplo, int n, float[] ap, int _ap_offset, org.netlib.util.intW info); + + protected native void spptriK(String uplo, int n, float[] ap, int _ap_offset, org.netlib.util.intW info); + + protected native void spptrsK(String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void sptconK(int n, float[] d, int _d_offset, float[] e, int _e_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void spteqrK(String compz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void sptrfsK(int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] df, int _df_offset, float[] ef, int _ef_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void sptsvK(int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void sptsvxK(String fact, int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] df, int _df_offset, float[] ef, int _ef_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void spttrfK(int n, float[] d, int _d_offset, float[] e, int _e_offset, org.netlib.util.intW info); + + protected native void spttrsK(int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void sptts2K(int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] b, int _b_offset, int ldb); + + protected native void srsclK(int n, float sa, float[] sx, int _sx_offset, int incx); + + protected native void ssbevK(String jobz, String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void ssbevdK(String jobz, String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + + protected native void ssbevxK(String jobz, String range, String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] q, int _q_offset, int ldq, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + + protected native void ssbgstK(String vect, String uplo, int n, int ka, int kb, float[] ab, int _ab_offset, int ldab, float[] bb, int _bb_offset, int ldbb, float[] x, int _x_offset, int ldx, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void ssbgvK(String jobz, String uplo, int n, int ka, int kb, float[] ab, int _ab_offset, int ldab, float[] bb, int _bb_offset, int ldbb, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void ssbgvdK(String jobz, String uplo, int n, int ka, int kb, float[] ab, int _ab_offset, int ldab, float[] bb, int _bb_offset, int ldbb, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + + protected native void ssbgvxK(String jobz, String range, String uplo, int n, int ka, int kb, float[] ab, int _ab_offset, int ldab, float[] bb, int _bb_offset, int ldbb, float[] q, int _q_offset, int ldq, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + + protected native void ssbtrdK(String vect, String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] d, int _d_offset, float[] e, int _e_offset, float[] q, int _q_offset, int ldq, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void sspconK(String uplo, int n, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void sspevK(String jobz, String uplo, int n, float[] ap, int _ap_offset, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void sspevdK(String jobz, String uplo, int n, float[] ap, int _ap_offset, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + + protected native void sspevxK(String jobz, String range, String uplo, int n, float[] ap, int _ap_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + + protected native void sspgstK(int itype, String uplo, int n, float[] ap, int _ap_offset, float[] bp, int _bp_offset, org.netlib.util.intW info); + + protected native void sspgvK(int itype, String jobz, String uplo, int n, float[] ap, int _ap_offset, float[] bp, int _bp_offset, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void sspgvdK(int itype, String jobz, String uplo, int n, float[] ap, int _ap_offset, float[] bp, int _bp_offset, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + + protected native void sspgvxK(int itype, String jobz, String range, String uplo, int n, float[] ap, int _ap_offset, float[] bp, int _bp_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + + protected native void ssprfsK(String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] afp, int _afp_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void sspsvK(String uplo, int n, int nrhs, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void sspsvxK(String fact, String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] afp, int _afp_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void ssptrdK(String uplo, int n, float[] ap, int _ap_offset, float[] d, int _d_offset, float[] e, int _e_offset, float[] tau, int _tau_offset, org.netlib.util.intW info); + + protected native void ssptrfK(String uplo, int n, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + + protected native void ssptriK(String uplo, int n, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void ssptrsK(String uplo, int n, int nrhs, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void sstebzK(String range, String order, int n, float vl, float vu, int il, int iu, float abstol, float[] d, int _d_offset, float[] e, int _e_offset, org.netlib.util.intW m, org.netlib.util.intW nsplit, float[] w, int _w_offset, int[] iblock, int _iblock_offset, int[] isplit, int _isplit_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void sstedcK(String compz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + + protected native void sstegrK(String jobz, String range, int n, float[] d, int _d_offset, float[] e, int _e_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + + protected native void ssteinK(int n, float[] d, int _d_offset, float[] e, int _e_offset, int m, float[] w, int _w_offset, int[] iblock, int _iblock_offset, int[] isplit, int _isplit_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + + protected native void sstemrK(String jobz, String range, int n, float[] d, int _d_offset, float[] e, int _e_offset, float vl, float vu, int il, int iu, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, int nzc, int[] isuppz, int _isuppz_offset, org.netlib.util.booleanW tryrac, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + + protected native void ssteqrK(String compz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void ssterfK(int n, float[] d, int _d_offset, float[] e, int _e_offset, org.netlib.util.intW info); + + protected native void sstevK(String jobz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void sstevdK(String jobz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + + protected native void sstevrK(String jobz, String range, int n, float[] d, int _d_offset, float[] e, int _e_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + + protected native void sstevxK(String jobz, String range, int n, float[] d, int _d_offset, float[] e, int _e_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + + protected native void ssyconK(String uplo, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void ssyevK(String jobz, String uplo, int n, float[] a, int _a_offset, int lda, float[] w, int _w_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void ssyevdK(String jobz, String uplo, int n, float[] a, int _a_offset, int lda, float[] w, int _w_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + + protected native void ssyevrK(String jobz, String range, String uplo, int n, float[] a, int _a_offset, int lda, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + + protected native void ssyevxK(String jobz, String range, String uplo, int n, float[] a, int _a_offset, int lda, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + + protected native void ssygs2K(int itype, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void ssygstK(int itype, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void ssygvK(int itype, String jobz, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] w, int _w_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void ssygvdK(int itype, String jobz, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] w, int _w_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + + protected native void ssygvxK(int itype, String jobz, String range, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + + protected native void ssyrfsK(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void ssysvK(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void ssysvxK(String fact, String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void ssytd2K(String uplo, int n, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tau, int _tau_offset, org.netlib.util.intW info); + + protected native void ssytf2K(String uplo, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + + protected native void ssytrdK(String uplo, int n, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void ssytrfK(String uplo, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void ssytriK(String uplo, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void ssytrsK(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void stbconK(String norm, String uplo, String diag, int n, int kd, float[] ab, int _ab_offset, int ldab, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void stbrfsK(String uplo, String trans, String diag, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void stbtrsK(String uplo, String trans, String diag, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void stgevcK(String side, String howmny, boolean[] select, int _select_offset, int n, float[] s, int _s_offset, int lds, float[] p, int _p_offset, int ldp, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void stgex2K(boolean wantq, boolean wantz, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, int j1, int n1, int n2, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void stgexcK(boolean wantq, boolean wantz, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, org.netlib.util.intW ifst, org.netlib.util.intW ilst, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native void stgsenK(int ijob, boolean wantq, boolean wantz, boolean[] select, int _select_offset, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, org.netlib.util.intW m, org.netlib.util.floatW pl, org.netlib.util.floatW pr, float[] dif, int _dif_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + + protected native void stgsjaK(String jobu, String jobv, String jobq, int m, int p, int n, int k, int l, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float tola, float tolb, float[] alpha, int _alpha_offset, float[] beta, int _beta_offset, float[] u, int _u_offset, int ldu, float[] v, int _v_offset, int ldv, float[] q, int _q_offset, int ldq, float[] work, int _work_offset, org.netlib.util.intW ncycle, org.netlib.util.intW info); + + protected native void stgsnaK(String job, String howmny, boolean[] select, int _select_offset, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] s, int _s_offset, float[] dif, int _dif_offset, int mm, org.netlib.util.intW m, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void stgsy2K(String trans, int ijob, int m, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] c, int _c_offset, int Ldc, float[] d, int _d_offset, int ldd, float[] e, int _e_offset, int lde, float[] f, int _f_offset, int ldf, org.netlib.util.floatW scale, org.netlib.util.floatW rdsum, org.netlib.util.floatW rdscal, int[] iwork, int _iwork_offset, org.netlib.util.intW pq, org.netlib.util.intW info); + + protected native void stgsylK(String trans, int ijob, int m, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] c, int _c_offset, int Ldc, float[] d, int _d_offset, int ldd, float[] e, int _e_offset, int lde, float[] f, int _f_offset, int ldf, org.netlib.util.floatW scale, org.netlib.util.floatW dif, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void stpconK(String norm, String uplo, String diag, int n, float[] ap, int _ap_offset, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void stprfsK(String uplo, String trans, String diag, int n, int nrhs, float[] ap, int _ap_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void stptriK(String uplo, String diag, int n, float[] ap, int _ap_offset, org.netlib.util.intW info); + + protected native void stptrsK(String uplo, String trans, String diag, int n, int nrhs, float[] ap, int _ap_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void strconK(String norm, String uplo, String diag, int n, float[] a, int _a_offset, int lda, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void strevcK(String side, String howmny, boolean[] select, int _select_offset, int n, float[] t, int _t_offset, int ldt, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void strexcK(String compq, int n, float[] t, int _t_offset, int ldt, float[] q, int _q_offset, int ldq, org.netlib.util.intW ifst, org.netlib.util.intW ilst, float[] work, int _work_offset, org.netlib.util.intW info); + + protected native void strrfsK(String uplo, String trans, String diag, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void strsenK(String job, String compq, boolean[] select, int _select_offset, int n, float[] t, int _t_offset, int ldt, float[] q, int _q_offset, int ldq, float[] wr, int _wr_offset, float[] wi, int _wi_offset, org.netlib.util.intW m, org.netlib.util.floatW s, org.netlib.util.floatW sep, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + + protected native void strsnaK(String job, String howmny, boolean[] select, int _select_offset, int n, float[] t, int _t_offset, int ldt, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] s, int _s_offset, float[] sep, int _sep_offset, int mm, org.netlib.util.intW m, float[] work, int _work_offset, int ldwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + + protected native void strsylK(String trana, String tranb, int isgn, int m, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] c, int _c_offset, int Ldc, org.netlib.util.floatW scale, org.netlib.util.intW info); + + protected native void strti2K(String uplo, String diag, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + + protected native void strtriK(String uplo, String diag, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + + protected native void strtrsK(String uplo, String trans, String diag, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + + protected native void stzrqfK(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, org.netlib.util.intW info); + + protected native void stzrzfK(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + + protected native double dlamchK(String cmach); + + protected native void dlamc1K(org.netlib.util.intW beta, org.netlib.util.intW t, org.netlib.util.booleanW rnd, org.netlib.util.booleanW ieee1); + + protected native void dlamc2K(org.netlib.util.intW beta, org.netlib.util.intW t, org.netlib.util.booleanW rnd, org.netlib.util.doubleW eps, org.netlib.util.intW emin, org.netlib.util.doubleW rmin, org.netlib.util.intW emax, org.netlib.util.doubleW rmax); + + protected native double dlamc3K(double a, double b); + + protected native void dlamc4K(org.netlib.util.intW emin, double start, int base); + + protected native void dlamc5K(int beta, int p, int emin, boolean ieee, org.netlib.util.intW emax, org.netlib.util.doubleW rmax); + + protected native double dsecndK(); + + protected native boolean lsameK(String ca, String cb); + + protected native float secondK(); + + protected native float slamchK(String cmach); + + protected native void slamc1K(org.netlib.util.intW beta, org.netlib.util.intW t, org.netlib.util.booleanW rnd, org.netlib.util.booleanW ieee1); + + protected native void slamc2K(org.netlib.util.intW beta, org.netlib.util.intW t, org.netlib.util.booleanW rnd, org.netlib.util.floatW eps, org.netlib.util.intW emin, org.netlib.util.floatW rmin, org.netlib.util.intW emax, org.netlib.util.floatW rmax); + + protected native float slamc3K(float a, float b); + + protected native void slamc4K(org.netlib.util.intW emin, float start, int base); + + protected native void slamc5K(int beta, int p, int emin, boolean ieee, org.netlib.util.intW emax, org.netlib.util.floatW rmax); +} diff --git a/lapack/src/main/java/dev/ludovic/netlib/lapack/NetlibF2jLAPACK.java b/lapack/src/main/java/dev/ludovic/netlib/lapack/NetlibF2jLAPACK.java deleted file mode 100644 index 16441111..00000000 --- a/lapack/src/main/java/dev/ludovic/netlib/lapack/NetlibF2jLAPACK.java +++ /dev/null @@ -1,45 +0,0 @@ -/* - * Copyright 2020, 2021, Ludovic Henry - * - * Permission is hereby granted, free of charge, to any person obtaining a copy - * of this software and associated documentation files (the "Software"), to deal - * in the Software without restriction, including without limitation the rights - * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell - * copies of the Software, and to permit persons to whom the Software is - * furnished to do so, subject to the following conditions: - * - * The above copyright notice and this permission notice shall be included in - * all copies or substantial portions of the Software. - * - * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR - * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, - * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE - * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER - * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, - * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE - * SOFTWARE. - * - * Please contact git@ludovic.dev or visit ludovic.dev if you need additional - * information or have any questions. - */ - -package dev.ludovic.netlib.lapack; - -import dev.ludovic.netlib.LAPACK; - -public final class NetlibF2jLAPACK extends NetlibWrapper implements dev.ludovic.netlib.JavaLAPACK { - - private static final NetlibF2jLAPACK instance; - - static { - instance = new NetlibF2jLAPACK(new com.github.fommil.netlib.F2jLAPACK()); - } - - protected NetlibF2jLAPACK(com.github.fommil.netlib.LAPACK _lapack) { - super(_lapack); - } - - public static dev.ludovic.netlib.JavaLAPACK getInstance() { - return instance; - } -} diff --git a/lapack/src/main/java/dev/ludovic/netlib/lapack/NetlibNativeLAPACK.java b/lapack/src/main/java/dev/ludovic/netlib/lapack/NetlibNativeLAPACK.java deleted file mode 100644 index 47876304..00000000 --- a/lapack/src/main/java/dev/ludovic/netlib/lapack/NetlibNativeLAPACK.java +++ /dev/null @@ -1,49 +0,0 @@ -/* - * Copyright 2020, 2021, Ludovic Henry - * - * Permission is hereby granted, free of charge, to any person obtaining a copy - * of this software and associated documentation files (the "Software"), to deal - * in the Software without restriction, including without limitation the rights - * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell - * copies of the Software, and to permit persons to whom the Software is - * furnished to do so, subject to the following conditions: - * - * The above copyright notice and this permission notice shall be included in - * all copies or substantial portions of the Software. - * - * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR - * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, - * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE - * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER - * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, - * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE - * SOFTWARE. - * - * Please contact git@ludovic.dev or visit ludovic.dev if you need additional - * information or have any questions. - */ - -package dev.ludovic.netlib.lapack; - -import dev.ludovic.netlib.LAPACK; - -public final class NetlibNativeLAPACK extends NetlibWrapper implements dev.ludovic.netlib.NativeLAPACK { - - private static final NetlibNativeLAPACK instance; - - static { - com.github.fommil.netlib.LAPACK lapack = com.github.fommil.netlib.LAPACK.getInstance(); - if (lapack instanceof com.github.fommil.netlib.F2jLAPACK) { - throw new RuntimeException("Unable to load native implementation"); - } - instance = new NetlibNativeLAPACK(lapack); - } - - protected NetlibNativeLAPACK(com.github.fommil.netlib.LAPACK _lapack) { - super(_lapack); - } - - public static dev.ludovic.netlib.NativeLAPACK getInstance() { - return instance; - } -} diff --git a/lapack/src/main/native/Makefile b/lapack/src/main/native/Makefile new file mode 100644 index 00000000..dded1334 --- /dev/null +++ b/lapack/src/main/native/Makefile @@ -0,0 +1,33 @@ +# Copyright 2020, 2021, Ludovic Henry +# +# Permission is hereby granted, free of charge, to any person obtaining a copy +# of this software and associated documentation files (the "Software"), to deal +# in the Software without restriction, including without limitation the rights +# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell +# copies of the Software, and to permit persons to whom the Software is +# furnished to do so, subject to the following conditions: +# +# The above copyright notice and this permission notice shall be included in +# all copies or substantial portions of the Software. +# +# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR +# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, +# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE +# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER +# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, +# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE +# SOFTWARE. +# +# Please contact git@ludovic.dev or visit ludovic.dev if you need additional +# information or have any questions. + +$(OBJDIR) $(dir $(OUTPUT)): + mkdir -p $@ + +$(INPUTS:%.c=$(OBJDIR)/%.o): $(OBJDIR)/%.o: %.c | $(OBJDIR) + $(CC) $(CCFLAGS) -o $@ $< + +$(OUTPUT): $(INPUTS:%.c=$(OBJDIR)/%.o) | $(dir $(OUTPUT)) + $(LD) $(LDFLAGS) -o $@ $^ + +all: $(OUTPUT) diff --git a/lapack/src/main/native/jni.c b/lapack/src/main/native/jni.c new file mode 100644 index 00000000..efc86650 --- /dev/null +++ b/lapack/src/main/native/jni.c @@ -0,0 +1,4535 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of intge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +#include +#include +#include + +#include "dev_ludovic_netlib_lapack_JNILAPACK.h" + +#define UNUSED __attribute__((unused)) + +static jthrowable fail(JNIEnv *env, const char *klass_name, const char *msg) { + jclass klass = (*env)->FindClass(env, klass_name); + jmethodID constructor = (*env)->GetMethodID(env, klass, "", "(Ljava/lang/String;)V"); + return (*env)->NewObject(env, klass, constructor, (*env)->NewStringUTF(env, msg)); +} + +static jthrowable failOnCopy(JNIEnv *env) { + return fail(env, "java/lang/OutOfMemoryError", "Failed to copy from heap to native memory"); +} + +enum { + CBLAS_ROW_MAJOR = 101, + CBLAS_COL_MAJOR = 102, + + CBLAS_NO_TRANS = 111, + CBLAS_TRANS = 112, + CBLAS_CONJ_TRANS = 113, + + CBLAS_UPPER = 121, + CBLAS_LOWER = 122, + + CBLAS_NON_UNIT = 131, + CBLAS_UNIT = 132, + + CBLAS_LEFT = 141, + CBLAS_RIGHT = 142, +}; + +static int translate_trans(JNIEnv *env, jstring str, jthrowable *exc) { + int res = 0; + const char *utf = NULL; + *exc = NULL; + if ((*env)->GetStringUTFLength(env, str) != 1) goto failOnUnknownOp; + if (!(utf = (*env)->GetStringUTFChars(env, str, NULL))) goto failOnCopy; + switch (utf[0]) { + case 'N': res = CBLAS_NO_TRANS; break; + case 'T': res = CBLAS_TRANS; break; + case 'C': res = CBLAS_CONJ_TRANS; break; + default: goto failOnUnknownOp; + } +done: + if (utf) (*env)->ReleaseStringUTFChars(env, str, utf); + return res; +failOnUnknownOp: + *exc = fail(env, "java/lang/IllegalArgumentException", "Unknown transpose"); + goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static int translate_uplo(JNIEnv *env, jstring str, jthrowable *exc) { + int res = 0; + const char *utf = NULL; + *exc = NULL; + if ((*env)->GetStringUTFLength(env, str) <= 0) goto failOnUnknownOp; + if (!(utf = (*env)->GetStringUTFChars(env, str, NULL))) goto failOnCopy; + switch (utf[0]) { + case 'U': res = CBLAS_UPPER; break; + case 'L': res = CBLAS_LOWER; break; + default: goto failOnUnknownOp; + } +done: + if (utf) (*env)->ReleaseStringUTFChars(env, str, utf); + return res; +failOnUnknownOp: + *exc = fail(env, "java/lang/IllegalArgumentException", "Unknown uplo"); + goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static int translate_diag(JNIEnv *env, jstring str, jthrowable *exc) { + int res = 0; + const char *utf = NULL; + *exc = NULL; + if ((*env)->GetStringUTFLength(env, str) <= 0) goto failOnUnknownOp; + if (!(utf = (*env)->GetStringUTFChars(env, str, NULL))) goto failOnCopy; + switch (utf[0]) { + case 'N': res = CBLAS_NON_UNIT; break; + case 'U': res = CBLAS_UNIT; break; + default: goto failOnUnknownOp; + } +done: + if (utf) (*env)->ReleaseStringUTFChars(env, str, utf); + return res; +failOnUnknownOp: + *exc = fail(env, "java/lang/IllegalArgumentException", "Unknown diag"); + goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +static int translate_side(JNIEnv *env, jstring str, jthrowable *exc) { + int res = 0; + const char *utf = NULL; + *exc = NULL; + if ((*env)->GetStringUTFLength(env, str) <= 0) goto failOnUnknownOp; + if (!(utf = (*env)->GetStringUTFChars(env, str, NULL))) goto failOnCopy; + switch (utf[0]) { + case 'L': res = CBLAS_LEFT; break; + case 'R': res = CBLAS_RIGHT; break; + default: goto failOnUnknownOp; + } +done: + if (utf) (*env)->ReleaseStringUTFChars(env, str, utf); + return res; +failOnUnknownOp: + *exc = fail(env, "java/lang/IllegalArgumentException", "Unknown side"); + goto done; +failOnCopy: + *exc = failOnCopy(env); + goto done; +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dbdsdcK(JNIEnv *, jobject, + jstring, jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jintArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dbdsqrK(JNIEnv *, jobject, + jstring, jint, jint, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ddisnaK(JNIEnv *, jobject, + jstring, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbbrdK(JNIEnv *, jobject, + jstring, jint, jint, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbconK(JNIEnv *, jobject, + jstring, jint, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdouble, jobject, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbequK(JNIEnv *, jobject, + jint, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jobject, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbrfsK(JNIEnv *, jobject, + jstring, jint, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbsvK(JNIEnv *, jobject, + jint, jint, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbsvxK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbtf2K(JNIEnv *, jobject, + jint, jint, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbtrfK(JNIEnv *, jobject, + jint, jint, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbtrsK(JNIEnv *, jobject, + jstring, jint, jint, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgebakK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgebalK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jint, jobject, jobject, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgebd2K(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgebrdK(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeconK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jint, jdouble, jobject, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeequK(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jobject, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeesK(JNIEnv *, jobject, + jstring, jstring, jobject, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jbooleanArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeesxK(JNIEnv *, jobject, + jstring, jstring, jobject, jstring, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject, jobject, jdoubleArray, jint, jint, jintArray, jint, jint, jbooleanArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeevK(JNIEnv *, jobject, + jstring, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeevxK(JNIEnv *, jobject, + jstring, jstring, jstring, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jobject, jdoubleArray, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgegsK(JNIEnv *, jobject, + jstring, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgegvK(JNIEnv *, jobject, + jstring, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgehd2K(JNIEnv *, jobject, + jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgehrdK(JNIEnv *, jobject, + jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelq2K(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelqfK(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelsK(JNIEnv *, jobject, + jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelsdK(JNIEnv *, jobject, + jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdouble, jobject, jdoubleArray, jint, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelssK(JNIEnv *, jobject, + jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdouble, jobject, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelsxK(JNIEnv *, jobject, + jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdouble, jobject, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelsyK(JNIEnv *, jobject, + jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdouble, jobject, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeql2K(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeqlfK(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeqp3K(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeqpfK(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeqr2K(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeqrfK(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgerfsK(JNIEnv *, jobject, + jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgerq2K(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgerqfK(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgesc2K(JNIEnv *, jobject, + jint, jdoubleArray, jint, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgesddK(JNIEnv *, jobject, + jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgesvK(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgesvdK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgesvxK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgetc2K(JNIEnv *, jobject, + jint, jdoubleArray, jint, jint, jintArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgetf2K(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgetrfK(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgetriK(JNIEnv *, jobject, + jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgetrsK(JNIEnv *, jobject, + jstring, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggbakK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggbalK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggesK(JNIEnv *, jobject, + jstring, jstring, jstring, jobject, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jbooleanArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggesxK(JNIEnv *, jobject, + jstring, jstring, jstring, jobject, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jintArray, jint, jint, jbooleanArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggevK(JNIEnv *, jobject, + jstring, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggevxK(JNIEnv *, jobject, + jstring, jstring, jstring, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jobject, jdoubleArray, jint, jdoubleArray, jint, jobject, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jintArray, jint, jbooleanArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggglmK(JNIEnv *, jobject, + jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgghrdK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgglseK(JNIEnv *, jobject, + jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggqrfK(JNIEnv *, jobject, + jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggrqfK(JNIEnv *, jobject, + jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggsvdK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jint, jobject, jobject, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggsvpK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdouble, jdouble, jobject, jobject, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgtconK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jdouble, jobject, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgtrfsK(JNIEnv *, jobject, + jstring, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgtsvK(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgtsvxK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgttrfK(JNIEnv *, jobject, + jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgttrsK(JNIEnv *, jobject, + jstring, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgtts2K(JNIEnv *, jobject, + jint, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jdoubleArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dhgeqzK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dhseinK(JNIEnv *, jobject, + jstring, jstring, jstring, jbooleanArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jint, jobject, jdoubleArray, jint, jintArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dhseqrK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_disnanK(JNIEnv *, jobject, + jdouble) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlabadK(JNIEnv *, jobject, + jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlabrdK(JNIEnv *, jobject, + jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlacn2K(JNIEnv *, jobject, + jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject, jobject, jintArray, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaconK(JNIEnv *, jobject, + jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlacpyK(JNIEnv *, jobject, + jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dladivK(JNIEnv *, jobject, + jdouble, jdouble, jdouble, jdouble, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlae2K(JNIEnv *, jobject, + jdouble, jdouble, jdouble, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaebzK(JNIEnv *, jobject, + jint, jint, jint, jint, jint, jint, jdouble, jdouble, jdouble, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject, jintArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed0K(JNIEnv *, jobject, + jint, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed1K(JNIEnv *, jobject, + jint, jdoubleArray, jint, jdoubleArray, jint, jint, jintArray, jint, jobject, jint, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed2K(JNIEnv *, jobject, + jobject, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jintArray, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed3K(JNIEnv *, jobject, + jint, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdouble, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed4K(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed5K(JNIEnv *, jobject, + jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed6K(JNIEnv *, jobject, + jint, jboolean, jdouble, jdoubleArray, jint, jdoubleArray, jint, jdouble, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed7K(JNIEnv *, jobject, + jint, jint, jint, jint, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jintArray, jint, jobject, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed8K(JNIEnv *, jobject, + jint, jobject, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jintArray, jint, jobject, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jintArray, jint, jobject, jintArray, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed9K(JNIEnv *, jobject, + jint, jint, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdouble, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaedaK(JNIEnv *, jobject, + jint, jint, jint, jint, jintArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaeinK(JNIEnv *, jobject, + jboolean, jboolean, jint, jdoubleArray, jint, jint, jdouble, jdouble, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdouble, jdouble, jdouble, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaev2K(JNIEnv *, jobject, + jdouble, jdouble, jdouble, jobject, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaexcK(JNIEnv *, jobject, + jboolean, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jint, jint, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlag2K(JNIEnv *, jobject, + jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdouble, jobject, jobject, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlag2sK(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlags2K(JNIEnv *, jobject, + jboolean, jdouble, jdouble, jdouble, jdouble, jdouble, jdouble, jobject, jobject, jobject, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlagtfK(JNIEnv *, jobject, + jint, jdoubleArray, jint, jdouble, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlagtmK(JNIEnv *, jobject, + jstring, jint, jint, jdouble, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdouble, jdoubleArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlagtsK(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jdoubleArray, jint, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlagv2K(JNIEnv *, jobject, + jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlahqrK(JNIEnv *, jobject, + jboolean, jboolean, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlahr2K(JNIEnv *, jobject, + jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlahrdK(JNIEnv *, jobject, + jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaic1K(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jdouble, jdoubleArray, jint, jdouble, jobject, jobject, jobject) { + +} + +jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaisnanK(JNIEnv *, jobject, + jdouble, jdouble) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaln2K(JNIEnv *, jobject, + jboolean, jint, jint, jdouble, jdouble, jdoubleArray, jint, jint, jdouble, jdouble, jdoubleArray, jint, jint, jdouble, jdouble, jdoubleArray, jint, jint, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlals0K(JNIEnv *, jobject, + jint, jint, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jint, jintArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdouble, jdouble, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlalsaK(JNIEnv *, jobject, + jint, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jintArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jint, jintArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlalsdK(JNIEnv *, jobject, + jstring, jint, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdouble, jobject, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamrgK(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jint, jint, jintArray, jint) { + +} + +jint Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanegK(JNIEnv *, jobject, + jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jint) { + +} + +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlangbK(JNIEnv *, jobject, + jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint) { + +} + +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlangeK(JNIEnv *, jobject, + jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint) { + +} + +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlangtK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint) { + +} + +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanhsK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint) { + +} + +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlansbK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint) { + +} + +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanspK(JNIEnv *, jobject, + jstring, jstring, jint, jdoubleArray, jint, jdoubleArray, jint) { + +} + +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanstK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jdoubleArray, jint) { + +} + +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlansyK(JNIEnv *, jobject, + jstring, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint) { + +} + +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlantbK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint) { + +} + +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlantpK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jdoubleArray, jint, jdoubleArray, jint) { + +} + +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlantrK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanv2K(JNIEnv *, jobject, + jobject, jobject, jobject, jobject, jobject, jobject, jobject, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlapllK(JNIEnv *, jobject, + jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlapmtK(JNIEnv *, jobject, + jboolean, jint, jint, jdoubleArray, jint, jint, jintArray, jint) { + +} + +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlapy2K(JNIEnv *, jobject, + jdouble, jdouble) { + +} + +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlapy3K(JNIEnv *, jobject, + jdouble, jdouble, jdouble) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqgbK(JNIEnv *, jobject, + jint, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jdouble, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqgeK(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jdouble, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqp2K(JNIEnv *, jobject, + jint, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqpsK(JNIEnv *, jobject, + jint, jint, jint, jint, jobject, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr0K(JNIEnv *, jobject, + jboolean, jboolean, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr1K(JNIEnv *, jobject, + jint, jdoubleArray, jint, jint, jdouble, jdouble, jdouble, jdouble, jdoubleArray, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr2K(JNIEnv *, jobject, + jboolean, jboolean, jint, jint, jint, jint, jdoubleArray, jint, jint, jint, jint, jdoubleArray, jint, jint, jobject, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jint, jdoubleArray, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr3K(JNIEnv *, jobject, + jboolean, jboolean, jint, jint, jint, jint, jdoubleArray, jint, jint, jint, jint, jdoubleArray, jint, jint, jobject, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jint, jdoubleArray, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr4K(JNIEnv *, jobject, + jboolean, jboolean, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr5K(JNIEnv *, jobject, + jboolean, jboolean, jint, jint, jint, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jint, jdoubleArray, jint, jint, jint, jdoubleArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqsbK(JNIEnv *, jobject, + jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdouble, jdouble, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqspK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqsyK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdouble, jdouble, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqtrK(JNIEnv *, jobject, + jboolean, jboolean, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdouble, jobject, jdoubleArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlar1vK(JNIEnv *, jobject, + jint, jint, jint, jdouble, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jdoubleArray, jint, jboolean, jobject, jobject, jobject, jobject, jintArray, jint, jobject, jobject, jobject, jdoubleArray, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlar2vK(JNIEnv *, jobject, + jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarfK(JNIEnv *, jobject, + jstring, jint, jint, jdoubleArray, jint, jint, jdouble, jdoubleArray, jint, jint, jdoubleArray, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarfbK(JNIEnv *, jobject, + jstring, jstring, jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarfgK(JNIEnv *, jobject, + jint, jobject, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarftK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarfxK(JNIEnv *, jobject, + jstring, jint, jint, jdoubleArray, jint, jdouble, jdoubleArray, jint, jint, jdoubleArray, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlargvK(JNIEnv *, jobject, + jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarnvK(JNIEnv *, jobject, + jint, jintArray, jint, jint, jdoubleArray, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarraK(JNIEnv *, jobject, + jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jobject, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrbK(JNIEnv *, jobject, + jint, jdoubleArray, jint, jdoubleArray, jint, jint, jint, jdouble, jdouble, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jdouble, jdouble, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrcK(JNIEnv *, jobject, + jstring, jint, jdouble, jdouble, jdoubleArray, jint, jdoubleArray, jint, jdouble, jobject, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrdK(JNIEnv *, jobject, + jstring, jstring, jint, jdouble, jdouble, jint, jint, jdoubleArray, jint, jdouble, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jint, jintArray, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jobject, jobject, jintArray, jint, jintArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarreK(JNIEnv *, jobject, + jstring, jint, jobject, jobject, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jdouble, jobject, jintArray, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jdoubleArray, jint, jobject, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrfK(JNIEnv *, jobject, + jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jdouble, jdouble, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrjK(JNIEnv *, jobject, + jint, jdoubleArray, jint, jdoubleArray, jint, jint, jint, jdouble, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jdouble, jdouble, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrkK(JNIEnv *, jobject, + jint, jint, jdouble, jdouble, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrrK(JNIEnv *, jobject, + jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrvK(JNIEnv *, jobject, + jint, jdouble, jdouble, jdoubleArray, jint, jdoubleArray, jint, jdouble, jintArray, jint, jint, jint, jint, jdouble, jobject, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlartgK(JNIEnv *, jobject, + jdouble, jdouble, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlartvK(JNIEnv *, jobject, + jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaruvK(JNIEnv *, jobject, + jintArray, jint, jint, jdoubleArray, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarzK(JNIEnv *, jobject, + jstring, jint, jint, jint, jdoubleArray, jint, jint, jdouble, jdoubleArray, jint, jint, jdoubleArray, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarzbK(JNIEnv *, jobject, + jstring, jstring, jstring, jstring, jint, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarztK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlas2K(JNIEnv *, jobject, + jdouble, jdouble, jdouble, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasclK(JNIEnv *, jobject, + jstring, jint, jint, jdouble, jdouble, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd0K(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jint, jintArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd1K(JNIEnv *, jobject, + jint, jint, jint, jdoubleArray, jint, jobject, jobject, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jintArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd2K(JNIEnv *, jobject, + jint, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd3K(JNIEnv *, jobject, + jint, jint, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jintArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd4K(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jobject, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd5K(JNIEnv *, jobject, + jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jobject, jdoubleArray, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd6K(JNIEnv *, jobject, + jint, jint, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject, jobject, jintArray, jint, jintArray, jint, jobject, jintArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject, jobject, jobject, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd7K(JNIEnv *, jobject, + jint, jint, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jdoubleArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jobject, jintArray, jint, jint, jdoubleArray, jint, jint, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd8K(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasdaK(JNIEnv *, jobject, + jint, jint, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jintArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jint, jintArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasdqK(JNIEnv *, jobject, + jstring, jint, jint, jint, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasdtK(JNIEnv *, jobject, + jint, jobject, jobject, jintArray, jint, jintArray, jint, jintArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasetK(JNIEnv *, jobject, + jstring, jint, jint, jdouble, jdouble, jdoubleArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq1K(JNIEnv *, jobject, + jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq2K(JNIEnv *, jobject, + jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq3K(JNIEnv *, jobject, + jint, jobject, jdoubleArray, jint, jint, jobject, jobject, jobject, jobject, jobject, jobject, jobject, jboolean) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq4K(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jint, jint, jdouble, jdouble, jdouble, jdouble, jdouble, jdouble, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq5K(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jint, jdouble, jobject, jobject, jobject, jobject, jobject, jobject, jboolean) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq6K(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jint, jobject, jobject, jobject, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasrK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasrtK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlassqK(JNIEnv *, jobject, + jint, jdoubleArray, jint, jint, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasv2K(JNIEnv *, jobject, + jdouble, jdouble, jdouble, jobject, jobject, jobject, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaswpK(JNIEnv *, jobject, + jint, jdoubleArray, jint, jint, jint, jint, jintArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasy2K(JNIEnv *, jobject, + jboolean, jboolean, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jint, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasyfK(JNIEnv *, jobject, + jstring, jint, jint, jobject, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatbsK(JNIEnv *, jobject, + jstring, jstring, jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatdfK(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject, jobject, jintArray, jint, jintArray, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatpsK(JNIEnv *, jobject, + jstring, jstring, jstring, jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jobject, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatrdK(JNIEnv *, jobject, + jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatrsK(JNIEnv *, jobject, + jstring, jstring, jstring, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatrzK(JNIEnv *, jobject, + jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatzmK(JNIEnv *, jobject, + jstring, jint, jint, jdoubleArray, jint, jint, jdouble, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlauu2K(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlauumK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlazq3K(JNIEnv *, jobject, + jint, jobject, jdoubleArray, jint, jint, jobject, jobject, jobject, jobject, jobject, jobject, jobject, jboolean, jobject, jobject, jobject, jobject, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlazq4K(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jint, jint, jdouble, jdouble, jdouble, jdouble, jdouble, jdouble, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dopgtrK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dopmtrK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorg2lK(JNIEnv *, jobject, + jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorg2rK(JNIEnv *, jobject, + jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgbrK(JNIEnv *, jobject, + jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorghrK(JNIEnv *, jobject, + jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgl2K(JNIEnv *, jobject, + jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorglqK(JNIEnv *, jobject, + jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgqlK(JNIEnv *, jobject, + jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgqrK(JNIEnv *, jobject, + jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgr2K(JNIEnv *, jobject, + jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgrqK(JNIEnv *, jobject, + jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgtrK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorm2lK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorm2rK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormbrK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormhrK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorml2K(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormlqK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormqlK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormqrK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormr2K(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormr3K(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormrqK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormrzK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormtrK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbconK(JNIEnv *, jobject, + jstring, jint, jint, jdoubleArray, jint, jint, jdouble, jobject, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbequK(JNIEnv *, jobject, + jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbrfsK(JNIEnv *, jobject, + jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbstfK(JNIEnv *, jobject, + jstring, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbsvK(JNIEnv *, jobject, + jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbsvxK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbtf2K(JNIEnv *, jobject, + jstring, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbtrfK(JNIEnv *, jobject, + jstring, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbtrsK(JNIEnv *, jobject, + jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpoconK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jint, jdouble, jobject, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpoequK(JNIEnv *, jobject, + jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dporfsK(JNIEnv *, jobject, + jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dposvK(JNIEnv *, jobject, + jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dposvxK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpotf2K(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpotrfK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpotriK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpotrsK(JNIEnv *, jobject, + jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dppconK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jdouble, jobject, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dppequK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpprfsK(JNIEnv *, jobject, + jstring, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dppsvK(JNIEnv *, jobject, + jstring, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dppsvxK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpptrfK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpptriK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpptrsK(JNIEnv *, jobject, + jstring, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dptconK(JNIEnv *, jobject, + jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jobject, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpteqrK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dptrfsK(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dptsvK(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dptsvxK(JNIEnv *, jobject, + jstring, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpttrfK(JNIEnv *, jobject, + jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpttrsK(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dptts2K(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_drsclK(JNIEnv *, jobject, + jint, jdouble, jdoubleArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbevK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbevdK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbevxK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdouble, jdouble, jint, jint, jdouble, jobject, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbgstK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbgvK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbgvdK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbgvxK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdouble, jdouble, jint, jint, jdouble, jobject, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbtrdK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsgesvK(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jfloatArray, jint, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspconK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jintArray, jint, jdouble, jobject, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspevK(JNIEnv *, jobject, + jstring, jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspevdK(JNIEnv *, jobject, + jstring, jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspevxK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jdoubleArray, jint, jdouble, jdouble, jint, jint, jdouble, jobject, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspgstK(JNIEnv *, jobject, + jint, jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspgvK(JNIEnv *, jobject, + jint, jstring, jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspgvdK(JNIEnv *, jobject, + jint, jstring, jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspgvxK(JNIEnv *, jobject, + jint, jstring, jstring, jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jint, jint, jdouble, jobject, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsprfsK(JNIEnv *, jobject, + jstring, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspsvK(JNIEnv *, jobject, + jstring, jint, jint, jdoubleArray, jint, jintArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspsvxK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsptrdK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsptrfK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsptriK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jintArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsptrsK(JNIEnv *, jobject, + jstring, jint, jint, jdoubleArray, jint, jintArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstebzK(JNIEnv *, jobject, + jstring, jstring, jint, jdouble, jdouble, jint, jint, jdouble, jdoubleArray, jint, jdoubleArray, jint, jobject, jobject, jdoubleArray, jint, jintArray, jint, jintArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstedcK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstegrK(JNIEnv *, jobject, + jstring, jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jint, jint, jdouble, jobject, jdoubleArray, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jintArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsteinK(JNIEnv *, jobject, + jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstemrK(JNIEnv *, jobject, + jstring, jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jint, jint, jintArray, jint, jobject, jdoubleArray, jint, jint, jintArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsteqrK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsterfK(JNIEnv *, jobject, + jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstevK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstevdK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstevrK(JNIEnv *, jobject, + jstring, jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jint, jint, jdouble, jobject, jdoubleArray, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jintArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstevxK(JNIEnv *, jobject, + jstring, jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jint, jint, jdouble, jobject, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyconK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jint, jintArray, jint, jdouble, jobject, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyevK(JNIEnv *, jobject, + jstring, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyevdK(JNIEnv *, jobject, + jstring, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jintArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyevrK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jdoubleArray, jint, jint, jdouble, jdouble, jint, jint, jdouble, jobject, jdoubleArray, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jintArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyevxK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jdoubleArray, jint, jint, jdouble, jdouble, jint, jint, jdouble, jobject, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsygs2K(JNIEnv *, jobject, + jint, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsygstK(JNIEnv *, jobject, + jint, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsygvK(JNIEnv *, jobject, + jint, jstring, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsygvdK(JNIEnv *, jobject, + jint, jstring, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jintArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsygvxK(JNIEnv *, jobject, + jint, jstring, jstring, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdouble, jdouble, jint, jint, jdouble, jobject, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyrfsK(JNIEnv *, jobject, + jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsysvK(JNIEnv *, jobject, + jstring, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsysvxK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytd2K(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytf2K(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytrdK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytrfK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytriK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytrsK(JNIEnv *, jobject, + jstring, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtbconK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtbrfsK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtbtrsK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgevcK(JNIEnv *, jobject, + jstring, jstring, jbooleanArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jint, jobject, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgex2K(JNIEnv *, jobject, + jboolean, jboolean, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jint, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgexcK(JNIEnv *, jobject, + jboolean, jboolean, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jobject, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgsenK(JNIEnv *, jobject, + jint, jboolean, jboolean, jbooleanArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jobject, jobject, jdoubleArray, jint, jdoubleArray, jint, jint, jintArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgsjaK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdouble, jdouble, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgsnaK(JNIEnv *, jobject, + jstring, jstring, jbooleanArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgsy2K(JNIEnv *, jobject, + jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jobject, jobject, jintArray, jint, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgsylK(JNIEnv *, jobject, + jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jobject, jdoubleArray, jint, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtpconK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jdoubleArray, jint, jobject, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtprfsK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtptriK(JNIEnv *, jobject, + jstring, jstring, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtptrsK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrconK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrevcK(JNIEnv *, jobject, + jstring, jstring, jbooleanArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jint, jobject, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrexcK(JNIEnv *, jobject, + jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jobject, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrrfsK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrsenK(JNIEnv *, jobject, + jstring, jstring, jbooleanArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jobject, jobject, jobject, jdoubleArray, jint, jint, jintArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrsnaK(JNIEnv *, jobject, + jstring, jstring, jbooleanArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrsylK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrti2K(JNIEnv *, jobject, + jstring, jstring, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrtriK(JNIEnv *, jobject, + jstring, jstring, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrtrsK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtzrqfK(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtzrzfK(JNIEnv *, jobject, + jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { + +} + +jint Java_dev_ludovic_netlib_lapack_JNILAPACK_ieeeckK(JNIEnv *, jobject, + jint, jfloat, jfloat) { + +} + +jint Java_dev_ludovic_netlib_lapack_JNILAPACK_ilaenvK(JNIEnv *, jobject, + jint, jstring, jstring, jint, jint, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ilaverK(JNIEnv *, jobject, + jobject, jobject, jobject) { + +} + +jint Java_dev_ludovic_netlib_lapack_JNILAPACK_iparmqK(JNIEnv *, jobject, + jint, jstring, jstring, jint, jint, jint, jint) { + +} + +jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_lsamenK(JNIEnv *, jobject, + jint, jstring, jstring) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sbdsdcK(JNIEnv *, jobject, + jstring, jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jintArray, jint, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sbdsqrK(JNIEnv *, jobject, + jstring, jint, jint, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sdisnaK(JNIEnv *, jobject, + jstring, jint, jint, jfloatArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbbrdK(JNIEnv *, jobject, + jstring, jint, jint, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbconK(JNIEnv *, jobject, + jstring, jint, jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloat, jobject, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbequK(JNIEnv *, jobject, + jint, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jobject, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbrfsK(JNIEnv *, jobject, + jstring, jint, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbsvK(JNIEnv *, jobject, + jint, jint, jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbsvxK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbtf2K(JNIEnv *, jobject, + jint, jint, jint, jint, jfloatArray, jint, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbtrfK(JNIEnv *, jobject, + jint, jint, jint, jint, jfloatArray, jint, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbtrsK(JNIEnv *, jobject, + jstring, jint, jint, jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgebakK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgebalK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jint, jobject, jobject, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgebd2K(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgebrdK(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeconK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jint, jfloat, jobject, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeequK(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jobject, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeesK(JNIEnv *, jobject, + jstring, jstring, jobject, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jbooleanArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeesxK(JNIEnv *, jobject, + jstring, jstring, jobject, jstring, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject, jobject, jfloatArray, jint, jint, jintArray, jint, jint, jbooleanArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeevK(JNIEnv *, jobject, + jstring, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeevxK(JNIEnv *, jobject, + jstring, jstring, jstring, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jobject, jfloatArray, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgegsK(JNIEnv *, jobject, + jstring, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgegvK(JNIEnv *, jobject, + jstring, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgehd2K(JNIEnv *, jobject, + jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgehrdK(JNIEnv *, jobject, + jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelq2K(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelqfK(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelsK(JNIEnv *, jobject, + jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelsdK(JNIEnv *, jobject, + jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloat, jobject, jfloatArray, jint, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelssK(JNIEnv *, jobject, + jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloat, jobject, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelsxK(JNIEnv *, jobject, + jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloat, jobject, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelsyK(JNIEnv *, jobject, + jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloat, jobject, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeql2K(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeqlfK(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeqp3K(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeqpfK(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeqr2K(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeqrfK(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgerfsK(JNIEnv *, jobject, + jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgerq2K(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgerqfK(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgesc2K(JNIEnv *, jobject, + jint, jfloatArray, jint, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgesddK(JNIEnv *, jobject, + jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgesvK(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgesvdK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgesvxK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgetc2K(JNIEnv *, jobject, + jint, jfloatArray, jint, jint, jintArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgetf2K(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgetrfK(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgetriK(JNIEnv *, jobject, + jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgetrsK(JNIEnv *, jobject, + jstring, jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggbakK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggbalK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggesK(JNIEnv *, jobject, + jstring, jstring, jstring, jobject, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jbooleanArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggesxK(JNIEnv *, jobject, + jstring, jstring, jstring, jobject, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jintArray, jint, jint, jbooleanArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggevK(JNIEnv *, jobject, + jstring, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggevxK(JNIEnv *, jobject, + jstring, jstring, jstring, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jobject, jfloatArray, jint, jfloatArray, jint, jobject, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jintArray, jint, jbooleanArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggglmK(JNIEnv *, jobject, + jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgghrdK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgglseK(JNIEnv *, jobject, + jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggqrfK(JNIEnv *, jobject, + jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggrqfK(JNIEnv *, jobject, + jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggsvdK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jint, jobject, jobject, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggsvpK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloat, jfloat, jobject, jobject, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgtconK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jfloat, jobject, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgtrfsK(JNIEnv *, jobject, + jstring, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgtsvK(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgtsvxK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgttrfK(JNIEnv *, jobject, + jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgttrsK(JNIEnv *, jobject, + jstring, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgtts2K(JNIEnv *, jobject, + jint, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jfloatArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_shgeqzK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_shseinK(JNIEnv *, jobject, + jstring, jstring, jstring, jbooleanArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jint, jobject, jfloatArray, jint, jintArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_shseqrK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_sisnanK(JNIEnv *, jobject, + jfloat) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slabadK(JNIEnv *, jobject, + jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slabrdK(JNIEnv *, jobject, + jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slacn2K(JNIEnv *, jobject, + jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject, jobject, jintArray, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaconK(JNIEnv *, jobject, + jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slacpyK(JNIEnv *, jobject, + jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sladivK(JNIEnv *, jobject, + jfloat, jfloat, jfloat, jfloat, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slae2K(JNIEnv *, jobject, + jfloat, jfloat, jfloat, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaebzK(JNIEnv *, jobject, + jint, jint, jint, jint, jint, jint, jfloat, jfloat, jfloat, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jfloatArray, jint, jfloatArray, jint, jobject, jintArray, jint, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed0K(JNIEnv *, jobject, + jint, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed1K(JNIEnv *, jobject, + jint, jfloatArray, jint, jfloatArray, jint, jint, jintArray, jint, jobject, jint, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed2K(JNIEnv *, jobject, + jobject, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jintArray, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed3K(JNIEnv *, jobject, + jint, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloat, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jfloatArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed4K(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed5K(JNIEnv *, jobject, + jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed6K(JNIEnv *, jobject, + jint, jboolean, jfloat, jfloatArray, jint, jfloatArray, jint, jfloat, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed7K(JNIEnv *, jobject, + jint, jint, jint, jint, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jintArray, jint, jobject, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed8K(JNIEnv *, jobject, + jint, jobject, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jintArray, jint, jobject, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jintArray, jint, jobject, jintArray, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed9K(JNIEnv *, jobject, + jint, jint, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloat, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaedaK(JNIEnv *, jobject, + jint, jint, jint, jint, jintArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jfloatArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaeinK(JNIEnv *, jobject, + jboolean, jboolean, jint, jfloatArray, jint, jint, jfloat, jfloat, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloat, jfloat, jfloat, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaev2K(JNIEnv *, jobject, + jfloat, jfloat, jfloat, jobject, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaexcK(JNIEnv *, jobject, + jboolean, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jint, jint, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slag2K(JNIEnv *, jobject, + jfloatArray, jint, jint, jfloatArray, jint, jint, jfloat, jobject, jobject, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slag2dK(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jint, jdoubleArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slags2K(JNIEnv *, jobject, + jboolean, jfloat, jfloat, jfloat, jfloat, jfloat, jfloat, jobject, jobject, jobject, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slagtfK(JNIEnv *, jobject, + jint, jfloatArray, jint, jfloat, jfloatArray, jint, jfloatArray, jint, jfloat, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slagtmK(JNIEnv *, jobject, + jstring, jint, jint, jfloat, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloat, jfloatArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slagtsK(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jfloatArray, jint, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slagv2K(JNIEnv *, jobject, + jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jobject, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slahqrK(JNIEnv *, jobject, + jboolean, jboolean, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slahr2K(JNIEnv *, jobject, + jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slahrdK(JNIEnv *, jobject, + jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaic1K(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jfloat, jfloatArray, jint, jfloat, jobject, jobject, jobject) { + +} + +jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_slaisnanK(JNIEnv *, jobject, + jfloat, jfloat) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaln2K(JNIEnv *, jobject, + jboolean, jint, jint, jfloat, jfloat, jfloatArray, jint, jint, jfloat, jfloat, jfloatArray, jint, jint, jfloat, jfloat, jfloatArray, jint, jint, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slals0K(JNIEnv *, jobject, + jint, jint, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jint, jintArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloat, jfloat, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slalsaK(JNIEnv *, jobject, + jint, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jintArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jint, jintArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slalsdK(JNIEnv *, jobject, + jstring, jint, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloat, jobject, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slamrgK(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jint, jint, jintArray, jint) { + +} + +jint Java_dev_ludovic_netlib_lapack_JNILAPACK_slanegK(JNIEnv *, jobject, + jint, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jint) { + +} + +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slangbK(JNIEnv *, jobject, + jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint) { + +} + +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slangeK(JNIEnv *, jobject, + jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint) { + +} + +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slangtK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint) { + +} + +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slanhsK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jint, jfloatArray, jint) { + +} + +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slansbK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint) { + +} + +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slanspK(JNIEnv *, jobject, + jstring, jstring, jint, jfloatArray, jint, jfloatArray, jint) { + +} + +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slanstK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jfloatArray, jint) { + +} + +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slansyK(JNIEnv *, jobject, + jstring, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint) { + +} + +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slantbK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint) { + +} + +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slantpK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jfloatArray, jint, jfloatArray, jint) { + +} + +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slantrK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slanv2K(JNIEnv *, jobject, + jobject, jobject, jobject, jobject, jobject, jobject, jobject, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slapllK(JNIEnv *, jobject, + jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slapmtK(JNIEnv *, jobject, + jboolean, jint, jint, jfloatArray, jint, jint, jintArray, jint) { + +} + +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slapy2K(JNIEnv *, jobject, + jfloat, jfloat) { + +} + +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slapy3K(JNIEnv *, jobject, + jfloat, jfloat, jfloat) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqgbK(JNIEnv *, jobject, + jint, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jfloat, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqgeK(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jfloat, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqp2K(JNIEnv *, jobject, + jint, jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqpsK(JNIEnv *, jobject, + jint, jint, jint, jint, jobject, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr0K(JNIEnv *, jobject, + jboolean, jboolean, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr1K(JNIEnv *, jobject, + jint, jfloatArray, jint, jint, jfloat, jfloat, jfloat, jfloat, jfloatArray, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr2K(JNIEnv *, jobject, + jboolean, jboolean, jint, jint, jint, jint, jfloatArray, jint, jint, jint, jint, jfloatArray, jint, jint, jobject, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jint, jfloatArray, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr3K(JNIEnv *, jobject, + jboolean, jboolean, jint, jint, jint, jint, jfloatArray, jint, jint, jint, jint, jfloatArray, jint, jint, jobject, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jint, jfloatArray, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr4K(JNIEnv *, jobject, + jboolean, jboolean, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr5K(JNIEnv *, jobject, + jboolean, jboolean, jint, jint, jint, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jint, jfloatArray, jint, jint, jint, jfloatArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqsbK(JNIEnv *, jobject, + jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloat, jfloat, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqspK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqsyK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloat, jfloat, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqtrK(JNIEnv *, jobject, + jboolean, jboolean, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloat, jobject, jfloatArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slar1vK(JNIEnv *, jobject, + jint, jint, jint, jfloat, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jfloatArray, jint, jboolean, jobject, jobject, jobject, jobject, jintArray, jint, jobject, jobject, jobject, jfloatArray, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slar2vK(JNIEnv *, jobject, + jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarfK(JNIEnv *, jobject, + jstring, jint, jint, jfloatArray, jint, jint, jfloat, jfloatArray, jint, jint, jfloatArray, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarfbK(JNIEnv *, jobject, + jstring, jstring, jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarfgK(JNIEnv *, jobject, + jint, jobject, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarftK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarfxK(JNIEnv *, jobject, + jstring, jint, jint, jfloatArray, jint, jfloat, jfloatArray, jint, jint, jfloatArray, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slargvK(JNIEnv *, jobject, + jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarnvK(JNIEnv *, jobject, + jint, jintArray, jint, jint, jfloatArray, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarraK(JNIEnv *, jobject, + jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jobject, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrbK(JNIEnv *, jobject, + jint, jfloatArray, jint, jfloatArray, jint, jint, jint, jfloat, jfloat, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jfloat, jfloat, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrcK(JNIEnv *, jobject, + jstring, jint, jfloat, jfloat, jfloatArray, jint, jfloatArray, jint, jfloat, jobject, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrdK(JNIEnv *, jobject, + jstring, jstring, jint, jfloat, jfloat, jint, jint, jfloatArray, jint, jfloat, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jint, jintArray, jint, jobject, jfloatArray, jint, jfloatArray, jint, jobject, jobject, jintArray, jint, jintArray, jint, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarreK(JNIEnv *, jobject, + jstring, jint, jobject, jobject, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jfloat, jobject, jintArray, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jfloatArray, jint, jobject, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrfK(JNIEnv *, jobject, + jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jfloat, jfloat, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrjK(JNIEnv *, jobject, + jint, jfloatArray, jint, jfloatArray, jint, jint, jint, jfloat, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jfloat, jfloat, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrkK(JNIEnv *, jobject, + jint, jint, jfloat, jfloat, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrrK(JNIEnv *, jobject, + jint, jfloatArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrvK(JNIEnv *, jobject, + jint, jfloat, jfloat, jfloatArray, jint, jfloatArray, jint, jfloat, jintArray, jint, jint, jint, jint, jfloat, jobject, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slartgK(JNIEnv *, jobject, + jfloat, jfloat, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slartvK(JNIEnv *, jobject, + jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaruvK(JNIEnv *, jobject, + jintArray, jint, jint, jfloatArray, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarzK(JNIEnv *, jobject, + jstring, jint, jint, jint, jfloatArray, jint, jint, jfloat, jfloatArray, jint, jint, jfloatArray, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarzbK(JNIEnv *, jobject, + jstring, jstring, jstring, jstring, jint, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarztK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slas2K(JNIEnv *, jobject, + jfloat, jfloat, jfloat, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasclK(JNIEnv *, jobject, + jstring, jint, jint, jfloat, jfloat, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd0K(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jint, jintArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd1K(JNIEnv *, jobject, + jint, jint, jint, jfloatArray, jint, jobject, jobject, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jintArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd2K(JNIEnv *, jobject, + jint, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd3K(JNIEnv *, jobject, + jint, jint, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jintArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd4K(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jobject, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd5K(JNIEnv *, jobject, + jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jobject, jfloatArray, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd6K(JNIEnv *, jobject, + jint, jint, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jobject, jobject, jintArray, jint, jintArray, jint, jobject, jintArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jobject, jobject, jobject, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd7K(JNIEnv *, jobject, + jint, jint, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jfloatArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jobject, jintArray, jint, jint, jfloatArray, jint, jint, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd8K(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasdaK(JNIEnv *, jobject, + jint, jint, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jintArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jint, jintArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasdqK(JNIEnv *, jobject, + jstring, jint, jint, jint, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasdtK(JNIEnv *, jobject, + jint, jobject, jobject, jintArray, jint, jintArray, jint, jintArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasetK(JNIEnv *, jobject, + jstring, jint, jint, jfloat, jfloat, jfloatArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq1K(JNIEnv *, jobject, + jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq2K(JNIEnv *, jobject, + jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq3K(JNIEnv *, jobject, + jint, jobject, jfloatArray, jint, jint, jobject, jobject, jobject, jobject, jobject, jobject, jobject, jboolean) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq4K(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jint, jint, jfloat, jfloat, jfloat, jfloat, jfloat, jfloat, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq5K(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jint, jfloat, jobject, jobject, jobject, jobject, jobject, jobject, jboolean) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq6K(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jint, jobject, jobject, jobject, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasrK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasrtK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slassqK(JNIEnv *, jobject, + jint, jfloatArray, jint, jint, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasv2K(JNIEnv *, jobject, + jfloat, jfloat, jfloat, jobject, jobject, jobject, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaswpK(JNIEnv *, jobject, + jint, jfloatArray, jint, jint, jint, jint, jintArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasy2K(JNIEnv *, jobject, + jboolean, jboolean, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jint, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasyfK(JNIEnv *, jobject, + jstring, jint, jint, jobject, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatbsK(JNIEnv *, jobject, + jstring, jstring, jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatdfK(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject, jobject, jintArray, jint, jintArray, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatpsK(JNIEnv *, jobject, + jstring, jstring, jstring, jstring, jint, jfloatArray, jint, jfloatArray, jint, jobject, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatrdK(JNIEnv *, jobject, + jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatrsK(JNIEnv *, jobject, + jstring, jstring, jstring, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatrzK(JNIEnv *, jobject, + jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatzmK(JNIEnv *, jobject, + jstring, jint, jint, jfloatArray, jint, jint, jfloat, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slauu2K(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slauumK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slazq3K(JNIEnv *, jobject, + jint, jobject, jfloatArray, jint, jint, jobject, jobject, jobject, jobject, jobject, jobject, jobject, jboolean, jobject, jobject, jobject, jobject, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slazq4K(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jint, jint, jfloat, jfloat, jfloat, jfloat, jfloat, jfloat, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sopgtrK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sopmtrK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorg2lK(JNIEnv *, jobject, + jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorg2rK(JNIEnv *, jobject, + jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgbrK(JNIEnv *, jobject, + jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorghrK(JNIEnv *, jobject, + jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgl2K(JNIEnv *, jobject, + jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorglqK(JNIEnv *, jobject, + jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgqlK(JNIEnv *, jobject, + jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgqrK(JNIEnv *, jobject, + jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgr2K(JNIEnv *, jobject, + jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgrqK(JNIEnv *, jobject, + jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgtrK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorm2lK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorm2rK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormbrK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormhrK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorml2K(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormlqK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormqlK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormqrK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormr2K(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormr3K(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormrqK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormrzK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormtrK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbconK(JNIEnv *, jobject, + jstring, jint, jint, jfloatArray, jint, jint, jfloat, jobject, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbequK(JNIEnv *, jobject, + jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbrfsK(JNIEnv *, jobject, + jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbstfK(JNIEnv *, jobject, + jstring, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbsvK(JNIEnv *, jobject, + jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbsvxK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbtf2K(JNIEnv *, jobject, + jstring, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbtrfK(JNIEnv *, jobject, + jstring, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbtrsK(JNIEnv *, jobject, + jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spoconK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jint, jfloat, jobject, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spoequK(JNIEnv *, jobject, + jint, jfloatArray, jint, jint, jfloatArray, jint, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sporfsK(JNIEnv *, jobject, + jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sposvK(JNIEnv *, jobject, + jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sposvxK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spotf2K(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spotrfK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spotriK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spotrsK(JNIEnv *, jobject, + jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sppconK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jfloat, jobject, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sppequK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jfloatArray, jint, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spprfsK(JNIEnv *, jobject, + jstring, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sppsvK(JNIEnv *, jobject, + jstring, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sppsvxK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jfloatArray, jint, jfloatArray, jint, jobject, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spptrfK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spptriK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spptrsK(JNIEnv *, jobject, + jstring, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sptconK(JNIEnv *, jobject, + jint, jfloatArray, jint, jfloatArray, jint, jfloat, jobject, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spteqrK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sptrfsK(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sptsvK(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sptsvxK(JNIEnv *, jobject, + jstring, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spttrfK(JNIEnv *, jobject, + jint, jfloatArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spttrsK(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sptts2K(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_srsclK(JNIEnv *, jobject, + jint, jfloat, jfloatArray, jint, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbevK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbevdK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbevxK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloat, jfloat, jint, jint, jfloat, jobject, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbgstK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbgvK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbgvdK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbgvxK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloat, jfloat, jint, jint, jfloat, jobject, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbtrdK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspconK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jintArray, jint, jfloat, jobject, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspevK(JNIEnv *, jobject, + jstring, jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspevdK(JNIEnv *, jobject, + jstring, jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspevxK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jfloatArray, jint, jfloat, jfloat, jint, jint, jfloat, jobject, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspgstK(JNIEnv *, jobject, + jint, jstring, jint, jfloatArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspgvK(JNIEnv *, jobject, + jint, jstring, jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspgvdK(JNIEnv *, jobject, + jint, jstring, jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspgvxK(JNIEnv *, jobject, + jint, jstring, jstring, jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jint, jint, jfloat, jobject, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssprfsK(JNIEnv *, jobject, + jstring, jint, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspsvK(JNIEnv *, jobject, + jstring, jint, jint, jfloatArray, jint, jintArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspsvxK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssptrdK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssptrfK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssptriK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jintArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssptrsK(JNIEnv *, jobject, + jstring, jint, jint, jfloatArray, jint, jintArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstebzK(JNIEnv *, jobject, + jstring, jstring, jint, jfloat, jfloat, jint, jint, jfloat, jfloatArray, jint, jfloatArray, jint, jobject, jobject, jfloatArray, jint, jintArray, jint, jintArray, jint, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstedcK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstegrK(JNIEnv *, jobject, + jstring, jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jint, jint, jfloat, jobject, jfloatArray, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jintArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssteinK(JNIEnv *, jobject, + jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstemrK(JNIEnv *, jobject, + jstring, jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jint, jint, jintArray, jint, jobject, jfloatArray, jint, jint, jintArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssteqrK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssterfK(JNIEnv *, jobject, + jint, jfloatArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstevK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstevdK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstevrK(JNIEnv *, jobject, + jstring, jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jint, jint, jfloat, jobject, jfloatArray, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jintArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstevxK(JNIEnv *, jobject, + jstring, jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jint, jint, jfloat, jobject, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyconK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jint, jintArray, jint, jfloat, jobject, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyevK(JNIEnv *, jobject, + jstring, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyevdK(JNIEnv *, jobject, + jstring, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jintArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyevrK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jfloatArray, jint, jint, jfloat, jfloat, jint, jint, jfloat, jobject, jfloatArray, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jintArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyevxK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jfloatArray, jint, jint, jfloat, jfloat, jint, jint, jfloat, jobject, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssygs2K(JNIEnv *, jobject, + jint, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssygstK(JNIEnv *, jobject, + jint, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssygvK(JNIEnv *, jobject, + jint, jstring, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssygvdK(JNIEnv *, jobject, + jint, jstring, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jintArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssygvxK(JNIEnv *, jobject, + jint, jstring, jstring, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloat, jfloat, jint, jint, jfloat, jobject, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyrfsK(JNIEnv *, jobject, + jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssysvK(JNIEnv *, jobject, + jstring, jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssysvxK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytd2K(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytf2K(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytrdK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytrfK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytriK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytrsK(JNIEnv *, jobject, + jstring, jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stbconK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stbrfsK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stbtrsK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgevcK(JNIEnv *, jobject, + jstring, jstring, jbooleanArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jint, jobject, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgex2K(JNIEnv *, jobject, + jboolean, jboolean, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jint, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgexcK(JNIEnv *, jobject, + jboolean, jboolean, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jobject, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgsenK(JNIEnv *, jobject, + jint, jboolean, jboolean, jbooleanArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jobject, jobject, jfloatArray, jint, jfloatArray, jint, jint, jintArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgsjaK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloat, jfloat, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgsnaK(JNIEnv *, jobject, + jstring, jstring, jbooleanArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgsy2K(JNIEnv *, jobject, + jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jobject, jobject, jintArray, jint, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgsylK(JNIEnv *, jobject, + jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jobject, jfloatArray, jint, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stpconK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jfloatArray, jint, jobject, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stprfsK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stptriK(JNIEnv *, jobject, + jstring, jstring, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stptrsK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_strconK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_strevcK(JNIEnv *, jobject, + jstring, jstring, jbooleanArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jint, jobject, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_strexcK(JNIEnv *, jobject, + jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jobject, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_strrfsK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_strsenK(JNIEnv *, jobject, + jstring, jstring, jbooleanArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jobject, jobject, jobject, jfloatArray, jint, jint, jintArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_strsnaK(JNIEnv *, jobject, + jstring, jstring, jbooleanArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jint, jintArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_strsylK(JNIEnv *, jobject, + jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_strti2K(JNIEnv *, jobject, + jstring, jstring, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_strtriK(JNIEnv *, jobject, + jstring, jstring, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_strtrsK(JNIEnv *, jobject, + jstring, jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stzrqfK(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stzrzfK(JNIEnv *, jobject, + jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { + +} + +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamchK(JNIEnv *, jobject, + jstring) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc1K(JNIEnv *, jobject, + jobject, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc2K(JNIEnv *, jobject, + jobject, jobject, jobject, jobject, jobject, jobject, jobject, jobject) { + +} + +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc3K(JNIEnv *, jobject, + jdouble, jdouble) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc4K(JNIEnv *, jobject, + jobject, jdouble, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc5K(JNIEnv *, jobject, + jint, jint, jint, jboolean, jobject, jobject) { + +} + +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dsecndK(JNIEnv *, jobject); + jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_lsameK(JNIEnv *, jobject { + +} + + jstring, jstring) { + +} + +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_secondK(JNIEnv *, jobject); + jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slamchK(JNIEnv *, jobject { + +} + + jstring) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc1K(JNIEnv *, jobject, + jobject, jobject, jobject, jobject) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc2K(JNIEnv *, jobject, + jobject, jobject, jobject, jobject, jobject, jobject, jobject, jobject) { + +} + +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc3K(JNIEnv *, jobject, + jfloat, jfloat) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc4K(JNIEnv *, jobject, + jobject, jfloat, jint) { + +} + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc5K(JNIEnv *, jobject, + jint, jint, jint, jboolean, jobject, jobject) { + +} + + +static void *lapack; + +jstring get_system_property(JNIEnv *env, jstring key, jstring def) { + jclass klass = (*env)->FindClass(env, "java/lang/System"); + jmethodID method = (*env)->GetStaticMethodID(env, klass, "getProperty", "(Ljava/lang/String;Ljava/lang/String;)Ljava/lang/String;"); + return (jstring)(*env)->CallStaticObjectMethod(env, klass, method, key, def); +} + +jint JNI_OnLoad(JavaVM *vm, UNUSED void *reserved) { + JNIEnv *env; + if ((*vm)->GetEnv(vm, (void**)&env, JNI_VERSION_1_6) != JNI_OK) { + return -1; + } + + char blas_name[1024]; + jstring native_lib_path = get_system_property(env, (*env)->NewStringUTF(env, "dev.ludovic.netlib.lapack.nativeLibPath"), NULL); + jstring native_lib = get_system_property(env, (*env)->NewStringUTF(env, "dev.ludovic.netlib.lapack.nativeLib"), (*env)->NewStringUTF(env, "lapack")); + if (native_lib_path) { + const char *utf = (*env)->GetStringUTFChars(env, native_lib_path, NULL); + strncpy(blas_name, utf, sizeof(blas_name)); + blas_name[sizeof(blas_name) - 1] = '\0'; + (*env)->ReleaseStringUTFChars(env, native_lib_path, utf); + } else { + const char *utf = (*env)->GetStringUTFChars(env, native_lib, NULL); + snprintf(blas_name, sizeof(blas_name), "lib%s.so", utf); + (*env)->ReleaseStringUTFChars(env, native_lib, utf); + } + + lapack = dlopen(blas_name, RTLD_LAZY); + if (!lapack) { + return -1; + } + +#define LOAD_SYMBOL(name) \ + name = dlsym(lapack, #name); \ + if (!name) { \ + return -1; \ + } + + LOAD_SYMBOL(dbdsdc_) + LOAD_SYMBOL(dbdsqr_) + LOAD_SYMBOL(ddisna_) + LOAD_SYMBOL(dgbbrd_) + LOAD_SYMBOL(dgbcon_) + LOAD_SYMBOL(dgbequ_) + LOAD_SYMBOL(dgbrfs_) + LOAD_SYMBOL(dgbsvx_) + LOAD_SYMBOL(dgbsv_) + LOAD_SYMBOL(dgbtrf_) + LOAD_SYMBOL(dgbtf2_) + LOAD_SYMBOL(dgebak_) + LOAD_SYMBOL(dgbtrs_) + LOAD_SYMBOL(dgebd2_) + LOAD_SYMBOL(dgebal_) + LOAD_SYMBOL(dgecon_) + LOAD_SYMBOL(dgebrd_) + LOAD_SYMBOL(dgees_) + LOAD_SYMBOL(dgeequ_) + LOAD_SYMBOL(dgeev_) + LOAD_SYMBOL(dgeesx_) + LOAD_SYMBOL(dgegs_) + LOAD_SYMBOL(dgeevx_) + LOAD_SYMBOL(dgehd2_) + LOAD_SYMBOL(dgegv_) + LOAD_SYMBOL(dgelq2_) + LOAD_SYMBOL(dgehrd_) + LOAD_SYMBOL(dgels_) + LOAD_SYMBOL(dgelqf_) + LOAD_SYMBOL(dgelss_) + LOAD_SYMBOL(dgelsd_) + LOAD_SYMBOL(dgelsy_) + LOAD_SYMBOL(dgelsx_) + LOAD_SYMBOL(dgeqlf_) + LOAD_SYMBOL(dgeql2_) + LOAD_SYMBOL(dgeqpf_) + LOAD_SYMBOL(dgeqp3_) + LOAD_SYMBOL(dgeqrf_) + LOAD_SYMBOL(dgeqr2_) + LOAD_SYMBOL(dgerq2_) + LOAD_SYMBOL(dgerfs_) + LOAD_SYMBOL(dgesc2_) + LOAD_SYMBOL(dgerqf_) + LOAD_SYMBOL(dgesv_) + LOAD_SYMBOL(dgesdd_) + LOAD_SYMBOL(dgesvx_) + LOAD_SYMBOL(dgesvd_) + LOAD_SYMBOL(dgetf2_) + LOAD_SYMBOL(dgetc2_) + LOAD_SYMBOL(dgetri_) + LOAD_SYMBOL(dgetrf_) + LOAD_SYMBOL(dggbak_) + LOAD_SYMBOL(dgetrs_) + LOAD_SYMBOL(dgges_) + LOAD_SYMBOL(dggbal_) + LOAD_SYMBOL(dggev_) + LOAD_SYMBOL(dggesx_) + LOAD_SYMBOL(dggglm_) + LOAD_SYMBOL(dggevx_) + LOAD_SYMBOL(dgglse_) + LOAD_SYMBOL(dgghrd_) + LOAD_SYMBOL(dggrqf_) + LOAD_SYMBOL(dggqrf_) + LOAD_SYMBOL(dggsvp_) + LOAD_SYMBOL(dggsvd_) + LOAD_SYMBOL(dgtrfs_) + LOAD_SYMBOL(dgtcon_) + LOAD_SYMBOL(dgtsvx_) + LOAD_SYMBOL(dgtsv_) + LOAD_SYMBOL(dgttrs_) + LOAD_SYMBOL(dgttrf_) + LOAD_SYMBOL(dhgeqz_) + LOAD_SYMBOL(dgtts2_) + LOAD_SYMBOL(dhseqr_) + LOAD_SYMBOL(dhsein_) + LOAD_SYMBOL(dlabad_) + LOAD_SYMBOL(disnan_) + LOAD_SYMBOL(dlacn2_) + LOAD_SYMBOL(dlabrd_) + LOAD_SYMBOL(dlacpy_) + LOAD_SYMBOL(dlacon_) + LOAD_SYMBOL(dlae2_) + LOAD_SYMBOL(dladiv_) + LOAD_SYMBOL(dlaed0_) + LOAD_SYMBOL(dlaebz_) + LOAD_SYMBOL(dlaed2_) + LOAD_SYMBOL(dlaed1_) + LOAD_SYMBOL(dlaed4_) + LOAD_SYMBOL(dlaed3_) + LOAD_SYMBOL(dlaed6_) + LOAD_SYMBOL(dlaed5_) + LOAD_SYMBOL(dlaed8_) + LOAD_SYMBOL(dlaed7_) + LOAD_SYMBOL(dlaeda_) + LOAD_SYMBOL(dlaed9_) + LOAD_SYMBOL(dlaev2_) + LOAD_SYMBOL(dlaein_) + LOAD_SYMBOL(dlag2_) + LOAD_SYMBOL(dlaexc_) + LOAD_SYMBOL(dlags2_) + LOAD_SYMBOL(dlag2s_) + LOAD_SYMBOL(dlagtm_) + LOAD_SYMBOL(dlagtf_) + LOAD_SYMBOL(dlagv2_) + LOAD_SYMBOL(dlagts_) + LOAD_SYMBOL(dlahr2_) + LOAD_SYMBOL(dlahqr_) + LOAD_SYMBOL(dlaic1_) + LOAD_SYMBOL(dlahrd_) + LOAD_SYMBOL(dlaln2_) + LOAD_SYMBOL(dlaisnan_) + LOAD_SYMBOL(dlalsa_) + LOAD_SYMBOL(dlals0_) + LOAD_SYMBOL(dlamrg_) + LOAD_SYMBOL(dlalsd_) + LOAD_SYMBOL(dlangb_) + LOAD_SYMBOL(dlaneg_) + LOAD_SYMBOL(dlangt_) + LOAD_SYMBOL(dlange_) + LOAD_SYMBOL(dlansb_) + LOAD_SYMBOL(dlanhs_) + LOAD_SYMBOL(dlanst_) + LOAD_SYMBOL(dlansp_) + LOAD_SYMBOL(dlantb_) + LOAD_SYMBOL(dlansy_) + LOAD_SYMBOL(dlantr_) + LOAD_SYMBOL(dlantp_) + LOAD_SYMBOL(dlapll_) + LOAD_SYMBOL(dlanv2_) + LOAD_SYMBOL(dlapy2_) + LOAD_SYMBOL(dlapmt_) + LOAD_SYMBOL(dlaqgb_) + LOAD_SYMBOL(dlapy3_) + LOAD_SYMBOL(dlaqp2_) + LOAD_SYMBOL(dlaqge_) + LOAD_SYMBOL(dlaqr0_) + LOAD_SYMBOL(dlaqps_) + LOAD_SYMBOL(dlaqr2_) + LOAD_SYMBOL(dlaqr1_) + LOAD_SYMBOL(dlaqr4_) + LOAD_SYMBOL(dlaqr3_) + LOAD_SYMBOL(dlaqsb_) + LOAD_SYMBOL(dlaqr5_) + LOAD_SYMBOL(dlaqsy_) + LOAD_SYMBOL(dlaqsp_) + LOAD_SYMBOL(dlar1v_) + LOAD_SYMBOL(dlaqtr_) + LOAD_SYMBOL(dlarf_) + LOAD_SYMBOL(dlar2v_) + LOAD_SYMBOL(dlarfg_) + LOAD_SYMBOL(dlarfb_) + LOAD_SYMBOL(dlarfx_) + LOAD_SYMBOL(dlarft_) + LOAD_SYMBOL(dlarnv_) + LOAD_SYMBOL(dlargv_) + LOAD_SYMBOL(dlarrb_) + LOAD_SYMBOL(dlarra_) + LOAD_SYMBOL(dlarrd_) + LOAD_SYMBOL(dlarrc_) + LOAD_SYMBOL(dlarrf_) + LOAD_SYMBOL(dlarre_) + LOAD_SYMBOL(dlarrk_) + LOAD_SYMBOL(dlarrj_) + LOAD_SYMBOL(dlarrv_) + LOAD_SYMBOL(dlarrr_) + LOAD_SYMBOL(dlartv_) + LOAD_SYMBOL(dlartg_) + LOAD_SYMBOL(dlarz_) + LOAD_SYMBOL(dlaruv_) + LOAD_SYMBOL(dlarzt_) + LOAD_SYMBOL(dlarzb_) + LOAD_SYMBOL(dlascl_) + LOAD_SYMBOL(dlas2_) + LOAD_SYMBOL(dlasd1_) + LOAD_SYMBOL(dlasd0_) + LOAD_SYMBOL(dlasd3_) + LOAD_SYMBOL(dlasd2_) + LOAD_SYMBOL(dlasd5_) + LOAD_SYMBOL(dlasd4_) + LOAD_SYMBOL(dlasd7_) + LOAD_SYMBOL(dlasd6_) + LOAD_SYMBOL(dlasda_) + LOAD_SYMBOL(dlasd8_) + LOAD_SYMBOL(dlasdt_) + LOAD_SYMBOL(dlasdq_) + LOAD_SYMBOL(dlasq1_) + LOAD_SYMBOL(dlaset_) + LOAD_SYMBOL(dlasq3_) + LOAD_SYMBOL(dlasq2_) + LOAD_SYMBOL(dlasq5_) + LOAD_SYMBOL(dlasq4_) + LOAD_SYMBOL(dlasr_) + LOAD_SYMBOL(dlasq6_) + LOAD_SYMBOL(dlassq_) + LOAD_SYMBOL(dlasrt_) + LOAD_SYMBOL(dlaswp_) + LOAD_SYMBOL(dlasv2_) + LOAD_SYMBOL(dlasyf_) + LOAD_SYMBOL(dlasy2_) + LOAD_SYMBOL(dlatdf_) + LOAD_SYMBOL(dlatbs_) + LOAD_SYMBOL(dlatrd_) + LOAD_SYMBOL(dlatps_) + LOAD_SYMBOL(dlatrz_) + LOAD_SYMBOL(dlatrs_) + LOAD_SYMBOL(dlauu2_) + LOAD_SYMBOL(dlatzm_) + LOAD_SYMBOL(dlazq3_) + LOAD_SYMBOL(dlauum_) + LOAD_SYMBOL(dopgtr_) + LOAD_SYMBOL(dlazq4_) + LOAD_SYMBOL(dorg2l_) + LOAD_SYMBOL(dopmtr_) + LOAD_SYMBOL(dorgbr_) + LOAD_SYMBOL(dorg2r_) + LOAD_SYMBOL(dorgl2_) + LOAD_SYMBOL(dorghr_) + LOAD_SYMBOL(dorgql_) + LOAD_SYMBOL(dorglq_) + LOAD_SYMBOL(dorgr2_) + LOAD_SYMBOL(dorgqr_) + LOAD_SYMBOL(dorgtr_) + LOAD_SYMBOL(dorgrq_) + LOAD_SYMBOL(dorm2r_) + LOAD_SYMBOL(dorm2l_) + LOAD_SYMBOL(dormhr_) + LOAD_SYMBOL(dormbr_) + LOAD_SYMBOL(dormlq_) + LOAD_SYMBOL(dorml2_) + LOAD_SYMBOL(dormqr_) + LOAD_SYMBOL(dormql_) + LOAD_SYMBOL(dormr3_) + LOAD_SYMBOL(dormr2_) + LOAD_SYMBOL(dormrz_) + LOAD_SYMBOL(dormrq_) + LOAD_SYMBOL(dpbcon_) + LOAD_SYMBOL(dormtr_) + LOAD_SYMBOL(dpbrfs_) + LOAD_SYMBOL(dpbequ_) + LOAD_SYMBOL(dpbsv_) + LOAD_SYMBOL(dpbstf_) + LOAD_SYMBOL(dpbtf2_) + LOAD_SYMBOL(dpbsvx_) + LOAD_SYMBOL(dpbtrs_) + LOAD_SYMBOL(dpbtrf_) + LOAD_SYMBOL(dpoequ_) + LOAD_SYMBOL(dpocon_) + LOAD_SYMBOL(dposv_) + LOAD_SYMBOL(dporfs_) + LOAD_SYMBOL(dpotf2_) + LOAD_SYMBOL(dposvx_) + LOAD_SYMBOL(dpotri_) + LOAD_SYMBOL(dpotrf_) + LOAD_SYMBOL(dppcon_) + LOAD_SYMBOL(dpotrs_) + LOAD_SYMBOL(dpprfs_) + LOAD_SYMBOL(dppequ_) + LOAD_SYMBOL(dppsvx_) + LOAD_SYMBOL(dppsv_) + LOAD_SYMBOL(dpptri_) + LOAD_SYMBOL(dpptrf_) + LOAD_SYMBOL(dptcon_) + LOAD_SYMBOL(dpptrs_) + LOAD_SYMBOL(dptrfs_) + LOAD_SYMBOL(dpteqr_) + LOAD_SYMBOL(dptsvx_) + LOAD_SYMBOL(dptsv_) + LOAD_SYMBOL(dpttrs_) + LOAD_SYMBOL(dpttrf_) + LOAD_SYMBOL(drscl_) + LOAD_SYMBOL(dptts2_) + LOAD_SYMBOL(dsbevd_) + LOAD_SYMBOL(dsbev_) + LOAD_SYMBOL(dsbgst_) + LOAD_SYMBOL(dsbevx_) + LOAD_SYMBOL(dsbgvd_) + LOAD_SYMBOL(dsbgv_) + LOAD_SYMBOL(dsbtrd_) + LOAD_SYMBOL(dsbgvx_) + LOAD_SYMBOL(dspcon_) + LOAD_SYMBOL(dsgesv_) + LOAD_SYMBOL(dspevd_) + LOAD_SYMBOL(dspev_) + LOAD_SYMBOL(dspgst_) + LOAD_SYMBOL(dspevx_) + LOAD_SYMBOL(dspgvd_) + LOAD_SYMBOL(dspgv_) + LOAD_SYMBOL(dsprfs_) + LOAD_SYMBOL(dspgvx_) + LOAD_SYMBOL(dspsvx_) + LOAD_SYMBOL(dspsv_) + LOAD_SYMBOL(dsptrf_) + LOAD_SYMBOL(dsptrd_) + LOAD_SYMBOL(dsptrs_) + LOAD_SYMBOL(dsptri_) + LOAD_SYMBOL(dstedc_) + LOAD_SYMBOL(dstebz_) + LOAD_SYMBOL(dstein_) + LOAD_SYMBOL(dstegr_) + LOAD_SYMBOL(dsteqr_) + LOAD_SYMBOL(dstemr_) + LOAD_SYMBOL(dstev_) + LOAD_SYMBOL(dsterf_) + LOAD_SYMBOL(dstevr_) + LOAD_SYMBOL(dstevd_) + LOAD_SYMBOL(dsycon_) + LOAD_SYMBOL(dstevx_) + LOAD_SYMBOL(dsyevd_) + LOAD_SYMBOL(dsyev_) + LOAD_SYMBOL(dsyevx_) + LOAD_SYMBOL(dsyevr_) + LOAD_SYMBOL(dsygst_) + LOAD_SYMBOL(dsygs2_) + LOAD_SYMBOL(dsygvd_) + LOAD_SYMBOL(dsygv_) + LOAD_SYMBOL(dsyrfs_) + LOAD_SYMBOL(dsygvx_) + LOAD_SYMBOL(dsysvx_) + LOAD_SYMBOL(dsysv_) + LOAD_SYMBOL(dsytf2_) + LOAD_SYMBOL(dsytd2_) + LOAD_SYMBOL(dsytrf_) + LOAD_SYMBOL(dsytrd_) + LOAD_SYMBOL(dsytrs_) + LOAD_SYMBOL(dsytri_) + LOAD_SYMBOL(dtbrfs_) + LOAD_SYMBOL(dtbcon_) + LOAD_SYMBOL(dtgevc_) + LOAD_SYMBOL(dtbtrs_) + LOAD_SYMBOL(dtgexc_) + LOAD_SYMBOL(dtgex2_) + LOAD_SYMBOL(dtgsja_) + LOAD_SYMBOL(dtgsen_) + LOAD_SYMBOL(dtgsy2_) + LOAD_SYMBOL(dtgsna_) + LOAD_SYMBOL(dtpcon_) + LOAD_SYMBOL(dtgsyl_) + LOAD_SYMBOL(dtptri_) + LOAD_SYMBOL(dtprfs_) + LOAD_SYMBOL(dtrcon_) + LOAD_SYMBOL(dtptrs_) + LOAD_SYMBOL(dtrexc_) + LOAD_SYMBOL(dtrevc_) + LOAD_SYMBOL(dtrsen_) + LOAD_SYMBOL(dtrrfs_) + LOAD_SYMBOL(dtrsyl_) + LOAD_SYMBOL(dtrsna_) + LOAD_SYMBOL(dtrtri_) + LOAD_SYMBOL(dtrti2_) + LOAD_SYMBOL(dtzrqf_) + LOAD_SYMBOL(dtrtrs_) + LOAD_SYMBOL(ieeeck_) + LOAD_SYMBOL(dtzrzf_) + LOAD_SYMBOL(ilaver_) + LOAD_SYMBOL(ilaenv_) + LOAD_SYMBOL(lsamen_) + LOAD_SYMBOL(iparmq_) + LOAD_SYMBOL(sbdsqr_) + LOAD_SYMBOL(sbdsdc_) + LOAD_SYMBOL(sgbbrd_) + LOAD_SYMBOL(sdisna_) + LOAD_SYMBOL(sgbequ_) + LOAD_SYMBOL(sgbcon_) + LOAD_SYMBOL(sgbsv_) + LOAD_SYMBOL(sgbrfs_) + LOAD_SYMBOL(sgbtf2_) + LOAD_SYMBOL(sgbsvx_) + LOAD_SYMBOL(sgbtrs_) + LOAD_SYMBOL(sgbtrf_) + LOAD_SYMBOL(sgebal_) + LOAD_SYMBOL(sgebak_) + LOAD_SYMBOL(sgebrd_) + LOAD_SYMBOL(sgebd2_) + LOAD_SYMBOL(sgeequ_) + LOAD_SYMBOL(sgecon_) + LOAD_SYMBOL(sgeesx_) + LOAD_SYMBOL(sgees_) + LOAD_SYMBOL(sgeevx_) + LOAD_SYMBOL(sgeev_) + LOAD_SYMBOL(sgegv_) + LOAD_SYMBOL(sgegs_) + LOAD_SYMBOL(sgehrd_) + LOAD_SYMBOL(sgehd2_) + LOAD_SYMBOL(sgelqf_) + LOAD_SYMBOL(sgelq2_) + LOAD_SYMBOL(sgelsd_) + LOAD_SYMBOL(sgels_) + LOAD_SYMBOL(sgelsx_) + LOAD_SYMBOL(sgelss_) + LOAD_SYMBOL(sgeql2_) + LOAD_SYMBOL(sgelsy_) + LOAD_SYMBOL(sgeqp3_) + LOAD_SYMBOL(sgeqlf_) + LOAD_SYMBOL(sgeqr2_) + LOAD_SYMBOL(sgeqpf_) + LOAD_SYMBOL(sgerfs_) + LOAD_SYMBOL(sgeqrf_) + LOAD_SYMBOL(sgerqf_) + LOAD_SYMBOL(sgerq2_) + LOAD_SYMBOL(sgesdd_) + LOAD_SYMBOL(sgesc2_) + LOAD_SYMBOL(sgesvd_) + LOAD_SYMBOL(sgesv_) + LOAD_SYMBOL(sgetc2_) + LOAD_SYMBOL(sgesvx_) + LOAD_SYMBOL(sgetrf_) + LOAD_SYMBOL(sgetf2_) + LOAD_SYMBOL(sgetrs_) + LOAD_SYMBOL(sgetri_) + LOAD_SYMBOL(sggbal_) + LOAD_SYMBOL(sggbak_) + LOAD_SYMBOL(sggesx_) + LOAD_SYMBOL(sgges_) + LOAD_SYMBOL(sggevx_) + LOAD_SYMBOL(sggev_) + LOAD_SYMBOL(sgghrd_) + LOAD_SYMBOL(sggglm_) + LOAD_SYMBOL(sggqrf_) + LOAD_SYMBOL(sgglse_) + LOAD_SYMBOL(sggsvd_) + LOAD_SYMBOL(sggrqf_) + LOAD_SYMBOL(sgtcon_) + LOAD_SYMBOL(sggsvp_) + LOAD_SYMBOL(sgtsv_) + LOAD_SYMBOL(sgtrfs_) + LOAD_SYMBOL(sgttrf_) + LOAD_SYMBOL(sgtsvx_) + LOAD_SYMBOL(sgtts2_) + LOAD_SYMBOL(sgttrs_) + LOAD_SYMBOL(shsein_) + LOAD_SYMBOL(shgeqz_) + LOAD_SYMBOL(sisnan_) + LOAD_SYMBOL(shseqr_) + LOAD_SYMBOL(slabrd_) + LOAD_SYMBOL(slabad_) + LOAD_SYMBOL(slacon_) + LOAD_SYMBOL(slacn2_) + LOAD_SYMBOL(sladiv_) + LOAD_SYMBOL(slacpy_) + LOAD_SYMBOL(slaebz_) + LOAD_SYMBOL(slae2_) + LOAD_SYMBOL(slaed1_) + LOAD_SYMBOL(slaed0_) + LOAD_SYMBOL(slaed3_) + LOAD_SYMBOL(slaed2_) + LOAD_SYMBOL(slaed5_) + LOAD_SYMBOL(slaed4_) + LOAD_SYMBOL(slaed7_) + LOAD_SYMBOL(slaed6_) + LOAD_SYMBOL(slaed9_) + LOAD_SYMBOL(slaed8_) + LOAD_SYMBOL(slaein_) + LOAD_SYMBOL(slaeda_) + LOAD_SYMBOL(slaexc_) + LOAD_SYMBOL(slaev2_) + LOAD_SYMBOL(slag2d_) + LOAD_SYMBOL(slag2_) + LOAD_SYMBOL(slagtf_) + LOAD_SYMBOL(slags2_) + LOAD_SYMBOL(slagts_) + LOAD_SYMBOL(slagtm_) + LOAD_SYMBOL(slahqr_) + LOAD_SYMBOL(slagv2_) + LOAD_SYMBOL(slahrd_) + LOAD_SYMBOL(slahr2_) + LOAD_SYMBOL(slaisnan_) + LOAD_SYMBOL(slaic1_) + LOAD_SYMBOL(slals0_) + LOAD_SYMBOL(slaln2_) + LOAD_SYMBOL(slalsd_) + LOAD_SYMBOL(slalsa_) + LOAD_SYMBOL(slaneg_) + LOAD_SYMBOL(slamrg_) + LOAD_SYMBOL(slange_) + LOAD_SYMBOL(slangb_) + LOAD_SYMBOL(slanhs_) + LOAD_SYMBOL(slangt_) + LOAD_SYMBOL(slansp_) + LOAD_SYMBOL(slansb_) + LOAD_SYMBOL(slansy_) + LOAD_SYMBOL(slanst_) + LOAD_SYMBOL(slantp_) + LOAD_SYMBOL(slantb_) + LOAD_SYMBOL(slanv2_) + LOAD_SYMBOL(slantr_) + LOAD_SYMBOL(slapmt_) + LOAD_SYMBOL(slapll_) + LOAD_SYMBOL(slapy3_) + LOAD_SYMBOL(slapy2_) + LOAD_SYMBOL(slaqge_) + LOAD_SYMBOL(slaqgb_) + LOAD_SYMBOL(slaqps_) + LOAD_SYMBOL(slaqp2_) + LOAD_SYMBOL(slaqr1_) + LOAD_SYMBOL(slaqr0_) + LOAD_SYMBOL(slaqr3_) + LOAD_SYMBOL(slaqr2_) + LOAD_SYMBOL(slaqr5_) + LOAD_SYMBOL(slaqr4_) + LOAD_SYMBOL(slaqsp_) + LOAD_SYMBOL(slaqsb_) + LOAD_SYMBOL(slaqtr_) + LOAD_SYMBOL(slaqsy_) + LOAD_SYMBOL(slar2v_) + LOAD_SYMBOL(slar1v_) + LOAD_SYMBOL(slarfb_) + LOAD_SYMBOL(slarf_) + LOAD_SYMBOL(slarft_) + LOAD_SYMBOL(slarfg_) + LOAD_SYMBOL(slargv_) + LOAD_SYMBOL(slarfx_) + LOAD_SYMBOL(slarra_) + LOAD_SYMBOL(slarnv_) + LOAD_SYMBOL(slarrc_) + LOAD_SYMBOL(slarrb_) + LOAD_SYMBOL(slarre_) + LOAD_SYMBOL(slarrd_) + LOAD_SYMBOL(slarrj_) + LOAD_SYMBOL(slarrf_) + LOAD_SYMBOL(slarrk_) + LOAD_SYMBOL(slarrr_) + LOAD_SYMBOL(slarrv_) + LOAD_SYMBOL(slartg_) + LOAD_SYMBOL(slartv_) + LOAD_SYMBOL(slaruv_) + LOAD_SYMBOL(slarz_) + LOAD_SYMBOL(slarzb_) + LOAD_SYMBOL(slarzt_) + LOAD_SYMBOL(slas2_) + LOAD_SYMBOL(slascl_) + LOAD_SYMBOL(slasd0_) + LOAD_SYMBOL(slasd1_) + LOAD_SYMBOL(slasd2_) + LOAD_SYMBOL(slasd3_) + LOAD_SYMBOL(slasd4_) + LOAD_SYMBOL(slasd5_) + LOAD_SYMBOL(slasd6_) + LOAD_SYMBOL(slasd7_) + LOAD_SYMBOL(slasd8_) + LOAD_SYMBOL(slasda_) + LOAD_SYMBOL(slasdq_) + LOAD_SYMBOL(slasdt_) + LOAD_SYMBOL(slaset_) + LOAD_SYMBOL(slasq1_) + LOAD_SYMBOL(slasq2_) + LOAD_SYMBOL(slasq3_) + LOAD_SYMBOL(slasq4_) + LOAD_SYMBOL(slasq5_) + LOAD_SYMBOL(slasq6_) + LOAD_SYMBOL(slasr_) + LOAD_SYMBOL(slasrt_) + LOAD_SYMBOL(slassq_) + LOAD_SYMBOL(slasv2_) + LOAD_SYMBOL(slaswp_) + LOAD_SYMBOL(slasy2_) + LOAD_SYMBOL(slasyf_) + LOAD_SYMBOL(slatbs_) + LOAD_SYMBOL(slatdf_) + LOAD_SYMBOL(slatps_) + LOAD_SYMBOL(slatrd_) + LOAD_SYMBOL(slatrs_) + LOAD_SYMBOL(slatrz_) + LOAD_SYMBOL(slatzm_) + LOAD_SYMBOL(slauu2_) + LOAD_SYMBOL(slauum_) + LOAD_SYMBOL(slazq3_) + LOAD_SYMBOL(slazq4_) + LOAD_SYMBOL(sopgtr_) + LOAD_SYMBOL(sopmtr_) + LOAD_SYMBOL(sorg2l_) + LOAD_SYMBOL(sorg2r_) + LOAD_SYMBOL(sorgbr_) + LOAD_SYMBOL(sorghr_) + LOAD_SYMBOL(sorgl2_) + LOAD_SYMBOL(sorglq_) + LOAD_SYMBOL(sorgql_) + LOAD_SYMBOL(sorgqr_) + LOAD_SYMBOL(sorgr2_) + LOAD_SYMBOL(sorgrq_) + LOAD_SYMBOL(sorgtr_) + LOAD_SYMBOL(sorm2l_) + LOAD_SYMBOL(sorm2r_) + LOAD_SYMBOL(sormbr_) + LOAD_SYMBOL(sormhr_) + LOAD_SYMBOL(sorml2_) + LOAD_SYMBOL(sormlq_) + LOAD_SYMBOL(sormql_) + LOAD_SYMBOL(sormqr_) + LOAD_SYMBOL(sormr2_) + LOAD_SYMBOL(sormr3_) + LOAD_SYMBOL(sormrq_) + LOAD_SYMBOL(sormrz_) + LOAD_SYMBOL(sormtr_) + LOAD_SYMBOL(spbcon_) + LOAD_SYMBOL(spbequ_) + LOAD_SYMBOL(spbrfs_) + LOAD_SYMBOL(spbstf_) + LOAD_SYMBOL(spbsv_) + LOAD_SYMBOL(spbsvx_) + LOAD_SYMBOL(spbtf2_) + LOAD_SYMBOL(spbtrf_) + LOAD_SYMBOL(spbtrs_) + LOAD_SYMBOL(spocon_) + LOAD_SYMBOL(spoequ_) + LOAD_SYMBOL(sporfs_) + LOAD_SYMBOL(sposv_) + LOAD_SYMBOL(sposvx_) + LOAD_SYMBOL(spotf2_) + LOAD_SYMBOL(spotrf_) + LOAD_SYMBOL(spotri_) + LOAD_SYMBOL(spotrs_) + LOAD_SYMBOL(sppcon_) + LOAD_SYMBOL(sppequ_) + LOAD_SYMBOL(spprfs_) + LOAD_SYMBOL(sppsv_) + LOAD_SYMBOL(sppsvx_) + LOAD_SYMBOL(spptrf_) + LOAD_SYMBOL(spptri_) + LOAD_SYMBOL(spptrs_) + LOAD_SYMBOL(sptcon_) + LOAD_SYMBOL(spteqr_) + LOAD_SYMBOL(sptrfs_) + LOAD_SYMBOL(sptsv_) + LOAD_SYMBOL(sptsvx_) + LOAD_SYMBOL(spttrf_) + LOAD_SYMBOL(spttrs_) + LOAD_SYMBOL(sptts2_) + LOAD_SYMBOL(srscl_) + LOAD_SYMBOL(ssbev_) + LOAD_SYMBOL(ssbevd_) + LOAD_SYMBOL(ssbevx_) + LOAD_SYMBOL(ssbgst_) + LOAD_SYMBOL(ssbgv_) + LOAD_SYMBOL(ssbgvd_) + LOAD_SYMBOL(ssbgvx_) + LOAD_SYMBOL(ssbtrd_) + LOAD_SYMBOL(sspcon_) + LOAD_SYMBOL(sspev_) + LOAD_SYMBOL(sspevd_) + LOAD_SYMBOL(sspevx_) + LOAD_SYMBOL(sspgst_) + LOAD_SYMBOL(sspgv_) + LOAD_SYMBOL(sspgvd_) + LOAD_SYMBOL(sspgvx_) + LOAD_SYMBOL(ssprfs_) + LOAD_SYMBOL(sspsv_) + LOAD_SYMBOL(sspsvx_) + LOAD_SYMBOL(ssptrd_) + LOAD_SYMBOL(ssptrf_) + LOAD_SYMBOL(ssptri_) + LOAD_SYMBOL(ssptrs_) + LOAD_SYMBOL(sstebz_) + LOAD_SYMBOL(sstedc_) + LOAD_SYMBOL(sstegr_) + LOAD_SYMBOL(sstein_) + LOAD_SYMBOL(sstemr_) + LOAD_SYMBOL(ssteqr_) + LOAD_SYMBOL(ssterf_) + LOAD_SYMBOL(sstev_) + LOAD_SYMBOL(sstevd_) + LOAD_SYMBOL(sstevr_) + LOAD_SYMBOL(sstevx_) + LOAD_SYMBOL(ssycon_) + LOAD_SYMBOL(ssyev_) + LOAD_SYMBOL(ssyevd_) + LOAD_SYMBOL(ssyevr_) + LOAD_SYMBOL(ssyevx_) + LOAD_SYMBOL(ssygs2_) + LOAD_SYMBOL(ssygst_) + LOAD_SYMBOL(ssygv_) + LOAD_SYMBOL(ssygvd_) + LOAD_SYMBOL(ssygvx_) + LOAD_SYMBOL(ssyrfs_) + LOAD_SYMBOL(ssysv_) + LOAD_SYMBOL(ssysvx_) + LOAD_SYMBOL(ssytd2_) + LOAD_SYMBOL(ssytf2_) + LOAD_SYMBOL(ssytrd_) + LOAD_SYMBOL(ssytrf_) + LOAD_SYMBOL(ssytri_) + LOAD_SYMBOL(ssytrs_) + LOAD_SYMBOL(stbcon_) + LOAD_SYMBOL(stbrfs_) + LOAD_SYMBOL(stbtrs_) + LOAD_SYMBOL(stgevc_) + LOAD_SYMBOL(stgex2_) + LOAD_SYMBOL(stgexc_) + LOAD_SYMBOL(stgsen_) + LOAD_SYMBOL(stgsja_) + LOAD_SYMBOL(stgsna_) + LOAD_SYMBOL(stgsy2_) + LOAD_SYMBOL(stgsyl_) + LOAD_SYMBOL(stpcon_) + LOAD_SYMBOL(stprfs_) + LOAD_SYMBOL(stptri_) + LOAD_SYMBOL(stptrs_) + LOAD_SYMBOL(strcon_) + LOAD_SYMBOL(strevc_) + LOAD_SYMBOL(strexc_) + LOAD_SYMBOL(strrfs_) + LOAD_SYMBOL(strsen_) + LOAD_SYMBOL(strsna_) + LOAD_SYMBOL(strsyl_) + LOAD_SYMBOL(strti2_) + LOAD_SYMBOL(strtri_) + LOAD_SYMBOL(strtrs_) + LOAD_SYMBOL(stzrqf_) + LOAD_SYMBOL(stzrzf_) + LOAD_SYMBOL(dlamch_) + LOAD_SYMBOL(dlamc1_) + LOAD_SYMBOL(dlamc2_) + LOAD_SYMBOL(dlamc3_) + LOAD_SYMBOL(dlamc4_) + LOAD_SYMBOL(dlamc5_) + LOAD_SYMBOL(dsecnd_) + LOAD_SYMBOL(lsame_) + LOAD_SYMBOL(second_) + LOAD_SYMBOL(slamch_) + LOAD_SYMBOL(slamc1_) + LOAD_SYMBOL(slamc2_) + LOAD_SYMBOL(slamc3_) + LOAD_SYMBOL(slamc4_) + LOAD_SYMBOL(slamc5_) + +#undef LOAD_SYMBOL + + return JNI_VERSION_1_6; +} + +void JNI_OnUnload(UNUSED JavaVM *vm, UNUSED void *reserved) { + dlclose(lapack); +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/LAPACKTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/LAPACKTest.java index a0f76ae3..246736a0 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/LAPACKTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/LAPACKTest.java @@ -32,17 +32,10 @@ public class LAPACKTest { private static Stream LAPACKImplementations() { Stream instances = Stream.of( - Arguments.of(dev.ludovic.netlib.lapack.NetlibF2jLAPACK.getInstance()) + Arguments.of(dev.ludovic.netlib.lapack.F2jLAPACK.getInstance()), + Arguments.of(dev.ludovic.netlib.lapack.JNILAPACK.getInstance()) ); - try { - instances = Stream.concat(instances, Stream.of( - dev.ludovic.netlib.lapack.NetlibNativeLAPACK.getInstance() - )); - } catch (ExceptionInInitializerError e) { - } catch (NoClassDefFoundError e) { - } - return instances; } } From 6e230fd3d4ab606b1800fc6d6fd95ed769bdcc49 Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Wed, 28 Apr 2021 19:13:50 +0200 Subject: [PATCH 11/42] Make sure critical JNI regions don't contain unecessary JNI calls --- blas/src/main/native/jni.c | 852 ++++++++++++++++++------------------- 1 file changed, 426 insertions(+), 426 deletions(-) diff --git a/blas/src/main/native/jni.c b/blas/src/main/native/jni.c index a8a1d7c4..cea6b874 100644 --- a/blas/src/main/native/jni.c +++ b/blas/src/main/native/jni.c @@ -43,16 +43,16 @@ static double (*dasum_)(int *n, double *x, int *incx); jdouble Java_dev_ludovic_netlib_blas_JNIBLAS_dasumK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray x, jint offsetx, jint incx) { jdouble ret; - jboolean failedOOM = FALSE; + jboolean failed = FALSE; double *nx = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; ret = dasum_(&n, nx + offsetx, &incx); done: if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (failedOOM) throwOOM(env); + if (failed) throwOOM(env); return ret; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -61,16 +61,16 @@ static float (*sasum_)(int *n, float *x, int *incx); jfloat Java_dev_ludovic_netlib_blas_JNIBLAS_sasumK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray x, jint offsetx, jint incx) { jfloat ret; - jboolean failedOOM = FALSE; + jboolean failed = FALSE; float *nx = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; ret = sasum_(&n, nx + offsetx, &incx); done: if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (failedOOM) throwOOM(env); + if (failed) throwOOM(env); return ret; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -78,18 +78,18 @@ static void (*daxpy_)(int *n, double *alpha, double *x, int *incx, double *y, in void Java_dev_ludovic_netlib_blas_JNIBLAS_daxpyK(JNIEnv *env, UNUSED jobject obj, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; double *nx = NULL, *ny = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; daxpy_(&n, &alpha, nx + offsetx, &incx, ny + offsety, &incy); done: + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, failed ? JNI_ABORT : 0); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); - if (failedOOM) throwOOM(env); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -97,18 +97,18 @@ static void (*saxpy_)(int *n, float *alpha, float *x, int *incx, float *y, int * void Java_dev_ludovic_netlib_blas_JNIBLAS_saxpyK(JNIEnv *env, UNUSED jobject obj, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; float *nx = NULL, *ny = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; saxpy_(&n, &alpha, nx + offsetx, &incx, ny + offsety, &incy); done: + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, failed ? JNI_ABORT : 0); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); - if (failedOOM) throwOOM(env); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -116,18 +116,18 @@ static void (*dcopy_)(int *n, double *x, int *incx, double *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_dcopyK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; double *nx = NULL, *ny = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; dcopy_(&n, nx + offsetx, &incx, ny + offsety, &incy); done: + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, failed ? JNI_ABORT : 0); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); - if (failedOOM) throwOOM(env); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -135,18 +135,18 @@ static void (*scopy_)(int *n, float *x, int *incx, float *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_scopyK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; float *nx = NULL, *ny = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; scopy_(&n, nx + offsetx, &incx, ny + offsety, &incy); done: + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, failed ? JNI_ABORT : 0); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); - if (failedOOM) throwOOM(env); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -154,19 +154,19 @@ static double (*ddot_)(int *n, double *x, int *incx, double *y, int *incy); jdouble Java_dev_ludovic_netlib_blas_JNIBLAS_ddotK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; jdouble ret; double *nx = NULL, *ny = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; ret = ddot_(&n, nx + offsetx, &incx, ny + offsety, &incy); done: - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); - if (failedOOM) throwOOM(env); + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (failed) throwOOM(env); return ret; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -175,18 +175,18 @@ static float (*sdot_)(int *n, float *x, int *incx, float *y, int *incy); jfloat Java_dev_ludovic_netlib_blas_JNIBLAS_sdotK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy) { jfloat ret; - jboolean failedOOM = FALSE; + jboolean failed = FALSE; float *nx = NULL, *ny = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; ret = sdot_(&n, nx + offsetx, &incx, ny + offsety, &incy); done: - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); - if (failedOOM) throwOOM(env); + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (failed) throwOOM(env); return ret; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -195,18 +195,18 @@ static float (*sdsdot_)(int *n, float *sb, float *sx, int *incsx, float *sy, int jfloat Java_dev_ludovic_netlib_blas_JNIBLAS_sdsdotK(JNIEnv *env, UNUSED jobject obj, jint n, jfloat sb, jfloatArray sx, jint offsetsx, jint incsx, jfloatArray sy, jint offsetsy, jint incsy) { jfloat ret; - jboolean failedOOM = FALSE; + jboolean failed = FALSE; float *nsx = NULL, *nsy = NULL; - if (!(nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto failOOM; - if (!(nsy = (*env)->GetPrimitiveArrayCritical(env, sy, NULL))) goto failOOM; + if (!(nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto fail; + if (!(nsy = (*env)->GetPrimitiveArrayCritical(env, sy, NULL))) goto fail; ret = sdsdot_(&n, &sb, nsx + offsetsx, &incsx, nsy + offsetsy, &incsy); done: - if (nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, nsx, JNI_ABORT); if (nsy) (*env)->ReleasePrimitiveArrayCritical(env, sy, nsy, JNI_ABORT); - if (failedOOM) throwOOM(env); + if (nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, nsx, JNI_ABORT); + if (failed) throwOOM(env); return ret; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -214,22 +214,22 @@ static void (*dgbmv_)(const char *trans, int *m, int *n, int *kl, int *ku, doubl void Java_dev_ludovic_netlib_blas_JNIBLAS_dgbmvK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint m, jint n, jint kl, jint ku, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx, jdouble beta, jdoubleArray y, jint offsety, jint incy) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; const char *ntrans = NULL; double *na = NULL, *nx = NULL, *ny = NULL; - if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto failOOM; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; dgbmv_(ntrans, &m, &n, &kl, &ku, &alpha, na + offseta, &lda, nx + offsetx, &incx, &beta, ny + offsety, &incy); done: - if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, failed ? JNI_ABORT : 0); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); - if (failedOOM) throwOOM(env); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -237,22 +237,22 @@ static void (*sgbmv_)(const char *trans, int *m, int *n, int *kl, int *ku, float void Java_dev_ludovic_netlib_blas_JNIBLAS_sgbmvK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint m, jint n, jint kl, jint ku, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx, jfloat beta, jfloatArray y, jint offsety, jint incy) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; const char *ntrans = NULL; float *na = NULL, *nx = NULL, *ny = NULL; - if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto failOOM; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; sgbmv_(ntrans, &m, &n, &kl, &ku, &alpha, na + offseta, &lda, nx + offsetx, &incx, &beta, ny + offsety, &incy); done: - if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, failed ? JNI_ABORT : 0); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); - if (failedOOM) throwOOM(env); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -260,24 +260,24 @@ static void (*dgemm_)(const char *transa, const char *transb, int *m, int *n, in void Java_dev_ludovic_netlib_blas_JNIBLAS_dgemmK(JNIEnv *env, UNUSED jobject obj, jstring transa, jstring transb, jint m, jint n, jint k, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble beta, jdoubleArray c, jint offsetc, jint ldc) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; const char *ntransa = NULL, *ntransb = NULL; double *na = NULL, *nb = NULL, *nc = NULL; - if (!(ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) goto failOOM; - if (!(ntransb = (*env)->GetStringUTFChars(env, transb, NULL))) goto failOOM; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; - if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto failOOM; - if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOOM; + if (!(ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) goto fail; + if (!(ntransb = (*env)->GetStringUTFChars(env, transb, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; dgemm_(ntransa, ntransb, &m, &n, &k, &alpha, na + offseta, &lda, nb + offsetb, &ldb, &beta, nc + offsetc, &ldc); done: - if (ntransa) (*env)->ReleaseStringUTFChars(env, transa, ntransa); - if (ntransb) (*env)->ReleaseStringUTFChars(env, transb, ntransb); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, failed ? JNI_ABORT : 0); if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, JNI_ABORT); - if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, 0); - if (failedOOM) throwOOM(env); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (ntransb) (*env)->ReleaseStringUTFChars(env, transb, ntransb); + if (ntransa) (*env)->ReleaseStringUTFChars(env, transa, ntransa); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -285,24 +285,24 @@ static void (*sgemm_)(const char *transa, const char *transb, int *m, int *n, in void Java_dev_ludovic_netlib_blas_JNIBLAS_sgemmK(JNIEnv *env, UNUSED jobject obj, jstring transa, jstring transb, jint m, jint n, jint k, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat beta, jfloatArray c, jint offsetc, jint ldc) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; const char *ntransa = NULL, *ntransb = NULL; float *na = NULL, *nb = NULL, *nc = NULL; - if (!(ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) goto failOOM; - if (!(ntransb = (*env)->GetStringUTFChars(env, transb, NULL))) goto failOOM; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; - if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto failOOM; - if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOOM; + if (!(ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) goto fail; + if (!(ntransb = (*env)->GetStringUTFChars(env, transb, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; sgemm_(ntransa, ntransb, &m, &n, &k, &alpha, na + offseta, &lda, nb + offsetb, &ldb, &beta, nc + offsetc, &ldc); done: - if (ntransa) (*env)->ReleaseStringUTFChars(env, transa, ntransa); - if (ntransb) (*env)->ReleaseStringUTFChars(env, transb, ntransb); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, failed ? JNI_ABORT : 0); if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, JNI_ABORT); - if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, 0); - if (failedOOM) throwOOM(env); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (ntransb) (*env)->ReleaseStringUTFChars(env, transb, ntransb); + if (ntransa) (*env)->ReleaseStringUTFChars(env, transa, ntransa); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -310,22 +310,22 @@ static void (*dgemv_)(const char *trans, int *m, int *n, double *alpha, double * void Java_dev_ludovic_netlib_blas_JNIBLAS_dgemvK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint m, jint n, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx, jdouble beta, jdoubleArray y, jint offsety, jint incy) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; const char *ntrans = NULL; jdouble *na = NULL, *nx = NULL, *ny = NULL; - if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto failOOM; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; dgemv_(ntrans, &m, &n, &alpha, na + offseta, &lda, nx + offsetx, &incx, &beta, ny + offsety, &incy); done: - if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, failed ? JNI_ABORT : 0); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); - if (failedOOM) throwOOM(env); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -333,22 +333,22 @@ static void (*sgemv_)(const char *trans, int *m, int *n, float *alpha, float *a, void Java_dev_ludovic_netlib_blas_JNIBLAS_sgemvK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint m, jint n, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx, jfloat beta, jfloatArray y, jint offsety, jint incy) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; const char *ntrans = NULL; float *na = NULL, *nx = NULL, *ny = NULL; - if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto failOOM; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; sgemv_(ntrans, &m, &n, &alpha, na + offseta, &lda, nx + offsetx, &incx, &beta, ny + offsety, &incy); done: - if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, failed ? JNI_ABORT : 0); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); - if (failedOOM) throwOOM(env); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -356,20 +356,20 @@ static void (*dger_)(int *m, int *n, double *alpha, double *x, int *incx, double void Java_dev_ludovic_netlib_blas_JNIBLAS_dgerK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy, jdoubleArray a, jint offseta, jint lda) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; double *na = NULL, *nx = NULL, *ny = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; dger_(&m, &n, &alpha, nx + offsetx, &incx, ny + offsety, &incy, na + offseta, &lda); done: - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, failed ? JNI_ABORT : 0); if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, 0); - if (failedOOM) throwOOM(env); + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -377,20 +377,20 @@ static void (*sger_)(int *m, int *n, float *alpha, float *x, int *incx, float *y void Java_dev_ludovic_netlib_blas_JNIBLAS_sgerK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy, jfloatArray a, jint offseta, jint lda) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; float *na = NULL, *nx = NULL, *ny = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; sger_(&m, &n, &alpha, nx + offsetx, &incx, ny + offsety, &incy, na + offseta, &lda); done: - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, failed ? JNI_ABORT : 0); if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, 0); - if (failedOOM) throwOOM(env); + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -399,16 +399,16 @@ static double (*dnrm2_)(int *n, double *x, int *incx); jdouble Java_dev_ludovic_netlib_blas_JNIBLAS_dnrm2K(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray x, jint offsetx, jint incx) { jdouble ret; - jboolean failedOOM = FALSE; + jboolean failed = FALSE; double *nx = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; ret = dnrm2_(&n, nx + offsetx, &incx); done: if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (failedOOM) throwOOM(env); + if (failed) throwOOM(env); return ret; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -417,16 +417,16 @@ static float (*snrm2_)(int *n, float *x, int *incx); jfloat Java_dev_ludovic_netlib_blas_JNIBLAS_snrm2K(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray x, jint offsetx, jint incx) { jfloat ret; - jboolean failedOOM = FALSE; + jboolean failed = FALSE; float *nx = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; ret = snrm2_(&n, nx + offsetx, &incx); done: if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (failedOOM) throwOOM(env); + if (failed) throwOOM(env); return ret; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -434,18 +434,18 @@ static void (*drot_)(int *n, double *dx, int *incx, double *dy, int *incy, doubl void Java_dev_ludovic_netlib_blas_JNIBLAS_drotK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray dx, jint offsetdx, jint incx, jdoubleArray dy, jint offsetdy, jint incy, jdouble c, jdouble s) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; double *ndx = NULL, *ndy = NULL; - if (!(ndx = (*env)->GetPrimitiveArrayCritical(env, dx, NULL))) goto failOOM; - if (!(ndy = (*env)->GetPrimitiveArrayCritical(env, dy, NULL))) goto failOOM; + if (!(ndx = (*env)->GetPrimitiveArrayCritical(env, dx, NULL))) goto fail; + if (!(ndy = (*env)->GetPrimitiveArrayCritical(env, dy, NULL))) goto fail; drot_(&n, ndx + offsetdx, &incx, ndy + offsetdy, &incy, &c, &s); done: - if (ndx) (*env)->ReleasePrimitiveArrayCritical(env, dx, ndx, 0); - if (ndy) (*env)->ReleasePrimitiveArrayCritical(env, dy, ndy, 0); - if (failedOOM) throwOOM(env); + if (ndy) (*env)->ReleasePrimitiveArrayCritical(env, dy, ndy, failed ? JNI_ABORT : 0); + if (ndx) (*env)->ReleasePrimitiveArrayCritical(env, dx, ndx, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -453,18 +453,18 @@ static void (*srot_)(int *n, float *sx, int *incx, float *sy, int *incy, float * void Java_dev_ludovic_netlib_blas_JNIBLAS_srotK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray sx, jint offsetsx, jint incx, jfloatArray sy, jint offsetsy, jint incy, jfloat c, jfloat s) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; float *nsx = NULL, *nsy = NULL; - if (!(nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto failOOM; - if (!(nsy = (*env)->GetPrimitiveArrayCritical(env, sy, NULL))) goto failOOM; + if (!(nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto fail; + if (!(nsy = (*env)->GetPrimitiveArrayCritical(env, sy, NULL))) goto fail; srot_(&n, nsx + offsetsx, &incx, nsy + offsetsy, &incy, &c, &s); done: - if (nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, nsx, 0); - if (nsy) (*env)->ReleasePrimitiveArrayCritical(env, sy, nsy, 0); - if (failedOOM) throwOOM(env); + if (nsy) (*env)->ReleasePrimitiveArrayCritical(env, sy, nsy, failed ? JNI_ABORT : 0); + if (nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, nsx, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -472,20 +472,20 @@ static void (*drotm_)(int *n, double *dx, int *incx, double *dy, int *incy, doub void Java_dev_ludovic_netlib_blas_JNIBLAS_drotmK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray dx, jint offsetdx, jint incx, jdoubleArray dy, jint offsetdy, jint incy, jdoubleArray dparam, jint offsetdparam) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; double *ndx = NULL, *ndy = NULL, *ndparam = NULL; - if (!(ndx = (*env)->GetPrimitiveArrayCritical(env, dx, NULL))) goto failOOM; - if (!(ndy = (*env)->GetPrimitiveArrayCritical(env, dy, NULL))) goto failOOM; - if (!(ndparam = (*env)->GetPrimitiveArrayCritical(env, dparam, NULL))) goto failOOM; + if (!(ndx = (*env)->GetPrimitiveArrayCritical(env, dx, NULL))) goto fail; + if (!(ndy = (*env)->GetPrimitiveArrayCritical(env, dy, NULL))) goto fail; + if (!(ndparam = (*env)->GetPrimitiveArrayCritical(env, dparam, NULL))) goto fail; drotm_(&n, ndx + offsetdx, &incx, ndy + offsetdy, &incy, ndparam + offsetdparam); done: - if (ndx) (*env)->ReleasePrimitiveArrayCritical(env, dx, ndx, JNI_ABORT); - if (ndy) (*env)->ReleasePrimitiveArrayCritical(env, dy, ndy, 0); if (ndparam) (*env)->ReleasePrimitiveArrayCritical(env, dparam, ndparam, JNI_ABORT); - if (failedOOM) throwOOM(env); + if (ndy) (*env)->ReleasePrimitiveArrayCritical(env, dy, ndy, failed ? JNI_ABORT : 0); + if (ndx) (*env)->ReleasePrimitiveArrayCritical(env, dx, ndx, JNI_ABORT); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -493,20 +493,20 @@ static void (*srotm_)(int *n, float *sx, int *incx, float *sy, int *incy, float void Java_dev_ludovic_netlib_blas_JNIBLAS_srotmK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray sx, jint offsetsx, jint incx, jfloatArray sy, jint offsetsy, jint incy, jfloatArray sparam, jint offsetsparam) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; float *nsx = NULL, *nsy = NULL, *nsparam = NULL; - if (!(nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto failOOM; - if (!(nsy = (*env)->GetPrimitiveArrayCritical(env, sy, NULL))) goto failOOM; - if (!(nsparam = (*env)->GetPrimitiveArrayCritical(env, sparam, NULL))) goto failOOM; + if (!(nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto fail; + if (!(nsy = (*env)->GetPrimitiveArrayCritical(env, sy, NULL))) goto fail; + if (!(nsparam = (*env)->GetPrimitiveArrayCritical(env, sparam, NULL))) goto fail; srotm_(&n, nsx + offsetsx, &incx, nsy + offsetsy, &incy, nsparam + offsetsparam); done: - if (nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, nsx, JNI_ABORT); - if (nsy) (*env)->ReleasePrimitiveArrayCritical(env, sy, nsy, 0); if (nsparam) (*env)->ReleasePrimitiveArrayCritical(env, sparam, nsparam, JNI_ABORT); - if (failedOOM) throwOOM(env); + if (nsy) (*env)->ReleasePrimitiveArrayCritical(env, sy, nsy, failed ? JNI_ABORT : 0); + if (nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, nsx, JNI_ABORT); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -542,16 +542,16 @@ static void (*dscal_)(int *n, double *alpha, double *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_dscalK(JNIEnv *env, UNUSED jobject obj, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; double *nx = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; dscal_(&n, &alpha, nx + offsetx, &incx); done: - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, 0); - if (failedOOM) throwOOM(env); + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -559,16 +559,16 @@ static void (*sscal_)(int *n, float *alpha, float *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_sscalK(JNIEnv *env, UNUSED jobject obj, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; float *nx = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; sscal_(&n, &alpha, nx + offsetx, &incx); done: - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, 0); - if (failedOOM) throwOOM(env); + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -576,22 +576,22 @@ static void (*dspmv_)(const char *uplo, int *n, double *alpha, double *a, double void Java_dev_ludovic_netlib_blas_JNIBLAS_dspmvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdouble alpha, jdoubleArray a, jint offseta, jdoubleArray x, jint offsetx, jint incx, jdouble beta, jdoubleArray y, jint offsety, jint incy) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; const char *nuplo = NULL; double *na = NULL, *nx = NULL, *ny = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; dspmv_(nuplo, &n, &alpha, na + offseta, nx + offsetx, &incx, &beta, ny + offsety, &incy); done: - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, failed ? JNI_ABORT : 0); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); - if (failedOOM) throwOOM(env); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -599,22 +599,22 @@ static void (*sspmv_)(const char *uplo, int *n, float *alpha, float *a, float *x void Java_dev_ludovic_netlib_blas_JNIBLAS_sspmvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloat alpha, jfloatArray a, jint offseta, jfloatArray x, jint offsetx, jint incx, jfloat beta, jfloatArray y, jint offsety, jint incy) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; const char *nuplo = NULL; float *na = NULL, *nx = NULL, *ny = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; sspmv_(nuplo, &n, &alpha, na + offseta, nx + offsetx, &incx, &beta, ny + offsety, &incy); done: - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, failed ? JNI_ABORT : 0); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); - if (failedOOM) throwOOM(env); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -622,20 +622,20 @@ static void (*dspr_)(const char *uplo, int *n, double *alpha, double *x, int *in void Java_dev_ludovic_netlib_blas_JNIBLAS_dsprK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray a, jint offseta) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; const char *nuplo = NULL; double *na = NULL, *nx = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; dspr_(nuplo, &n, &alpha, nx + offsetx, &incx, na + offseta); done: - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, failed ? JNI_ABORT : 0); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, 0); - if (failedOOM) throwOOM(env); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -643,20 +643,20 @@ static void (*sspr_)(const char *uplo, int *n, float *alpha, float *x, int *incx void Java_dev_ludovic_netlib_blas_JNIBLAS_ssprK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray a, jint offseta) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; const char *nuplo = NULL; float *na = NULL, *nx = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; sspr_(nuplo, &n, &alpha, nx + offsetx, &incx, na + offseta); done: - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, failed ? JNI_ABORT : 0); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, 0); - if (failedOOM) throwOOM(env); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -664,22 +664,22 @@ static void (*dspr2_)(const char *uplo, int *n, double *alpha, double *x, int *i void Java_dev_ludovic_netlib_blas_JNIBLAS_dspr2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy, jdoubleArray a, jint offseta) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; const char *nuplo = NULL; double *na = NULL, *nx = NULL, *ny = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; dspr2_(nuplo, &n, &alpha, nx + offsetx, &incx, ny + offsety, &incy, na + offseta); done: - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, failed ? JNI_ABORT : 0); if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, 0); - if (failedOOM) throwOOM(env); + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -687,22 +687,22 @@ static void (*sspr2_)(const char *uplo, int *n, float *alpha, float *x, int *inc void Java_dev_ludovic_netlib_blas_JNIBLAS_sspr2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy, jfloatArray a, jint offseta) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; const char *nuplo = NULL; float *na = NULL, *nx = NULL, *ny = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; sspr2_(nuplo, &n, &alpha, nx + offsetx, &incx, ny + offsety, &incy, na + offseta); done: - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, failed ? JNI_ABORT : 0); if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, 0); - if (failedOOM) throwOOM(env); + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -710,18 +710,18 @@ static void (*dswap_)(int *n, double *x, int *incx, double *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_dswapK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; double *nx = NULL, *ny = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; dswap_(&n, nx + offsetx, &incx, ny + offsety, &incy); done: - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, 0); - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); - if (failedOOM) throwOOM(env); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, failed ? JNI_ABORT : 0); + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -729,18 +729,18 @@ static void (*sswap_)(int *n, float *x, int *incx, float *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_sswapK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; float *nx = NULL, *ny = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; sswap_(&n, nx + offsetx, &incx, ny + offsety, &incy); done: - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, 0); - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); - if (failedOOM) throwOOM(env); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, failed ? JNI_ABORT : 0); + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -748,24 +748,24 @@ static void (*dsymm_)(const char *side, const char *uplo, int *m, int *n, double void Java_dev_ludovic_netlib_blas_JNIBLAS_dsymmK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring uplo, jint m, jint n, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble beta, jdoubleArray c, jint offsetc, jint ldc) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; const char *nside = NULL, *nuplo = NULL; double *na = NULL, *nb = NULL, *nc = NULL; - if (!(nside = (*env)->GetStringUTFChars(env, side, NULL))) goto failOOM; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; - if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto failOOM; - if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOOM; + if (!(nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; dsymm_(nside, nuplo, &m, &n, &alpha, na + offseta, &lda, nb + offsetb, &ldb, &beta, nc + offsetc, &ldc); done: - if (nside) (*env)->ReleaseStringUTFChars(env, side, nside); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, failed ? JNI_ABORT : 0); if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, JNI_ABORT); - if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, 0); - if (failedOOM) throwOOM(env); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (nside) (*env)->ReleaseStringUTFChars(env, side, nside); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -773,24 +773,24 @@ static void (*ssymm_)(const char *side, const char *uplo, int *m, int *n, float void Java_dev_ludovic_netlib_blas_JNIBLAS_ssymmK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring uplo, jint m, jint n, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat beta, jfloatArray c, jint offsetc, jint ldc) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; const char *nside = NULL, *nuplo = NULL; float *na = NULL, *nb = NULL, *nc = NULL; - if (!(nside = (*env)->GetStringUTFChars(env, side, NULL))) goto failOOM; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; - if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto failOOM; - if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOOM; + if (!(nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; ssymm_(nside, nuplo, &m, &n, &alpha, na + offseta, &lda, nb + offsetb, &ldb, &beta, nc + offsetc, &ldc); done: - if (nside) (*env)->ReleaseStringUTFChars(env, side, nside); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, failed ? JNI_ABORT : 0); if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, JNI_ABORT); - if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, 0); - if (failedOOM) throwOOM(env); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (nside) (*env)->ReleaseStringUTFChars(env, side, nside); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -798,22 +798,22 @@ static void (*dsymv_)(const char *uplo, int *n, double *alpha, double *a, int *l void Java_dev_ludovic_netlib_blas_JNIBLAS_dsymvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx, jdouble beta, jdoubleArray y, jint offsety, jint incy) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; const char *nuplo = NULL; double *na = NULL, *nx = NULL, *ny = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; dsymv_(nuplo, &n, &alpha, na + offseta, &lda, nx + offsetx, &incx, &beta, ny + offsety, &incy); done: - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, failed ? JNI_ABORT : 0); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); - if (failedOOM) throwOOM(env); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -821,22 +821,22 @@ static void (*ssymv_)(const char *uplo, int *n, float *alpha, float *a, int *lda void Java_dev_ludovic_netlib_blas_JNIBLAS_ssymvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx, jfloat beta, jfloatArray y, jint offsety, jint incy) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; const char *nuplo = NULL; float *na = NULL, *nx = NULL, *ny = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; ssymv_(nuplo, &n, &alpha, na + offseta, &lda, nx + offsetx, &incx, &beta, ny + offsety, &incy); done: - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, failed ? JNI_ABORT : 0); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); - if (failedOOM) throwOOM(env); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -844,20 +844,20 @@ static void (*dsyr_)(const char *uplo, int *n, double *alpha, double *x, int *in void Java_dev_ludovic_netlib_blas_JNIBLAS_dsyrK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray a, jint offseta, jint lda) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; const char *nuplo = NULL; double *na = NULL, *nx = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; dsyr_(nuplo, &n, &alpha, nx + offsetx, &incx, na + offseta, &lda); done: - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, failed ? JNI_ABORT : 0); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, 0); - if (failedOOM) throwOOM(env); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -865,20 +865,20 @@ static void (*ssyr_)(const char *uplo, int *n, float *alpha, float *x, int *incx void Java_dev_ludovic_netlib_blas_JNIBLAS_ssyrK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray a, jint offseta, jint lda) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; const char *nuplo = NULL; float *na = NULL, *nx = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; ssyr_(nuplo, &n, &alpha, nx + offsetx, &incx, na + offseta, &lda); done: - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, failed ? JNI_ABORT : 0); if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, 0); - if (failedOOM) throwOOM(env); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -886,22 +886,22 @@ static void (*dsyr2_)(const char *uplo, int *n, double *alpha, double *x, int *i void Java_dev_ludovic_netlib_blas_JNIBLAS_dsyr2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy, jdoubleArray a, jint offseta, jint lda) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; const char *nuplo = NULL; double *na = NULL, *nx = NULL, *ny = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; dsyr2_(nuplo, &n, &alpha, nx + offsetx, &incx, ny + offsety, &incy, na + offseta, &lda); done: - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, failed ? JNI_ABORT : 0); if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, 0); - if (failedOOM) throwOOM(env); + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -909,22 +909,22 @@ static void (*ssyr2_)(const char *uplo, int *n, float *alpha, float *x, int *inc void Java_dev_ludovic_netlib_blas_JNIBLAS_ssyr2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy, jfloatArray a, jint offseta, jint lda) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; const char *nuplo = NULL; float *na = NULL, *nx = NULL, *ny = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto failOOM; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto failOOM; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; ssyr2_(nuplo, &n, &alpha, nx + offsetx, &incx, ny + offsety, &incy, na + offseta, &lda); done: - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, failed ? JNI_ABORT : 0); if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, 0); - if (failedOOM) throwOOM(env); + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -932,23 +932,23 @@ static void (*dsyr2k_)(const char *uplo, const char *trans, int *n, int *k, doub void Java_dev_ludovic_netlib_blas_JNIBLAS_dsyr2kK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jint n, jint k, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble beta, jdoubleArray c, jint offsetc, jint ldc) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; const char *nuplo = NULL, *ntrans = NULL; double *na = NULL, *nb = NULL, *nc = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; - if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto failOOM; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; - if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto failOOM; - if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOOM; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; dsyr2k_(nuplo, ntrans, &n, &k, &alpha, na + offseta, &lda, nb + offsetb, &ldb, &beta, nc + offsetc, &ldc); done: - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, failed ? JNI_ABORT : 0); if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, JNI_ABORT); - if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, 0); - if (failedOOM) throwOOM(env); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -956,24 +956,24 @@ static void (*ssyr2k_)(const char *uplo, const char *trans, int *n, int *k, floa void Java_dev_ludovic_netlib_blas_JNIBLAS_ssyr2kK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jint n, jint k, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat beta, jfloatArray c, jint offsetc, jint ldc) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; const char *nuplo = NULL, *ntrans = NULL; float *na = NULL, *nb = NULL, *nc = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; - if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto failOOM; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; - if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto failOOM; - if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOOM; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; ssyr2k_(nuplo, ntrans, &n, &k, &alpha, na + offseta, &lda, nb + offsetb, &ldb, &beta, nc + offsetc, &ldc); done: - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); - if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, failed ? JNI_ABORT : 0); if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, JNI_ABORT); - if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, 0); - if (failedOOM) throwOOM(env); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -981,22 +981,22 @@ static void (*dsyrk_)(const char *uplo, const char *trans, int *n, int *k, doubl void Java_dev_ludovic_netlib_blas_JNIBLAS_dsyrkK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jint n, jint k, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdouble beta, jdoubleArray c, jint offsetc, jint ldc) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; const char *nuplo = NULL, *ntrans = NULL; double *na = NULL, *nc = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; - if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto failOOM; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; - if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOOM; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; dsyrk_(nuplo, ntrans, &n, &k, &alpha, na + offseta, &lda, &beta, nc + offsetc, &ldc); done: - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); - if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); + if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, failed ? JNI_ABORT : 0); if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, 0); - if (failedOOM) throwOOM(env); + if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -1004,22 +1004,22 @@ static void (*ssyrk_)(const char *uplo, const char *trans, int *n, int *k, float void Java_dev_ludovic_netlib_blas_JNIBLAS_ssyrkK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jint n, jint k, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloat beta, jfloatArray c, jint offsetc, jint ldc) { - jboolean failedOOM = FALSE; + jboolean failed = FALSE; const char *nuplo = NULL, *ntrans = NULL; float *na = NULL, *nc = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; - if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto failOOM; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto failOOM; - if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto failOOM; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; ssyrk_(nuplo, ntrans, &n, &k, &alpha, na + offseta, &lda, &beta, nc + offsetc, &ldc); done: - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); - if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); + if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, failed ? JNI_ABORT : 0); if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, 0); - if (failedOOM) throwOOM(env); + if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -1140,17 +1140,17 @@ static int (*idamax_)(int *n, double *dx, int *incdx); jint Java_dev_ludovic_netlib_blas_JNIBLAS_idamaxK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray dx, jint offsetdx, jint incdx) { jint ret; - jboolean failedOOM = FALSE; + jboolean failed = FALSE; double *ndx = NULL; - if (!(ndx = (*env)->GetPrimitiveArrayCritical(env, dx, NULL))) goto failOOM; + if (!(ndx = (*env)->GetPrimitiveArrayCritical(env, dx, NULL))) goto fail; // It returns 1-based index because that's how Fortran works ret = idamax_(&n, ndx + offsetdx, &incdx) - 1; done: if (ndx) (*env)->ReleasePrimitiveArrayCritical(env, dx, ndx, JNI_ABORT); - if (failedOOM) throwOOM(env); + if (failed) throwOOM(env); return ret; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } @@ -1159,17 +1159,17 @@ static int (*isamax_)(int *n, float *sx, int *incsx); jint Java_dev_ludovic_netlib_blas_JNIBLAS_isamaxK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray sx, jint offsetsx, jint incsx) { jint ret; - jboolean failedOOM = FALSE; + jboolean failed = FALSE; float *nsx = NULL; - if (!(nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto failOOM; + if (!(nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto fail; // It returns 1-based index because that's how Fortran works ret = isamax_(&n, nsx + offsetsx, &incsx) - 1; done: if (nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, nsx, JNI_ABORT); - if (failedOOM) throwOOM(env); + if (failed) throwOOM(env); return ret; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } From ea4672ff3e7d2a0358b0c2864d7b75496b08b21f Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Wed, 28 Apr 2021 19:14:36 +0200 Subject: [PATCH 12/42] Do better error handling + Load org.netlib.util.*W types --- blas/src/main/native/jni.c | 95 ++++++++++++++++++++++++++++++++------ 1 file changed, 80 insertions(+), 15 deletions(-) diff --git a/blas/src/main/native/jni.c b/blas/src/main/native/jni.c index cea6b874..d5878ea6 100644 --- a/blas/src/main/native/jni.c +++ b/blas/src/main/native/jni.c @@ -34,6 +34,14 @@ #define TRUE 1 #define FALSE 0 +static jfieldID booleanW_val_fieldID; +static jfieldID intW_val_fieldID; +static jfieldID floatW_val_fieldID; +static jfieldID doubleW_val_fieldID; +static jfieldID StringW_val_fieldID; + +static void *blas; + static void throwOOM(JNIEnv *env) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } @@ -1173,12 +1181,17 @@ jint Java_dev_ludovic_netlib_blas_JNIBLAS_isamaxK(JNIEnv *env, UNUSED jobject ob goto done; } -static void *blas; - -jstring get_system_property(JNIEnv *env, jstring key, jstring def) { - jclass klass = (*env)->FindClass(env, "java/lang/System"); - jmethodID method = (*env)->GetStaticMethodID(env, klass, "getProperty", "(Ljava/lang/String;Ljava/lang/String;)Ljava/lang/String;"); - return (jstring)(*env)->CallStaticObjectMethod(env, klass, method, key, def); +jboolean get_system_property(JNIEnv *env, jstring key, jstring def, jstring *res) { + jclass System_class = (*env)->FindClass(env, "java/lang/System"); + if (!System_class) { + return FALSE; + } + jmethodID System_getProperty_methodID = (*env)->GetStaticMethodID(env, System_class, "getProperty", "(Ljava/lang/String;Ljava/lang/String;)Ljava/lang/String;"); + if (!System_getProperty_methodID) { + return FALSE; + } + *res = (jstring)(*env)->CallStaticObjectMethod(env, System_class, System_getProperty_methodID, key, def); + return TRUE; } jint JNI_OnLoad(JavaVM *vm, UNUSED void *reserved) { @@ -1187,19 +1200,71 @@ jint JNI_OnLoad(JavaVM *vm, UNUSED void *reserved) { return -1; } + jclass booleanW_class = (*env)->FindClass(env, "org/netlib/util/booleanW"); + if (!booleanW_class) { + return -1; + } + booleanW_val_fieldID = (*env)->GetFieldID(env, booleanW_class, "val", "Z"); + if (!booleanW_val_fieldID) { + return -1; + } + + jclass intW_class = (*env)->FindClass(env, "org/netlib/util/intW"); + if (!intW_class) { + return -1; + } + intW_val_fieldID = (*env)->GetFieldID(env, intW_class, "val", "I"); + if (!intW_val_fieldID) { + return -1; + } + + jclass floatW_class = (*env)->FindClass(env, "org/netlib/util/floatW"); + if (!floatW_class) { + return -1; + } + floatW_val_fieldID = (*env)->GetFieldID(env, floatW_class, "val", "F"); + if (!floatW_val_fieldID) { + return -1; + } + + jclass doubleW_class = (*env)->FindClass(env, "org/netlib/util/doubleW"); + if (!doubleW_class) { + return -1; + } + doubleW_val_fieldID = (*env)->GetFieldID(env, doubleW_class, "val", "D"); + if (!doubleW_val_fieldID) { + return -1; + } + + jclass StringW_class = (*env)->FindClass(env, "org/netlib/util/StringW"); + if (!StringW_class) { + return -1; + } + StringW_val_fieldID = (*env)->GetFieldID(env, StringW_class, "val", "Ljava/lang/String;"); + if (!StringW_val_fieldID) { + return -1; + } + + jstring property_nativeLibPath; + if (!get_system_property(env, (*env)->NewStringUTF(env, "dev.ludovic.netlib.blas.nativeLibPath"), NULL, &property_nativeLibPath)) { + return -1; + } + jstring property_nativeLib; + if (!get_system_property(env, (*env)->NewStringUTF(env, "dev.ludovic.netlib.blas.nativeLib"), (*env)->NewStringUTF(env, "blas"), &property_nativeLib)) { + return -1; + } + char blas_name[1024]; - jstring native_lib_path = get_system_property(env, (*env)->NewStringUTF(env, "dev.ludovic.netlib.blas.nativeLibPath"), NULL); - jstring native_lib = get_system_property(env, (*env)->NewStringUTF(env, "dev.ludovic.netlib.blas.nativeLib"), (*env)->NewStringUTF(env, "blas")); - if (native_lib_path) { - const char *utf = (*env)->GetStringUTFChars(env, native_lib_path, NULL); + if (property_nativeLibPath) { + const char *utf = (*env)->GetStringUTFChars(env, property_nativeLibPath, NULL); snprintf(blas_name, sizeof(blas_name), "%s", utf); - (*env)->ReleaseStringUTFChars(env, native_lib_path, utf); - } else if (native_lib) { - const char *utf = (*env)->GetStringUTFChars(env, native_lib, NULL); + (*env)->ReleaseStringUTFChars(env, property_nativeLibPath, utf); + } else if (property_nativeLib) { + const char *utf = (*env)->GetStringUTFChars(env, property_nativeLib, NULL); snprintf(blas_name, sizeof(blas_name), "lib%s.so", utf); - (*env)->ReleaseStringUTFChars(env, native_lib, utf); + (*env)->ReleaseStringUTFChars(env, property_nativeLib, utf); } else { - /* native_lib should always be non-NULL */ + /* either property_nativeLibPath or property_nativeLib should always be non-NULL */ return -1; } From d023607ce2022f573964d00a55166513481eb4b6 Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Wed, 28 Apr 2021 19:17:06 +0200 Subject: [PATCH 13/42] Base implementation for LAPACK + Implement calls used by Spark I still need to come up with proper testing. --- .../dev/ludovic/netlib/lapack/JNILAPACK.java | 30 +- lapack/src/main/native/jni.c | 6513 ++++++++++------- .../dev/ludovic/netlib/lapack/DppsvTest.java | 45 + .../dev/ludovic/netlib/lapack/LAPACKTest.java | 146 + lapack/src/test/resources/X.vec | 1 + lapack/src/test/resources/Y.vec | 1 + lapack/src/test/resources/geA.mat | 1 + lapack/src/test/resources/geB.mat | 1 + lapack/src/test/resources/geC.mat | 1 + 9 files changed, 4197 insertions(+), 2542 deletions(-) create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DppsvTest.java create mode 100644 lapack/src/test/resources/X.vec create mode 100644 lapack/src/test/resources/Y.vec create mode 100644 lapack/src/test/resources/geA.mat create mode 100644 lapack/src/test/resources/geB.mat create mode 100644 lapack/src/test/resources/geC.mat diff --git a/lapack/src/main/java/dev/ludovic/netlib/lapack/JNILAPACK.java b/lapack/src/main/java/dev/ludovic/netlib/lapack/JNILAPACK.java index ea0699af..a505d08b 100644 --- a/lapack/src/main/java/dev/ludovic/netlib/lapack/JNILAPACK.java +++ b/lapack/src/main/java/dev/ludovic/netlib/lapack/JNILAPACK.java @@ -25,13 +25,39 @@ package dev.ludovic.netlib.lapack; -import dev.ludovic.netlib.LAPACK; +import java.io.InputStream; +import java.io.IOException; +import java.nio.file.Files; +import java.nio.file.Path; +import java.nio.file.StandardCopyOption; +import java.nio.file.attribute.PosixFilePermissions; public final class JNILAPACK extends AbstractLAPACK implements dev.ludovic.netlib.NativeLAPACK { private static final JNILAPACK instance = new JNILAPACK(); - protected JNILAPACK() {} + protected JNILAPACK() { + String osName = System.getProperty("os.name"); + if (osName == null || osName.isEmpty()) { + throw new RuntimeException("Unable to load native implementation"); + } + String osArch = System.getProperty("os.arch"); + if (osArch == null || osArch.isEmpty()) { + throw new RuntimeException("Unable to load native implementation"); + } + + Path temp; + try (InputStream resource = this.getClass().getClassLoader().getResourceAsStream( + String.format("resources/native/%s-%s/libnetliblapackjni.so", osName, osArch))) { + assert resource != null; + Files.copy(resource, temp = Files.createTempFile("libnetliblapackjni.so", "", + PosixFilePermissions.asFileAttribute(PosixFilePermissions.fromString("rwxr-x---"))), + StandardCopyOption.REPLACE_EXISTING); + } catch (IOException e) { + throw new RuntimeException("Unable to load native implementation", e); + } + + System.load(temp.toString());} public static dev.ludovic.netlib.NativeLAPACK getInstance() { return instance; diff --git a/lapack/src/main/native/jni.c b/lapack/src/main/native/jni.c index efc86650..8ba07a9d 100644 --- a/lapack/src/main/native/jni.c +++ b/lapack/src/main/native/jni.c @@ -31,3743 +31,5122 @@ #define UNUSED __attribute__((unused)) -static jthrowable fail(JNIEnv *env, const char *klass_name, const char *msg) { - jclass klass = (*env)->FindClass(env, klass_name); - jmethodID constructor = (*env)->GetMethodID(env, klass, "", "(Ljava/lang/String;)V"); - return (*env)->NewObject(env, klass, constructor, (*env)->NewStringUTF(env, msg)); -} +#define TRUE 1 +#define FALSE 0 -static jthrowable failOnCopy(JNIEnv *env) { - return fail(env, "java/lang/OutOfMemoryError", "Failed to copy from heap to native memory"); -} +static jfieldID booleanW_val_fieldID; +static jfieldID intW_val_fieldID; +static jfieldID floatW_val_fieldID; +static jfieldID doubleW_val_fieldID; +static jfieldID StringW_val_fieldID; -enum { - CBLAS_ROW_MAJOR = 101, - CBLAS_COL_MAJOR = 102, +static void *lapack; - CBLAS_NO_TRANS = 111, - CBLAS_TRANS = 112, - CBLAS_CONJ_TRANS = 113, +static void throwOOM(JNIEnv *env) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); +} - CBLAS_UPPER = 121, - CBLAS_LOWER = 122, +static void (*dbdsdc_)(const char *uplo, char *compq, int *n, double *d, double *e, double *u, int *ldu, double *vt, int *ldvt, double *q, int * iq, double *work, int * iwork, int *info); - CBLAS_NON_UNIT = 131, - CBLAS_UNIT = 132, +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dbdsdcK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jstring compq, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jint ldvt, jdoubleArray q, jint offsetq, jintArray iq, jint offsetiq, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} - CBLAS_LEFT = 141, - CBLAS_RIGHT = 142, -}; +static void (*dbdsqr_)(const char *uplo, int *n, int *ncvt, int *nru, int *ncc, double *d, double *e, double *vt, int *ldvt, double *u, int *ldu, double *c, int *Ldc, double *work, /*FIXME*/void *info); -static int translate_trans(JNIEnv *env, jstring str, jthrowable *exc) { - int res = 0; - const char *utf = NULL; - *exc = NULL; - if ((*env)->GetStringUTFLength(env, str) != 1) goto failOnUnknownOp; - if (!(utf = (*env)->GetStringUTFChars(env, str, NULL))) goto failOnCopy; - switch (utf[0]) { - case 'N': res = CBLAS_NO_TRANS; break; - case 'T': res = CBLAS_TRANS; break; - case 'C': res = CBLAS_CONJ_TRANS; break; - default: goto failOnUnknownOp; - } -done: - if (utf) (*env)->ReleaseStringUTFChars(env, str, utf); - return res; -failOnUnknownOp: - *exc = fail(env, "java/lang/IllegalArgumentException", "Unknown transpose"); - goto done; -failOnCopy: - *exc = failOnCopy(env); - goto done; +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dbdsqrK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint ncvt, jint nru, jint ncc, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray vt, jint offsetvt, jint ldvt, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static int translate_uplo(JNIEnv *env, jstring str, jthrowable *exc) { - int res = 0; - const char *utf = NULL; - *exc = NULL; - if ((*env)->GetStringUTFLength(env, str) <= 0) goto failOnUnknownOp; - if (!(utf = (*env)->GetStringUTFChars(env, str, NULL))) goto failOnCopy; - switch (utf[0]) { - case 'U': res = CBLAS_UPPER; break; - case 'L': res = CBLAS_LOWER; break; - default: goto failOnUnknownOp; - } -done: - if (utf) (*env)->ReleaseStringUTFChars(env, str, utf); - return res; -failOnUnknownOp: - *exc = fail(env, "java/lang/IllegalArgumentException", "Unknown uplo"); - goto done; -failOnCopy: - *exc = failOnCopy(env); - goto done; -} +static void (*ddisna_)(char *job, int *m, int *n, double *d, double *sep, /*FIXME*/void *info); -static int translate_diag(JNIEnv *env, jstring str, jthrowable *exc) { - int res = 0; - const char *utf = NULL; - *exc = NULL; - if ((*env)->GetStringUTFLength(env, str) <= 0) goto failOnUnknownOp; - if (!(utf = (*env)->GetStringUTFChars(env, str, NULL))) goto failOnCopy; - switch (utf[0]) { - case 'N': res = CBLAS_NON_UNIT; break; - case 'U': res = CBLAS_UNIT; break; - default: goto failOnUnknownOp; - } -done: - if (utf) (*env)->ReleaseStringUTFChars(env, str, utf); - return res; -failOnUnknownOp: - *exc = fail(env, "java/lang/IllegalArgumentException", "Unknown diag"); - goto done; -failOnCopy: - *exc = failOnCopy(env); - goto done; +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ddisnaK(JNIEnv *env, UNUSED jobject obj, + jstring job, jint m, jint n, jdoubleArray d, jint offsetd, jdoubleArray sep, jint offsetsep, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static int translate_side(JNIEnv *env, jstring str, jthrowable *exc) { - int res = 0; - const char *utf = NULL; - *exc = NULL; - if ((*env)->GetStringUTFLength(env, str) <= 0) goto failOnUnknownOp; - if (!(utf = (*env)->GetStringUTFChars(env, str, NULL))) goto failOnCopy; - switch (utf[0]) { - case 'L': res = CBLAS_LEFT; break; - case 'R': res = CBLAS_RIGHT; break; - default: goto failOnUnknownOp; - } -done: - if (utf) (*env)->ReleaseStringUTFChars(env, str, utf); - return res; -failOnUnknownOp: - *exc = fail(env, "java/lang/IllegalArgumentException", "Unknown side"); - goto done; -failOnCopy: - *exc = failOnCopy(env); - goto done; -} +static void (*dgbbrd_)(char *vect, int *m, int *n, int *ncc, int *kl, int *ku, double *ab, int *ldab, double *d, double *e, double *q, int *ldq, double *pt, int *ldpt, double *c, int *Ldc, double *work, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dbdsdcK(JNIEnv *, jobject, - jstring, jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jintArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbbrdK(JNIEnv *env, UNUSED jobject obj, + jstring vect, jint m, jint n, jint ncc, jint kl, jint ku, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray pt, jint offsetpt, jint ldpt, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dbdsqrK(JNIEnv *, jobject, - jstring, jint, jint, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { - -} +static void (*dgbcon_)(char *norm, int *n, int *kl, int *ku, double *ab, int *ldab, int * ipiv, double *anorm, /*FIXME*/void *rcond, double *work, int * iwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ddisnaK(JNIEnv *, jobject, - jstring, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbconK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jint n, jint kl, jint ku, jdoubleArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbbrdK(JNIEnv *, jobject, - jstring, jint, jint, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { - -} +static void (*dgbequ_)(int *m, int *n, int *kl, int *ku, double *ab, int *ldab, double *r, double *c, /*FIXME*/void *rowcnd, /*FIXME*/void *colcnd, /*FIXME*/void *amax, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbconK(JNIEnv *, jobject, - jstring, jint, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdouble, jobject, jdoubleArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbequK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint kl, jint ku, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray r, jint offsetr, jdoubleArray c, jint offsetc, jobject rowcnd, jobject colcnd, jobject amax, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbequK(JNIEnv *, jobject, - jint, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jobject, jobject, jobject, jobject) { - -} +static void (*dgbrfs_)(char *trans, int *n, int *kl, int *ku, int *nrhs, double *ab, int *ldab, double *afb, int *ldafb, int * ipiv, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbrfsK(JNIEnv *, jobject, - jstring, jint, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbrfsK(JNIEnv *env, UNUSED jobject obj, + jstring trans, jint n, jint kl, jint ku, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray afb, jint offsetafb, jint ldafb, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbsvK(JNIEnv *, jobject, - jint, jint, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dgbsv_)(int *n, int *kl, int *ku, int *nrhs, double *ab, int *ldab, int * ipiv, double *b, int *ldb, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbsvxK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbsvK(JNIEnv *env, UNUSED jobject obj, + jint n, jint kl, jint ku, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbtf2K(JNIEnv *, jobject, - jint, jint, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jobject) { - -} +static void (*dgbsvx_)(char *fact, char *trans, int *n, int *kl, int *ku, int *nrhs, double *ab, int *ldab, double *afb, int *ldafb, int * ipiv, jstring *equed, double *r, double *c, double *b, int *ldb, double *x, int *ldx, /*FIXME*/void *rcond, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbtrfK(JNIEnv *, jobject, - jint, jint, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbsvxK(JNIEnv *env, UNUSED jobject obj, + jstring fact, jstring trans, jint n, jint kl, jint ku, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray afb, jint offsetafb, jint ldafb, jintArray ipiv, jint offsetipiv, jobject equed, jdoubleArray r, jint offsetr, jdoubleArray c, jint offsetc, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbtrsK(JNIEnv *, jobject, - jstring, jint, jint, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dgbtf2_)(int *m, int *n, int *kl, int *ku, double *ab, int *ldab, int * ipiv, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgebakK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbtf2K(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint kl, jint ku, jdoubleArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgebalK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jint, jobject, jobject, jdoubleArray, jint, jobject) { - -} +static void (*dgbtrf_)(int *m, int *n, int *kl, int *ku, double *ab, int *ldab, int * ipiv, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgebd2K(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbtrfK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint kl, jint ku, jdoubleArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgebrdK(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dgbtrs_)(char *trans, int *n, int *kl, int *ku, int *nrhs, double *ab, int *ldab, int * ipiv, double *b, int *ldb, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeconK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jint, jdouble, jobject, jdoubleArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbtrsK(JNIEnv *env, UNUSED jobject obj, + jstring trans, jint n, jint kl, jint ku, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeequK(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jobject, jobject, jobject, jobject) { - -} +static void (*dgebak_)(char *job, char *side, int *n, int *ilo, int *ihi, double *scale, int *m, double *v, int *ldv, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeesK(JNIEnv *, jobject, - jstring, jstring, jobject, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jbooleanArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgebakK(JNIEnv *env, UNUSED jobject obj, + jstring job, jstring side, jint n, jint ilo, jint ihi, jdoubleArray scale, jint offsetscale, jint m, jdoubleArray v, jint offsetv, jint ldv, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeesxK(JNIEnv *, jobject, - jstring, jstring, jobject, jstring, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject, jobject, jdoubleArray, jint, jint, jintArray, jint, jint, jbooleanArray, jint, jobject) { - -} +static void (*dgebal_)(char *job, int *n, double *a, int *lda, /*FIXME*/void *ilo, /*FIXME*/void *ihi, double *scale, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeevK(JNIEnv *, jobject, - jstring, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgebalK(JNIEnv *env, UNUSED jobject obj, + jstring job, jint n, jdoubleArray a, jint offseta, jint lda, jobject ilo, jobject ihi, jdoubleArray scale, jint offsetscale, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeevxK(JNIEnv *, jobject, - jstring, jstring, jstring, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jobject, jdoubleArray, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jintArray, jint, jobject) { - -} +static void (*dgebd2_)(int *m, int *n, double *a, int *lda, double *d, double *e, double *tauq, double *taup, double *work, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgegsK(JNIEnv *, jobject, - jstring, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgebd2K(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray tauq, jint offsettauq, jdoubleArray taup, jint offsettaup, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgegvK(JNIEnv *, jobject, - jstring, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dgebrd_)(int *m, int *n, double *a, int *lda, double *d, double *e, double *tauq, double *taup, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgehd2K(JNIEnv *, jobject, - jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgebrdK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray tauq, jint offsettauq, jdoubleArray taup, jint offsettaup, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgehrdK(JNIEnv *, jobject, - jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dgecon_)(char *norm, int *n, double *a, int *lda, double *anorm, /*FIXME*/void *rcond, double *work, int * iwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelq2K(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeconK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jint n, jdoubleArray a, jint offseta, jint lda, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelqfK(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dgeequ_)(int *m, int *n, double *a, int *lda, double *r, double *c, /*FIXME*/void *rowcnd, /*FIXME*/void *colcnd, /*FIXME*/void *amax, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelsK(JNIEnv *, jobject, - jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeequK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray r, jint offsetr, jdoubleArray c, jint offsetc, jobject rowcnd, jobject colcnd, jobject amax, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelsdK(JNIEnv *, jobject, - jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdouble, jobject, jdoubleArray, jint, jint, jintArray, jint, jobject) { - -} +static void (*dgees_)(char *jobvs, char *sort, /*FIXME*/void *select, int *n, double *a, int *lda, /*FIXME*/void *sdim, double *wr, double *wi, double *vs, int *ldvs, double *work, int *lwork, int *bwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelssK(JNIEnv *, jobject, - jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdouble, jobject, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeesK(JNIEnv *env, UNUSED jobject obj, + jstring jobvs, jstring sort, jobject select, jint n, jdoubleArray a, jint offseta, jint lda, jobject sdim, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jdoubleArray vs, jint offsetvs, jint ldvs, jdoubleArray work, jint offsetwork, jint lwork, jbooleanArray bwork, jint offsetbwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelsxK(JNIEnv *, jobject, - jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdouble, jobject, jdoubleArray, jint, jobject) { - -} +static void (*dgeesx_)(char *jobvs, char *sort, /*FIXME*/void *select, char *sense, int *n, double *a, int *lda, /*FIXME*/void *sdim, double *wr, double *wi, double *vs, int *ldvs, /*FIXME*/void *rconde, /*FIXME*/void *rcondv, double *work, int *lwork, int * iwork, int *liwork, int *bwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelsyK(JNIEnv *, jobject, - jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdouble, jobject, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeesxK(JNIEnv *env, UNUSED jobject obj, + jstring jobvs, jstring sort, jobject select, jstring sense, jint n, jdoubleArray a, jint offseta, jint lda, jobject sdim, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jdoubleArray vs, jint offsetvs, jint ldvs, jobject rconde, jobject rcondv, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jbooleanArray bwork, jint offsetbwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeql2K(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { - -} +static void (*dgeev_)(char *jobvl, char *jobvr, int *n, double *a, int *lda, double *wr, double *wi, double *vl, int *ldvl, double *vr, int *ldvr, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeqlfK(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeevK(JNIEnv *env, UNUSED jobject obj, + jstring jobvl, jstring jobvr, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeqp3K(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dgeevx_)(char *balanc, char *jobvl, char *jobvr, char *sense, int *n, double *a, int *lda, double *wr, double *wi, double *vl, int *ldvl, double *vr, int *ldvr, /*FIXME*/void *ilo, /*FIXME*/void *ihi, double *scale, /*FIXME*/void *abnrm, double *rconde, double *rcondv, double *work, int *lwork, int * iwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeqpfK(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeevxK(JNIEnv *env, UNUSED jobject obj, + jstring balanc, jstring jobvl, jstring jobvr, jstring sense, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jobject ilo, jobject ihi, jdoubleArray scale, jint offsetscale, jobject abnrm, jdoubleArray rconde, jint offsetrconde, jdoubleArray rcondv, jint offsetrcondv, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeqr2K(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { - -} +static void (*dgegs_)(char *jobvsl, char *jobvsr, int *n, double *a, int *lda, double *b, int *ldb, double *alphar, double *alphai, double *beta, double *vsl, int *ldvsl, double *vsr, int *ldvsr, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeqrfK(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgegsK(JNIEnv *env, UNUSED jobject obj, + jstring jobvsl, jstring jobvsr, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray vsl, jint offsetvsl, jint ldvsl, jdoubleArray vsr, jint offsetvsr, jint ldvsr, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgerfsK(JNIEnv *, jobject, - jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { - -} +static void (*dgegv_)(char *jobvl, char *jobvr, int *n, double *a, int *lda, double *b, int *ldb, double *alphar, double *alphai, double *beta, double *vl, int *ldvl, double *vr, int *ldvr, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgerq2K(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgegvK(JNIEnv *env, UNUSED jobject obj, + jstring jobvl, jstring jobvr, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgerqfK(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dgehd2_)(int *n, int *ilo, int *ihi, double *a, int *lda, double *tau, double *work, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgesc2K(JNIEnv *, jobject, - jint, jdoubleArray, jint, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgehd2K(JNIEnv *env, UNUSED jobject obj, + jint n, jint ilo, jint ihi, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgesddK(JNIEnv *, jobject, - jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jobject) { - -} +static void (*dgehrd_)(int *n, int *ilo, int *ihi, double *a, int *lda, double *tau, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgesvK(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgehrdK(JNIEnv *env, UNUSED jobject obj, + jint n, jint ilo, jint ihi, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgesvdK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dgelq2_)(int *m, int *n, double *a, int *lda, double *tau, double *work, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgesvxK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelq2K(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgetc2K(JNIEnv *, jobject, - jint, jdoubleArray, jint, jint, jintArray, jint, jintArray, jint, jobject) { - -} +static void (*dgelqf_)(int *m, int *n, double *a, int *lda, double *tau, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgetf2K(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelqfK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgetrfK(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jint, jintArray, jint, jobject) { - -} +static void (*dgels_)(char *trans, int *m, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgetriK(JNIEnv *, jobject, - jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelsK(JNIEnv *env, UNUSED jobject obj, + jstring trans, jint m, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgetrsK(JNIEnv *, jobject, - jstring, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dgelsd_)(int *m, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, double *s, double *rcond, /*FIXME*/void *rank, double *work, int *lwork, int * iwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggbakK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelsdK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray s, jint offsets, jdouble rcond, jobject rank, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggbalK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { - -} +static void (*dgelss_)(int *m, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, double *s, double *rcond, /*FIXME*/void *rank, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggesK(JNIEnv *, jobject, - jstring, jstring, jstring, jobject, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jbooleanArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelssK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray s, jint offsets, jdouble rcond, jobject rank, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggesxK(JNIEnv *, jobject, - jstring, jstring, jstring, jobject, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jintArray, jint, jint, jbooleanArray, jint, jobject) { - -} +static void (*dgelsx_)(int *m, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, int * jpvt, double *rcond, /*FIXME*/void *rank, double *work, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggevK(JNIEnv *, jobject, - jstring, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelsxK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jintArray jpvt, jint offsetjpvt, jdouble rcond, jobject rank, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggevxK(JNIEnv *, jobject, - jstring, jstring, jstring, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jobject, jdoubleArray, jint, jdoubleArray, jint, jobject, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jintArray, jint, jbooleanArray, jint, jobject) { - -} +static void (*dgelsy_)(int *m, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, int * jpvt, double *rcond, /*FIXME*/void *rank, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggglmK(JNIEnv *, jobject, - jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelsyK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jintArray jpvt, jint offsetjpvt, jdouble rcond, jobject rank, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgghrdK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dgeql2_)(int *m, int *n, double *a, int *lda, double *tau, double *work, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgglseK(JNIEnv *, jobject, - jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeql2K(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggqrfK(JNIEnv *, jobject, - jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dgeqlf_)(int *m, int *n, double *a, int *lda, double *tau, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggrqfK(JNIEnv *, jobject, - jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeqlfK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggsvdK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jint, jobject, jobject, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jintArray, jint, jobject) { - -} +static void (*dgeqp3_)(int *m, int *n, double *a, int *lda, int * jpvt, double *tau, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggsvpK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdouble, jdouble, jobject, jobject, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeqp3K(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jdoubleArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgtconK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jdouble, jobject, jdoubleArray, jint, jintArray, jint, jobject) { - -} +static void (*dgeqpf_)(int *m, int *n, double *a, int *lda, int * jpvt, double *tau, double *work, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgtrfsK(JNIEnv *, jobject, - jstring, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeqpfK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jdoubleArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgtsvK(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dgeqr2_)(int *m, int *n, double *a, int *lda, double *tau, double *work, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgtsvxK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeqr2K(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgttrfK(JNIEnv *, jobject, - jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { - -} +static void (*dgeqrf_)(int *m, int *n, double *a, int *lda, double *tau, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgttrsK(JNIEnv *, jobject, - jstring, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeqrfK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgtts2K(JNIEnv *, jobject, - jint, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jdoubleArray, jint, jint) { - -} +static void (*dgerfs_)(char *trans, int *n, int *nrhs, double *a, int *lda, double *af, int *ldaf, int * ipiv, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dhgeqzK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgerfsK(JNIEnv *env, UNUSED jobject obj, + jstring trans, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dhseinK(JNIEnv *, jobject, - jstring, jstring, jstring, jbooleanArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jint, jobject, jdoubleArray, jint, jintArray, jint, jintArray, jint, jobject) { - -} +static void (*dgerq2_)(int *m, int *n, double *a, int *lda, double *tau, double *work, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dhseqrK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgerq2K(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_disnanK(JNIEnv *, jobject, - jdouble) { - -} +static void (*dgerqf_)(int *m, int *n, double *a, int *lda, double *tau, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlabadK(JNIEnv *, jobject, - jobject, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgerqfK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlabrdK(JNIEnv *, jobject, - jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint) { - -} +static void (*dgesc2_)(int *n, double *a, int *lda, double *rhs, int * ipiv, int * jpiv, /*FIXME*/void *scale); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlacn2K(JNIEnv *, jobject, - jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject, jobject, jintArray, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgesc2K(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray rhs, jint offsetrhs, jintArray ipiv, jint offsetipiv, jintArray jpiv, jint offsetjpiv, jobject scale) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaconK(JNIEnv *, jobject, - jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject, jobject) { - -} +static void (*dgesdd_)(char *jobz, int *m, int *n, double *a, int *lda, double *s, double *u, int *ldu, double *vt, int *ldvt, double *work, int *lwork, int * iwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlacpyK(JNIEnv *, jobject, - jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgesddK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray s, jint offsets, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jint ldvt, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dladivK(JNIEnv *, jobject, - jdouble, jdouble, jdouble, jdouble, jobject, jobject) { - -} +static void (*dgesv_)(int *n, int *nrhs, double *a, int *lda, int * ipiv, double *b, int *ldb, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlae2K(JNIEnv *, jobject, - jdouble, jdouble, jdouble, jobject, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgesvK(JNIEnv *env, UNUSED jobject obj, + jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaebzK(JNIEnv *, jobject, - jint, jint, jint, jint, jint, jint, jdouble, jdouble, jdouble, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject, jintArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { - -} +static void (*dgesvd_)(char *jobu, char *jobvt, int *m, int *n, double *a, int *lda, double *s, double *u, int *ldu, double *vt, int *ldvt, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed0K(JNIEnv *, jobject, - jint, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgesvdK(JNIEnv *env, UNUSED jobject obj, + jstring jobu, jstring jobvt, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray s, jint offsets, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jint ldvt, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed1K(JNIEnv *, jobject, - jint, jdoubleArray, jint, jdoubleArray, jint, jint, jintArray, jint, jobject, jint, jdoubleArray, jint, jintArray, jint, jobject) { - -} +static void (*dgesvx_)(char *fact, char *trans, int *n, int *nrhs, double *a, int *lda, double *af, int *ldaf, int * ipiv, jstring *equed, double *r, double *c, double *b, int *ldb, double *x, int *ldx, /*FIXME*/void *rcond, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed2K(JNIEnv *, jobject, - jobject, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jintArray, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgesvxK(JNIEnv *env, UNUSED jobject obj, + jstring fact, jstring trans, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jobject equed, jdoubleArray r, jint offsetr, jdoubleArray c, jint offsetc, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed3K(JNIEnv *, jobject, - jint, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdouble, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { - -} +static void (*dgetc2_)(int *n, double *a, int *lda, int * ipiv, int * jpiv, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed4K(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jobject, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgetc2K(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jintArray jpiv, jint offsetjpiv, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed5K(JNIEnv *, jobject, - jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jobject) { - -} +static void (*dgetf2_)(int *m, int *n, double *a, int *lda, int * ipiv, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed6K(JNIEnv *, jobject, - jint, jboolean, jdouble, jdoubleArray, jint, jdoubleArray, jint, jdouble, jobject, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgetf2K(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed7K(JNIEnv *, jobject, - jint, jint, jint, jint, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jintArray, jint, jobject, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { - -} +static void (*dgetrf_)(int *m, int *n, double *a, int *lda, int * ipiv, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed8K(JNIEnv *, jobject, - jint, jobject, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jintArray, jint, jobject, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jintArray, jint, jobject, jintArray, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgetrfK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed9K(JNIEnv *, jobject, - jint, jint, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdouble, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dgetri_)(int *n, double *a, int *lda, int * ipiv, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaedaK(JNIEnv *, jobject, - jint, jint, jint, jint, jintArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgetriK(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaeinK(JNIEnv *, jobject, - jboolean, jboolean, jint, jdoubleArray, jint, jint, jdouble, jdouble, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdouble, jdouble, jdouble, jobject) { - -} +static void (*dgetrs_)(char *trans, int *n, int *nrhs, double *a, int *lda, int * ipiv, double *b, int *ldb, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaev2K(JNIEnv *, jobject, - jdouble, jdouble, jdouble, jobject, jobject, jobject, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgetrsK(JNIEnv *env, UNUSED jobject obj, + jstring trans, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaexcK(JNIEnv *, jobject, - jboolean, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jint, jint, jint, jdoubleArray, jint, jobject) { - -} +static void (*dggbak_)(char *job, char *side, int *n, int *ilo, int *ihi, double *lscale, double *rscale, int *m, double *v, int *ldv, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlag2K(JNIEnv *, jobject, - jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdouble, jobject, jobject, jobject, jobject, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggbakK(JNIEnv *env, UNUSED jobject obj, + jstring job, jstring side, jint n, jint ilo, jint ihi, jdoubleArray lscale, jint offsetlscale, jdoubleArray rscale, jint offsetrscale, jint m, jdoubleArray v, jint offsetv, jint ldv, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlag2sK(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jint, jfloatArray, jint, jint, jobject) { - -} +static void (*dggbal_)(char *job, int *n, double *a, int *lda, double *b, int *ldb, /*FIXME*/void *ilo, /*FIXME*/void *ihi, double *lscale, double *rscale, double *work, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlags2K(JNIEnv *, jobject, - jboolean, jdouble, jdouble, jdouble, jdouble, jdouble, jdouble, jobject, jobject, jobject, jobject, jobject, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggbalK(JNIEnv *env, UNUSED jobject obj, + jstring job, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject ilo, jobject ihi, jdoubleArray lscale, jint offsetlscale, jdoubleArray rscale, jint offsetrscale, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlagtfK(JNIEnv *, jobject, - jint, jdoubleArray, jint, jdouble, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdoubleArray, jint, jintArray, jint, jobject) { - -} +static void (*dgges_)(char *jobvsl, char *jobvsr, char *sort, /*FIXME*/void *selctg, int *n, double *a, int *lda, double *b, int *ldb, /*FIXME*/void *sdim, double *alphar, double *alphai, double *beta, double *vsl, int *ldvsl, double *vsr, int *ldvsr, double *work, int *lwork, int *bwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlagtmK(JNIEnv *, jobject, - jstring, jint, jint, jdouble, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdouble, jdoubleArray, jint, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggesK(JNIEnv *env, UNUSED jobject obj, + jstring jobvsl, jstring jobvsr, jstring sort, jobject selctg, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject sdim, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray vsl, jint offsetvsl, jint ldvsl, jdoubleArray vsr, jint offsetvsr, jint ldvsr, jdoubleArray work, jint offsetwork, jint lwork, jbooleanArray bwork, jint offsetbwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlagtsK(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jdoubleArray, jint, jobject, jobject) { - -} +static void (*dggesx_)(char *jobvsl, char *jobvsr, char *sort, /*FIXME*/void *selctg, char *sense, int *n, double *a, int *lda, double *b, int *ldb, /*FIXME*/void *sdim, double *alphar, double *alphai, double *beta, double *vsl, int *ldvsl, double *vsr, int *ldvsr, double *rconde, double *rcondv, double *work, int *lwork, int * iwork, int *liwork, int *bwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlagv2K(JNIEnv *, jobject, - jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject, jobject, jobject, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggesxK(JNIEnv *env, UNUSED jobject obj, + jstring jobvsl, jstring jobvsr, jstring sort, jobject selctg, jstring sense, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject sdim, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray vsl, jint offsetvsl, jint ldvsl, jdoubleArray vsr, jint offsetvsr, jint ldvsr, jdoubleArray rconde, jint offsetrconde, jdoubleArray rcondv, jint offsetrcondv, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jbooleanArray bwork, jint offsetbwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlahqrK(JNIEnv *, jobject, - jboolean, jboolean, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dggev_)(char *jobvl, char *jobvr, int *n, double *a, int *lda, double *b, int *ldb, double *alphar, double *alphai, double *beta, double *vl, int *ldvl, double *vr, int *ldvr, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlahr2K(JNIEnv *, jobject, - jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggevK(JNIEnv *env, UNUSED jobject obj, + jstring jobvl, jstring jobvr, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlahrdK(JNIEnv *, jobject, - jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint) { - -} +static void (*dggevx_)(char *balanc, char *jobvl, char *jobvr, char *sense, int *n, double *a, int *lda, double *b, int *ldb, double *alphar, double *alphai, double *beta, double *vl, int *ldvl, double *vr, int *ldvr, /*FIXME*/void *ilo, /*FIXME*/void *ihi, double *lscale, double *rscale, /*FIXME*/void *abnrm, /*FIXME*/void *bbnrm, double *rconde, double *rcondv, double *work, int *lwork, int * iwork, int *bwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaic1K(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jdouble, jdoubleArray, jint, jdouble, jobject, jobject, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggevxK(JNIEnv *env, UNUSED jobject obj, + jstring balanc, jstring jobvl, jstring jobvr, jstring sense, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jobject ilo, jobject ihi, jdoubleArray lscale, jint offsetlscale, jdoubleArray rscale, jint offsetrscale, jobject abnrm, jobject bbnrm, jdoubleArray rconde, jint offsetrconde, jdoubleArray rcondv, jint offsetrcondv, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jbooleanArray bwork, jint offsetbwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaisnanK(JNIEnv *, jobject, - jdouble, jdouble) { - -} +static void (*dggglm_)(int *n, int *m, int *p, double *a, int *lda, double *b, int *ldb, double *d, double *x, double *y, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaln2K(JNIEnv *, jobject, - jboolean, jint, jint, jdouble, jdouble, jdoubleArray, jint, jint, jdouble, jdouble, jdoubleArray, jint, jint, jdouble, jdouble, jdoubleArray, jint, jint, jobject, jobject, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggglmK(JNIEnv *env, UNUSED jobject obj, + jint n, jint m, jint p, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray d, jint offsetd, jdoubleArray x, jint offsetx, jdoubleArray y, jint offsety, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlals0K(JNIEnv *, jobject, - jint, jint, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jint, jintArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdouble, jdouble, jdoubleArray, jint, jobject) { - -} +static void (*dgghrd_)(char *compq, char *compz, int *n, int *ilo, int *ihi, double *a, int *lda, double *b, int *ldb, double *q, int *ldq, double *z, int *ldz, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlalsaK(JNIEnv *, jobject, - jint, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jintArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jint, jintArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgghrdK(JNIEnv *env, UNUSED jobject obj, + jstring compq, jstring compz, jint n, jint ilo, jint ihi, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray z, jint offsetz, jint ldz, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlalsdK(JNIEnv *, jobject, - jstring, jint, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdouble, jobject, jdoubleArray, jint, jintArray, jint, jobject) { - -} +static void (*dgglse_)(int *m, int *n, int *p, double *a, int *lda, double *b, int *ldb, double *c, double *d, double *x, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamrgK(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jint, jint, jintArray, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgglseK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint p, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray c, jint offsetc, jdoubleArray d, jint offsetd, jdoubleArray x, jint offsetx, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -jint Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanegK(JNIEnv *, jobject, - jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jint) { - -} +static void (*dggqrf_)(int *n, int *m, int *p, double *a, int *lda, double *taua, double *b, int *ldb, double *taub, double *work, int *lwork, /*FIXME*/void *info); -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlangbK(JNIEnv *, jobject, - jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggqrfK(JNIEnv *env, UNUSED jobject obj, + jint n, jint m, jint p, jdoubleArray a, jint offseta, jint lda, jdoubleArray taua, jint offsettaua, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray taub, jint offsettaub, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlangeK(JNIEnv *, jobject, - jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint) { - -} +static void (*dggrqf_)(int *m, int *p, int *n, double *a, int *lda, double *taua, double *b, int *ldb, double *taub, double *work, int *lwork, /*FIXME*/void *info); -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlangtK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggrqfK(JNIEnv *env, UNUSED jobject obj, + jint m, jint p, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray taua, jint offsettaua, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray taub, jint offsettaub, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanhsK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint) { - -} +static void (*dggsvd_)(char *jobu, char *jobv, char *jobq, int *m, int *n, int *p, /*FIXME*/void *k, /*FIXME*/void *l, double *a, int *lda, double *b, int *ldb, double *alpha, double *beta, double *u, int *ldu, double *v, int *ldv, double *q, int *ldq, double *work, int * iwork, /*FIXME*/void *info); -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlansbK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggsvdK(JNIEnv *env, UNUSED jobject obj, + jstring jobu, jstring jobv, jstring jobq, jint m, jint n, jint p, jobject k, jobject l, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray alpha, jint offsetalpha, jdoubleArray beta, jint offsetbeta, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanspK(JNIEnv *, jobject, - jstring, jstring, jint, jdoubleArray, jint, jdoubleArray, jint) { - -} +static void (*dggsvp_)(char *jobu, char *jobv, char *jobq, int *m, int *p, int *n, double *a, int *lda, double *b, int *ldb, double *tola, double *tolb, /*FIXME*/void *k, /*FIXME*/void *l, double *u, int *ldu, double *v, int *ldv, double *q, int *ldq, int * iwork, double *tau, double *work, /*FIXME*/void *info); -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanstK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jdoubleArray, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggsvpK(JNIEnv *env, UNUSED jobject obj, + jstring jobu, jstring jobv, jstring jobq, jint m, jint p, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble tola, jdouble tolb, jobject k, jobject l, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray q, jint offsetq, jint ldq, jintArray iwork, jint offsetiwork, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlansyK(JNIEnv *, jobject, - jstring, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint) { - -} +static void (*dgtcon_)(char *norm, int *n, double *dl, double *d, double *du, double *du22, int * ipiv, double *anorm, /*FIXME*/void *rcond, double *work, int * iwork, /*FIXME*/void *info); -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlantbK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgtconK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jint n, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlantpK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jdoubleArray, jint, jdoubleArray, jint) { - -} +static void (*dgtrfs_)(char *trans, int *n, int *nrhs, double *dl, double *d, double *du, double *dlf, double *df, double *duf, double *du22, int * ipiv, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlantrK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgtrfsK(JNIEnv *env, UNUSED jobject obj, + jstring trans, jint n, jint nrhs, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray dlf, jint offsetdlf, jdoubleArray df, jint offsetdf, jdoubleArray duf, jint offsetduf, jdoubleArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanv2K(JNIEnv *, jobject, - jobject, jobject, jobject, jobject, jobject, jobject, jobject, jobject, jobject, jobject) { - -} +static void (*dgtsv_)(int *n, int *nrhs, double *dl, double *d, double *du, double *b, int *ldb, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlapllK(JNIEnv *, jobject, - jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgtsvK(JNIEnv *env, UNUSED jobject obj, + jint n, jint nrhs, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlapmtK(JNIEnv *, jobject, - jboolean, jint, jint, jdoubleArray, jint, jint, jintArray, jint) { - -} +static void (*dgtsvx_)(char *fact, char *trans, int *n, int *nrhs, double *dl, double *d, double *du, double *dlf, double *df, double *duf, double *du22, int * ipiv, double *b, int *ldb, double *x, int *ldx, /*FIXME*/void *rcond, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlapy2K(JNIEnv *, jobject, - jdouble, jdouble) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgtsvxK(JNIEnv *env, UNUSED jobject obj, + jstring fact, jstring trans, jint n, jint nrhs, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray dlf, jint offsetdlf, jdoubleArray df, jint offsetdf, jdoubleArray duf, jint offsetduf, jdoubleArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlapy3K(JNIEnv *, jobject, - jdouble, jdouble, jdouble) { - -} +static void (*dgttrf_)(int *n, double *dl, double *d, double *du, double *du22, int * ipiv, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqgbK(JNIEnv *, jobject, - jint, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jdouble, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgttrfK(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqgeK(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jdouble, jobject) { - -} +static void (*dgttrs_)(char *trans, int *n, int *nrhs, double *dl, double *d, double *du, double *du22, int * ipiv, double *b, int *ldb, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqp2K(JNIEnv *, jobject, - jint, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgttrsK(JNIEnv *env, UNUSED jobject obj, + jstring trans, jint n, jint nrhs, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqpsK(JNIEnv *, jobject, - jint, jint, jint, jint, jobject, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint) { - -} +static void (*dgtts2_)(int *itrans, int *n, int *nrhs, double *dl, double *d, double *du, double *du22, int * ipiv, double *b, int *ldb); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr0K(JNIEnv *, jobject, - jboolean, jboolean, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgtts2K(JNIEnv *env, UNUSED jobject obj, + jint itrans, jint n, jint nrhs, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr1K(JNIEnv *, jobject, - jint, jdoubleArray, jint, jint, jdouble, jdouble, jdouble, jdouble, jdoubleArray, jint) { - -} +static void (*dhgeqz_)(char *job, char *compq, char *compz, int *n, int *ilo, int *ihi, double *h, int *ldh, double *t, int *ldt, double *alphar, double *alphai, double *beta, double *q, int *ldq, double *z, int *ldz, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr2K(JNIEnv *, jobject, - jboolean, jboolean, jint, jint, jint, jint, jdoubleArray, jint, jint, jint, jint, jdoubleArray, jint, jint, jobject, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jint, jdoubleArray, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dhgeqzK(JNIEnv *env, UNUSED jobject obj, + jstring job, jstring compq, jstring compz, jint n, jint ilo, jint ihi, jdoubleArray h, jint offseth, jint ldh, jdoubleArray t, jint offsett, jint ldt, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr3K(JNIEnv *, jobject, - jboolean, jboolean, jint, jint, jint, jint, jdoubleArray, jint, jint, jint, jint, jdoubleArray, jint, jint, jobject, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jint, jdoubleArray, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint) { - -} +static void (*dhsein_)(char *side, char *eigsrc, char *initv, int *select, int *n, double *h, int *ldh, double *wr, double *wi, double *vl, int *ldvl, double *vr, int *ldvr, int *mm, /*FIXME*/void *m, double *work, int * ifaill, int * ifailr, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr4K(JNIEnv *, jobject, - jboolean, jboolean, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dhseinK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring eigsrc, jstring initv, jbooleanArray select, jint offsetselect, jint n, jdoubleArray h, jint offseth, jint ldh, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jint mm, jobject m, jdoubleArray work, jint offsetwork, jintArray ifaill, jint offsetifaill, jintArray ifailr, jint offsetifailr, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr5K(JNIEnv *, jobject, - jboolean, jboolean, jint, jint, jint, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jint, jdoubleArray, jint, jint, jint, jdoubleArray, jint, jint) { - -} +static void (*dhseqr_)(char *job, char *compz, int *n, int *ilo, int *ihi, double *h, int *ldh, double *wr, double *wi, double *z, int *ldz, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqsbK(JNIEnv *, jobject, - jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdouble, jdouble, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dhseqrK(JNIEnv *env, UNUSED jobject obj, + jstring job, jstring compz, jint n, jint ilo, jint ihi, jdoubleArray h, jint offseth, jint ldh, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqspK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jobject) { - -} +static int *(*disnan_)(double *din); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqsyK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdouble, jdouble, jobject) { - +jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_disnanK(JNIEnv *env, UNUSED jobject obj, + jdouble din) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqtrK(JNIEnv *, jobject, - jboolean, jboolean, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdouble, jobject, jdoubleArray, jint, jdoubleArray, jint, jobject) { - -} +static void (*dlabad_)(/*FIXME*/void *small, /*FIXME*/void *large); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlar1vK(JNIEnv *, jobject, - jint, jint, jint, jdouble, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jdoubleArray, jint, jboolean, jobject, jobject, jobject, jobject, jintArray, jint, jobject, jobject, jobject, jdoubleArray, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlabadK(JNIEnv *env, UNUSED jobject obj, + jobject small, jobject large) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlar2vK(JNIEnv *, jobject, - jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint) { - -} +static void (*dlabrd_)(int *m, int *n, int *nb, double *a, int *lda, double *d, double *e, double *tauq, double *taup, double *x, int *ldx, double *y, int *ldy); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarfK(JNIEnv *, jobject, - jstring, jint, jint, jdoubleArray, jint, jint, jdouble, jdoubleArray, jint, jint, jdoubleArray, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlabrdK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint nb, jdoubleArray a, jint offseta, jint lda, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray tauq, jint offsettauq, jdoubleArray taup, jint offsettaup, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray y, jint offsety, jint ldy) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarfbK(JNIEnv *, jobject, - jstring, jstring, jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint) { - -} +static void (*dlacn2_)(int *n, double *v, double *x, int * isgn, /*FIXME*/void *est, /*FIXME*/void *kase, int * isave); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarfgK(JNIEnv *, jobject, - jint, jobject, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlacn2K(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray v, jint offsetv, jdoubleArray x, jint offsetx, jintArray isgn, jint offsetisgn, jobject est, jobject kase, jintArray isave, jint offsetisave) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarftK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint) { - -} +static void (*dlacon_)(int *n, double *v, double *x, int * isgn, /*FIXME*/void *est, /*FIXME*/void *kase); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarfxK(JNIEnv *, jobject, - jstring, jint, jint, jdoubleArray, jint, jdouble, jdoubleArray, jint, jint, jdoubleArray, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaconK(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray v, jint offsetv, jdoubleArray x, jint offsetx, jintArray isgn, jint offsetisgn, jobject est, jobject kase) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlargvK(JNIEnv *, jobject, - jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint) { - -} +static void (*dlacpy_)(const char *uplo, int *m, int *n, double *a, int *lda, double *b, int *ldb); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarnvK(JNIEnv *, jobject, - jint, jintArray, jint, jint, jdoubleArray, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlacpyK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarraK(JNIEnv *, jobject, - jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jobject, jintArray, jint, jobject) { - -} +static void (*dladiv_)(double *a, double *b, double *c, double *d, /*FIXME*/void *p, /*FIXME*/void *q); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrbK(JNIEnv *, jobject, - jint, jdoubleArray, jint, jdoubleArray, jint, jint, jint, jdouble, jdouble, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jdouble, jdouble, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dladivK(JNIEnv *env, UNUSED jobject obj, + jdouble a, jdouble b, jdouble c, jdouble d, jobject p, jobject q) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrcK(JNIEnv *, jobject, - jstring, jint, jdouble, jdouble, jdoubleArray, jint, jdoubleArray, jint, jdouble, jobject, jobject, jobject, jobject) { - -} +static void (*dlae2_)(double *a, double *b, double *c, /*FIXME*/void *rt1, /*FIXME*/void *rt2); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrdK(JNIEnv *, jobject, - jstring, jstring, jint, jdouble, jdouble, jint, jint, jdoubleArray, jint, jdouble, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jint, jintArray, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jobject, jobject, jintArray, jint, jintArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlae2K(JNIEnv *env, UNUSED jobject obj, + jdouble a, jdouble b, jdouble c, jobject rt1, jobject rt2) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarreK(JNIEnv *, jobject, - jstring, jint, jobject, jobject, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jdouble, jobject, jintArray, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jdoubleArray, jint, jobject, jdoubleArray, jint, jintArray, jint, jobject) { - -} +static void (*dlaebz_)(int *ijob, int *nitmax, int *n, int *mmax, int *minp, int *nbmin, double *abstol, double *reltol, double *pivmin, double *d, double *e, double *e22, int * nval, double *ab, double *c, /*FIXME*/void *mout, int * nab, double *work, int * iwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrfK(JNIEnv *, jobject, - jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jdouble, jdouble, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaebzK(JNIEnv *env, UNUSED jobject obj, + jint ijob, jint nitmax, jint n, jint mmax, jint minp, jint nbmin, jdouble abstol, jdouble reltol, jdouble pivmin, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray e2, jint offsete2, jintArray nval, jint offsetnval, jdoubleArray ab, jint offsetab, jdoubleArray c, jint offsetc, jobject mout, jintArray nab, jint offsetnab, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrjK(JNIEnv *, jobject, - jint, jdoubleArray, jint, jdoubleArray, jint, jint, jint, jdouble, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jdouble, jdouble, jobject) { - -} +static void (*dlaed0_)(int *icompq, int *qsiz, int *n, double *d, double *e, double *q, int *ldq, double *qstore, int *ldqs, double *work, int * iwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrkK(JNIEnv *, jobject, - jint, jint, jdouble, jdouble, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jobject, jobject, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed0K(JNIEnv *env, UNUSED jobject obj, + jint icompq, jint qsiz, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray qstore, jint offsetqstore, jint ldqs, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrrK(JNIEnv *, jobject, - jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { - -} +static void (*dlaed1_)(int *n, double *d, double *q, int *ldq, int * indxq, /*FIXME*/void *rho, int *cutpnt, double *work, int * iwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrvK(JNIEnv *, jobject, - jint, jdouble, jdouble, jdoubleArray, jint, jdoubleArray, jint, jdouble, jintArray, jint, jint, jint, jint, jdouble, jobject, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed1K(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray d, jint offsetd, jdoubleArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jint cutpnt, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlartgK(JNIEnv *, jobject, - jdouble, jdouble, jobject, jobject, jobject) { - -} +static void (*dlaed2_)(/*FIXME*/void *k, int *n, int *n1, double *d, double *q, int *ldq, int * indxq, /*FIXME*/void *rho, double *z, double *dlamda, double *w, double *q22, int * indx, int * indxc, int * indxp, int * coltyp, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlartvK(JNIEnv *, jobject, - jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed2K(JNIEnv *env, UNUSED jobject obj, + jobject k, jint n, jint n1, jdoubleArray d, jint offsetd, jdoubleArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jdoubleArray z, jint offsetz, jdoubleArray dlamda, jint offsetdlamda, jdoubleArray w, jint offsetw, jdoubleArray q2, jint offsetq2, jintArray indx, jint offsetindx, jintArray indxc, jint offsetindxc, jintArray indxp, jint offsetindxp, jintArray coltyp, jint offsetcoltyp, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaruvK(JNIEnv *, jobject, - jintArray, jint, jint, jdoubleArray, jint) { - -} +static void (*dlaed3_)(int *k, int *n, int *n1, double *d, double *q, int *ldq, double *rho, double *dlamda, double *q22, int * indx, int * ctot, double *w, double *s, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarzK(JNIEnv *, jobject, - jstring, jint, jint, jint, jdoubleArray, jint, jint, jdouble, jdoubleArray, jint, jint, jdoubleArray, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed3K(JNIEnv *env, UNUSED jobject obj, + jint k, jint n, jint n1, jdoubleArray d, jint offsetd, jdoubleArray q, jint offsetq, jint ldq, jdouble rho, jdoubleArray dlamda, jint offsetdlamda, jdoubleArray q2, jint offsetq2, jintArray indx, jint offsetindx, jintArray ctot, jint offsetctot, jdoubleArray w, jint offsetw, jdoubleArray s, jint offsets, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarzbK(JNIEnv *, jobject, - jstring, jstring, jstring, jstring, jint, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint) { - -} +static void (*dlaed4_)(int *n, int *i, double *d, double *z, double *delta, double *rho, /*FIXME*/void *dlam, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarztK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed4K(JNIEnv *env, UNUSED jobject obj, + jint n, jint i, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdoubleArray delta, jint offsetdelta, jdouble rho, jobject dlam, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlas2K(JNIEnv *, jobject, - jdouble, jdouble, jdouble, jobject, jobject) { - -} +static void (*dlaed5_)(int *i, double *d, double *z, double *delta, double *rho, /*FIXME*/void *dlam); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasclK(JNIEnv *, jobject, - jstring, jint, jint, jdouble, jdouble, jint, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed5K(JNIEnv *env, UNUSED jobject obj, + jint i, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdoubleArray delta, jint offsetdelta, jdouble rho, jobject dlam) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd0K(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jint, jintArray, jint, jdoubleArray, jint, jobject) { - -} +static void (*dlaed6_)(int *kniter, int *orgati, double *rho, double *d, double *z, double *finit, /*FIXME*/void *tau, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd1K(JNIEnv *, jobject, - jint, jint, jint, jdoubleArray, jint, jobject, jobject, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jintArray, jint, jdoubleArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed6K(JNIEnv *env, UNUSED jobject obj, + jint kniter, jboolean orgati, jdouble rho, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdouble finit, jobject tau, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd2K(JNIEnv *, jobject, - jint, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jobject) { - -} +static void (*dlaed7_)(int *icompq, int *n, int *qsiz, int *tlvls, int *curlvl, int *curpbm, double *d, double *q, int *ldq, int * indxq, /*FIXME*/void *rho, int *cutpnt, double *qstore, int * qptr, int * prmptr, int * perm, int * givptr, int * givcol, double *givnum, double *work, int * iwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd3K(JNIEnv *, jobject, - jint, jint, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jintArray, jint, jdoubleArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed7K(JNIEnv *env, UNUSED jobject obj, + jint icompq, jint n, jint qsiz, jint tlvls, jint curlvl, jint curpbm, jdoubleArray d, jint offsetd, jdoubleArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jint cutpnt, jdoubleArray qstore, jint offsetqstore, jintArray qptr, jint offsetqptr, jintArray prmptr, jint offsetprmptr, jintArray perm, jint offsetperm, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jdoubleArray givnum, jint offsetgivnum, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd4K(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jobject, jdoubleArray, jint, jobject) { - -} +static void (*dlaed8_)(int *icompq, /*FIXME*/void *k, int *n, int *qsiz, double *d, double *q, int *ldq, int * indxq, /*FIXME*/void *rho, int *cutpnt, double *z, double *dlamda, double *q22, int *ldq2, double *w, int * perm, /*FIXME*/void *givptr, int * givcol, double *givnum, int * indxp, int * indx, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd5K(JNIEnv *, jobject, - jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jobject, jdoubleArray, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed8K(JNIEnv *env, UNUSED jobject obj, + jint icompq, jobject k, jint n, jint qsiz, jdoubleArray d, jint offsetd, jdoubleArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jint cutpnt, jdoubleArray z, jint offsetz, jdoubleArray dlamda, jint offsetdlamda, jdoubleArray q2, jint offsetq2, jint ldq2, jdoubleArray w, jint offsetw, jintArray perm, jint offsetperm, jobject givptr, jintArray givcol, jint offsetgivcol, jdoubleArray givnum, jint offsetgivnum, jintArray indxp, jint offsetindxp, jintArray indx, jint offsetindx, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd6K(JNIEnv *, jobject, - jint, jint, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject, jobject, jintArray, jint, jintArray, jint, jobject, jintArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject, jobject, jobject, jdoubleArray, jint, jintArray, jint, jobject) { - -} +static void (*dlaed9_)(int *k, int *kstart, int *kstop, int *n, double *d, double *q, int *ldq, double *rho, double *dlamda, double *w, double *s, int *lds, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd7K(JNIEnv *, jobject, - jint, jint, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jdoubleArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jobject, jintArray, jint, jint, jdoubleArray, jint, jint, jobject, jobject, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed9K(JNIEnv *env, UNUSED jobject obj, + jint k, jint kstart, jint kstop, jint n, jdoubleArray d, jint offsetd, jdoubleArray q, jint offsetq, jint ldq, jdouble rho, jdoubleArray dlamda, jint offsetdlamda, jdoubleArray w, jint offsetw, jdoubleArray s, jint offsets, jint lds, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd8K(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { - -} +static void (*dlaeda_)(int *n, int *tlvls, int *curlvl, int *curpbm, int * prmptr, int * perm, int * givptr, int * givcol, double *givnum, double *q, int * qptr, double *z, double *ztemp, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasdaK(JNIEnv *, jobject, - jint, jint, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jintArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jint, jintArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaedaK(JNIEnv *env, UNUSED jobject obj, + jint n, jint tlvls, jint curlvl, jint curpbm, jintArray prmptr, jint offsetprmptr, jintArray perm, jint offsetperm, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jdoubleArray givnum, jint offsetgivnum, jdoubleArray q, jint offsetq, jintArray qptr, jint offsetqptr, jdoubleArray z, jint offsetz, jdoubleArray ztemp, jint offsetztemp, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasdqK(JNIEnv *, jobject, - jstring, jint, jint, jint, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { - -} +static void (*dlaein_)(int *rightv, int *noinit, int *n, double *h, int *ldh, double *wr, double *wi, double *vr, double *vi, double *b, int *ldb, double *work, double *eps3, double *smlnum, double *bignum, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasdtK(JNIEnv *, jobject, - jint, jobject, jobject, jintArray, jint, jintArray, jint, jintArray, jint, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaeinK(JNIEnv *env, UNUSED jobject obj, + jboolean rightv, jboolean noinit, jint n, jdoubleArray h, jint offseth, jint ldh, jdouble wr, jdouble wi, jdoubleArray vr, jint offsetvr, jdoubleArray vi, jint offsetvi, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray work, jint offsetwork, jdouble eps3, jdouble smlnum, jdouble bignum, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasetK(JNIEnv *, jobject, - jstring, jint, jint, jdouble, jdouble, jdoubleArray, jint, jint) { - -} +static void (*dlaev2_)(double *a, double *b, double *c, /*FIXME*/void *rt1, /*FIXME*/void *rt2, /*FIXME*/void *cs1, /*FIXME*/void *sn1); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq1K(JNIEnv *, jobject, - jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaev2K(JNIEnv *env, UNUSED jobject obj, + jdouble a, jdouble b, jdouble c, jobject rt1, jobject rt2, jobject cs1, jobject sn1) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq2K(JNIEnv *, jobject, - jint, jdoubleArray, jint, jobject) { - -} +static void (*dlaexc_)(int *wantq, int *n, double *t, int *ldt, double *q, int *ldq, int *j1, int *n1, int *n2, double *work, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq3K(JNIEnv *, jobject, - jint, jobject, jdoubleArray, jint, jint, jobject, jobject, jobject, jobject, jobject, jobject, jobject, jboolean) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaexcK(JNIEnv *env, UNUSED jobject obj, + jboolean wantq, jint n, jdoubleArray t, jint offsett, jint ldt, jdoubleArray q, jint offsetq, jint ldq, jint j1, jint n1, jint n2, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq4K(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jint, jint, jdouble, jdouble, jdouble, jdouble, jdouble, jdouble, jobject, jobject) { - -} +static void (*dlag2_)(double *a, int *lda, double *b, int *ldb, double *safmin, /*FIXME*/void *scale1, /*FIXME*/void *scale2, /*FIXME*/void *wr1, /*FIXME*/void *wr2, /*FIXME*/void *wi); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq5K(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jint, jdouble, jobject, jobject, jobject, jobject, jobject, jobject, jboolean) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlag2K(JNIEnv *env, UNUSED jobject obj, + jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble safmin, jobject scale1, jobject scale2, jobject wr1, jobject wr2, jobject wi) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq6K(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jint, jobject, jobject, jobject, jobject, jobject, jobject) { - -} +static void (*dlag2s_)(int *m, int *n, double *a, int *lda, float *sa, int *ldsa, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasrK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlag2sK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jdoubleArray a, jint offseta, jint lda, jfloatArray sa, jint offsetsa, jint ldsa, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasrtK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jobject) { - -} +static void (*dlags2_)(int *upper, double *a1, double *a2, double *a3, double *b1, double *b2, double *b3, /*FIXME*/void *csu, /*FIXME*/void *snu, /*FIXME*/void *csv, /*FIXME*/void *snv, /*FIXME*/void *csq, /*FIXME*/void *snq); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlassqK(JNIEnv *, jobject, - jint, jdoubleArray, jint, jint, jobject, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlags2K(JNIEnv *env, UNUSED jobject obj, + jboolean upper, jdouble a1, jdouble a2, jdouble a3, jdouble b1, jdouble b2, jdouble b3, jobject csu, jobject snu, jobject csv, jobject snv, jobject csq, jobject snq) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasv2K(JNIEnv *, jobject, - jdouble, jdouble, jdouble, jobject, jobject, jobject, jobject, jobject, jobject) { - -} +static void (*dlagtf_)(int *n, double *a, double *lambda, double *b, double *c, double *tol, double *d, int * in, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaswpK(JNIEnv *, jobject, - jint, jdoubleArray, jint, jint, jint, jint, jintArray, jint, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlagtfK(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray a, jint offseta, jdouble lambda, jdoubleArray b, jint offsetb, jdoubleArray c, jint offsetc, jdouble tol, jdoubleArray d, jint offsetd, jintArray in, jint offsetin, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasy2K(JNIEnv *, jobject, - jboolean, jboolean, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jint, jobject, jobject) { - -} +static void (*dlagtm_)(char *trans, int *n, int *nrhs, double *alpha, double *dl, double *d, double *du, double *x, int *ldx, double *beta, double *b, int *ldb); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasyfK(JNIEnv *, jobject, - jstring, jint, jint, jobject, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlagtmK(JNIEnv *env, UNUSED jobject obj, + jstring trans, jint n, jint nrhs, jdouble alpha, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray x, jint offsetx, jint ldx, jdouble beta, jdoubleArray b, jint offsetb, jint ldb) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatbsK(JNIEnv *, jobject, - jstring, jstring, jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject, jdoubleArray, jint, jobject) { - -} +static void (*dlagts_)(int *job, int *n, double *a, double *b, double *c, double *d, int * in, double *y, /*FIXME*/void *tol, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatdfK(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject, jobject, jintArray, jint, jintArray, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlagtsK(JNIEnv *env, UNUSED jobject obj, + jint job, jint n, jdoubleArray a, jint offseta, jdoubleArray b, jint offsetb, jdoubleArray c, jint offsetc, jdoubleArray d, jint offsetd, jintArray in, jint offsetin, jdoubleArray y, jint offsety, jobject tol, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatpsK(JNIEnv *, jobject, - jstring, jstring, jstring, jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jobject, jdoubleArray, jint, jobject) { - -} +static void (*dlagv2_)(double *a, int *lda, double *b, int *ldb, double *alphar, double *alphai, double *beta, /*FIXME*/void *csl, /*FIXME*/void *snl, /*FIXME*/void *csr, /*FIXME*/void *snr); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatrdK(JNIEnv *, jobject, - jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlagv2K(JNIEnv *env, UNUSED jobject obj, + jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jobject csl, jobject snl, jobject csr, jobject snr) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatrsK(JNIEnv *, jobject, - jstring, jstring, jstring, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject, jdoubleArray, jint, jobject) { - -} +static void (*dlahqr_)(int *wantt, int *wantz, int *n, int *ilo, int *ihi, double *h, int *ldh, double *wr, double *wi, int *iloz, int *ihiz, double *z, int *ldz, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatrzK(JNIEnv *, jobject, - jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlahqrK(JNIEnv *env, UNUSED jobject obj, + jboolean wantt, jboolean wantz, jint n, jint ilo, jint ihi, jdoubleArray h, jint offseth, jint ldh, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jint iloz, jint ihiz, jdoubleArray z, jint offsetz, jint ldz, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatzmK(JNIEnv *, jobject, - jstring, jint, jint, jdoubleArray, jint, jint, jdouble, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint) { - -} +static void (*dlahr2_)(int *n, int *k, int *nb, double *a, int *lda, double *tau, double *t, int *ldt, double *y, int *ldy); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlauu2K(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlahr2K(JNIEnv *env, UNUSED jobject obj, + jint n, jint k, jint nb, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray t, jint offsett, jint ldt, jdoubleArray y, jint offsety, jint ldy) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlauumK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dlahrd_)(int *n, int *k, int *nb, double *a, int *lda, double *tau, double *t, int *ldt, double *y, int *ldy); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlazq3K(JNIEnv *, jobject, - jint, jobject, jdoubleArray, jint, jint, jobject, jobject, jobject, jobject, jobject, jobject, jobject, jboolean, jobject, jobject, jobject, jobject, jobject, jobject, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlahrdK(JNIEnv *env, UNUSED jobject obj, + jint n, jint k, jint nb, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray t, jint offsett, jint ldt, jdoubleArray y, jint offsety, jint ldy) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlazq4K(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jint, jint, jdouble, jdouble, jdouble, jdouble, jdouble, jdouble, jobject, jobject, jobject) { - -} +static void (*dlaic1_)(int *job, int *j, double *x, double *sest, double *w, double *gamma, /*FIXME*/void *sestpr, /*FIXME*/void *s, /*FIXME*/void *c); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dopgtrK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaic1K(JNIEnv *env, UNUSED jobject obj, + jint job, jint j, jdoubleArray x, jint offsetx, jdouble sest, jdoubleArray w, jint offsetw, jdouble gamma, jobject sestpr, jobject s, jobject c) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dopmtrK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { - -} +static int *(*dlaisnan_)(double *din1, double *din2); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorg2lK(JNIEnv *, jobject, - jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { - +jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaisnanK(JNIEnv *env, UNUSED jobject obj, + jdouble din1, jdouble din2) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorg2rK(JNIEnv *, jobject, - jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { - -} +static void (*dlaln2_)(int *ltrans, int *na, int *nw, double *smin, double *ca, double *a, int *lda, double *d1, double *d2, double *b, int *ldb, double *wr, double *wi, double *x, int *ldx, /*FIXME*/void *scale, /*FIXME*/void *xnorm, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgbrK(JNIEnv *, jobject, - jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaln2K(JNIEnv *env, UNUSED jobject obj, + jboolean ltrans, jint na, jint nw, jdouble smin, jdouble ca, jdoubleArray a, jint offseta, jint lda, jdouble d1, jdouble d2, jdoubleArray b, jint offsetb, jint ldb, jdouble wr, jdouble wi, jdoubleArray x, jint offsetx, jint ldx, jobject scale, jobject xnorm, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorghrK(JNIEnv *, jobject, - jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dlals0_)(int *icompq, int *nl, int *nr, int *sqre, int *nrhs, double *b, int *ldb, double *bx, int *ldbx, int * perm, int *givptr, int * givcol, int *ldgcol, double *givnum, int *ldgnum, double *poles, double *difl, double *difr, double *z, int *k, double *c, double *s, double *work, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgl2K(JNIEnv *, jobject, - jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlals0K(JNIEnv *env, UNUSED jobject obj, + jint icompq, jint nl, jint nr, jint sqre, jint nrhs, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray bx, jint offsetbx, jint ldbx, jintArray perm, jint offsetperm, jint givptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jdoubleArray givnum, jint offsetgivnum, jint ldgnum, jdoubleArray poles, jint offsetpoles, jdoubleArray difl, jint offsetdifl, jdoubleArray difr, jint offsetdifr, jdoubleArray z, jint offsetz, jint k, jdouble c, jdouble s, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorglqK(JNIEnv *, jobject, - jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dlalsa_)(int *icompq, int *smlsiz, int *n, int *nrhs, double *b, int *ldb, double *bx, int *ldbx, double *u, int *ldu, double *vt, int * k, double *difl, double *difr, double *z, double *poles, int * givptr, int * givcol, int *ldgcol, int * perm, double *givnum, double *c, double *s, double *work, int * iwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgqlK(JNIEnv *, jobject, - jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlalsaK(JNIEnv *env, UNUSED jobject obj, + jint icompq, jint smlsiz, jint n, jint nrhs, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray bx, jint offsetbx, jint ldbx, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jintArray k, jint offsetk, jdoubleArray difl, jint offsetdifl, jdoubleArray difr, jint offsetdifr, jdoubleArray z, jint offsetz, jdoubleArray poles, jint offsetpoles, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jintArray perm, jint offsetperm, jdoubleArray givnum, jint offsetgivnum, jdoubleArray c, jint offsetc, jdoubleArray s, jint offsets, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgqrK(JNIEnv *, jobject, - jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dlalsd_)(const char *uplo, int *smlsiz, int *n, int *nrhs, double *d, double *e, double *b, int *ldb, double *rcond, /*FIXME*/void *rank, double *work, int * iwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgr2K(JNIEnv *, jobject, - jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlalsdK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint smlsiz, jint n, jint nrhs, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray b, jint offsetb, jint ldb, jdouble rcond, jobject rank, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgrqK(JNIEnv *, jobject, - jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dlamrg_)(int *n1, int *n2, double *a, int *dtrd1, int *dtrd2, int * index); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgtrK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamrgK(JNIEnv *env, UNUSED jobject obj, + jint n1, jint n2, jdoubleArray a, jint offseta, jint dtrd1, jint dtrd2, jintArray index, jint offsetindex) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorm2lK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { - -} +static int (*dlaneg_)(int *n, double *d, int *offsetd, double *lld, int *offsetlld, double *sigma, double *pivmin, int *r); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorm2rK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { - +jint Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanegK(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray d, jint offsetd, jdoubleArray lld, jint offsetlld, jdouble sigma, jdouble pivmin, jint r) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormbrK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { - -} +static double (*dlangb_)(char *norm, int *n, int *kl, int *ku, double *ab, int *offsetab, int *ldab, double *work, int *offsetwork); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormhrK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { - +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlangbK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jint n, jint kl, jint ku, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorml2K(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { - -} +static double (*dlange_)(char *norm, int *m, int *n, double *a, int *offseta, int *lda, double *work, int *offsetwork); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormlqK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { - +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlangeK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormqlK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { - -} +static double (*dlangt_)(char *norm, int *n, double *dl, int *offsetdl, double *d, int *offsetd, double *du, int *offsetdu); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormqrK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { - +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlangtK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jint n, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormr2K(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { - -} +static double (*dlanhs_)(char *norm, int *n, double *a, int *offseta, int *lda, double *work, int *offsetwork); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormr3K(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { - +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanhsK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormrqK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { - -} +static double (*dlansb_)(char *norm, const char *uplo, int *n, int *k, double *ab, int *offsetab, int *ldab, double *work, int *offsetwork); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormrzK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { - +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlansbK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jstring uplo, jint n, jint k, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormtrK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { - -} +static double (*dlansp_)(char *norm, const char *uplo, int *n, double *ap, int *offsetap, double *work, int *offsetwork); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbconK(JNIEnv *, jobject, - jstring, jint, jint, jdoubleArray, jint, jint, jdouble, jobject, jdoubleArray, jint, jintArray, jint, jobject) { - +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanspK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbequK(JNIEnv *, jobject, - jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject, jobject, jobject) { - -} +static double (*dlanst_)(char *norm, int *n, double *d, int *offsetd, double *e, int *offsete); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbrfsK(JNIEnv *, jobject, - jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { - +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanstK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbstfK(JNIEnv *, jobject, - jstring, jint, jint, jdoubleArray, jint, jint, jobject) { - -} +static double (*dlansy_)(char *norm, const char *uplo, int *n, double *a, int *offseta, int *lda, double *work, int *offsetwork); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbsvK(JNIEnv *, jobject, - jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { - +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlansyK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbsvxK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { - -} +static double (*dlantb_)(char *norm, const char *uplo, char *diag, int *n, int *k, double *ab, int *offsetab, int *ldab, double *work, int *offsetwork); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbtf2K(JNIEnv *, jobject, - jstring, jint, jint, jdoubleArray, jint, jint, jobject) { - +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlantbK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jstring uplo, jstring diag, jint n, jint k, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbtrfK(JNIEnv *, jobject, - jstring, jint, jint, jdoubleArray, jint, jint, jobject) { - -} +static double (*dlantp_)(char *norm, const char *uplo, char *diag, int *n, double *ap, int *offsetap, double *work, int *offsetwork); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbtrsK(JNIEnv *, jobject, - jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { - +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlantpK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jstring uplo, jstring diag, jint n, jdoubleArray ap, jint offsetap, jdoubleArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpoconK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jint, jdouble, jobject, jdoubleArray, jint, jintArray, jint, jobject) { - -} +static double (*dlantr_)(char *norm, const char *uplo, char *diag, int *m, int *n, double *a, int *offseta, int *lda, double *work, int *offsetwork); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpoequK(JNIEnv *, jobject, - jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject, jobject, jobject) { - +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlantrK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jstring uplo, jstring diag, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dporfsK(JNIEnv *, jobject, - jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { - -} +static void (*dlanv2_)(/*FIXME*/void *a, /*FIXME*/void *b, /*FIXME*/void *c, /*FIXME*/void *d, /*FIXME*/void *rt1r, /*FIXME*/void *rt1i, /*FIXME*/void *rt2r, /*FIXME*/void *rt2i, /*FIXME*/void *cs, /*FIXME*/void *sn); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dposvK(JNIEnv *, jobject, - jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanv2K(JNIEnv *env, UNUSED jobject obj, + jobject a, jobject b, jobject c, jobject d, jobject rt1r, jobject rt1i, jobject rt2r, jobject rt2i, jobject cs, jobject sn) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dposvxK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { - -} +static void (*dlapll_)(int *n, double *x, int *incx, double *y, int *incy, /*FIXME*/void *ssmin); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpotf2K(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlapllK(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy, jobject ssmin) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpotrfK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dlapmt_)(int *forwrd, int *m, int *n, double *x, int *ldx, int * k); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpotriK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlapmtK(JNIEnv *env, UNUSED jobject obj, + jboolean forwrd, jint m, jint n, jdoubleArray x, jint offsetx, jint ldx, jintArray k, jint offsetk) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpotrsK(JNIEnv *, jobject, - jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { - -} +static double (*dlapy2_)(double *x, double *y); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dppconK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jdouble, jobject, jdoubleArray, jint, jintArray, jint, jobject) { - +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlapy2K(JNIEnv *env, UNUSED jobject obj, + jdouble x, jdouble y) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dppequK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jobject, jobject, jobject) { - -} +static double (*dlapy3_)(double *x, double *y, double *z); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpprfsK(JNIEnv *, jobject, - jstring, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { - +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlapy3K(JNIEnv *env, UNUSED jobject obj, + jdouble x, jdouble y, jdouble z) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dppsvK(JNIEnv *, jobject, - jstring, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dlaqgb_)(int *m, int *n, int *kl, int *ku, double *ab, int *ldab, double *r, double *c, double *rowcnd, double *colcnd, double *amax, jstring *equed); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dppsvxK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqgbK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint kl, jint ku, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray r, jint offsetr, jdoubleArray c, jint offsetc, jdouble rowcnd, jdouble colcnd, jdouble amax, jobject equed) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpptrfK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jobject) { - -} +static void (*dlaqge_)(int *m, int *n, double *a, int *lda, double *r, double *c, double *rowcnd, double *colcnd, double *amax, jstring *equed); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpptriK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqgeK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray r, jint offsetr, jdoubleArray c, jint offsetc, jdouble rowcnd, jdouble colcnd, jdouble amax, jobject equed) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpptrsK(JNIEnv *, jobject, - jstring, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dlaqp2_)(int *m, int *n, int *offset, double *a, int *lda, int * jpvt, double *tau, double *vn11, double *vn22, double *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dptconK(JNIEnv *, jobject, - jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jobject, jdoubleArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqp2K(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint offset, jdoubleArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jdoubleArray tau, jint offsettau, jdoubleArray vn1, jint offsetvn1, jdoubleArray vn2, jint offsetvn2, jdoubleArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpteqrK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { - -} +static void (*dlaqps_)(int *m, int *n, int *offset, int *nb, /*FIXME*/void *kb, double *a, int *lda, int * jpvt, double *tau, double *vn11, double *vn22, double *auxv, double *f, int *ldf); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dptrfsK(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqpsK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint offset, jint nb, jobject kb, jdoubleArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jdoubleArray tau, jint offsettau, jdoubleArray vn1, jint offsetvn1, jdoubleArray vn2, jint offsetvn2, jdoubleArray auxv, jint offsetauxv, jdoubleArray f, jint offsetf, jint ldf) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dptsvK(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dlaqr0_)(int *wantt, int *wantz, int *n, int *ilo, int *ihi, double *h, int *ldh, double *wr, double *wi, int *iloz, int *ihiz, double *z, int *ldz, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dptsvxK(JNIEnv *, jobject, - jstring, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr0K(JNIEnv *env, UNUSED jobject obj, + jboolean wantt, jboolean wantz, jint n, jint ilo, jint ihi, jdoubleArray h, jint offseth, jint ldh, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jint iloz, jint ihiz, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpttrfK(JNIEnv *, jobject, - jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { - -} +static void (*dlaqr1_)(int *n, double *h, int *ldh, double *sr1, double *si1, double *sr2, double *si2, double *v); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpttrsK(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr1K(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray h, jint offseth, jint ldh, jdouble sr1, jdouble si1, jdouble sr2, jdouble si2, jdoubleArray v, jint offsetv) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dptts2K(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint) { - -} +static void (*dlaqr2_)(int *wantt, int *wantz, int *n, int *ktop, int *kbot, int *nw, double *h, int *ldh, int *iloz, int *ihiz, double *z, int *ldz, /*FIXME*/void *ns, /*FIXME*/void *nd, double *sr, double *si, double *v, int *ldv, int *nh, double *t, int *ldt, int *nv, double *wv, int *ldwv, double *work, int *lwork); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_drsclK(JNIEnv *, jobject, - jint, jdouble, jdoubleArray, jint, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr2K(JNIEnv *env, UNUSED jobject obj, + jboolean wantt, jboolean wantz, jint n, jint ktop, jint kbot, jint nw, jdoubleArray h, jint offseth, jint ldh, jint iloz, jint ihiz, jdoubleArray z, jint offsetz, jint ldz, jobject ns, jobject nd, jdoubleArray sr, jint offsetsr, jdoubleArray si, jint offsetsi, jdoubleArray v, jint offsetv, jint ldv, jint nh, jdoubleArray t, jint offsett, jint ldt, jint nv, jdoubleArray wv, jint offsetwv, jint ldwv, jdoubleArray work, jint offsetwork, jint lwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbevK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { - -} +static void (*dlaqr3_)(int *wantt, int *wantz, int *n, int *ktop, int *kbot, int *nw, double *h, int *ldh, int *iloz, int *ihiz, double *z, int *ldz, /*FIXME*/void *ns, /*FIXME*/void *nd, double *sr, double *si, double *v, int *ldv, int *nh, double *t, int *ldt, int *nv, double *wv, int *ldwv, double *work, int *lwork); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbevdK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr3K(JNIEnv *env, UNUSED jobject obj, + jboolean wantt, jboolean wantz, jint n, jint ktop, jint kbot, jint nw, jdoubleArray h, jint offseth, jint ldh, jint iloz, jint ihiz, jdoubleArray z, jint offsetz, jint ldz, jobject ns, jobject nd, jdoubleArray sr, jint offsetsr, jdoubleArray si, jint offsetsi, jdoubleArray v, jint offsetv, jint ldv, jint nh, jdoubleArray t, jint offsett, jint ldt, jint nv, jdoubleArray wv, jint offsetwv, jint ldwv, jdoubleArray work, jint offsetwork, jint lwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbevxK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdouble, jdouble, jint, jint, jdouble, jobject, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jobject) { - -} +static void (*dlaqr4_)(int *wantt, int *wantz, int *n, int *ilo, int *ihi, double *h, int *ldh, double *wr, double *wi, int *iloz, int *ihiz, double *z, int *ldz, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbgstK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr4K(JNIEnv *env, UNUSED jobject obj, + jboolean wantt, jboolean wantz, jint n, jint ilo, jint ihi, jdoubleArray h, jint offseth, jint ldh, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jint iloz, jint ihiz, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbgvK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { - -} +static void (*dlaqr5_)(int *wantt, int *wantz, int *kacc22, int *n, int *ktop, int *kbot, int *nshfts, double *sr, double *si, double *h, int *ldh, int *iloz, int *ihiz, double *z, int *ldz, double *v, int *ldv, double *u, int *ldu, int *nv, double *wv, int *ldwv, int *nh, double *wh, int *ldwh); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbgvdK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr5K(JNIEnv *env, UNUSED jobject obj, + jboolean wantt, jboolean wantz, jint kacc22, jint n, jint ktop, jint kbot, jint nshfts, jdoubleArray sr, jint offsetsr, jdoubleArray si, jint offsetsi, jdoubleArray h, jint offseth, jint ldh, jint iloz, jint ihiz, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray u, jint offsetu, jint ldu, jint nv, jdoubleArray wv, jint offsetwv, jint ldwv, jint nh, jdoubleArray wh, jint offsetwh, jint ldwh) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbgvxK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdouble, jdouble, jint, jint, jdouble, jobject, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jobject) { - -} +static void (*dlaqsb_)(const char *uplo, int *n, int *kd, double *ab, int *ldab, double *s, double *scond, double *amax, jstring *equed); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbtrdK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqsbK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray s, jint offsets, jdouble scond, jdouble amax, jobject equed) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsgesvK(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jfloatArray, jint, jobject, jobject) { - -} +static void (*dlaqsp_)(const char *uplo, int *n, double *ap, double *s, double *scond, double *amax, jstring *equed); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspconK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jintArray, jint, jdouble, jobject, jdoubleArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqspK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray s, jint offsets, jdouble scond, jdouble amax, jobject equed) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspevK(JNIEnv *, jobject, - jstring, jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { - -} +static void (*dlaqsy_)(const char *uplo, int *n, double *a, int *lda, double *s, double *scond, double *amax, jstring *equed); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspevdK(JNIEnv *, jobject, - jstring, jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqsyK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray s, jint offsets, jdouble scond, jdouble amax, jobject equed) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspevxK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jdoubleArray, jint, jdouble, jdouble, jint, jint, jdouble, jobject, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jobject) { - -} +static void (*dlaqtr_)(int *ltran, int *lreal, int *n, double *t, int *ldt, double *b, double *w, /*FIXME*/void *scale, double *x, double *work, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspgstK(JNIEnv *, jobject, - jint, jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqtrK(JNIEnv *env, UNUSED jobject obj, + jboolean ltran, jboolean lreal, jint n, jdoubleArray t, jint offsett, jint ldt, jdoubleArray b, jint offsetb, jdouble w, jobject scale, jdoubleArray x, jint offsetx, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspgvK(JNIEnv *, jobject, - jint, jstring, jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { - -} +static void (*dlar1v_)(int *n, int *b1, int *bn, double *lambda, double *d, double *l, double *ld, double *lld, double *pivmin, double *gaptol, double *z, int *wantnc, /*FIXME*/void *negcnt, /*FIXME*/void *ztz, /*FIXME*/void *mingma, /*FIXME*/void *r, int * isuppz, /*FIXME*/void *nrminv, /*FIXME*/void *resid, /*FIXME*/void *rqcorr, double *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspgvdK(JNIEnv *, jobject, - jint, jstring, jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlar1vK(JNIEnv *env, UNUSED jobject obj, + jint n, jint b1, jint bn, jdouble lambda, jdoubleArray d, jint offsetd, jdoubleArray l, jint offsetl, jdoubleArray ld, jint offsetld, jdoubleArray lld, jint offsetlld, jdouble pivmin, jdouble gaptol, jdoubleArray z, jint offsetz, jboolean wantnc, jobject negcnt, jobject ztz, jobject mingma, jobject r, jintArray isuppz, jint offsetisuppz, jobject nrminv, jobject resid, jobject rqcorr, jdoubleArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspgvxK(JNIEnv *, jobject, - jint, jstring, jstring, jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jint, jint, jdouble, jobject, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jobject) { - -} +static void (*dlar2v_)(int *n, double *x, double *y, double *z, int *incx, double *c, double *s, int *incc); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsprfsK(JNIEnv *, jobject, - jstring, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlar2vK(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray x, jint offsetx, jdoubleArray y, jint offsety, jdoubleArray z, jint offsetz, jint incx, jdoubleArray c, jint offsetc, jdoubleArray s, jint offsets, jint incc) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspsvK(JNIEnv *, jobject, - jstring, jint, jint, jdoubleArray, jint, jintArray, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dlarf_)(char *side, int *m, int *n, double *v, int *incv, double *tau, double *c, int *Ldc, double *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspsvxK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarfK(JNIEnv *env, UNUSED jobject obj, + jstring side, jint m, jint n, jdoubleArray v, jint offsetv, jint incv, jdouble tau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsptrdK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { - -} +static void (*dlarfb_)(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, double *v, int *ldv, double *t, int *ldt, double *c, int *Ldc, double *work, int *ldwork); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsptrfK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarfbK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring trans, jstring direct, jstring storev, jint m, jint n, jint k, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray t, jint offsett, jint ldt, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint ldwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsptriK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jintArray, jint, jdoubleArray, jint, jobject) { - -} +static void (*dlarfg_)(int *n, /*FIXME*/void *alpha, double *x, int *incx, /*FIXME*/void *tau); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsptrsK(JNIEnv *, jobject, - jstring, jint, jint, jdoubleArray, jint, jintArray, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarfgK(JNIEnv *env, UNUSED jobject obj, + jint n, jobject alpha, jdoubleArray x, jint offsetx, jint incx, jobject tau) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstebzK(JNIEnv *, jobject, - jstring, jstring, jint, jdouble, jdouble, jint, jint, jdouble, jdoubleArray, jint, jdoubleArray, jint, jobject, jobject, jdoubleArray, jint, jintArray, jint, jintArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { - -} +static void (*dlarft_)(char *direct, char *storev, int *n, int *k, double *v, int *ldv, double *tau, double *t, int *ldt); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstedcK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarftK(JNIEnv *env, UNUSED jobject obj, + jstring direct, jstring storev, jint n, jint k, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray tau, jint offsettau, jdoubleArray t, jint offsett, jint ldt) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstegrK(JNIEnv *, jobject, - jstring, jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jint, jint, jdouble, jobject, jdoubleArray, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jintArray, jint, jint, jobject) { - -} +static void (*dlarfx_)(char *side, int *m, int *n, double *v, double *tau, double *c, int *Ldc, double *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsteinK(JNIEnv *, jobject, - jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarfxK(JNIEnv *env, UNUSED jobject obj, + jstring side, jint m, jint n, jdoubleArray v, jint offsetv, jdouble tau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstemrK(JNIEnv *, jobject, - jstring, jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jint, jint, jintArray, jint, jobject, jdoubleArray, jint, jint, jintArray, jint, jint, jobject) { - -} +static void (*dlargv_)(int *n, double *x, int *incx, double *y, int *incy, double *c, int *incc); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsteqrK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlargvK(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy, jdoubleArray c, jint offsetc, jint incc) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsterfK(JNIEnv *, jobject, - jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { - -} +static void (*dlarnv_)(int *idist, int * iseed, int *n, double *x); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstevK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarnvK(JNIEnv *env, UNUSED jobject obj, + jint idist, jintArray iseed, jint offsetiseed, jint n, jdoubleArray x, jint offsetx) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstevdK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jint, jobject) { - -} +static void (*dlarra_)(int *n, double *d, double *e, double *e22, double *spltol, double *tnrm, /*FIXME*/void *nsplit, int * isplit, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstevrK(JNIEnv *, jobject, - jstring, jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jint, jint, jdouble, jobject, jdoubleArray, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jintArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarraK(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray e2, jint offsete2, jdouble spltol, jdouble tnrm, jobject nsplit, jintArray isplit, jint offsetisplit, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstevxK(JNIEnv *, jobject, - jstring, jstring, jint, jdoubleArray, jint, jdoubleArray, jint, jdouble, jdouble, jint, jint, jdouble, jobject, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jintArray, jint, jintArray, jint, jobject) { - -} +static void (*dlarrb_)(int *n, double *d, double *lld, int *ifirst, int *ilast, double *rtol1, double *rtol2, int *offset, double *w, double *wgap, double *werr, double *work, int * iwork, double *pivmin, double *spdiam, int *twist, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyconK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jint, jintArray, jint, jdouble, jobject, jdoubleArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrbK(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray d, jint offsetd, jdoubleArray lld, jint offsetlld, jint ifirst, jint ilast, jdouble rtol1, jdouble rtol2, jint offset, jdoubleArray w, jint offsetw, jdoubleArray wgap, jint offsetwgap, jdoubleArray werr, jint offsetwerr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jdouble pivmin, jdouble spdiam, jint twist, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyevK(JNIEnv *, jobject, - jstring, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dlarrc_)(char *jobt, int *n, double *vl, double *vu, double *d, double *e, double *pivmin, /*FIXME*/void *eigcnt, /*FIXME*/void *lcnt, /*FIXME*/void *rcnt, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyevdK(JNIEnv *, jobject, - jstring, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jintArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrcK(JNIEnv *env, UNUSED jobject obj, + jstring jobt, jint n, jdouble vl, jdouble vu, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdouble pivmin, jobject eigcnt, jobject lcnt, jobject rcnt, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyevrK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jdoubleArray, jint, jint, jdouble, jdouble, jint, jint, jdouble, jobject, jdoubleArray, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jintArray, jint, jint, jobject) { - -} +static void (*dlarrd_)(char *range, char *order, int *n, double *vl, double *vu, int *il, int *iu, double *gers, double *reltol, double *d, double *e, double *e22, double *pivmin, int *nsplit, int * isplit, /*FIXME*/void *m, double *w, double *werr, /*FIXME*/void *wl, /*FIXME*/void *wu, int * iblock, int * indexw, double *work, int * iwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyevxK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jdoubleArray, jint, jint, jdouble, jdouble, jint, jint, jdouble, jobject, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrdK(JNIEnv *env, UNUSED jobject obj, + jstring range, jstring order, jint n, jdouble vl, jdouble vu, jint il, jint iu, jdoubleArray gers, jint offsetgers, jdouble reltol, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray e2, jint offsete2, jdouble pivmin, jint nsplit, jintArray isplit, jint offsetisplit, jobject m, jdoubleArray w, jint offsetw, jdoubleArray werr, jint offsetwerr, jobject wl, jobject wu, jintArray iblock, jint offsetiblock, jintArray indexw, jint offsetindexw, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsygs2K(JNIEnv *, jobject, - jint, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dlarre_)(char *range, int *n, /*FIXME*/void *vl, /*FIXME*/void *vu, int *il, int *iu, double *d, double *e, double *e22, double *rtol1, double *rtol2, double *spltol, /*FIXME*/void *nsplit, int * isplit, /*FIXME*/void *m, double *w, double *werr, double *wgap, int * iblock, int * indexw, double *gers, /*FIXME*/void *pivmin, double *work, int * iwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsygstK(JNIEnv *, jobject, - jint, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarreK(JNIEnv *env, UNUSED jobject obj, + jstring range, jint n, jobject vl, jobject vu, jint il, jint iu, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray e2, jint offsete2, jdouble rtol1, jdouble rtol2, jdouble spltol, jobject nsplit, jintArray isplit, jint offsetisplit, jobject m, jdoubleArray w, jint offsetw, jdoubleArray werr, jint offsetwerr, jdoubleArray wgap, jint offsetwgap, jintArray iblock, jint offsetiblock, jintArray indexw, jint offsetindexw, jdoubleArray gers, jint offsetgers, jobject pivmin, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsygvK(JNIEnv *, jobject, - jint, jstring, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dlarrf_)(int *n, double *d, double *l, double *ld, int *clstrt, int *clend, double *w, double *wgap, double *werr, double *spdiam, double *clgapl, double *clgapr, double *pivmin, /*FIXME*/void *sigma, double *dplus, double *lplus, double *work, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsygvdK(JNIEnv *, jobject, - jint, jstring, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jintArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrfK(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray d, jint offsetd, jdoubleArray l, jint offsetl, jdoubleArray ld, jint offsetld, jint clstrt, jint clend, jdoubleArray w, jint offsetw, jdoubleArray wgap, jint offsetwgap, jdoubleArray werr, jint offsetwerr, jdouble spdiam, jdouble clgapl, jdouble clgapr, jdouble pivmin, jobject sigma, jdoubleArray dplus, jint offsetdplus, jdoubleArray lplus, jint offsetlplus, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsygvxK(JNIEnv *, jobject, - jint, jstring, jstring, jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdouble, jdouble, jint, jint, jdouble, jobject, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jintArray, jint, jobject) { - -} +static void (*dlarrj_)(int *n, double *d, double *e22, int *ifirst, int *ilast, double *rtol, int *offset, double *w, double *werr, double *work, int * iwork, double *pivmin, double *spdiam, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyrfsK(JNIEnv *, jobject, - jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrjK(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray d, jint offsetd, jdoubleArray e2, jint offsete2, jint ifirst, jint ilast, jdouble rtol, jint offset, jdoubleArray w, jint offsetw, jdoubleArray werr, jint offsetwerr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jdouble pivmin, jdouble spdiam, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsysvK(JNIEnv *, jobject, - jstring, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dlarrk_)(int *n, int *iw, double *gl, double *gu, double *d, double *e22, double *pivmin, double *reltol, /*FIXME*/void *w, /*FIXME*/void *werr, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsysvxK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrkK(JNIEnv *env, UNUSED jobject obj, + jint n, jint iw, jdouble gl, jdouble gu, jdoubleArray d, jint offsetd, jdoubleArray e2, jint offsete2, jdouble pivmin, jdouble reltol, jobject w, jobject werr, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytd2K(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jobject) { - -} +static void (*dlarrr_)(int *n, double *d, double *e, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytf2K(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrrK(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytrdK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dlarrv_)(int *n, double *vl, double *vu, double *d, double *l, double *pivmin, int * isplit, int *m, int *dol, int *dou, double *minrgp, /*FIXME*/void *rtol1, /*FIXME*/void *rtol2, double *w, double *werr, double *wgap, int * iblock, int * indexw, double *gers, double *z, int *ldz, int * isuppz, double *work, int * iwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytrfK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrvK(JNIEnv *env, UNUSED jobject obj, + jint n, jdouble vl, jdouble vu, jdoubleArray d, jint offsetd, jdoubleArray l, jint offsetl, jdouble pivmin, jintArray isplit, jint offsetisplit, jint m, jint dol, jint dou, jdouble minrgp, jobject rtol1, jobject rtol2, jdoubleArray w, jint offsetw, jdoubleArray werr, jint offsetwerr, jdoubleArray wgap, jint offsetwgap, jintArray iblock, jint offsetiblock, jintArray indexw, jint offsetindexw, jdoubleArray gers, jint offsetgers, jdoubleArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytriK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jobject) { - -} +static void (*dlartg_)(double *f, double *g, /*FIXME*/void *cs, /*FIXME*/void *sn, /*FIXME*/void *r); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytrsK(JNIEnv *, jobject, - jstring, jint, jint, jdoubleArray, jint, jint, jintArray, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlartgK(JNIEnv *env, UNUSED jobject obj, + jdouble f, jdouble g, jobject cs, jobject sn, jobject r) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtbconK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jintArray, jint, jobject) { - -} +static void (*dlartv_)(int *n, double *x, int *incx, double *y, int *incy, double *c, double *s, int *incc); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtbrfsK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlartvK(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy, jdoubleArray c, jint offsetc, jdoubleArray s, jint offsets, jint incc) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtbtrsK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dlaruv_)(int * iseed, int *n, double *x); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgevcK(JNIEnv *, jobject, - jstring, jstring, jbooleanArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jint, jobject, jdoubleArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaruvK(JNIEnv *env, UNUSED jobject obj, + jintArray iseed, jint offsetiseed, jint n, jdoubleArray x, jint offsetx) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgex2K(JNIEnv *, jobject, - jboolean, jboolean, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jint, jint, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dlarz_)(char *side, int *m, int *n, int *l, double *v, int *incv, double *tau, double *c, int *Ldc, double *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgexcK(JNIEnv *, jobject, - jboolean, jboolean, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jobject, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarzK(JNIEnv *env, UNUSED jobject obj, + jstring side, jint m, jint n, jint l, jdoubleArray v, jint offsetv, jint incv, jdouble tau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgsenK(JNIEnv *, jobject, - jint, jboolean, jboolean, jbooleanArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jobject, jobject, jdoubleArray, jint, jdoubleArray, jint, jint, jintArray, jint, jint, jobject) { - -} +static void (*dlarzb_)(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, int *l, double *v, int *ldv, double *t, int *ldt, double *c, int *Ldc, double *work, int *ldwork); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgsjaK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdouble, jdouble, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarzbK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring trans, jstring direct, jstring storev, jint m, jint n, jint k, jint l, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray t, jint offsett, jint ldt, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint ldwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgsnaK(JNIEnv *, jobject, - jstring, jstring, jbooleanArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jint, jintArray, jint, jobject) { - -} +static void (*dlarzt_)(char *direct, char *storev, int *n, int *k, double *v, int *ldv, double *tau, double *t, int *ldt); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgsy2K(JNIEnv *, jobject, - jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jobject, jobject, jintArray, jint, jobject, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarztK(JNIEnv *env, UNUSED jobject obj, + jstring direct, jstring storev, jint n, jint k, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray tau, jint offsettau, jdoubleArray t, jint offsett, jint ldt) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgsylK(JNIEnv *, jobject, - jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jobject, jdoubleArray, jint, jint, jintArray, jint, jobject) { - -} +static void (*dlas2_)(double *f, double *g, double *h, /*FIXME*/void *ssmin, /*FIXME*/void *ssmax); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtpconK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jdoubleArray, jint, jobject, jdoubleArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlas2K(JNIEnv *env, UNUSED jobject obj, + jdouble f, jdouble g, jdouble h, jobject ssmin, jobject ssmax) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtprfsK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { - -} +static void (*dlascl_)(char *type, int *kl, int *ku, double *cfrom, double *cto, int *m, int *n, double *a, int *lda, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtptriK(JNIEnv *, jobject, - jstring, jstring, jint, jdoubleArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasclK(JNIEnv *env, UNUSED jobject obj, + jstring type, jint kl, jint ku, jdouble cfrom, jdouble cto, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtptrsK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dlasd0_)(int *n, int *sqre, double *d, double *e, double *u, int *ldu, double *vt, int *ldvt, int *smlsiz, int * iwork, double *work, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrconK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd0K(JNIEnv *env, UNUSED jobject obj, + jint n, jint sqre, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jint ldvt, jint smlsiz, jintArray iwork, jint offsetiwork, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrevcK(JNIEnv *, jobject, - jstring, jstring, jbooleanArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jint, jobject, jdoubleArray, jint, jobject) { - -} +static void (*dlasd1_)(int *nl, int *nr, int *sqre, double *d, /*FIXME*/void *alpha, /*FIXME*/void *beta, double *u, int *ldu, double *vt, int *ldvt, int * idxq, int * iwork, double *work, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrexcK(JNIEnv *, jobject, - jstring, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jobject, jdoubleArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd1K(JNIEnv *env, UNUSED jobject obj, + jint nl, jint nr, jint sqre, jdoubleArray d, jint offsetd, jobject alpha, jobject beta, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jint ldvt, jintArray idxq, jint offsetidxq, jintArray iwork, jint offsetiwork, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrrfsK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jdoubleArray, jint, jintArray, jint, jobject) { - -} +static void (*dlasd2_)(int *nl, int *nr, int *sqre, /*FIXME*/void *k, double *d, double *z, double *alpha, double *beta, double *u, int *ldu, double *vt, int *ldvt, double *dsigma, double *u22, int *ldu2, double *vt22, int *ldvt2, int * idxp, int * idx, int * idxc, int * idxq, int * coltyp, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrsenK(JNIEnv *, jobject, - jstring, jstring, jbooleanArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jobject, jobject, jobject, jdoubleArray, jint, jint, jintArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd2K(JNIEnv *env, UNUSED jobject obj, + jint nl, jint nr, jint sqre, jobject k, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdouble alpha, jdouble beta, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jint ldvt, jdoubleArray dsigma, jint offsetdsigma, jdoubleArray u2, jint offsetu2, jint ldu2, jdoubleArray vt2, jint offsetvt2, jint ldvt2, jintArray idxp, jint offsetidxp, jintArray idx, jint offsetidx, jintArray idxc, jint offsetidxc, jintArray idxq, jint offsetidxq, jintArray coltyp, jint offsetcoltyp, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrsnaK(JNIEnv *, jobject, - jstring, jstring, jbooleanArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject, jdoubleArray, jint, jint, jintArray, jint, jobject) { - -} +static void (*dlasd3_)(int *nl, int *nr, int *sqre, int *k, double *d, double *q, int *ldq, double *dsigma, double *u, int *ldu, double *u22, int *ldu2, double *vt, int *ldvt, double *vt22, int *ldvt2, int * idxc, int * ctot, double *z, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrsylK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd3K(JNIEnv *env, UNUSED jobject obj, + jint nl, jint nr, jint sqre, jint k, jdoubleArray d, jint offsetd, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray dsigma, jint offsetdsigma, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray u2, jint offsetu2, jint ldu2, jdoubleArray vt, jint offsetvt, jint ldvt, jdoubleArray vt2, jint offsetvt2, jint ldvt2, jintArray idxc, jint offsetidxc, jintArray ctot, jint offsetctot, jdoubleArray z, jint offsetz, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrti2K(JNIEnv *, jobject, - jstring, jstring, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dlasd4_)(int *n, int *i, double *d, double *z, double *delta, double *rho, /*FIXME*/void *sigma, double *work, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrtriK(JNIEnv *, jobject, - jstring, jstring, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd4K(JNIEnv *env, UNUSED jobject obj, + jint n, jint i, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdoubleArray delta, jint offsetdelta, jdouble rho, jobject sigma, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrtrsK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dlasd5_)(int *i, double *d, double *z, double *delta, double *rho, /*FIXME*/void *dsigma, double *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtzrqfK(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd5K(JNIEnv *env, UNUSED jobject obj, + jint i, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdoubleArray delta, jint offsetdelta, jdouble rho, jobject dsigma, jdoubleArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtzrzfK(JNIEnv *, jobject, - jint, jint, jdoubleArray, jint, jint, jdoubleArray, jint, jdoubleArray, jint, jint, jobject) { - -} +static void (*dlasd6_)(int *icompq, int *nl, int *nr, int *sqre, double *d, double *vf, double *vl, /*FIXME*/void *alpha, /*FIXME*/void *beta, int * idxq, int * perm, /*FIXME*/void *givptr, int * givcol, int *ldgcol, double *givnum, int *ldgnum, double *poles, double *difl, double *difr, double *z, /*FIXME*/void *k, /*FIXME*/void *c, /*FIXME*/void *s, double *work, int * iwork, /*FIXME*/void *info); -jint Java_dev_ludovic_netlib_lapack_JNILAPACK_ieeeckK(JNIEnv *, jobject, - jint, jfloat, jfloat) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd6K(JNIEnv *env, UNUSED jobject obj, + jint icompq, jint nl, jint nr, jint sqre, jdoubleArray d, jint offsetd, jdoubleArray vf, jint offsetvf, jdoubleArray vl, jint offsetvl, jobject alpha, jobject beta, jintArray idxq, jint offsetidxq, jintArray perm, jint offsetperm, jobject givptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jdoubleArray givnum, jint offsetgivnum, jint ldgnum, jdoubleArray poles, jint offsetpoles, jdoubleArray difl, jint offsetdifl, jdoubleArray difr, jint offsetdifr, jdoubleArray z, jint offsetz, jobject k, jobject c, jobject s, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -jint Java_dev_ludovic_netlib_lapack_JNILAPACK_ilaenvK(JNIEnv *, jobject, - jint, jstring, jstring, jint, jint, jint, jint) { - -} +static void (*dlasd7_)(int *icompq, int *nl, int *nr, int *sqre, /*FIXME*/void *k, double *d, double *z, double *zw, double *vf, double *vfw, double *vl, double *vlw, double *alpha, double *beta, double *dsigma, int * idx, int * idxp, int * idxq, int * perm, /*FIXME*/void *givptr, int * givcol, int *ldgcol, double *givnum, int *ldgnum, /*FIXME*/void *c, /*FIXME*/void *s, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ilaverK(JNIEnv *, jobject, - jobject, jobject, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd7K(JNIEnv *env, UNUSED jobject obj, + jint icompq, jint nl, jint nr, jint sqre, jobject k, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdoubleArray zw, jint offsetzw, jdoubleArray vf, jint offsetvf, jdoubleArray vfw, jint offsetvfw, jdoubleArray vl, jint offsetvl, jdoubleArray vlw, jint offsetvlw, jdouble alpha, jdouble beta, jdoubleArray dsigma, jint offsetdsigma, jintArray idx, jint offsetidx, jintArray idxp, jint offsetidxp, jintArray idxq, jint offsetidxq, jintArray perm, jint offsetperm, jobject givptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jdoubleArray givnum, jint offsetgivnum, jint ldgnum, jobject c, jobject s, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -jint Java_dev_ludovic_netlib_lapack_JNILAPACK_iparmqK(JNIEnv *, jobject, - jint, jstring, jstring, jint, jint, jint, jint) { - -} +static void (*dlasd8_)(int *icompq, int *k, double *d, double *z, double *vf, double *vl, double *difl, double *difr, int *lddifr, double *dsigma, double *work, /*FIXME*/void *info); -jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_lsamenK(JNIEnv *, jobject, - jint, jstring, jstring) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd8K(JNIEnv *env, UNUSED jobject obj, + jint icompq, jint k, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdoubleArray vf, jint offsetvf, jdoubleArray vl, jint offsetvl, jdoubleArray difl, jint offsetdifl, jdoubleArray difr, jint offsetdifr, jint lddifr, jdoubleArray dsigma, jint offsetdsigma, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sbdsdcK(JNIEnv *, jobject, - jstring, jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jintArray, jint, jfloatArray, jint, jintArray, jint, jobject) { - -} +static void (*dlasda_)(int *icompq, int *smlsiz, int *n, int *sqre, double *d, double *e, double *u, int *ldu, double *vt, int * k, double *difl, double *difr, double *z, double *poles, int * givptr, int * givcol, int *ldgcol, int * perm, double *givnum, double *c, double *s, double *work, int * iwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sbdsqrK(JNIEnv *, jobject, - jstring, jint, jint, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasdaK(JNIEnv *env, UNUSED jobject obj, + jint icompq, jint smlsiz, jint n, jint sqre, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jintArray k, jint offsetk, jdoubleArray difl, jint offsetdifl, jdoubleArray difr, jint offsetdifr, jdoubleArray z, jint offsetz, jdoubleArray poles, jint offsetpoles, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jintArray perm, jint offsetperm, jdoubleArray givnum, jint offsetgivnum, jdoubleArray c, jint offsetc, jdoubleArray s, jint offsets, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sdisnaK(JNIEnv *, jobject, - jstring, jint, jint, jfloatArray, jint, jfloatArray, jint, jobject) { - -} +static void (*dlasdq_)(const char *uplo, int *sqre, int *n, int *ncvt, int *nru, int *ncc, double *d, double *e, double *vt, int *ldvt, double *u, int *ldu, double *c, int *Ldc, double *work, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbbrdK(JNIEnv *, jobject, - jstring, jint, jint, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasdqK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint sqre, jint n, jint ncvt, jint nru, jint ncc, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray vt, jint offsetvt, jint ldvt, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbconK(JNIEnv *, jobject, - jstring, jint, jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloat, jobject, jfloatArray, jint, jintArray, jint, jobject) { - -} +static void (*dlasdt_)(int *n, /*FIXME*/void *lvl, /*FIXME*/void *nd, int * inode, int * ndiml, int * ndimr, int *msub); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbequK(JNIEnv *, jobject, - jint, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jobject, jobject, jobject, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasdtK(JNIEnv *env, UNUSED jobject obj, + jint n, jobject lvl, jobject nd, jintArray inode, jint offsetinode, jintArray ndiml, jint offsetndiml, jintArray ndimr, jint offsetndimr, jint msub) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbrfsK(JNIEnv *, jobject, - jstring, jint, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { - -} +static void (*dlaset_)(const char *uplo, int *m, int *n, double *alpha, double *beta, double *a, int *lda); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbsvK(JNIEnv *, jobject, - jint, jint, jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasetK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint m, jint n, jdouble alpha, jdouble beta, jdoubleArray a, jint offseta, jint lda) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbsvxK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { - -} +static void (*dlasq1_)(int *n, double *d, double *e, double *work, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbtf2K(JNIEnv *, jobject, - jint, jint, jint, jint, jfloatArray, jint, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq1K(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbtrfK(JNIEnv *, jobject, - jint, jint, jint, jint, jfloatArray, jint, jint, jintArray, jint, jobject) { - -} +static void (*dlasq2_)(int *n, double *z, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbtrsK(JNIEnv *, jobject, - jstring, jint, jint, jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq2K(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray z, jint offsetz, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgebakK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { - -} +static void (*dlasq3_)(int *i0, /*FIXME*/void *n0, double *z, int *pp, /*FIXME*/void *dmin, /*FIXME*/void *sigma, /*FIXME*/void *desig, /*FIXME*/void *qmax, /*FIXME*/void *nfail, /*FIXME*/void *iter, /*FIXME*/void *ndiv, int *ieee); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgebalK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jint, jobject, jobject, jfloatArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq3K(JNIEnv *env, UNUSED jobject obj, + jint i0, jobject n0, jdoubleArray z, jint offsetz, jint pp, jobject dmin, jobject sigma, jobject desig, jobject qmax, jobject nfail, jobject iter, jobject ndiv, jboolean ieee) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgebd2K(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jobject) { - -} +static void (*dlasq4_)(int *i0, int *n0, double *z, int *pp, int *n0in, double *dmin, double *dmin1, double *dmin2, double *dn, double *dn1, double *dn2, /*FIXME*/void *tau, /*FIXME*/void *ttype); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgebrdK(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq4K(JNIEnv *env, UNUSED jobject obj, + jint i0, jint n0, jdoubleArray z, jint offsetz, jint pp, jint n0in, jdouble dmin, jdouble dmin1, jdouble dmin2, jdouble dn, jdouble dn1, jdouble dn2, jobject tau, jobject ttype) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeconK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jint, jfloat, jobject, jfloatArray, jint, jintArray, jint, jobject) { - -} +static void (*dlasq5_)(int *i0, int *n0, double *z, int *pp, double *tau, /*FIXME*/void *dmin, /*FIXME*/void *dmin1, /*FIXME*/void *dmin2, /*FIXME*/void *dn, /*FIXME*/void *dnm1, /*FIXME*/void *dnm2, int *ieee); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeequK(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jobject, jobject, jobject, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq5K(JNIEnv *env, UNUSED jobject obj, + jint i0, jint n0, jdoubleArray z, jint offsetz, jint pp, jdouble tau, jobject dmin, jobject dmin1, jobject dmin2, jobject dn, jobject dnm1, jobject dnm2, jboolean ieee) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeesK(JNIEnv *, jobject, - jstring, jstring, jobject, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jbooleanArray, jint, jobject) { - -} +static void (*dlasq6_)(int *i0, int *n0, double *z, int *pp, /*FIXME*/void *dmin, /*FIXME*/void *dmin1, /*FIXME*/void *dmin2, /*FIXME*/void *dn, /*FIXME*/void *dnm1, /*FIXME*/void *dnm2); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeesxK(JNIEnv *, jobject, - jstring, jstring, jobject, jstring, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject, jobject, jfloatArray, jint, jint, jintArray, jint, jint, jbooleanArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq6K(JNIEnv *env, UNUSED jobject obj, + jint i0, jint n0, jdoubleArray z, jint offsetz, jint pp, jobject dmin, jobject dmin1, jobject dmin2, jobject dn, jobject dnm1, jobject dnm2) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeevK(JNIEnv *, jobject, - jstring, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { - -} +static void (*dlasr_)(char *side, char *pivot, char *direct, int *m, int *n, double *c, double *s, double *a, int *lda); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeevxK(JNIEnv *, jobject, - jstring, jstring, jstring, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jobject, jfloatArray, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasrK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring pivot, jstring direct, jint m, jint n, jdoubleArray c, jint offsetc, jdoubleArray s, jint offsets, jdoubleArray a, jint offseta, jint lda) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgegsK(JNIEnv *, jobject, - jstring, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { - -} +static void (*dlasrt_)(char *id, int *n, double *d, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgegvK(JNIEnv *, jobject, - jstring, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasrtK(JNIEnv *env, UNUSED jobject obj, + jstring id, jint n, jdoubleArray d, jint offsetd, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgehd2K(JNIEnv *, jobject, - jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jobject) { - -} +static void (*dlassq_)(int *n, double *x, int *incx, /*FIXME*/void *scale, /*FIXME*/void *sumsq); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgehrdK(JNIEnv *, jobject, - jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlassqK(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray x, jint offsetx, jint incx, jobject scale, jobject sumsq) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelq2K(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jobject) { - -} +static void (*dlasv2_)(double *f, double *g, double *h, double *ssmin, /*FIXME*/void *ssmax, /*FIXME*/void *snr, double *csr, double *snl, double *csl); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelqfK(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasv2K(JNIEnv *env, UNUSED jobject obj, + jdouble f, jdouble g, jdouble h, jobject ssmin, jobject ssmax, jobject snr, jobject csr, jobject snl, jobject csl) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelsK(JNIEnv *, jobject, - jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { - -} +static void (*dlaswp_)(int *n, double *a, int *lda, int *k1, int *k2, int * ipiv, int *incx); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelsdK(JNIEnv *, jobject, - jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloat, jobject, jfloatArray, jint, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaswpK(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray a, jint offseta, jint lda, jint k1, jint k2, jintArray ipiv, jint offsetipiv, jint incx) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelssK(JNIEnv *, jobject, - jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloat, jobject, jfloatArray, jint, jint, jobject) { - -} +static void (*dlasy2_)(int *ltranl, int *ltranr, int *isgn, int *n1, int *n2, double *tl, int *ldtl, double *tr, int *ldtr, double *b, int *ldb, /*FIXME*/void *scale, double *x, int *ldx, /*FIXME*/void *xnorm, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelsxK(JNIEnv *, jobject, - jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloat, jobject, jfloatArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasy2K(JNIEnv *env, UNUSED jobject obj, + jboolean ltranl, jboolean ltranr, jint isgn, jint n1, jint n2, jdoubleArray tl, jint offsettl, jint ldtl, jdoubleArray tr, jint offsettr, jint ldtr, jdoubleArray b, jint offsetb, jint ldb, jobject scale, jdoubleArray x, jint offsetx, jint ldx, jobject xnorm, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelsyK(JNIEnv *, jobject, - jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloat, jobject, jfloatArray, jint, jint, jobject) { - -} +static void (*dlasyf_)(const char *uplo, int *n, int *nb, /*FIXME*/void *kb, double *a, int *lda, int * ipiv, double *w, int *ldw, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeql2K(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasyfK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint nb, jobject kb, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray w, jint offsetw, jint ldw, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeqlfK(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { - -} +static void (*dlatbs_)(const char *uplo, char *trans, char *diag, char *normin, int *n, int *kd, double *ab, int *ldab, double *x, /*FIXME*/void *scale, double *cnorm, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeqp3K(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatbsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jstring trans, jstring diag, jstring normin, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray x, jint offsetx, jobject scale, jdoubleArray cnorm, jint offsetcnorm, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeqpfK(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jfloatArray, jint, jobject) { - -} +static void (*dlatdf_)(int *ijob, int *n, double *z, int *ldz, double *rhs, /*FIXME*/void *rdsum, /*FIXME*/void *rdscal, int * ipiv, int * jpiv); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeqr2K(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatdfK(JNIEnv *env, UNUSED jobject obj, + jint ijob, jint n, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray rhs, jint offsetrhs, jobject rdsum, jobject rdscal, jintArray ipiv, jint offsetipiv, jintArray jpiv, jint offsetjpiv) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeqrfK(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { - -} +static void (*dlatps_)(const char *uplo, char *trans, char *diag, char *normin, int *n, double *ap, double *x, /*FIXME*/void *scale, double *cnorm, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgerfsK(JNIEnv *, jobject, - jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatpsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jstring trans, jstring diag, jstring normin, jint n, jdoubleArray ap, jint offsetap, jdoubleArray x, jint offsetx, jobject scale, jdoubleArray cnorm, jint offsetcnorm, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgerq2K(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jobject) { - -} +static void (*dlatrd_)(const char *uplo, int *n, int *nb, double *a, int *lda, double *e, double *tau, double *w, int *ldw); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgerqfK(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatrdK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint nb, jdoubleArray a, jint offseta, jint lda, jdoubleArray e, jint offsete, jdoubleArray tau, jint offsettau, jdoubleArray w, jint offsetw, jint ldw) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgesc2K(JNIEnv *, jobject, - jint, jfloatArray, jint, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jobject) { - -} +static void (*dlatrs_)(const char *uplo, char *trans, char *diag, char *normin, int *n, double *a, int *lda, double *x, /*FIXME*/void *scale, double *cnorm, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgesddK(JNIEnv *, jobject, - jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatrsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jstring trans, jstring diag, jstring normin, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jobject scale, jdoubleArray cnorm, jint offsetcnorm, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgesvK(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jobject) { - -} +static void (*dlatrz_)(int *m, int *n, int *l, double *a, int *lda, double *tau, double *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgesvdK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatrzK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint l, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgesvxK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { - -} +static void (*dlatzm_)(char *side, int *m, int *n, double *v, int *incv, double *tau, double *c11, double *c22, int *Ldc, double *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgetc2K(JNIEnv *, jobject, - jint, jfloatArray, jint, jint, jintArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatzmK(JNIEnv *env, UNUSED jobject obj, + jstring side, jint m, jint n, jdoubleArray v, jint offsetv, jint incv, jdouble tau, jdoubleArray c1, jint offsetc1, jdoubleArray c2, jint offsetc2, jint Ldc, jdoubleArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgetf2K(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jint, jintArray, jint, jobject) { - -} +static void (*dlauu2_)(const char *uplo, int *n, double *a, int *lda, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgetrfK(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlauu2K(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgetriK(JNIEnv *, jobject, - jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jobject) { - -} +static void (*dlauum_)(const char *uplo, int *n, double *a, int *lda, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgetrsK(JNIEnv *, jobject, - jstring, jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlauumK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggbakK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { - -} +// static void (*dlazq3_)(int *i0, /*FIXME*/void *n0, double *z, int *pp, /*FIXME*/void *dmin, /*FIXME*/void *sigma, /*FIXME*/void *desig, /*FIXME*/void *qmax, /*FIXME*/void *nfail, /*FIXME*/void *iter, /*FIXME*/void *ndiv, int *ieee, /*FIXME*/void *ttype, /*FIXME*/void *dmin1, /*FIXME*/void *dmin2, /*FIXME*/void *dn, /*FIXME*/void *dn1, /*FIXME*/void *dn2, /*FIXME*/void *tau); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggbalK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlazq3K(JNIEnv *env, UNUSED jobject obj, + jint i0, jobject n0, jdoubleArray z, jint offsetz, jint pp, jobject dmin, jobject sigma, jobject desig, jobject qmax, jobject nfail, jobject iter, jobject ndiv, jboolean ieee, jobject ttype, jobject dmin1, jobject dmin2, jobject dn, jobject dn1, jobject dn2, jobject tau) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggesK(JNIEnv *, jobject, - jstring, jstring, jstring, jobject, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jbooleanArray, jint, jobject) { - -} +// static void (*dlazq4_)(int *i0, int *n0, double *z, int *pp, int *n0in, double *dmin, double *dmin1, double *dmin2, double *dn, double *dn1, double *dn2, /*FIXME*/void *tau, /*FIXME*/void *ttype, /*FIXME*/void *g); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggesxK(JNIEnv *, jobject, - jstring, jstring, jstring, jobject, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jintArray, jint, jint, jbooleanArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlazq4K(JNIEnv *env, UNUSED jobject obj, + jint i0, jint n0, jdoubleArray z, jint offsetz, jint pp, jint n0in, jdouble dmin, jdouble dmin1, jdouble dmin2, jdouble dn, jdouble dn1, jdouble dn2, jobject tau, jobject ttype, jobject g) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggevK(JNIEnv *, jobject, - jstring, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { - -} +static void (*dopgtr_)(const char *uplo, int *n, double *ap, double *tau, double *q, int *ldq, double *work, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggevxK(JNIEnv *, jobject, - jstring, jstring, jstring, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jobject, jfloatArray, jint, jfloatArray, jint, jobject, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jintArray, jint, jbooleanArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dopgtrK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray tau, jint offsettau, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggglmK(JNIEnv *, jobject, - jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { - -} +static void (*dopmtr_)(char *side, const char *uplo, char *trans, int *m, int *n, double *ap, double *tau, double *c, int *Ldc, double *work, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgghrdK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dopmtrK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring uplo, jstring trans, jint m, jint n, jdoubleArray ap, jint offsetap, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgglseK(JNIEnv *, jobject, - jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { - -} +static void (*dorg2l_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggqrfK(JNIEnv *, jobject, - jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorg2lK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggrqfK(JNIEnv *, jobject, - jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { - -} +static void (*dorg2r_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggsvdK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jint, jobject, jobject, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorg2rK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggsvpK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloat, jfloat, jobject, jobject, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jfloatArray, jint, jobject) { - -} +static void (*dorgbr_)(char *vect, int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgtconK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jfloat, jobject, jfloatArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgbrK(JNIEnv *env, UNUSED jobject obj, + jstring vect, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgtrfsK(JNIEnv *, jobject, - jstring, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { - -} +static void (*dorghr_)(int *n, int *ilo, int *ihi, double *a, int *lda, double *tau, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgtsvK(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorghrK(JNIEnv *env, UNUSED jobject obj, + jint n, jint ilo, jint ihi, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgtsvxK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { - -} +static void (*dorgl2_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgttrfK(JNIEnv *, jobject, - jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgl2K(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgttrsK(JNIEnv *, jobject, - jstring, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jfloatArray, jint, jint, jobject) { - -} +static void (*dorglq_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgtts2K(JNIEnv *, jobject, - jint, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jfloatArray, jint, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorglqK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_shgeqzK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { - -} +static void (*dorgql_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_shseinK(JNIEnv *, jobject, - jstring, jstring, jstring, jbooleanArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jint, jobject, jfloatArray, jint, jintArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgqlK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_shseqrK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { - -} +static void (*dorgqr_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, int *lwork, /*FIXME*/void *info); -jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_sisnanK(JNIEnv *, jobject, - jfloat) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgqrK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slabadK(JNIEnv *, jobject, - jobject, jobject) { - -} +static void (*dorgr2_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slabrdK(JNIEnv *, jobject, - jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgr2K(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slacn2K(JNIEnv *, jobject, - jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject, jobject, jintArray, jint) { - -} +static void (*dorgrq_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaconK(JNIEnv *, jobject, - jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgrqK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slacpyK(JNIEnv *, jobject, - jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint) { - -} +static void (*dorgtr_)(const char *uplo, int *n, double *a, int *lda, double *tau, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sladivK(JNIEnv *, jobject, - jfloat, jfloat, jfloat, jfloat, jobject, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgtrK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slae2K(JNIEnv *, jobject, - jfloat, jfloat, jfloat, jobject, jobject) { - -} +static void (*dorm2l_)(char *side, char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaebzK(JNIEnv *, jobject, - jint, jint, jint, jint, jint, jint, jfloat, jfloat, jfloat, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jfloatArray, jint, jfloatArray, jint, jobject, jintArray, jint, jfloatArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorm2lK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed0K(JNIEnv *, jobject, - jint, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jintArray, jint, jobject) { - -} +static void (*dorm2r_)(char *side, char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed1K(JNIEnv *, jobject, - jint, jfloatArray, jint, jfloatArray, jint, jint, jintArray, jint, jobject, jint, jfloatArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorm2rK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed2K(JNIEnv *, jobject, - jobject, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jintArray, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jobject) { - -} +static void (*dormbr_)(char *vect, char *side, char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed3K(JNIEnv *, jobject, - jint, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloat, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jfloatArray, jint, jfloatArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormbrK(JNIEnv *env, UNUSED jobject obj, + jstring vect, jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed4K(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jobject, jobject) { - -} +static void (*dormhr_)(char *side, char *trans, int *m, int *n, int *ilo, int *ihi, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed5K(JNIEnv *, jobject, - jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormhrK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring trans, jint m, jint n, jint ilo, jint ihi, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed6K(JNIEnv *, jobject, - jint, jboolean, jfloat, jfloatArray, jint, jfloatArray, jint, jfloat, jobject, jobject) { - -} +static void (*dorml2_)(char *side, char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed7K(JNIEnv *, jobject, - jint, jint, jint, jint, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jintArray, jint, jobject, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorml2K(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed8K(JNIEnv *, jobject, - jint, jobject, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jintArray, jint, jobject, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jintArray, jint, jobject, jintArray, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jobject) { - -} +static void (*dormlq_)(char *side, char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed9K(JNIEnv *, jobject, - jint, jint, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloat, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormlqK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaedaK(JNIEnv *, jobject, - jint, jint, jint, jint, jintArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jfloatArray, jint, jfloatArray, jint, jobject) { - -} +static void (*dormql_)(char *side, char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaeinK(JNIEnv *, jobject, - jboolean, jboolean, jint, jfloatArray, jint, jint, jfloat, jfloat, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloat, jfloat, jfloat, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormqlK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaev2K(JNIEnv *, jobject, - jfloat, jfloat, jfloat, jobject, jobject, jobject, jobject) { - -} +static void (*dormqr_)(char *side, char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaexcK(JNIEnv *, jobject, - jboolean, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jint, jint, jint, jfloatArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormqrK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slag2K(JNIEnv *, jobject, - jfloatArray, jint, jint, jfloatArray, jint, jint, jfloat, jobject, jobject, jobject, jobject, jobject) { - -} +static void (*dormr2_)(char *side, char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slag2dK(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jint, jdoubleArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormr2K(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slags2K(JNIEnv *, jobject, - jboolean, jfloat, jfloat, jfloat, jfloat, jfloat, jfloat, jobject, jobject, jobject, jobject, jobject, jobject) { - -} +static void (*dormr3_)(char *side, char *trans, int *m, int *n, int *k, int *l, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slagtfK(JNIEnv *, jobject, - jint, jfloatArray, jint, jfloat, jfloatArray, jint, jfloatArray, jint, jfloat, jfloatArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormr3K(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring trans, jint m, jint n, jint k, jint l, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slagtmK(JNIEnv *, jobject, - jstring, jint, jint, jfloat, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloat, jfloatArray, jint, jint) { - -} +static void (*dormrq_)(char *side, char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slagtsK(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jfloatArray, jint, jobject, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormrqK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slagv2K(JNIEnv *, jobject, - jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jobject, jobject, jobject, jobject) { - -} +static void (*dormrz_)(char *side, char *trans, int *m, int *n, int *k, int *l, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slahqrK(JNIEnv *, jobject, - jboolean, jboolean, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jint, jfloatArray, jint, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormrzK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring trans, jint m, jint n, jint k, jint l, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slahr2K(JNIEnv *, jobject, - jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint) { - -} +static void (*dormtr_)(char *side, const char *uplo, char *trans, int *m, int *n, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slahrdK(JNIEnv *, jobject, - jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormtrK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring uplo, jstring trans, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaic1K(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jfloat, jfloatArray, jint, jfloat, jobject, jobject, jobject) { - -} +static void (*dpbcon_)(const char *uplo, int *n, int *kd, double *ab, int *ldab, double *anorm, /*FIXME*/void *rcond, double *work, int * iwork, /*FIXME*/void *info); -jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_slaisnanK(JNIEnv *, jobject, - jfloat, jfloat) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbconK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaln2K(JNIEnv *, jobject, - jboolean, jint, jint, jfloat, jfloat, jfloatArray, jint, jint, jfloat, jfloat, jfloatArray, jint, jint, jfloat, jfloat, jfloatArray, jint, jint, jobject, jobject, jobject) { - -} +static void (*dpbequ_)(const char *uplo, int *n, int *kd, double *ab, int *ldab, double *s, /*FIXME*/void *scond, /*FIXME*/void *amax, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slals0K(JNIEnv *, jobject, - jint, jint, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jint, jintArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloat, jfloat, jfloatArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbequK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray s, jint offsets, jobject scond, jobject amax, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slalsaK(JNIEnv *, jobject, - jint, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jintArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jint, jintArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { - -} +static void (*dpbrfs_)(const char *uplo, int *n, int *kd, int *nrhs, double *ab, int *ldab, double *afb, int *ldafb, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slalsdK(JNIEnv *, jobject, - jstring, jint, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloat, jobject, jfloatArray, jint, jintArray, jint, jobject) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbrfsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint kd, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray afb, jint offsetafb, jint ldafb, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slamrgK(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jint, jint, jintArray, jint) { - -} +static void (*dpbstf_)(const char *uplo, int *n, int *kd, double *ab, int *ldab, /*FIXME*/void *info); -jint Java_dev_ludovic_netlib_lapack_JNILAPACK_slanegK(JNIEnv *, jobject, - jint, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbstfK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slangbK(JNIEnv *, jobject, - jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint) { - -} +static void (*dpbsv_)(const char *uplo, int *n, int *kd, int *nrhs, double *ab, int *ldab, double *b, int *ldb, /*FIXME*/void *info); -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slangeK(JNIEnv *, jobject, - jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbsvK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint kd, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slangtK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint) { - -} +static void (*dpbsvx_)(char *fact, const char *uplo, int *n, int *kd, int *nrhs, double *ab, int *ldab, double *afb, int *ldafb, jstring *equed, double *s, double *b, int *ldb, double *x, int *ldx, /*FIXME*/void *rcond, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slanhsK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jint, jfloatArray, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbsvxK(JNIEnv *env, UNUSED jobject obj, + jstring fact, jstring uplo, jint n, jint kd, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray afb, jint offsetafb, jint ldafb, jobject equed, jdoubleArray s, jint offsets, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slansbK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint) { - -} +static void (*dpbtf2_)(const char *uplo, int *n, int *kd, double *ab, int *ldab, /*FIXME*/void *info); -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slanspK(JNIEnv *, jobject, - jstring, jstring, jint, jfloatArray, jint, jfloatArray, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbtf2K(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slanstK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jfloatArray, jint) { - -} +static void (*dpbtrf_)(const char *uplo, int *n, int *kd, double *ab, int *ldab, /*FIXME*/void *info); -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slansyK(JNIEnv *, jobject, - jstring, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint) { - +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbtrfK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slantbK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint) { - +static void (*dpbtrs_)(const char *uplo, int *n, int *kd, int *nrhs, double *ab, int *ldab, double *b, int *ldb, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbtrsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint kd, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slantpK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jfloatArray, jint, jfloatArray, jint) { - +static void (*dpocon_)(const char *uplo, int *n, double *a, int *lda, double *anorm, /*FIXME*/void *rcond, double *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpoconK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slantrK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint) { - +static void (*dpoequ_)(int *n, double *a, int *lda, double *s, /*FIXME*/void *scond, /*FIXME*/void *amax, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpoequK(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray s, jint offsets, jobject scond, jobject amax, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slanv2K(JNIEnv *, jobject, - jobject, jobject, jobject, jobject, jobject, jobject, jobject, jobject, jobject, jobject) { - +static void (*dporfs_)(const char *uplo, int *n, int *nrhs, double *a, int *lda, double *af, int *ldaf, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dporfsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray af, jint offsetaf, jint ldaf, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slapllK(JNIEnv *, jobject, - jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { - +static void (*dposv_)(const char *uplo, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dposvK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slapmtK(JNIEnv *, jobject, - jboolean, jint, jint, jfloatArray, jint, jint, jintArray, jint) { - +static void (*dposvx_)(char *fact, const char *uplo, int *n, int *nrhs, double *a, int *lda, double *af, int *ldaf, jstring *equed, double *s, double *b, int *ldb, double *x, int *ldx, /*FIXME*/void *rcond, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dposvxK(JNIEnv *env, UNUSED jobject obj, + jstring fact, jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray af, jint offsetaf, jint ldaf, jobject equed, jdoubleArray s, jint offsets, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slapy2K(JNIEnv *, jobject, - jfloat, jfloat) { - +static void (*dpotf2_)(const char *uplo, int *n, double *a, int *lda, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpotf2K(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slapy3K(JNIEnv *, jobject, - jfloat, jfloat, jfloat) { - +static void (*dpotrf_)(const char *uplo, int *n, double *a, int *lda, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpotrfK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqgbK(JNIEnv *, jobject, - jint, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jfloat, jobject) { - +static void (*dpotri_)(const char *uplo, int *n, double *a, int *lda, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpotriK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqgeK(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jfloat, jobject) { - +static void (*dpotrs_)(const char *uplo, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpotrsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqp2K(JNIEnv *, jobject, - jint, jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint) { - +static void (*dppcon_)(const char *uplo, int *n, double *ap, double *anorm, /*FIXME*/void *rcond, double *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dppconK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqpsK(JNIEnv *, jobject, - jint, jint, jint, jint, jobject, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint) { - +static void (*dppequ_)(const char *uplo, int *n, double *ap, double *s, /*FIXME*/void *scond, /*FIXME*/void *amax, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dppequK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray s, jint offsets, jobject scond, jobject amax, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr0K(JNIEnv *, jobject, - jboolean, jboolean, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { - +static void (*dpprfs_)(const char *uplo, int *n, int *nrhs, double *ap, double *afp, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpprfsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray afp, jint offsetafp, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr1K(JNIEnv *, jobject, - jint, jfloatArray, jint, jint, jfloat, jfloat, jfloat, jfloat, jfloatArray, jint) { - +static void (*dppsv_)(const char *uplo, int *n, int *nrhs, double *ap, double *b, int *ldb, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dppsvK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + jboolean failedOOM = FALSE; + const char *nuplo = NULL; double *nap = NULL, *nb = NULL; int ninfo = 0; + ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; + if (!(nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto failOOM; + if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto failOOM; + dppsv_(nuplo, &n, &nrhs, nap + offsetap, nb + offsetb, &ldb, &ninfo); +done: + if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, failedOOM ? JNI_ABORT : 0); + if (nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, nap, failedOOM ? JNI_ABORT : 0); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + (*env)->SetIntField(env, info, intW_val_fieldID, ninfo); + if (failedOOM) throwOOM(env); + return; +failOOM: + failedOOM = TRUE; + goto done; } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr2K(JNIEnv *, jobject, - jboolean, jboolean, jint, jint, jint, jint, jfloatArray, jint, jint, jint, jint, jfloatArray, jint, jint, jobject, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jint, jfloatArray, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint) { - +static void (*dppsvx_)(char *fact, const char *uplo, int *n, int *nrhs, double *ap, double *afp, jstring *equed, double *s, double *b, int *ldb, double *x, int *ldx, /*FIXME*/void *rcond, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dppsvxK(JNIEnv *env, UNUSED jobject obj, + jstring fact, jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray afp, jint offsetafp, jobject equed, jdoubleArray s, jint offsets, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr3K(JNIEnv *, jobject, - jboolean, jboolean, jint, jint, jint, jint, jfloatArray, jint, jint, jint, jint, jfloatArray, jint, jint, jobject, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jint, jfloatArray, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint) { - +static void (*dpptrf_)(const char *uplo, int *n, double *ap, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpptrfK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jdoubleArray ap, jint offsetap, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr4K(JNIEnv *, jobject, - jboolean, jboolean, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { - +static void (*dpptri_)(const char *uplo, int *n, double *ap, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpptriK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jdoubleArray ap, jint offsetap, jobject info) { + jboolean failedOOM = FALSE; + const char *nuplo = NULL; double *nap = NULL, *nb = NULL; int ninfo = 0; + ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; + if (!(nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto failOOM; + dpptri_(nuplo, &n, nap + offsetap, &ninfo); +done: + if (nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, nap, failedOOM ? JNI_ABORT : 0); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + (*env)->SetIntField(env, info, intW_val_fieldID, ninfo); + if (failedOOM) throwOOM(env); + return; +failOOM: + failedOOM = TRUE; + goto done; } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr5K(JNIEnv *, jobject, - jboolean, jboolean, jint, jint, jint, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jint, jfloatArray, jint, jint, jint, jfloatArray, jint, jint) { - +static void (*dpptrs_)(const char *uplo, int *n, int *nrhs, double *ap, double *b, int *ldb, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpptrsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqsbK(JNIEnv *, jobject, - jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloat, jfloat, jobject) { - +static void (*dptcon_)(int *n, double *d, double *e, double *anorm, /*FIXME*/void *rcond, double *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dptconK(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqspK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jobject) { - +static void (*dpteqr_)(char *compz, int *n, double *d, double *e, double *z, int *ldz, double *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpteqrK(JNIEnv *env, UNUSED jobject obj, + jstring compz, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqsyK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloat, jfloat, jobject) { - +static void (*dptrfs_)(int *n, int *nrhs, double *d, double *e, double *df, double *ef, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dptrfsK(JNIEnv *env, UNUSED jobject obj, + jint n, jint nrhs, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray df, jint offsetdf, jdoubleArray ef, jint offsetef, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqtrK(JNIEnv *, jobject, - jboolean, jboolean, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloat, jobject, jfloatArray, jint, jfloatArray, jint, jobject) { - +static void (*dptsv_)(int *n, int *nrhs, double *d, double *e, double *b, int *ldb, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dptsvK(JNIEnv *env, UNUSED jobject obj, + jint n, jint nrhs, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slar1vK(JNIEnv *, jobject, - jint, jint, jint, jfloat, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jfloatArray, jint, jboolean, jobject, jobject, jobject, jobject, jintArray, jint, jobject, jobject, jobject, jfloatArray, jint) { - +static void (*dptsvx_)(char *fact, int *n, int *nrhs, double *d, double *e, double *df, double *ef, double *b, int *ldb, double *x, int *ldx, /*FIXME*/void *rcond, double *ferr, double *berr, double *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dptsvxK(JNIEnv *env, UNUSED jobject obj, + jstring fact, jint n, jint nrhs, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray df, jint offsetdf, jdoubleArray ef, jint offsetef, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slar2vK(JNIEnv *, jobject, - jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint) { - +static void (*dpttrf_)(int *n, double *d, double *e, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpttrfK(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarfK(JNIEnv *, jobject, - jstring, jint, jint, jfloatArray, jint, jint, jfloat, jfloatArray, jint, jint, jfloatArray, jint) { - +static void (*dpttrs_)(int *n, int *nrhs, double *d, double *e, double *b, int *ldb, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpttrsK(JNIEnv *env, UNUSED jobject obj, + jint n, jint nrhs, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarfbK(JNIEnv *, jobject, - jstring, jstring, jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint) { - +static void (*dptts2_)(int *n, int *nrhs, double *d, double *e, double *b, int *ldb); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dptts2K(JNIEnv *env, UNUSED jobject obj, + jint n, jint nrhs, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray b, jint offsetb, jint ldb) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarfgK(JNIEnv *, jobject, - jint, jobject, jfloatArray, jint, jint, jobject) { - +static void (*drscl_)(int *n, double *sa, double *sx, int *incx); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_drsclK(JNIEnv *env, UNUSED jobject obj, + jint n, jdouble sa, jdoubleArray sx, jint offsetsx, jint incx) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarftK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint) { - +static void (*dsbev_)(char *jobz, const char *uplo, int *n, int *kd, double *ab, int *ldab, double *w, double *z, int *ldz, double *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbevK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarfxK(JNIEnv *, jobject, - jstring, jint, jint, jfloatArray, jint, jfloat, jfloatArray, jint, jint, jfloatArray, jint) { - +static void (*dsbevd_)(char *jobz, const char *uplo, int *n, int *kd, double *ab, int *ldab, double *w, double *z, int *ldz, double *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbevdK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slargvK(JNIEnv *, jobject, - jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint) { - +static void (*dsbevx_)(char *jobz, char *range, const char *uplo, int *n, int *kd, double *ab, int *ldab, double *q, int *ldq, double *vl, double *vu, int *il, int *iu, double *abstol, /*FIXME*/void *m, double *w, double *z, int *ldz, double *work, int * iwork, int * ifail, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbevxK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring range, jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray q, jint offsetq, jint ldq, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarnvK(JNIEnv *, jobject, - jint, jintArray, jint, jint, jfloatArray, jint) { - +static void (*dsbgst_)(char *vect, const char *uplo, int *n, int *ka, int *kb, double *ab, int *ldab, double *bb, int *ldbb, double *x, int *ldx, double *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbgstK(JNIEnv *env, UNUSED jobject obj, + jstring vect, jstring uplo, jint n, jint ka, jint kb, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray bb, jint offsetbb, jint ldbb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarraK(JNIEnv *, jobject, - jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jobject, jintArray, jint, jobject) { - +static void (*dsbgv_)(char *jobz, const char *uplo, int *n, int *ka, int *kb, double *ab, int *ldab, double *bb, int *ldbb, double *w, double *z, int *ldz, double *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbgvK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring uplo, jint n, jint ka, jint kb, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray bb, jint offsetbb, jint ldbb, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrbK(JNIEnv *, jobject, - jint, jfloatArray, jint, jfloatArray, jint, jint, jint, jfloat, jfloat, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jfloat, jfloat, jint, jobject) { - +static void (*dsbgvd_)(char *jobz, const char *uplo, int *n, int *ka, int *kb, double *ab, int *ldab, double *bb, int *ldbb, double *w, double *z, int *ldz, double *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbgvdK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring uplo, jint n, jint ka, jint kb, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray bb, jint offsetbb, jint ldbb, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrcK(JNIEnv *, jobject, - jstring, jint, jfloat, jfloat, jfloatArray, jint, jfloatArray, jint, jfloat, jobject, jobject, jobject, jobject) { - +static void (*dsbgvx_)(char *jobz, char *range, const char *uplo, int *n, int *ka, int *kb, double *ab, int *ldab, double *bb, int *ldbb, double *q, int *ldq, double *vl, double *vu, int *il, int *iu, double *abstol, /*FIXME*/void *m, double *w, double *z, int *ldz, double *work, int * iwork, int * ifail, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbgvxK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring range, jstring uplo, jint n, jint ka, jint kb, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray bb, jint offsetbb, jint ldbb, jdoubleArray q, jint offsetq, jint ldq, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrdK(JNIEnv *, jobject, - jstring, jstring, jint, jfloat, jfloat, jint, jint, jfloatArray, jint, jfloat, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jint, jintArray, jint, jobject, jfloatArray, jint, jfloatArray, jint, jobject, jobject, jintArray, jint, jintArray, jint, jfloatArray, jint, jintArray, jint, jobject) { - +static void (*dsbtrd_)(char *vect, const char *uplo, int *n, int *kd, double *ab, int *ldab, double *d, double *e, double *q, int *ldq, double *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbtrdK(JNIEnv *env, UNUSED jobject obj, + jstring vect, jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarreK(JNIEnv *, jobject, - jstring, jint, jobject, jobject, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jfloat, jobject, jintArray, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jfloatArray, jint, jobject, jfloatArray, jint, jintArray, jint, jobject) { - +static void (*dsgesv_)(int *n, int *nrhs, double *a, int *lda, int * ipiv, double *b, int *ldb, double *x, int *ldx, double *work, float *swork, /*FIXME*/void *iter, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsgesvK(JNIEnv *env, UNUSED jobject obj, + jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray work, jint offsetwork, jfloatArray swork, jint offsetswork, jobject iter, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrfK(JNIEnv *, jobject, - jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jfloat, jfloat, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jobject) { - +static void (*dspcon_)(const char *uplo, int *n, double *ap, int * ipiv, double *anorm, /*FIXME*/void *rcond, double *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspconK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jdoubleArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrjK(JNIEnv *, jobject, - jint, jfloatArray, jint, jfloatArray, jint, jint, jint, jfloat, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jfloat, jfloat, jobject) { - +static void (*dspev_)(char *jobz, const char *uplo, int *n, double *ap, double *w, double *z, int *ldz, double *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspevK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrkK(JNIEnv *, jobject, - jint, jint, jfloat, jfloat, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jobject, jobject, jobject) { - +static void (*dspevd_)(char *jobz, const char *uplo, int *n, double *ap, double *w, double *z, int *ldz, double *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspevdK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrrK(JNIEnv *, jobject, - jint, jfloatArray, jint, jfloatArray, jint, jobject) { - +static void (*dspevx_)(char *jobz, char *range, const char *uplo, int *n, double *ap, double *vl, double *vu, int *il, int *iu, double *abstol, /*FIXME*/void *m, double *w, double *z, int *ldz, double *work, int * iwork, int * ifail, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspevxK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring range, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrvK(JNIEnv *, jobject, - jint, jfloat, jfloat, jfloatArray, jint, jfloatArray, jint, jfloat, jintArray, jint, jint, jint, jint, jfloat, jobject, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jintArray, jint, jobject) { - +static void (*dspgst_)(int *itype, const char *uplo, int *n, double *ap, double *bp, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspgstK(JNIEnv *env, UNUSED jobject obj, + jint itype, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray bp, jint offsetbp, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slartgK(JNIEnv *, jobject, - jfloat, jfloat, jobject, jobject, jobject) { - +static void (*dspgv_)(int *itype, char *jobz, const char *uplo, int *n, double *ap, double *bp, double *w, double *z, int *ldz, double *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspgvK(JNIEnv *env, UNUSED jobject obj, + jint itype, jstring jobz, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray bp, jint offsetbp, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slartvK(JNIEnv *, jobject, - jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint) { - +static void (*dspgvd_)(int *itype, char *jobz, const char *uplo, int *n, double *ap, double *bp, double *w, double *z, int *ldz, double *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspgvdK(JNIEnv *env, UNUSED jobject obj, + jint itype, jstring jobz, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray bp, jint offsetbp, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaruvK(JNIEnv *, jobject, - jintArray, jint, jint, jfloatArray, jint) { - +static void (*dspgvx_)(int *itype, char *jobz, char *range, const char *uplo, int *n, double *ap, double *bp, double *vl, double *vu, int *il, int *iu, double *abstol, /*FIXME*/void *m, double *w, double *z, int *ldz, double *work, int * iwork, int * ifail, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspgvxK(JNIEnv *env, UNUSED jobject obj, + jint itype, jstring jobz, jstring range, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray bp, jint offsetbp, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarzK(JNIEnv *, jobject, - jstring, jint, jint, jint, jfloatArray, jint, jint, jfloat, jfloatArray, jint, jint, jfloatArray, jint) { - +static void (*dsprfs_)(const char *uplo, int *n, int *nrhs, double *ap, double *afp, int * ipiv, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsprfsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray afp, jint offsetafp, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarzbK(JNIEnv *, jobject, - jstring, jstring, jstring, jstring, jint, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint) { - +static void (*dspsv_)(const char *uplo, int *n, int *nrhs, double *ap, int * ipiv, double *b, int *ldb, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspsvK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarztK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint) { - +static void (*dspsvx_)(char *fact, const char *uplo, int *n, int *nrhs, double *ap, double *afp, int * ipiv, double *b, int *ldb, double *x, int *ldx, /*FIXME*/void *rcond, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspsvxK(JNIEnv *env, UNUSED jobject obj, + jstring fact, jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray afp, jint offsetafp, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slas2K(JNIEnv *, jobject, - jfloat, jfloat, jfloat, jobject, jobject) { - +static void (*dsptrd_)(const char *uplo, int *n, double *ap, double *d, double *e, double *tau, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsptrdK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray tau, jint offsettau, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasclK(JNIEnv *, jobject, - jstring, jint, jint, jfloat, jfloat, jint, jint, jfloatArray, jint, jint, jobject) { - +static void (*dsptrf_)(const char *uplo, int *n, double *ap, int * ipiv, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsptrfK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jdoubleArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd0K(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jint, jintArray, jint, jfloatArray, jint, jobject) { - +static void (*dsptri_)(const char *uplo, int *n, double *ap, int * ipiv, double *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsptriK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jdoubleArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd1K(JNIEnv *, jobject, - jint, jint, jint, jfloatArray, jint, jobject, jobject, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jintArray, jint, jfloatArray, jint, jobject) { - +static void (*dsptrs_)(const char *uplo, int *n, int *nrhs, double *ap, int * ipiv, double *b, int *ldb, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsptrsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd2K(JNIEnv *, jobject, - jint, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jobject) { - +static void (*dstebz_)(char *range, char *order, int *n, double *vl, double *vu, int *il, int *iu, double *abstol, double *d, double *e, /*FIXME*/void *m, /*FIXME*/void *nsplit, double *w, int * iblock, int * isplit, double *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstebzK(JNIEnv *env, UNUSED jobject obj, + jstring range, jstring order, jint n, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jobject m, jobject nsplit, jdoubleArray w, jint offsetw, jintArray iblock, jint offsetiblock, jintArray isplit, jint offsetisplit, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd3K(JNIEnv *, jobject, - jint, jint, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jintArray, jint, jfloatArray, jint, jobject) { - +static void (*dstedc_)(char *compz, int *n, double *d, double *e, double *z, int *ldz, double *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstedcK(JNIEnv *env, UNUSED jobject obj, + jstring compz, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd4K(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jobject, jfloatArray, jint, jobject) { - +static void (*dstegr_)(char *jobz, char *range, int *n, double *d, double *e, double *vl, double *vu, int *il, int *iu, double *abstol, /*FIXME*/void *m, double *w, double *z, int *ldz, int * isuppz, double *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstegrK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring range, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd5K(JNIEnv *, jobject, - jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jobject, jfloatArray, jint) { - +static void (*dstein_)(int *n, double *d, double *e, int *m, double *w, int * iblock, int * isplit, double *z, int *ldz, double *work, int * iwork, int * ifail, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsteinK(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jint m, jdoubleArray w, jint offsetw, jintArray iblock, jint offsetiblock, jintArray isplit, jint offsetisplit, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd6K(JNIEnv *, jobject, - jint, jint, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jobject, jobject, jintArray, jint, jintArray, jint, jobject, jintArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jobject, jobject, jobject, jfloatArray, jint, jintArray, jint, jobject) { - +static void (*dstemr_)(char *jobz, char *range, int *n, double *d, double *e, double *vl, double *vu, int *il, int *iu, /*FIXME*/void *m, double *w, double *z, int *ldz, int *nzc, int * isuppz, /*FIXME*/void *tryrac, double *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstemrK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring range, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdouble vl, jdouble vu, jint il, jint iu, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jint nzc, jintArray isuppz, jint offsetisuppz, jobject tryrac, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd7K(JNIEnv *, jobject, - jint, jint, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jfloatArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jintArray, jint, jobject, jintArray, jint, jint, jfloatArray, jint, jint, jobject, jobject, jobject) { - +static void (*dsteqr_)(char *compz, int *n, double *d, double *e, double *z, int *ldz, double *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsteqrK(JNIEnv *env, UNUSED jobject obj, + jstring compz, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd8K(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jobject) { - +static void (*dsterf_)(int *n, double *d, double *e, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsterfK(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasdaK(JNIEnv *, jobject, - jint, jint, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jintArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jint, jintArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { - +static void (*dstev_)(char *jobz, int *n, double *d, double *e, double *z, int *ldz, double *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstevK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasdqK(JNIEnv *, jobject, - jstring, jint, jint, jint, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { - +static void (*dstevd_)(char *jobz, int *n, double *d, double *e, double *z, int *ldz, double *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstevdK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasdtK(JNIEnv *, jobject, - jint, jobject, jobject, jintArray, jint, jintArray, jint, jintArray, jint, jint) { - +static void (*dstevr_)(char *jobz, char *range, int *n, double *d, double *e, double *vl, double *vu, int *il, int *iu, double *abstol, /*FIXME*/void *m, double *w, double *z, int *ldz, int * isuppz, double *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstevrK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring range, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasetK(JNIEnv *, jobject, - jstring, jint, jint, jfloat, jfloat, jfloatArray, jint, jint) { - +static void (*dstevx_)(char *jobz, char *range, int *n, double *d, double *e, double *vl, double *vu, int *il, int *iu, double *abstol, /*FIXME*/void *m, double *w, double *z, int *ldz, double *work, int * iwork, int * ifail, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstevxK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring range, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq1K(JNIEnv *, jobject, - jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jobject) { - +static void (*dsycon_)(const char *uplo, int *n, double *a, int *lda, int * ipiv, double *anorm, /*FIXME*/void *rcond, double *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyconK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq2K(JNIEnv *, jobject, - jint, jfloatArray, jint, jobject) { - +static void (*dsyev_)(char *jobz, const char *uplo, int *n, double *a, int *lda, double *w, double *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyevK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray w, jint offsetw, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq3K(JNIEnv *, jobject, - jint, jobject, jfloatArray, jint, jint, jobject, jobject, jobject, jobject, jobject, jobject, jobject, jboolean) { - +static void (*dsyevd_)(char *jobz, const char *uplo, int *n, double *a, int *lda, double *w, double *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyevdK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray w, jint offsetw, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq4K(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jint, jint, jfloat, jfloat, jfloat, jfloat, jfloat, jfloat, jobject, jobject) { - +static void (*dsyevr_)(char *jobz, char *range, const char *uplo, int *n, double *a, int *lda, double *vl, double *vu, int *il, int *iu, double *abstol, /*FIXME*/void *m, double *w, double *z, int *ldz, int * isuppz, double *work, int *lwork, int *iwork, int *liwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyevrK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring range, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq5K(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jint, jfloat, jobject, jobject, jobject, jobject, jobject, jobject, jboolean) { - +static void (*dsyevx_)(char *jobz, char *range, const char *uplo, int *n, double *a, int *lda, double *vl, double *vu, int *il, int *iu, double *abstol, /*FIXME*/void *m, double *w, double *z, int *ldz, double *work, int *lwork, int * iwork, int * ifail, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyevxK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring range, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq6K(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jint, jobject, jobject, jobject, jobject, jobject, jobject) { - +static void (*dsygs2_)(int *itype, const char *uplo, int *n, double *a, int *lda, double *b, int *ldb, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsygs2K(JNIEnv *env, UNUSED jobject obj, + jint itype, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasrK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint) { - +static void (*dsygst_)(int *itype, const char *uplo, int *n, double *a, int *lda, double *b, int *ldb, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsygstK(JNIEnv *env, UNUSED jobject obj, + jint itype, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasrtK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jobject) { - +static void (*dsygv_)(int *itype, char *jobz, const char *uplo, int *n, double *a, int *lda, double *b, int *ldb, double *w, double *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsygvK(JNIEnv *env, UNUSED jobject obj, + jint itype, jstring jobz, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray w, jint offsetw, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slassqK(JNIEnv *, jobject, - jint, jfloatArray, jint, jint, jobject, jobject) { - +static void (*dsygvd_)(int *itype, char *jobz, const char *uplo, int *n, double *a, int *lda, double *b, int *ldb, double *w, double *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsygvdK(JNIEnv *env, UNUSED jobject obj, + jint itype, jstring jobz, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray w, jint offsetw, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasv2K(JNIEnv *, jobject, - jfloat, jfloat, jfloat, jobject, jobject, jobject, jobject, jobject, jobject) { - +static void (*dsygvx_)(int *itype, char *jobz, char *range, const char *uplo, int *n, double *a, int *lda, double *b, int *ldb, double *vl, double *vu, int *il, int *iu, double *abstol, /*FIXME*/void *m, double *w, double *z, int *ldz, double *work, int *lwork, int * iwork, int * ifail, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsygvxK(JNIEnv *env, UNUSED jobject obj, + jint itype, jstring jobz, jstring range, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaswpK(JNIEnv *, jobject, - jint, jfloatArray, jint, jint, jint, jint, jintArray, jint, jint) { - +static void (*dsyrfs_)(const char *uplo, int *n, int *nrhs, double *a, int *lda, double *af, int *ldaf, int * ipiv, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyrfsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasy2K(JNIEnv *, jobject, - jboolean, jboolean, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jint, jobject, jobject) { - +static void (*dsysv_)(const char *uplo, int *n, int *nrhs, double *a, int *lda, int * ipiv, double *b, int *ldb, double *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsysvK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasyfK(JNIEnv *, jobject, - jstring, jint, jint, jobject, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jobject) { - +static void (*dsysvx_)(char *fact, const char *uplo, int *n, int *nrhs, double *a, int *lda, double *af, int *ldaf, int * ipiv, double *b, int *ldb, double *x, int *ldx, /*FIXME*/void *rcond, double *ferr, double *berr, double *work, int *lwork, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsysvxK(JNIEnv *env, UNUSED jobject obj, + jstring fact, jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatbsK(JNIEnv *, jobject, - jstring, jstring, jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject, jfloatArray, jint, jobject) { - +static void (*dsytd2_)(const char *uplo, int *n, double *a, int *lda, double *d, double *e, double *tau, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytd2K(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray tau, jint offsettau, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatdfK(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject, jobject, jintArray, jint, jintArray, jint) { - +static void (*dsytf2_)(const char *uplo, int *n, double *a, int *lda, int * ipiv, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytf2K(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatpsK(JNIEnv *, jobject, - jstring, jstring, jstring, jstring, jint, jfloatArray, jint, jfloatArray, jint, jobject, jfloatArray, jint, jobject) { - +static void (*dsytrd_)(const char *uplo, int *n, double *a, int *lda, double *d, double *e, double *tau, double *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytrdK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatrdK(JNIEnv *, jobject, - jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint) { - +static void (*dsytrf_)(const char *uplo, int *n, double *a, int *lda, int * ipiv, double *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytrfK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatrsK(JNIEnv *, jobject, - jstring, jstring, jstring, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject, jfloatArray, jint, jobject) { - +static void (*dsytri_)(const char *uplo, int *n, double *a, int *lda, int * ipiv, double *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytriK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatrzK(JNIEnv *, jobject, - jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint) { - +static void (*dsytrs_)(const char *uplo, int *n, int *nrhs, double *a, int *lda, int * ipiv, double *b, int *ldb, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytrsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatzmK(JNIEnv *, jobject, - jstring, jint, jint, jfloatArray, jint, jint, jfloat, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint) { - +static void (*dtbcon_)(char *norm, const char *uplo, char *diag, int *n, int *kd, double *ab, int *ldab, /*FIXME*/void *rcond, double *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtbconK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jstring uplo, jstring diag, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slauu2K(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jint, jobject) { - +static void (*dtbrfs_)(const char *uplo, char *trans, char *diag, int *n, int *kd, int *nrhs, double *ab, int *ldab, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtbrfsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jstring trans, jstring diag, jint n, jint kd, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slauumK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jint, jobject) { - +static void (*dtbtrs_)(const char *uplo, char *trans, char *diag, int *n, int *kd, int *nrhs, double *ab, int *ldab, double *b, int *ldb, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtbtrsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jstring trans, jstring diag, jint n, jint kd, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slazq3K(JNIEnv *, jobject, - jint, jobject, jfloatArray, jint, jint, jobject, jobject, jobject, jobject, jobject, jobject, jobject, jboolean, jobject, jobject, jobject, jobject, jobject, jobject, jobject) { - +static void (*dtgevc_)(char *side, char *howmny, int *select, int *n, double *s, int *lds, double *p, int *ldp, double *vl, int *ldvl, double *vr, int *ldvr, int *mm, /*FIXME*/void *m, double *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgevcK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jdoubleArray s, jint offsets, jint lds, jdoubleArray p, jint offsetp, jint ldp, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jint mm, jobject m, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slazq4K(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jint, jint, jfloat, jfloat, jfloat, jfloat, jfloat, jfloat, jobject, jobject, jobject) { - +static void (*dtgex2_)(int *wantq, int *wantz, int *n, double *a, int *lda, double *b, int *ldb, double *q, int *ldq, double *z, int *ldz, int *j1, int *n1, int *n2, double *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgex2K(JNIEnv *env, UNUSED jobject obj, + jboolean wantq, jboolean wantz, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray z, jint offsetz, jint ldz, jint j1, jint n1, jint n2, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sopgtrK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { - +static void (*dtgexc_)(int *wantq, int *wantz, int *n, double *a, int *lda, double *b, int *ldb, double *q, int *ldq, double *z, int *ldz, /*FIXME*/void *ifst, /*FIXME*/void *ilst, double *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgexcK(JNIEnv *env, UNUSED jobject obj, + jboolean wantq, jboolean wantz, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray z, jint offsetz, jint ldz, jobject ifst, jobject ilst, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sopmtrK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { - +static void (*dtgsen_)(int *ijob, int *wantq, int *wantz, int *select, int *n, double *a, int *lda, double *b, int *ldb, double *alphar, double *alphai, double *beta, double *q, int *ldq, double *z, int *ldz, /*FIXME*/void *m, /*FIXME*/void *pl, /*FIXME*/void *pr, double *dif, double *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgsenK(JNIEnv *env, UNUSED jobject obj, + jint ijob, jboolean wantq, jboolean wantz, jbooleanArray select, jint offsetselect, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray z, jint offsetz, jint ldz, jobject m, jobject pl, jobject pr, jdoubleArray dif, jint offsetdif, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorg2lK(JNIEnv *, jobject, - jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jobject) { - +static void (*dtgsja_)(char *jobu, char *jobv, char *jobq, int *m, int *p, int *n, int *k, int *l, double *a, int *lda, double *b, int *ldb, double *tola, double *tolb, double *alpha, double *beta, double *u, int *ldu, double *v, int *ldv, double *q, int *ldq, double *work, /*FIXME*/void *ncycle, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgsjaK(JNIEnv *env, UNUSED jobject obj, + jstring jobu, jstring jobv, jstring jobq, jint m, jint p, jint n, jint k, jint l, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble tola, jdouble tolb, jdoubleArray alpha, jint offsetalpha, jdoubleArray beta, jint offsetbeta, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray work, jint offsetwork, jobject ncycle, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorg2rK(JNIEnv *, jobject, - jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jobject) { - +static void (*dtgsna_)(char *job, char *howmny, int *select, int *n, double *a, int *lda, double *b, int *ldb, double *vl, int *ldvl, double *vr, int *ldvr, double *s, double *dif, int *mm, /*FIXME*/void *m, double *work, int *lwork, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgsnaK(JNIEnv *env, UNUSED jobject obj, + jstring job, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jdoubleArray s, jint offsets, jdoubleArray dif, jint offsetdif, jint mm, jobject m, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgbrK(JNIEnv *, jobject, - jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { - +static void (*dtgsy2_)(char *trans, int *ijob, int *m, int *n, double *a, int *lda, double *b, int *ldb, double *c, int *Ldc, double *d, int *ldd, double *e, int *lde, double *f, int *ldf, /*FIXME*/void *scale, /*FIXME*/void *rdsum, /*FIXME*/void *rdscal, int * iwork, /*FIXME*/void *pq, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgsy2K(JNIEnv *env, UNUSED jobject obj, + jstring trans, jint ijob, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray d, jint offsetd, jint ldd, jdoubleArray e, jint offsete, jint lde, jdoubleArray f, jint offsetf, jint ldf, jobject scale, jobject rdsum, jobject rdscal, jintArray iwork, jint offsetiwork, jobject pq, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorghrK(JNIEnv *, jobject, - jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { - +static void (*dtgsyl_)(char *trans, int *ijob, int *m, int *n, double *a, int *lda, double *b, int *ldb, double *c, int *Ldc, double *d, int *ldd, double *e, int *lde, double *f, int *ldf, double *scale, /*FIXME*/void *dif, double *work, int *lwork, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgsylK(JNIEnv *env, UNUSED jobject obj, + jstring trans, jint ijob, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray d, jint offsetd, jint ldd, jdoubleArray e, jint offsete, jint lde, jdoubleArray f, jint offsetf, jint ldf, jobject scale, jobject dif, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgl2K(JNIEnv *, jobject, - jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jobject) { - +static void (*dtpcon_)(char *norm, const char *uplo, char *diag, int *n, double *ap, /*FIXME*/void *rcond, double *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtpconK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jstring uplo, jstring diag, jint n, jdoubleArray ap, jint offsetap, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorglqK(JNIEnv *, jobject, - jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { - +static void (*dtprfs_)(const char *uplo, char *trans, char *diag, int *n, int *nrhs, double *ap, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtprfsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgqlK(JNIEnv *, jobject, - jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { - +static void (*dtptri_)(const char *uplo, char *diag, int *n, double *ap, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtptriK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jstring diag, jint n, jdoubleArray ap, jint offsetap, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgqrK(JNIEnv *, jobject, - jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { - +static void (*dtptrs_)(const char *uplo, char *trans, char *diag, int *n, int *nrhs, double *ap, double *b, int *ldb, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtptrsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgr2K(JNIEnv *, jobject, - jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jobject) { - +static void (*dtrcon_)(char *norm, const char *uplo, char *diag, int *n, double *a, int *lda, /*FIXME*/void *rcond, double *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrconK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jstring uplo, jstring diag, jint n, jdoubleArray a, jint offseta, jint lda, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgrqK(JNIEnv *, jobject, - jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { - +static void (*dtrevc_)(char *side, char *howmny, int *select, int *n, double *t, int *ldt, double *vl, int *ldvl, double *vr, int *ldvr, int *mm, /*FIXME*/void *m, double *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrevcK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jdoubleArray t, jint offsett, jint ldt, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jint mm, jobject m, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgtrK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { - +static void (*dtrexc_)(char *compq, int *n, double *t, int *ldt, double *q, int *ldq, /*FIXME*/void *ifst, /*FIXME*/void *ilst, double *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrexcK(JNIEnv *env, UNUSED jobject obj, + jstring compq, jint n, jdoubleArray t, jint offsett, jint ldt, jdoubleArray q, jint offsetq, jint ldq, jobject ifst, jobject ilst, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorm2lK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { - +static void (*dtrrfs_)(const char *uplo, char *trans, char *diag, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrrfsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorm2rK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { - +static void (*dtrsen_)(char *job, char *compq, int *select, int *n, double *t, int *ldt, double *q, int *ldq, double *wr, double *wi, /*FIXME*/void *m, /*FIXME*/void *s, /*FIXME*/void *sep, double *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrsenK(JNIEnv *env, UNUSED jobject obj, + jstring job, jstring compq, jbooleanArray select, jint offsetselect, jint n, jdoubleArray t, jint offsett, jint ldt, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jobject m, jobject s, jobject sep, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormbrK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { - +static void (*dtrsna_)(char *job, char *howmny, int *select, int *n, double *t, int *ldt, double *vl, int *ldvl, double *vr, int *ldvr, double *s, double *sep, int *mm, /*FIXME*/void *m, double *work, int *ldwork, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrsnaK(JNIEnv *env, UNUSED jobject obj, + jstring job, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jdoubleArray t, jint offsett, jint ldt, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jdoubleArray s, jint offsets, jdoubleArray sep, jint offsetsep, jint mm, jobject m, jdoubleArray work, jint offsetwork, jint ldwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormhrK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { - +static void (*dtrsyl_)(char *trana, char *tranb, int *isgn, int *m, int *n, double *a, int *lda, double *b, int *ldb, double *c, int *Ldc, /*FIXME*/void *scale, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrsylK(JNIEnv *env, UNUSED jobject obj, + jstring trana, jstring tranb, jint isgn, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray c, jint offsetc, jint Ldc, jobject scale, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorml2K(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { - +static void (*dtrti2_)(const char *uplo, char *diag, int *n, double *a, int *lda, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrti2K(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jstring diag, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormlqK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { - +static void (*dtrtri_)(const char *uplo, char *diag, int *n, double *a, int *lda, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrtriK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jstring diag, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormqlK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { - +static void (*dtrtrs_)(const char *uplo, char *trans, char *diag, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrtrsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormqrK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { - +static void (*dtzrqf_)(int *m, int *n, double *a, int *lda, double *tau, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtzrqfK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormr2K(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { - +static void (*dtzrzf_)(int *m, int *n, double *a, int *lda, double *tau, double *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtzrzfK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormr3K(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { - +static int (*ieeeck_)(int *ispec, float *zero, float *one); + +jint Java_dev_ludovic_netlib_lapack_JNILAPACK_ieeeckK(JNIEnv *env, UNUSED jobject obj, + jint ispec, jfloat zero, jfloat one) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormrqK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { - +static int (*ilaenv_)(int *ispec, char *name, char *opts, int *n1, int *n2, int *n3, int *n4); + +jint Java_dev_ludovic_netlib_lapack_JNILAPACK_ilaenvK(JNIEnv *env, UNUSED jobject obj, + jint ispec, jstring name, jstring opts, jint n1, jint n2, jint n3, jint n4) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormrzK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { - +static void (*ilaver_)(/*FIXME*/void *vers_major, /*FIXME*/void *vers_minor, /*FIXME*/void *vers_patch); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ilaverK(JNIEnv *env, UNUSED jobject obj, + jobject vers_major, jobject vers_minor, jobject vers_patch) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormtrK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { - +static int (*iparmq_)(int *ispec, char *name, char *opts, int *n, int *ilo, int *ihi, int *lwork); + +jint Java_dev_ludovic_netlib_lapack_JNILAPACK_iparmqK(JNIEnv *env, UNUSED jobject obj, + jint ispec, jstring name, jstring opts, jint n, jint ilo, jint ihi, jint lwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbconK(JNIEnv *, jobject, - jstring, jint, jint, jfloatArray, jint, jint, jfloat, jobject, jfloatArray, jint, jintArray, jint, jobject) { - +static int *(*lsamen_)(int *n, char *ca, char *cb); + +jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_lsamenK(JNIEnv *env, UNUSED jobject obj, + jint n, jstring ca, jstring cb) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbequK(JNIEnv *, jobject, - jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject, jobject, jobject) { - +static void (*sbdsdc_)(const char *uplo, char *compq, int *n, float *d, float *e, float *u, int *ldu, float *vt, int *ldvt, float *q, int * iq, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sbdsdcK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jstring compq, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jint ldvt, jfloatArray q, jint offsetq, jintArray iq, jint offsetiq, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbrfsK(JNIEnv *, jobject, - jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { - +static void (*sbdsqr_)(const char *uplo, int *n, int *ncvt, int *nru, int *ncc, float *d, float *e, float *vt, int *ldvt, float *u, int *ldu, float *c, int *Ldc, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sbdsqrK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint ncvt, jint nru, jint ncc, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray vt, jint offsetvt, jint ldvt, jfloatArray u, jint offsetu, jint ldu, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbstfK(JNIEnv *, jobject, - jstring, jint, jint, jfloatArray, jint, jint, jobject) { - +static void (*sdisna_)(char *job, int *m, int *n, float *d, float *sep, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sdisnaK(JNIEnv *env, UNUSED jobject obj, + jstring job, jint m, jint n, jfloatArray d, jint offsetd, jfloatArray sep, jint offsetsep, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbsvK(JNIEnv *, jobject, - jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { - +static void (*sgbbrd_)(char *vect, int *m, int *n, int *ncc, int *kl, int *ku, float *ab, int *ldab, float *d, float *e, float *q, int *ldq, float *pt, int *ldpt, float *c, int *Ldc, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbbrdK(JNIEnv *env, UNUSED jobject obj, + jstring vect, jint m, jint n, jint ncc, jint kl, jint ku, jfloatArray ab, jint offsetab, jint ldab, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray q, jint offsetq, jint ldq, jfloatArray pt, jint offsetpt, jint ldpt, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbsvxK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { - +static void (*sgbcon_)(char *norm, int *n, int *kl, int *ku, float *ab, int *ldab, int * ipiv, float *anorm, /*FIXME*/void *rcond, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbconK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jint n, jint kl, jint ku, jfloatArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbtf2K(JNIEnv *, jobject, - jstring, jint, jint, jfloatArray, jint, jint, jobject) { - +static void (*sgbequ_)(int *m, int *n, int *kl, int *ku, float *ab, int *ldab, float *r, float *c, /*FIXME*/void *rowcnd, /*FIXME*/void *colcnd, /*FIXME*/void *amax, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbequK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint kl, jint ku, jfloatArray ab, jint offsetab, jint ldab, jfloatArray r, jint offsetr, jfloatArray c, jint offsetc, jobject rowcnd, jobject colcnd, jobject amax, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbtrfK(JNIEnv *, jobject, - jstring, jint, jint, jfloatArray, jint, jint, jobject) { - +static void (*sgbrfs_)(char *trans, int *n, int *kl, int *ku, int *nrhs, float *ab, int *ldab, float *afb, int *ldafb, int * ipiv, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbrfsK(JNIEnv *env, UNUSED jobject obj, + jstring trans, jint n, jint kl, jint ku, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray afb, jint offsetafb, jint ldafb, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbtrsK(JNIEnv *, jobject, - jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { - +static void (*sgbsv_)(int *n, int *kl, int *ku, int *nrhs, float *ab, int *ldab, int *ipiv, float *b, int *ldb, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbsvK(JNIEnv *env, UNUSED jobject obj, + jint n, jint kl, jint ku, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spoconK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jint, jfloat, jobject, jfloatArray, jint, jintArray, jint, jobject) { - +static void (*sgbsvx_)(char *fact, char *trans, int *n, int *kl, int *ku, int *nrhs, float *ab, int *ldab, float *afb, int *ldafb, int * ipiv, jstring *equed, float *r, float *c, float *b, int *ldb, float *x, int *ldx, /*FIXME*/void *rcond, float *ferr, float *berr, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbsvxK(JNIEnv *env, UNUSED jobject obj, + jstring fact, jstring trans, jint n, jint kl, jint ku, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray afb, jint offsetafb, jint ldafb, jintArray ipiv, jint offsetipiv, jobject equed, jfloatArray r, jint offsetr, jfloatArray c, jint offsetc, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spoequK(JNIEnv *, jobject, - jint, jfloatArray, jint, jint, jfloatArray, jint, jobject, jobject, jobject) { - +static void (*sgbtf2_)(int *m, int *n, int *kl, int *ku, float *ab, int *ldab, int * ipiv, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbtf2K(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint kl, jint ku, jfloatArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sporfsK(JNIEnv *, jobject, - jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { - +static void (*sgbtrf_)(int *m, int *n, int *kl, int *ku, float *ab, int *ldab, int * ipiv, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbtrfK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint kl, jint ku, jfloatArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sposvK(JNIEnv *, jobject, - jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { - +static void (*sgbtrs_)(char *trans, int *n, int *kl, int *ku, int *nrhs, float *ab, int *ldab, int * ipiv, float *b, int *ldb, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbtrsK(JNIEnv *env, UNUSED jobject obj, + jstring trans, jint n, jint kl, jint ku, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sposvxK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { - +static void (*sgebak_)(char *job, char *side, int *n, int *ilo, int *ihi, float *scale, int *m, float *v, int *ldv, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgebakK(JNIEnv *env, UNUSED jobject obj, + jstring job, jstring side, jint n, jint ilo, jint ihi, jfloatArray scale, jint offsetscale, jint m, jfloatArray v, jint offsetv, jint ldv, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spotf2K(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jint, jobject) { - +static void (*sgebal_)(char *job, int *n, float *a, int *lda, /*FIXME*/void *ilo, /*FIXME*/void *ihi, float *scale, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgebalK(JNIEnv *env, UNUSED jobject obj, + jstring job, jint n, jfloatArray a, jint offseta, jint lda, jobject ilo, jobject ihi, jfloatArray scale, jint offsetscale, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spotrfK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jint, jobject) { - +static void (*sgebd2_)(int *m, int *n, float *a, int *lda, float *d, float *e, float *tauq, float *taup, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgebd2K(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray tauq, jint offsettauq, jfloatArray taup, jint offsettaup, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spotriK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jint, jobject) { - +static void (*sgebrd_)(int *m, int *n, float *a, int *lda, float *d, float *e, float *tauq, float *taup, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgebrdK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray tauq, jint offsettauq, jfloatArray taup, jint offsettaup, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spotrsK(JNIEnv *, jobject, - jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { - +static void (*sgecon_)(char *norm, int *n, float *a, int *lda, float *anorm, /*FIXME*/void *rcond, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeconK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jint n, jfloatArray a, jint offseta, jint lda, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sppconK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jfloat, jobject, jfloatArray, jint, jintArray, jint, jobject) { - +static void (*sgeequ_)(int *m, int *n, float *a, int *lda, float *r, float *c, /*FIXME*/void *rowcnd, /*FIXME*/void *colcnd, /*FIXME*/void *amax, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeequK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray r, jint offsetr, jfloatArray c, jint offsetc, jobject rowcnd, jobject colcnd, jobject amax, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sppequK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jfloatArray, jint, jobject, jobject, jobject) { - +static void (*sgees_)(char *jobvs, char *sort, /*FIXME*/void *select, int *n, float *a, int *lda, /*FIXME*/void *sdim, float *wr, float *wi, float *vs, int *ldvs, float *work, int *lwork, int *bwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeesK(JNIEnv *env, UNUSED jobject obj, + jstring jobvs, jstring sort, jobject select, jint n, jfloatArray a, jint offseta, jint lda, jobject sdim, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jfloatArray vs, jint offsetvs, jint ldvs, jfloatArray work, jint offsetwork, jint lwork, jbooleanArray bwork, jint offsetbwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spprfsK(JNIEnv *, jobject, - jstring, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { - +static void (*sgeesx_)(char *jobvs, char *sort, /*FIXME*/void *select, char *sense, int *n, float *a, int *lda, /*FIXME*/void *sdim, float *wr, float *wi, float *vs, int *ldvs, /*FIXME*/void *rconde, /*FIXME*/void *rcondv, float *work, int *lwork, int * iwork, int *liwork, int *bwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeesxK(JNIEnv *env, UNUSED jobject obj, + jstring jobvs, jstring sort, jobject select, jstring sense, jint n, jfloatArray a, jint offseta, jint lda, jobject sdim, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jfloatArray vs, jint offsetvs, jint ldvs, jobject rconde, jobject rcondv, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jbooleanArray bwork, jint offsetbwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sppsvK(JNIEnv *, jobject, - jstring, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { - +static void (*sgeev_)(char *jobvl, char *jobvr, int *n, float *a, int *lda, float *wr, float *wi, float *vl, int *ldvl, float *vr, int *ldvr, float *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeevK(JNIEnv *env, UNUSED jobject obj, + jstring jobvl, jstring jobvr, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sppsvxK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jfloatArray, jint, jfloatArray, jint, jobject, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { - +static void (*sgeevx_)(char *balanc, char *jobvl, char *jobvr, char *sense, int *n, float *a, int *lda, float *wr, float *wi, float *vl, int *ldvl, float *vr, int *ldvr, /*FIXME*/void *ilo, /*FIXME*/void *ihi, float *scale, /*FIXME*/void *abnrm, float *rconde, float *rcondv, float *work, int *lwork, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeevxK(JNIEnv *env, UNUSED jobject obj, + jstring balanc, jstring jobvl, jstring jobvr, jstring sense, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jobject ilo, jobject ihi, jfloatArray scale, jint offsetscale, jobject abnrm, jfloatArray rconde, jint offsetrconde, jfloatArray rcondv, jint offsetrcondv, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spptrfK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jobject) { - +static void (*sgegs_)(char *jobvsl, char *jobvsr, int *n, float *a, int *lda, float *b, int *ldb, float *alphar, float *alphai, float *beta, float *vsl, int *ldvsl, float *vsr, int *ldvsr, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgegsK(JNIEnv *env, UNUSED jobject obj, + jstring jobvsl, jstring jobvsr, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray vsl, jint offsetvsl, jint ldvsl, jfloatArray vsr, jint offsetvsr, jint ldvsr, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spptriK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jobject) { - +static void (*sgegv_)(char *jobvl, char *jobvr, int *n, float *a, int *lda, float *b, int *ldb, float *alphar, float *alphai, float *beta, float *vl, int *ldvl, float *vr, int *ldvr, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgegvK(JNIEnv *env, UNUSED jobject obj, + jstring jobvl, jstring jobvr, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spptrsK(JNIEnv *, jobject, - jstring, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { - +static void (*sgehd2_)(int *n, int *ilo, int *ihi, float *a, int *lda, float *tau, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgehd2K(JNIEnv *env, UNUSED jobject obj, + jint n, jint ilo, jint ihi, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sptconK(JNIEnv *, jobject, - jint, jfloatArray, jint, jfloatArray, jint, jfloat, jobject, jfloatArray, jint, jobject) { - +static void (*sgehrd_)(int *n, int *ilo, int *ihi, float *a, int *lda, float *tau, float *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgehrdK(JNIEnv *env, UNUSED jobject obj, + jint n, jint ilo, jint ihi, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spteqrK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { - +static void (*sgelq2_)(int *m, int *n, float *a, int *lda, float *tau, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelq2K(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sptrfsK(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jobject) { - +static void (*sgelqf_)(int *m, int *n, float *a, int *lda, float *tau, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelqfK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sptsvK(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { - +static void (*sgels_)(char *trans, int *m, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelsK(JNIEnv *env, UNUSED jobject obj, + jstring trans, jint m, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sptsvxK(JNIEnv *, jobject, - jstring, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jobject) { - +static void (*sgelsd_)(int *m, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, float *s, float *rcond, /*FIXME*/void *rank, float *work, int *lwork, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelsdK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray s, jint offsets, jfloat rcond, jobject rank, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spttrfK(JNIEnv *, jobject, - jint, jfloatArray, jint, jfloatArray, jint, jobject) { - +static void (*sgelss_)(int *m, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, float *s, float *rcond, /*FIXME*/void *rank, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelssK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray s, jint offsets, jfloat rcond, jobject rank, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spttrsK(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { - +static void (*sgelsx_)(int *m, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, int * jpvt, float *rcond, /*FIXME*/void *rank, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelsxK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jintArray jpvt, jint offsetjpvt, jfloat rcond, jobject rank, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sptts2K(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint) { - +static void (*sgelsy_)(int *m, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, int * jpvt, float *rcond, /*FIXME*/void *rank, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelsyK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jintArray jpvt, jint offsetjpvt, jfloat rcond, jobject rank, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_srsclK(JNIEnv *, jobject, - jint, jfloat, jfloatArray, jint, jint) { - +static void (*sgeql2_)(int *m, int *n, float *a, int *lda, float *tau, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeql2K(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbevK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { - +static void (*sgeqlf_)(int *m, int *n, float *a, int *lda, float *tau, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeqlfK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbevdK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jint, jobject) { - +static void (*sgeqp3_)(int *m, int *n, float *a, int *lda, int * jpvt, float *tau, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeqp3K(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jfloatArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbevxK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloat, jfloat, jint, jint, jfloat, jobject, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jobject) { - +static void (*sgeqpf_)(int *m, int *n, float *a, int *lda, int * jpvt, float *tau, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeqpfK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jfloatArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbgstK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { - +static void (*sgeqr2_)(int *m, int *n, float *a, int *lda, float *tau, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeqr2K(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbgvK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { - +static void (*sgeqrf_)(int *m, int *n, float *a, int *lda, float *tau, float *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeqrfK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbgvdK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jint, jobject) { - +static void (*sgerfs_)(char *trans, int *n, int *nrhs, float *a, int *lda, float *af, int *ldaf, int * ipiv, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgerfsK(JNIEnv *env, UNUSED jobject obj, + jstring trans, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbgvxK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloat, jfloat, jint, jint, jfloat, jobject, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jobject) { - +static void (*sgerq2_)(int *m, int *n, float *a, int *lda, float *tau, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgerq2K(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbtrdK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { - +static void (*sgerqf_)(int *m, int *n, float *a, int *lda, float *tau, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgerqfK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspconK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jintArray, jint, jfloat, jobject, jfloatArray, jint, jintArray, jint, jobject) { - +static void (*sgesc2_)(int *n, float *a, int *lda, float *rhs, int *ipiv, int *jpiv, /*FIXME*/void *scale); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgesc2K(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray a, jint offseta, jint lda, jfloatArray rhs, jint offsetrhs, jintArray ipiv, jint offsetipiv, jintArray jpiv, jint offsetjpiv, jobject scale) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspevK(JNIEnv *, jobject, - jstring, jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { - +static void (*sgesdd_)(char *jobz, int *m, int *n, float *a, int *lda, float *s, float *u, int *ldu, float *vt, int *ldvt, float *work, int *lwork, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgesddK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray s, jint offsets, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jint ldvt, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspevdK(JNIEnv *, jobject, - jstring, jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jint, jobject) { - +static void (*sgesv_)(int *n, int *nrhs, float *a, int *lda, int * ipiv, float *b, int *ldb, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgesvK(JNIEnv *env, UNUSED jobject obj, + jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspevxK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jfloatArray, jint, jfloat, jfloat, jint, jint, jfloat, jobject, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jobject) { - +static void (*sgesvd_)(char *jobu, char *jobvt, int *m, int *n, float *a, int *lda, float *s, float *u, int *ldu, float *vt, int *ldvt, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgesvdK(JNIEnv *env, UNUSED jobject obj, + jstring jobu, jstring jobvt, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray s, jint offsets, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jint ldvt, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspgstK(JNIEnv *, jobject, - jint, jstring, jint, jfloatArray, jint, jfloatArray, jint, jobject) { - +static void (*sgesvx_)(char *fact, char *trans, int *n, int *nrhs, float *a, int *lda, float *af, int *ldaf, int * ipiv, jstring *equed, float *r, float *c, float *b, int *ldb, float *x, int *ldx, /*FIXME*/void *rcond, float *ferr, float *berr, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgesvxK(JNIEnv *env, UNUSED jobject obj, + jstring fact, jstring trans, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jobject equed, jfloatArray r, jint offsetr, jfloatArray c, jint offsetc, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspgvK(JNIEnv *, jobject, - jint, jstring, jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { - +static void (*sgetc2_)(int *n, float *a, int *lda, int * ipiv, int * jpiv, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgetc2K(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jintArray jpiv, jint offsetjpiv, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspgvdK(JNIEnv *, jobject, - jint, jstring, jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jint, jobject) { - +static void (*sgetf2_)(int *m, int *n, float *a, int *lda, int * ipiv, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgetf2K(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspgvxK(JNIEnv *, jobject, - jint, jstring, jstring, jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jint, jint, jfloat, jobject, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jobject) { - +static void (*sgetrf_)(int *m, int *n, float *a, int *lda, int * ipiv, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgetrfK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssprfsK(JNIEnv *, jobject, - jstring, jint, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { - +static void (*sgetri_)(int *n, float *a, int *lda, int * ipiv, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgetriK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspsvK(JNIEnv *, jobject, - jstring, jint, jint, jfloatArray, jint, jintArray, jint, jfloatArray, jint, jint, jobject) { - +static void (*sgetrs_)(char *trans, int *n, int *nrhs, float *a, int *lda, int * ipiv, float *b, int *ldb, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgetrsK(JNIEnv *env, UNUSED jobject obj, + jstring trans, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspsvxK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { - +static void (*sggbak_)(char *job, char *side, int *n, int *ilo, int *ihi, float *lscale, float *rscale, int *m, float *v, int *ldv, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggbakK(JNIEnv *env, UNUSED jobject obj, + jstring job, jstring side, jint n, jint ilo, jint ihi, jfloatArray lscale, jint offsetlscale, jfloatArray rscale, jint offsetrscale, jint m, jfloatArray v, jint offsetv, jint ldv, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssptrdK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jobject) { - +static void (*sggbal_)(char *job, int *n, float *a, int *lda, float *b, int *ldb, /*FIXME*/void *ilo, /*FIXME*/void *ihi, float *lscale, float *rscale, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggbalK(JNIEnv *env, UNUSED jobject obj, + jstring job, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject ilo, jobject ihi, jfloatArray lscale, jint offsetlscale, jfloatArray rscale, jint offsetrscale, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssptrfK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jintArray, jint, jobject) { - +static void (*sgges_)(char *jobvsl, char *jobvsr, char *sort, /*FIXME*/void *selctg, int *n, float *a, int *lda, float *b, int *ldb, /*FIXME*/void *sdim, float *alphar, float *alphai, float *beta, float *vsl, int *ldvsl, float *vsr, int *ldvsr, float *work, int *lwork, int *bwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggesK(JNIEnv *env, UNUSED jobject obj, + jstring jobvsl, jstring jobvsr, jstring sort, jobject selctg, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject sdim, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray vsl, jint offsetvsl, jint ldvsl, jfloatArray vsr, jint offsetvsr, jint ldvsr, jfloatArray work, jint offsetwork, jint lwork, jbooleanArray bwork, jint offsetbwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssptriK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jintArray, jint, jfloatArray, jint, jobject) { - +static void (*sggesx_)(char *jobvsl, char *jobvsr, char *sort, /*FIXME*/void *selctg, char *sense, int *n, float *a, int *lda, float *b, int *ldb, /*FIXME*/void *sdim, float *alphar, float *alphai, float *beta, float *vsl, int *ldvsl, float *vsr, int *ldvsr, float *rconde, float *rcondv, float *work, int *lwork, int * iwork, int *liwork, int *bwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggesxK(JNIEnv *env, UNUSED jobject obj, + jstring jobvsl, jstring jobvsr, jstring sort, jobject selctg, jstring sense, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject sdim, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray vsl, jint offsetvsl, jint ldvsl, jfloatArray vsr, jint offsetvsr, jint ldvsr, jfloatArray rconde, jint offsetrconde, jfloatArray rcondv, jint offsetrcondv, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jbooleanArray bwork, jint offsetbwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssptrsK(JNIEnv *, jobject, - jstring, jint, jint, jfloatArray, jint, jintArray, jint, jfloatArray, jint, jint, jobject) { - +static void (*sggev_)(char *jobvl, char *jobvr, int *n, float *a, int *lda, float *b, int *ldb, float *alphar, float *alphai, float *beta, float *vl, int *ldvl, float *vr, int *ldvr, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggevK(JNIEnv *env, UNUSED jobject obj, + jstring jobvl, jstring jobvr, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstebzK(JNIEnv *, jobject, - jstring, jstring, jint, jfloat, jfloat, jint, jint, jfloat, jfloatArray, jint, jfloatArray, jint, jobject, jobject, jfloatArray, jint, jintArray, jint, jintArray, jint, jfloatArray, jint, jintArray, jint, jobject) { - +static void (*sggevx_)(char *balanc, char *jobvl, char *jobvr, char *sense, int *n, float *a, int *lda, float *b, int *ldb, float *alphar, float *alphai, float *beta, float *vl, int *ldvl, float *vr, int *ldvr, /*FIXME*/void *ilo, /*FIXME*/void *ihi, float *lscale, float *rscale, /*FIXME*/void *abnrm, /*FIXME*/void *bbnrm, float *rconde, float *rcondv, float *work, int *lwork, int * iwork, int *bwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggevxK(JNIEnv *env, UNUSED jobject obj, + jstring balanc, jstring jobvl, jstring jobvr, jstring sense, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jobject ilo, jobject ihi, jfloatArray lscale, jint offsetlscale, jfloatArray rscale, jint offsetrscale, jobject abnrm, jobject bbnrm, jfloatArray rconde, jint offsetrconde, jfloatArray rcondv, jint offsetrcondv, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jbooleanArray bwork, jint offsetbwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstedcK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jint, jobject) { - +static void (*sggglm_)(int *n, int *m, int *p, float *a, int *lda, float *b, int *ldb, float *d, float *x, float *y, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggglmK(JNIEnv *env, UNUSED jobject obj, + jint n, jint m, jint p, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray d, jint offsetd, jfloatArray x, jint offsetx, jfloatArray y, jint offsety, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstegrK(JNIEnv *, jobject, - jstring, jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jint, jint, jfloat, jobject, jfloatArray, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jintArray, jint, jint, jobject) { - +static void (*sgghrd_)(char *compq, char *compz, int *n, int *ilo, int *ihi, float *a, int *lda, float *b, int *ldb, float *q, int *ldq, float *z, int *ldz, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgghrdK(JNIEnv *env, UNUSED jobject obj, + jstring compq, jstring compz, jint n, jint ilo, jint ihi, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray q, jint offsetq, jint ldq, jfloatArray z, jint offsetz, jint ldz, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssteinK(JNIEnv *, jobject, - jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jobject) { - +static void (*sgglse_)(int *m, int *n, int *p, float *a, int *lda, float *b, int *ldb, float *c, float *d, float *x, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgglseK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint p, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray c, jint offsetc, jfloatArray d, jint offsetd, jfloatArray x, jint offsetx, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstemrK(JNIEnv *, jobject, - jstring, jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jint, jint, jintArray, jint, jobject, jfloatArray, jint, jint, jintArray, jint, jint, jobject) { - +static void (*sggqrf_)(int *n, int *m, int *p, float *a, int *lda, float *taua, float *b, int *ldb, float *taub, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggqrfK(JNIEnv *env, UNUSED jobject obj, + jint n, jint m, jint p, jfloatArray a, jint offseta, jint lda, jfloatArray taua, jint offsettaua, jfloatArray b, jint offsetb, jint ldb, jfloatArray taub, jint offsettaub, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssteqrK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { - +static void (*sggrqf_)(int *m, int *p, int *n, float *a, int *lda, float *taua, float *b, int *ldb, float *taub, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggrqfK(JNIEnv *env, UNUSED jobject obj, + jint m, jint p, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray taua, jint offsettaua, jfloatArray b, jint offsetb, jint ldb, jfloatArray taub, jint offsettaub, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssterfK(JNIEnv *, jobject, - jint, jfloatArray, jint, jfloatArray, jint, jobject) { - +static void (*sggsvd_)(char *jobu, char *jobv, char *jobq, int *m, int *n, int *p, /*FIXME*/void *k, /*FIXME*/void *l, float *a, int *lda, float *b, int *ldb, float *alpha, float *beta, float *u, int *ldu, float *v, int *ldv, float *q, int *ldq, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggsvdK(JNIEnv *env, UNUSED jobject obj, + jstring jobu, jstring jobv, jstring jobq, jint m, jint n, jint p, jobject k, jobject l, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray alpha, jint offsetalpha, jfloatArray beta, jint offsetbeta, jfloatArray u, jint offsetu, jint ldu, jfloatArray v, jint offsetv, jint ldv, jfloatArray q, jint offsetq, jint ldq, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstevK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { - +static void (*sggsvp_)(char *jobu, char *jobv, char *jobq, int *m, int *p, int *n, float *a, int *lda, float *b, int *ldb, float *tola, float *tolb, /*FIXME*/void *k, /*FIXME*/void *l, float *u, int *ldu, float *v, int *ldv, float *q, int *ldq, int * iwork, float *tau, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggsvpK(JNIEnv *env, UNUSED jobject obj, + jstring jobu, jstring jobv, jstring jobq, jint m, jint p, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat tola, jfloat tolb, jobject k, jobject l, jfloatArray u, jint offsetu, jint ldu, jfloatArray v, jint offsetv, jint ldv, jfloatArray q, jint offsetq, jint ldq, jintArray iwork, jint offsetiwork, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstevdK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jint, jobject) { - +static void (*sgtcon_)(char *norm, int *n, float *dl, float *d, float *du, float *du22, int * ipiv, float *anorm, /*FIXME*/void *rcond, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgtconK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jint n, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstevrK(JNIEnv *, jobject, - jstring, jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jint, jint, jfloat, jobject, jfloatArray, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jintArray, jint, jint, jobject) { - +static void (*sgtrfs_)(char *trans, int *n, int *nrhs, float *dl, float *d, float *du, float *dlf, float *df, float *duf, float *du22, int * ipiv, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgtrfsK(JNIEnv *env, UNUSED jobject obj, + jstring trans, jint n, jint nrhs, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray dlf, jint offsetdlf, jfloatArray df, jint offsetdf, jfloatArray duf, jint offsetduf, jfloatArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstevxK(JNIEnv *, jobject, - jstring, jstring, jint, jfloatArray, jint, jfloatArray, jint, jfloat, jfloat, jint, jint, jfloat, jobject, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jintArray, jint, jintArray, jint, jobject) { - +static void (*sgtsv_)(int *n, int *nrhs, float *dl, float *d, float *du, float *b, int *ldb, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgtsvK(JNIEnv *env, UNUSED jobject obj, + jint n, jint nrhs, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyconK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jint, jintArray, jint, jfloat, jobject, jfloatArray, jint, jintArray, jint, jobject) { - +static void (*sgtsvx_)(char *fact, char *trans, int *n, int *nrhs, float *dl, float *d, float *du, float *dlf, float *df, float *duf, float *du22, int * ipiv, float *b, int *ldb, float *x, int *ldx, /*FIXME*/void *rcond, float *ferr, float *berr, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgtsvxK(JNIEnv *env, UNUSED jobject obj, + jstring fact, jstring trans, jint n, jint nrhs, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray dlf, jint offsetdlf, jfloatArray df, jint offsetdf, jfloatArray duf, jint offsetduf, jfloatArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyevK(JNIEnv *, jobject, - jstring, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { - +static void (*sgttrf_)(int *n, float *dl, float *d, float *du, float *du22, int * ipiv, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgttrfK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyevdK(JNIEnv *, jobject, - jstring, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jintArray, jint, jint, jobject) { - +static void (*sgttrs_)(char *trans, int *n, int *nrhs, float *dl, float *d, float *du, float *du22, int * ipiv, float *b, int *ldb, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgttrsK(JNIEnv *env, UNUSED jobject obj, + jstring trans, jint n, jint nrhs, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyevrK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jfloatArray, jint, jint, jfloat, jfloat, jint, jint, jfloat, jobject, jfloatArray, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jintArray, jint, jint, jobject) { - +static void (*sgtts2_)(int *itrans, int *n, int *nrhs, float *dl, float *d, float *du, float *du22, int * ipiv, float *b, int *ldb); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgtts2K(JNIEnv *env, UNUSED jobject obj, + jint itrans, jint n, jint nrhs, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyevxK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jfloatArray, jint, jint, jfloat, jfloat, jint, jint, jfloat, jobject, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jintArray, jint, jobject) { - +static void (*shgeqz_)(char *job, char *compq, char *compz, int *n, int *ilo, int *ihi, float *h, int *ldh, float *t, int *ldt, float *alphar, float *alphai, float *beta, float *q, int *ldq, float *z, int *ldz, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_shgeqzK(JNIEnv *env, UNUSED jobject obj, + jstring job, jstring compq, jstring compz, jint n, jint ilo, jint ihi, jfloatArray h, jint offseth, jint ldh, jfloatArray t, jint offsett, jint ldt, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray q, jint offsetq, jint ldq, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssygs2K(JNIEnv *, jobject, - jint, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { - +static void (*shsein_)(char *side, char *eigsrc, char *initv, int *select, int *n, float *h, int *ldh, float *wr, float *wi, float *vl, int *ldvl, float *vr, int *ldvr, int *mm, /*FIXME*/void *m, float *work, int * ifaill, int * ifailr, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_shseinK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring eigsrc, jstring initv, jbooleanArray select, jint offsetselect, jint n, jfloatArray h, jint offseth, jint ldh, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jint mm, jobject m, jfloatArray work, jint offsetwork, jintArray ifaill, jint offsetifaill, jintArray ifailr, jint offsetifailr, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssygstK(JNIEnv *, jobject, - jint, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { - +static void (*shseqr_)(char *job, char *compz, int *n, int *ilo, int *ihi, float *h, int *ldh, float *wr, float *wi, float *z, int *ldz, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_shseqrK(JNIEnv *env, UNUSED jobject obj, + jstring job, jstring compz, jint n, jint ilo, jint ihi, jfloatArray h, jint offseth, jint ldh, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssygvK(JNIEnv *, jobject, - jint, jstring, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { - +static int *(*sisnan_)(float *sin); + +jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_sisnanK(JNIEnv *env, UNUSED jobject obj, + jfloat sin) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssygvdK(JNIEnv *, jobject, - jint, jstring, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jintArray, jint, jint, jobject) { - +static void (*slabad_)(/*FIXME*/void *small, /*FIXME*/void *large); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slabadK(JNIEnv *env, UNUSED jobject obj, + jobject small, jobject large) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssygvxK(JNIEnv *, jobject, - jint, jstring, jstring, jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloat, jfloat, jint, jint, jfloat, jobject, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jintArray, jint, jobject) { - +static void (*slabrd_)(int *m, int *n, int *nb, float *a, int *lda, float *d, float *e, float *tauq, float *taup, float *x, int *ldx, float *y, int *ldy); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slabrdK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint nb, jfloatArray a, jint offseta, jint lda, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray tauq, jint offsettauq, jfloatArray taup, jint offsettaup, jfloatArray x, jint offsetx, jint ldx, jfloatArray y, jint offsety, jint ldy) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyrfsK(JNIEnv *, jobject, - jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { - +static void (*slacn2_)(int *n, float *v, float *x, int * isgn, /*FIXME*/void *est, /*FIXME*/void *kase, int * isave); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slacn2K(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray v, jint offsetv, jfloatArray x, jint offsetx, jintArray isgn, jint offsetisgn, jobject est, jobject kase, jintArray isave, jint offsetisave) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssysvK(JNIEnv *, jobject, - jstring, jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { - +static void (*slacon_)(int *n, float *v, float *x, int * isgn, /*FIXME*/void *est, /*FIXME*/void *kase); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaconK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray v, jint offsetv, jfloatArray x, jint offsetx, jintArray isgn, jint offsetisgn, jobject est, jobject kase) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssysvxK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jintArray, jint, jobject) { - +static void (*slacpy_)(const char *uplo, int *m, int *n, float *a, int *lda, float *b, int *ldb); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slacpyK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytd2K(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jobject) { - +static void (*sladiv_)(float *a, float *b, float *c, float *d, /*FIXME*/void *p, /*FIXME*/void *q); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sladivK(JNIEnv *env, UNUSED jobject obj, + jfloat a, jfloat b, jfloat c, jfloat d, jobject p, jobject q) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytf2K(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jint, jintArray, jint, jobject) { - +static void (*slae2_)(float *a, float *b, float *c, /*FIXME*/void *rt1, /*FIXME*/void *rt2); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slae2K(JNIEnv *env, UNUSED jobject obj, + jfloat a, jfloat b, jfloat c, jobject rt1, jobject rt2) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytrdK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { - +static void (*slaebz_)(int *ijob, int *nitmax, int *n, int *mmax, int *minp, int *nbmin, float *abstol, float *reltol, float *pivmin, float *d, float *e, float *e22, int * nval, float *ab, float *c, /*FIXME*/void *mout, int * nab, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaebzK(JNIEnv *env, UNUSED jobject obj, + jint ijob, jint nitmax, jint n, jint mmax, jint minp, jint nbmin, jfloat abstol, jfloat reltol, jfloat pivmin, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray e2, jint offsete2, jintArray nval, jint offsetnval, jfloatArray ab, jint offsetab, jfloatArray c, jint offsetc, jobject mout, jintArray nab, jint offsetnab, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytrfK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jobject) { - +static void (*slaed0_)(int *icompq, int *qsiz, int *n, float *d, float *e, float *q, int *ldq, float *qstore, int *ldqs, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed0K(JNIEnv *env, UNUSED jobject obj, + jint icompq, jint qsiz, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray q, jint offsetq, jint ldq, jfloatArray qstore, jint offsetqstore, jint ldqs, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytriK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jobject) { - +static void (*slaed1_)(int *n, float *d, float *q, int *ldq, int * indxq, /*FIXME*/void *rho, int *cutpnt, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed1K(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray d, jint offsetd, jfloatArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jint cutpnt, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytrsK(JNIEnv *, jobject, - jstring, jint, jint, jfloatArray, jint, jint, jintArray, jint, jfloatArray, jint, jint, jobject) { - +static void (*slaed2_)(/*FIXME*/void *k, int *n, int *n1, float *d, float *q, int *ldq, int * indxq, /*FIXME*/void *rho, float *z, float *dlamda, float *w, float *q22, int * indx, int * indxc, int * indxp, int * coltyp, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed2K(JNIEnv *env, UNUSED jobject obj, + jobject k, jint n, jint n1, jfloatArray d, jint offsetd, jfloatArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jfloatArray z, jint offsetz, jfloatArray dlamda, jint offsetdlamda, jfloatArray w, jint offsetw, jfloatArray q2, jint offsetq2, jintArray indx, jint offsetindx, jintArray indxc, jint offsetindxc, jintArray indxp, jint offsetindxp, jintArray coltyp, jint offsetcoltyp, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stbconK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jintArray, jint, jobject) { - +static void (*slaed3_)(int *k, int *n, int *n1, float *d, float *q, int *ldq, float *rho, float *dlamda, float *q22, int * indx, int * ctot, float *w, float *s, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed3K(JNIEnv *env, UNUSED jobject obj, + jint k, jint n, jint n1, jfloatArray d, jint offsetd, jfloatArray q, jint offsetq, jint ldq, jfloat rho, jfloatArray dlamda, jint offsetdlamda, jfloatArray q2, jint offsetq2, jintArray indx, jint offsetindx, jintArray ctot, jint offsetctot, jfloatArray w, jint offsetw, jfloatArray s, jint offsets, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stbrfsK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { - +static void (*slaed4_)(int *n, int *i, float *d, float *z, float *delta, float *rho, /*FIXME*/void *dlam, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed4K(JNIEnv *env, UNUSED jobject obj, + jint n, jint i, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloatArray delta, jint offsetdelta, jfloat rho, jobject dlam, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stbtrsK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { - +static void (*slaed5_)(int *i, float *d, float *z, float *delta, float *rho, /*FIXME*/void *dlam); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed5K(JNIEnv *env, UNUSED jobject obj, + jint i, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloatArray delta, jint offsetdelta, jfloat rho, jobject dlam) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgevcK(JNIEnv *, jobject, - jstring, jstring, jbooleanArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jint, jobject, jfloatArray, jint, jobject) { - +static void (*slaed6_)(int *kniter, int *orgati, float *rho, float *d, float *z, float *finit, /*FIXME*/void *tau, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed6K(JNIEnv *env, UNUSED jobject obj, + jint kniter, jboolean orgati, jfloat rho, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloat finit, jobject tau, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgex2K(JNIEnv *, jobject, - jboolean, jboolean, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jint, jint, jint, jfloatArray, jint, jint, jobject) { - +static void (*slaed7_)(int *icompq, int *n, int *qsiz, int *tlvls, int *curlvl, int *curpbm, float *d, float *q, int *ldq, int * indxq, /*FIXME*/void *rho, int *cutpnt, float *qstore, int * qptr, int * prmptr, int * perm, int * givptr, int * givcol, float *givnum, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed7K(JNIEnv *env, UNUSED jobject obj, + jint icompq, jint n, jint qsiz, jint tlvls, jint curlvl, jint curpbm, jfloatArray d, jint offsetd, jfloatArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jint cutpnt, jfloatArray qstore, jint offsetqstore, jintArray qptr, jint offsetqptr, jintArray prmptr, jint offsetprmptr, jintArray perm, jint offsetperm, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jfloatArray givnum, jint offsetgivnum, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgexcK(JNIEnv *, jobject, - jboolean, jboolean, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jobject, jfloatArray, jint, jint, jobject) { - +static void (*slaed8_)(int *icompq, /*FIXME*/void *k, int *n, int *qsiz, float *d, float *q, int *ldq, int * indxq, /*FIXME*/void *rho, int *cutpnt, float *z, float *dlamda, float *q22, int *ldq2, float *w, int * perm, /*FIXME*/void *givptr, int * givcol, float *givnum, int * indxp, int * indx, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed8K(JNIEnv *env, UNUSED jobject obj, + jint icompq, jobject k, jint n, jint qsiz, jfloatArray d, jint offsetd, jfloatArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jint cutpnt, jfloatArray z, jint offsetz, jfloatArray dlamda, jint offsetdlamda, jfloatArray q2, jint offsetq2, jint ldq2, jfloatArray w, jint offsetw, jintArray perm, jint offsetperm, jobject givptr, jintArray givcol, jint offsetgivcol, jfloatArray givnum, jint offsetgivnum, jintArray indxp, jint offsetindxp, jintArray indx, jint offsetindx, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgsenK(JNIEnv *, jobject, - jint, jboolean, jboolean, jbooleanArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jobject, jobject, jfloatArray, jint, jfloatArray, jint, jint, jintArray, jint, jint, jobject) { - +static void (*slaed9_)(int *k, int *kstart, int *kstop, int *n, float *d, float *q, int *ldq, float *rho, float *dlamda, float *w, float *s, int *lds, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed9K(JNIEnv *env, UNUSED jobject obj, + jint k, jint kstart, jint kstop, jint n, jfloatArray d, jint offsetd, jfloatArray q, jint offsetq, jint ldq, jfloat rho, jfloatArray dlamda, jint offsetdlamda, jfloatArray w, jint offsetw, jfloatArray s, jint offsets, jint lds, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgsjaK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloat, jfloat, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject, jobject) { - +static void (*slaeda_)(int *n, int *tlvls, int *curlvl, int *curpbm, int * prmptr, int * perm, int * givptr, int * givcol, float *givnum, float *q, int * qptr, float *z, float *ztemp, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaedaK(JNIEnv *env, UNUSED jobject obj, + jint n, jint tlvls, jint curlvl, jint curpbm, jintArray prmptr, jint offsetprmptr, jintArray perm, jint offsetperm, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jfloatArray givnum, jint offsetgivnum, jfloatArray q, jint offsetq, jintArray qptr, jint offsetqptr, jfloatArray z, jint offsetz, jfloatArray ztemp, jint offsetztemp, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgsnaK(JNIEnv *, jobject, - jstring, jstring, jbooleanArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jint, jintArray, jint, jobject) { - +static void (*slaein_)(int *rightv, int *noinit, int *n, float *h, int *ldh, float *wr, float *wi, float *vr, float *vi, float *b, int *ldb, float *work, float *eps3, float *smlnum, float *bignum, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaeinK(JNIEnv *env, UNUSED jobject obj, + jboolean rightv, jboolean noinit, jint n, jfloatArray h, jint offseth, jint ldh, jfloat wr, jfloat wi, jfloatArray vr, jint offsetvr, jfloatArray vi, jint offsetvi, jfloatArray b, jint offsetb, jint ldb, jfloatArray work, jint offsetwork, jfloat eps3, jfloat smlnum, jfloat bignum, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgsy2K(JNIEnv *, jobject, - jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jobject, jobject, jintArray, jint, jobject, jobject) { - +static void (*slaev2_)(float *a, float *b, float *c, /*FIXME*/void *rt1, /*FIXME*/void *rt2, /*FIXME*/void *cs1, /*FIXME*/void *sn1); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaev2K(JNIEnv *env, UNUSED jobject obj, + jfloat a, jfloat b, jfloat c, jobject rt1, jobject rt2, jobject cs1, jobject sn1) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgsylK(JNIEnv *, jobject, - jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jobject, jfloatArray, jint, jint, jintArray, jint, jobject) { - +static void (*slaexc_)(int *wantq, int *n, float *t, int *ldt, float *q, int *ldq, int *j1, int *n1, int *n2, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaexcK(JNIEnv *env, UNUSED jobject obj, + jboolean wantq, jint n, jfloatArray t, jint offsett, jint ldt, jfloatArray q, jint offsetq, jint ldq, jint j1, jint n1, jint n2, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stpconK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jfloatArray, jint, jobject, jfloatArray, jint, jintArray, jint, jobject) { - +static void (*slag2_)(float *a, int *lda, float *b, int *ldb, float *safmin, /*FIXME*/void *scale1, /*FIXME*/void *scale2, /*FIXME*/void *wr1, /*FIXME*/void *wr2, /*FIXME*/void *wi); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slag2K(JNIEnv *env, UNUSED jobject obj, + jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat safmin, jobject scale1, jobject scale2, jobject wr1, jobject wr2, jobject wi) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stprfsK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { - +static void (*slag2d_)(int *m, int *n, float *sa, int *ldsa, double *a, int *lda, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slag2dK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jfloatArray sa, jint offsetsa, jint ldsa, jdoubleArray a, jint offseta, jint lda, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stptriK(JNIEnv *, jobject, - jstring, jstring, jint, jfloatArray, jint, jobject) { - +static void (*slags2_)(int *upper, float *a1, float *a2, float *a3, float *b1, float *b2, float *b3, /*FIXME*/void *csu, /*FIXME*/void *snu, /*FIXME*/void *csv, /*FIXME*/void *snv, /*FIXME*/void *csq, /*FIXME*/void *snq); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slags2K(JNIEnv *env, UNUSED jobject obj, + jboolean upper, jfloat a1, jfloat a2, jfloat a3, jfloat b1, jfloat b2, jfloat b3, jobject csu, jobject snu, jobject csv, jobject snv, jobject csq, jobject snq) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stptrsK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { - +static void (*slagtf_)(int *n, float *a, float *lambda, float *b, float *c, float *tol, float *d, int * in, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slagtfK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray a, jint offseta, jfloat lambda, jfloatArray b, jint offsetb, jfloatArray c, jint offsetc, jfloat tol, jfloatArray d, jint offsetd, jintArray in, jint offsetin, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_strconK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jintArray, jint, jobject) { - +static void (*slagtm_)(char *trans, int *n, int *nrhs, float *alpha, float *dl, float *d, float *du, float *x, int *ldx, float *beta, float *b, int *ldb); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slagtmK(JNIEnv *env, UNUSED jobject obj, + jstring trans, jint n, jint nrhs, jfloat alpha, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray x, jint offsetx, jint ldx, jfloat beta, jfloatArray b, jint offsetb, jint ldb) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_strevcK(JNIEnv *, jobject, - jstring, jstring, jbooleanArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jint, jobject, jfloatArray, jint, jobject) { - +static void (*slagts_)(int *job, int *n, float *a, float *b, float *c, float *d, int * in, float *y, /*FIXME*/void *tol, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slagtsK(JNIEnv *env, UNUSED jobject obj, + jint job, jint n, jfloatArray a, jint offseta, jfloatArray b, jint offsetb, jfloatArray c, jint offsetc, jfloatArray d, jint offsetd, jintArray in, jint offsetin, jfloatArray y, jint offsety, jobject tol, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_strexcK(JNIEnv *, jobject, - jstring, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jobject, jfloatArray, jint, jobject) { - +static void (*slagv2_)(float *a, int *lda, float *b, int *ldb, float *alphar, float *alphai, float *beta, /*FIXME*/void *csl, /*FIXME*/void *snl, /*FIXME*/void *csr, /*FIXME*/void *snr); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slagv2K(JNIEnv *env, UNUSED jobject obj, + jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jobject csl, jobject snl, jobject csr, jobject snr) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_strrfsK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jfloatArray, jint, jintArray, jint, jobject) { - +static void (*slahqr_)(int *wantt, int *wantz, int *n, int *ilo, int *ihi, float *h, int *ldh, float *wr, float *wi, int *iloz, int *ihiz, float *z, int *ldz, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slahqrK(JNIEnv *env, UNUSED jobject obj, + jboolean wantt, jboolean wantz, jint n, jint ilo, jint ihi, jfloatArray h, jint offseth, jint ldh, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jint iloz, jint ihiz, jfloatArray z, jint offsetz, jint ldz, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_strsenK(JNIEnv *, jobject, - jstring, jstring, jbooleanArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jobject, jobject, jobject, jfloatArray, jint, jint, jintArray, jint, jint, jobject) { - +static void (*slahr2_)(int *n, int *k, int *nb, float *a, int *lda, float *tau, float *t, int *ldt, float *y, int *ldy); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slahr2K(JNIEnv *env, UNUSED jobject obj, + jint n, jint k, jint nb, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray t, jint offsett, jint ldt, jfloatArray y, jint offsety, jint ldy) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_strsnaK(JNIEnv *, jobject, - jstring, jstring, jbooleanArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject, jfloatArray, jint, jint, jintArray, jint, jobject) { - +static void (*slahrd_)(int *n, int *k, int *nb, float *a, int *lda, float *tau, float *t, int *ldt, float *y, int *ldy); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slahrdK(JNIEnv *env, UNUSED jobject obj, + jint n, jint k, jint nb, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray t, jint offsett, jint ldt, jfloatArray y, jint offsety, jint ldy) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_strsylK(JNIEnv *, jobject, - jstring, jstring, jint, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject, jobject) { - +static void (*slaic1_)(int *job, int *j, float *x, float *sest, float *w, float *gamma, /*FIXME*/void *sestpr, /*FIXME*/void *s, /*FIXME*/void *c); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaic1K(JNIEnv *env, UNUSED jobject obj, + jint job, jint j, jfloatArray x, jint offsetx, jfloat sest, jfloatArray w, jint offsetw, jfloat gamma, jobject sestpr, jobject s, jobject c) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_strti2K(JNIEnv *, jobject, - jstring, jstring, jint, jfloatArray, jint, jint, jobject) { - +static int *(*slaisnan_)(float *sin1, float *sin2); + +jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_slaisnanK(JNIEnv *env, UNUSED jobject obj, + jfloat sin1, jfloat sin2) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_strtriK(JNIEnv *, jobject, - jstring, jstring, jint, jfloatArray, jint, jint, jobject) { - +static void (*slaln2_)(int *ltrans, int *na, int *nw, float *smin, float *ca, float *a, int *lda, float *d1, float *d2, float *b, int *ldb, float *wr, float *wi, float *x, int *ldx, /*FIXME*/void *scale, /*FIXME*/void *xnorm, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaln2K(JNIEnv *env, UNUSED jobject obj, + jboolean ltrans, jint na, jint nw, jfloat smin, jfloat ca, jfloatArray a, jint offseta, jint lda, jfloat d1, jfloat d2, jfloatArray b, jint offsetb, jint ldb, jfloat wr, jfloat wi, jfloatArray x, jint offsetx, jint ldx, jobject scale, jobject xnorm, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_strtrsK(JNIEnv *, jobject, - jstring, jstring, jstring, jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jint, jobject) { - +static void (*slals0_)(int *icompq, int *nl, int *nr, int *sqre, int *nrhs, float *b, int *ldb, float *bx, int *ldbx, int *perm, int *givptr, int * givcol, int *ldgcol, float *givnum, int *ldgnum, float *poles, float *difl, float *difr, float *z, int *k, float *c, float *s, float *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slals0K(JNIEnv *env, UNUSED jobject obj, + jint icompq, jint nl, jint nr, jint sqre, jint nrhs, jfloatArray b, jint offsetb, jint ldb, jfloatArray bx, jint offsetbx, jint ldbx, jintArray perm, jint offsetperm, jint givptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jfloatArray givnum, jint offsetgivnum, jint ldgnum, jfloatArray poles, jint offsetpoles, jfloatArray difl, jint offsetdifl, jfloatArray difr, jint offsetdifr, jfloatArray z, jint offsetz, jint k, jfloat c, jfloat s, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stzrqfK(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jobject) { - +static void (*slalsa_)(int *icompq, int *smlsiz, int *n, int *nrhs, float *b, int *ldb, float *bx, int *ldbx, float *u, int *ldu, float *vt, int * k, float *difl, float *difr, float *z, float *poles, int * givptr, int * givcol, int *ldgcol, int * perm, float *givnum, float *c, float *s, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slalsaK(JNIEnv *env, UNUSED jobject obj, + jint icompq, jint smlsiz, jint n, jint nrhs, jfloatArray b, jint offsetb, jint ldb, jfloatArray bx, jint offsetbx, jint ldbx, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jintArray k, jint offsetk, jfloatArray difl, jint offsetdifl, jfloatArray difr, jint offsetdifr, jfloatArray z, jint offsetz, jfloatArray poles, jint offsetpoles, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jintArray perm, jint offsetperm, jfloatArray givnum, jint offsetgivnum, jfloatArray c, jint offsetc, jfloatArray s, jint offsets, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stzrzfK(JNIEnv *, jobject, - jint, jint, jfloatArray, jint, jint, jfloatArray, jint, jfloatArray, jint, jint, jobject) { - +static void (*slalsd_)(const char *uplo, int *smlsiz, int *n, int *nrhs, float *d, float *e, float *b, int *ldb, float *rcond, /*FIXME*/void *rank, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slalsdK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint smlsiz, jint n, jint nrhs, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray b, jint offsetb, jint ldb, jfloat rcond, jobject rank, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamchK(JNIEnv *, jobject, - jstring) { - +static void (*slamrg_)(int *n1, int *n2, float *a, int *strd1, int *strd2, int * index); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slamrgK(JNIEnv *env, UNUSED jobject obj, + jint n1, jint n2, jfloatArray a, jint offseta, jint strd1, jint strd2, jintArray index, jint offsetindex) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc1K(JNIEnv *, jobject, - jobject, jobject, jobject, jobject) { - +static int (*slaneg_)(int *n, float *d, int *offsetd, float *lld, int *offsetlld, float *sigma, float *pivmin, int *r); + +jint Java_dev_ludovic_netlib_lapack_JNILAPACK_slanegK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray d, jint offsetd, jfloatArray lld, jint offsetlld, jfloat sigma, jfloat pivmin, jint r) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc2K(JNIEnv *, jobject, - jobject, jobject, jobject, jobject, jobject, jobject, jobject, jobject) { - +static float (*slangb_)(char *norm, int *n, int *kl, int *ku, float *ab, int *offsetab, int *ldab, float *work, int *offsetwork); + +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slangbK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jint n, jint kl, jint ku, jfloatArray ab, jint offsetab, jint ldab, jfloatArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc3K(JNIEnv *, jobject, - jdouble, jdouble) { - +static float (*slange_)(char *norm, int *m, int *n, float *a, int *offseta, int *lda, float *work, int *offsetwork); + +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slangeK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc4K(JNIEnv *, jobject, - jobject, jdouble, jint) { - +static float (*slangt_)(char *norm, int *n, float *dl, int *offsetdl, float *d, int *offsetd, float *du, int *offsetdu); + +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slangtK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jint n, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc5K(JNIEnv *, jobject, - jint, jint, jint, jboolean, jobject, jobject) { - +static float (*slanhs_)(char *norm, int *n, float *a, int *offseta, int *lda, float *work, int *offsetwork); + +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slanhsK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dsecndK(JNIEnv *, jobject); - jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_lsameK(JNIEnv *, jobject { - +static float (*slansb_)(char *norm, const char *uplo, int *n, int *k, float *ab, int *offsetab, int *ldab, float *work, int *offsetwork); + +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slansbK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jstring uplo, jint n, jint k, jfloatArray ab, jint offsetab, jint ldab, jfloatArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } - jstring, jstring) { - +static float (*slansp_)(char *norm, const char *uplo, int *n, float *ap, int *offsetap, float *work, int *offsetwork); + +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slanspK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_secondK(JNIEnv *, jobject); - jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slamchK(JNIEnv *, jobject { - +static float (*slanst_)(char *norm, int *n, float *d, int *offsetd, float *e, int *offsete); + +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slanstK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } - jstring) { - +static float (*slansy_)(char *norm, const char *uplo, int *n, float *a, int *offseta, int *lda, float *work, int *offsetwork); + +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slansyK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc1K(JNIEnv *, jobject, - jobject, jobject, jobject, jobject) { - +static float (*slantb_)(char *norm, const char *uplo, char *diag, int *n, int *k, float *ab, int *offsetab, int *ldab, float *work, int *offsetwork); + +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slantbK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jstring uplo, jstring diag, jint n, jint k, jfloatArray ab, jint offsetab, jint ldab, jfloatArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc2K(JNIEnv *, jobject, - jobject, jobject, jobject, jobject, jobject, jobject, jobject, jobject) { - +static float (*slantp_)(char *norm, const char *uplo, char *diag, int *n, float *ap, int *offsetap, float *work, int *offsetwork); + +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slantpK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jstring uplo, jstring diag, jint n, jfloatArray ap, jint offsetap, jfloatArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc3K(JNIEnv *, jobject, - jfloat, jfloat) { - +static float (*slantr_)(char *norm, const char *uplo, char *diag, int *m, int *n, float *a, int *offseta, int *lda, float *work, int *offsetwork); + +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slantrK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jstring uplo, jstring diag, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc4K(JNIEnv *, jobject, - jobject, jfloat, jint) { - +static void (*slanv2_)(/*FIXME*/void *a, /*FIXME*/void *b, /*FIXME*/void *c, /*FIXME*/void *d, /*FIXME*/void *rt1r, /*FIXME*/void *rt1i, /*FIXME*/void *rt2r, /*FIXME*/void *rt2i, /*FIXME*/void *cs, /*FIXME*/void *sn); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slanv2K(JNIEnv *env, UNUSED jobject obj, + jobject a, jobject b, jobject c, jobject d, jobject rt1r, jobject rt1i, jobject rt2r, jobject rt2i, jobject cs, jobject sn) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc5K(JNIEnv *, jobject, - jint, jint, jint, jboolean, jobject, jobject) { - +static void (*slapll_)(int *n, float *x, int *incx, float *y, int *incy, /*FIXME*/void *ssmin); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slapllK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy, jobject ssmin) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } +static void (*slapmt_)(int *forwrd, int *m, int *n, float *x, int *ldx, int *k); -static void *lapack; +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slapmtK(JNIEnv *env, UNUSED jobject obj, + jboolean forwrd, jint m, jint n, jfloatArray x, jint offsetx, jint ldx, jintArray k, jint offsetk) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static float (*slapy2_)(float *x, float *y); -jstring get_system_property(JNIEnv *env, jstring key, jstring def) { - jclass klass = (*env)->FindClass(env, "java/lang/System"); - jmethodID method = (*env)->GetStaticMethodID(env, klass, "getProperty", "(Ljava/lang/String;Ljava/lang/String;)Ljava/lang/String;"); - return (jstring)(*env)->CallStaticObjectMethod(env, klass, method, key, def); +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slapy2K(JNIEnv *env, UNUSED jobject obj, + jfloat x, jfloat y) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static float (*slapy3_)(float *x, float *y, float *z); + +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slapy3K(JNIEnv *env, UNUSED jobject obj, + jfloat x, jfloat y, jfloat z) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slaqgb_)(int *m, int *n, int *kl, int *ku, float *ab, int *ldab, float *r, float *c, float *rowcnd, float *colcnd, float *amax, jstring *equed); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqgbK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint kl, jint ku, jfloatArray ab, jint offsetab, jint ldab, jfloatArray r, jint offsetr, jfloatArray c, jint offsetc, jfloat rowcnd, jfloat colcnd, jfloat amax, jobject equed) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slaqge_)(int *m, int *n, float *a, int *lda, float *r, float *c, float *rowcnd, float *colcnd, float *amax, jstring *equed); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqgeK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray r, jint offsetr, jfloatArray c, jint offsetc, jfloat rowcnd, jfloat colcnd, jfloat amax, jobject equed) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slaqp2_)(int *m, int *n, int *offset, float *a, int *lda, int * jpvt, float *tau, float *vn11, float *vn22, float *work); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqp2K(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint offset, jfloatArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jfloatArray tau, jint offsettau, jfloatArray vn1, jint offsetvn1, jfloatArray vn2, jint offsetvn2, jfloatArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slaqps_)(int *m, int *n, int *offset, int *nb, int *kb, float *a, int *lda, int * jpvt, float *tau, float *vn11, float *vn22, float *auxv, float *f, int *ldf); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqpsK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint offset, jint nb, jobject kb, jfloatArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jfloatArray tau, jint offsettau, jfloatArray vn1, jint offsetvn1, jfloatArray vn2, jint offsetvn2, jfloatArray auxv, jint offsetauxv, jfloatArray f, jint offsetf, jint ldf) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slaqr0_)(int *wantt, int *wantz, int *n, int *ilo, int *ihi, float *h, int *ldh, float *wr, float *wi, int *iloz, int *ihiz, float *z, int *ldz, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr0K(JNIEnv *env, UNUSED jobject obj, + jboolean wantt, jboolean wantz, jint n, jint ilo, jint ihi, jfloatArray h, jint offseth, jint ldh, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jint iloz, jint ihiz, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slaqr1_)(int *n, float *h, int *ldh, float *sr1, float *si1, float *sr2, float *si2, float *v); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr1K(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray h, jint offseth, jint ldh, jfloat sr1, jfloat si1, jfloat sr2, jfloat si2, jfloatArray v, jint offsetv) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slaqr2_)(int *wantt, int *wantz, int *n, int *ktop, int *kbot, int *nw, float *h, int *ldh, int *iloz, int *ihiz, float *z, int *ldz, /*FIXME*/void *ns, /*FIXME*/void *nd, float *sr, float *si, float *v, int *ldv, int *nh, float *t, int *ldt, int *nv, float *wv, int *ldwv, float *work, int *lwork); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr2K(JNIEnv *env, UNUSED jobject obj, + jboolean wantt, jboolean wantz, jint n, jint ktop, jint kbot, jint nw, jfloatArray h, jint offseth, jint ldh, jint iloz, jint ihiz, jfloatArray z, jint offsetz, jint ldz, jobject ns, jobject nd, jfloatArray sr, jint offsetsr, jfloatArray si, jint offsetsi, jfloatArray v, jint offsetv, jint ldv, jint nh, jfloatArray t, jint offsett, jint ldt, jint nv, jfloatArray wv, jint offsetwv, jint ldwv, jfloatArray work, jint offsetwork, jint lwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slaqr3_)(int *wantt, int *wantz, int *n, int *ktop, int *kbot, int *nw, float *h, int *ldh, int *iloz, int *ihiz, float *z, int *ldz, /*FIXME*/void *ns, /*FIXME*/void *nd, float *sr, float *si, float *v, int *ldv, int *nh, float *t, int *ldt, int *nv, float *wv, int *ldwv, float *work, int *lwork); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr3K(JNIEnv *env, UNUSED jobject obj, + jboolean wantt, jboolean wantz, jint n, jint ktop, jint kbot, jint nw, jfloatArray h, jint offseth, jint ldh, jint iloz, jint ihiz, jfloatArray z, jint offsetz, jint ldz, jobject ns, jobject nd, jfloatArray sr, jint offsetsr, jfloatArray si, jint offsetsi, jfloatArray v, jint offsetv, jint ldv, jint nh, jfloatArray t, jint offsett, jint ldt, jint nv, jfloatArray wv, jint offsetwv, jint ldwv, jfloatArray work, jint offsetwork, jint lwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slaqr4_)(int *wantt, int *wantz, int *n, int *ilo, int *ihi, float *h, int *ldh, float *wr, float *wi, int *iloz, int *ihiz, float *z, int *ldz, float *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr4K(JNIEnv *env, UNUSED jobject obj, + jboolean wantt, jboolean wantz, jint n, jint ilo, jint ihi, jfloatArray h, jint offseth, jint ldh, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jint iloz, jint ihiz, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slaqr5_)(int *wantt, int *wantz, int *kacc22, int *n, int *ktop, int *kbot, int *nshfts, float *sr, float *si, float *h, int *ldh, int *iloz, int *ihiz, float *z, int *ldz, float *v, int *ldv, float *u, int *ldu, int *nv, float *wv, int *ldwv, int *nh, float *wh, int *ldwh); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr5K(JNIEnv *env, UNUSED jobject obj, + jboolean wantt, jboolean wantz, jint kacc22, jint n, jint ktop, jint kbot, jint nshfts, jfloatArray sr, jint offsetsr, jfloatArray si, jint offsetsi, jfloatArray h, jint offseth, jint ldh, jint iloz, jint ihiz, jfloatArray z, jint offsetz, jint ldz, jfloatArray v, jint offsetv, jint ldv, jfloatArray u, jint offsetu, jint ldu, jint nv, jfloatArray wv, jint offsetwv, jint ldwv, jint nh, jfloatArray wh, jint offsetwh, jint ldwh) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slaqsb_)(const char *uplo, int *n, int *kd, float *ab, int *ldab, float *s, float *scond, float *amax, jstring *equed); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqsbK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloatArray s, jint offsets, jfloat scond, jfloat amax, jobject equed) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slaqsp_)(const char *uplo, int *n, float *ap, float *s, float *scond, float *amax, jstring *equed); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqspK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray s, jint offsets, jfloat scond, jfloat amax, jobject equed) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slaqsy_)(const char *uplo, int *n, float *a, int *lda, float *s, float *scond, float *amax, jstring *equed); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqsyK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray s, jint offsets, jfloat scond, jfloat amax, jobject equed) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slaqtr_)(int *ltran, int *lreal, int *n, float *t, int *ldt, float *b, float *w, /*FIXME*/void *scale, float *x, float *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqtrK(JNIEnv *env, UNUSED jobject obj, + jboolean ltran, jboolean lreal, jint n, jfloatArray t, jint offsett, jint ldt, jfloatArray b, jint offsetb, jfloat w, jobject scale, jfloatArray x, jint offsetx, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slar1v_)(int *n, int *b1, int *bn, float *lambda, float *d, float *l, float *ld, float *lld, float *pivmin, float *gaptol, float *z, int *wantnc, /*FIXME*/void *negcnt, /*FIXME*/void *ztz, /*FIXME*/void *mingma, /*FIXME*/void *r, int * isuppz, /*FIXME*/void *nrminv, /*FIXME*/void *resid, /*FIXME*/void *rqcorr, float *work); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slar1vK(JNIEnv *env, UNUSED jobject obj, + jint n, jint b1, jint bn, jfloat lambda, jfloatArray d, jint offsetd, jfloatArray l, jint offsetl, jfloatArray ld, jint offsetld, jfloatArray lld, jint offsetlld, jfloat pivmin, jfloat gaptol, jfloatArray z, jint offsetz, jboolean wantnc, jobject negcnt, jobject ztz, jobject mingma, jobject r, jintArray isuppz, jint offsetisuppz, jobject nrminv, jobject resid, jobject rqcorr, jfloatArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slar2v_)(int *n, float *x, float *y, float *z, int *incx, float *c, float *s, int *incc); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slar2vK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray x, jint offsetx, jfloatArray y, jint offsety, jfloatArray z, jint offsetz, jint incx, jfloatArray c, jint offsetc, jfloatArray s, jint offsets, jint incc) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slarf_)(char *side, int *m, int *n, float *v, int *incv, float *tau, float *c, int *Ldc, float *work); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarfK(JNIEnv *env, UNUSED jobject obj, + jstring side, jint m, jint n, jfloatArray v, jint offsetv, jint incv, jfloat tau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slarfb_)(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, float *v, int *ldv, float *t, int *ldt, float *c, int *Ldc, float *work, int *ldwork); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarfbK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring trans, jstring direct, jstring storev, jint m, jint n, jint k, jfloatArray v, jint offsetv, jint ldv, jfloatArray t, jint offsett, jint ldt, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint ldwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slarfg_)(int *n, /*FIXME*/void *alpha, float *x, int *incx, /*FIXME*/void *tau); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarfgK(JNIEnv *env, UNUSED jobject obj, + jint n, jobject alpha, jfloatArray x, jint offsetx, jint incx, jobject tau) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slarft_)(char *direct, char *storev, int *n, int *k, float *v, int *ldv, float *tau, float *t, int *ldt); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarftK(JNIEnv *env, UNUSED jobject obj, + jstring direct, jstring storev, jint n, jint k, jfloatArray v, jint offsetv, jint ldv, jfloatArray tau, jint offsettau, jfloatArray t, jint offsett, jint ldt) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slarfx_)(char *side, int *m, int *n, float *v, float *tau, float *c, int *Ldc, float *work); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarfxK(JNIEnv *env, UNUSED jobject obj, + jstring side, jint m, jint n, jfloatArray v, jint offsetv, jfloat tau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slargv_)(int *n, float *x, int *incx, float *y, int *incy, float *c, int *incc); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slargvK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy, jfloatArray c, jint offsetc, jint incc) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slarnv_)(int *idist, int * iseed, int *n, float *x); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarnvK(JNIEnv *env, UNUSED jobject obj, + jint idist, jintArray iseed, jint offsetiseed, jint n, jfloatArray x, jint offsetx) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slarra_)(int *n, float *d, float *e, float *e22, float *spltol, float *tnrm, /*FIXME*/void *nsplit, int * isplit, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarraK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray e2, jint offsete2, jfloat spltol, jfloat tnrm, jobject nsplit, jintArray isplit, jint offsetisplit, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slarrb_)(int *n, float *d, float *lld, int *ifirst, int *ilast, float *rtol1, float *rtol2, int *offset, float *w, float *wgap, float *werr, float *work, int * iwork, float *pivmin, float *spdiam, int *twist, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrbK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray d, jint offsetd, jfloatArray lld, jint offsetlld, jint ifirst, jint ilast, jfloat rtol1, jfloat rtol2, jint offset, jfloatArray w, jint offsetw, jfloatArray wgap, jint offsetwgap, jfloatArray werr, jint offsetwerr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jfloat pivmin, jfloat spdiam, jint twist, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slarrc_)(char *jobt, int *n, float *vl, float *vu, float *d, float *e, float *pivmin, /*FIXME*/void *eigcnt, /*FIXME*/void *lcnt, /*FIXME*/void *rcnt, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrcK(JNIEnv *env, UNUSED jobject obj, + jstring jobt, jint n, jfloat vl, jfloat vu, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloat pivmin, jobject eigcnt, jobject lcnt, jobject rcnt, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slarrd_)(char *range, char *order, int *n, float *vl, float *vu, int *il, int *iu, float *gers, float *reltol, float *d, float *e, float *e22, float *pivmin, int *nsplit, int * isplit, int *m, float *w, float *werr, /*FIXME*/void *wl, /*FIXME*/void *wu, int *iblock, int * indexw, float *work, int * iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrdK(JNIEnv *env, UNUSED jobject obj, + jstring range, jstring order, jint n, jfloat vl, jfloat vu, jint il, jint iu, jfloatArray gers, jint offsetgers, jfloat reltol, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray e2, jint offsete2, jfloat pivmin, jint nsplit, jintArray isplit, jint offsetisplit, jobject m, jfloatArray w, jint offsetw, jfloatArray werr, jint offsetwerr, jobject wl, jobject wu, jintArray iblock, jint offsetiblock, jintArray indexw, jint offsetindexw, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slarre_)(char *range, int *n, /*FIXME*/void *vl, /*FIXME*/void *vu, int *il, int *iu, float *d, float *e, float *e22, float *rtol1, float *rtol2, float *spltol, /*FIXME*/void *nsplit, int * isplit, /*FIXME*/void *m, float *w, float *werr, float *wgap, int * iblock, int * indexw, float *gers, /*FIXME*/void *pivmin, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarreK(JNIEnv *env, UNUSED jobject obj, + jstring range, jint n, jobject vl, jobject vu, jint il, jint iu, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray e2, jint offsete2, jfloat rtol1, jfloat rtol2, jfloat spltol, jobject nsplit, jintArray isplit, jint offsetisplit, jobject m, jfloatArray w, jint offsetw, jfloatArray werr, jint offsetwerr, jfloatArray wgap, jint offsetwgap, jintArray iblock, jint offsetiblock, jintArray indexw, jint offsetindexw, jfloatArray gers, jint offsetgers, jobject pivmin, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slarrf_)(int *n, float *d, float *l, float *ld, int *clstrt, int *clend, float *w, float *wgap, float *werr, float *spdiam, float *clgapl, float *clgapr, float *pivmin, /*FIXME*/void *sigma, float *dplus, float *lplus, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrfK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray d, jint offsetd, jfloatArray l, jint offsetl, jfloatArray ld, jint offsetld, jint clstrt, jint clend, jfloatArray w, jint offsetw, jfloatArray wgap, jint offsetwgap, jfloatArray werr, jint offsetwerr, jfloat spdiam, jfloat clgapl, jfloat clgapr, jfloat pivmin, jobject sigma, jfloatArray dplus, jint offsetdplus, jfloatArray lplus, jint offsetlplus, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slarrj_)(int *n, float *d, float *e22, int *ifirst, int *ilast, float *rtol, int *offset, float *w, float *werr, float *work, int * iwork, float *pivmin, float *spdiam, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrjK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray d, jint offsetd, jfloatArray e2, jint offsete2, jint ifirst, jint ilast, jfloat rtol, jint offset, jfloatArray w, jint offsetw, jfloatArray werr, jint offsetwerr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jfloat pivmin, jfloat spdiam, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slarrk_)(int *n, int *iw, float *gl, float *gu, float *d, float *e22, float *pivmin, float *reltol, /*FIXME*/void *w, /*FIXME*/void *werr, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrkK(JNIEnv *env, UNUSED jobject obj, + jint n, jint iw, jfloat gl, jfloat gu, jfloatArray d, jint offsetd, jfloatArray e2, jint offsete2, jfloat pivmin, jfloat reltol, jobject w, jobject werr, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slarrr_)(int *n, float *d, float *e, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrrK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slarrv_)(int *n, float *vl, float *vu, float *d, float *l, float *pivmin, int * isplit, int *m, int *dol, int *dou, float *minrgp, /*FIXME*/void *rtol1, /*FIXME*/void *rtol2, float *w, float *werr, float *wgap, int * iblock, int * indexw, float *gers, float *z, int *ldz, int * isuppz, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrvK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloat vl, jfloat vu, jfloatArray d, jint offsetd, jfloatArray l, jint offsetl, jfloat pivmin, jintArray isplit, jint offsetisplit, jint m, jint dol, jint dou, jfloat minrgp, jobject rtol1, jobject rtol2, jfloatArray w, jint offsetw, jfloatArray werr, jint offsetwerr, jfloatArray wgap, jint offsetwgap, jintArray iblock, jint offsetiblock, jintArray indexw, jint offsetindexw, jfloatArray gers, jint offsetgers, jfloatArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slartg_)(float *f, float *g, /*FIXME*/void *cs, /*FIXME*/void *sn, /*FIXME*/void *r); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slartgK(JNIEnv *env, UNUSED jobject obj, + jfloat f, jfloat g, jobject cs, jobject sn, jobject r) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slartv_)(int *n, float *x, int *incx, float *y, int *incy, float *c, float *s, int *incc); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slartvK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy, jfloatArray c, jint offsetc, jfloatArray s, jint offsets, jint incc) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slaruv_)(int *iseed, int *n, float *x); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaruvK(JNIEnv *env, UNUSED jobject obj, + jintArray iseed, jint offsetiseed, jint n, jfloatArray x, jint offsetx) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slarz_)(char *side, int *m, int *n, int *l, float *v, int *incv, float *tau, float *c, int *Ldc, float *work); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarzK(JNIEnv *env, UNUSED jobject obj, + jstring side, jint m, jint n, jint l, jfloatArray v, jint offsetv, jint incv, jfloat tau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slarzb_)(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, int *l, float *v, int *ldv, float *t, int *ldt, float *c, int *Ldc, float *work, int *ldwork); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarzbK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring trans, jstring direct, jstring storev, jint m, jint n, jint k, jint l, jfloatArray v, jint offsetv, jint ldv, jfloatArray t, jint offsett, jint ldt, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint ldwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slarzt_)(char *direct, char *storev, int *n, int *k, float *v, int *ldv, float *tau, float *t, int *ldt); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarztK(JNIEnv *env, UNUSED jobject obj, + jstring direct, jstring storev, jint n, jint k, jfloatArray v, jint offsetv, jint ldv, jfloatArray tau, jint offsettau, jfloatArray t, jint offsett, jint ldt) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slas2_)(float *f, float *g, float *h, /*FIXME*/void *ssmin, /*FIXME*/void *ssmax); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slas2K(JNIEnv *env, UNUSED jobject obj, + jfloat f, jfloat g, jfloat h, jobject ssmin, jobject ssmax) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slascl_)(char *type, int *kl, int *ku, float *cfrom, float *cto, int *m, int *n, float *a, int *lda, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasclK(JNIEnv *env, UNUSED jobject obj, + jstring type, jint kl, jint ku, jfloat cfrom, jfloat cto, jint m, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slasd0_)(int *n, int *sqre, float *d, float *e, float *u, int *ldu, float *vt, int *ldvt, int *smlsiz, int * iwork, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd0K(JNIEnv *env, UNUSED jobject obj, + jint n, jint sqre, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jint ldvt, jint smlsiz, jintArray iwork, jint offsetiwork, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slasd1_)(int *nl, int *nr, int *sqre, float *d, /*FIXME*/void *alpha, /*FIXME*/void *beta, float *u, int *ldu, float *vt, int *ldvt, int * idxq, int * iwork, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd1K(JNIEnv *env, UNUSED jobject obj, + jint nl, jint nr, jint sqre, jfloatArray d, jint offsetd, jobject alpha, jobject beta, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jint ldvt, jintArray idxq, jint offsetidxq, jintArray iwork, jint offsetiwork, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slasd2_)(int *nl, int *nr, int *sqre, /*FIXME*/void *k, float *d, float *z, float *alpha, float *beta, float *u, int *ldu, float *vt, int *ldvt, float *dsigma, float *u22, int *ldu2, float *vt22, int *ldvt2, int * idxp, int * idx, int * idxc, int * idxq, int * coltyp, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd2K(JNIEnv *env, UNUSED jobject obj, + jint nl, jint nr, jint sqre, jobject k, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloat alpha, jfloat beta, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jint ldvt, jfloatArray dsigma, jint offsetdsigma, jfloatArray u2, jint offsetu2, jint ldu2, jfloatArray vt2, jint offsetvt2, jint ldvt2, jintArray idxp, jint offsetidxp, jintArray idx, jint offsetidx, jintArray idxc, jint offsetidxc, jintArray idxq, jint offsetidxq, jintArray coltyp, jint offsetcoltyp, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slasd3_)(int *nl, int *nr, int *sqre, int *k, float *d, float *q, int *ldq, float *dsigma, float *u, int *ldu, float *u22, int *ldu2, float *vt, int *ldvt, float *vt22, int *ldvt2, int * idxc, int * ctot, float *z, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd3K(JNIEnv *env, UNUSED jobject obj, + jint nl, jint nr, jint sqre, jint k, jfloatArray d, jint offsetd, jfloatArray q, jint offsetq, jint ldq, jfloatArray dsigma, jint offsetdsigma, jfloatArray u, jint offsetu, jint ldu, jfloatArray u2, jint offsetu2, jint ldu2, jfloatArray vt, jint offsetvt, jint ldvt, jfloatArray vt2, jint offsetvt2, jint ldvt2, jintArray idxc, jint offsetidxc, jintArray ctot, jint offsetctot, jfloatArray z, jint offsetz, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slasd4_)(int *n, int *i, float *d, float *z, float *delta, float *rho, /*FIXME*/void *sigma, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd4K(JNIEnv *env, UNUSED jobject obj, + jint n, jint i, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloatArray delta, jint offsetdelta, jfloat rho, jobject sigma, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slasd5_)(int *i, float *d, float *z, float *delta, float *rho, /*FIXME*/void *dsigma, float *work); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd5K(JNIEnv *env, UNUSED jobject obj, + jint i, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloatArray delta, jint offsetdelta, jfloat rho, jobject dsigma, jfloatArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slasd6_)(int *icompq, int *nl, int *nr, int *sqre, float *d, float *vf, float *vl, /*FIXME*/void *alpha, /*FIXME*/void *beta, int * idxq, int * perm, /*FIXME*/void *givptr, int * givcol, int *ldgcol, float *givnum, int *ldgnum, float *poles, float *difl, float *difr, float *z, /*FIXME*/void *k, /*FIXME*/void *c, /*FIXME*/void *s, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd6K(JNIEnv *env, UNUSED jobject obj, + jint icompq, jint nl, jint nr, jint sqre, jfloatArray d, jint offsetd, jfloatArray vf, jint offsetvf, jfloatArray vl, jint offsetvl, jobject alpha, jobject beta, jintArray idxq, jint offsetidxq, jintArray perm, jint offsetperm, jobject givptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jfloatArray givnum, jint offsetgivnum, jint ldgnum, jfloatArray poles, jint offsetpoles, jfloatArray difl, jint offsetdifl, jfloatArray difr, jint offsetdifr, jfloatArray z, jint offsetz, jobject k, jobject c, jobject s, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slasd7_)(int *icompq, int *nl, int *nr, int *sqre, /*FIXME*/void *k, float *d, float *z, float *zw, float *vf, float *vfw, float *vl, float *vlw, float *alpha, float *beta, float *dsigma, int * idx, int * idxp, int * idxq, int * perm, /*FIXME*/void *givptr, int * givcol, int *ldgcol, float *givnum, int *ldgnum, /*FIXME*/void *c, /*FIXME*/void *s, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd7K(JNIEnv *env, UNUSED jobject obj, + jint icompq, jint nl, jint nr, jint sqre, jobject k, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloatArray zw, jint offsetzw, jfloatArray vf, jint offsetvf, jfloatArray vfw, jint offsetvfw, jfloatArray vl, jint offsetvl, jfloatArray vlw, jint offsetvlw, jfloat alpha, jfloat beta, jfloatArray dsigma, jint offsetdsigma, jintArray idx, jint offsetidx, jintArray idxp, jint offsetidxp, jintArray idxq, jint offsetidxq, jintArray perm, jint offsetperm, jobject givptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jfloatArray givnum, jint offsetgivnum, jint ldgnum, jobject c, jobject s, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slasd8_)(int *icompq, int *k, float *d, float *z, float *vf, float *vl, float *difl, float *difr, int *lddifr, float *dsigma, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd8K(JNIEnv *env, UNUSED jobject obj, + jint icompq, jint k, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloatArray vf, jint offsetvf, jfloatArray vl, jint offsetvl, jfloatArray difl, jint offsetdifl, jfloatArray difr, jint offsetdifr, jint lddifr, jfloatArray dsigma, jint offsetdsigma, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slasda_)(int *icompq, int *smlsiz, int *n, int *sqre, float *d, float *e, float *u, int *ldu, float *vt, int * k, float *difl, float *difr, float *z, float *poles, int * givptr, int * givcol, int *ldgcol, int * perm, float *givnum, float *c, float *s, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasdaK(JNIEnv *env, UNUSED jobject obj, + jint icompq, jint smlsiz, jint n, jint sqre, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jintArray k, jint offsetk, jfloatArray difl, jint offsetdifl, jfloatArray difr, jint offsetdifr, jfloatArray z, jint offsetz, jfloatArray poles, jint offsetpoles, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jintArray perm, jint offsetperm, jfloatArray givnum, jint offsetgivnum, jfloatArray c, jint offsetc, jfloatArray s, jint offsets, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slasdq_)(const char *uplo, int *sqre, int *n, int *ncvt, int *nru, int *ncc, float *d, float *e, float *vt, int *ldvt, float *u, int *ldu, float *c, int *Ldc, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasdqK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint sqre, jint n, jint ncvt, jint nru, jint ncc, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray vt, jint offsetvt, jint ldvt, jfloatArray u, jint offsetu, jint ldu, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slasdt_)(int *n, /*FIXME*/void *lvl, /*FIXME*/void *nd, int * inode, int * ndiml, int * ndimr, int *msub); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasdtK(JNIEnv *env, UNUSED jobject obj, + jint n, jobject lvl, jobject nd, jintArray inode, jint offsetinode, jintArray ndiml, jint offsetndiml, jintArray ndimr, jint offsetndimr, jint msub) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slaset_)(const char *uplo, int *m, int *n, float *alpha, float *beta, float *a, int *lda); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasetK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint m, jint n, jfloat alpha, jfloat beta, jfloatArray a, jint offseta, jint lda) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slasq1_)(int *n, float *d, float *e, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq1K(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slasq2_)(int *n, float *z, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq2K(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray z, jint offsetz, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slasq3_)(int *i0, /*FIXME*/void *n0, float *z, int *pp, /*FIXME*/void *dmin, /*FIXME*/void *sigma, /*FIXME*/void *desig, /*FIXME*/void *qmax, /*FIXME*/void *nfail, /*FIXME*/void *iter, /*FIXME*/void *ndiv, int *ieee); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq3K(JNIEnv *env, UNUSED jobject obj, + jint i0, jobject n0, jfloatArray z, jint offsetz, jint pp, jobject dmin, jobject sigma, jobject desig, jobject qmax, jobject nfail, jobject iter, jobject ndiv, jboolean ieee) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slasq4_)(int *i0, int *n0, float *z, int *pp, int *n0in, float *dmin, float *dmin1, float *dmin2, float *dn, float *dn1, float *dn2, /*FIXME*/void *tau, /*FIXME*/void *ttype); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq4K(JNIEnv *env, UNUSED jobject obj, + jint i0, jint n0, jfloatArray z, jint offsetz, jint pp, jint n0in, jfloat dmin, jfloat dmin1, jfloat dmin2, jfloat dn, jfloat dn1, jfloat dn2, jobject tau, jobject ttype) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slasq5_)(int *i0, int *n0, float *z, int *pp, float *tau, /*FIXME*/void *dmin, /*FIXME*/void *dmin1, /*FIXME*/void *dmin2, /*FIXME*/void *dn, /*FIXME*/void *dnm1, /*FIXME*/void *dnm2, int *ieee); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq5K(JNIEnv *env, UNUSED jobject obj, + jint i0, jint n0, jfloatArray z, jint offsetz, jint pp, jfloat tau, jobject dmin, jobject dmin1, jobject dmin2, jobject dn, jobject dnm1, jobject dnm2, jboolean ieee) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slasq6_)(int *i0, int *n0, float *z, int *pp, /*FIXME*/void *dmin, /*FIXME*/void *dmin1, /*FIXME*/void *dmin2, /*FIXME*/void *dn, /*FIXME*/void *dnm1, /*FIXME*/void *dnm2); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq6K(JNIEnv *env, UNUSED jobject obj, + jint i0, jint n0, jfloatArray z, jint offsetz, jint pp, jobject dmin, jobject dmin1, jobject dmin2, jobject dn, jobject dnm1, jobject dnm2) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slasr_)(char *side, char *pivot, char *direct, int *m, int *n, float *c, float *s, float *a, int *lda); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasrK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring pivot, jstring direct, jint m, jint n, jfloatArray c, jint offsetc, jfloatArray s, jint offsets, jfloatArray a, jint offseta, jint lda) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slasrt_)(char *id, int *n, float *d, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasrtK(JNIEnv *env, UNUSED jobject obj, + jstring id, jint n, jfloatArray d, jint offsetd, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slassq_)(int *n, float *x, int *incx, /*FIXME*/void *scale, /*FIXME*/void *sumsq); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slassqK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray x, jint offsetx, jint incx, jobject scale, jobject sumsq) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slasv2_)(float *f, float *g, float *h, /*FIXME*/void *ssmin, /*FIXME*/void *ssmax, /*FIXME*/void *snr, /*FIXME*/void *csr, /*FIXME*/void *snl, /*FIXME*/void *csl); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasv2K(JNIEnv *env, UNUSED jobject obj, + jfloat f, jfloat g, jfloat h, jobject ssmin, jobject ssmax, jobject snr, jobject csr, jobject snl, jobject csl) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slaswp_)(int *n, float *a, int *lda, int *k1, int *k2, int * ipiv, int *incx); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaswpK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray a, jint offseta, jint lda, jint k1, jint k2, jintArray ipiv, jint offsetipiv, jint incx) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slasy2_)(int *ltranl, int *ltranr, int *isgn, int *n1, int *n2, float *tl, int *ldtl, float *tr, int *ldtr, float *b, int *ldb, /*FIXME*/void *scale, float *x, int *ldx, /*FIXME*/void *xnorm, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasy2K(JNIEnv *env, UNUSED jobject obj, + jboolean ltranl, jboolean ltranr, jint isgn, jint n1, jint n2, jfloatArray tl, jint offsettl, jint ldtl, jfloatArray tr, jint offsettr, jint ldtr, jfloatArray b, jint offsetb, jint ldb, jobject scale, jfloatArray x, jint offsetx, jint ldx, jobject xnorm, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slasyf_)(const char *uplo, int *n, int *nb, /*FIXME*/void *kb, float *a, int *lda, int * ipiv, float *w, int *ldw, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasyfK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint nb, jobject kb, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray w, jint offsetw, jint ldw, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slatbs_)(const char *uplo, char *trans, char *diag, char *normin, int *n, int *kd, float *ab, int *ldab, float *x, /*FIXME*/void *scale, float *cnorm, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatbsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jstring trans, jstring diag, jstring normin, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloatArray x, jint offsetx, jobject scale, jfloatArray cnorm, jint offsetcnorm, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slatdf_)(int *ijob, int *n, float *z, int *ldz, float *rhs, /*FIXME*/void *rdsum, /*FIXME*/void *rdscal, int * ipiv, int * jpiv); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatdfK(JNIEnv *env, UNUSED jobject obj, + jint ijob, jint n, jfloatArray z, jint offsetz, jint ldz, jfloatArray rhs, jint offsetrhs, jobject rdsum, jobject rdscal, jintArray ipiv, jint offsetipiv, jintArray jpiv, jint offsetjpiv) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slatps_)(const char *uplo, char *trans, char *diag, char *normin, int *n, float *ap, float *x, /*FIXME*/void *scale, float *cnorm, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatpsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jstring trans, jstring diag, jstring normin, jint n, jfloatArray ap, jint offsetap, jfloatArray x, jint offsetx, jobject scale, jfloatArray cnorm, jint offsetcnorm, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slatrd_)(const char *uplo, int *n, int *nb, float *a, int *lda, float *e, float *tau, float *w, int *ldw); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatrdK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint nb, jfloatArray a, jint offseta, jint lda, jfloatArray e, jint offsete, jfloatArray tau, jint offsettau, jfloatArray w, jint offsetw, jint ldw) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slatrs_)(const char *uplo, char *trans, char *diag, char *normin, int *n, float *a, int *lda, float *x, /*FIXME*/void *scale, float *cnorm, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatrsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jstring trans, jstring diag, jstring normin, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jobject scale, jfloatArray cnorm, jint offsetcnorm, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slatrz_)(int *m, int *n, int *l, float *a, int *lda, float *tau, float *work); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatrzK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint l, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slatzm_)(char *side, int *m, int *n, float *v, int *incv, float *tau, float *c11, float *c22, int *Ldc, float *work); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatzmK(JNIEnv *env, UNUSED jobject obj, + jstring side, jint m, jint n, jfloatArray v, jint offsetv, jint incv, jfloat tau, jfloatArray c1, jint offsetc1, jfloatArray c2, jint offsetc2, jint Ldc, jfloatArray work, jint offsetwork) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slauu2_)(const char *uplo, int *n, float *a, int *lda, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slauu2K(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*slauum_)(const char *uplo, int *n, float *a, int *lda, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slauumK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +// static void (*slazq3_)(int *i0, /*FIXME*/void *n0, float *z, int *pp, /*FIXME*/void *dmin, /*FIXME*/void *sigma, /*FIXME*/void *desig, /*FIXME*/void *qmax, /*FIXME*/void *nfail, /*FIXME*/void *iter, /*FIXME*/void *ndiv, int *ieee, /*FIXME*/void *ttype, /*FIXME*/void *dmin1, /*FIXME*/void *dmin2, /*FIXME*/void *dn, /*FIXME*/void *dn1, /*FIXME*/void *dn2, /*FIXME*/void *tau); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slazq3K(JNIEnv *env, UNUSED jobject obj, + jint i0, jobject n0, jfloatArray z, jint offsetz, jint pp, jobject dmin, jobject sigma, jobject desig, jobject qmax, jobject nfail, jobject iter, jobject ndiv, jboolean ieee, jobject ttype, jobject dmin1, jobject dmin2, jobject dn, jobject dn1, jobject dn2, jobject tau) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +// static void (*slazq4_)(int *i0, int *n0, float *z, int *pp, int *n0in, float *dmin, float *dmin1, float *dmin2, float *dn, float *dn1, float *dn2, /*FIXME*/void *tau, /*FIXME*/void *ttype, /*FIXME*/void *g); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slazq4K(JNIEnv *env, UNUSED jobject obj, + jint i0, jint n0, jfloatArray z, jint offsetz, jint pp, jint n0in, jfloat dmin, jfloat dmin1, jfloat dmin2, jfloat dn, jfloat dn1, jfloat dn2, jobject tau, jobject ttype, jobject g) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sopgtr_)(const char *uplo, int *n, float *ap, float *tau, float *q, int *ldq, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sopgtrK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray tau, jint offsettau, jfloatArray q, jint offsetq, jint ldq, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sopmtr_)(char *side, const char *uplo, char *trans, int *m, int *n, float *ap, float *tau, float *c, int *Ldc, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sopmtrK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring uplo, jstring trans, jint m, jint n, jfloatArray ap, jint offsetap, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sorg2l_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorg2lK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sorg2r_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorg2rK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sorgbr_)(char *vect, int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgbrK(JNIEnv *env, UNUSED jobject obj, + jstring vect, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sorghr_)(int *n, int *ilo, int *ihi, float *a, int *lda, float *tau, float *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorghrK(JNIEnv *env, UNUSED jobject obj, + jint n, jint ilo, jint ihi, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sorgl2_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgl2K(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sorglq_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorglqK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sorgql_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgqlK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sorgqr_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgqrK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sorgr2_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgr2K(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sorgrq_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgrqK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sorgtr_)(const char *uplo, int *n, float *a, int *lda, float *tau, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgtrK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sorm2l_)(char *side, char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorm2lK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sorm2r_)(char *side, char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorm2rK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sormbr_)(char *vect, char *side, char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormbrK(JNIEnv *env, UNUSED jobject obj, + jstring vect, jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sormhr_)(char *side, char *trans, int *m, int *n, int *ilo, int *ihi, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormhrK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring trans, jint m, jint n, jint ilo, jint ihi, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sorml2_)(char *side, char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorml2K(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sormlq_)(char *side, char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormlqK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sormql_)(char *side, char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormqlK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sormqr_)(char *side, char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormqrK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sormr2_)(char *side, char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormr2K(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sormr3_)(char *side, char *trans, int *m, int *n, int *k, int *l, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormr3K(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring trans, jint m, jint n, jint k, jint l, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sormrq_)(char *side, char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormrqK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sormrz_)(char *side, char *trans, int *m, int *n, int *k, int *l, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormrzK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring trans, jint m, jint n, jint k, jint l, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sormtr_)(char *side, const char *uplo, char *trans, int *m, int *n, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormtrK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring uplo, jstring trans, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*spbcon_)(const char *uplo, int *n, int *kd, float *ab, int *ldab, float *anorm, /*FIXME*/void *rcond, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbconK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*spbequ_)(const char *uplo, int *n, int *kd, float *ab, int *ldab, float *s, /*FIXME*/void *scond, /*FIXME*/void *amax, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbequK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloatArray s, jint offsets, jobject scond, jobject amax, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*spbrfs_)(const char *uplo, int *n, int *kd, int *nrhs, float *ab, int *ldab, float *afb, int *ldafb, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int * iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbrfsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint kd, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray afb, jint offsetafb, jint ldafb, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*spbstf_)(const char *uplo, int *n, int *kd, float *ab, int *ldab, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbstfK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*spbsv_)(const char *uplo, int *n, int *kd, int *nrhs, float *ab, int *ldab, float *b, int *ldb, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbsvK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint kd, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*spbsvx_)(char *fact, const char *uplo, int *n, int *kd, int *nrhs, float *ab, int *ldab, float *afb, int *ldafb, jstring *equed, float *s, float *b, int *ldb, float *x, int *ldx, /*FIXME*/void *rcond, float *ferr, float *berr, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbsvxK(JNIEnv *env, UNUSED jobject obj, + jstring fact, jstring uplo, jint n, jint kd, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray afb, jint offsetafb, jint ldafb, jobject equed, jfloatArray s, jint offsets, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*spbtf2_)(const char *uplo, int *n, int *kd, float *ab, int *ldab, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbtf2K(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*spbtrf_)(const char *uplo, int *n, int *kd, float *ab, int *ldab, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbtrfK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*spbtrs_)(const char *uplo, int *n, int *kd, int *nrhs, float *ab, int *ldab, float *b, int *ldb, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbtrsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint kd, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*spocon_)(const char *uplo, int *n, float *a, int *lda, float *anorm, /*FIXME*/void *rcond, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spoconK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*spoequ_)(int *n, float *a, int *lda, float *s, /*FIXME*/void *scond, /*FIXME*/void *amax, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spoequK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray a, jint offseta, jint lda, jfloatArray s, jint offsets, jobject scond, jobject amax, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sporfs_)(const char *uplo, int *n, int *nrhs, float *a, int *lda, float *af, int *ldaf, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sporfsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray af, jint offsetaf, jint ldaf, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sposv_)(const char *uplo, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sposvK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sposvx_)(char *fact, const char *uplo, int *n, int *nrhs, float *a, int *lda, float *af, int *ldaf, jstring *equed, float *s, float *b, int *ldb, float *x, int *ldx, /*FIXME*/void *rcond, float *ferr, float *berr, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sposvxK(JNIEnv *env, UNUSED jobject obj, + jstring fact, jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray af, jint offsetaf, jint ldaf, jobject equed, jfloatArray s, jint offsets, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*spotf2_)(const char *uplo, int *n, float *a, int *lda, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spotf2K(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*spotrf_)(const char *uplo, int *n, float *a, int *lda, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spotrfK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*spotri_)(const char *uplo, int *n, float *a, int *lda, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spotriK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*spotrs_)(const char *uplo, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spotrsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sppcon_)(const char *uplo, int *n, float *ap, float *anorm, /*FIXME*/void *rcond, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sppconK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sppequ_)(const char *uplo, int *n, float *ap, float *s, /*FIXME*/void *scond, /*FIXME*/void *amax, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sppequK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray s, jint offsets, jobject scond, jobject amax, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*spprfs_)(const char *uplo, int *n, int *nrhs, float *ap, float *afp, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int * iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spprfsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray afp, jint offsetafp, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sppsv_)(const char *uplo, int *n, int *nrhs, float *ap, float *b, int *ldb, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sppsvK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sppsvx_)(char *fact, const char *uplo, int *n, int *nrhs, float *ap, float *afp, jstring *equed, float *s, float *b, int *ldb, float *x, int *ldx, /*FIXME*/void *rcond, float *ferr, float *berr, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sppsvxK(JNIEnv *env, UNUSED jobject obj, + jstring fact, jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray afp, jint offsetafp, jobject equed, jfloatArray s, jint offsets, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*spptrf_)(const char *uplo, int *n, float *ap, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spptrfK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jfloatArray ap, jint offsetap, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*spptri_)(const char *uplo, int *n, float *ap, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spptriK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jfloatArray ap, jint offsetap, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*spptrs_)(const char *uplo, int *n, int *nrhs, float *ap, float *b, int *ldb, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spptrsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sptcon_)(int *n, float *d, float *e, float *anorm, /*FIXME*/void *rcond, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sptconK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*spteqr_)(char *compz, int *n, float *d, float *e, float *z, int *ldz, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spteqrK(JNIEnv *env, UNUSED jobject obj, + jstring compz, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sptrfs_)(int *n, int *nrhs, float *d, float *e, float *df, float *ef, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sptrfsK(JNIEnv *env, UNUSED jobject obj, + jint n, jint nrhs, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray df, jint offsetdf, jfloatArray ef, jint offsetef, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sptsv_)(int *n, int *nrhs, float *d, float *e, float *b, int *ldb, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sptsvK(JNIEnv *env, UNUSED jobject obj, + jint n, jint nrhs, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sptsvx_)(char *fact, int *n, int *nrhs, float *d, float *e, float *df, float *ef, float *b, int *ldb, float *x, int *ldx, /*FIXME*/void *rcond, float *ferr, float *berr, float *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sptsvxK(JNIEnv *env, UNUSED jobject obj, + jstring fact, jint n, jint nrhs, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray df, jint offsetdf, jfloatArray ef, jint offsetef, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*spttrf_)(int *n, float *d, float *e, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spttrfK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*spttrs_)(int *n, int *nrhs, float *d, float *e, float *b, int *ldb, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spttrsK(JNIEnv *env, UNUSED jobject obj, + jint n, jint nrhs, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sptts2_)(int *n, int *nrhs, float *d, float *e, float *b, int *ldb); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sptts2K(JNIEnv *env, UNUSED jobject obj, + jint n, jint nrhs, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray b, jint offsetb, jint ldb) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*srscl_)(int *n, float *sa, float *sx, int *incx); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_srsclK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloat sa, jfloatArray sx, jint offsetsx, jint incx) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssbev_)(char *jobz, const char *uplo, int *n, int *kd, float *ab, int *ldab, float *w, float *z, int *ldz, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbevK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssbevd_)(char *jobz, const char *uplo, int *n, int *kd, float *ab, int *ldab, float *w, float *z, int *ldz, float *work, int *lwork, int *iwork, int *liwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbevdK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssbevx_)(char *jobz, char *range, const char *uplo, int *n, int *kd, float *ab, int *ldab, float *q, int *ldq, float *vl, float *vu, int *il, int *iu, float *abstol, /*FIXME*/void *m, float *w, float *z, int *ldz, float *work, int *iwork, int *ifail, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbevxK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring range, jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloatArray q, jint offsetq, jint ldq, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssbgst_)(char *vect, const char *uplo, int *n, int *ka, int *kb, float *ab, int *ldab, float *bb, int *ldbb, float *x, int *ldx, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbgstK(JNIEnv *env, UNUSED jobject obj, + jstring vect, jstring uplo, jint n, jint ka, jint kb, jfloatArray ab, jint offsetab, jint ldab, jfloatArray bb, jint offsetbb, jint ldbb, jfloatArray x, jint offsetx, jint ldx, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssbgv_)(char *jobz, const char *uplo, int *n, int *ka, int *kb, float *ab, int *ldab, float *bb, int *ldbb, float *w, float *z, int *ldz, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbgvK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring uplo, jint n, jint ka, jint kb, jfloatArray ab, jint offsetab, jint ldab, jfloatArray bb, jint offsetbb, jint ldbb, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssbgvd_)(char *jobz, const char *uplo, int *n, int *ka, int *kb, float *ab, int *ldab, float *bb, int *ldbb, float *w, float *z, int *ldz, float *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbgvdK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring uplo, jint n, jint ka, jint kb, jfloatArray ab, jint offsetab, jint ldab, jfloatArray bb, jint offsetbb, jint ldbb, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssbgvx_)(char *jobz, char *range, const char *uplo, int *n, int *ka, int *kb, float *ab, int *ldab, float *bb, int *ldbb, float *q, int *ldq, float *vl, float *vu, int *il, int *iu, float *abstol, /*FIXME*/void *m, float *w, float *z, int *ldz, float *work, int * iwork, int * ifail, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbgvxK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring range, jstring uplo, jint n, jint ka, jint kb, jfloatArray ab, jint offsetab, jint ldab, jfloatArray bb, jint offsetbb, jint ldbb, jfloatArray q, jint offsetq, jint ldq, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssbtrd_)(char *vect, const char *uplo, int *n, int *kd, float *ab, int *ldab, float *d, float *e, float *q, int *ldq, float *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbtrdK(JNIEnv *env, UNUSED jobject obj, + jstring vect, jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray q, jint offsetq, jint ldq, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sspcon_)(const char *uplo, int *n, float *ap, int * ipiv, float *anorm, /*FIXME*/void *rcond, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspconK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jfloatArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sspev_)(char *jobz, const char *uplo, int *n, float *ap, float *w, float *z, int *ldz, float *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspevK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sspevd_)(char *jobz, const char *uplo, int *n, float *ap, float *w, float *z, int *ldz, float *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspevdK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sspevx_)(char *jobz, char *range, const char *uplo, int *n, float *ap, float *vl, float *vu, int *il, int *iu, float *abstol, /*FIXME*/void *m, float *w, float *z, int *ldz, float *work, int * iwork, int * ifail, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspevxK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring range, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sspgst_)(int *itype, const char *uplo, int *n, float *ap, float *bp, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspgstK(JNIEnv *env, UNUSED jobject obj, + jint itype, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray bp, jint offsetbp, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sspgv_)(int *itype, char *jobz, const char *uplo, int *n, float *ap, float *bp, float *w, float *z, int *ldz, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspgvK(JNIEnv *env, UNUSED jobject obj, + jint itype, jstring jobz, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray bp, jint offsetbp, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sspgvd_)(int *itype, char *jobz, const char *uplo, int *n, float *ap, float *bp, float *w, float *z, int *ldz, float *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspgvdK(JNIEnv *env, UNUSED jobject obj, + jint itype, jstring jobz, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray bp, jint offsetbp, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sspgvx_)(int *itype, char *jobz, char *range, const char *uplo, int *n, float *ap, float *bp, float *vl, float *vu, int *il, int *iu, float *abstol, /*FIXME*/void *m, float *w, float *z, int *ldz, float *work, int * iwork, int * ifail, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspgvxK(JNIEnv *env, UNUSED jobject obj, + jint itype, jstring jobz, jstring range, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray bp, jint offsetbp, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssprfs_)(const char *uplo, int *n, int *nrhs, float *ap, float *afp, int * ipiv, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssprfsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray afp, jint offsetafp, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sspsv_)(const char *uplo, int *n, int *nrhs, float *ap, int * ipiv, float *b, int *ldb, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspsvK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sspsvx_)(char *fact, const char *uplo, int *n, int *nrhs, float *ap, float *afp, int * ipiv, float *b, int *ldb, float *x, int *ldx, /*FIXME*/void *rcond, float *ferr, float *berr, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspsvxK(JNIEnv *env, UNUSED jobject obj, + jstring fact, jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray afp, jint offsetafp, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssptrd_)(const char *uplo, int *n, float *ap, float *d, float *e, float *tau, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssptrdK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray tau, jint offsettau, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssptrf_)(const char *uplo, int *n, float *ap, int *ipiv, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssptrfK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jfloatArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssptri_)(const char *uplo, int *n, float *ap, int * ipiv, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssptriK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jfloatArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssptrs_)(const char *uplo, int *n, int *nrhs, float *ap, int * ipiv, float *b, int *ldb, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssptrsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sstebz_)(char *range, char *order, int *n, float *vl, float *vu, int *il, int *iu, float *abstol, float *d, float *e, /*FIXME*/void *m, /*FIXME*/void *nsplit, float *w, int * iblock, int *isplit, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstebzK(JNIEnv *env, UNUSED jobject obj, + jstring range, jstring order, jint n, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jobject m, jobject nsplit, jfloatArray w, jint offsetw, jintArray iblock, jint offsetiblock, jintArray isplit, jint offsetisplit, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sstedc_)(char *compz, int *n, float *d, float *e, float *z, int *ldz, float *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstedcK(JNIEnv *env, UNUSED jobject obj, + jstring compz, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sstegr_)(char *jobz, char *range, int *n, float *d, float *e, float *vl, float *vu, int *il, int *iu, float *abstol, /*FIXME*/void *m, float *w, float *z, int *ldz, int * isuppz, float *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstegrK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring range, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sstein_)(int *n, float *d, float *e, int *m, float *w, int * iblock, int * isplit, float *z, int *ldz, float *work, int * iwork, int * ifail, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssteinK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jint m, jfloatArray w, jint offsetw, jintArray iblock, jint offsetiblock, jintArray isplit, jint offsetisplit, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sstemr_)(char *jobz, char *range, int *n, float *d, float *e, float *vl, float *vu, int *il, int *iu, /*FIXME*/void *m, float *w, float *z, int *ldz, int *nzc, int * isuppz, /*FIXME*/void *tryrac, float *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstemrK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring range, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloat vl, jfloat vu, jint il, jint iu, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jint nzc, jintArray isuppz, jint offsetisuppz, jobject tryrac, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssteqr_)(char *compz, int *n, float *d, float *e, float *z, int *ldz, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssteqrK(JNIEnv *env, UNUSED jobject obj, + jstring compz, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssterf_)(int *n, float *d, float *e, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssterfK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sstev_)(char *jobz, int *n, float *d, float *e, float *z, int *ldz, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstevK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sstevd_)(char *jobz, int *n, float *d, float *e, float *z, int *ldz, float *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstevdK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sstevr_)(char *jobz, char *range, int *n, float *d, float *e, float *vl, float *vu, int *il, int *iu, float *abstol, /*FIXME*/void *m, float *w, float *z, int *ldz, int * isuppz, float *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstevrK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring range, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sstevx_)(char *jobz, char *range, int *n, float *d, float *e, float *vl, float *vu, int *il, int *iu, float *abstol, /*FIXME*/void *m, float *w, float *z, int *ldz, float *work, int * iwork, int * ifail, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstevxK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring range, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssycon_)(const char *uplo, int *n, float *a, int *lda, int * ipiv, float *anorm, /*FIXME*/void *rcond, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyconK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssyev_)(char *jobz, const char *uplo, int *n, float *a, int *lda, float *w, float *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyevK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray w, jint offsetw, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssyevd_)(char *jobz, const char *uplo, int *n, float *a, int *lda, float *w, float *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyevdK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray w, jint offsetw, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssyevr_)(char *jobz, char *range, const char *uplo, int *n, float *a, int *lda, float *vl, float *vu, int *il, int *iu, float *abstol, /*FIXME*/void *m, float *w, float *z, int *ldz, int * isuppz, float *work, int *lwork, int *iwork, int *liwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyevrK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring range, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssyevx_)(char *jobz, char *range, const char *uplo, int *n, float *a, int *lda, float *vl, float *vu, int *il, int *iu, float *abstol, int *m, float *w, float *z, int *ldz, float *work, int *lwork, int * iwork, int *ifail, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyevxK(JNIEnv *env, UNUSED jobject obj, + jstring jobz, jstring range, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssygs2_)(int *itype, const char *uplo, int *n, float *a, int *lda, float *b, int *ldb, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssygs2K(JNIEnv *env, UNUSED jobject obj, + jint itype, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssygst_)(int *itype, const char *uplo, int *n, float *a, int *lda, float *b, int *ldb, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssygstK(JNIEnv *env, UNUSED jobject obj, + jint itype, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssygv_)(int *itype, char *jobz, const char *uplo, int *n, float *a, int *lda, float *b, int *ldb, float *w, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssygvK(JNIEnv *env, UNUSED jobject obj, + jint itype, jstring jobz, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray w, jint offsetw, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssygvd_)(int *itype, char *jobz, const char *uplo, int *n, float *a, int *lda, float *b, int *ldb, float *w, float *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssygvdK(JNIEnv *env, UNUSED jobject obj, + jint itype, jstring jobz, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray w, jint offsetw, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssygvx_)(int *itype, char *jobz, char *range, const char *uplo, int *n, float *a, int *lda, float *b, int *ldb, float *vl, float *vu, int *il, int *iu, float *abstol, /*FIXME*/void *m, float *w, float *z, int *ldz, float *work, int *lwork, int * iwork, int * ifail, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssygvxK(JNIEnv *env, UNUSED jobject obj, + jint itype, jstring jobz, jstring range, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssyrfs_)(const char *uplo, int *n, int *nrhs, float *a, int *lda, float *af, int *ldaf, int * ipiv, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyrfsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssysv_)(const char *uplo, int *n, int *nrhs, float *a, int *lda, int *ipiv, float *b, int *ldb, float *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssysvK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssysvx_)(char *fact, const char *uplo, int *n, int *nrhs, float *a, int *lda, float *af, int *ldaf, int * ipiv, float *b, int *ldb, float *x, int *ldx, /*FIXME*/void *rcond, float *ferr, float *berr, float *work, int *lwork, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssysvxK(JNIEnv *env, UNUSED jobject obj, + jstring fact, jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssytd2_)(const char *uplo, int *n, float *a, int *lda, float *d, float *e, float *tau, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytd2K(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray tau, jint offsettau, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssytf2_)(const char *uplo, int *n, float *a, int *lda, int * ipiv, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytf2K(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssytrd_)(const char *uplo, int *n, float *a, int *lda, float *d, float *e, float *tau, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytrdK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssytrf_)(const char *uplo, int *n, float *a, int *lda, int * ipiv, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytrfK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssytri_)(const char *uplo, int *n, float *a, int *lda, int * ipiv, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytriK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssytrs_)(const char *uplo, int *n, int *nrhs, float *a, int *lda, int * ipiv, float *b, int *ldb, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytrsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*stbcon_)(char *norm, const char *uplo, char *diag, int *n, int *kd, float *ab, int *ldab, /*FIXME*/void *rcond, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stbconK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jstring uplo, jstring diag, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*stbrfs_)(const char *uplo, char *trans, char *diag, int *n, int *kd, int *nrhs, float *ab, int *ldab, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stbrfsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jstring trans, jstring diag, jint n, jint kd, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*stbtrs_)(const char *uplo, char *trans, char *diag, int *n, int *kd, int *nrhs, float *ab, int *ldab, float *b, int *ldb, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stbtrsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jstring trans, jstring diag, jint n, jint kd, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*stgevc_)(char *side, char *howmny, int *select, int *n, float *s, int *lds, float *p, int *ldp, float *vl, int *ldvl, float *vr, int *ldvr, int *mm, /*FIXME*/void *m, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgevcK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jfloatArray s, jint offsets, jint lds, jfloatArray p, jint offsetp, jint ldp, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jint mm, jobject m, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*stgex2_)(int *wantq, int *wantz, int *n, float *a, int *lda, float *b, int *ldb, float *q, int *ldq, float *z, int *ldz, int *j1, int *n1, int *n2, float *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgex2K(JNIEnv *env, UNUSED jobject obj, + jboolean wantq, jboolean wantz, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray q, jint offsetq, jint ldq, jfloatArray z, jint offsetz, jint ldz, jint j1, jint n1, jint n2, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*stgexc_)(int *wantq, int *wantz, int *n, float *a, int *lda, float *b, int *ldb, float *q, int *ldq, float *z, int *ldz, /*FIXME*/void *ifst, /*FIXME*/void *ilst, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgexcK(JNIEnv *env, UNUSED jobject obj, + jboolean wantq, jboolean wantz, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray q, jint offsetq, jint ldq, jfloatArray z, jint offsetz, jint ldz, jobject ifst, jobject ilst, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*stgsen_)(int *ijob, int *wantq, int *wantz, int *select, int *n, float *a, int *lda, float *b, int *ldb, float *alphar, float *alphai, float *beta, float *q, int *ldq, float *z, int *ldz, /*FIXME*/void *m, /*FIXME*/void *pl, /*FIXME*/void *pr, float *dif, float *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgsenK(JNIEnv *env, UNUSED jobject obj, + jint ijob, jboolean wantq, jboolean wantz, jbooleanArray select, jint offsetselect, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray q, jint offsetq, jint ldq, jfloatArray z, jint offsetz, jint ldz, jobject m, jobject pl, jobject pr, jfloatArray dif, jint offsetdif, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*stgsja_)(char *jobu, char *jobv, char *jobq, int *m, int *p, int *n, int *k, int *l, float *a, int *lda, float *b, int *ldb, float *tola, float *tolb, float *alpha, float *beta, float *u, int *ldu, float *v, int *ldv, float *q, int *ldq, float *work, /*FIXME*/void *ncycle, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgsjaK(JNIEnv *env, UNUSED jobject obj, + jstring jobu, jstring jobv, jstring jobq, jint m, jint p, jint n, jint k, jint l, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat tola, jfloat tolb, jfloatArray alpha, jint offsetalpha, jfloatArray beta, jint offsetbeta, jfloatArray u, jint offsetu, jint ldu, jfloatArray v, jint offsetv, jint ldv, jfloatArray q, jint offsetq, jint ldq, jfloatArray work, jint offsetwork, jobject ncycle, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*stgsna_)(char *job, char *howmny, int *select, int *n, float *a, int *lda, float *b, int *ldb, float *vl, int *ldvl, float *vr, int *ldvr, float *s, float *dif, int *mm, /*FIXME*/void *m, float *work, int *lwork, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgsnaK(JNIEnv *env, UNUSED jobject obj, + jstring job, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jfloatArray s, jint offsets, jfloatArray dif, jint offsetdif, jint mm, jobject m, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*stgsy2_)(char *trans, int *ijob, int *m, int *n, float *a, int *lda, float *b, int *ldb, float *c, int *Ldc, float *d, int *ldd, float *e, int *lde, float *f, int *ldf, /*FIXME*/void *scale, /*FIXME*/void *rdsum, /*FIXME*/void *rdscal, int *iwork, int *pq, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgsy2K(JNIEnv *env, UNUSED jobject obj, + jstring trans, jint ijob, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray c, jint offsetc, jint Ldc, jfloatArray d, jint offsetd, jint ldd, jfloatArray e, jint offsete, jint lde, jfloatArray f, jint offsetf, jint ldf, jobject scale, jobject rdsum, jobject rdscal, jintArray iwork, jint offsetiwork, jobject pq, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*stgsyl_)(char *trans, int *ijob, int *m, int *n, float *a, int *lda, float *b, int *ldb, float *c, int *Ldc, float *d, int *ldd, float *e, int *lde, float *f, int *ldf, /*FIXME*/void *scale, /*FIXME*/void *dif, float *work, int *lwork, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgsylK(JNIEnv *env, UNUSED jobject obj, + jstring trans, jint ijob, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray c, jint offsetc, jint Ldc, jfloatArray d, jint offsetd, jint ldd, jfloatArray e, jint offsete, jint lde, jfloatArray f, jint offsetf, jint ldf, jobject scale, jobject dif, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*stpcon_)(char *norm, const char *uplo, char *diag, int *n, float *ap, /*FIXME*/void *rcond, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stpconK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jstring uplo, jstring diag, jint n, jfloatArray ap, jint offsetap, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*stprfs_)(const char *uplo, char *trans, char *diag, int *n, int *nrhs, float *ap, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int * iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stprfsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*stptri_)(const char *uplo, char *diag, int *n, float *ap, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stptriK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jstring diag, jint n, jfloatArray ap, jint offsetap, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*stptrs_)(const char *uplo, char *trans, char *diag, int *n, int *nrhs, float *ap, float *b, int *ldb, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stptrsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*strcon_)(char *norm, const char *uplo, char *diag, int *n, float *a, int *lda, /*FIXME*/void *rcond, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_strconK(JNIEnv *env, UNUSED jobject obj, + jstring norm, jstring uplo, jstring diag, jint n, jfloatArray a, jint offseta, jint lda, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*strevc_)(char *side, char *howmny, int *select, int *n, float *t, int *ldt, float *vl, int *ldvl, float *vr, int *ldvr, int *mm, /*FIXME*/void *m, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_strevcK(JNIEnv *env, UNUSED jobject obj, + jstring side, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jfloatArray t, jint offsett, jint ldt, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jint mm, jobject m, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*strexc_)(char *compq, int *n, float *t, int *ldt, float *q, int *ldq, /*FIXME*/void *ifst, /*FIXME*/void *ilst, float *work, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_strexcK(JNIEnv *env, UNUSED jobject obj, + jstring compq, jint n, jfloatArray t, jint offsett, jint ldt, jfloatArray q, jint offsetq, jint ldq, jobject ifst, jobject ilst, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*strrfs_)(const char *uplo, char *trans, char *diag, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_strrfsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*strsen_)(char *job, char *compq, int *select, int *n, float *t, int *ldt, float *q, int *ldq, float *wr, float *wi, /*FIXME*/void *m, /*FIXME*/void *s, /*FIXME*/void *sep, float *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_strsenK(JNIEnv *env, UNUSED jobject obj, + jstring job, jstring compq, jbooleanArray select, jint offsetselect, jint n, jfloatArray t, jint offsett, jint ldt, jfloatArray q, jint offsetq, jint ldq, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jobject m, jobject s, jobject sep, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*strsna_)(char *job, char *howmny, int *select, int *n, float *t, int *ldt, float *vl, int *ldvl, float *vr, int *ldvr, float *s, float *sep, int *mm, /*FIXME*/void *m, float *work, int *ldwork, int * iwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_strsnaK(JNIEnv *env, UNUSED jobject obj, + jstring job, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jfloatArray t, jint offsett, jint ldt, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jfloatArray s, jint offsets, jfloatArray sep, jint offsetsep, jint mm, jobject m, jfloatArray work, jint offsetwork, jint ldwork, jintArray iwork, jint offsetiwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*strsyl_)(char *trana, char *tranb, int *isgn, int *m, int *n, float *a, int *lda, float *b, int *ldb, float *c, int *Ldc, /*FIXME*/void *scale, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_strsylK(JNIEnv *env, UNUSED jobject obj, + jstring trana, jstring tranb, jint isgn, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray c, jint offsetc, jint Ldc, jobject scale, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*strti2_)(const char *uplo, char *diag, int *n, float *a, int *lda, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_strti2K(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jstring diag, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*strtri_)(const char *uplo, char *diag, int *n, float *a, int *lda, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_strtriK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jstring diag, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*strtrs_)(const char *uplo, char *trans, char *diag, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_strtrsK(JNIEnv *env, UNUSED jobject obj, + jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*stzrqf_)(int *m, int *n, float *a, int *lda, float *tau, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stzrqfK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*stzrzf_)(int *m, int *n, float *a, int *lda, float *tau, float *work, int *lwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stzrzfK(JNIEnv *env, UNUSED jobject obj, + jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static double (*dlamch_)(char *cmach); + +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamchK(JNIEnv *env, UNUSED jobject obj, + jstring cmach) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +// static void (*dlamc1_)(/*FIXME*/void *beta, /*FIXME*/void *t, /*FIXME*/void *rnd, /*FIXME*/void *ieee1); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc1K(JNIEnv *env, UNUSED jobject obj, + jobject beta, jobject t, jobject rnd, jobject ieee1) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +// static void (*dlamc2_)(/*FIXME*/void *beta, /*FIXME*/void *t, /*FIXME*/void *rnd, /*FIXME*/void *eps, /*FIXME*/void *emin, /*FIXME*/void *rmin, /*FIXME*/void *emax, /*FIXME*/void *rmax); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc2K(JNIEnv *env, UNUSED jobject obj, + jobject beta, jobject t, jobject rnd, jobject eps, jobject emin, jobject rmin, jobject emax, jobject rmax) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static double (*dlamc3_)(double *a, double *b); + +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc3K(JNIEnv *env, UNUSED jobject obj, + jdouble a, jdouble b) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +// static void (*dlamc4_)(/*FIXME*/void *emin, double *start, int *base); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc4K(JNIEnv *env, UNUSED jobject obj, + jobject emin, jdouble start, jint base) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +// static void (*dlamc5_)(int *beta, int *p, int *emin, int *ieee, /*FIXME*/void *emax, /*FIXME*/void *rmax); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc5K(JNIEnv *env, UNUSED jobject obj, + jint beta, jint p, jint emin, jboolean ieee, jobject emax, jobject rmax) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static double (*dsecnd_)(void); + +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dsecndK(JNIEnv *env, UNUSED jobject obj) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static int *(*lsame_)(char *ca, char *cb); + +jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_lsameK(JNIEnv *env, UNUSED jobject obj, + jstring ca, jstring cb) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static float (*second_)(void); + +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_secondK(JNIEnv *env, UNUSED jobject obj) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + + +static float (*slamch_)(char *cmach); + +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slamchK(JNIEnv *env, UNUSED jobject obj, + jstring cmach) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +// static void (*slamc1_)(/*FIXME*/void *beta, /*FIXME*/void *t, /*FIXME*/void *rnd, /*FIXME*/void *ieee1); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc1K(JNIEnv *env, UNUSED jobject obj, + jobject beta, jobject t, jobject rnd, jobject ieee1) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +// static void (*slamc2_)(/*FIXME*/void *beta, /*FIXME*/void *t, /*FIXME*/void *rnd, /*FIXME*/void *eps, /*FIXME*/void *emin, /*FIXME*/void *rmin, /*FIXME*/void *emax, /*FIXME*/void *rmax); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc2K(JNIEnv *env, UNUSED jobject obj, + jobject beta, jobject t, jobject rnd, jobject eps, jobject emin, jobject rmin, jobject emax, jobject rmax) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static float (*slamc3_)(float *a, float *b); + +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc3K(JNIEnv *env, UNUSED jobject obj, + jfloat a, jfloat b) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +// static void (*slamc4_)(/*FIXME*/void *emin, float *start, int *base); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc4K(JNIEnv *env, UNUSED jobject obj, + jobject emin, jfloat start, jint base) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +// static void (*slamc5_)(int *beta, int *p, int *emin, int *ieee, /*FIXME*/void *emax, /*FIXME*/void *rmax); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc5K(JNIEnv *env, UNUSED jobject obj, + jint beta, jint p, jint emin, jboolean ieee, jobject emax, jobject rmax) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +jboolean get_system_property(JNIEnv *env, jstring key, jstring def, jstring *res) { + jclass System_class = (*env)->FindClass(env, "java/lang/System"); + if (!System_class) { + return FALSE; + } + jmethodID System_getProperty_methodID = (*env)->GetStaticMethodID(env, System_class, "getProperty", "(Ljava/lang/String;Ljava/lang/String;)Ljava/lang/String;"); + if (!System_getProperty_methodID) { + return FALSE; + } + *res = (jstring)(*env)->CallStaticObjectMethod(env, System_class, System_getProperty_methodID, key, def); + return TRUE; } jint JNI_OnLoad(JavaVM *vm, UNUSED void *reserved) { @@ -3776,21 +5155,75 @@ jint JNI_OnLoad(JavaVM *vm, UNUSED void *reserved) { return -1; } - char blas_name[1024]; - jstring native_lib_path = get_system_property(env, (*env)->NewStringUTF(env, "dev.ludovic.netlib.lapack.nativeLibPath"), NULL); - jstring native_lib = get_system_property(env, (*env)->NewStringUTF(env, "dev.ludovic.netlib.lapack.nativeLib"), (*env)->NewStringUTF(env, "lapack")); - if (native_lib_path) { - const char *utf = (*env)->GetStringUTFChars(env, native_lib_path, NULL); - strncpy(blas_name, utf, sizeof(blas_name)); - blas_name[sizeof(blas_name) - 1] = '\0'; - (*env)->ReleaseStringUTFChars(env, native_lib_path, utf); + jclass booleanW_class = (*env)->FindClass(env, "org/netlib/util/booleanW"); + if (!booleanW_class) { + return -1; + } + booleanW_val_fieldID = (*env)->GetFieldID(env, booleanW_class, "val", "Z"); + if (!booleanW_val_fieldID) { + return -1; + } + + jclass intW_class = (*env)->FindClass(env, "org/netlib/util/intW"); + if (!intW_class) { + return -1; + } + intW_val_fieldID = (*env)->GetFieldID(env, intW_class, "val", "I"); + if (!intW_val_fieldID) { + return -1; + } + + jclass floatW_class = (*env)->FindClass(env, "org/netlib/util/floatW"); + if (!floatW_class) { + return -1; + } + floatW_val_fieldID = (*env)->GetFieldID(env, floatW_class, "val", "F"); + if (!floatW_val_fieldID) { + return -1; + } + + jclass doubleW_class = (*env)->FindClass(env, "org/netlib/util/doubleW"); + if (!doubleW_class) { + return -1; + } + doubleW_val_fieldID = (*env)->GetFieldID(env, doubleW_class, "val", "D"); + if (!doubleW_val_fieldID) { + return -1; + } + + jclass StringW_class = (*env)->FindClass(env, "org/netlib/util/StringW"); + if (!StringW_class) { + return -1; + } + StringW_val_fieldID = (*env)->GetFieldID(env, StringW_class, "val", "Ljava/lang/String;"); + if (!StringW_val_fieldID) { + return -1; + } + + jstring property_nativeLibPath; + if (!get_system_property(env, (*env)->NewStringUTF(env, "dev.ludovic.netlib.lapack.nativeLibPath"), NULL, &property_nativeLibPath)) { + return -1; + } + jstring property_nativeLib; + if (!get_system_property(env, (*env)->NewStringUTF(env, "dev.ludovic.netlib.lapack.nativeLib"), (*env)->NewStringUTF(env, "lapack"), &property_nativeLib)) { + return -1; + } + + char lapack_name[1024]; + if (property_nativeLibPath) { + const char *utf = (*env)->GetStringUTFChars(env, property_nativeLibPath, NULL); + snprintf(lapack_name, sizeof(lapack_name), "%s", utf); + (*env)->ReleaseStringUTFChars(env, property_nativeLibPath, utf); + } else if (property_nativeLib) { + const char *utf = (*env)->GetStringUTFChars(env, property_nativeLib, NULL); + snprintf(lapack_name, sizeof(lapack_name), "lib%s.so", utf); + (*env)->ReleaseStringUTFChars(env, property_nativeLib, utf); } else { - const char *utf = (*env)->GetStringUTFChars(env, native_lib, NULL); - snprintf(blas_name, sizeof(blas_name), "lib%s.so", utf); - (*env)->ReleaseStringUTFChars(env, native_lib, utf); + /* either property_nativeLibPath or property_nativeLib should always be non-NULL */ + return -1; } - lapack = dlopen(blas_name, RTLD_LAZY); + lapack = dlopen(lapack_name, RTLD_LAZY); if (!lapack) { return -1; } @@ -4008,10 +5441,10 @@ jint JNI_OnLoad(JavaVM *vm, UNUSED void *reserved) { LOAD_SYMBOL(dlatrs_) LOAD_SYMBOL(dlauu2_) LOAD_SYMBOL(dlatzm_) - LOAD_SYMBOL(dlazq3_) + // LOAD_SYMBOL(dlazq3_) LOAD_SYMBOL(dlauum_) LOAD_SYMBOL(dopgtr_) - LOAD_SYMBOL(dlazq4_) + // LOAD_SYMBOL(dlazq4_) LOAD_SYMBOL(dorg2l_) LOAD_SYMBOL(dopmtr_) LOAD_SYMBOL(dorgbr_) @@ -4366,8 +5799,8 @@ jint JNI_OnLoad(JavaVM *vm, UNUSED void *reserved) { LOAD_SYMBOL(slatzm_) LOAD_SYMBOL(slauu2_) LOAD_SYMBOL(slauum_) - LOAD_SYMBOL(slazq3_) - LOAD_SYMBOL(slazq4_) + // LOAD_SYMBOL(slazq3_) + // LOAD_SYMBOL(slazq4_) LOAD_SYMBOL(sopgtr_) LOAD_SYMBOL(sopmtr_) LOAD_SYMBOL(sorg2l_) @@ -4510,20 +5943,20 @@ jint JNI_OnLoad(JavaVM *vm, UNUSED void *reserved) { LOAD_SYMBOL(stzrqf_) LOAD_SYMBOL(stzrzf_) LOAD_SYMBOL(dlamch_) - LOAD_SYMBOL(dlamc1_) - LOAD_SYMBOL(dlamc2_) + // LOAD_SYMBOL(dlamc1_) + // LOAD_SYMBOL(dlamc2_) LOAD_SYMBOL(dlamc3_) - LOAD_SYMBOL(dlamc4_) - LOAD_SYMBOL(dlamc5_) + // LOAD_SYMBOL(dlamc4_) + // LOAD_SYMBOL(dlamc5_) LOAD_SYMBOL(dsecnd_) LOAD_SYMBOL(lsame_) LOAD_SYMBOL(second_) LOAD_SYMBOL(slamch_) - LOAD_SYMBOL(slamc1_) - LOAD_SYMBOL(slamc2_) + // LOAD_SYMBOL(slamc1_) + // LOAD_SYMBOL(slamc2_) LOAD_SYMBOL(slamc3_) - LOAD_SYMBOL(slamc4_) - LOAD_SYMBOL(slamc5_) + // LOAD_SYMBOL(slamc4_) + // LOAD_SYMBOL(slamc5_) #undef LOAD_SYMBOL diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DppsvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DppsvTest.java new file mode 100644 index 00000000..ec89f70e --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DppsvTest.java @@ -0,0 +1,45 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DppsvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + double[] dgeAUexpected, dgeAUobtained, dgeBexpected, dgeBobtained; + org.netlib.util.intW infoexpected, infoobtained; + + f2j.dppsv("U", N, M, dgeAUexpected = dgeAU.clone(), dgeBexpected = dgeB.clone(), N, infoexpected = new org.netlib.util.intW(0)); + lapack.dppsv("U", N, M, dgeAUobtained = dgeAU.clone(), dgeBobtained = dgeB.clone(), N, infoobtained = new org.netlib.util.intW(0)); + assertEquals(2, infoexpected.val); + assertEquals(2, infoobtained.val); + assertArrayEquals(dgeAUexpected, dgeAUobtained, depsilon); + assertArrayEquals(dgeBexpected, dgeBobtained, depsilon); + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/LAPACKTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/LAPACKTest.java index 246736a0..f7495b6f 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/LAPACKTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/LAPACKTest.java @@ -20,16 +20,25 @@ * SOFTWARE. */ +import java.io.BufferedReader; +import java.io.InputStream; +import java.io.InputStreamReader; +import java.io.IOException; +import java.util.Objects; import java.util.stream.Stream; import org.junit.jupiter.api.BeforeEach; import org.junit.jupiter.params.provider.Arguments; +import dev.ludovic.netlib.LAPACK; + public class LAPACKTest { final static double depsilon = 1e-15d; final static float sepsilon = 1e-6f; + final static LAPACK f2j = dev.ludovic.netlib.lapack.F2jLAPACK.getInstance(); + private static Stream LAPACKImplementations() { Stream instances = Stream.of( Arguments.of(dev.ludovic.netlib.lapack.F2jLAPACK.getInstance()), @@ -38,4 +47,141 @@ private static Stream LAPACKImplementations() { return instances; } + + protected static final double[] readArray(String name) { + InputStream is = LAPACKTest.class.getResourceAsStream(name); + assert is != null; + try (BufferedReader reader = new BufferedReader(new InputStreamReader(is))) { + String[] values = reader.readLine().split(","); + double[] result = new double[values.length]; + for (int i = 0; i < values.length; i += 1) { + result[i] = Double.parseDouble(values[i]); + } + return result; + } catch (Throwable t) { + t.printStackTrace(); + throw new UnsupportedOperationException(t); + } + } + + protected static final double[] transpose(String trans, double[] arr, int m, int n) { + assert arr.length == m * n; + double[] result = new double[n * m]; + if (trans.equals("N")) { + for (int col = 0; col < n; col += 1) { + for (int row = 0; row < m; row += 1) { + result[col + row * n] = arr[row + col * m]; + } + } + } else { + for (int row = 0; row < m; row += 1) { + for (int col = 0; col < n; col += 1) { + result[row + col * m] = arr[col + row * n]; + } + } + } + return result; + } + + protected static final double[] extractUPLO(String uplo, double[] arr, int n, int ldarr) { + assert n <= ldarr; + double[] result = new double[n * (n + 1) / 2]; + int i = 0; + if (uplo.equals("U")) { + for (int col = 0; col < n; col += 1) { + for (int row = 0; row < col + 1; row += 1) { + result[i++] = arr[row + col * ldarr]; + } + } + } else { + for (int col = 0; col < n; col += 1) { + for (int row = col; row < n; row += 1) { + result[i++] = arr[row + col * ldarr]; + } + } + } + assert i == n * (n + 1) / 2; + return result; + } + + protected static final double[] extractSymmetric(double[] arr, int n, int ldarr) { + assert n <= ldarr; + double[] result = new double[n * n]; + for (int col = 0; col < n; col += 1) { + for (int row = 0; row < col + 1; row += 1) { + result[row + col * n] = result[col + row * n] = arr[row + col * ldarr]; + } + } + return result; + } + + protected static final float[] convertToFloat(double[] src) { + float[] result = new float[src.length]; + for (int i = 0; i < src.length; i += 1) { + result[i] = (float)src[i]; + } + return result; + } + + protected static final void dumpArray(String name, double[] arr) { + System.out.print(name + ": "); + for(double e : arr) { + System.out.print(String.format("%.3f,", e)); + } + System.out.println(); + } + + protected final int M = 103; + protected final int N = 103; + protected final int K = 103; + + // double[m, k] + protected final double[] dgeA = readArray("/geA.mat"); + // double[k, n] + protected final double[] dgeB = readArray("/geB.mat"); + // double[m, n] + protected final double[] dgeC = readArray("/geC.mat"); + + // double[m, m] + protected final double[] dsyA = extractSymmetric(dgeA, M, M); + + // double[m] + protected final double[] dX = readArray("/X.vec"); + // double[m] + protected final double[] dY = readArray("/Y.vec"); + + // double[k, m] + protected final double[] dgeAT = transpose("N", dgeA, M, K); + // double[n, k] + protected final double[] dgeBT = transpose("N", dgeB, K, N); + + // double[m, m][U] + protected final double[] dgeAU = extractUPLO("U", dgeA, M, M); + // double[m, m][L] + protected final double[] dgeAL = extractUPLO("L", dgeA, M, M); + + // float[m, k] + protected final float[] sgeA = convertToFloat(dgeA); + // float[k, n] + protected final float[] sgeB = convertToFloat(dgeB); + // float[m, n] + protected final float[] sgeC = convertToFloat(dgeC); + + // float[m, m] + protected final float[] ssyA = convertToFloat(dsyA); + + // double[m] + protected final float[] sX = convertToFloat(dX); + // double[m] + protected final float[] sY = convertToFloat(dY); + + // float[k, m] + protected final float[] sgeAT = convertToFloat(dgeAT); + // float[n, k] + protected final float[] sgeBT = convertToFloat(dgeBT); + + // float[m, k][U] + protected final float[] sgeAU = convertToFloat(dgeAU); + // float[m, k][L] + protected final float[] sgeAL = convertToFloat(dgeAL); } diff --git a/lapack/src/test/resources/X.vec b/lapack/src/test/resources/X.vec new file mode 100644 index 00000000..5785c50c --- /dev/null +++ b/lapack/src/test/resources/X.vec @@ -0,0 +1 @@ +2.743770,0.835428,4.056319,1.057763,1.288122,0.743487,0.297624,0.720599,4.733356,3.985322,3.689118,2.863023,3.840879,3.841770,1.388431,0.829788,1.992641,2.361518,0.296504,4.544581,1.315937,4.071398,1.222224,1.040035,1.729134,3.159764,4.104973,1.944296,3.332840,1.263181,1.144171,2.119526,4.667703,0.206606,2.789823,4.867032,3.039553,4.559095,3.921917,2.396661,1.773202,3.193527,4.452662,0.225245,3.787477,1.748217,0.020557,0.204250,0.235989,3.295322,2.607994,1.661676,1.829283,1.057310,2.141564,1.248551,3.653989,1.368927,2.794324,3.996130,2.265062,1.857542,0.359007,3.256106,0.167688,4.232306,4.194821,2.420912,2.654466,3.646937,4.274297,2.150499,4.738874,2.725356,4.278588,0.194970,1.141882,2.705893,0.208498,2.530241,2.839940,2.587016,0.572437,3.994174,3.110979,3.714781,2.053858,4.077423,1.408685,4.629359,2.206141,1.299046,4.108358,2.764698,1.433918,0.779362,4.763679,3.561891,4.686232,3.660752,2.956290,2.539581,4.999594 \ No newline at end of file diff --git a/lapack/src/test/resources/Y.vec b/lapack/src/test/resources/Y.vec new file mode 100644 index 00000000..552ed8b5 --- /dev/null +++ b/lapack/src/test/resources/Y.vec @@ -0,0 +1 @@ +1.308161,1.859244,4.271887,2.385419,0.783308,2.460314,2.912655,3.497239,0.489631,3.916928,1.337877,1.423239,3.568072,0.908391,4.471557,3.271646,1.410359,4.456444,1.708393,0.214084,4.793527,1.225499,4.397703,2.923277,4.753397,4.167854,3.083996,1.381753,4.887306,3.264405,0.749737,1.044536,1.717942,2.491489,1.515707,0.776045,3.721097,0.231149,0.891569,2.305177,1.379286,4.388693,2.723391,4.880161,3.816186,0.423202,0.137105,2.338054,0.712574,2.400618,1.648705,2.011272,2.180356,0.231902,4.804938,4.918287,2.458577,1.178577,0.784749,4.442337,4.935286,1.406488,1.756818,0.117174,4.952333,2.184810,2.528438,1.194373,4.205853,0.549411,1.830910,1.753192,2.011837,1.913712,3.023300,1.184178,2.549540,1.210492,3.153036,2.182013,3.418065,2.688047,0.934378,0.334523,0.692445,1.470172,2.386988,3.844825,2.224413,0.769167,0.031627,1.589413,1.845898,0.842862,4.991723,4.275119,1.513772,2.301607,2.333696,0.082954,2.733651,3.399653,0.016225 \ No newline at end of file diff --git a/lapack/src/test/resources/geA.mat b/lapack/src/test/resources/geA.mat new file mode 100644 index 00000000..d3b4b11e --- /dev/null +++ b/lapack/src/test/resources/geA.mat @@ -0,0 +1 @@ +2.744068,3.575947,3.013817,2.724416,2.118274,3.229471,2.187936,4.458865,4.818314,1.917208,3.958625,2.644475,2.840223,4.627983,0.355180,0.435646,0.101092,4.163099,3.890784,4.350061,4.893092,3.995793,2.307397,3.902646,0.591372,3.199605,0.716766,4.723345,2.609242,2.073310,1.322778,3.871168,2.280752,2.842170,0.093949,3.088177,3.060479,3.084670,4.718740,3.409101,1.797540,2.185160,3.488156,0.301127,3.333834,3.353189,1.051913,0.644631,1.577142,1.818554,2.850984,2.193008,4.941869,0.510224,1.044384,0.806548,3.265542,1.266458,2.331554,1.222128,0.794848,0.551876,3.281648,0.690915,0.982912,1.843626,4.104966,0.485506,4.189725,0.480492,4.882297,2.343256,4.883805,3.024228,3.696318,0.195939,1.414035,0.600983,1.480701,0.593639,1.589916,2.071315,0.320737,3.462361,2.833007,1.326947,2.616240,0.469703,2.879732,4.646481,1.592845,3.337052,0.658989,3.581636,1.447030,0.915957,2.932565,0.100538,4.144700,0.023477,3.389083,1.350040,3.675970,4.810943,1.243766,2.880787,2.960210,2.861260,1.115408,4.763745,2.235627,4.232043,3.497396,1.487185,4.068989,1.982529,4.405516,2.906364,4.408677,3.462658,3.626271,2.506622,4.780418,3.219951,2.119275,3.031966,0.095966,1.507874,3.300868,1.450388,3.090077,2.143844,0.677370,1.491412,2.849825,2.954364,2.871626,3.266004,3.260516,2.157092,4.482733,1.837809,2.179325,4.459617,4.030970,3.519443,0.501134,4.597413,3.571206,4.994235,0.747242,4.340630,0.812465,3.077798,0.619100,4.240041,4.036595,2.845504,2.035916,0.345835,3.487144,2.267713,3.610278,4.331912,4.877608,4.279017,0.058570,1.799890,3.649953,0.858148,2.605183,0.271690,0.999983,0.092609,3.968489,1.119623,1.726758,4.640406,3.522072,0.159195,0.823471,3.107392,2.886143,1.189464,4.671070,3.069830,2.678164,2.949550,3.650610,1.559725,1.991105,1.049219,0.930965,4.721862,3.697754,2.452294,1.137073,1.271782,0.290146,2.172083,1.558979,3.481717,1.888759,0.898018,0.123394,0.336248,3.396964,2.268484,2.682896,4.483356,4.951695,1.084485,3.315391,1.316612,0.103255,3.791893,1.600086,1.917319,2.941586,4.155242,3.144909,4.363253,1.367710,3.990234,0.928180,4.763958,3.437441,1.077538,4.736853,3.654279,1.269708,1.066560,2.591004,0.128314,1.037350,2.123427,1.870850,2.317877,1.388144,2.933922,4.319278,0.587659,2.586896,0.660341,3.584298,1.980299,2.827107,0.916399,0.724239,2.440281,1.778064,4.702160,3.826626,3.743318,4.518599,0.417112,2.760962,2.922380,4.809682,1.460738,1.204144,0.501470,0.082148,4.647647,3.349583,3.925765,1.408651,2.932051,0.319776,2.428138,4.887476,4.382526,1.690795,4.807851,1.158508,4.746594,4.706889,3.996013,3.152240,4.371440,1.465101,4.244718,3.089383,0.066184,1.736168,0.740704,4.909147,2.391852,2.486957,3.197363,1.842923,0.684501,4.110589,0.949240,2.556595,1.121585,0.489222,4.310958,4.864597,4.804173,4.532777,3.870237,1.665726,0.405507,2.036206,1.161171,0.662438,0.267136,3.627972,0.057137,3.852904,0.734733,0.397610,0.448015,3.360239,1.226836,2.102697,2.786844,4.302756,3.635221,1.351640,0.657414,0.276872,1.507993,1.310591,2.280703,3.416407,3.478127,1.417594,1.899635,0.905755,3.942728,0.284240,3.484986,3.893477,3.887038,1.297113,1.869066,2.937998,1.364110,1.854264,0.985271,2.299279,0.223062,3.998979,0.384782,2.594176,1.534050,2.887715,4.797167,3.227851,0.176812,2.152012,2.550084,2.680887,3.406963,1.387980,0.644303,1.963378,4.782029,0.935654,4.519920,2.719030,2.284557,4.410207,2.293020,3.620838,1.995127,4.520222,3.450125,3.498110,1.638602,3.783893,3.180305,1.200101,0.802694,3.981957,4.795833,2.290694,2.954921,4.288613,2.286117,4.759372,2.878756,4.103836,4.544219,4.077619,0.797072,3.144492,1.992171,0.313565,2.120161,1.293420,4.245192,0.166523,4.794914,1.776844,1.783534,0.081643,0.926162,2.006298,4.646457,0.498075,4.726508,4.347443,2.270812,1.633504,1.163721,3.072324,0.165373,0.078030,2.143979,0.340370,1.259705,1.105805,1.265956,0.655276,0.060181,0.577421,3.092401,4.871281,4.951725,2.045270,0.814772,3.193809,2.451527,4.947049,0.326521,3.916172,1.441992,1.207093,3.312523,1.230316,3.329296,2.586543,2.120445,2.773439,1.435258,3.532874,2.074284,1.802728,4.143285,4.624835,0.230037,1.163135,1.742597,4.074832,4.927457,4.844859,4.524742,1.482781,4.960056,1.247100,0.529531,4.754763,1.167101,3.448841,0.291782,3.653545,4.408601,1.362184,1.895284,1.871481,3.743941,1.189036,0.859265,2.246458,1.522342,4.195946,1.188709,2.511947,4.712918,3.169988,4.336447,4.701048,3.753824,3.497875,4.839828,4.972004,2.259108,0.354349,1.463970,0.761774,2.087432,0.656447,3.020589,1.914040,4.476929,4.838973,2.734425,1.374118,2.961152,4.483806,2.033667,2.760391,1.358264,2.277221,2.008568,1.242067,2.529332,1.551904,1.865174,2.624852,3.752975,1.667537,4.620794,4.311593,0.243451,1.268213,2.230678,0.523139,1.742380,3.700488,3.402572,3.111922,3.552642,1.024618,1.708491,3.381212,4.396174,2.718390,1.413498,0.151176,3.551684,0.039421,1.863395,2.652686,4.610557,0.447473,2.029712,0.121566,1.713055,3.111155,1.395340,1.048750,0.578516,2.885701,3.476350,3.359786,4.744305,0.013516,3.235983,3.001961,2.943698,4.813852,0.084358,3.482412,4.068393,2.549036,1.669824,3.954201,0.486215,2.210178,2.599762,3.469782,0.454429,1.138798,2.051508,3.116473,4.434804,3.094131,0.667307,4.902901,4.358929,2.513604,4.611740,2.706904,4.616530,4.149487,4.841432,4.598914,0.180169,0.873860,1.945673,4.760713,1.500145,0.802338,4.431523,2.231972,4.539378,0.801152,3.305588,2.201319,0.382434,3.482316,1.236994,0.198078,0.299721,0.305393,4.538665,3.699420,4.490312,3.362912,2.644700,1.522232,4.989811,1.810945,2.353245,1.891226,4.897635,0.873292,1.639940,3.401743,0.316038,3.036247,2.388233,1.420000,1.192066,2.572564,1.839638,2.282599,1.687387,4.852468,0.667197,0.484020,1.716959,2.955135,3.295882,1.986284,4.996390,1.759465,3.607033,3.187913,4.065269,4.881128,4.448968,3.822810,3.491242,1.677491,0.738428,0.313180,1.209509,2.161407,2.609981,3.865418,4.793705,0.586602,0.535021,2.948474,3.726990,4.240752,4.679160,4.917131,1.999008,1.901676,0.739043,3.424672,3.283810,4.310313,0.486290,2.488885,2.905410,1.207785,0.845127,4.297904,0.292675,2.353105,0.579170,2.285294,4.899812,2.118532,4.285625,0.586578,1.356260,2.018964,1.999061,3.356917,1.723591,3.568834,3.195934,1.995806,2.158801,3.072638,0.350211,4.112034,3.267106,3.631712,2.684615,0.552386,2.025178,2.026868,1.605215,0.149752,3.686271,0.548922,3.031541,3.516087,3.173932,4.795711,0.516491,4.335836,0.145951,2.674584,2.021218,2.620919,1.825499,0.952835,0.095614,2.590749,4.213884,1.866080,1.114319,0.402660,0.426555,1.106982,0.500070,1.325198,0.330747,0.328024,4.281381,0.810601,2.798412,3.867278,2.282048,0.766844,0.997981,2.164921,2.641170,1.747201,3.907398,3.755108,4.636059,0.144763,4.478456,1.962844,4.391862,3.453924,4.936744,3.796412,1.822723,2.505316,1.881946,1.824559,1.304522,2.479851,3.408700,1.386701,2.621899,0.586901,0.799226,0.234032,4.853657,0.019302,0.892900,3.064334,0.406848,4.409483,3.598101,4.831950,2.538178,1.502018,2.747503,4.654094,2.603807,1.336035,4.386994,1.859594,0.006917,1.238425,1.591168,4.293887,2.292516,2.222936,1.680511,4.403391,4.725134,4.959452,1.883706,4.830737,3.959398,3.378446,1.224447,1.082286,0.830239,4.613783,1.470383,2.265471,2.469789,3.890858,4.221175,0.695364,2.134522,4.214274,4.090167,0.512069,0.781917,1.520993,0.376795,2.123315,0.538089,2.841088,1.232785,2.982165,0.587628,4.879419,4.662806,1.958985,1.210893,1.251991,2.416968,0.199964,3.198526,2.041515,1.887033,4.046825,3.545177,4.771669,1.759681,4.487714,3.849836,1.787123,3.108327,1.442850,4.372000,0.562137,1.062172,0.915166,2.015130,3.726165,2.634537,2.438382,0.002730,2.127009,0.317769,1.041266,4.661970,1.076991,4.291688,4.014467,0.795731,3.028560,0.578309,3.639441,3.187311,4.059693,2.396923,4.574315,0.246745,1.464443,3.575263,2.090546,0.864757,0.536054,4.086696,2.365715,4.411418,3.666446,2.048631,1.867555,2.578192,4.445300,3.686393,0.025765,3.470789,4.597537,3.552279,0.885029,2.417591,0.701580,1.794976,4.685585,4.616527,1.414184,1.698155,3.001064,4.815986,0.739007,1.284583,4.367784,2.459461,4.494805,0.927589,2.663343,1.631348,1.582713,2.234385,2.165387,1.786734,4.574854,3.658721,3.637735,1.449567,2.888547,3.895897,3.977952,1.722652,3.854364,3.679469,0.707532,4.329727,2.206607,2.432052,2.241846,2.839230,3.105846,2.490898,4.333943,3.138674,2.007140,2.083459,4.054193,1.740960,1.057274,0.296916,4.380134,4.592732,0.600601,1.672369,0.876860,0.579492,4.499334,0.284386,4.902428,0.482254,4.317353,2.832531,1.839587,1.711712,3.786821,1.572866,3.286595,2.586630,2.424828,4.505811,2.773225,4.134308,3.627868,0.192786,3.865550,1.084351,4.515748,0.214621,1.665360,0.498665,2.377946,4.100112,1.490937,0.754674,1.651335,4.069401,0.701920,1.136812,0.344260,3.528550,1.976166,1.554200,3.593132,1.679888,3.638856,4.075997,1.088314,4.869093,0.811790,1.454205,0.898976,1.727528,2.400304,2.610879,4.268030,4.447240,1.100519,3.114470,0.557480,2.294849,1.611668,1.582504,2.412921,3.649138,0.345913,4.395867,3.674069,0.882497,4.695805,2.531561,4.999043,0.986297,2.674541,1.451240,1.520868,2.955327,4.608595,4.026319,3.619707,2.795869,4.611493,2.461807,4.369161,4.169908,1.069177,3.856127,0.060856,1.614148,1.147837,2.534315,3.684266,0.488382,2.574611,4.692060,1.143233,3.385706,2.964401,0.050318,2.379131,3.543852,0.219877,4.397607,2.600407,0.153305,1.122068,4.768378,2.911599,0.537363,1.437723,2.283518,0.104750,2.058078,2.447293,1.218389,2.943195,3.766201,1.179171,3.102500,3.198111,4.742702,3.891381,4.241726,2.452100,0.926743,4.979076,0.646779,2.357287,0.340465,4.719254,4.824625,3.596945,1.749964,1.271912,1.326517,0.636470,2.629045,0.709086,1.583653,3.133532,3.637718,0.121364,2.150580,3.260623,4.266230,2.376624,4.846029,1.328163,0.067544,2.418764,1.280569,4.118588,1.163863,1.553146,3.956137,3.575716,2.790256,3.524740,2.093184,0.026550,0.056776,2.556109,0.416455,0.255377,4.827583,4.295013,0.760136,0.003321,4.708339,1.391626,0.929488,3.457541,0.544519,1.323248,4.875473,3.197314,2.603389,1.989593,3.872505,0.704787,4.836689,4.305615,3.088285,0.214531,3.504278,4.566422,2.622885,1.771124,0.601387,3.774506,4.425109,0.501259,3.794923,0.085302,4.835275,3.075290,2.762195,1.479749,4.646458,1.329528,4.140733,4.925543,3.916983,2.594950,0.330371,2.362069,2.191280,1.013980,2.117938,1.788789,0.818421,2.206871,1.314000,2.610312,0.175800,4.531157,4.081822,2.762907,4.259043,4.811975,0.552611,3.154159,4.989970,4.939446,3.016615,0.640104,2.915964,0.010323,0.994557,4.780616,1.652203,3.191951,1.404297,4.739109,3.642794,1.648256,3.958807,0.540828,1.961595,1.106091,3.418632,0.512231,1.985129,1.383249,2.531715,1.749488,3.532053,0.122885,3.169935,1.152856,1.343545,4.001278,4.777842,1.582751,4.134026,0.519954,3.169908,3.755161,0.779890,2.130012,4.463536,0.517892,0.090482,2.952927,2.177658,3.993446,4.617278,1.495768,1.942021,2.431360,2.940757,4.919269,3.486651,1.947743,1.318838,4.723129,0.677742,3.601329,4.626975,3.323328,2.115272,0.994955,1.837377,3.534359,3.247671,4.639881,4.334305,4.080754,4.557254,1.381686,1.847618,1.899470,2.802253,3.341091,1.433583,0.097312,1.996112,1.542640,4.710924,4.441325,4.301553,3.264999,1.721446,2.744246,4.076125,0.493052,4.005374,0.205899,4.082105,4.037819,0.255037,3.135804,2.512265,0.849098,0.741895,3.866296,2.838464,4.914996,4.911239,4.963335,0.593078,4.691281,1.222848,2.291061,3.787033,1.018105,2.831558,0.929084,0.523681,0.582793,1.788195,0.023274,2.124270,3.320986,2.008441,0.428973,0.313444,1.390583,0.846563,4.825475,0.756151,4.027312,2.930540,2.846435,2.560404,4.858815,1.819224,3.939579,2.776471,1.978168,4.777330,2.991580,0.594585,2.087696,3.907909,3.468735,4.581702,1.296887,3.790969,2.299376,2.868049,4.775233,4.896432,4.307955,1.795485,4.438504,3.193046,2.149984,0.178713,3.850641,2.510528,3.930942,3.740114,3.967837,1.503256,4.003993,2.744232,2.366631,3.375630,0.106793,0.511584,1.460887,4.914951,0.698729,1.652982,0.255265,1.656344,1.601631,4.734036,4.225770,1.913821,0.123845,4.155156,3.302681,0.761822,4.980356,0.501167,4.335573,1.471331,2.176767,3.977283,3.387542,4.689322,3.105702,0.489051,4.421802,3.845778,3.559352,0.268668,1.981114,0.837179,4.109520,3.502643,4.415388,4.832876,3.873738,4.971165,3.073849,0.185648,0.071258,1.710519,4.117359,4.330674,4.804063,0.325607,0.222856,4.566418,1.525233,2.789937,4.912224,2.002243,3.329357,2.004398,3.840973,2.638574,1.187616,1.356531,1.290296,2.661602,3.515945,4.746400,3.470437,3.905964,0.844631,1.870313,2.068901,3.431901,1.479460,1.516460,1.779446,4.051510,2.887950,0.376386,0.391230,1.856435,3.832955,3.443417,3.539912,3.836050,1.435764,2.741281,2.716763,3.698163,4.784353,1.389950,3.966408,3.299853,2.901189,3.874399,4.720162,0.183457,0.737001,3.781436,0.418957,2.580619,1.099304,1.371479,3.509202,0.150964,4.366597,2.222395,2.511966,2.700240,3.227721,1.724283,0.505537,1.591895,0.840711,2.780666,1.590143,4.790336,4.828671,3.100629,3.087486,4.926893,4.436416,3.825350,1.567953,1.827695,1.006334,2.435741,4.951843,4.560755,0.591747,0.125951,4.493188,2.685851,1.000949,3.368266,3.221116,0.610428,1.298001,0.300390,1.049302,0.661528,0.966181,3.427336,0.247499,0.509273,0.670868,1.582706,1.493752,1.275319,3.752683,4.990114,2.669890,4.721014,1.983051,0.533412,2.043869,1.480639,2.467035,3.285218,2.305251,4.675803,4.423824,3.509888,2.448425,0.658436,1.985068,3.522008,1.424428,0.519940,4.539492,3.545254,3.076382,3.962495,4.178230,2.417295,4.405941,4.582095,1.357755,3.037727,2.632920,2.689729,4.688315,1.525944,4.917170,4.510656,2.293614,4.087266,3.845235,3.389475,1.599169,0.982255,3.357638,4.214866,0.081264,3.214017,2.214365,4.490439,1.607365,2.370924,2.573836,0.702198,3.564462,4.152382,0.289546,1.456944,0.190223,4.782721,3.335844,4.821002,2.657471,4.010343,1.872070,1.769095,1.891339,3.289311,1.797266,4.501837,4.916374,0.152133,0.968116,0.561250,0.211820,1.138705,2.233967,4.184952,1.109120,2.469726,4.648094,3.336074,3.990395,2.754970,4.902332,2.943311,0.227554,0.989914,2.023868,3.006386,3.859654,2.065431,3.550292,3.949348,1.586301,4.896351,3.248282,4.404990,2.779688,3.708016,3.852720,4.541242,0.751749,2.791417,2.141893,4.615795,0.525473,4.912869,4.377257,0.369131,2.454832,3.587798,3.690758,4.532471,3.999327,1.554652,2.492174,3.508929,0.692184,0.969954,2.405212,1.491229,4.312796,2.931387,1.743326,4.244165,4.024392,4.991774,4.236538,2.072283,0.637494,4.203205,0.298790,1.751356,4.598690,4.803832,3.202823,3.443242,0.212272,2.572402,2.734341,1.700504,0.342984,1.144538,1.789920,2.175710,2.954634,3.611958,1.588159,1.644769,0.098458,0.204374,1.289108,3.701225,3.141569,3.848945,3.844597,4.282837,3.601596,4.895055,4.494126,2.933586,2.940788,0.171335,4.992633,0.657880,3.701736,4.105076,1.865273,0.984260,0.493799,3.743030,2.263268,3.568589,4.577038,0.732919,4.595855,2.058132,1.526335,4.715311,4.953258,0.994461,3.284192,0.532477,3.254570,4.136566,3.422493,2.086666,1.915332,1.965612,2.948559,4.407836,4.645331,0.267648,0.908112,0.561122,0.966673,1.733039,2.532658,3.147306,3.660711,4.450558,4.945442,3.314282,4.226823,3.890194,1.537660,4.378461,0.213816,0.001837,1.368663,2.310488,3.191814,0.508851,3.365051,4.009079,0.926565,2.075626,2.599925,2.259035,3.999150,4.802612,3.994766,0.389964,4.024678,0.332982,1.179852,0.765484,0.987596,2.641576,3.358449,2.351606,4.798478,1.201462,3.815701,4.350911,2.810331,2.281113,2.980922,2.144049,2.775969,2.084670,2.002349,3.476732,0.464256,0.832710,4.255992,3.855387,1.407269,1.886345,4.630133,4.090386,3.071731,1.107451,0.221260,2.156289,3.363136,4.142402,4.263445,0.163880,1.220785,1.695473,0.943661,4.014877,3.837329,2.584165,4.914632,0.720293,4.498259,0.582316,0.815909,3.481096,0.547848,2.829225,2.101168,3.642370,4.503376,3.849358,4.248449,0.164727,1.550977,2.577165,2.079767,1.156275,1.539370,4.727155,1.470904,1.769521,0.018549,4.225388,0.774204,1.020721,1.276323,4.423110,1.032257,3.987632,4.040247,4.635103,0.577807,1.086395,3.714491,0.980004,1.431648,0.833708,0.863483,2.407767,0.548415,1.608488,2.132970,0.122741,1.941666,0.470612,2.467893,4.128691,4.092111,0.402243,3.006139,4.172932,1.189863,3.809633,4.453822,4.030621,0.536505,0.045300,0.958621,1.352387,3.080915,1.921366,3.517035,1.765375,0.772127,1.563449,4.421621,4.792662,1.037564,3.942342,1.366744,4.435658,0.827728,3.329800,0.421056,4.869467,3.503167,4.209079,2.833347,2.384007,3.109412,2.643708,2.346922,3.797251,0.891005,0.855860,2.159213,1.603740,0.370623,4.222352,3.858014,2.719607,4.896623,0.363000,3.833347,1.331852,1.842995,1.096397,3.945189,0.721201,4.200083,3.307888,0.295116,4.054909,3.138779,4.524912,3.743612,2.805605,4.182736,1.390251,2.734750,1.468084,4.841022,1.130982,0.078691,1.629274,2.512547,0.141815,2.796242,4.371414,3.523661,3.114842,4.779809,4.791397,4.121332,3.038709,2.438823,0.066581,3.031310,4.945440,4.090505,1.703023,0.760235,3.920293,3.719689,4.835234,4.374212,2.778313,0.506421,2.417503,1.568475,2.562042,1.508508,4.309115,4.221635,1.577326,2.997907,2.150904,4.545464,0.936805,3.488642,4.851877,0.876378,1.009832,3.468617,3.895770,2.452745,3.048432,1.063412,2.383071,0.560359,1.607110,1.423899,2.223127,4.650632,0.906338,2.006941,3.077986,4.732785,0.665741,4.589383,0.405269,2.403707,2.272949,1.048014,1.737298,2.270826,4.326057,4.775321,2.594628,4.350499,3.040858,1.745437,0.970971,2.065674,2.614121,0.222217,0.729206,3.000922,1.125008,4.186632,1.634711,0.524171,0.417653,4.685615,0.590102,0.704549,4.313330,1.271441,3.329757,4.083628,3.035903,4.787443,3.544414,0.563758,2.792050,3.590933,4.009786,0.131607,3.594395,4.128404,3.734169,2.561746,2.290105,2.747093,3.523218,4.614571,3.085176,4.439172,3.506284,0.341682,2.504141,1.432432,1.425875,1.779638,1.573664,2.893050,3.418008,1.343747,0.648813,0.294044,2.878764,0.930651,0.046240,4.638765,2.685702,0.462241,4.214606,4.916014,2.243003,0.212448,0.587730,1.908269,4.427613,0.740193,4.119950,0.074881,2.286943,3.221986,0.301897,3.073814,4.722021,0.801300,3.648057,3.045469,0.925582,0.031017,0.046422,2.660462,4.713897,3.221493,3.571499,2.469327,2.909445,0.631838,4.384103,3.803963,4.990995,1.488615,1.135089,0.625808,4.821049,3.904426,0.831623,2.763432,2.068841,0.757430,0.810365,4.817350,1.524821,4.707196,0.378053,2.304015,0.648095,0.023937,2.768830,0.569471,3.610123,3.490582,0.881665,4.708711,3.605217,1.489851,3.546169,3.659651,1.711132,1.877943,1.795533,3.083092,4.502051,0.865966,4.375998,0.138266,3.301693,2.072194,3.956408,3.605991,2.400539,3.219320,2.508866,4.057592,2.380420,2.615780,1.252603,3.025215,1.514524,2.886420,0.848391,0.797345,2.085149,2.134098,1.340546,0.657984,0.196053,0.126159,1.357751,2.309267,3.631216,2.374359,4.520254,0.176099,0.903303,1.692572,2.887481,4.263681,1.751010,1.339943,0.309446,4.106517,1.898332,2.857751,4.917777,0.007973,0.727251,3.895555,4.025637,3.846236,2.684994,4.894285,1.980923,3.009718,0.316845,2.049287,3.612500,1.193694,4.719138,3.433917,1.437877,3.844995,0.415824,4.873872,0.246426,4.667279,1.264269,3.789121,0.000368,1.271200,3.745503,2.661680,0.574761,1.968149,1.877747,2.840811,3.339885,4.204151,2.486157,1.960109,0.719883,4.024115,3.566852,2.043387,2.592162,3.325914,0.824028,0.135989,1.587518,2.977925,2.433030,3.462773,4.098449,2.442212,0.671335,4.253140,2.874952,3.699687,3.523323,4.841059,1.476537,3.526534,1.828382,1.977054,1.152973,1.720051,4.741484,1.462854,1.229953,2.915690,1.290180,2.366929,4.170881,1.152002,2.133457,3.052449,2.728145,4.873616,3.401851,3.699731,4.834780,2.072190,1.776899,0.219312,0.921022,1.185948,0.917522,3.773919,2.679415,3.338169,4.102311,1.153870,1.629620,3.541801,1.963795,0.146355,2.174776,4.541365,2.045108,1.661245,4.947625,3.222078,1.829990,0.510098,3.939247,3.540375,4.609579,1.086378,0.574622,3.620363,1.016979,0.880519,1.599037,4.084126,2.697683,0.229252,2.319473,3.419898,2.691842,2.862251,1.123887,4.238697,2.806994,3.566230,4.909321,2.140993,4.405333,0.036405,0.167036,2.951400,1.557247,1.241383,1.389677,1.592015,3.644738,2.845980,3.945180,4.150983,4.214674,2.073221,2.106367,4.631329,3.308818,0.402336,2.710935,1.780036,4.937175,0.068277,3.060904,3.618115,1.444534,4.868208,4.297683,4.578264,0.096160,2.849361,1.473251,4.245143,3.164248,2.694385,0.572941,2.701114,3.159521,4.779562,2.925255,4.837003,4.808031,3.251002,2.529540,2.330109,4.451893,0.141283,0.569041,0.510359,3.784677,1.698255,3.189843,3.018915,1.929140,2.657839,3.225693,4.704752,2.878170,3.071838,0.339279,4.761079,2.640410,4.006367,0.251455,2.104551,1.284877,1.334879,3.957269,3.119334,2.198727,0.052929,4.824640,4.810116,1.087761,0.206732,2.650997,4.757054,4.551979,2.923314,1.517744,1.649804,4.489568,2.458920,0.655581,1.242127,1.383975,0.617733,2.315222,4.580255,3.343913,0.362370,0.027474,1.381238,1.813465,3.883748,4.835028,1.937836,3.433450,4.974510,3.728333,3.180948,0.390374,1.616076,4.566961,1.005027,4.217952,3.481618,1.831622,2.645871,2.714032,3.570269,2.582780,0.665380,3.867273,2.031362,4.815469,1.417569,1.315394,1.667537,2.861585,4.474349,0.881408,1.398394,2.908399,2.271671,2.236614,4.103671,4.619392,2.406535,3.436759,4.005294,2.591832,1.471582,3.190423,2.925546,4.507814,0.262035,4.550657,2.672160,0.078381,1.723511,3.621668,2.442165,4.900795,2.113050,1.633176,4.108360,2.739533,3.411633,4.028512,3.357138,2.112037,0.623982,2.901241,4.487167,2.094462,4.553626,2.517639,3.104208,4.164942,2.822986,0.454847,4.904897,1.229247,3.552527,2.525567,2.393863,1.219704,3.610754,0.563941,4.952267,4.226868,2.672545,2.122765,1.432323,2.507957,4.397087,1.375032,2.502687,1.172750,1.685746,0.951303,4.952696,2.857487,3.664076,0.491250,1.830588,4.463199,0.422192,0.827416,3.127088,3.113945,4.191135,4.677464,0.709932,1.296869,2.137307,0.004516,0.349072,1.132456,2.405510,1.257614,4.383409,1.621364,4.623114,4.873936,2.249308,1.135644,1.458331,3.881668,1.366749,1.902914,2.392879,2.875556,4.980502,1.161049,1.767119,1.314456,1.805567,0.504023,1.799049,4.439325,1.492949,1.859674,4.722371,3.641895,2.583694,3.885964,0.615898,2.322452,0.591181,1.168091,0.709336,1.809006,1.908197,4.736543,1.320629,2.362144,4.056897,4.078088,3.751716,1.439169,2.474858,0.931058,0.941998,2.179206,3.692961,2.632921,4.433416,4.154544,0.158027,2.842095,3.045806,4.807876,0.116183,2.655519,1.023907,0.268315,2.937443,3.863021,3.874327,0.151442,2.034732,0.222548,1.239193,0.964404,1.075913,1.695592,1.387090,4.811400,1.762036,4.470863,0.905208,3.818734,0.306728,2.313806,0.027552,4.051454,4.752430,0.175537,4.669232,3.869269,1.794308,4.544383,1.481286,2.046477,0.483556,3.284695,0.148004,2.424526,3.415959,4.106188,0.749707,3.770452,3.595385,2.797853,2.923223,0.456354,3.002355,1.907611,4.337904,1.565494,2.882975,2.132857,4.381310,1.269583,0.394012,3.743279,2.064483,2.945492,0.131947,4.760549,4.388092,3.119340,0.085149,1.889882,4.893983,3.406652,0.804939,2.302984,4.833689,2.673541,0.123073,3.098860,1.356083,0.494230,2.014542,2.792615,0.085204,2.795234,2.556016,3.969542,2.117749,2.767252,3.710047,4.485729,1.900173,3.008167,3.473055,0.216353,4.003803,1.887151,3.351195,2.358320,3.511696,3.621655,0.957855,3.310871,4.256617,1.177836,3.790917,3.169126,4.775630,1.301233,0.771389,1.560605,1.289794,3.784164,3.665547,3.348425,1.081896,4.309034,4.782858,2.658029,3.246864,2.503460,1.417789,1.430738,1.567103,0.954250,4.509618,4.291991,2.308197,1.836257,4.695392,1.111867,2.767710,0.272491,0.956011,3.020135,3.310918,2.904979,4.348007,4.967026,3.819309,2.325459,4.169673,0.601937,3.416353,2.591689,0.890329,4.864668,1.692187,3.077117,4.392971,2.533444,0.575689,4.093695,1.766069,4.915334,4.419127,4.267247,1.781266,3.785649,4.931645,2.631608,2.353661,0.073329,3.501019,4.292388,1.237286,1.575123,2.503385,0.360401,0.448212,2.105554,1.306095,2.030187,2.271931,4.881367,4.721299,0.698651,4.412930,0.401033,2.538177,0.819550,1.829461,3.716701,2.122527,4.034756,3.594079,4.714197,2.670780,4.010740,1.614536,1.728729,2.002552,2.054579,0.516266,2.595495,0.484016,4.448811,0.309224,2.248472,1.423470,0.774347,3.919183,3.574662,0.729739,3.163828,3.962776,3.866661,0.461398,3.427564,3.580120,4.310831,2.540222,2.305470,4.825582,3.982561,2.793655,1.653085,4.226190,2.277182,0.463426,2.274521,4.359842,2.241411,0.071746,3.057427,4.979150,4.086243,3.086190,4.571994,4.067908,2.493197,2.956101,3.656464,4.232131,0.290882,3.874019,2.237517,3.303993,3.823165,2.697510,0.792574,2.047634,0.384365,3.446503,4.768531,3.976264,1.948932,2.921457,1.521003,2.705228,1.503635,3.691624,1.296708,4.820102,3.309744,0.343889,0.053889,4.985232,1.102528,1.562814,1.042070,4.640509,3.260064,2.521932,2.788254,1.589364,3.070875,2.098002,0.996141,3.283025,1.869203,3.925332,2.076975,2.541357,3.937332,2.239390,4.831106,3.965143,4.132152,4.769602,1.944253,2.900401,3.467959,3.367292,4.764684,1.441743,1.456808,4.590022,3.996528,1.016783,2.850234,3.728819,1.765182,2.171911,2.876983,2.335543,3.765212,0.029694,2.173163,1.687907,3.045820,3.879792,0.380726,0.790299,3.325408,3.692012,2.941009,4.914017,2.497307,0.681462,3.431455,3.010378,2.952107,2.729268,4.695479,0.645782,0.365986,0.770586,1.224951,2.964732,3.062126,1.163009,2.446127,2.410309,2.265554,4.017726,2.358465,3.791827,0.832406,2.659837,4.120524,0.888583,2.324611,3.045397,0.923873,3.783828,0.394981,4.732078,2.341107,1.680615,0.584035,2.162983,3.299020,0.472436,1.531345,4.180088,3.230905,1.031865,0.804549,4.522425,1.435101,0.897501,4.999820,1.545959,0.623701,2.308788,2.171726,4.634012,0.671025,0.455682,0.464893,4.521437,2.246846,0.753033,2.969150,2.688117,0.992034,3.015191,1.701156,1.191854,2.552003,1.458246,1.110700,4.398612,0.778813,1.402950,1.930692,1.368192,1.053553,3.855730,1.645081,0.562565,2.704476,0.627442,1.787598,4.409134,1.845806,3.162545,2.573128,0.688624,3.245348,4.280175,0.466062,3.768400,3.451056,4.333303,0.520460,1.528477,3.471457,0.110090,3.670378,4.289893,2.266520,2.171650,1.392345,0.025259,0.931518,4.899321,4.336430,1.332523,4.818744,1.838563,1.487927,0.764038,4.508055,4.934962,1.637057,3.517152,1.676517,0.524954,1.963462,2.757850,0.615084,4.091364,2.486816,1.171915,2.963798,3.966297,1.638122,3.507382,2.139296,4.820256,3.854700,1.781755,0.088740,3.287599,0.989361,0.609396,4.658882,4.999745,1.349444,1.508843,0.824945,2.288424,4.329219,3.507530,4.231658,1.142408,3.652280,4.592633,1.407081,3.453268,2.003287,1.451133,4.848117,1.743166,0.539248,1.942946,2.238391,3.761054,4.749571,4.085285,4.654707,2.375301,3.596583,1.545248,0.347936,1.827368,3.489576,1.373111,4.307029,3.953864,0.970213,1.654184,4.126513,1.219689,1.658011,1.715335,4.005210,0.185151,0.368935,2.892258,1.985560,3.164427,1.332306,4.547913,3.804709,0.338731,3.919527,4.847912,4.712178,3.677419,0.617969,2.880384,1.421164,4.851065,3.587429,3.053828,3.475440,2.189896,1.863684,4.678998,1.659636,0.207181,2.004201,3.951702,3.242342,4.810854,0.531009,4.557732,1.844246,2.370013,2.142411,0.582261,1.238982,3.711358,0.115038,0.669439,0.126051,4.286940,3.086624,0.849643,3.843861,4.834003,4.672802,4.607738,0.039051,2.945067,1.283163,2.823236,1.590151,0.768333,2.222469,2.475482,4.948828,0.211939,1.505776,4.259469,3.298477,4.133415,3.301455,3.797682,2.464609,1.024388,4.050019,2.839103,0.697526,4.024470,4.792930,1.730819,1.467561,0.408876,3.322456,4.794808,0.679963,2.425798,0.491191,0.170550,3.322505,4.338436,1.687853,4.378826,0.585265,1.189803,4.508034,2.542549,3.040962,0.190091,0.641950,0.278954,4.525004,0.673975,4.248364,1.755173,4.002987,1.825218,1.338420,0.468304,1.403533,2.357399,4.087544,2.262575,4.857178,2.708165,0.124728,2.076837,3.444496,1.171458,3.493150,2.518487,0.128689,3.871765,2.801869,0.412468,2.376070,1.436464,4.398408,1.424635,4.708435,2.730664,1.618069,4.067725,3.487002,2.069812,3.148092,3.892921,4.257789,4.082064,0.830385,4.141948,0.293145,1.000853,3.114634,0.573463,3.016738,1.539828,2.147333,1.575758,0.350868,2.503794,4.817997,3.058917,1.500159,4.780749,1.946186,3.487589,3.170564,4.764554,4.573013,0.740020,0.428429,4.048212,4.524716,2.464868,3.453806,0.348941,1.099022,0.746881,3.005803,0.987699,0.299232,1.511036,3.386062,2.889319,1.653625,4.167394,1.381346,1.302738,2.799737,2.391078,2.229863,0.778928,2.523231,1.295095,1.960899,3.667852,4.684314,3.869315,2.028169,2.965166,3.732489,2.071105,1.801241,0.676216,3.681304,4.192543,1.582922,3.917539,3.051065,3.920415,2.056687,3.737882,2.042546,0.443790,2.752895,2.271644,1.264399,4.460567,1.914267,0.195631,1.910679,2.122549,4.308189,3.995916,0.999833,4.195146,1.239636,1.709671,0.384092,0.276782,3.404301,4.616705,2.465084,4.220469,3.968756,3.323394,4.891145,4.010940,1.374222,3.945071,3.463308,1.997602,0.383987,1.071798,3.986189,1.242426,4.989290,3.469941,2.386112,2.852183,3.054364,4.844724,0.808706,1.361979,3.547955,1.199290,4.356486,1.732671,0.904197,0.238104,2.977975,4.126411,1.368966,4.587697,3.788671,0.306503,2.863165,2.837205,1.011862,1.672722,2.291394,0.240389,0.748882,0.820022,1.896179,3.736787,4.156518,0.814245,3.759530,3.353550,4.453437,4.843956,0.622303,0.403369,3.998651,0.810854,0.972873,4.410180,4.694824,1.592356,4.210841,4.294285,3.026952,2.830442,2.879192,1.506446,3.094335,1.217901,0.888161,2.064752,3.528902,3.107138,4.824410,3.232280,0.706570,0.806091,0.465336,0.955869,2.989755,4.191432,4.469338,2.000219,2.792915,4.045998,1.560353,2.978345,0.870413,2.382702,0.865361,2.312132,1.984098,2.166324,1.218561,0.680217,1.378327,1.197900,3.671481,3.584875,2.922415,0.456669,2.831309,0.396185,0.090865,1.762981,1.202725,2.973238,4.643212,3.599260,3.836804,4.754466,3.170455,2.888655,3.009340,4.329026,1.940495,3.976681,3.261285,1.522858,0.068442,1.049600,3.499944,2.898452,1.372973,2.171512,3.305744,0.635431,2.161398,2.083121,2.713005,2.609568,1.838633,3.813668,0.336145,0.177692,2.101297,4.483471,1.387847,0.861547,4.641042,0.841116,1.874203,3.645078,1.304620,1.149248,1.988336,3.936824,4.554917,0.156463,0.825541,4.793006,2.963956,2.757051,4.067718,0.198916,0.069181,4.837470,4.142853,3.736909,0.778504,2.383020,4.686468,4.667998,0.046236,3.762457,0.031189,4.921509,2.084836,4.867594,1.838734,1.465936,1.581460,3.653395,0.998364,4.320288,2.952863,4.849555,4.935425,0.925910,4.778910,0.232692,0.139319,4.719323,4.811984,0.736238,2.212079,2.470463,4.301406,3.139586,3.872832,2.425484,3.242069,3.677047,3.689406,0.008689,0.499540,1.818302,0.305987,1.914949,1.947834,4.601168,2.835359,3.531756,4.435993,2.210647,0.009811,1.426680,4.070794,4.509206,1.757548,1.469956,4.622526,1.755369,3.261226,1.401546,0.489594,2.506182,4.616159,3.093204,1.044133,3.412148,3.841806,1.603803,2.796047,3.409766,0.801766,4.820505,2.256260,4.898322,0.947869,2.418868,0.829268,0.050904,1.189376,2.015937,2.155654,4.432526,3.178386,2.172208,4.939988,3.071122,1.613315,3.456554,2.478500,4.405838,4.482556,1.836752,2.811695,1.328867,3.133184,4.961735,4.162943,1.832050,0.476902,4.833410,1.947924,1.466904,1.581677,2.449617,4.783757,4.933112,1.480634,1.757344,2.559033,0.040936,0.874183,4.680295,0.147176,0.504881,2.103235,3.657251,1.344391,1.529828,1.527365,4.363010,1.130488,2.812009,4.999656,3.642327,1.681753,3.827295,4.769579,1.867689,3.540056,0.379021,4.476484,0.481284,1.864625,2.712529,1.317888,3.246347,2.772144,3.585926,1.770697,2.730069,4.060927,4.053482,3.571200,2.709679,3.366306,0.434401,2.356586,4.300718,3.036824,4.708416,1.310893,0.481509,3.133067,0.454630,3.910677,1.283712,2.693759,4.056885,3.940177,2.479875,4.879232,2.488166,1.393957,1.512156,3.718214,2.185535,2.093942,0.102433,1.526391,4.301915,4.017522,3.732554,0.115642,0.134951,1.557325,2.372266,4.548706,1.923149,1.442625,2.855765,4.573471,3.693194,4.283331,0.910988,0.628322,2.720356,3.486854,4.774940,1.857672,1.732784,2.579271,3.424690,2.830119,3.615153,1.901575,4.310988,0.914878,1.579523,3.868388,1.678361,3.340773,1.438988,0.935522,1.503663,4.434966,2.304416,1.127076,1.607193,0.013855,3.779041,1.128387,2.989605,0.125548,4.172492,0.937224,0.023842,1.505939,4.602436,1.313071,2.517394,2.036149,1.471246,4.636768,3.944975,3.809567,2.630536,4.124308,2.292143,2.325948,2.468870,1.184551,4.618259,1.293753,0.990797,1.218759,4.086761,3.842728,2.135534,0.068910,4.878675,0.662655,4.257113,3.908615,4.690379,3.866993,1.656858,1.159570,1.888454,1.015436,3.597874,4.132593,3.232194,0.930464,0.186924,2.902006,2.313366,0.998520,1.840420,2.707331,3.164586,2.383219,4.856964,0.231132,3.291040,4.547790,1.182821,1.068536,3.811164,2.431869,4.960888,2.945618,4.617210,0.061053,0.772698,3.422095,2.082332,4.179823,2.144490,3.564983,2.830800,0.599518,3.589756,3.531859,0.578591,2.809557,1.678250,2.294249,2.113793,0.523872,0.790115,0.434043,0.962235,4.262222,0.122613,2.158086,4.004682,0.501291,1.138568,3.637199,3.237762,2.815119,0.858204,3.972655,0.707071,0.673989,3.975175,1.846117,1.563086,1.393360,1.624861,1.702938,3.481838,1.201311,1.626632,3.881058,4.565753,3.064180,0.525591,2.707923,3.138894,1.570263,4.140002,3.910394,2.876534,0.725078,3.486907,4.476743,1.250506,4.793429,3.856512,1.501608,3.084106,1.539240,0.497339,4.120743,3.329035,3.070003,0.710864,1.886886,4.383180,0.816522,0.239514,0.955757,1.250900,3.918213,3.240707,0.086714,0.086448,2.834482,3.166462,0.627109,3.052311,1.201760,1.683607,2.044158,0.580974,4.815468,4.868822,2.225008,1.287332,4.792972,4.090287,3.621143,2.309059,2.052894,3.896746,2.598068,3.302911,2.830965,3.560927,0.470525,1.888105,0.835446,1.210220,1.004121,2.516611,0.094965,4.819838,2.594819,0.262858,3.410269,1.344440,0.533838,4.151518,0.989538,0.523771,0.284532,3.642789,3.276356,0.040996,1.107403,3.523410,0.760704,2.883754,1.065782,2.246171,4.337115,1.512982,3.429862,2.191406,0.480776,1.803175,4.206400,4.865231,4.225408,0.811142,1.727546,4.155941,2.769480,3.880929,3.888916,0.355440,1.712033,2.395108,4.726124,4.491144,2.115160,0.478330,2.022711,2.679517,4.521986,1.474396,1.544321,3.135916,2.525958,0.979345,0.723636,2.447486,3.896955,3.894156,4.879018,1.913591,1.959947,0.009097,4.149587,3.233142,3.849611,2.353116,4.600967,0.145569,0.576406,1.880087,0.425530,0.439439,2.834363,1.080610,3.132676,4.646999,4.119411,1.242152,0.448315,4.750962,4.972480,1.872474,2.303386,0.726668,3.550904,2.109168,4.015076,2.886484,0.213919,1.674773,4.042981,3.440569,3.162660,3.362523,3.025184,3.205622,3.102106,2.667140,3.788736,1.847463,2.376192,2.007248,1.046052,1.609445,0.275075,1.627638,1.952915,0.466920,1.102276,1.247709,1.137351,1.751109,0.724381,3.657507,1.713274,0.611826,2.967999,0.898241,0.290282,0.816461,2.099974,3.467545,3.207504,0.026030,3.966453,1.678439,3.398578,0.163366,1.968941,0.098053,4.081728,0.934836,3.372740,1.385331,0.676756,4.651477,2.975123,4.453155,1.532997,4.149177,4.708412,1.975919,4.520655,1.675429,1.623000,4.978663,4.762052,1.143092,4.186010,1.712289,4.896217,4.249088,4.524597,2.868368,1.470757,0.987625,2.639360,3.357579,3.708943,0.851916,2.679440,2.180549,1.041121,2.764812,1.379569,2.675273,1.000547,4.499713,1.690514,3.051673,0.609665,3.150086,1.360202,4.782658,1.970771,3.037033,1.079067,4.307381,4.021665,1.228177,4.555243,0.200775,3.762866,2.289344,4.177297,2.327430,0.327910,1.132728,4.971874,1.670888,0.801526,4.029154,0.225349,0.332044,1.487594,0.237005,4.978563,3.455644,2.597932,4.025832,3.312434,0.866325,1.098169,4.338471,1.684807,2.238202,1.955679,0.260149,3.522869,2.700370,3.380700,1.391157,2.034570,0.963249,2.098413,3.267457,4.723445,3.317286,2.625799,2.081836,0.527748,2.385371,0.775540,2.910936,3.651235,4.732478,1.484264,1.984528,0.914760,4.389703,4.120386,3.874799,0.286450,2.783597,1.175068,0.598426,3.908066,1.057907,2.504058,2.630482,1.066410,2.461306,0.264099,0.000362,4.401610,2.077944,4.537099,2.481537,2.155541,1.479561,0.408445,1.548473,3.042351,3.813932,2.704128,3.791279,0.788758,2.916200,4.413016,1.089801,1.138345,3.742163,4.060284,1.240232,1.657849,3.158847,1.992159,3.120055,2.482150,3.868257,4.229443,4.319136,3.057625,3.062921,2.248234,0.138070,1.495901,0.318489,2.188926,4.247426,2.984010,3.377663,0.940040,1.309766,0.815661,4.213444,1.401565,2.811632,0.705643,0.619945,1.737917,1.651766,1.644266,3.004664,1.579951,3.843679,0.453354,1.623929,3.345966,3.014661,0.597578,2.197367,1.546107,3.159352,0.649351,3.352830,2.319163,1.374450,3.737220,0.939549,0.761190,0.076780,4.306502,2.461828,2.583578,0.573813,0.538881,1.668917,2.581153,3.504361,2.496352,4.157792,1.886962,0.140440,2.130761,0.425013,1.610272,4.925773,4.286771,1.182279,1.879812,2.155826,3.819342,0.167286,0.193114,0.585589,3.141625,2.072733,4.244628,1.420289,2.446260,3.533929,2.726006,1.584000,0.762714,2.703017,0.710783,4.696522,2.699453,0.874577,3.603213,0.517736,3.858224,2.286446,0.663310,0.186055,4.966890,1.371841,4.761243,2.509182,2.515077,0.455349,4.753529,3.664479,2.593639,0.601286,0.878383,2.160833,1.811294,2.790690,0.381720,0.201730,2.555515,0.142507,0.297760,1.881707,0.308895,1.927348,1.208753,0.938851,2.023399,0.599520,1.748197,2.174368,4.150015,4.664031,1.541692,1.463210,2.832591,0.687072,1.748561,0.266082,1.895341,0.570757,2.809065,3.207969,4.935458,0.975693,1.036011,4.737098,4.323204,3.080270,4.207036,1.048461,4.370144,4.336538,1.240561,2.541867,4.648871,3.395750,3.302596,2.798823,1.344158,4.892077,2.237548,1.557250,3.642904,3.038524,1.711207,1.518958,1.072533,0.392432,3.128555,2.528468,1.174242,0.275623,0.094505,3.692480,0.941266,1.333218,0.070561,0.753195,4.372229,1.210304,4.769791,0.821734,1.266307,4.338550,2.133042,1.339145,3.464069,0.256142,4.453026,4.207808,0.428985,3.993094,4.805852,2.460348,2.840767,3.398984,1.333635,3.248306,2.374338,2.027709,4.514008,3.989516,4.673038,4.183259,0.209053,3.032647,3.488184,3.324287,1.359782,2.128152,0.195146,0.470471,2.802560,2.912059,1.006146,2.241014,2.360386,0.056684,0.712604,3.121500,4.964101,3.251959,0.601083,4.107201,2.157689,0.418501,2.999123,1.140230,2.083909,1.591471,3.214270,2.155173,0.519910,1.078378,2.502226,3.945921,0.048716,3.062136,0.579409,3.020247,4.184038,1.142415,2.477574,3.870265,0.877887,0.762806,4.525229,3.473233,3.682867,4.219843,2.697129,2.442027,2.781287,3.585090,1.954687,0.475841,0.677984,4.869515,0.258588,3.558097,4.718408,0.646298,3.611322,1.512283,1.184825,4.263113,4.546768,1.735253,3.163238,0.879688,3.948797,4.406199,1.593362,3.264835,4.382088,0.076875,4.278676,2.860572,2.070077,2.613079,4.120310,3.610648,2.506324,2.438262,4.496289,1.161711,0.478508,3.393191,3.511059,2.841930,1.312683,1.479765,3.085216,1.364792,2.498106,1.660372,2.552191,1.146819,0.990302,3.669992,1.928638,1.162831,4.292102,2.008502,0.579351,3.540240,1.399860,2.826211,3.118465,4.812872,0.955506,1.420860,4.661099,3.591465,2.246655,3.673867,2.066926,2.050258,0.782084,2.610241,1.313322,3.167967,1.993031,4.268605,3.856813,0.739666,2.955460,3.568703,2.572205,0.569736,2.516237,2.164495,1.628772,2.912678,1.624362,1.177783,3.679506,1.066855,4.026441,4.895805,2.206194,4.061962,0.841839,3.986518,4.812336,2.585117,1.278599,0.804131,4.583134,1.622863,2.485019,2.167158,2.176078,3.826291,4.675792,3.183873,4.785691,0.952223,2.819686,3.427535,3.574882,3.779237,1.665751,4.410973,0.658528,1.392679,2.343570,2.959990,1.476421,4.539128,2.259234,0.501687,4.095259,4.827269,1.731638,2.773218,2.915353,4.008105,0.759191,4.206270,3.608048,0.174600,2.834576,0.140169,2.482200,2.997066,3.174399,4.634393,1.485285,4.222829,2.261106,3.334699,4.039717,3.620206,3.977503,3.180348,4.003903,4.545067,4.522094,1.639441,4.859864,0.288335,3.082013,2.476123,1.152380,2.675740,0.329773,2.768571,4.272327,0.704862,1.626761,3.155616,1.796506,2.075015,1.692254,2.413349,1.865980,0.721242,0.994064,0.396233,2.338285,4.227020,0.452755,3.293627,2.101116,4.356905,1.816568,3.472217,1.995561,2.709742,3.874728,4.839285,0.674437,2.645485,0.661343,0.152519,3.739753,4.916357,2.977016,0.362163,0.308640,1.572737,1.904420,0.019332,4.213415,2.342899,4.978538,4.420735,2.503882,3.135291,1.572760,1.516781,0.651025,2.727001,0.408356,2.234298,1.608622,3.952667,1.907228,4.507477,0.947652,4.652733,2.966433,0.601208,2.510751,1.339591,3.745182,3.256547,0.313683,2.087731,4.435681,2.039135,3.718153,0.566913,4.334583,2.512159,4.737861,2.686606,3.846128,4.860569,3.646735,2.886367,1.833541,0.212625,2.162729,2.062402,4.115311,0.946264,3.713224,0.187818,4.431827,3.339713,2.112219,1.327539,0.922005,2.928226,2.051193,3.715114,4.533873,1.478258,3.249502,2.113611,0.213695,3.077163,1.818513,0.068630,2.361400,0.458345,3.140848,2.632482,2.501744,4.684396,4.402137,3.569670,2.887704,1.261847,0.040814,0.598174,1.601471,0.983639,2.850019,2.674749,1.948957,4.002723,3.655786,3.439414,2.513376,0.217226,2.140139,2.495909,2.239238,0.022373,3.262144,1.286964,0.223294,2.517343,4.602737,0.147201,0.068708,2.938740,2.714931,0.078532,0.515344,4.181973,2.263192,0.621936,0.779602,3.057114,1.643330,0.128526,3.180092,0.161765,0.551400,0.793841,0.716390,3.807815,0.467227,0.743208,2.235078,0.700418,3.734680,2.438729,4.398217,0.190579,4.275992,0.769055,4.628174,1.630206,2.553915,0.118470,3.645695,1.068856,4.583084,3.308935,1.418096,1.304543,0.852396,4.009353,2.192384,1.384728,4.764098,4.011204,2.931515,4.012243,0.600634,3.360819,1.620758,3.437545,4.808286,3.901798,2.827794,3.727666,2.341658,1.399726,0.203170,3.386015,0.712957,2.296740,3.333773,4.456470,3.046818,1.088623,2.370278,3.338100,0.976588,3.660859,3.819121,2.612647,4.294006,1.123699,2.688687,4.470821,3.520758,4.034372,1.110465,2.863903,1.620214,3.294582,2.613048,3.127444,3.088350,3.682179,3.994411,0.309389,4.741884,2.032225,0.850485,4.609901,3.919957,2.101769,2.999573,1.130986,2.065652,2.004700,3.770202,2.158615,3.774356,3.950397,1.928099,2.200317,2.603580,0.017553,0.975275,4.235686,3.804702,0.385758,3.174488,0.103677,2.671018,0.807408,4.267262,3.074076,0.319911,3.206269,4.460991,3.668532,0.576012,3.325466,3.053513,3.156759,3.975811,1.522096,1.777343,1.009081,2.285880,2.049217,0.420509,1.213033,0.599638,2.772542,0.936333,1.628011,4.085267,2.859246,2.597916,4.721814,2.186757,4.418205,2.889270,2.026677,1.730360,4.516890,2.826227,1.258568,2.597344,1.248854,1.203344,0.645707,3.446546,3.905218,1.618060,2.046483,3.965340,0.081516,1.664155,1.537972,2.717258,4.474346,0.202584,4.213857,2.785639,2.938335,4.784828,0.641416,1.383218,1.150259,2.344200,2.899149,3.639315,0.265196,2.130647,4.621372,2.312964,4.088114,0.559899,1.448408,3.676984,3.106771,2.215763,3.344570,3.854842,4.487544,2.201776,3.213048,1.907301,4.635249,2.403418,2.052615,4.697356,0.009806,1.659855,4.191028,2.257242,1.741932,2.939082,2.023379,1.647518,1.329867,1.565227,4.620810,4.798365,0.494153,3.677069,3.288813,3.154843,0.164217,1.367270,3.730514,2.479034,0.119442,2.632578,4.239024,4.392101,4.493130,2.636662,2.334838,1.221723,4.330388,3.999286,4.317874,1.129725,0.489515,3.492225,4.565756,4.582884,2.643157,3.210526,0.560406,1.376439,2.688755,4.403844,2.420699,2.963541,0.277682,4.823270,2.462136,0.801352,1.694855,2.566537,0.692572,0.983234,4.579485,4.362763,0.611511,1.394990,3.177922,1.298768,0.010419,3.506073,0.965393,1.624778,1.419682,0.761846,0.678426,0.724567,4.837458,3.634254,4.700377,2.857700,1.655044,0.819634,2.416781,2.466993,3.887349,2.642197,0.974252,4.070954,0.739580,2.644570,0.212346,1.845905,3.359366,0.693543,2.624400,2.694196,4.546776,2.333147,0.391754,0.729686,1.378043,3.994770,1.275542,3.047146,0.391908,1.010727,3.095714,0.490694,3.577713,2.245501,1.397876,4.369501,3.365791,0.320922,3.350988,0.991896,4.601295,0.768660,3.083448,1.212033,4.710832,1.622336,2.948183,0.647547,2.396860,3.044181,3.853481,2.785337,3.517994,4.295408,1.492784,1.700835,0.147869,2.771309,4.857655,3.680513,4.962928,2.271760,3.737368,0.806041,2.110032,3.218069,2.251560,0.148611,1.584213,3.380339,1.975969,2.242025,4.280896,1.346954,3.079658,4.228853,4.035753,1.193618,0.255449,1.384139,0.882017,0.138554,1.521808,2.604057,3.251595,1.889476,1.021415,2.846530,3.761832,3.474758,4.284923,1.319335,2.515049,2.442187,1.607913,3.432105,0.671171,4.025746,0.183096,1.940899,3.036602,2.121820,3.278461,0.194003,4.335803,0.388286,1.438732,1.466845,0.059068,0.470119,4.259420,3.879074,3.689967,3.446481,0.372650,1.493287,0.032866,0.302605,0.189438,0.994670,0.281418,0.084419,1.224574,3.994270,0.281555,4.922746,3.287916,4.334104,3.303505,3.884369,1.503894,1.286623,3.322125,2.815772,2.528316,0.886276,1.153243,2.748626,2.049590,4.812561,2.764112,2.158558,4.752994,0.458069,1.358910,1.731972,4.267513,3.832060,1.523571,4.362817,0.312783,2.467335,3.273421,1.560972,0.345855,1.285802,2.418859,1.590532,2.078359,0.465623,0.071368,4.388063,0.390559,1.464123,3.320227,4.222522,1.606314,3.260343,2.360656,0.255065,2.041815,0.149240,4.820951,3.810919,1.696462,1.173702,2.001636,1.580822,1.853972,4.593572,2.022626,3.706997,0.784065,2.668405,2.468670,2.956160,3.399437,4.305097,1.149836,1.907671,0.285914,3.120906,4.673800,1.980986,4.858755,2.989376,1.056234,2.647645,3.200228,3.331364,3.190209,0.948070,1.041553,1.207315,3.664970,2.496773,3.356278,3.996817,2.820348,2.355705,2.012575,2.681314,0.747892,3.932228,4.563796,4.061825,4.109478,4.147007,0.878246,4.979064,3.285929,2.104635,4.440119,2.911756,4.968123,3.760368,1.837554,3.712811,3.650550,1.564954,4.420876,0.703825,1.826368,3.181371,2.395696,3.390779,4.986768,0.389983,3.794844,4.087123,1.411007,1.275780,2.206788,1.969284,2.539095,1.057921,2.469002,4.063762,4.414417,3.333811,1.440652,4.366226,2.106140,1.159036,0.672987,4.808344,0.439896,2.648802,1.010886,4.341402,0.972633,3.682399,0.825580,4.690561,3.316625,2.075604,4.812413,2.620254,1.920369,0.812378,3.605447,2.981665,1.114464,1.249809,1.101911,2.479209,0.236447,1.446237,3.683120,3.106150,4.092981,3.724125,0.106387,2.847846,2.192084,1.806500,4.961908,3.284817,1.255350,2.664330,0.476160,3.726366,1.738259,0.844417,0.812107,0.076144,3.889401,3.643499,2.425129,1.529824,1.958058,4.420442,0.606499,0.147824,1.078622,2.603428,0.038415,0.521324,3.489320,2.240314,4.743195,4.553833,1.382289,1.888580,4.590859,2.896288,1.848610,4.002034,4.622521,3.367465,1.154518,4.096303,2.102631,3.490233,2.431768,4.704325,0.341876,0.778984,0.972841,1.105003,1.177138,0.764251,3.464588,1.090779,1.177267,0.986941,1.993436,4.792966,1.833901,1.488121,0.342998,1.762638,1.160980,3.814637,0.558141,0.718405,1.392552,1.440134,4.231525,3.956418,2.893178,1.442943,1.594392,2.961091,3.699333,1.920490,2.547810,4.440166,3.248954,2.677751,0.356112,0.880076,1.004958,3.115741,0.540564,0.144974,1.801753,3.594296,3.466247,3.963352,3.481241,3.066428,2.430810,1.042492,2.842740,3.183124,0.618717,2.825737,0.488744,2.735384,0.794594,0.595068,0.565500,4.555127,2.990437,1.250794,0.357244,2.680907,0.724015,3.892015,2.480548,3.632244,1.978633,3.511614,3.423072,2.807081,4.228698,2.912368,2.890552,1.539916,4.657531,2.585698,1.958573,2.708211,0.726211,1.325626,1.533409,2.575794,3.477554,1.436012,0.678830,2.796091,4.273249,2.091160,2.378865,1.446043,4.044171,0.603325,0.855444,4.999783,3.411079,2.740262,3.975540,4.984412,0.954371,3.956965,1.710810,3.656163,3.538299,4.991650,0.559360,0.010627,3.738922,2.843885,3.454371,3.767625,2.467533,1.782673,3.851879,1.900650,3.110961,4.467030,0.791957,0.044531,1.283783,3.987360,2.834128,4.730804,2.739370,1.328907,3.829427,3.287752,4.103417,3.339992,2.259745,1.385413,0.278002,1.539681,0.231292,2.150135,1.129000,3.518238,1.100893,0.407159,4.193986,0.300164,3.754792,4.647127,0.535646,2.798340,2.258634,3.993550,3.117400,1.391367,0.007345,2.414339,4.470544,4.526816,0.626485,4.303385,0.172156,0.461746,4.831104,1.934837,0.353919,2.352277,0.230685,0.081851,2.808751,1.056031,3.109563,1.673496,0.662385,4.922009,1.249707,0.309886,1.394183,1.258500,1.498232,1.778371,4.025826,0.298922,1.772663,0.518728,4.910983,0.719859,2.395175,2.400217,3.905891,1.360729,3.688869,0.131693,4.635752,0.494778,2.404148,0.867149,1.843084,3.210103,0.712361,1.445543,3.395912,4.222723,2.964489,2.614923,0.548045,0.732702,4.790957,0.013124,2.422093,3.781712,1.049815,2.297819,2.465306,1.301986,4.393756,4.625781,3.746684,0.043183,3.144628,1.160559,1.335923,0.919020,2.862057,2.233593,0.967821,4.663205,1.196116,3.893695,0.123455,0.917401,4.094330,2.682133,3.230538,2.144492,2.178161,0.627020,0.854963,4.594985,2.288161,2.362275,3.331654,0.070635,2.663471,4.426678,2.086523,2.063018,2.266551,4.275510,3.050005,3.736755,3.590751,0.254299,4.883498,3.531041,2.900626,0.225883,4.590406,2.347784,4.555962,2.092035,2.886525,4.468590,2.304155,0.897657,2.125325,1.908133,3.654315,4.203668,0.056661,2.474076,1.336335,0.822163,3.328528,4.177728,2.722029,0.968971,3.756427,2.606663,4.023191,4.823614,2.096755,1.595010,1.410398,3.454932,4.859387,1.429095,2.311391,2.881655,4.769618,1.235726,4.808165,2.620130,3.641935,3.906704,0.823046,4.873723,4.880603,4.330850,4.216774,1.631322,4.260332,4.441640,1.332632,0.853281,3.784894,2.888676,0.539316,1.997528,1.660000,3.303454,2.102026,3.243381,3.996940,3.535363,3.087677,4.532339,1.238909,2.537782,3.780558,1.120172,1.058468,3.421365,3.903196,4.431824,2.241568,3.581480,0.854748,1.573796,3.160604,0.739418,4.778412,0.639287,3.883821,1.593069,3.664526,2.023789,3.738144,4.501692,2.980717,0.819640,4.755347,2.662428,1.197137,2.042137,3.605463,4.676502,4.532932,0.701446,4.358948,2.950836,2.048397,2.321835,3.973059,4.223875,3.289484,0.292306,4.042318,0.128721,1.938841,2.220837,2.530533,1.279767,2.095331,3.936492,1.356332,4.066254,0.062879,0.713994,4.626503,2.352000,0.253988,3.052216,2.280035,0.442938,1.739812,3.072130,3.138543,4.434515,2.462530,0.523689,0.567766,2.084017,0.926606,4.604769,1.060391,1.881849,2.561909,1.652011,3.322981,3.026278,4.696838,4.159795,3.014808,2.233559,3.073873,3.115330,1.347888,0.890088,2.595038,1.536316,1.926152,0.008318,3.408390,0.290077,3.677357,1.039799,0.823825,3.002781,4.917365,2.110348,4.346596,0.309204,2.543341,3.408829,1.876946,0.647348,0.077032,1.933712,3.713692,4.952759,2.315363,1.474586,1.733334,0.459655,2.250566,3.135643,3.117887,0.063845,3.168660,3.328432,2.510123,4.724396,1.290224,4.259580,0.871108,1.309776,1.024494,4.426597,3.967628,2.252419,1.890115,0.064506,3.509698,4.824691,3.892597,1.165383,1.322510,2.114014,2.038658,1.161688,3.958089,3.930428,3.532354,0.024803,4.586891,1.687791,0.144094,3.187095,3.687996,3.354805,1.954581,4.305830,1.782543,2.691291,4.608783,3.639477,0.473342,3.885693,4.508455,4.126941,2.383826,4.125739,0.378145,1.271133,4.334334,0.206939,1.990270,4.302349,2.229274,0.423104,2.295563,3.661080,1.581960,4.532655,4.703982,0.838828,0.466932,1.496784,2.345213,0.785070,1.207842,4.666494,3.574400,2.989730,3.539779,0.013629,0.727607,3.458751,3.574842,4.264865,2.927751,2.786250,1.988189,4.082780,4.260115,2.257965,1.877964,0.252025,3.960383,3.365285,2.196010,2.523427,4.480261,4.388370,0.895418,4.245047,2.548695,0.530590,1.557419,3.434729,4.467170,0.541749,3.048266,3.390645,1.380885,3.783203,0.516642,1.198384,0.002455,2.513690,1.317180,0.390337,4.404407,0.993325,2.836599,1.357327,2.987498,3.271483,3.627956,1.478630,0.236276,4.286358,4.846469,4.431124,0.413050,3.925681,2.430017,3.160607,3.058576,2.675156,3.375390,3.081607,2.884204,0.714123,4.324687,3.767477,4.821846,3.958715,2.912606,4.585838,3.271314,1.550648,0.877517,3.021539,3.680871,4.120811,1.426440,4.510001,2.889856,3.615465,4.040664,4.656410,1.449952,1.962333,4.499837,4.172381,1.995681,2.336691,3.585738,0.306248,1.836593,1.031151,2.593976,3.860512,0.649624,4.933672,2.335559,3.865083,1.762082,2.440684,4.824321,3.451311,0.128266,1.159911,1.296304,4.794535,3.847843,3.393153,0.348254,4.019073,0.908366,0.743902,4.344250,0.025186,0.316399,4.597030,1.257777,3.871691,3.285866,0.561162,3.974645,1.036955,3.477133,1.904267,2.723799,4.731032,1.295899,1.505497,1.462627,1.850114,2.883117,4.001256,4.465568,0.305944,3.250483,2.962023,3.004695,3.966667,4.689281,3.741281,0.858124,4.773256,4.326030,1.498277,0.611262,4.029953,4.881759,0.637436,3.256797,0.049184,0.177465,3.925911,4.077918,1.746731,2.239802,3.897386,4.288523,1.380504,3.921439,1.004390,2.236711,3.594486,3.428992,2.511445,3.349367,0.252664,1.441336,1.081365,0.408965,1.038446,4.300151,4.481397,2.665531,2.421976,2.315838,4.795225,4.704093,1.082440,0.474959,0.271916,1.788317,2.087714,1.238379,4.601125,4.185770,3.722315,2.419482,4.432479,4.725937,4.438360,1.306806,4.321137,1.751836,0.616341,3.718112,4.044423,4.933904,2.404787,1.255113,0.326958,2.065918,2.887143,2.482490,0.813938,1.857727,4.589532,2.296469,2.561117,2.359558,1.923576,0.303135,1.145923,2.499989,2.922164,2.390690,1.819464,4.017487,3.473828,4.727101,0.138678,3.720397,0.306879,1.454897,4.585510,3.876776,3.310096,1.998482,0.249138,1.301264,2.404344,2.113892,2.290663,0.151555,3.165371,2.254828,0.083944,4.696067,0.988502,0.847948,3.775470,1.743316,3.057742,0.029831,2.157169,0.124170,1.047809,0.973587,4.854634,1.512065,4.196257,2.103783,4.310647,3.313936,0.035462,0.558001,0.156725,0.452225,1.101570,3.927913,3.668403,1.223568,1.952115,4.297440,0.361606,2.824079,0.575140,4.970274,2.208231,4.576356,0.764914,4.951531,0.296520,0.294612,4.116186,3.882961,1.239684,1.234230,2.363275,4.718013,3.129433,4.162648,4.335517,0.672247,2.894043,4.934704,0.478226,2.217732,3.824267,4.947885,0.598581,2.022197,3.764803,2.970400,4.393265,0.510733,2.712563,3.045970,4.071323,4.228113,2.370825,3.021625,0.039264,3.445145,0.077230,3.235442,2.529480,4.770299,0.815370,1.918884,4.286488,2.570477,4.073122,2.537127,3.412010,4.407713,0.274079,4.404290,0.894803,3.776485,2.829156,1.664612,4.792549,4.207167,1.427786,1.013416,1.794953,1.660579,0.798786,4.687038,4.438125,4.374225,2.278557,3.948001,1.801788,4.302994,4.532225,2.691500,2.380961,2.663495,1.190611,0.459293,1.934600,3.920373,3.408759,4.204364,2.257341,0.621360,2.613126,0.197450,2.154342,1.007084,4.221240,0.644630,2.373187,1.925688,4.226925,2.808124,2.374773,2.980970,1.160706,2.606918,1.750188,0.544590,3.957493,1.803977,1.394556,0.002848,0.190022,1.259222,1.647651,3.495638,1.842280,3.982624,2.935831,1.752835,0.786987,0.006847,1.915571,2.033602,1.819456,4.012020,0.477776,0.574511,1.167317,2.568664,3.629507,4.518319,1.335474,0.638997,2.546072,1.497962,4.922460,0.199213,0.954475,3.767794,1.931888,2.811191,4.077259,3.334316,3.017755,3.409118,0.321223,0.488996,3.037745,1.839222,4.978571,4.103295,4.632392,0.902316,3.123651,0.139387,3.675712,0.211108,3.370398,1.061844,2.955955,1.379873,0.112014,3.427685,2.243296,3.621153,0.281422,2.651017,0.271332,0.719235,3.922066,1.143362,0.466618,0.709044,0.707161,4.219119,2.949713,3.961745,1.286095,3.131704,4.494538,2.669777,4.353670,1.090229,4.834634,0.398462,3.805542,1.008594,0.584439,2.795130,1.585111,1.112600,2.195616,4.942107,3.163388,1.393015,4.929511,1.395833,3.598258,1.316664,3.871532,3.219921,2.863534,2.294474,1.214216,3.047136,4.371738,0.156527,3.663349,4.399613,3.084439,1.292153,1.757375,3.744024,1.834112,0.040366,0.527591,1.426702,1.965849,1.821624,4.032139,1.107914,2.051567,4.071134,3.967186,1.026127,1.820365,0.781566,0.450500,2.770966,1.597461,2.568446,2.939549,3.030961,4.703826,1.173246,4.490426,0.256543,0.151914,0.543840,3.218446,2.651468,0.810616,0.739525,2.647147,4.795029,0.913650,1.295648,0.602916,2.973009,4.633846,1.190076,2.362106,4.538073,3.541416,2.641433,3.196534,3.654198,3.642392,2.424886,1.407380,1.030873,4.593069,0.291233,1.685366,3.450251,3.000345,2.166093,0.521164,0.697640,3.482614,2.418483,1.697754,1.873968,2.143430,3.415283,3.004739,0.352415,0.787389,0.352778,0.172951,3.880025,4.254795,2.080889,4.844204,4.317989,4.301925,1.835922,4.771736,3.744649,1.768462,4.444164,0.020561,2.857955,2.600864,0.408950,4.311782,1.408556,1.881750,2.375767,4.084674,2.974690,2.819786,1.811888,1.398423,2.390601,1.278668,1.697557,2.201882,4.217504,4.652553,4.148707,2.628499,3.557786,1.676043,2.295985,4.702448,1.774737,0.864928,2.360470,3.262958,0.632571,0.610507,1.518474,4.538246,3.373019,1.109671,3.017438,3.301199,2.615273,3.796912,0.123695,0.955586,4.831859,2.488700,0.382574,1.540898,0.008862,2.897071,4.997391,2.950497,3.050365,1.638633,1.185163,2.540783,4.498931,0.048756,2.848254,2.142555,3.105897,4.199790,2.245220,1.088414,1.883035,0.752757,0.424496,1.879382,3.128493,1.314177,4.578421,3.444756,3.431567,3.458553,0.008422,4.065034,4.588043,0.096990,2.991470,3.382879,0.981213,4.191056,3.129157,1.125275,4.835951,1.079328,3.392939,2.369449,3.616424,0.488796,4.762726,1.022445,1.101920,2.770143,1.748666,2.210648,0.185492,1.174422,3.867666,4.511076,1.167387,3.866745,0.144733,0.223621,1.965046,0.739556,0.830693,3.136985,4.290821,3.894836,1.682469,4.376080,4.206730,2.621058,2.379380,0.292312,0.752625,0.427066,2.633863,3.383192,3.093910,4.364426,3.293512,4.148538,0.702126,0.858240,4.592061,1.773523,1.084994,4.560346,4.850523,3.188848,1.941693,3.441929,0.077789,0.723561,1.843572,4.161123,1.521580,0.289359,1.893676,1.206271,0.280300,1.994621,1.757107,3.669200,0.316024,1.895272,1.712168,3.234108,4.439604,0.714949,4.081269,3.048617,0.146213,3.834443,2.688440,3.999644,2.044340,3.327514,0.994021,0.959223,1.701312,2.597203,3.582634,3.334024,4.106723,2.131985,4.562646,0.545839,0.936017,3.418588,1.268863,0.822953,4.432469,0.342004,4.957356,4.312947,4.341289,3.143565,1.124278,3.990458,0.269003,2.910577,2.195798,3.752034,0.118841,1.933928,2.385472,0.761796,2.073601,4.552388,2.343171,1.258881,2.661675,0.304212,1.471343,3.918184,3.209571,0.119924,2.849380,1.086700,4.878749,3.918435,0.639540,1.927728,2.449848,0.911859,3.521419,4.206894,0.022323,0.666117,1.417314,4.920551,2.022639,0.851260,0.604636,4.506781,4.051220,3.096503,2.698478,3.885769,1.590753,3.199273,3.684227,2.878244,0.843660,4.929524,4.055978,2.453135,3.099851,3.800380,2.292926,3.695581,3.864639,2.295037,0.938841,2.988835,2.771444,2.502468,0.292910,3.887816,2.693541,2.153257,4.074461,0.984423,1.358407,3.198635,1.950290,1.515346,1.273080,2.428654,3.877684,4.026630,3.952849,4.428226,0.253709,4.911084,2.132307,0.964911,4.850114,4.125912,4.648618,2.615769,3.738709,2.597320,2.697251,4.757505,3.691785,2.833889,1.963676,0.821638,0.578652,1.498331,3.464022,0.957763,0.657311,0.388787,4.231247,1.205949,1.004252,1.954269,3.147431,2.931299,4.618289,3.409861,2.809858,3.557991,3.318617,3.837392,2.862132,4.036454,4.500287,3.482384,1.788099,1.399891,3.185928,3.157146,0.119553,3.735547,1.109372,0.272451,0.765996,3.283904,2.615273,4.234689,0.531264,4.147583,3.254589,1.074648,3.684528,3.706666,0.540008,1.332234,3.194325,1.902873,3.826225,2.680212,4.284985,0.555130,3.668734,2.323200,2.596955,1.420228,1.345316,0.949019,1.866728,1.194939,0.948640,4.808980,2.237071,3.390612,1.870741,2.848969,2.496011,3.063441,3.613644,3.319546,3.810517,0.731522,0.470156,1.694497,2.409139,1.122013,3.866123,3.597780,4.567895,3.644801,0.535727,3.324974,2.060297,1.298074,3.009757,1.510951,2.654282,2.879887,2.645335,0.053433,1.743695,3.952311,1.734478,2.546897,1.733160,0.996190,0.998767,3.744298,3.139763,4.660285,2.105023,3.182836,2.342698,2.369689,4.270437,2.271514,4.640834,3.102536,0.427121,0.339915,4.911571,1.996797,2.937294,2.157930,0.794482,0.627759,1.063481,3.026689,2.732668,1.642942,0.220871,1.620140,1.991517,3.782119,3.687420,1.107040,1.138370,3.139414,3.258882,2.805514,0.559857,1.428601,0.158516,3.807971,4.032517,4.602403,0.439578,4.531065,4.592126,4.988530,3.889443,1.313189,1.322794,3.441084,3.398663,3.301646,1.765604,2.598986,1.507487,2.983954,3.862011,3.493481,2.162527,2.623642,3.862092,1.164265,1.106493,2.424934,2.470682,0.117364,2.909732,2.088707,2.881899,4.574118,1.665590,0.539179,1.032593,1.532685,4.317350,2.745371,4.975410,1.425160,0.343634,1.505941,4.962975,3.715496,4.575307,2.974224,1.376817,4.772157,1.145782,1.985570,1.466939,3.217295,2.090049,4.785541,4.837100,0.484570,4.641665,3.989980,3.561687,1.813930,3.397786,4.053332,4.152124,4.028878,1.600118,0.925065,2.718877,1.271130,3.924926,0.223350,2.127043,3.892940,0.402796,3.434896,1.155316,0.636969,1.539434,0.096681,3.150112,1.664544,4.968556,0.489197,4.474421,2.489789,0.588504,4.280587,0.555228,3.229296,1.226088,2.245588,2.865100,4.598377,1.422569,1.938474,0.997979,1.718108,0.629059,2.740417,2.796158,3.116866,1.151762,2.161778,0.207145,0.201283,1.547314,2.445715,3.464870,3.793367,2.008905,3.778032,3.638020,3.162371,0.708149,1.436220,2.669384,4.069660,2.016569,4.835331,3.327003,1.565278,2.807170,1.875368,4.559906,0.241736,1.144578,0.482833,4.028098,0.955397,3.714237,2.807982,4.151080,4.974744,0.771184,0.752087,3.181078,0.181522,4.087090,1.883196,1.994674,2.860229,1.710477,1.501176,1.024846,3.594107,3.843063,3.040513,1.180169,3.473795,0.789295,4.391412,2.231630,2.379306,1.020741,3.077556,4.925244,2.945502,3.261726,1.442446,1.629257,0.981778,2.573008,0.739873,3.092406,2.326551,3.121559,0.353604,4.420285,1.892907,1.034657,2.503919,4.649104,3.471431,1.700434,1.519218,3.306433,0.444023,1.827051,2.393389,3.802587,1.627587,3.960759,3.913437,0.097316,0.952066,3.266971,2.480210,0.138182,1.798244,3.128868,4.958432,1.034372,0.763595,1.821842,2.754563,3.322497,1.804074,1.142208,0.026122,0.917235,0.500318,1.210549,1.612872,0.393692,2.029230,0.838130,2.906838,1.889387,3.198260,3.880772,0.423515,1.912393,4.888876,0.011548,2.294555,2.344548,4.118608,1.451135,3.880153,0.011001,2.453750,1.596602,4.040778,2.014736,0.349392,3.541935,0.066115,1.672083,2.491650,3.708712,1.565320,0.520487,4.126283,0.049113,4.365656,0.532488,0.628505,0.831144,0.741715,3.973895,4.054907,0.847340,0.562588,2.862403,3.498535,2.795199,0.138449,3.830441,3.570951,3.586298,1.036066,0.351414,4.986422,2.388986,3.631214,0.482087,2.524661,2.520483,0.614290,1.758038,4.457317,3.451075,3.658354,4.391444,1.551428,3.949724,0.482694,2.887744,2.670740,2.155961,1.045846,2.137633,4.221416,3.653517,2.203016,4.837943,3.926460,0.221303,3.753683,3.592689,0.246103,4.632786,2.335194,1.195637,2.241129,4.168902,1.252529,4.570464,0.323699,0.446785,2.996620,2.548985,3.357525,0.217230,1.301212,3.515723,1.722008,1.523273,4.098885,3.980315,3.724955,3.138127,4.772026,0.105285,0.763215,2.299441,1.403449,1.466797,4.901481,0.221102,0.129489,4.675724,0.800450,0.214886,2.292726,4.409453,1.530324,4.661257,4.326381,1.402089,2.177196,4.618690,0.616434,0.309467,0.943598,1.128106,0.896945,0.158560,3.588295,0.809760,2.276945,0.601942,1.827591,1.987338,4.564930,3.526584,4.530711,2.445482,0.846708,2.048166,2.968392,2.706226,4.481527,2.961889,1.283154,4.762932,0.869631,2.382191,4.438253,3.549609,2.676912,3.439140,2.188967,1.984029,3.139190,3.685041,4.687301,4.182728,4.803463,0.579431,4.947367,1.001509,0.404520,3.284053,3.367436,4.869111,3.855118,1.963292,3.000527,3.047272,3.827094,2.905490,1.932203,3.407291,1.200508,1.747756,0.358156,4.081151,0.354995,1.493984,4.628165,2.797048,1.089400,4.964436,4.403647,0.340901,1.151425,3.211303,0.994016,2.685890,0.829304,3.363528,2.656181,4.847161,0.669066,2.653606,1.558619,3.063444,1.016278,4.626962,2.189609,2.158857,3.931625,4.537591,2.469869,3.856446,0.719705,1.262046,3.464952,4.633736,0.586044,0.671936,4.876136,0.456182,0.214479,2.658772,1.122057,1.488133,3.089468,1.756232,4.978271,1.141105,4.326377,4.376114,2.187932,4.986682,1.414001,0.455319,2.835975,0.037359,2.370819,4.184019,2.098535,1.019962,1.278278,4.569041,3.311064,0.806559,2.315967,3.072969,2.525702,3.925444,0.031462,1.405322,2.872954,2.694499,0.520401,0.876081,3.764794,2.673927,3.199837,4.083761,2.919133,1.569747,2.616251,0.651958,1.360386,3.275652,0.205555,0.004255,4.435362,4.821644,4.528063,1.077308,3.773289,2.282340,0.354719,3.974931,4.040874,3.609888,4.982754,4.960586,0.897102,3.977062,3.299120,3.632340,4.954503,4.183096,1.957586,4.687328,4.375827,3.531168,4.684797,2.311334,3.566281,0.020436,2.842905,3.618445,1.915059,4.339591,2.425339,1.412757,2.747225,4.527579,3.412244,4.750397,2.238096,3.292397,3.141968,1.195616,3.722878,0.339958,2.875621,0.890075,0.941718,4.899158,1.922603,2.598057,3.325569,2.491455,3.629382,0.130151,3.383508,1.621967,4.396820,0.717040,0.153217,0.304755,2.610926,1.076243,3.765888,0.277630,1.174144,4.151208,0.228206,3.938064,0.558825,4.213795,3.920211,1.093779,2.009862,2.290023,1.968883,1.055158,1.130789,3.453479,0.757786,1.409933,0.315129,1.090542,0.189043,3.491694,2.022145,1.888341,2.428191,1.306473,1.801668,2.954828,1.122619,2.309840,2.874613,0.690470,1.534850,2.761061,2.006299,3.579973,1.156609,2.353619,4.105230,0.713847,4.474640,2.236229,2.399201,3.179542,2.709168,4.116251,0.933200,0.649523,1.317423,4.989067,0.494322,2.652259,3.866904,4.162981,4.787123,4.975835,2.761281,1.203934,2.599482,3.680161,2.383339,1.361551,4.110465,4.145574,2.753239,3.007800,2.567671,3.910687,4.435391,0.010060,4.868135,1.720604,1.995637,1.838416,4.221817,3.683963,0.894554,2.040468,0.013634,4.015567,1.181402,0.415083,3.303845,1.095478,2.745038,0.806025,3.950542,4.909868,0.537460,4.207063,2.448948,0.257054,2.606538,2.409615,4.457065,1.701959,3.787461,0.661530,1.942516,2.696794,0.907612,0.988850,1.226704,3.713982,4.717455,0.635776,2.739700,0.735519,0.271279,0.197285,2.144532,2.126614,3.320962,1.949659,1.148582,0.481517,2.855789,1.086693,1.885753,0.087652,1.245210,3.255014,0.615689,3.306777,4.302104,4.346845,0.786979,2.336663,4.472818,3.649631,4.331932,1.934465,2.495063,4.475570,2.145069,3.350839,2.122954,3.540032,3.066124,2.208017,2.745110,2.990744,4.395291,3.384356,3.568772,4.849633,0.338309,0.938068,1.590611,4.730337,1.142775,2.825473,0.588806,1.353336,1.380549,3.542331,0.544145,3.784922,1.517731,3.667352,1.832806,2.132005,0.629154,0.534210,2.709209,3.185351,0.460653,0.697161,0.162214,0.812043,1.112888,3.453515,0.326073,3.437033,2.027142,0.714769,4.911646,2.521345,1.470921,0.277526,1.571608,3.062281,1.228865,2.846207,1.391391,0.222272,2.065831,1.783101,1.229451,2.644859,1.948114,4.749727,3.106146,1.790771,1.071683,3.325619,4.600644,3.135566,4.146961,3.421143,4.735908,2.036045,3.863626,2.545930,0.247457,0.066311,2.125617,3.299872,4.316363,0.163116,4.709221,4.423803,4.368086,3.213349,2.333290,4.019970,1.030871,1.461458,0.863466,4.989909,0.960906,3.503755,2.310361,0.166476,0.406318,4.647142,3.722713,2.730049,1.047324,0.031781,3.863250,1.561493,1.070203,0.861558,4.043982,3.103165,3.206504,4.627186,4.458995,3.402306,4.805135,1.144805,0.098011,4.608534,1.321640,4.865515,1.120195,1.392298,4.547249,4.063276,0.486956,2.877356,0.788758,0.358358,3.061909,0.390263,2.359475,3.072564,4.695513,4.606361,3.037287,2.513563,3.251956,4.624827,4.954702,0.165452,4.847760,4.015930,0.375024,4.000839,3.313165,4.528690,2.288986,2.516692,4.186567,2.418939,2.631840,1.221794,1.652113,1.438242,0.228316,2.915169,4.213258,3.851563,1.232928,2.931548,2.452153,4.082770,1.767400,0.182985,4.436379,3.351402,0.909292,1.028521,1.990999,2.381941,1.651501,2.578352,4.462251,3.149804,1.847646,4.302215,3.478615,2.968619,2.582591,0.439185,2.964676,1.991296,2.751645,0.620325,3.930888,2.559780,4.154653,1.034061,4.690421,2.890923,0.378429,1.568588,4.913425,3.066671,2.098735,4.578457,1.806423,3.735729,0.731325,3.485798,2.457199,2.123146,1.158046,4.937279,0.618097,1.017459,1.887057,0.655602,4.676622,4.551907,2.190964,2.462003,0.310453,4.196864,3.902438,1.966445,2.385436,3.296809,2.327895,1.365952,1.487427,2.586565,4.972655,2.449628,0.278987,4.693477,1.529854,0.199127,0.361429,0.855673,3.170782,1.839930,4.586500,3.966368,1.604184,4.930579,3.332494,0.087194,2.315441,4.551619,1.479802,4.634332,3.076816,2.915218,1.829136,4.784618,2.153081,3.171931,3.185427,3.216967,1.530214,4.323707,2.968018,1.942228,1.611372,0.568424,3.051212,3.913037,2.112329,4.578304,0.627678,2.439446,3.212129,2.848021,4.447472,3.420167,4.125166,3.310630,1.721217,1.362919,1.749807,2.040891,4.134037,3.554680,4.134212,4.625682,4.073986,4.811388,4.749307,1.604809,1.961535,2.876029,3.452731,2.323528,3.938845,3.160034,2.979351,0.726976,0.856572,1.566436,4.812375,0.381052,4.801256,2.385536,2.179806,4.234399,4.157381,0.669920,4.058722,2.553517,1.615635,0.541896,2.961139,3.901658,4.428373,4.858096,0.615943,1.983920,0.243382,3.178720,4.438348,3.436315,1.943546,3.799619,4.983065,0.005610,4.140279,1.631358,3.735332,1.185204,1.009102,4.047991,3.836941,4.056102,3.786701,0.479310,4.414392,1.888088,1.098323,2.837835,1.729324,3.549349,3.473093,4.250537,4.967793,3.997820,0.707745,3.813214,2.834498,2.815906,1.686228,0.803665,0.865260,0.287998,4.026749,3.719742,4.283643,3.520716,0.838930,3.679795,2.789260,0.543365,4.525612,4.511586,3.139321,2.098206,1.189621,0.488003,4.029997,4.833765,0.070203,2.396806,0.530179,2.092695,2.903064,2.145503,0.086117,4.939224,4.629021,3.861866,2.003404,3.447451,3.548842,1.701273,0.198433,3.111573,4.740419,3.738936,1.139937,2.779052,1.951074,2.732503,3.620297,2.433586,4.561581,3.460573,1.761594,3.061669,2.276884,3.960154,0.037248,2.927828,0.117457,4.896672,2.537663,1.393998,0.553498,1.708476,3.170396,4.864442,0.472002,1.051185,1.384717,3.830021,0.394867,4.471987,1.094935,3.590138,3.802759,4.465419,1.037695,3.616338,1.765380,1.941435,2.541560,0.655869,1.793623,4.702447,0.903144,1.575820,4.036392,1.249893,0.823952,0.952572,4.928382,2.066538,1.979837,3.785090,0.313698,0.847689,3.599401,1.598256,3.508392,0.114302,2.951798,2.721229,0.724282,0.593679,4.640771,2.525085,0.249503,0.742789,3.362764,2.383822,2.988314,2.291375,4.627575,4.126244,4.900722,4.696165,3.643489,0.262652,4.995509,2.366593,0.304985,4.957117,2.851884,2.295020,0.098947,2.142006,0.916354,3.594745,0.039335,2.665178,0.218581,3.574150,4.765097,0.216603,0.515421,2.577965,4.912311,2.057284,3.077865,3.808267,4.639600,0.885083,4.557130,3.132121,4.028035,1.477776,2.500505,1.044796,4.273021,1.022895,2.741634,2.089566,0.247948,2.060738,3.921987,2.644663,1.523984,2.227067,3.871328,3.340769,0.554516,2.656233,0.993476,4.892037,3.693127,0.405004,1.241146,0.390628,1.850482,4.113423,0.333778,0.826786,1.337226,3.120402,4.873417,4.113660,1.004633,3.550314,2.781939,2.458139,4.541929,2.940649,0.686048,0.824839,4.609867,0.401026,0.689571,3.265568,1.121687,4.130496,2.080032,2.411999,0.643191,0.140818,3.796181,0.369949,3.200795,2.687657,2.592453,1.498425,3.780143,2.003068,0.756273,0.280216,1.712740,3.040275,1.101610,3.711024,0.543629,2.359824,2.683521,4.105060,0.589738,0.008375,2.668549,0.753625,2.858467,0.164514,2.453375,1.953700,0.781237,2.339236,2.385847,0.339407,3.384539,4.568500,3.067214,3.135956,3.742015,4.680353,4.912385,2.463424,4.725039,1.796213,3.638224,4.683978,0.081164,4.602716,4.425251,1.027429,2.048568,0.614598,3.735934,3.887068,4.404710,2.207260,3.150307,4.218238,0.466892,0.595791,4.088923,2.209847,4.014347,0.000752,0.575140,1.841716,1.988286,4.168789,2.548912,4.589823,2.123489,0.334819,2.289810,2.055044,2.747286,3.199146,0.294522,3.087647,0.661368,2.159066,4.461651,0.669183,1.043798,2.115094,0.301969,1.431383,0.387346,2.385218,2.866894,3.746412,4.616197,2.188104,3.139050,0.300341,2.376569,4.350037,2.961393,1.875507,0.446231,2.492929,4.593517,0.369471,2.654357,2.131616,3.797319,0.755752,0.855976,3.580022,3.399788,2.588414,0.022790,4.278324,4.936988,3.337221,4.666140,3.789073,3.420810,1.756317,0.398298,0.160854,2.252808,2.297679,1.930926,0.149615,0.996726,0.682572,0.063693,3.095668,0.494730,0.741948,0.495566,3.823327,4.416892,0.593970,3.078325,3.098443,1.406632,2.942566,2.166409,0.538226,4.791235,3.393177,4.769798,0.755117,3.970768,2.103129,4.648431,3.434955,0.735827,0.162373,0.628111,3.563449,0.052709,2.391323,2.765267,4.061338,2.232974,0.027433,1.093911,0.237771,4.904762,3.192112,0.009600,0.192646,1.127610,3.894278,1.995096,2.526813,4.362544,4.456215,2.139191,3.800797,1.170879,0.875932,4.881471,3.191005,3.286437,4.389189,0.135172,1.429442,3.595850,2.273116,4.714345,2.252872,0.635161,4.536501,0.025584,3.793817,0.041688,2.316075,1.027733,4.758314,1.983702,0.154764,3.883972,1.582920,3.197292,2.026140,2.192570,1.318982,3.941663,2.318602,0.198087,4.723836,2.484604,2.429860,1.732253,3.175739,2.007713,3.747397,4.382913,2.448657,3.262762,1.477685,3.127014,3.176197,2.559875,0.799230,3.626549,1.598321,1.941074,4.257719,3.405625,0.413354,2.826895,0.434601,3.227282,1.973262,4.064995,3.900894,4.998542,1.495851,0.875394,0.926591,2.994595,1.672721,4.534274,0.396781,3.824084,2.448553,3.187167,2.939121,2.651293,3.491737,2.728532,4.612358,2.758388,4.598329,4.031675,4.237739,4.486437,1.012782,1.712773,4.496870,0.746074,2.450724,0.523743,0.762734,2.944446,1.980508,2.118461,2.540657,3.303640,2.496647,1.708862,0.964042,2.322366,1.877765,4.077226,0.076486,2.851989,3.092296,4.939483,4.426821,2.587836,1.442577,0.050925,1.203904,4.237177,4.866281,3.505271,3.019271,3.031171,3.249538,0.008946,1.849792,1.646394,4.889666,0.003633,3.681724,2.026435,0.323802,1.804764,0.639244,0.186800,3.417265,0.123423,0.059821,2.129920,0.652827,2.230638,1.830172,0.511387,3.198536,3.248611,3.223390,4.323150,0.033869,0.138675,2.615826,2.330078,4.952837,1.787680,1.945521,4.178532,3.115461,0.355376,0.288296,2.642759,1.983862,3.677157,3.140311,0.001533,0.084388,4.198572,0.822926,2.847978,4.702484,4.833033,4.221264,4.444616,4.525294,0.382779,4.286214,2.078661,0.213328,2.665856,0.583520,0.395572,2.337894,1.573845,4.406588,1.577954,4.112882,0.024456,4.746043,0.271645,1.314417,0.124433,4.796775,0.258426,1.745015,3.319201,1.610079,0.037434,1.202863,3.573463,1.891392,4.101427,3.694900,2.929933,0.472377,4.909997,2.603364,1.300896,3.010673,3.533899,2.337522,3.209155,0.540201,4.370328,3.403626,3.864935,0.568675,2.596513,3.462974,2.611414,0.496045,0.303296,3.080081,3.984456,4.983145,2.841087,1.147487,2.025383,0.533198,2.069353,4.200836,1.950999,0.258668,0.829557,3.348389,3.456128,0.990209,4.050708,1.404278,2.778576,1.538528,3.465585,1.878376,3.809035,2.417130,3.201351,4.630266,2.176724,2.753225,0.945589,3.467161,1.063537,3.449791,4.615917,4.706504,4.009141,2.695723,4.186093,2.288798,1.884589,3.511676,1.036621,0.371398,1.830133,1.703177,0.602621,4.272811,3.340739,0.128956,2.700798,0.769016,2.556101,3.856263,2.065268,2.984324,2.732195,2.888029,2.390586,0.835160,1.208071,4.470247,3.691032,4.914329,0.270650,1.582861,4.796438,2.196894,3.021687,2.848707,0.703447,3.655521,0.291563,2.689814,2.763189,1.009242,3.752121,4.480884,4.895340,0.134085,1.548625,4.624119,0.252527,1.360126,2.666943,3.700986,1.140282,1.501721,0.972692,2.215310,2.521730,4.496135,3.853772,3.576725,2.863349,1.642901,0.350385,1.294038,0.973436,1.139486,1.133874,2.152733,1.903574,1.685234,4.406188,1.013687,0.818268,0.380014,4.624301,0.971732,2.861340,1.868589,2.776499,3.212832,4.200385,2.536315,1.636204,0.905400,3.034085,0.660022,4.279036,0.138947,4.226499,1.096233,2.439289,3.652604,3.920834,2.008899,2.497274,0.147863,1.720130,1.307894,1.950345,1.504467,0.798699,4.708652,2.146394,3.189014,4.633806,2.862369,0.634996,3.942907,3.873320,2.023049,2.696968,2.124430,1.121222,3.814609,3.722175,3.235279,2.278202,2.324030,1.492219,1.328623,4.244857,4.296871,0.076724,3.598032,1.649611,4.596737,1.210601,1.677016,3.736680,0.370497,3.540195,3.373394,1.520108,3.563847,4.514624,4.019706,2.589212,0.662228,4.461696,2.448590,2.039388,2.738766,1.067738,1.680956,3.677528,2.817372,3.811394,3.809823,3.767897,0.720943,3.251007,2.400900,0.310455,4.175269,1.098576,0.064701,3.217184,0.860527,0.308533,4.668855,0.742393,2.600247,1.836496,0.223703,1.571769,1.752352,2.467188,3.533673,4.999890,2.592856,4.713766,2.637255,2.968412,0.695335,2.854129,1.302810,1.370242,2.169388,3.268691,3.086649,1.531378,0.143758,1.220233,2.264155,4.547577,3.051814,4.387540,2.970137,2.215837,1.642909,4.850466,2.391244,1.796233,4.538641,4.059322,2.943697,2.830321,2.486753,0.481588,3.437486,1.877668,0.085111,3.630278,0.646535,3.989583,1.297828,2.932038,2.848821,0.884351,2.195187,4.095188,4.859899,0.090825,0.733271,3.087198,0.012566,3.789950,2.915065,3.364323,3.121204,2.995069,0.512062,1.176124,2.319587,1.671952,3.915303,3.376365,1.557352,4.755446,3.221210,4.233126,4.522926,0.988166,1.988656,0.304845,0.739106,2.937331,2.585666,2.187617,3.584812,1.329533,2.072235,4.691081,2.835452,3.407167,3.727486,2.233572,2.154047,2.351022,4.310098,1.818078,4.426410,0.204584,1.264176,4.486944,4.663855,1.038375,1.085799,3.771230,1.807327,1.028279,1.136177,1.520921,4.164940,2.281888,0.635443,1.857680,1.615839,0.380509,4.116458,3.656753,2.177810,3.507714,1.693547,4.679180,2.503909,0.556015,2.375910,1.800654,0.170521,1.748549,4.881704,1.298247,3.620014,0.770699,0.846602,1.482455,0.073074,2.418227,4.849128,1.407655,3.349138,4.221406,4.697280,0.126632,4.225592,0.406998,1.566933,3.713261,1.841198,0.282578,3.716225,2.783830,2.326301,2.067784,3.140778,4.585248,2.102298,1.938070,1.806334,0.995954,4.163816,1.150808,2.772058,3.906707,0.128972,2.517571,2.011092,0.363915,4.093622,2.014931,1.863514,3.367084,2.217382,1.860421,2.812208,1.806179,3.768184,3.791426,3.775203,3.951729,2.717363,4.100338,1.342418,4.571971,2.010182,2.651079,0.831226,0.175220,0.458774,0.010891,3.853129,3.798161,2.083783,3.043169,0.750221,4.222747,3.105331,1.761831,4.281446,3.553142,2.091385,1.815607,1.007576,0.873944,2.257420,1.849879,0.306940,1.550745,0.668697,4.010421,2.391081,0.920747,0.807157,4.093163,2.783944,2.514583,2.239995,3.722511,2.751590,0.596631,0.347288,1.339367,4.866320,0.408365,2.689952,4.604296,0.384282,0.951292,3.104941,0.069157,4.631259,0.536805,0.302131,0.961149,3.051724,4.705319,2.395375,2.676350,2.215402,2.681737,1.346764,3.474634,3.549643,2.604205,4.297542,3.303984,2.467478,4.210566,2.921603,0.380012,4.013041,4.227952,0.240380,3.852079,4.904294,3.953666,1.989397,3.588647,1.460871,3.288733,2.587605,3.311137,2.069179,0.770838,2.105215,2.387046,3.389309,1.422568,3.228254,1.169187,3.824543,3.610558,0.588742,2.963275,0.440250,4.845622,1.696198,0.101306,2.518075,0.609313,3.254714,3.655030,4.296330,4.443218,1.547248,1.788799,4.872364,2.169609,2.023529,4.626803,0.936512,2.370379,2.427130,3.712641,2.177068,4.316111,3.351235,4.654838,1.310106,4.062013,0.583866,4.009650,4.243646,2.032982,3.500069,4.843512,0.924670,3.090705,0.237153,1.693018,0.705934,2.683915,3.016079,4.947029,4.834012,4.413307,2.837406,4.430314,1.774589,1.004656,2.630227,2.656046,4.550358,0.028681,4.277757,3.041177,4.698222,3.726080,1.831297,3.173996,1.848598,4.607827,0.098424,2.773951,2.536657,0.950698,2.140733,1.484460,3.352049,3.765644,3.856978,1.971760,0.956947,1.470251,2.673671,3.076513,3.974365,3.598682,0.871850,3.719955,0.575554,4.588772,3.448850,0.559567,4.182889,3.392095,3.559486,2.437144,3.023526,2.140568,2.837548,3.948956,0.998822,4.379480,1.530045,0.737833,3.172745,2.622049,1.457667,3.140854,3.571759,1.362940,0.583204,2.551526,1.414897,1.626126,2.469845,3.656002,0.074800,2.391087,0.617451,4.266139,1.298884,2.020017,0.237117,0.745714,0.008949,1.800177,4.053439,2.878892,4.199531,0.877292,3.386708,3.729288,1.720004,0.571488,3.711014,2.607353,2.348657,4.185550,2.464531,1.474877,3.742159,1.349236,1.381427,1.043674,0.516937,4.007878,3.503425,1.916066,3.624922,4.806229,2.331243,2.441427,2.645304,1.332801,1.240020,2.441924,2.503652,1.446410,2.911565,3.853957,3.447893,0.735542,3.211959,0.017091,1.963484,2.305139,3.977784,4.400469,3.590989,3.876261,4.658069,2.422736,1.398601,1.850704,2.143119,1.580766,1.518571,4.913449,4.961634,3.214640,4.048969,3.605724,3.410559,0.732541,0.683609,4.429199,0.071336,3.398819,4.023927,3.589565,0.722046,3.202520,0.617434,2.311236,3.274163,1.859350,2.586229,4.734773,1.551948,0.875050,4.537826,2.416269,2.481783,4.767813,1.339038,3.982388,2.800780,3.450089,2.353218,1.919294,0.720301,4.937501,3.636005,2.275347,2.464589,0.001269,0.148038,4.037883,0.230848,3.858563,3.566820,3.396620,2.722529,1.736641,4.862991,4.553688,2.371575,0.877100,1.172888,0.070081,4.361376,1.817069,2.429099,2.632266,3.965666,3.075649,0.346405,1.885480,2.281343,3.591180,3.920213,0.025814,2.993322,0.148725,4.177276,1.200197,1.665656,1.164707,4.338865,1.503422,3.710607,3.064843,4.313607,0.988806,2.586108,4.168351,3.052990,0.061274,1.267820,3.421738,3.057946,4.482413,4.627590,4.001578,0.918195,1.859980,4.823428,2.419130,1.669994,4.809987,3.497596,3.482213,2.061823,0.467563,4.917478,0.424004,3.329844,0.255546,0.071615,0.049692,4.712172,2.310810,3.010149,0.706604,2.438664,2.594017,0.763217,2.290133,4.432590,2.875989,0.929767,4.776607,4.464237,4.635034,3.904586,2.806798,3.878839,3.097068,0.028472,0.581411,0.547728,2.769316,3.478675,4.696763,4.506138,2.989172,2.856068,0.341573,3.856058,1.329795,4.589582,1.106028,3.481612,0.561468,2.469412,0.744904,4.213427,3.070036,4.886202,0.705123,4.280506,3.671551,1.936064,0.089511,3.679842,0.490740,4.044717,3.992470,1.078636,4.829543,3.964510,3.022950,3.674757,2.341569,0.464235,3.184651,2.081143,4.894290,0.316725,0.802560,4.501748,2.434963,0.965677,1.563334,0.381500,3.169556,4.600403,2.850990,3.209909,1.464022,3.542095,4.575848,0.231859,1.086404,4.683144,4.024866,0.351286,1.164660,1.825970,1.596454,0.256339,0.853583,1.411850,0.765668,4.137259,2.602062,1.107237,4.238624,3.803333,1.931387,4.206046,3.187243,3.117297,0.519591,2.041024,0.357072,2.004564,0.297240,0.964384,2.281905,3.090411,0.904838,0.411968,4.368603,0.417272,2.843602,3.956262,0.837703,3.231584,3.653110,3.535957,0.258549,3.207943,0.785581,1.509831,4.644069,0.261158,4.308643,2.756138,0.156616,3.769983,4.287510,2.287758,3.959196,4.552354,2.841149,4.583456,2.084875,4.059326,3.903330,3.594649,2.057230,2.341135,1.046972,1.390432,3.411301,1.627194,3.621482,3.122052,1.782318,0.838091,1.598765,1.826149,3.228911,0.309111,4.330575,3.126501,0.265888,1.257279,0.753031,2.909203,2.845082,1.821035,3.798885,0.308861,4.136849,4.442641,0.929380,4.702222,3.661826,4.467229,3.957409,0.339560,1.234467,4.254433,0.240432,3.546044,3.406727,2.220058,2.874127,1.302670,2.953296,3.440411,1.928101,0.740147,4.724772,4.947519,0.349596,0.278263,1.813387,4.697346,1.899838,1.144064,4.881095,1.167778,3.423404,0.558548,3.160705,0.724762,1.393530,2.182496,3.825084,2.775792,0.900378,3.774489,3.188621,0.096131,0.327995,0.460585,1.247532,1.383599,3.387441,3.251643,4.360016,4.076573,3.942754,2.944533,0.533163,3.438743,1.511607,3.916974,1.833434,0.672030,3.026542,4.414027,0.879291,1.472130,1.322170,3.911386,0.760897,2.201948,1.883014,3.846654,2.197063,1.244527,0.403082,2.429097,1.245085,3.427534,1.200416,2.684956,3.182848,4.503389,4.526925,3.342492,1.067130,0.301125,3.761087,1.799899,0.603387,4.176160,2.685325,4.745062,2.894372,4.756401,2.742654,0.859940,4.819850,0.449002,0.913271,4.979514,3.892984,4.204134,2.357429,1.893398,1.357586,0.269170,0.236587,1.639940,1.119385,3.333945,0.848105,4.545253,4.838633,2.374461,0.255581,0.853172,1.335875,4.379890,4.441345,4.831485,1.313228,0.879108,2.624139,1.721793,1.990657,2.261955,0.304504,1.622998,3.716065,2.393291,3.827454,3.361697,4.705794,3.451752,2.797747,0.785857,4.605529,4.983601,4.212389,0.467395,0.557112,1.824577,3.480117,4.134522,0.904076,3.126202,0.797832,0.560520,2.354861,4.305219,3.138528,3.407718,1.965831,1.334402,4.660482,2.057042,2.567023,0.361110,0.345757,3.790320,4.660030,3.183477,4.500228,3.869764,0.644327,0.333287,4.710446,0.808021,3.145781,1.178828,2.577741,2.437619,3.593646,4.102686,4.994274,1.042638,2.183317,1.880042,0.168972,1.184135,2.732244,4.384717,1.568989,3.507114,4.700489,0.896834,0.542853,4.932689,0.250129,1.405035,4.346699,1.377101,0.877654,3.909156,3.628521,0.538864,2.508960,4.467384,2.120331,1.110877,3.471932,1.139709,4.539771,2.094103,2.438927,3.472528,1.797579,4.710204,1.364540,4.828712,1.941025,3.901523,4.049947,3.105159,4.059356,2.953724,3.011737,0.703386,4.452320,0.770019,2.526829,1.591707,1.442615,0.848163,2.738959,4.222698,2.484605,1.799492,4.635554,0.669248,2.401596,3.807056,4.489616,4.638902,0.560023,2.702724,1.057628,0.885843,4.327989,1.845368,0.530318,1.091271,1.904548,3.248256,3.121134,4.622504,1.576469,1.985551,1.415378,0.582986,4.804846,0.480226,2.363869,2.850051,3.501036,1.360354,2.580349,1.938248,0.484790,0.602538,2.018408,0.017620,0.124852,0.266323,3.827010,4.446989,4.521335,0.040615,3.270929,1.432126,0.349397,0.518782,0.333665,2.751338,1.534378,0.831386,0.727381,4.197055,0.112754,2.476287,0.363707,0.729764,2.326470,1.034490,3.183473,1.894915,3.922399,3.289473,4.889575,1.785182,2.230768,3.340992,2.110408,1.195284,0.033386,1.378029,4.320983,2.947696,0.023251,3.939637,0.078058,4.765848,2.569049,4.540460,4.429629,4.426334,1.879011,0.929391,1.755955,0.671383,4.171962,2.842952,1.242912,4.099913,2.304428,0.054397,0.766484,2.108781,0.388057,3.216747,0.986632,2.970555,0.047087,0.724003,1.629656,0.438410,4.917661,1.160086,4.493426,3.431841,4.792831,4.552478,4.393306,2.888866,4.823212,0.904100,2.270961,3.905633,2.417559,4.972112,3.665741,1.031777,4.056978,4.437309,2.697086,4.952701,2.679517,3.865655,1.620143,1.194150,3.918802,0.964853,1.419649,1.841077,3.122536,1.711181,1.604626,2.215322,2.248910,0.104834,1.582382,2.348313,1.177444,2.385021,2.846443,4.197592,3.873732,1.283142,0.643617,0.006485,1.993095,4.276825,0.806964,1.433598,2.716014,2.969091,2.736131,0.012681,3.853584,4.501512,1.263894,0.666081,3.842329,3.650163,3.965244,4.594720,0.221204,2.685166,3.945369,2.506170,2.760711,2.833116,0.051948,4.521443,1.053938,0.127290,3.167195,2.800870,0.638796,4.991473,1.957475,1.329971,0.505985,2.672686,0.821378,0.728377,3.637541,0.334303,3.565759,0.348226,1.971568,0.624693,4.923294,1.181228,1.822311,1.056656,2.719420,4.611342,2.413293,3.710666,1.774443,1.411946,0.492996,4.849494,1.892561,4.368065,3.098482,3.391063,2.286333,1.636228,2.368450,3.831901,4.560472,2.476456,2.654313,3.662291,4.796732,3.289112,4.250241,2.020591,0.897434,3.523574,1.225321,4.429171,0.393618,2.379667,2.181941,4.311771,4.843932,4.768131,0.274649,4.953831,3.339833,1.261431,1.885220,4.443488,4.580263,0.609447,0.716577,0.220978,1.969232,1.725678,3.363574,0.808225,3.984889,2.900740,0.555042,4.484263,4.247134,3.770496,2.398707,3.051897,0.988875,3.798994,3.469724,3.994559,4.689481,4.444340,4.477021,2.149958,3.942992,4.847893,1.330396,3.826010,1.215591,1.426578,2.138413,2.210800,3.504001,0.523701,4.208128,0.680637,0.127883,2.015979,3.875301,1.742118,4.251441,3.316850,3.544496,2.584592,2.946953,0.818978,4.437494,2.128797,2.194471,3.392361,4.441969,3.720224,2.206739,2.311888,1.391778,0.291960,4.698423,0.498114,1.352629,4.737242,2.888875,4.265349,3.475624,0.232017,0.749104,0.587690,2.406417,4.082048,3.590922,1.035696,2.084032,3.491493,4.471934,4.580621,2.523166,2.081006,3.258632,3.312762,4.866410,2.490274,2.688071,2.295904,3.585350,1.676182,0.178311,2.780779,1.406441,3.740018,0.858821,4.225524,3.804549,1.882974,0.861246,4.275899,1.708481,0.520754,2.540535,0.201599,0.803984,0.662032,2.494800,1.641182,3.623379,0.540886,1.528310,1.493489,3.736447,4.398873,2.463574,2.808386,3.984488,4.356048,3.818650,1.294983,0.364842,1.054597,3.097832,2.744435,2.539124,0.365909,2.054348,0.130946,3.266951,1.229352,3.535249,2.661239,0.270870,0.696069,4.558888,4.378924,4.078771,2.855764,1.800946,4.793820,4.547204,0.085137,0.605331,2.715246,3.452626,2.324193,0.910334,2.101403,1.026809,4.021004,2.711114,2.044263,0.708331,2.572191,2.831952,3.265524,3.527775,0.209139,1.888986,1.860188,0.852458,1.611090,0.220689,2.310716,2.569096,2.446015,0.709920,0.529325,3.795822,3.744378,1.484822,3.400140,4.707575,4.195120,1.477093,0.666152,0.256139,2.518642,2.287682,3.755692,3.841770,0.349894,4.857158,1.289571,1.870512,2.881435,0.191413,3.564421,0.960999,4.584995,1.233692,2.066538,1.121626,3.230495,1.886514,1.195876,4.219607,3.514726,2.358243,1.429677,4.361466,2.096919,2.326984,0.959965,4.169602,2.749525,3.284489,2.094086,0.096887,1.502559,0.103361,0.149643,4.925642,0.473734,2.254984,4.193597,2.107752,1.243762,2.070008,4.119444,0.224457,2.443889,0.967530,0.301347,3.927772,0.072413,2.074790,2.727514,0.864419,4.497283,2.043403,0.910519,3.055898,3.197243,1.943357,0.157342,3.308230,1.188833,0.749628,4.104686,2.521207,2.239649,3.774211,2.353446,3.059199,2.031203,4.437611,2.827828,4.512555,4.494148,3.792854,2.740256,3.271098,1.110424,4.595637,4.298680,3.935716,0.127405,0.972636,4.583487,4.045270,4.230798,2.022848,1.281874,4.453489,1.864777,1.494353,1.504312,4.412162,0.884650,4.164787,2.387839,1.305719,2.921156,1.394957,2.574443,3.068379,2.915119,4.081186,3.093834,1.103198,1.474466,2.010889,3.847437,4.520912,0.122662,4.967091,2.457310,0.658720,2.827208,2.292667,0.246608,2.888121,4.657856,2.363153,1.146013,3.354702,1.338127,4.575955,2.385228,3.922772,0.245688,3.662444,0.739881,1.088589,4.306542,0.619626,1.473554,1.849536,4.550053,0.714448,3.084675,1.014539,1.444045,2.225300,2.736133,0.876868,2.977610,3.036222,2.042676,1.003601,1.669636,0.490183,3.724189,0.073087,1.658954,4.621703,0.937597,2.617578,0.746225,4.748842,4.102897,1.563127,3.759729,2.836761,1.108261,0.671936,1.246224,3.144953,4.773875,3.884376,4.517304,0.970392,4.572947,0.423410,4.720934,0.706078,1.807649,1.727777,1.649285,3.683077,4.197360,2.852367,2.730375,1.306540,4.516625,2.823887,2.056561,2.797496,0.522333,0.557171,4.636426,1.092779,1.351406,2.786211,2.434310,2.778664,1.827146,2.026076,0.843994,2.485086,2.114781,4.700419,0.648936,3.078702,4.832630,0.489809,3.605593,4.327580,1.661165,2.846817,0.448151,1.685283,1.244157,3.426840,0.278439,2.416145,2.769229,4.656273,4.605611,0.032965,2.905155,1.998941,2.681281,3.248000,1.371884,3.805754,4.602598,4.443930,3.776714,2.622283,2.425963,3.724993,3.863651,0.060597,0.189139,2.387800,4.331782,1.075032,0.717884,4.665811,4.455562,1.343371,4.201425,3.785051,4.976955,0.816872,4.486968,0.284902,3.365323,3.345789,4.578470,1.139378,0.858162,2.567557,4.762859,1.394330,3.983325,1.599711,1.275609,3.420529,3.857030,0.065317,2.918004,2.654516,1.945036,3.926589,1.779604,2.720140,2.139291,2.240258,2.428088,0.780905,4.017294,1.452962,2.581479,1.365341,4.296417,4.158435,4.753099,1.821321,4.434768,4.294287,2.869022,0.737872,3.520743,4.723939,4.096525,0.382655,0.112617,2.303180,4.565044,3.611814,4.996928,3.136493,4.411150,4.060125,2.693045,0.452253,0.654165,4.077410,1.846869,3.013205,1.458558,4.457646,4.579982,4.778527,4.643184,2.820085,3.009399,4.811238,1.863173,3.154185,2.198591,1.723609,4.647211,2.848221,2.325531,0.270644,0.777444,2.703717,4.973092,2.297182,3.125958,4.258462,4.591986,1.830650,0.817969,4.856515,2.637448,4.428896,1.492531,0.443317,4.392011,2.082817,2.202888,4.917693,2.044213,2.868398,3.686456,1.125992,1.348490,3.694127,4.035724,1.002982,1.543696,0.043606,1.924164,4.505575,2.006702,3.795075,0.286935,2.939474,4.770220,4.921920,2.892019,0.071595,4.199478,3.673576,0.123406,3.783309,3.597492,0.482964,2.681886,2.744380,4.474275,2.215611,2.795788,2.754732,2.596880,4.265792,4.733147,4.574610,0.982258,4.339999,1.588774,0.064058,2.665621,0.471366,2.496541,3.698877,4.228875,1.614067,4.194019,0.285651,3.078107,1.747849,2.743760,0.959739,1.156176,4.181929,3.987969,4.271634,2.391940,3.310658,2.290958,1.245621,0.030989,4.599034,3.485517,3.909159,0.370568,4.414552,0.733673,4.215205,3.823601,3.694091,3.435988,1.012509,3.288955,0.542952,4.298087,1.001854,2.198027,4.530222,3.977137,0.190611,2.442531,2.625731,4.176416,2.984826,0.329622,2.098654,3.301002,4.940172,1.920422,4.922966,2.744304,2.318770,2.077170,2.896697,2.142683,1.917378,4.890845,2.472542,3.900943,2.531492,1.159658,4.741840,4.406535,0.709667,4.424912,0.985070,2.843067,4.655076,2.822466,1.058143,1.324770,3.392854,3.735198,2.958761,1.407129,0.933854,3.273233,1.146656,0.813895,0.655706,3.694223,3.559558,4.637373,1.308563,2.947273,4.598081,1.117528,2.269845,4.829088,4.774412,2.557931,2.243344,4.724134,2.997283,1.234707,2.586633,2.862765,2.761459,2.028396,0.732102,4.340281,0.561640,0.697341,0.746241,0.197053,4.288659,4.458542,0.612818,2.307844,1.965923,0.630769,4.321963,4.320337,3.704092,0.832829,1.318148,0.961521,4.162343,2.338093,0.752231,0.050476,1.392553,4.870653,0.158454,4.557258,0.289702,3.358851,1.748485,2.277492,1.105694,1.692629,1.540531,3.544501,4.356268,2.046583,4.081106,0.057746,3.938488,2.629769,4.168645,1.120203,1.883714,3.488543,4.242102,2.391583,4.231800,2.741597,4.956855,4.523556,1.928140,4.777413,3.826709,2.627514,4.955216,3.474917,0.973034,0.570184,1.310579,3.677511,2.752234,1.985757,3.792148,0.118937,4.067875,3.741340,0.901014,1.945116,0.188001,0.058939,4.981339,2.440983,1.860124,0.980860,4.035961,3.528764,0.007781,3.856133,0.557414,4.743163,1.663680,2.255514,0.024905,4.121963,1.540841,2.782234,4.633004,0.781112,4.336648,2.501195,4.622281,4.111775,2.214900,0.443559,0.150987,4.371154,2.371425,3.318475,4.408242,1.523295,4.478815,0.137662,1.399628,4.058832,4.266102,4.724177,1.515056,3.901178,4.925652,2.635030,1.262981,0.194812,3.798265,0.694227,1.934713,1.546389,2.084253,4.529995,2.129739,4.563722,4.027004,1.441892,1.590445,1.849221,3.028236,3.370313,4.861149,4.632580,3.059359,0.231194,2.726538,2.018201,2.723894,0.200882,4.978811,0.284792,1.363400,0.360620,2.738056,1.759091,1.876499,3.945838,4.520101,0.828485,1.394885,2.363643,0.564408,1.932690,1.510440,4.609882,0.992671,3.606057,1.079466,3.128292,2.909954,2.293621,4.084537,1.113586,2.386401,4.912088,0.916309,2.727162,1.465529,0.619030,4.257965,2.888394,2.894146,2.726674,0.922341,2.843166,0.456945,3.413209,0.257286,0.945756,1.471089,1.394656,4.060511,1.438753,0.369790,0.339913,0.747068,1.970960,0.984071,1.175112,0.919878,1.493677,2.524294,4.856735,3.959952,0.862604,4.014253,3.550465,4.528992,2.173534,4.335493,3.490451,1.365463,1.948881,4.192393,4.038561,1.227530,4.181369,4.728785,4.388847,1.906440,2.705809,4.229803,3.582002,3.545525,1.426257,3.054009,0.272306,1.485737,1.013944,1.935073,3.691148,1.302706,0.894575,4.210178,4.575490,2.231083,1.222489,1.261830,2.080899,4.012215,2.807408,2.886680,4.890787,0.388376,2.375067,2.397011,2.769870,0.839701,0.844611,2.077243,3.031086,1.514013,2.487596,4.933786,0.152155,2.329336,2.369523,3.459032,1.332001,3.999670,2.004967,0.475812,3.150302,0.131966,3.584011,0.060701,2.983351,4.354460,3.492042,3.121719,2.158956,1.680978,1.851478,1.875132,2.649418,0.716650,4.409410,3.129378,1.872181,4.911061,4.362638,3.034081,1.858744,1.845469,0.333534,1.712605,1.228421,3.042756,3.600817,1.462124,2.730737,3.935398,3.209519,3.718307,1.090398,3.175249,1.368922,1.153753,1.354686,1.832628,2.354702,1.146307,1.749817,4.482484,0.673135,1.078620,0.303463,3.544406,2.647054,2.371602,0.172076,4.806713,4.220387,4.101871,4.376087,3.885126,0.697188,4.857462,4.668592,3.480386,1.460053,0.005556,2.429309,2.974017,4.969907,0.664575,0.444100,2.131592,3.754781,1.700352,3.311801,4.447192,3.965810,0.507979,2.230377,0.189963,0.843192,3.853555,0.870466,2.794070,3.074892,0.783182,4.574111,0.292509,4.596173,0.568997,4.504350,1.839455,3.949204,1.971188,3.665782,4.261954,2.627194,2.010698,1.973163,0.282959,0.074079,3.717851,2.076997,0.755464,4.357685,3.188859,2.372522,1.784925,1.723732,1.857101,4.432772,1.893021,0.096582,0.724668,1.731041,0.831761,4.114907,4.993658,1.670815,2.425932,0.238091,0.972321,1.145303,1.937415,4.132083,1.996051,3.707143,2.642949,3.318246,0.986119,0.194059,1.233352,0.506163,3.513341,2.846128,3.968442,2.012982,1.302461,4.305204,2.827653,2.364494,4.456719,1.739063,2.044511,1.287223,0.663538,2.854480,4.606711,3.244012,3.319302,4.292119,3.500605,1.879702,4.016626,0.619987,4.357345,2.545709,2.729107,4.613378,3.413399,0.390842,1.264530,3.553833,0.465605,1.306484,1.318435,3.538543,0.258116,1.724906,2.131865,0.366464,2.292008,2.657039,4.854093,4.367591,4.652766,1.353650,0.750836,3.192462,1.007624,2.932410,0.978624,0.325720,2.244621,3.182249,0.470673,2.748590,2.184174,1.276209,0.859389,1.171630,4.483058,0.159352,0.737423,2.590849,3.413205,2.051598,1.201789,1.371737,3.246993,3.564509,4.851428,3.517539,2.109577,1.227698,2.673194,3.632831,0.582960,0.299046,1.120791,2.096237,3.335872,0.045718,2.692781,1.454373,1.675078,2.166150,2.300124,2.008903,0.436965,0.795719,2.466797,1.932784,4.983508,3.848098,2.914256,2.739175,0.249980,3.383658,2.827151,2.579501,3.832223,3.914952,1.083453,0.923246,3.298333,1.654012,2.273896,0.221887,2.114695,4.709245,3.438343,4.097027,3.137624,2.925542,4.854275,2.448569,3.951510,1.157055,0.509806,0.906635,1.711521,2.303414,4.446935,2.963128,3.213050,1.924745,3.348100,2.020580,3.040346,2.679050,1.539533,0.418012,0.613020,2.874528,0.365557,2.265278,4.495305,2.913195,4.883315,1.439404,3.249567,4.673774,1.747021,2.667903,4.235892,1.656673,0.044768,4.951128,2.030613,0.547375,3.680137,1.625297,0.842284,0.592453,3.487868,4.966311,1.959573,3.818693,3.271202,2.104808,0.244670,2.047145,0.146328,4.761208,2.046941,2.896201,4.703674,2.880123,0.861645,4.758068,0.939699,0.640731,1.812257,2.174254,4.886863,2.770275,4.029203,3.844919,2.011131,0.373246,0.598656,4.963586,4.299726,1.728591,4.163901,4.499337,4.616975,4.376030,0.931100,3.967325,0.278176,4.032635,2.884543,3.674681,2.748528,2.987595,0.185107,0.157279,4.060653,1.455282,4.036071,3.517521,2.824738,0.524805,0.330212,1.919907,4.626259,1.131317,2.111204,3.208439,2.483509,0.125480,3.476433,4.592038,2.998471,2.902063,4.176491,4.164192,0.933783,2.111496,4.096349,3.674170,4.221940,0.647217,2.197335,3.544766,3.650806,0.359025,3.559702,3.131142,1.744565,1.520543,0.145047,1.959949,1.534976,2.157507,3.543728,0.727410,2.399812,3.964266,1.243173,4.318422,4.664797,0.564198,0.578502,3.226010,2.585950,4.517888,4.009760,2.509463,0.343453,0.494352,2.242455,1.522858,4.715647,3.329229,1.352653,1.784793,0.403914,1.248440,1.593857,3.209742,0.862769,3.385918,0.588247,4.470631,3.132183,2.887363,0.936358,3.704353,1.180261,3.990216,3.894773,4.696979,3.913466,1.824726,2.553261,3.134345,1.337590,4.000258,1.645490,0.650680,0.297607,3.300047,1.323557,4.257878,3.862159,0.576040,2.776406,4.836869,4.146155,4.361198,1.313783,3.627392,1.699408,4.140313,0.513261,3.425570,3.224522,1.306591,3.160807,4.554405 \ No newline at end of file diff --git a/lapack/src/test/resources/geB.mat b/lapack/src/test/resources/geB.mat new file mode 100644 index 00000000..c58fe294 --- /dev/null +++ b/lapack/src/test/resources/geB.mat @@ -0,0 +1 @@ +3.075829,0.920215,1.530812,1.757792,1.555847,3.422037,4.750014,2.519551,3.951285,4.721925,1.872222,0.231393,3.766508,3.674952,1.516258,1.345649,3.516641,0.782026,4.217241,4.303145,2.831742,1.094025,4.745015,1.176408,1.545005,2.209160,2.603650,2.277587,0.001035,4.310982,0.118693,4.407753,4.114089,4.683496,1.569817,0.898535,0.271433,3.438713,0.782794,0.839157,1.151965,1.393095,1.067983,3.037086,2.555580,3.253433,3.210241,4.275779,0.183633,2.788558,1.929708,3.946323,1.142774,3.044759,1.347967,1.173356,1.639185,0.317879,3.731931,4.406550,0.084926,3.262212,2.814503,4.526970,3.426801,2.092925,2.890980,0.636072,0.810751,1.119185,2.415450,1.334121,0.502722,2.592542,3.489149,0.482195,3.644764,0.118341,3.494703,4.765426,2.283834,0.329454,1.413410,0.737569,2.504683,0.904017,4.981908,2.097829,1.936706,0.320820,2.992951,0.621517,1.308707,1.495696,0.490580,4.150069,0.552645,2.415025,1.445313,1.182723,1.116479,3.349322,3.968988,2.044567,1.592642,3.655178,1.345821,4.352304,1.469388,0.256263,2.351713,1.499527,2.329769,1.460132,4.935073,4.872680,3.087676,4.532801,1.564680,3.939464,3.825263,1.776573,3.607359,0.468087,1.162906,1.049509,3.128857,1.008811,1.417786,1.361797,4.716747,4.739999,4.158233,2.257610,2.450330,1.872886,2.304148,0.707519,1.354922,0.925507,4.404531,3.449866,0.666674,2.152048,1.628213,0.074714,3.697138,2.201049,1.808299,0.910756,2.441446,1.358195,2.538882,1.251967,1.463226,2.125815,3.054557,4.212815,1.393273,1.636871,3.223375,4.974227,1.153830,1.103868,4.101527,3.990348,1.645059,0.073750,2.147590,2.717418,3.800772,3.304735,3.360633,4.016903,3.874359,2.366270,0.524063,4.071678,3.008870,0.165067,3.942455,1.966697,1.570564,2.575242,3.357802,4.624232,0.130089,1.523358,0.202225,4.215657,3.517689,1.352851,3.846921,3.166899,3.300653,3.752149,0.804886,3.002299,2.588215,1.702393,3.653119,2.171201,2.350340,1.046172,3.694770,0.053002,2.486163,2.688224,1.337923,0.842617,1.739806,0.529340,3.605915,2.905666,0.208845,4.769149,3.858811,4.871949,3.213851,4.710569,4.015770,1.543322,3.770739,0.608033,2.531747,4.543861,2.623102,4.733560,1.908855,2.620768,2.847477,4.802488,3.538408,2.974076,0.328545,1.115284,0.616819,2.555792,4.954087,4.187772,2.444176,2.571967,0.206545,4.176446,1.909155,0.138259,4.621481,2.199384,3.372858,2.700237,3.948270,4.811896,3.104828,0.584596,2.941110,0.158539,1.724206,0.369940,1.428552,4.493644,1.059235,3.912550,1.981957,1.846033,4.221970,2.063323,4.912035,0.994245,4.397451,1.355436,2.776574,0.599137,0.234364,1.863837,0.896418,2.441016,1.214960,0.194369,3.591466,1.669001,0.861510,4.739868,2.442796,2.814792,4.811118,0.590772,0.911347,3.551024,2.803941,2.076359,0.560775,2.919800,2.207227,3.355331,1.502109,2.012550,1.540082,1.004660,2.540070,4.145694,0.172161,2.426895,3.760507,3.170272,4.965128,0.286194,0.808711,1.598399,0.031136,2.597331,3.203173,2.093682,2.086701,4.386394,3.059510,1.317512,1.598230,1.004123,1.323215,3.350811,3.188820,1.308233,2.698659,4.303158,1.341897,0.124481,1.380431,4.703615,0.102562,0.607763,0.868621,3.531543,4.893432,2.941546,0.442490,2.289983,3.915352,0.895444,1.479202,3.337873,1.589173,3.644290,3.975737,4.153910,2.756336,1.893975,3.092315,0.931355,1.022826,4.093522,4.086389,2.034313,2.337031,2.148766,2.261919,1.138956,1.091442,4.163896,3.335410,4.878894,0.801124,4.617227,3.827887,2.637874,3.266259,4.188134,2.638138,3.236912,4.883850,3.601481,0.392371,3.584022,4.869380,1.953647,0.217141,3.636628,1.545730,4.589628,0.912694,1.883343,0.118385,2.193512,0.950019,2.985462,3.730933,1.399199,0.668656,0.598718,1.273684,4.142107,2.165346,0.964821,1.418186,1.749623,1.019784,2.697641,2.847384,3.897904,3.477573,1.229021,0.787531,4.519399,4.128175,0.037199,0.117135,2.444137,4.191700,4.626696,0.969803,4.046730,2.080040,3.259858,1.577711,0.629859,3.537727,1.540347,0.148616,4.833965,2.143976,0.496539,4.062133,4.243022,1.506750,3.413825,0.601183,1.935404,1.107585,1.227917,4.823929,0.173379,2.753662,3.182017,1.669243,1.215069,3.981985,0.855072,3.252699,4.998971,4.189009,2.118588,3.408506,2.942346,3.260548,1.557177,2.524934,0.382243,1.159934,1.998697,0.783629,0.797439,0.891374,2.757598,2.262099,3.110307,4.904938,3.034905,1.126328,1.327035,0.987164,3.884156,2.483999,0.567985,4.368588,1.978487,3.048051,4.873086,2.918009,2.540404,4.539169,4.477362,2.279188,3.412821,3.389036,1.482270,0.816425,2.843969,0.180378,4.114471,3.803135,3.544162,4.640774,4.789952,2.336082,3.374087,4.872877,4.267262,3.270687,2.197458,3.712733,0.292441,0.115907,3.768086,0.647619,4.059428,1.972334,4.757597,0.319922,2.514432,1.349031,0.505431,2.705715,0.031428,1.051103,2.259024,1.730843,4.315854,1.429502,1.610667,4.553730,0.857326,3.122900,1.979370,0.325698,3.984570,4.990543,2.112280,2.991496,4.185531,3.928694,2.525262,1.420949,1.259295,4.346273,0.383753,2.951622,2.445663,2.458582,4.024404,0.760212,4.942612,1.572908,4.130097,0.833382,3.797002,3.378242,3.975354,4.995713,3.416875,2.578876,3.493327,3.792165,2.302115,1.144348,1.090405,0.109379,3.792475,1.747783,3.792958,0.651148,3.361084,0.215132,2.968788,0.128900,3.486822,3.959861,2.061967,1.780561,1.160579,4.269403,2.337225,3.780966,3.099278,0.728940,0.850710,1.311195,4.290845,1.619700,4.444700,3.148847,3.541560,1.402402,0.240964,2.269459,3.203055,1.676150,4.763622,3.193984,4.968320,4.006459,2.551404,0.821625,3.249670,0.756127,2.028524,2.467923,2.473374,1.239116,0.114985,2.766429,2.258744,0.319078,2.588017,0.575002,4.959124,3.700300,1.819176,4.198649,0.510917,4.388904,3.294368,0.408047,2.187231,2.983794,3.118664,3.685033,3.295568,3.218442,4.102231,0.102795,4.798566,2.151306,1.421983,2.448088,4.701484,4.594520,4.088595,1.116290,1.429858,4.145092,3.261052,1.229695,4.345607,4.520672,3.174576,4.923153,2.757673,4.290719,1.516111,4.760337,1.810732,0.497748,0.775671,3.167260,3.785924,0.273630,2.347563,3.921035,2.634921,2.094352,0.884714,0.568197,1.665232,1.424745,1.838640,0.380914,1.130096,2.576583,4.958065,2.078815,2.065460,1.420610,2.788605,4.299349,3.346928,4.993418,4.726382,4.216793,0.208763,3.773843,3.079418,3.729073,4.887271,1.102374,1.806905,2.762946,1.680434,4.323124,2.712687,0.026266,4.555013,2.610959,3.430174,2.543606,3.070553,4.904975,2.208982,3.489842,4.297146,0.522541,2.906700,2.292862,4.960874,4.684867,0.931019,0.488025,2.268192,0.095759,2.484817,3.692213,4.416334,4.816191,4.584390,4.569724,1.674365,1.932933,4.071070,2.335731,0.752807,2.271343,1.849599,0.426611,1.752065,4.796103,4.632371,4.845690,2.858414,0.529475,1.134942,0.931827,0.943268,4.441714,1.020089,1.894827,0.465335,0.182540,4.739254,3.812076,2.174469,0.844084,4.902019,2.170816,2.722770,0.377119,1.397717,1.311670,0.695120,4.470922,0.969096,0.154013,4.929299,4.697868,3.614732,4.207205,0.781199,0.399887,4.321088,1.792424,1.613881,3.443475,3.785203,3.068429,0.476439,1.826363,0.065789,0.487297,3.641852,1.363023,0.798102,4.902278,4.101774,3.410733,1.627977,0.838915,4.080514,4.632697,4.318470,1.263110,0.445923,2.520989,3.865608,4.908215,4.579359,0.159990,0.110352,3.158620,0.639011,3.036897,0.047018,3.708507,1.935760,3.789404,3.463606,2.388200,2.543164,0.451025,3.241801,3.203775,4.079160,0.245845,0.938868,3.314792,2.758663,2.074356,0.134826,4.170098,1.450639,1.823945,2.277655,2.724635,1.204705,2.493556,4.626904,1.008522,2.752821,4.865551,2.398834,4.525603,0.189901,2.619587,0.014373,1.354938,4.583164,2.077235,2.315192,2.015369,3.697346,1.990870,2.554979,0.317136,3.566478,2.671607,4.867841,4.355635,1.727228,1.862288,3.301391,2.292233,2.773057,4.854831,0.453288,2.973928,3.387950,1.096854,2.930474,3.874748,1.427539,4.885055,0.651328,2.369636,3.644355,2.200954,2.572454,2.374079,0.268065,1.607412,0.414567,3.801576,2.387948,2.035808,3.804645,3.285596,2.066368,0.669490,2.412986,0.962185,2.097422,4.403759,1.379438,2.168542,0.157403,4.470150,0.397665,3.172317,4.857129,4.565571,0.154792,1.351036,0.538530,2.027552,2.263712,0.836001,3.872690,1.744690,1.995828,1.486114,1.432749,2.099950,2.051240,2.575852,3.544496,0.558856,0.465110,0.777152,0.480886,0.813153,0.156175,4.135156,4.005483,0.119119,1.625000,3.132469,0.766111,0.858270,0.336670,0.787449,3.235623,3.148735,1.335188,1.290308,2.078116,2.393838,4.587950,3.387457,1.599877,3.827761,2.213284,2.947008,3.281490,1.625651,2.503144,0.505317,4.235222,4.762083,4.509193,0.223768,4.264368,4.210370,0.653345,3.604789,0.269247,4.059304,4.010136,4.838243,2.169734,2.484503,2.155539,2.551872,4.076830,4.341866,0.076822,3.341184,3.120973,3.059353,3.747956,3.665006,0.537034,3.551475,4.145559,0.061318,1.598635,1.000796,0.093975,4.343428,2.688094,3.684679,1.088011,0.623288,0.779391,4.229570,1.292284,3.088326,1.772305,2.201978,4.275869,3.671407,1.678327,4.486002,1.578977,3.751244,3.949162,1.803721,2.622464,2.297160,3.122623,3.649290,4.560704,2.919279,4.511797,4.964570,2.728671,1.260600,3.212567,3.645954,3.241378,0.278544,0.943222,1.192918,1.225109,4.695536,3.340074,1.160968,0.827815,0.241622,1.415060,1.683534,1.403477,3.599096,2.834944,0.516513,3.246805,1.552710,3.706800,2.444846,0.704481,0.914717,2.757375,1.422418,1.910353,3.927836,2.779925,4.386301,3.440192,0.769072,0.497757,3.216607,2.677825,3.671484,2.772750,4.938161,4.908209,1.360796,3.959348,3.830578,4.202307,2.101694,4.639007,1.883881,3.566622,3.011890,1.819736,1.139416,3.426768,4.511659,1.992491,0.482343,1.403038,2.003268,2.035288,3.188375,0.575751,0.563032,0.867716,0.828666,0.878797,0.026126,1.371016,2.828456,4.960959,2.055339,4.230278,1.047357,4.698849,0.085101,0.135666,1.810344,4.376577,2.834622,0.175673,4.201752,0.810906,1.879990,0.427002,4.656046,0.031187,4.392283,0.841810,1.011289,1.103577,0.711733,0.715484,4.357948,2.085418,1.813383,1.227318,4.524552,2.924976,1.726165,0.988385,4.564596,1.024052,0.326645,3.152679,1.385472,0.889461,3.025456,2.281860,0.785351,2.872282,3.336158,3.468883,1.260719,2.594274,1.687569,4.633369,2.406108,2.852766,2.656933,4.990066,4.479693,4.937037,1.201938,2.411830,2.264035,3.507460,3.612926,2.091780,2.633444,2.328259,3.827980,2.472052,3.390175,4.115642,3.391400,1.820858,2.392215,2.331173,4.796346,2.178713,4.567919,4.548205,3.732735,1.010246,2.125745,3.225188,1.283924,0.802041,2.411218,2.999158,3.236722,3.057671,1.457077,1.740993,1.914601,1.022676,1.034661,2.292846,0.641974,0.549845,2.527450,0.238186,2.012367,3.743415,4.871285,2.499384,1.285699,3.139772,0.724706,4.652490,3.775219,0.753293,0.488363,4.631417,4.780268,1.256714,0.859329,3.448070,4.968510,1.288831,1.804301,1.799352,2.327122,1.312000,2.794533,4.158194,2.001805,1.400875,4.672445,2.748730,1.163516,1.735718,2.504713,0.444667,0.169162,3.553522,3.710018,2.351856,4.321581,2.942031,3.786813,4.679913,3.951818,1.552743,0.594857,0.198853,1.952740,0.037265,3.689525,2.258838,3.661150,2.488721,0.074471,4.360631,4.602662,3.005298,3.495831,0.303353,3.478583,0.420002,1.603939,1.492654,4.207151,2.314483,0.313619,1.210999,2.221804,4.737461,1.206611,3.876993,0.874713,3.211680,1.127921,3.859935,2.712602,4.462967,0.533907,0.946418,3.831239,1.679836,0.347380,3.515442,0.678601,0.595969,2.514245,2.059952,0.869984,3.352834,2.077440,3.425801,1.914095,4.129313,2.870366,4.059150,3.130113,1.808450,1.938747,4.037230,0.146134,0.865719,3.147686,3.717109,4.261776,3.855055,4.907416,4.599283,2.104708,3.942544,1.480100,4.643712,4.985817,3.672894,1.672738,4.814978,0.204749,2.050008,2.550174,2.573134,1.124379,2.011186,3.555740,3.887913,3.591601,0.083775,3.377745,1.205890,3.228562,1.900396,2.867503,1.123691,3.386913,4.513132,1.672952,0.318308,4.697065,2.745226,4.158894,4.731007,4.374350,2.601888,4.886553,2.188749,1.248643,4.341144,4.410106,0.296918,3.683919,1.675665,4.300488,1.214660,2.901513,0.651237,4.416650,0.680062,3.239565,1.127867,3.783196,0.920970,3.791425,2.529951,3.543431,2.603039,2.782711,3.022161,1.141719,2.878740,1.319197,1.497299,2.495117,1.141278,3.094901,1.497840,0.930207,4.493600,2.179112,4.714638,2.073600,0.052940,0.996090,4.176752,1.800931,4.231885,1.941045,1.483619,4.003634,0.361443,4.379758,2.099332,1.643551,1.099603,2.972037,4.739730,1.762095,1.153343,1.238260,0.455159,1.183574,3.221000,3.567245,2.083019,4.718216,0.834817,3.578547,2.025727,1.196880,0.973243,0.838065,4.889277,1.947123,3.040691,2.161848,4.054819,3.792935,0.233694,3.206853,4.844106,4.252125,1.478371,3.054676,2.251824,2.922876,2.808841,3.666141,1.604095,2.161609,2.895513,0.040443,1.358301,2.430738,0.902538,3.595365,0.526124,3.614258,4.111076,3.427964,4.586319,3.558388,1.105941,4.110047,1.216400,4.157692,2.944260,2.563266,2.894917,1.967979,1.352352,2.301968,0.690283,3.098191,2.734296,3.365392,3.191333,4.619802,2.585734,0.062380,4.401659,0.604879,3.645972,0.987120,0.616498,4.773728,0.178554,0.150997,2.241692,2.928513,0.883050,3.623390,4.696011,2.492402,0.608809,4.217405,4.714546,4.164112,2.823452,4.198730,1.884418,2.498380,0.406512,1.620776,4.578257,4.267262,2.970783,4.526828,2.134639,4.688054,4.729354,2.849839,0.251016,4.423310,4.556942,4.715268,2.360098,1.456466,0.437565,4.396674,3.615101,4.009028,3.845332,4.086827,0.554948,1.691390,4.070852,3.671381,3.833782,3.798054,0.334600,4.130368,0.429563,4.112027,1.585441,1.060621,0.979530,0.386132,2.491315,3.923012,3.252206,4.960217,3.855134,3.641447,2.056606,0.604046,1.898792,4.298250,1.679234,0.612582,2.656775,3.037238,0.591568,3.831553,2.539515,2.935688,0.192014,1.078951,2.202344,0.520443,3.649393,1.083890,1.806399,0.166972,1.265508,4.245271,2.667584,3.660650,1.037938,0.980890,2.919133,0.960009,0.988615,0.496104,3.797794,0.440903,4.444884,4.352768,0.806309,4.836971,1.704639,4.444984,0.361373,0.718855,2.206979,0.238360,1.347568,2.994183,0.658145,0.622340,2.005933,0.515602,3.264206,3.952128,2.369196,0.326522,3.061536,1.199172,1.900174,0.963898,3.202384,4.094630,4.292715,3.859043,2.733037,2.779124,1.015016,0.075975,2.796250,3.488272,1.980113,3.214622,1.624976,1.764548,1.896340,4.231832,1.017757,4.839369,1.301376,2.453378,1.283494,2.387155,1.996332,1.873896,1.497570,0.109864,4.037890,2.255004,1.298803,0.941172,0.789541,4.745137,2.983474,1.312113,1.306249,4.967372,3.223418,0.816246,3.984175,2.184550,3.344527,2.938898,0.713279,0.616244,3.776547,1.198279,3.564000,0.115280,4.879407,2.502451,2.143559,3.974908,2.050782,3.435797,0.120237,4.588290,2.740781,3.643147,4.708740,2.101554,0.521562,0.168701,2.366068,2.876501,1.759345,2.440032,0.633799,0.809456,4.517640,0.885167,2.686369,1.640872,4.745640,0.487770,1.151088,1.496138,1.806206,0.482274,0.773361,4.327923,2.403950,0.799688,4.585893,3.617939,1.270055,4.382664,3.689760,4.973432,0.394200,3.097453,1.301496,0.762859,1.449818,3.634059,3.143583,1.568580,0.523209,0.619085,3.051045,2.375408,1.854397,0.483743,2.466762,1.323550,4.368029,3.470007,2.087165,4.597568,2.795249,4.145722,2.966873,4.716247,0.444131,3.890005,0.207252,0.536427,4.040641,3.630768,2.973939,4.582183,1.977020,0.027282,0.358271,3.620093,1.296853,2.925791,2.198109,1.160688,3.717346,0.152270,3.433016,3.745832,0.417574,1.397517,4.619796,2.317518,2.916284,3.869173,4.276560,0.514982,2.663556,1.032187,3.468852,4.721209,0.234218,3.228438,3.208562,2.073545,3.135724,1.949361,4.934990,2.399358,4.124496,4.648535,3.706026,3.375389,3.519365,0.646376,1.360936,2.287280,2.119495,0.813759,1.614118,3.574456,0.269999,3.165030,1.827697,4.677249,1.448991,4.844719,4.263646,1.054032,4.485361,1.553377,2.211560,2.169322,0.816075,2.554401,0.260429,4.846001,2.108273,4.168938,1.537730,1.435635,3.020014,3.860453,1.642115,3.681942,0.528917,0.367684,0.448613,1.411791,2.607433,1.499436,1.502649,2.514246,0.208863,4.158942,2.843751,0.590259,4.887878,1.440462,1.162748,4.337340,3.743651,2.466474,4.390397,2.316448,0.132208,3.609113,1.318354,1.616518,4.648922,3.109558,3.819055,2.667904,2.952424,3.833628,4.731425,3.549385,0.140694,1.784971,3.868047,0.166864,4.399792,3.362817,1.185738,2.181970,0.145353,0.352598,2.751347,1.134687,0.894797,4.732053,3.264702,0.216428,1.481330,0.914765,4.791044,1.531208,3.043550,2.599086,4.535554,0.025077,1.629947,0.871908,3.908850,1.945301,4.184943,2.640863,4.750033,2.212530,1.750676,3.682488,0.916648,3.203424,0.297764,3.627862,3.870931,0.660183,4.417428,0.454079,3.726703,4.574578,3.225597,2.835699,3.599274,1.107914,1.509447,4.167587,0.452480,2.936695,4.427393,0.410074,0.850082,0.517484,0.532679,4.012089,3.128278,1.118453,2.153888,2.883673,3.492770,1.792938,1.798188,1.958945,0.812820,0.209814,3.100869,2.300392,1.414831,2.242110,0.474519,1.930010,3.089294,4.655705,2.491443,1.227758,2.223911,1.074828,4.540111,4.653897,0.261840,3.737064,2.196055,4.127900,2.951257,1.562524,0.127675,4.400793,2.973227,1.490352,0.573596,2.774872,3.506257,3.105476,0.082711,4.451710,2.175650,0.361027,3.556113,2.361777,1.927035,2.760120,1.633828,1.191576,4.538362,4.022857,1.664782,1.451601,3.779015,3.861311,0.030426,4.255968,2.235095,0.483744,3.103567,1.603926,4.645427,4.018978,0.839726,3.867941,1.266310,1.438017,4.919151,0.574724,3.723037,3.725090,1.047048,4.411657,0.445522,3.584315,0.001704,3.554410,3.092752,1.894638,3.250316,3.331978,3.061171,1.007819,1.539457,4.372385,4.177582,1.682519,4.942260,4.734557,3.561257,1.029579,1.157091,2.385553,0.374192,4.490359,2.041118,1.785204,2.266722,4.614634,4.554786,1.282387,2.745349,2.163342,0.229592,2.622879,3.837776,3.864161,3.669764,1.017057,0.366042,0.845239,0.049575,3.778932,1.022831,2.177197,0.463057,2.691870,2.042212,1.365656,4.750134,1.552084,3.348362,4.818889,3.489932,3.436936,3.916947,3.249688,2.045775,1.169948,4.783375,3.228654,0.034865,1.879938,0.205960,4.286360,1.103817,2.695536,1.003143,3.191882,3.259411,3.823839,2.628999,4.162765,3.809594,2.583794,4.261829,0.613554,0.701233,4.949411,0.653937,3.153422,3.195062,1.935388,2.178259,2.585092,2.383595,3.152134,0.317611,1.147785,2.834367,2.813124,1.207737,0.464828,1.047757,2.648248,1.910568,1.479080,0.242158,0.263180,4.063362,2.748975,4.666971,1.228561,0.694192,0.150275,2.967484,2.967722,1.076062,2.043020,0.598666,0.737342,3.155728,1.577575,1.511001,3.000356,1.233398,0.080157,1.527563,4.370014,4.378674,4.593216,0.966391,3.349228,2.461023,1.315843,3.218489,3.050105,0.724193,3.804857,4.553206,1.544943,0.495856,1.817488,4.245601,2.311350,3.819611,2.926852,4.878801,2.785450,3.913450,1.923528,2.245473,1.351398,1.268281,2.765143,3.356035,0.178888,0.195704,0.139216,2.666002,2.916119,2.745601,2.420028,2.802560,1.505013,4.571923,4.254688,2.503890,3.057799,3.048818,1.204211,0.797112,4.449728,1.956976,4.543769,3.467145,3.658154,0.913380,4.438593,3.969769,0.292404,4.497926,2.726975,3.482916,4.132127,1.151640,1.716355,4.033710,1.856077,3.269729,4.093949,3.874047,3.023562,4.621733,1.489255,2.142966,3.863439,3.809464,3.298041,0.627934,2.892310,4.829505,1.319614,0.344864,0.073837,3.017183,0.260732,4.625544,4.420920,4.506044,3.241224,0.155130,2.809218,0.387605,0.410705,0.278439,0.607221,2.644178,2.834372,3.884378,3.916206,1.491104,2.223161,2.542824,0.026330,4.386452,2.489809,2.895596,1.159362,3.880196,1.807051,3.421659,2.579065,4.221442,2.658391,4.218077,1.648893,1.750431,3.542386,3.457782,0.555968,1.544898,0.643496,1.166324,1.860353,4.901400,1.856094,2.235600,0.381996,1.856233,1.513249,1.829872,0.592647,3.284498,0.388375,3.481284,1.179696,3.484141,2.242527,4.802163,1.949044,4.089567,4.695862,0.186708,2.998234,1.299310,1.171177,2.557444,4.703994,0.309623,4.795683,4.032965,4.501040,0.251785,1.503671,0.611139,2.007736,0.867759,0.345685,3.234835,2.669978,4.409770,0.780203,1.739384,2.913624,0.404848,4.461266,4.829622,2.690918,4.139555,2.458420,0.478333,2.009604,2.627751,3.661661,0.676394,2.201153,3.478259,3.164438,0.420184,1.682184,0.239245,0.748086,1.045131,2.075917,2.504204,4.114403,3.888507,2.499822,1.547279,0.664430,4.416867,2.281402,3.092345,3.477416,3.724686,4.117052,2.452845,2.166241,3.764546,1.806750,0.272935,4.079726,3.265901,2.295528,4.901469,3.380985,0.669624,1.753869,2.674973,3.961906,4.261765,2.956545,0.386423,1.874800,1.690280,4.400925,0.767690,1.317639,0.236421,2.329491,0.807210,4.882624,2.157164,4.529543,1.013021,2.857924,3.705445,3.973972,3.327626,4.995099,3.581461,3.058804,4.373967,3.591089,0.651556,3.845049,0.753352,0.743369,1.452300,3.732892,2.921558,1.730248,4.004824,0.470219,1.486195,4.241257,1.812028,1.631287,2.675651,4.542907,4.810448,0.396393,4.742349,4.803876,1.746855,0.090393,1.764067,3.852301,0.612588,1.223637,0.598033,0.170820,4.188253,2.984098,4.383579,0.616882,3.400234,2.875227,4.188956,2.401808,1.437401,2.540912,2.385881,3.430618,4.720789,1.833058,2.854024,1.776024,2.788900,4.563009,1.647654,4.661910,3.843361,3.633414,4.028778,2.719651,1.028530,4.948450,1.416358,1.416108,2.638052,2.056052,0.434193,2.292553,1.698119,4.573383,4.470749,3.028164,3.563576,2.940429,1.155103,3.782382,1.358158,1.828146,4.214526,1.825240,0.240744,0.118909,3.656188,0.226308,4.978565,4.963993,2.097965,1.237900,4.037981,3.651348,4.700213,1.086213,4.738669,2.992911,2.763920,3.121446,1.354880,1.854875,4.421833,3.291607,4.321075,1.434865,0.366853,0.675783,1.291591,2.471260,0.958772,3.392922,3.890833,3.565376,3.639172,2.850926,3.722364,4.423892,3.195202,4.716959,2.799737,3.337378,2.379572,2.755012,3.772623,4.991698,0.238010,2.734144,2.046900,4.647256,0.774581,4.118574,0.652094,3.864287,4.463741,3.732553,4.747227,3.001572,1.404818,4.337122,3.748622,4.192174,2.645344,4.211442,0.575875,4.598181,1.129607,3.927644,0.004912,4.648667,4.758047,4.680659,2.743681,0.885669,0.376173,3.111269,2.666999,2.361374,0.511611,4.372936,3.639144,4.372149,1.950886,3.081703,2.397111,4.915993,1.949910,4.078017,2.948906,1.573203,2.058978,1.761665,3.824835,3.332551,0.581142,3.869435,2.306740,1.632599,1.869454,0.650420,1.561579,0.866207,2.288032,2.639564,4.950098,3.844486,2.644469,1.871641,0.795035,1.896488,2.722900,0.889048,4.499570,3.195586,2.025166,3.971281,0.672745,4.188923,0.094615,1.975421,2.793970,0.839631,3.349074,4.805544,0.404589,0.046179,3.541309,3.966780,2.081385,1.729671,1.758175,4.192692,0.289010,3.980948,0.708483,4.104001,2.707323,4.179615,0.730037,0.723432,1.075488,2.587629,2.215153,1.308003,1.400085,3.830445,0.389364,4.490950,1.971835,3.765013,0.773054,3.944201,1.271773,0.012333,3.885669,2.951493,3.357282,2.993131,1.161592,1.645523,0.037070,4.560410,2.194329,0.840402,0.002118,3.925938,1.718709,1.422153,2.657486,2.462802,3.094413,0.021062,1.824327,4.872911,1.036025,1.640765,0.570327,2.502002,2.003361,2.021917,2.107642,3.510473,2.259566,1.302904,2.465583,4.728445,2.355836,0.695058,4.117257,4.587394,1.702451,0.110348,4.028530,1.625506,2.738700,3.923189,2.383992,1.461992,4.283134,4.615406,3.584709,0.060485,0.215711,2.888618,3.879011,0.707177,4.512598,4.585090,3.960986,3.242517,1.836633,0.463227,4.694793,1.421651,0.914516,4.740143,2.984859,4.774512,4.147748,1.454905,3.329660,3.038837,1.987377,2.710318,2.639500,0.324114,0.897811,2.727837,0.217516,4.050686,1.961761,0.378067,4.206815,0.342971,0.842650,3.833319,4.668295,0.172955,0.302489,2.413137,2.099417,4.817037,2.237147,3.551537,1.751992,0.921328,3.447830,2.276322,2.846217,4.023276,1.767194,2.462596,2.534269,0.341429,3.437563,2.219389,2.995819,4.434779,1.311161,3.368437,2.787900,2.705355,4.682423,1.795444,0.341650,1.711394,0.030677,4.113102,4.944672,4.063953,3.969063,3.226125,2.877568,2.838948,2.026617,0.866509,3.264254,0.125888,1.158789,0.021193,2.495872,1.782184,2.135595,2.866710,0.380250,1.313954,1.150081,4.431642,3.706197,0.929468,4.191747,2.463636,4.062289,3.657923,1.808309,3.008791,2.997642,4.600340,0.480835,4.197712,1.968133,0.702981,1.430672,0.871382,0.446103,1.307782,2.223734,3.565116,4.764352,0.940627,0.452980,1.979320,3.681680,4.127143,1.009305,1.661838,0.445188,1.842550,1.624866,2.776486,3.509134,2.241429,0.006595,3.689839,1.007466,3.255958,4.453670,2.045589,0.154319,4.661451,1.463160,3.642642,1.712034,4.208075,3.260311,1.465084,0.682712,0.816817,3.888480,0.506499,0.728905,2.956465,0.632528,0.267040,0.970146,1.458083,2.006932,3.472470,3.790043,3.135828,2.604133,0.322722,2.277759,0.530920,4.158319,1.462799,2.018377,0.291579,2.110854,3.224336,2.484530,4.116329,1.987680,4.746442,4.139760,3.935649,0.767110,1.202283,1.748328,0.902651,0.373666,0.129227,2.062689,0.189182,0.874572,4.606132,2.492726,0.516731,4.432611,0.928389,2.475076,4.214342,4.940038,0.632454,3.491891,0.385331,2.903403,3.855475,1.687594,3.034103,1.617719,1.553172,1.662268,3.242983,3.089612,4.564037,4.096979,2.904095,3.080385,2.762748,3.388346,2.122395,4.825000,0.061759,0.766101,0.933800,0.737797,2.956544,0.092981,0.509885,0.642505,4.030384,4.212976,3.304523,1.961886,3.709838,4.251957,1.860172,3.370828,3.468241,1.899150,0.177958,2.412905,1.913505,4.552969,0.367226,4.925847,3.449731,4.564273,1.068515,3.299636,0.957703,3.796248,0.144880,2.100687,1.506905,3.867664,4.588577,0.115178,4.197672,0.770588,3.297484,3.279259,3.374320,3.464290,4.608832,1.559886,2.185534,3.058361,2.489942,2.176155,4.472902,4.016147,2.546219,1.581104,3.676624,4.238129,1.539834,4.623627,2.117335,1.605702,3.069497,0.705384,4.556203,3.956667,0.604923,4.584500,4.382892,3.143410,4.671864,3.867576,3.447794,4.402457,1.478583,1.479075,0.406823,3.844668,4.428098,3.471883,4.319044,4.343309,2.275220,3.590203,1.884757,1.419829,4.810685,2.110084,4.294660,3.013716,1.737628,1.890810,4.203513,0.997125,2.287143,0.324733,1.289827,0.682034,1.713617,3.578167,1.884377,2.294836,2.367952,3.021235,0.811022,0.413708,4.734558,1.441373,3.808199,2.669562,3.422322,0.230072,3.404947,4.219286,3.815870,2.735328,0.185391,2.467077,1.355333,2.808952,2.893283,1.978918,3.765784,1.744369,1.148102,3.135352,0.471196,1.560515,2.003219,0.378195,0.458797,2.724167,3.561413,4.501321,4.444904,1.958161,3.088218,0.561600,0.444719,1.305160,3.337909,0.591715,1.635733,4.979687,1.241428,3.793640,0.297491,3.563435,2.092461,3.287793,0.102868,3.821305,0.821702,1.254088,3.572536,3.038280,1.271953,4.218572,0.282756,1.038619,0.895604,0.217236,2.993152,4.882849,4.461944,3.305349,1.206844,3.786163,4.636489,3.367882,3.776916,3.964111,3.151041,2.360849,2.616242,4.641389,4.891420,4.209313,1.785163,2.731853,0.346109,1.188845,4.284136,0.246968,3.069992,2.892243,0.124431,0.681041,2.951313,2.686960,0.151874,2.580222,0.108727,1.455322,1.226075,0.376434,3.368531,2.144828,1.236763,1.344105,4.552119,2.750880,1.268514,2.564701,1.893578,4.476734,1.135947,0.825635,4.486919,1.044872,0.011321,2.493932,4.495811,0.892663,4.170658,4.767841,4.301012,3.893205,1.455075,1.710630,0.785394,2.563898,4.138157,2.483122,4.116790,2.399931,1.742377,0.635509,0.063935,1.765462,4.110278,1.729924,4.094876,3.450333,2.196611,0.213257,3.547611,2.838376,2.325463,4.880643,3.741968,1.725009,1.703023,3.073449,0.774426,2.707043,2.788732,3.295384,4.258264,3.297552,4.518264,0.105764,3.028979,0.155168,4.203866,0.634715,2.462641,0.536573,3.214962,2.743859,0.199736,3.753887,2.658665,2.264369,4.468459,3.922241,4.358252,1.021123,2.454677,1.844230,1.592442,1.509492,1.413556,3.040584,2.750090,0.307753,1.558626,1.756804,0.567634,2.786727,3.575219,0.680059,1.218550,2.438131,0.877313,4.448909,1.488626,3.791177,2.589664,2.995532,3.523904,0.901258,2.657858,1.264198,0.545615,4.246686,1.649256,3.839503,3.615294,2.975722,3.055725,2.579347,2.011998,0.116612,2.970597,2.735414,3.601160,1.226265,2.283047,3.649737,4.252771,2.619008,3.065694,1.389178,2.268608,2.480872,0.714830,0.345794,0.929049,4.172307,2.397890,0.593662,4.788416,0.682532,2.903848,2.696833,1.049978,0.667817,4.603996,0.616566,1.470410,2.775966,3.508168,1.433490,0.185980,3.123909,2.713779,0.288442,2.772783,1.636026,4.052043,1.773120,2.810205,2.598924,4.709860,2.966189,3.254098,2.129968,0.678445,2.352317,3.615572,2.550756,3.022746,3.987102,0.041393,2.767143,3.588804,4.849009,4.234230,3.883802,1.649936,2.464245,3.192468,4.748474,4.969678,3.959201,3.024698,4.979205,4.181634,2.579620,2.652463,1.601895,1.672653,3.981462,1.001410,2.480745,3.307386,4.332354,3.432471,1.129632,1.832517,1.186386,2.302619,0.174114,2.259595,0.543039,3.030563,4.076930,4.320459,4.679651,4.871386,0.228186,4.512719,2.707400,4.055878,2.132324,0.564237,2.560431,2.621800,2.178518,0.606657,0.178657,0.182700,0.562708,0.140716,3.440118,4.686193,1.056256,4.391898,2.621344,0.378502,4.367382,2.360911,4.797873,0.035765,1.691176,1.023370,0.085456,1.689338,2.483509,2.617633,3.898062,1.604487,0.244786,3.187351,4.543093,2.936313,1.183952,1.328228,1.794106,4.354834,4.141129,0.417257,0.722695,3.449286,3.364282,4.400072,2.306694,2.829088,4.370372,1.422621,3.721692,1.216576,0.359456,2.251970,0.092967,3.678369,1.239770,4.492458,0.124439,1.936449,2.059489,4.946670,1.983389,3.444197,0.069012,2.693335,2.080084,1.238278,2.465128,4.430323,4.379707,3.352218,1.763327,3.872333,3.868054,4.454154,4.531654,1.532626,2.714634,2.887558,1.003044,4.733992,3.486069,3.814484,2.322705,4.330668,4.329517,0.343084,4.217684,4.251013,4.126951,1.944877,2.912485,2.773314,3.752275,4.912304,0.304251,3.947846,2.089156,1.875900,2.966587,1.030051,4.346839,0.263661,0.516774,4.069170,3.453369,3.657194,1.901525,3.565390,1.533283,3.909949,0.676259,4.636828,4.301580,0.005088,1.936521,1.373575,3.885680,0.903628,1.390077,0.329315,1.308136,0.963994,4.649903,4.034866,4.696390,1.329679,1.052251,2.848992,3.182027,4.671586,3.108150,1.234664,2.314019,1.909434,0.537279,1.741327,2.822408,2.416099,0.796204,1.089897,4.710687,0.951135,2.643277,4.840735,3.804053,3.747166,3.646316,4.776272,4.569839,2.198778,0.927971,1.105164,4.639203,4.957149,4.928726,1.483929,0.259599,2.950114,4.403531,3.617829,2.710598,1.320237,0.055025,3.279686,3.556389,1.062315,3.859676,1.998140,4.453286,3.784288,0.485116,2.780055,0.815021,2.829397,2.856589,1.466429,3.006414,0.633410,4.078682,4.012361,3.348919,0.672668,3.301032,1.876299,2.714188,2.092898,3.680182,0.202065,0.821017,2.160229,3.005176,0.107709,3.858799,1.018775,0.374372,3.481313,0.828125,0.340571,0.302742,2.791798,2.585188,2.597201,2.945685,3.532929,2.037872,2.023436,2.230596,4.388498,3.901437,3.780031,1.259365,0.252013,0.108601,3.348190,4.951243,3.729055,1.732338,0.336434,2.380695,3.204419,2.292245,4.053653,0.950707,4.436740,3.415142,4.883718,1.529274,3.915617,1.654396,2.614724,1.435983,0.516383,0.614503,1.830987,0.074981,4.682488,2.623839,1.900335,4.704483,3.668552,1.558455,2.970157,2.776374,2.046441,0.028923,4.306895,2.785126,0.561374,1.152757,1.665560,1.620365,1.243756,0.004865,0.294995,2.848655,2.746570,3.553345,3.016380,0.940520,2.702832,3.806999,0.089604,2.865776,3.415224,0.337061,1.573634,0.891916,2.862052,4.126202,4.191489,0.809998,3.443102,3.157177,1.153802,1.198747,2.978362,0.484835,1.429635,3.330438,0.354457,4.884002,3.674821,2.993718,2.712419,3.174283,3.949195,0.632844,2.561346,0.316795,3.641004,2.932339,3.280219,4.718267,2.245218,1.597585,1.901050,4.531007,2.880982,4.905066,4.775073,2.990775,1.818957,4.513543,2.233176,3.583089,2.361926,0.450220,4.536187,0.373268,2.535582,3.139826,4.781851,0.848771,1.464108,2.327391,4.282035,0.056232,3.855040,2.832783,4.384424,0.736707,4.262945,3.996940,3.900754,4.747861,2.364568,1.908267,3.167333,0.527299,3.384066,1.695114,2.107045,1.088369,4.386594,0.542121,0.051243,4.824074,2.166372,3.038268,4.761537,2.393525,3.144956,4.078144,4.699222,3.765919,0.512281,1.602975,1.249334,0.155364,4.269614,0.371304,0.681491,4.597270,2.308000,4.249426,4.498548,0.453169,1.475009,3.955415,0.976544,2.133152,4.959531,2.059914,2.151230,2.048495,4.377997,2.675146,4.087957,4.599635,1.834619,1.790886,0.466379,2.055323,4.827922,1.659421,1.600273,2.178385,4.431402,2.609629,2.209905,0.135687,1.302434,2.819658,1.305920,0.269087,0.535151,1.776625,3.254386,4.868521,4.382332,3.977588,0.125823,0.536350,3.462509,2.626026,3.759341,1.421077,2.492215,1.357346,1.364651,3.546299,1.014299,0.682778,0.381722,4.417507,4.247989,4.205198,2.645205,0.259026,1.344918,0.714141,0.844975,4.713435,3.970405,1.843008,1.015124,4.635089,3.042701,4.583773,3.561227,0.945548,1.338397,1.548915,2.204474,0.930205,0.877226,0.350580,0.996630,1.871581,3.711296,3.120414,2.017677,3.555992,1.129122,1.694889,2.740109,2.463442,3.915357,1.139341,4.321489,4.078608,2.000048,4.369202,3.177576,2.752606,2.935491,2.572436,3.237256,2.173577,2.268409,1.140347,2.559801,1.519515,1.781807,0.519242,2.867250,4.895406,1.350613,4.429143,0.100325,2.175201,4.304443,1.510673,0.846738,3.294251,4.748234,3.141517,0.451538,3.745454,0.029675,2.709315,4.245618,2.148784,1.098045,4.384715,0.773090,1.990433,2.302528,0.157339,2.625487,3.015462,2.078590,0.175525,0.551528,1.961355,2.120057,4.566978,1.862401,3.622308,3.076822,0.192308,2.300743,3.362728,1.549336,3.680120,4.674364,1.352243,2.938420,0.069980,3.165050,2.556168,1.903877,4.520137,4.704881,1.695058,2.661194,0.447480,2.661164,4.398601,1.002916,0.240733,1.961915,0.998469,1.434215,4.628930,4.374606,1.662541,4.507802,4.201143,4.900933,2.634339,2.609546,4.721356,4.408671,4.782932,1.738530,2.197150,3.972713,3.137482,0.263698,4.433041,2.648089,2.004976,3.789931,0.512722,2.405442,2.827655,1.465439,3.915761,4.689790,3.155412,3.272331,4.623479,2.590938,0.639072,4.213411,4.720198,1.163003,1.031430,2.661603,1.495588,4.248769,2.292231,1.171765,0.003166,0.514679,1.786995,4.410424,1.851857,0.675104,4.718389,3.428864,2.081369,3.522307,4.532186,0.884699,2.777556,3.706792,4.896298,1.045381,2.289899,0.687573,2.857387,2.577060,3.399518,2.587573,1.136250,2.214183,0.857374,1.055751,1.602914,4.257126,2.425508,0.075356,4.772927,0.629560,4.427163,2.784420,3.113326,3.399999,2.011455,1.822709,0.171945,4.802169,4.755352,2.306995,2.535766,1.681117,0.938573,0.417838,4.697045,0.104544,2.561481,3.403367,4.544192,3.536267,1.947541,0.235492,0.273572,3.821744,4.710701,3.974253,2.241948,1.696783,0.937056,2.712735,2.142540,3.422929,4.147272,0.443423,1.241374,0.537287,1.146989,0.990988,0.297844,0.292198,0.656486,2.429573,1.429524,4.369328,0.229274,1.872227,2.529325,3.988554,4.669316,4.649673,4.252534,3.343745,1.742310,1.305660,4.285774,2.847123,1.503836,3.466413,4.356383,2.120549,4.960333,2.777178,4.463122,2.438360,1.705762,0.811586,1.870223,2.706291,4.029137,0.525619,3.161109,3.910803,3.169497,3.488591,3.996762,4.397293,0.365701,3.106768,0.700391,1.083687,0.248548,0.204551,0.241570,1.958602,0.365330,4.102196,4.525545,1.504732,1.623931,1.959245,2.223716,4.807704,1.284104,0.670516,0.111952,0.207528,4.195915,1.561740,2.422808,2.480275,2.055026,0.753769,3.411894,2.536449,0.869340,3.755578,3.971925,1.123734,0.451448,4.084427,2.570423,1.319747,0.983717,0.269071,1.582126,1.277956,0.834428,2.221023,2.864172,0.291979,3.155089,4.484042,1.615084,1.207576,0.529183,1.859377,3.388634,0.577990,3.915073,3.385918,1.938995,0.873849,2.019066,2.455799,0.707652,1.440777,0.033602,0.038239,3.466207,2.883245,3.671698,1.545770,3.004355,3.588537,0.508854,3.619407,2.756604,0.833672,2.019875,0.216047,1.236370,4.573646,4.587738,3.987756,0.113453,3.916157,1.302490,2.170740,3.115953,2.243692,0.203076,4.619941,0.162105,1.161307,1.913349,4.698815,2.401907,1.092888,3.936985,3.044911,4.038020,0.964144,1.683528,2.474575,2.640831,1.267963,3.654362,0.223151,3.789089,2.557301,4.489938,2.150452,0.126572,3.236838,0.377707,0.637862,4.967666,3.396686,3.300379,1.676407,2.709212,1.920460,2.228013,1.142946,2.487727,0.172006,3.614238,3.548366,4.029215,0.312819,2.692038,1.408500,0.839637,1.272816,1.931568,1.587287,1.780408,0.553507,4.797060,2.986690,0.030428,4.370891,1.014962,0.808011,2.500787,0.009044,4.171407,0.433114,1.156473,1.674888,1.698448,3.608688,0.700599,4.480269,0.775156,3.385956,4.908951,3.695676,3.815217,1.630828,2.971416,0.085421,3.309265,2.966349,3.081388,4.134720,2.470876,4.696059,2.671688,1.408302,0.159173,3.878112,0.630510,3.902961,3.083341,2.371591,2.402293,0.463290,1.113904,3.214236,4.365491,1.186013,0.423885,0.745174,1.248793,0.162119,1.270054,1.550790,3.229415,4.017756,2.285464,1.665157,1.963746,3.065748,0.048751,1.522386,2.755564,4.244111,0.375339,4.695750,1.314607,2.396565,0.544693,3.932600,3.919630,4.611882,3.064039,4.635121,4.114930,2.074875,4.567463,1.458326,2.229192,4.114397,3.073784,1.655949,4.473488,0.037001,4.255448,1.247300,4.919149,0.203680,0.734759,1.353694,0.659123,1.507770,2.918737,0.639341,3.521032,2.200686,3.346347,2.001705,2.711226,0.849300,4.097774,3.611560,1.121786,1.162236,1.145212,0.750898,2.764868,0.955310,2.212228,0.776322,2.889503,0.319120,4.105848,1.711984,0.500757,2.493026,4.499449,2.610814,3.091339,3.692764,0.162449,4.093689,0.266187,0.516704,0.492026,4.798885,2.657763,0.006464,4.575771,4.798861,4.854402,1.961371,1.604175,3.330552,1.591523,2.792571,0.502064,1.421181,4.559163,0.102807,2.517714,0.890576,4.250422,2.620917,4.810754,2.593735,1.452136,0.629130,0.061848,2.362897,2.933033,0.799801,1.689047,1.903257,1.759164,2.977851,2.617756,2.505488,1.338424,4.012588,4.889803,3.837833,0.478315,4.887652,3.353698,0.419817,4.845338,3.087130,0.124515,1.122682,2.596412,4.718003,0.252943,2.264145,0.452670,2.068826,0.681826,4.138498,1.545968,3.831614,0.566316,4.804493,2.804117,1.184936,4.010823,2.886761,1.213734,3.305921,3.164700,4.808243,3.592669,3.320128,1.559146,3.881365,0.435296,0.585631,0.903589,3.034645,0.956434,0.000832,2.914290,1.419348,3.194121,2.399804,4.316399,0.117752,2.835070,2.370655,3.375601,2.845924,4.793098,1.257927,3.366228,3.966954,2.623745,1.402847,1.757926,2.273530,0.542605,1.593767,0.348542,2.256252,1.192186,2.837911,4.328526,0.991863,1.903724,0.659277,2.434056,2.341118,2.395420,4.939868,0.116740,1.748398,3.274996,0.972528,3.584536,0.638611,2.250367,3.343061,0.583067,4.591940,1.769524,4.392303,3.644238,0.871033,4.631225,1.576059,2.449884,3.594211,4.643305,1.577487,4.375485,0.730439,4.409117,4.009102,1.639670,1.441834,3.757875,1.617879,3.730195,3.291654,2.989005,1.411431,3.216646,2.592474,0.136755,4.559607,2.442619,4.389332,0.084334,3.917706,4.770037,1.688418,3.022779,0.009520,1.822500,1.849924,4.551399,1.680015,3.845397,4.416877,4.467529,2.173366,4.819684,4.867668,4.124355,4.464465,0.422637,2.154239,1.926185,0.996383,1.628676,1.291254,3.194502,1.560650,1.492210,0.856012,1.234446,2.979944,3.167373,2.115329,3.491334,0.826602,2.766361,3.335660,3.178438,2.627500,0.613503,0.338881,1.644346,2.109619,1.011198,1.229457,0.007691,0.823538,0.230778,2.462535,3.544356,4.008426,3.229595,1.335382,1.951521,2.475545,1.469557,2.934030,2.467841,3.972403,4.509665,1.911333,4.388927,2.688839,1.316633,4.389546,4.637151,4.515435,2.227713,2.693540,0.781402,4.689474,0.178000,4.118781,1.016092,1.567326,3.571467,0.330383,3.870330,0.264475,4.142949,2.509636,4.590174,2.791856,1.092240,1.176653,2.340394,4.960264,1.820802,4.059448,2.876663,4.692332,3.752263,0.090469,0.487090,0.847553,2.442436,4.109590,4.327810,2.623073,3.068920,1.147076,0.399452,0.347010,0.529893,1.556044,1.820274,4.322121,4.659551,0.780639,3.582139,2.832213,2.820614,2.651106,0.442574,0.812678,1.704661,2.053741,0.101911,0.184657,0.468570,0.328284,4.663364,1.095762,4.803038,0.365473,4.148524,2.951648,1.998830,2.555671,4.966958,0.738238,2.252955,4.949604,3.221013,4.952371,0.565006,0.761020,1.423056,3.156506,1.556071,3.146767,0.252885,1.113830,2.211174,2.364015,2.277183,2.664771,2.088777,4.517094,4.031505,2.114712,4.110790,3.922520,2.685950,2.834706,2.396369,2.751693,2.550372,1.380528,1.697322,4.871888,4.863179,0.372452,4.202395,4.223698,3.289382,4.557591,4.690168,1.790203,4.666115,1.935850,2.096938,2.715362,4.508270,1.587786,3.319944,2.009669,3.294275,4.167980,1.643766,1.183671,4.399228,1.985185,3.486682,2.977539,4.061332,0.254886,0.604605,2.260111,0.896893,2.510272,1.614741,3.597723,3.937684,3.464584,1.240242,1.509389,0.223388,4.073882,2.526185,1.495890,3.379029,4.795526,0.412707,3.740195,2.178326,1.596343,2.179988,1.008929,0.964066,1.591731,4.487341,0.272873,1.506320,1.238576,3.006399,1.035373,0.053403,0.769270,1.809668,4.017345,4.234592,3.232994,2.069247,3.257779,0.976284,3.955354,2.216412,4.827373,1.290554,3.197203,4.267695,1.231504,0.110048,2.185130,2.559368,1.080205,4.022759,3.644770,2.826745,4.916018,2.830752,2.069355,0.755858,4.842150,2.255021,1.672757,3.849769,4.010191,0.458241,0.436678,0.442892,0.167087,2.808362,0.919499,3.342230,4.240147,2.633358,4.146056,1.834287,3.956396,4.167909,1.178526,4.951195,3.620832,0.248498,0.822266,4.180902,3.055302,2.203958,2.698042,1.426765,2.877112,0.117772,4.822246,4.999810,1.134952,1.786269,1.642010,1.239204,0.547875,3.444690,1.671411,0.977492,2.662150,1.870584,0.533560,1.930689,3.562383,2.904927,2.315689,4.718230,3.711982,4.722333,4.013030,0.770262,1.034351,0.330396,1.983772,2.469690,4.948803,4.520096,1.062701,1.992701,2.573405,2.863758,1.185166,1.442729,3.078730,1.688396,3.598606,1.491765,1.052105,2.688249,0.530024,4.673576,1.113784,2.308084,3.578301,3.021788,1.456470,4.679412,2.281587,3.406531,0.725286,1.311479,0.816922,3.065566,0.395236,2.111550,2.040772,0.912019,0.907836,1.641349,2.588216,3.065527,3.539093,4.053478,2.008178,2.061269,2.784942,3.995224,2.873013,0.776705,0.710812,0.386079,0.014654,3.754411,0.776060,0.252979,3.515930,2.034132,3.876119,3.283906,2.140892,4.922741,0.479566,0.243763,1.655460,4.816509,0.066547,0.300738,4.505294,4.446759,4.146224,3.433403,4.629085,3.248321,1.651804,4.619588,0.683281,3.929826,0.058869,1.842875,4.892724,0.574653,3.166642,4.478026,1.245243,0.996255,3.919192,0.839811,4.349045,3.217299,4.350959,4.903703,3.342917,4.461976,3.443470,0.255061,0.312316,0.970630,2.937031,2.377213,3.310437,1.544416,0.197697,1.965277,1.221883,1.747217,4.742623,4.691969,1.545292,1.433388,0.911985,4.650756,1.159331,2.099584,3.481668,3.697679,4.963415,0.681263,2.006307,2.829065,4.059997,1.729714,4.518013,4.754177,4.892212,0.653301,0.821554,1.588274,2.098294,4.988014,3.861090,3.240149,3.597343,1.758017,3.209771,0.196338,1.379322,4.918661,2.760540,3.815204,3.102349,3.750972,2.482881,4.991053,4.622851,4.263124,0.361194,0.058055,1.832823,2.739064,1.602222,3.416860,1.024966,2.053507,3.609740,1.839065,4.957027,2.569671,4.005037,2.820471,3.379422,3.214803,0.240544,3.894415,1.164037,1.527561,0.625235,2.416185,2.226472,1.495223,4.962774,4.582009,0.525687,3.695237,1.685101,3.282144,4.374485,3.626923,0.097438,4.435287,2.998101,4.286777,4.735437,3.846845,2.505695,0.747084,3.928279,2.549715,4.590907,4.685213,0.447935,3.418388,3.199824,2.518675,1.187970,1.510547,3.026118,4.661200,4.740342,3.474450,0.010150,0.905700,0.126487,0.552218,1.732833,1.230156,3.570024,0.374860,4.342909,0.738689,2.305000,4.930842,0.157690,4.550087,4.531975,2.981103,4.046937,1.137972,2.338331,4.698308,2.713753,4.947933,2.863459,1.430027,2.648980,1.613520,1.443902,3.208254,4.641027,1.241832,1.873868,0.920300,0.550967,1.933937,4.587173,2.382940,2.254797,4.761635,4.823401,2.579451,3.455616,3.159567,1.843924,4.346443,2.606280,3.275740,2.133611,0.206312,1.682629,1.473764,0.641931,0.701510,4.480436,3.332036,2.190816,4.071175,1.619539,1.491403,4.363836,2.363032,0.532045,0.060349,3.692558,3.314082,3.912583,0.024715,1.420708,3.342360,3.426254,2.461567,0.459233,2.095924,2.811310,4.943523,2.151735,3.280637,4.245230,2.199416,0.774892,3.949992,4.705891,3.408038,3.047580,4.400033,4.622659,1.367860,4.126343,1.075845,1.127244,1.971382,1.182203,3.945822,2.833491,4.841725,1.756734,3.768717,4.408769,3.137014,3.395735,2.065290,2.415413,2.900937,1.078423,0.279602,0.378133,4.716759,2.981817,0.026816,0.595233,3.953615,1.630640,3.594269,3.630536,3.607723,0.114595,1.332122,1.487497,0.542303,2.227474,4.580892,0.464603,0.999954,2.258123,2.029983,3.404676,0.993704,1.989794,4.081056,3.079026,2.343154,2.838621,2.662206,2.810141,0.104361,4.888252,0.312222,1.632353,4.836554,2.778998,2.297945,3.440686,0.405018,4.198325,2.864459,4.663865,4.933275,4.649016,4.987857,1.863405,2.922746,4.656094,1.007646,0.324450,2.248971,4.220114,0.557858,0.554348,1.379471,3.803146,3.908949,1.720155,3.457038,1.166920,0.952691,2.339853,2.425203,2.652524,0.179686,2.074892,3.765629,1.337366,0.379795,1.885841,2.866550,4.267591,2.136306,0.634988,2.565418,1.780541,4.096381,2.558934,0.943316,0.158529,0.764970,3.648631,4.929578,3.621613,3.420511,0.977780,1.453172,0.217556,2.639637,1.437916,2.998469,2.545990,2.127742,1.087333,2.660288,3.768768,3.647080,4.327901,0.447370,1.894875,4.349831,2.344140,0.448889,1.538284,1.541594,2.042790,3.202651,0.600467,2.589068,0.522972,0.940238,1.776007,2.784687,2.516437,2.300285,2.146050,1.714940,0.303807,2.989515,2.496856,2.436032,3.641802,3.268971,2.620362,0.059728,4.764283,3.041399,0.217352,0.911982,2.200772,4.148299,0.424230,2.145129,1.570741,3.251405,4.423514,2.832810,3.285840,2.258152,4.629104,3.136842,0.128525,0.829183,4.128687,0.447109,3.747440,0.400065,2.870041,0.830121,4.984992,3.873496,3.021855,3.990871,1.302502,4.020170,0.658999,3.875889,4.154736,1.093629,4.864679,0.767380,3.506681,3.526377,4.927266,0.688182,3.363090,1.730725,1.266231,4.674367,0.090346,4.467525,1.723707,2.540079,2.048737,4.116577,2.576299,0.517913,0.376578,3.986684,1.710247,1.960722,4.946449,0.888785,0.374157,2.005151,4.293128,0.509130,3.014484,0.489774,2.524886,0.873599,0.432678,2.268917,2.711537,4.114304,2.881918,2.931735,1.588892,1.487340,1.494136,0.235778,1.415060,3.960058,3.965816,3.721764,3.211543,4.390775,4.327293,1.911634,3.326345,4.426679,3.699247,4.625822,4.886574,2.539281,2.982811,2.289904,2.177515,0.449147,1.836695,2.236698,2.982803,0.631071,4.906840,1.807792,1.277279,2.049133,2.398504,1.714533,3.845084,4.765971,1.114562,0.226928,2.830023,3.198839,4.278725,4.523120,0.055832,0.899123,1.630821,1.557272,2.465919,0.700040,4.234391,2.603890,4.909712,3.111329,2.038346,1.657554,4.327038,4.390944,1.217766,2.451761,2.160474,4.330078,1.141225,0.754825,2.245829,2.265629,1.488256,4.059228,4.102725,3.465423,4.763602,0.450669,4.726156,0.764479,3.619693,2.226721,2.628650,1.907725,1.788497,3.011053,2.982594,3.568884,3.583130,0.148667,2.709259,3.329086,3.895854,4.443362,1.630029,1.969026,0.494264,2.222740,4.579109,1.476139,1.190315,0.825725,2.902884,2.617082,2.234381,1.337368,4.887139,0.804320,1.384887,1.570158,2.094039,0.901316,0.768362,1.211425,2.623179,3.823266,1.388113,3.942162,0.336110,1.171136,2.109666,1.717626,1.385350,1.856143,4.125520,0.919432,2.188466,3.230862,2.069973,4.517876,0.497895,2.050061,4.777199,2.330006,4.171850,0.342236,3.661728,1.391468,0.399581,3.161186,4.023588,0.657297,0.329974,4.648795,2.008312,1.047176,4.811653,4.682327,1.353551,0.957914,0.627766,2.045604,3.867428,1.735867,1.245254,3.904448,1.911446,0.313643,2.219264,4.300663,4.940175,2.887746,1.981157,2.803373,1.916845,1.438197,3.676573,1.044267,0.579488,4.105923,0.267141,0.428155,2.184693,4.999007,0.535197,1.897253,0.494453,2.205921,1.706737,3.141052,4.780194,0.985947,3.398924,4.743095,3.991583,4.327708,2.100144,4.864524,1.163004,0.904367,4.690251,1.687868,2.585363,3.627705,4.976130,0.825427,3.886439,1.268485,1.865067,2.748852,0.497649,4.508623,2.363525,2.361414,2.352387,0.431985,0.869783,1.392887,2.938552,4.980558,1.838420,4.241249,0.068993,3.865413,2.307449,3.330814,2.208060,1.826980,4.494268,2.998238,0.535754,0.284108,0.592486,0.942593,1.017061,4.787877,0.651074,3.570823,4.475761,2.163059,3.798454,4.062463,2.263169,3.822160,0.073934,0.804924,3.152393,1.481626,1.433915,1.961925,1.718339,1.415709,2.151072,2.322500,3.213384,2.907104,0.811368,3.928129,4.859432,1.525358,4.411263,3.196038,1.880504,4.295657,4.330825,2.419595,3.924800,2.899307,0.782578,2.863985,1.977686,3.202443,4.188793,3.465476,1.556478,0.218375,1.773379,0.911933,3.727650,0.045356,2.857837,0.337195,1.087361,1.944488,2.355924,0.171471,0.301665,3.683057,1.438031,2.668544,2.467603,2.371164,3.695065,2.801053,2.540281,0.750306,0.934412,4.597385,1.192383,1.043364,0.928846,2.541988,3.989646,3.689086,0.670213,0.588982,3.612075,2.871218,0.226658,3.861132,2.636703,1.566978,0.938461,4.309325,3.923052,2.628336,1.519538,0.764492,0.404698,3.699236,1.209145,1.892391,0.504788,4.643346,3.647877,4.409683,0.208289,0.395631,1.349976,0.040929,0.888161,1.503348,0.992333,3.140872,1.926247,1.150519,2.584047,1.361242,2.946244,2.412043,0.452537,2.013729,0.664212,1.529866,2.748441,3.002656,3.632189,3.279986,2.246520,3.794649,0.141023,4.737116,1.198786,3.472326,1.487312,3.451496,2.340103,1.260615,4.566524,1.168253,0.410757,0.261101,1.581669,0.701339,1.291377,4.959796,2.412948,3.196909,4.632762,0.131718,2.238027,4.047792,4.416337,4.235515,1.842652,1.092972,3.882301,1.308658,0.913925,0.404500,2.532484,4.616557,1.475029,3.831121,0.458317,0.849565,1.542451,1.390346,2.700920,0.326474,4.122860,2.333041,2.902974,1.721006,0.545598,1.104276,1.064049,1.395223,4.661726,1.227324,2.102062,2.731678,0.543503,1.001740,2.640478,0.363970,0.328240,1.974046,2.455429,0.764752,3.997767,3.198978,4.196706,1.926288,4.129632,0.158465,0.130224,0.422538,2.324425,2.762048,4.540454,4.205788,2.248804,2.893100,1.785358,2.661539,0.396423,2.586772,1.459014,1.211479,1.664083,1.833447,3.179721,4.143126,0.926377,1.084907,3.005586,3.622535,2.252617,3.484455,2.253783,4.466743,3.660982,2.375429,1.849310,2.003155,3.995102,1.526378,0.718470,0.186791,1.112429,4.281878,4.936930,0.868046,3.385511,0.851935,1.604709,3.284688,1.955530,3.212995,1.214800,4.230788,2.675962,2.243493,4.741678,1.758131,4.234474,0.337819,2.495620,4.416853,4.925291,3.910537,0.788924,3.206240,1.851819,1.325536,0.082318,3.760254,2.827709,0.126297,2.581930,3.472081,3.368457,2.966888,0.507397,1.074115,4.483555,0.189627,4.048447,1.603222,1.666853,2.680578,2.870919,2.020879,2.961791,4.965526,1.780422,2.704325,2.144338,3.546974,1.409992,3.958861,3.897856,4.403143,2.308818,0.456313,3.523998,4.984761,4.275264,0.938572,1.946945,4.663600,1.663832,1.977687,4.220087,0.752209,1.531547,0.472851,1.757388,0.048996,2.459668,4.887677,4.758366,2.345300,3.550115,2.071398,3.631079,0.546691,1.037065,0.799877,2.264339,4.197759,0.118821,3.986806,0.754646,4.303683,4.021608,4.988890,3.279701,0.946558,1.795305,1.892905,2.618347,2.509263,4.163552,2.114092,4.493707,3.703286,1.663419,2.524836,4.782749,3.833535,2.003918,2.046815,3.665994,1.369024,0.695806,2.234974,0.899882,1.418266,2.618295,3.904429,1.429329,1.771691,2.530669,4.449134,2.952929,3.517531,3.663743,0.991537,1.009250,0.305442,3.838270,4.313124,1.700874,1.566708,1.062636,1.007096,4.241573,2.786455,1.180413,3.985664,4.537077,1.562442,3.846706,4.560405,4.105889,0.401407,1.295453,4.571425,0.602383,4.565315,2.578370,4.457293,0.933269,4.479794,0.048302,0.569726,3.666035,4.726190,1.084827,3.793526,0.806646,1.793278,1.536835,4.364644,3.891786,1.999382,0.436832,4.918413,4.588396,1.850256,3.162212,0.628396,2.513568,1.652457,3.375886,1.738605,0.215395,1.545466,0.548171,4.883912,3.987589,4.784372,2.349910,2.326155,1.315228,0.876331,0.857896,2.079552,3.643687,3.382090,4.165692,4.107504,0.958452,4.848494,3.000823,4.014114,1.668957,1.511803,0.391360,2.275879,4.201819,3.407012,4.894112,4.783375,2.080670,2.137592,3.596461,0.776614,4.346489,4.749583,3.324066,0.556224,1.350189,1.858621,4.227843,1.832638,3.221822,4.508854,3.461924,0.760665,3.404139,1.791954,1.341360,4.423623,0.023612,3.472836,3.302999,3.296587,2.268271,4.534150,1.979620,0.030390,2.430285,3.567333,3.293997,2.516963,4.303560,4.256087,4.071517,2.236739,3.170664,4.039928,0.350271,0.469813,2.332668,0.142939,2.213234,1.104196,3.476345,2.805835,3.386952,1.921672,1.382290,1.358916,2.063581,1.864968,3.725987,0.962505,1.759997,0.106539,3.107211,4.751753,3.891139,4.770599,2.862781,0.011414,0.567560,1.412180,0.489633,2.073645,2.334643,1.049759,2.383170,1.659083,4.896779,4.917199,4.072814,2.875612,4.397956,4.183957,4.535027,0.215540,3.606656,0.958480,4.281463,3.222819,1.534206,0.786808,2.996998,0.139425,3.957736,1.607971,3.864034,0.421420,4.982035,3.566548,3.997050,4.374476,2.294761,1.570005,2.818233,0.642940,4.321883,0.254739,0.104594,3.037339,2.711399,4.962502,4.173317,2.685092,4.444087,0.256272,2.695045,2.011662,0.222055,0.706270,0.082716,2.617217,0.215572,2.204413,3.146655,4.775282,0.265671,2.284081,4.220863,4.948930,0.396272,0.434493,4.711071,4.921573,0.958697,0.362733,1.226737,2.237494,3.657283,3.493283,3.335137,4.712000,0.181944,3.023982,0.783014,4.043226,4.290752,3.140165,0.482687,0.744158,2.418939,4.615635,0.953178,4.483063,4.931357,0.090999,0.687505,1.259730,1.001384,3.513168,2.822050,0.874667,2.417551,2.363376,0.241866,3.646986,0.631303,0.774100,2.184586,3.190567,3.767057,4.985987,2.438979,4.927226,2.948185,3.375329,1.775476,1.629513,3.092269,4.237147,4.458636,2.988768,1.778620,1.501273,0.273060,4.773152,2.564822,2.505540,2.794332,0.874087,0.873176,0.298202,2.215482,1.389097,4.722492,0.526787,0.449683,0.277282,4.553463,0.875314,1.301592,1.368734,4.969548,0.229506,2.802059,0.107740,3.667484,2.272178,1.659416,0.796068,2.355436,0.214461,4.447539,3.667741,3.793579,2.943878,4.576509,4.851782,3.473933,3.910272,4.958101,0.252057,4.215193,1.752356,4.430109,3.475966,1.295495,1.530225,3.275574,3.184644,0.171008,3.028397,3.351315,0.747898,4.508415,1.213454,3.925748,0.072008,2.004087,0.989341,1.105089,1.915932,0.068854,2.335608,3.515521,3.310615,4.417912,0.497375,2.587293,2.271643,4.212617,3.890724,3.300086,4.051292,4.649272,1.921504,0.058484,4.192587,1.665180,4.427098,3.551982,2.616955,2.529109,4.948526,1.023750,1.886421,2.349747,2.282036,4.145875,4.000496,4.594720,1.069155,3.170341,2.614920,2.749241,2.180572,3.021732,3.145437,2.032385,2.641318,1.735346,1.086705,3.687550,3.783179,2.432873,4.028116,1.480930,2.773976,3.183438,0.067408,0.896135,4.193392,3.469889,4.471437,1.838321,4.305265,1.116215,2.772333,3.682525,4.692620,4.415291,4.945252,4.522631,3.025476,2.154873,0.173364,1.633407,1.282568,1.899554,1.627751,4.860307,0.616911,3.601868,2.107392,2.405751,0.540468,2.401616,1.840446,4.257308,0.323641,0.665408,1.733747,3.316326,2.260691,0.372306,1.647964,2.443508,1.924487,3.894821,0.913326,4.692917,2.279681,1.526392,1.978170,2.821068,0.176561,4.550272,0.136631,4.391481,1.355415,0.225658,2.981665,4.170409,4.673824,4.178086,0.309333,1.474589,4.036639,4.004061,1.208977,3.548110,4.554952,1.365668,0.671205,0.438452,3.303999,3.084204,2.722951,2.501481,3.987253,1.083624,0.608700,3.701438,3.198453,3.608044,2.323851,2.684857,0.429287,1.176650,3.410618,0.055013,4.554768,4.186707,3.586082,2.711839,1.496044,4.753521,1.313756,1.929825,3.151923,1.807246,2.650430,4.262583,2.605435,2.028841,2.878353,1.525922,4.930078,0.464951,2.668795,4.267858,1.458447,3.590412,4.950964,0.581185,1.954001,1.474278,2.252879,0.262753,2.356977,3.428819,2.363318,1.783533,2.878598,0.056869,1.949844,4.591178,0.230670,2.579968,2.544870,0.794693,0.489652,2.079515,2.744872,2.388221,0.301624,4.023834,4.676037,4.366247,2.572836,4.580029,3.629902,2.226000,4.997923,0.385320,2.649099,0.675078,0.535138,1.018762,2.842488,0.478423,0.546493,4.252774,2.096714,2.483836,1.237481,1.905994,4.843124,4.493671,3.834182,0.075942,2.737420,4.044688,4.942139,3.799461,3.765636,0.221631,4.686836,0.987200,1.875003,4.262240,3.488617,3.823209,2.937930,1.199136,4.697719,1.050390,0.224463,0.064570,0.793372,3.642476,0.269160,0.302942,0.948117,3.481652,4.454853,4.831397,3.628164,4.609775,2.750372,2.782386,3.959340,1.517030,2.146011,2.881977,0.310108,2.418424,1.530061,0.423492,1.247094,4.952472,3.645697,3.457332,2.037992,3.871855,4.187483,0.434881,1.760674,4.470946,2.118105,2.549244,0.840172,0.445042,4.757699,1.050590,0.675822,3.945975,0.437038,0.764551,4.280139,4.439756,3.268880,3.348384,0.807102,0.066581,3.223872,4.364444,0.513888,0.537567,0.706415,3.841438,4.029318,4.973067,3.291930,3.302449,4.558086,1.812546,3.893561,1.596303,2.005721,4.335958,0.814740,4.967663,2.457819,3.061998,3.280300,1.898790,4.251672,2.957437,4.625924,4.727662,3.504758,3.600529,2.186968,1.205765,3.372456,1.997069,3.367516,2.201969,1.392765,3.064975,0.457665,3.696188,4.314704,1.036187,1.244308,2.116854,1.821347,4.568623,1.755598,4.921803,3.315236,1.903726,0.314416,1.654601,0.385304,0.961621,0.566229,3.482756,1.780289,4.545250,1.563544,1.779555,1.297072,4.794887,0.728112,1.015861,2.945061,4.568961,1.804083,4.483599,4.695713,3.875606,2.696740,4.063351,4.573667,4.829570,0.736077,3.433383,1.256731,2.860015,0.448395,0.636233,0.627765,1.734752,2.253914,3.773373,4.526601,3.163134,1.576894,2.214584,1.733088,2.959389,3.140660,3.969291,1.031689,0.883209,2.606126,0.421373,1.453292,4.900167,4.031336,1.065246,0.575158,3.282602,1.033718,1.450868,2.870814,2.571050,0.112252,3.338194,4.793219,2.917709,1.281849,2.246320,1.610776,1.459883,3.689273,3.748221,0.866661,3.490698,3.931085,1.389756,4.923294,3.485849,2.925338,4.214565,3.633477,2.975681,3.352093,2.972065,4.314453,0.449511,0.432033,1.456772,2.429685,4.334678,3.127086,2.429072,0.674715,2.722749,0.717008,1.867148,2.081338,0.900092,4.631128,1.781484,2.004343,3.717312,2.796465,1.328675,2.335986,1.310174,2.021859,0.373647,4.592882,4.644246,1.032620,4.705171,2.554946,0.114051,0.984664,3.079912,2.542796,2.124289,1.417027,4.550835,1.620089,0.599292,3.145104,2.817262,4.098889,4.683865,4.731317,3.421189,0.510572,0.189532,1.848462,4.104781,3.686801,1.813782,4.477776,0.306674,1.090292,2.570210,0.846745,2.381602,4.173058,0.718554,4.154673,4.290201,3.349318,0.343430,0.421253,1.817195,2.100028,0.808344,3.050381,1.691718,3.405670,1.566948,2.552542,0.556572,4.535058,1.362710,4.024182,0.284851,4.251436,0.196290,4.363969,0.889560,2.540345,0.280878,0.752336,1.493927,0.969992,2.258911,4.039637,0.690183,3.099665,2.151897,0.305530,4.197110,3.620715,3.220857,0.896933,0.613964,4.531617,4.517259,1.073677,1.704364,1.289752,3.283152,1.380346,1.684789,2.323346,1.749556,3.679681,1.610179,3.307146,4.135755,4.394948,3.559566,0.675653,1.212008,3.394585,2.463045,3.085342,0.777590,0.849065,2.951317,0.724618,2.939693,1.513710,4.331433,2.255378,4.203739,4.912973,0.483753,0.594156,1.453655,0.210667,1.257580,4.305674,3.998177,0.971612,0.957261,1.667794,3.271656,3.504015,4.933396,2.198095,4.634010,0.546814,0.093831,4.104662,3.129981,0.324355,1.961056,4.030323,1.546341,4.826896,3.420208,3.620763,4.937237,3.818662,3.404857,3.208556,4.278353,3.286772,0.028893,3.414611,2.384016,3.000301,2.466180,0.112893,4.420934,4.574061,2.323312,4.412169,4.502900,4.037209,4.925341,0.796192,2.190226,2.034437,4.573850,0.885158,3.853582,0.828171,3.744868,3.636488,2.909591,1.267384,3.897240,4.354376,0.148579,3.996634,2.072552,2.546410,0.158669,0.467601,1.503521,2.812908,4.337891,4.325988,4.789956,0.035806,2.063611,4.946309,2.688590,1.542536,4.086026,2.443588,2.269976,3.468624,0.521845,1.925738,2.961825,3.480356,0.173431,0.426828,1.236086,2.401091,2.623937,1.967132,0.265467,2.610574,0.290391,1.660424,3.139815,1.562266,0.407345,2.678140,0.746890,4.583367,1.527774,2.097067,3.033469,2.944565,4.983381,0.053011,1.997132,0.701420,4.684870,4.832248,1.664588,3.089787,0.677210,4.413602,2.149970,2.601061,0.722411,4.286582,2.720027,3.686860,2.163426,2.678825,0.434616,2.784211,1.890555,4.511939,3.102528,1.370321,0.743938,3.438144,3.813761,1.489216,3.403394,4.942010,2.340002,1.148055,1.517203,0.270224,4.427093,1.692700,3.924778,4.018886,4.153532,1.264852,0.163468,4.542240,1.792809,4.022727,4.977432,0.438252,4.001601,2.208636,0.565223,3.720007,4.343517,0.177028,4.429354,2.030471,1.641454,0.108967,1.192692,2.732945,0.112549,2.704473,1.961977,0.866046,1.563334,3.395673,0.652203,0.216995,2.452491,2.052940,1.388959,3.272239,0.628216,0.281935,4.420724,0.545202,0.604243,0.231232,4.785626,2.707167,1.618285,1.294311,3.259639,2.682328,1.714888,0.573906,0.822449,2.455859,3.233963,4.643924,2.146197,0.256768,0.905584,1.825321,1.186372,1.479484,2.537217,4.018413,0.005563,3.216063,2.496939,0.566540,1.188167,3.510334,4.472319,4.509471,1.782392,2.991113,2.013950,2.157252,0.880344,2.737187,1.293595,3.601716,4.853042,1.405537,2.639074,3.586207,3.609609,3.266154,1.324056,2.779766,3.573295,2.497849,4.538857,3.748827,4.654452,2.829942,0.372280,4.431188,4.323530,1.035626,1.139973,2.766478,0.260158,0.592867,1.719686,2.637602,4.737787,2.994761,0.444703,2.979792,3.005176,4.493603,1.286021,2.647621,1.477572,0.890662,3.607548,3.678093,4.139311,1.161429,2.601127,2.252844,4.271349,3.058913,1.720223,4.724995,2.677324,4.164924,0.714686,1.717673,3.670244,2.818984,4.863571,0.356616,0.051121,4.777824,1.611906,0.442608,0.593517,4.281786,2.208261,1.490858,1.753008,4.265107,2.177394,2.271956,0.166683,1.418601,1.445198,3.249176,4.619541,3.661529,3.816874,2.105995,1.213351,1.340007,1.484611,3.811343,2.065861,2.800873,4.461556,1.429075,4.796129,4.820830,2.159414,0.477164,2.523117,2.166962,2.181026,0.475304,3.903029,3.765275,1.893335,0.228764,2.353700,0.044191,1.084346,3.643118,2.572774,4.598098,0.924558,2.522841,4.301070,4.690467,0.339313,4.161161,3.127667,1.561090,0.168973,2.920546,0.388890,3.284425,4.412628,4.979026,0.529660,1.550149,4.285438,4.345312,1.464761,3.934112,3.146804,1.948143,1.411011,1.099078,2.944683,1.159421,2.719726,0.180064,4.845885,0.010885,0.456778,4.737893,4.268916,2.687268,3.153043,4.594806,4.145545,3.065649,0.536595,4.635828,0.596997,0.814216,1.715775,0.042066,3.256731,0.781464,3.080899,2.723042,1.265701,0.639111,4.063195,1.908089,1.188576,3.280506,2.804582,1.989670,4.351174,3.577733,1.485276,0.830749,2.903660,2.123674,4.576598,3.780925,4.954737,2.870531,0.741399,3.361129,1.918899,2.895848,2.899272,0.748184,3.869740,4.262676,4.829481,1.395640,3.066986,2.131524,4.598155,4.127551,2.765690,3.014644,1.032342,2.175602,2.351983,0.822077,0.668362,2.346547,4.815454,1.762319,4.931036,3.114640,2.702057,4.216588,2.795321,0.132206,3.004444,0.731789,0.656254,3.233861,0.803900,0.813730,2.817819,1.188661,0.312633,4.548165,2.742229,1.525647,0.119746,4.152250,4.395614,3.138795,1.840570,2.710597,0.689303,2.613435,0.571841,0.016835,2.867324,2.297626,1.100338,4.512144,2.388702,3.420170,0.152871,1.495877,0.401822,1.497088,2.885900,2.533403,4.654704,4.555461,0.942004,2.091055,4.478988,4.583170,2.664122,4.796949,2.303230,4.796238,4.442551,1.401582,0.330057,0.944782,1.994987,1.929405,3.367352,2.006860,1.578275,0.731218,4.522297,1.824098,0.890320,2.709570,1.134067,4.790018,0.523997,2.507022,2.861603,1.332474,3.600725,4.654438,1.294634,2.919736,2.971930,3.056409,3.484186,0.041004,0.889035,2.391796,1.385514,3.657555,0.656426,2.493232,3.100910,0.988518,4.039454,4.693131,3.810297,2.331268,3.184984,4.091135,1.063061,3.746770,1.839870,1.544054,2.962556,4.171249,1.285743,1.601048,4.305326,0.353631,1.762047,4.898660,1.608964,1.217237,4.766235,1.214796,1.529527,3.334795,0.638459,2.412232,0.711827,3.077029,3.775886,2.480970,4.264236,1.597455,2.901246,2.243576,1.527300,1.691961,1.448808,0.934529,4.757471,1.705664,4.857554,3.083009,1.043286,0.350131,3.502055,3.623795,1.979450,2.990686,4.297179,4.438600,1.124308,1.182653,2.990485,3.589744,0.982465,0.004782,1.098823,4.748540,2.209479,4.651097,4.766868,3.161673,0.309010,0.680715,1.848313,3.819827,2.266605,0.237816,2.625909,0.063777,4.573935,3.374199,4.690329,2.783421,1.922834,3.981056,2.151981,4.674759,3.709803,0.445449,3.870937,4.020575,0.167066,0.213782,0.635597,3.809443,4.920451,4.103171,3.629830,2.187873,3.306270,1.462360,2.519304,1.856852,1.832888,0.509770,2.475719,1.047142,2.803541,1.554015,0.907592,4.012436,3.395940,4.421850,3.046770,0.860459,2.197308,4.108843,4.886654,3.562587,0.717724,3.486496,4.936992,3.398154,3.264259,4.605408,3.986622,3.871002,4.089254,0.445501,3.464111,4.269075,4.089057,0.726679,1.592317,2.550464,1.370374,1.199669,4.017661,3.967544,4.508350,2.806520,2.473170,4.297098,4.257479,1.755628,2.822988,4.680554,0.303878,0.144631,0.318378,1.404694,4.213177,2.284417,1.407803,3.713551,3.369237,0.092255,0.492733,1.384493,4.164530,4.752707,2.577131,0.971244,2.813350,0.161363,2.917993,1.736279,2.648015,3.703687,0.982063,4.653676,1.392982,3.030208,2.867305,1.420180,0.353099,3.229939,4.571583,1.782992,2.893573,1.121799,2.825751,1.311903,4.811101,0.475993,1.728600,1.291987,1.937354,2.635922,2.106249,3.276337,3.945497,0.881005,0.090480,4.694395,1.813923,2.961465,0.790264,3.855832,2.151316,3.347748,2.898944,3.978993,0.653905,3.064845,4.618889,0.818520,2.884274,4.800002,0.537357,0.216517,0.951129,0.109303,2.850022,3.413360,0.027625,2.243738,1.860781,3.845657,3.915424,3.679866,0.008426,0.940718,0.049167,4.951263,4.676044,2.595877,1.123399,2.979799,1.194942,2.127030,4.250312,2.536597,4.273642,4.341669,2.751782,4.219112,2.203090,4.398657,0.751712,1.961668,4.615849,0.969277,3.776592,1.988397,3.941195,1.550383,2.441611,0.472687,2.677774,1.158588,0.947674,1.168829,3.773795,2.454457,0.670922,2.397883,4.674115,4.520113,0.698443,2.458695,2.482549,3.760711,2.685708,0.515425,4.849429,4.573506,2.766583,1.570573,1.746378,3.472922,0.321700,0.429093,4.365193,2.281165,1.195914,2.729516,0.213054,3.017080,3.109259,4.713726,1.841631,3.590379,0.049094,0.670381,3.792296,4.129169,4.160341,3.957388,3.843715,0.186185,0.724898,2.013614,3.463917,4.230822,3.564808,0.665378,4.953359,1.000594,3.344393,0.286792,2.160803,3.652536,0.451632,4.659216,1.544814,1.086769,0.459171,3.046817,0.590687,4.272230,3.607550,0.408930,4.984109,4.648013,4.976358,0.570949,1.089487,2.499544,2.893996,0.927603,4.754201,4.870157,0.954373,2.406850,1.384322,2.649732,2.305479,2.381114,4.359991,4.905889,0.379996,0.142284,3.299983,0.856885,0.007547,3.588574,4.021854,2.950468,2.452974,0.221634,2.511635,3.128117,4.481088,2.189180,1.154274,0.135383,3.413286,4.163518,1.530976,3.085045,3.298406,0.116624,1.249588,3.491332,4.999070,1.497471,4.622785,2.409121,0.567290,2.457975,1.570539,3.386995,0.098633,3.624493,3.967289,2.040754,3.721519,4.211715,2.096417,3.309274,2.918709,3.889389,0.158315,3.446372,1.323235,2.978581,4.122263,2.676988,3.310686,4.053971,0.184008,2.665354,2.136402,3.853265,4.852931,2.122015,1.333158,3.141498,2.651241,2.290183,0.309222,1.977174,2.874571,1.034455,3.360914,2.495066,1.505414,4.880954,2.107093,2.980427,4.426268,3.047431,3.175392,2.231383,0.380489,1.490203,2.369332,2.165827,3.686258,1.879861,4.184453,1.694333,4.160362,2.990809,4.210625,4.546794,4.762971,3.903647,3.874864,0.511151,3.562178,3.124270,2.260784,2.783005,3.840261,1.815812,3.895040,0.601984,4.499366,1.204866,2.661396,2.081627,0.389905,4.142723,0.649459,2.553858,0.936393,4.847810,3.225490,1.286188,4.096230,0.165674,1.507354,2.893641,1.195399,3.981094,4.348293,2.712581,3.961316,4.421320,0.255070,2.658496,4.641566,0.239371,4.040975,0.261101,2.967913,4.942672,2.110777,4.018757,2.880521,3.085582,3.018441,3.305532,0.181670,2.606351,4.368296,0.980998,0.435799,2.151138,2.709495,2.032314,3.578945,0.121689,1.944067,0.778507,0.350905,0.182479,1.116179,2.063578,4.540808,0.583792,4.336598,2.724867,3.302475,4.443649,2.072616,1.900512,4.666790,3.292828,3.673608,1.635598,3.517174,0.609002,1.109195,3.738838,3.540249,1.899345,4.275496,1.359474,4.927075,0.485035,4.452289,1.650020,0.517818,4.847427,1.360250,4.700452,4.039907,3.005051,2.910585,1.071888,4.287607,4.321029,0.985269,2.554316,2.101351,0.630030,1.569336,0.442377,2.464615,2.176091,4.760875,1.863729,2.806138,4.389806,4.312996,1.189499,2.774499,3.875092,1.848152,3.853168,1.996121,2.759895,3.264675,1.442703,2.849335,0.254907,1.211005,4.596394,2.181019,4.773412,0.796500,2.451347,2.762961,1.396417,4.482624,4.357131,2.285615,0.753774,2.755953,3.056224,1.728519,2.109655,2.871149,3.580374,0.330290,0.123353,1.448401,2.665400,0.065798,4.434614,2.882692,4.988462,4.455135,2.860425,2.464234,0.896709,4.148087,0.313765,3.906080,4.145746,4.155539,2.391328,0.387474,0.302398,4.891237,3.380623,4.293251,4.245020,1.355233,4.768840,1.676370,0.798549,2.205673,4.928700,1.989434,2.640507,2.628116,1.106871,3.118346,2.240291,2.292000,4.714893,4.226592,4.406594,4.244211,2.516716,3.111219,0.129373,0.551596,4.138463,0.032251,0.323303,0.270420,0.883658,4.118846,3.368232,1.708987,2.757770,4.986146,0.657631,0.141199,4.291301,2.083040,0.167286,3.372630,3.249931,3.296278,3.373233,0.606604,3.219366,2.246513,1.778352,2.696896,4.258740,1.211013,0.214419,1.612467,3.766250,1.980345,3.160604,2.007256,4.368763,2.678054,1.772910,4.678905,4.070136,4.256686,2.155683,1.517282,2.383294,4.556323,0.300314,2.983969,1.687551,1.409135,3.087350,2.020626,1.540364,4.627270,3.610286,2.213695,0.233957,2.475831,4.411875,3.180501,3.501674,0.130262,0.888948,4.694882,4.357351,3.595992,1.624062,0.246804,3.734557,0.296413,4.771741,2.958978,2.926010,3.971926,1.974445,2.029677,0.115522,4.951829,1.865616,4.155632,1.082709,4.896495,2.734606,2.862070,1.175789,1.667063,0.094322,0.537790,0.038122,0.620325,4.894162,3.154286,4.298942,0.140616,0.827578,1.862008,0.053311,2.873752,0.455610,3.672147,2.469039,2.805828,3.970718,2.386321,3.793404,0.221372,3.702667,0.029364,2.627634,2.553141,0.128300,0.829160,2.825696,2.976405,1.587018,2.307826,0.318128,3.595088,4.265669,0.952341,1.378939,0.284027,0.669601,2.029698,4.008309,2.393647,0.921895,4.265363,3.020900,0.365626,3.528909,4.489462,1.327371,1.516823,1.430092,3.773045,4.588449,0.198019,0.541296,0.768792,1.838942,1.417292,2.682249,0.510426,4.205016,3.229842,4.887846,4.076198,0.529024,2.073540,1.747067,1.340099,0.292791,0.097621,1.985877,1.009071,3.351906,2.928339,3.265481,0.743102,2.781590,0.706903,1.655107,0.414868,3.010977,3.737528,4.974222,0.471564,3.938422,2.925973,0.244965,1.135660,1.962548,0.537143,4.114663,3.028512,3.208716,4.186613,1.796062,0.015034,3.093668,4.625802,3.885647,3.030866,1.410854,1.424824,3.815970,2.880949,0.552252,3.107410,2.292107,3.847810,1.552842,2.556983,4.655638,2.886932,4.489692,2.575569,3.610750,4.973763,1.366858,1.371405,3.741229,2.823936,2.801280,0.256805,3.237250,1.355590,2.998124,0.593076,0.511522,2.825715,1.640652,2.916753,1.509322,3.456734,2.712519,2.989998,1.230233,3.839040,0.899429,3.921242,3.637513,0.255447,4.155535,1.129652,3.406313,0.935533,2.505945,0.699985,0.862414,4.876603,4.345662,3.667170,3.978276,3.661462,0.317252,3.438407,4.000511,2.379149,4.154811,3.216596,3.709715,2.612500,4.629145,3.244453,3.735783,1.236349,3.573850,3.548637,0.861384,0.518312,1.049000,3.444168,1.063707,1.557222,3.762047,4.037834,4.173566,4.006491,0.650045,4.130522,0.721821,1.181285,3.962416,1.648509,3.991331,3.148740,2.596366,2.781553,3.448884,4.912809,4.821858,0.786266,3.703949,4.461984,4.682253,4.844556,3.852366,2.175867,3.487025,3.624005,1.795973,3.286356,3.557753,1.024634,2.721628,4.239845,3.326544,3.852387,4.581225,0.046209,1.148854,1.136844,3.804996,4.099088,2.769232,0.780931,1.506584,2.078727,4.400905,3.017792,3.051071,0.829975,4.880878,1.540092,3.945187,1.335119,3.944496,3.142126,1.278062,4.409721,2.857796,3.502938,2.259802,4.974279,3.467012,1.526304,0.868601,0.063719,0.417518,0.427054,1.068998,4.434264,3.020342,0.655922,1.832351,0.594642,2.555026,0.982288,4.882838,2.505137,1.480799,3.693011,0.580517,4.027926,1.214894,0.707265,0.901185,2.914466,4.397817,2.288241,2.358680,1.394032,1.549197,4.967611,1.389106,4.687054,1.612175,3.621062,1.289756,1.387231,4.632940,3.988036,4.378906,3.125615,2.063284,4.155386,0.312560,0.163352,3.463560,0.453190,0.158475,4.178886,1.277207,3.077522,4.985974,1.312038,4.491799,2.095709,3.806793,4.522492,0.744773,4.527775,2.093186,4.214281,1.793607,4.333300,3.467057,4.384189,0.829289,4.840056,1.056798,1.142642,1.126905,2.261388,4.463298,1.744949,0.886358,0.216666,4.447513,4.180838,0.871988,3.483844,0.937151,0.698379,4.434607,3.288627,4.704469,0.689283,4.610496,4.378474,1.531314,3.386114,3.612707,3.894954,4.768890,1.778181,4.036432,2.904282,4.235263,2.338120,1.500495,4.818416,0.804872,0.192452,4.421555,0.504991,3.891975,0.932124,2.683576,1.718493,0.454261,4.324986,1.498791,2.505862,1.992464,1.649360,1.146457,0.590570,0.453284,4.590274,1.282937,0.531395,0.055716,1.100642,3.712282,1.972876,4.734841,2.500334,3.909214,4.458649,0.073697,1.007941,3.586594,4.490945,0.213045,1.344011,3.777963,2.253506,0.417590,1.968464,2.665193,2.786533,1.875224,2.003347,3.791495,0.403180,4.794802,4.743929,0.853580,2.785050,2.519502,0.810441,1.240279,2.057395,2.889713,3.374123,3.527666,0.271217,1.259704,1.538979,3.028413,1.281591,0.203570,4.052480,4.297844,0.837179,0.962504,0.207988,3.766751,1.908256,3.036204,2.586024,3.475799,4.188128,4.481510,0.454664,4.224455,3.813952,4.379919,4.614833,4.896956,0.433643,1.822290,3.538976,1.342321,4.574891,1.430508,1.212574,4.672036,1.434597,1.431380,1.695034,4.862993,0.676379,2.426570,1.580388,0.682835,2.028903,3.211075,2.301841,1.523305,4.435327,1.545713,0.091683,2.807150,0.451315,4.094927,2.259413,0.375465,2.369540,2.164962,2.101886,3.332966,4.525970,3.391037,1.133951,0.854254,1.001454,2.573569,2.104173,0.708933,2.325468,0.014134,3.119407,2.222186,4.925327,0.800577,2.205940,0.093195,0.857110,4.830223,4.914869,0.082777,4.039562,2.173264,4.023917,2.401603,4.644768,0.810515,1.224595,1.380661,4.558203,1.643673,4.766924,3.155111,4.328790,4.238599,0.716041,1.191923,4.742162,0.558534,3.688125,4.478628,2.637678,1.830446,1.962413,1.242773,4.817335,2.151161,0.158001,0.685916,0.682844,1.150578,0.855057,1.863835,1.202669,3.802060,4.479256,1.031551,3.297257,2.944337,3.066595,0.177467,1.092063,1.466245,0.437544,4.798793,3.783737,0.777436,0.577451,4.011432,2.625444,0.400684,1.368821,0.629487,2.630058,2.646808,4.951395,0.362925,4.752411,2.991555,0.741961,2.402057,0.679444,4.290751,3.459386,4.574545,4.714600,0.684784,3.837006,1.388381,4.947883,1.060099,1.818201,1.469079,3.491291,1.566533,1.127053,0.700130,0.658912,4.810377,4.524042,3.352639,4.386908,4.930654,1.800109,3.892683,2.979288,0.572878,1.588501,0.110998,4.843047,1.814514,3.410850,4.813181,4.922336,2.279569,0.211269,4.807362,0.223687,3.938733,0.053388,4.040556,1.666448,2.500160,0.179551,0.379204,1.234779,2.559666,4.333402,0.190916,4.488271,0.856994,1.579609,3.451055,4.639954,1.175700,2.007216,1.396538,3.316213,3.991946,2.847725,1.209771,0.862263,0.587601,4.077425,0.346428,4.579451,1.667089,3.085666,3.662077,3.273003,1.353692,3.951683,1.395860,1.204416,1.758522,3.157599,3.087493,4.656297,1.006131,3.930506,0.534484,2.945541,4.808435,4.991826,0.657998,0.249718,2.362479,1.880969,2.945049,4.985143,0.877403,0.813527,2.988890,3.305635,1.769253,3.148577,4.301382,3.500060,0.051897,1.882844,0.019366,0.667452,2.931320,2.731254,0.441064,0.182216,2.451135,0.954199,4.451890,0.590753,0.685042,0.362681,1.878440,4.747658,2.464243,1.511051,1.553757,3.918745,0.007726,1.737543,2.117925,3.681196,4.040709,3.039163,2.649238,4.675096,2.091680,4.918711,3.629352,0.339582,1.831518,4.088788,2.197315,4.923493,1.151459,4.760938,3.222676,4.501395,1.210488,3.548559,3.202987,1.821786,1.728971,0.234794,1.099227,4.532279,1.776651,3.185150,2.008643,3.057243,4.556925,3.014839,3.986164,0.282561,1.542020,4.918082,3.004142,1.472774,3.893003,3.610310,4.709343,4.781248,3.781166,0.177226,0.115478,4.226975,4.041539,4.988562,2.735580,0.620951,0.201191,2.714025,0.450778,4.632545,0.985968,3.688061,3.714188,0.875026,3.383212,1.193808,2.160292,3.228859,4.291295,0.335853,0.092541,1.707865,3.627894,1.166786,2.475390,0.332712,3.985962,3.347117,4.487657,4.508167,3.670795,2.508263,4.985727,4.760493,2.146299,0.460885,2.540991,2.961556,4.985913,4.045603,0.802475,4.717919,1.566223,4.630199,2.928376,3.025486,4.330392,3.979544,3.813235,3.740291,2.782612,0.008202,3.104943,3.938716,0.553814,4.307292,0.025186,1.629912,2.545498,3.812637,1.442956,0.769338,0.155443,2.804785,0.371508,2.607176,4.602078,1.350753,2.882033,0.029462,4.111400,4.469398,3.945015,4.585543,2.186321,1.619947,0.088649,0.912570,2.980918,4.043909,3.627090,1.347037,1.186599,0.959048,2.446084,4.624399,1.151892,1.323480,0.088810,1.638471,4.820292,1.662689,0.262781,2.158301,4.266670,0.322485,2.547580,4.547510,1.252562,1.634764,2.673773,1.834798,0.730864,1.827975,1.394619,2.909607,1.259805,2.833724,0.084555,3.374846,1.033103,1.879538,2.191100,4.055296,4.444007,4.216647,1.476238,4.067215,3.248329,4.286919,0.876573,4.936615,0.668164,3.232499,0.072827,4.558672,1.187510,4.136932,4.029043,1.960796,2.923693,1.797066,4.042878,1.596714,3.296631,2.945155,3.582522,0.269154,4.004717,1.092593,3.176582,1.365010,0.081432,3.694671,0.344612,2.903922,2.557194,0.318556,4.029830,3.907482,2.019546,2.302995,0.367955,2.153817,2.254375,3.550876,4.669645,4.192630,1.714099,3.858833,4.244383,0.362472,1.410037,3.327708,4.641553,3.795397,1.127942,1.713161,1.843636,2.391220,2.125576,1.758844,2.885900,4.948042,3.303723,1.911700,3.544479,2.921016,4.551769,4.278531,1.042587,2.317330,2.019257,2.303304,0.222764,2.055343,0.495129,3.922315,4.607001,3.644073,3.262802,4.023941,2.468796,1.788621,0.518395,3.958170,4.086276,2.031460,1.493556,1.614859,0.624359,1.552165,4.983648,0.571867,4.375538,0.008577,3.660867,2.120586,0.947203,1.041482,3.836375,1.428185,3.747781,4.010459,0.890674,3.227030,4.945293,0.300048,2.550397,4.440673,3.209971,1.384369,1.250945,1.454112,0.211115,0.441069,4.758035,2.621369,0.401183,2.658493,1.531043,3.973256,0.072993,1.907543,3.276065,2.059485,3.454861,2.850267,2.774476,0.810344,1.751821,3.829686,0.374315,4.043146,1.206707,1.967117,2.335783,1.035880,4.569201,3.442176,0.006561,4.014441,0.961840,2.054252,4.140240,4.583141,4.623800,2.970372,1.607905,4.211973,2.636249,4.664703,2.778884,1.086407,3.080875,2.653605,3.724718,2.161915,4.806337,1.650712,0.137405,3.900973,2.292066,3.705120,1.054757,1.691265,0.562209,2.269262,0.182596,3.245675,2.907427,2.875670,2.299458,3.662646,1.865328,3.520307,0.541583,0.481292,1.899760,1.762745,4.973590,4.360485,1.020610,4.697398,3.366329,2.995194,3.643331,0.056984,3.452759,4.129891,0.108599,2.658173,4.314233,4.654649,0.894462,1.004221,1.207847,3.997928,3.621629,2.414293,3.144594,0.199526,4.274928,3.819880,0.276864,1.482280,1.641203,4.330766,3.465612,4.284707,0.767764,3.016896,1.538568,1.438785,4.744108,2.495102,0.086790,0.060014,2.261551,4.240640,0.459354,3.678957,1.379544,2.005765,4.260593,1.596234,3.942564,4.109374,3.340125,4.520580,3.382294,4.051416,0.772657,3.649464,3.127158,0.031888,4.966004,1.750023,0.313813,0.840423,1.259301,1.766174,3.535990,3.897812,4.970729,0.870863,1.434592,4.417798,3.861548,4.629424,4.396040,1.928890,4.766820,4.117974,4.538224,2.845227,3.575367,4.459139,2.715701,0.679180,3.914695,2.627697,0.086040,4.870223,0.644050,4.756020,4.459567,2.628409,0.097294,0.482348,1.623954,2.386294,4.466720,1.900672,3.985423,0.137433,2.598782,0.538922,4.506036,2.869283,1.066415,2.731106,3.361558,1.449067,2.181479,0.338669,3.759846,2.850477,4.950097,4.649906,3.469423,3.324972,2.345201,1.222480,2.397557,0.675042,4.330472,3.850665,3.706093,2.856565,1.393708,4.540825,4.863165,0.681330,1.424304,3.436934,3.527230,2.381602,1.714652,3.732343,2.331597,3.128799,3.321645,2.787792,1.987793,2.444324,1.588017,2.919856,1.096365,4.802934,1.938960,0.520009,3.533378,0.145551,0.418934,2.505492,2.514794,1.353403,4.858396,0.450563,3.258116,3.054143,4.821734,3.551890,1.601587,0.037491,1.942623,4.691717,3.348926,1.527369,0.139948,0.081552,3.800391,3.646166,0.984669,1.055300,0.743462,4.675960,3.743940,3.720634,4.508942,4.905411,3.275758,2.831694,2.671566,0.822072,4.655624,1.180688,3.230610,3.898253,2.853060,3.362090,0.779451,0.522592,0.360994,4.477508,1.764867,0.346874,2.615389,2.985522,4.190369,0.950760,0.163716,4.739847,3.347155,0.033252,4.359137,0.159405,3.985140,3.100736,1.733361,0.845327,0.322475,2.968669,0.245455,4.724848,1.498016,3.884677,1.450238,1.021751,4.587224,4.210118,2.917023,3.222067,3.544743,4.471109,2.382462,2.439443,2.032694,1.260099,2.270202,1.202775,4.498289,0.288786,0.076011,2.370544,2.954998,4.837655,2.228313,2.323105,3.968470,3.565599,3.908474,1.202243,2.715872,2.694812,2.846185,3.986963,1.970041,1.152376,2.440858,0.889359,0.036045,0.008157,2.036884,2.141768,1.081299,2.979595,2.237438,2.158365,4.949329,4.886707,3.715789,1.056705,4.237779,3.058395,3.939725,2.915480,2.161195,2.082445,4.815510,4.586298,4.993459,3.451865,3.489451,4.693241,1.220887,2.111597,0.697615,0.002885,0.871214,2.800939,4.656278,0.238629,4.322921,0.562760,1.151497,1.503561,3.406806,2.260009,2.081608,4.024724,4.326898,4.482872,4.041765,4.861032,0.641037,4.990506,4.428647,3.418686,3.676679,1.327914,2.787229,0.977451,3.739847,4.252668,0.669030,0.681408,2.682441,3.302379,4.135429,3.074043,3.822971,1.320453,1.817078,4.097874,3.337533,0.960583,4.646459,4.969186,2.782841,3.906631,4.760919,3.687955,3.077858,1.179283,4.149518,1.256985,2.614244,2.667513,2.882851,3.950855,1.523150,4.470537,3.965809,1.349871,4.075658,1.147878,3.866572,1.132901,0.928501,2.086939,4.914688,1.368028,1.805219,0.169744,2.795497,3.683512,0.056197,1.213231,1.217406,0.869776,0.321569,2.892271,0.789001,3.247903,2.245192,4.909456,4.532366,2.717467,0.191078,4.405664,2.809338,1.021735,0.777256,2.705788,2.803902,0.756332,2.250579,1.391903,0.112233,3.512988,4.412183,3.672900,2.611896,1.932162,3.299057,0.678230,2.450332,4.700140,1.327778,0.027258,0.975168,2.240246,2.567221,3.605062,1.892356,2.237608,3.048491,3.054903,4.363628,4.517121,3.819766,1.320082,0.556796,1.459877,2.770222,4.305731,1.045076,0.040649,3.249034,2.634651,2.398750,1.063784,0.888364,2.527678,0.083723,1.994303,1.499061,2.672506,4.297542,0.392587,3.986392,2.192742,4.634277,2.707028,3.385147,3.472214,2.894456,3.750399,3.768185,3.195075,1.618422,0.156391,3.598390,2.872586,0.176256,4.897926,1.245433,4.744298,4.318486,1.943981,3.396821,2.607382,1.989446,0.690281,0.582547,3.676732,0.448589,2.971191,2.499360,1.121868,3.380609,3.899901,2.806639,1.574726,1.780088,3.432511,1.643106,3.340473,1.681385,3.934040,0.153177,1.121379,0.573546,4.196366,1.825306,2.901409,3.361183,0.001153,2.669521,3.393577,3.584364,3.968036,0.982074,1.779119,1.333101,3.890682,3.655340,0.569515,3.699494,4.639011,4.425839,0.168971,4.622607,4.493687,4.823857,2.790745,0.933338,0.604353,2.453542,2.722879,0.562909,0.066284,0.852384,2.145278,2.009347,0.697867,1.417747,3.130340,1.580921,0.306505,2.357846,1.923086,3.888716,0.018807,1.991041,4.806995,1.334356,3.668452,4.986285,4.880252,3.119466,3.713949,4.902272,4.793767,2.658851,1.194307,3.236160,4.380958,4.257434,3.715811,0.217333,2.192283,0.841868,2.090060,1.823487,4.125852,2.671892,4.524560,0.858315,4.422840,1.889212,4.431407,2.408704,4.199949,1.943645,0.987434,3.782805,3.968899,1.215503,2.281757,1.708723,2.899208,3.942419,1.583792,1.890634,3.948002,0.075326,3.199597,3.547399,0.768646,2.103541,3.919241,1.631901,0.238693,0.586840,1.364587,4.246649,0.114580,0.965616,2.008814,1.449695,2.342999,4.998612,2.635240,1.151757,4.620541,1.570665,3.650772,3.351256,2.967647,3.416908,0.035870,2.624456,1.022609,1.517173,0.650680,1.008674,1.596875,0.912451,3.026044,0.576022,2.667182,2.440521,3.179769,1.620896,4.046493,0.187666,4.562763,4.465105,2.105556,2.191190,1.058819,3.438483,4.202924,0.961596,4.855829,0.135124,1.523917,3.410617,4.738760,1.661177,4.629377,4.196303,4.581678,1.029183,3.761756,0.347088,2.034203,2.993220,0.451415,4.712015,0.123532,0.263669,0.691603,3.719392,1.995953,2.768168,2.953388,3.499014,4.114868,1.107573,2.980606,2.383953,1.567090,3.094736,2.430970,2.940439,2.311263,2.536755,0.601237,4.229387,0.304679,2.987611,1.986180,0.992203,2.211267,2.151248,2.820204,1.123178,3.539729,4.206974,3.488296,4.284907,2.494312,0.014615,2.964075,4.932364,1.598827,4.979563,0.790942,0.256058,1.660914,1.877817,2.092773,2.671335,1.809678,4.150395,1.241905,2.956512,3.333151,1.866941,1.030753,4.001602,1.765818,1.289499,3.811523,2.143086,3.837048,3.697027,0.088029,3.633307,1.032510,3.243137,1.598968,2.641651,2.727761,4.218789,2.198149,0.047248,3.711682,2.940230,3.906322,1.896600,4.271549,4.848025,0.724216,4.709161,2.274914,3.805225,0.064958,3.785198,1.556237,3.562195,0.784685,4.024198,1.103350,2.361489,0.178726,3.403625,0.477942,3.498084,2.069287,2.291653,0.969238,3.364357,0.381294,4.785543,2.912010,0.814536,3.168158,2.426338,3.704869,3.066044,0.277376,4.419529,4.799586,3.568662,0.019130,1.933589,3.558917,4.693977,3.474340,1.797991,1.434728,0.244495,3.235032,1.868186,3.215194,4.757117,1.721735,1.732102,0.722309,0.313201,1.687696,4.251357,4.590765,1.924329,4.083048,4.895370,4.061203,4.940092,0.135029,0.436916,3.385626,2.271072,2.340200,2.505534,4.930403,2.504798,4.752867,0.297362,4.448203,1.821262,3.860687,1.729023,2.989342,0.487108,0.593456,0.723335,3.315697,3.072558,0.594661,2.943609,1.866329,3.023598,3.681496,4.195052,1.523114,2.416753,2.023974,4.933686,2.831135,0.447090,3.855799,3.463464,1.293895,1.065220,3.749611,4.563092,3.342821,4.036458,3.353686,4.713891,0.873067,1.364212,1.121489,4.946474,4.404353,3.687162,2.059959,1.525354,3.232141,4.827466,3.854197,1.931630,3.070916,0.185939,3.820410,0.704303,1.425205,3.094180,2.090430,3.590166,1.181064,0.491297,2.279910,1.117906,0.910772,4.480278,3.277906,3.909360,4.737103,0.010357,1.044621,4.603691,2.000780,4.705069,3.421909,3.344687,1.949471,2.042101,3.354574,3.852004,0.697176,4.413954,3.614853,4.335003,2.004614,0.685668,1.800166,0.640315,2.519481,0.272656,3.863282,1.805606,1.058290,3.706175,0.128149,0.316382,2.765872,0.309072,2.662290,4.832447,1.934221,3.514884,1.594307,4.236573,4.933029,3.983955,3.047154,4.933149,4.450260,4.078063,3.647365,0.325391,4.634013,0.243946,4.596628,2.418021,4.818827,0.308325,2.250835,4.375704,1.786664,4.712097,0.141442,1.856826,0.157787,3.519078,2.002218,0.416941,2.289805,2.948433,4.024041,1.757295,4.109223,3.984240,4.328268,3.294788,1.339972,4.919040,4.744747,0.461433,2.602811,0.332108,3.489505,3.327098,0.085105,4.185196,0.996750,0.290084,1.198866,4.150198,1.555954,4.552513,1.707770,3.063756,3.677028,4.853847,4.183953,4.183163,0.948943,0.359257,2.069637,2.598888,1.504852,2.760743,2.868212,1.936745,2.999880,2.029403,1.421030,1.314868,1.210780,0.244230,1.010185,3.611966,4.877962,4.351527,1.627936,4.519993,3.572558,2.622302,1.935879,0.285007,3.962605,4.737928,2.827363,3.354745,0.560469,2.073023,2.367826,0.794866,3.400722,4.542477,2.533095,4.322078,3.135993,2.240735,2.475106,3.643197,0.189794,1.679671,3.375179,3.444712,1.093868,0.985292,4.139087,2.973655,2.005557,0.555254,2.441607,3.639946,1.511039,4.222417,0.784535,0.802808,0.369948,4.079189,1.419783,3.624340,2.361110,3.809964,2.673050,0.321551,1.943154,2.178118,1.485320,2.570776,0.578686,1.620272,4.670717,4.963223,2.316478,2.127208,2.356518,2.552526,2.251310,3.577061,3.582530,0.618776,0.850984,2.677184,3.343909,1.796964,4.462635,0.475149,3.281248,0.830182,4.138894,2.684039,2.643571,3.034743,3.526518,4.767754,3.740873,1.491333,2.232279,1.800633,3.129433,1.960865,0.205783,4.616503,2.031175,4.721411,3.613622,4.591600,4.116338,3.234484,0.339695,4.194079,3.464112,4.789958,0.711112,0.438868,2.594400,1.799662,4.801368,3.518861,2.229970,0.961044,2.214407,2.331432,0.045713,1.286077,1.226858,1.905107,2.120192,1.337653,0.563231,0.693398,3.441011,4.779449,1.724272,0.713932,1.300289,0.760875,0.973698,3.310803,1.924637,1.252271,2.905790,4.489120,0.122145,2.983594,3.359980,2.165845,4.601759,0.850936,0.057929,4.201467,1.978888,4.149495,4.976852,0.575434,4.162729,3.802563,3.882774,2.197511,3.045537,1.238210,0.158251,3.638865,0.694165,1.498198,0.267614,2.828765,4.286176,0.364315,1.960662,4.162798,3.873266,1.068461,1.255047,3.157490,1.195664,1.715681,3.904927,3.083195,0.533611,1.925488,0.989813,2.727353,4.744415,2.495334,4.174090,3.397061,2.304419,4.571020,4.863988,4.734524,4.392594,3.702401,4.585481,0.969927,4.360523,2.503357,0.726636,2.466248,0.194096,4.531735,1.293117,1.334897,2.218595,0.945749,4.632089,3.447996,3.394224,4.584211,0.660863,1.301325,3.332779,3.440964,4.168484,3.638166,0.207795,3.117908,3.926425,4.342897,4.359006,0.970139,1.224794,3.015949,2.333191,1.798607,4.826337,1.073600,4.255425,3.026969,3.476988,3.869362,2.355735,4.872533,2.402088,1.413219,4.531089,2.415056,4.642441,2.654962,1.132645,1.719523,4.910417,1.050308,1.812258,1.442165,3.579995,1.158565,4.158735,4.793009,2.082457,2.467091,3.933812,2.207510,0.347692,2.718487,2.610979,2.096143,1.447460,1.221641,2.675339,0.782612,0.648382,2.452403,1.833572,3.909344,1.959561,4.540676,0.772637,4.564839,0.876507,1.154356,1.074848,3.918271,2.099599,4.261522,3.280276,0.538949,0.128585,2.948887,4.470532,1.117601,2.230520,0.223914,2.416081,3.998299,2.396673,2.169784,1.221012,2.673165,4.201503,2.742590,1.466299,3.938145,0.548821,0.178389,0.993486,2.652471,1.483024,3.412963,4.207974,1.588244,3.757686,1.219017,4.108077,4.618415,1.999508,0.443380,2.021350,1.865201,2.547209,2.490539,4.374741,3.097141,0.384698,3.277294,3.927214,0.774121,1.057224,4.550190,4.772582,0.478264,4.633542,4.996805,2.334286,4.149419,0.969673,2.391837,0.557045,3.495811,1.914658,0.731066,1.109610,0.656005,1.756420,4.217467,2.321079,3.345581,4.777969,3.481569,1.214121,0.405715,4.111949,1.396235,3.135274,4.588394,2.631532,2.576892,1.913785,2.441883,3.384953,3.099372,4.346492,4.948494,2.096275,4.900468,3.323558,3.704035,1.972493,3.560802,4.160452,3.006374,0.594064,2.921141,1.136155,2.084930,2.244904,3.524187,2.102333,2.519656,0.584958,3.410361,0.311678,1.563097,3.325390,1.506227,0.038452,2.216821,3.248851,4.233665,4.447502,1.226148,4.771428,1.860760,0.220553,1.545479,0.875268,1.357223,2.774099,2.977625,0.760391,1.966226,3.103896,2.620426,2.789413,4.572893,3.583515,1.508193,2.406138,0.504705,1.489504,4.689477,3.467375,4.956880,2.087978,2.629587,4.821365,3.107114,2.291166,3.653452,3.124468,4.847341,4.777247,3.984960,1.269175,2.963498,4.692461,0.008042,0.528572,2.340262,3.232132,0.641661,1.674243,0.065094,3.740808,1.009015,4.190080,2.805300,3.186651,0.896214,0.926705,1.703900,4.639303,0.614261,2.616834,1.246463,3.649825,1.551054,4.926979,2.559681,2.292126,4.035462,2.131243,4.306601,4.902128,1.601826,4.371917,3.513034,1.723588,4.909948,4.493722,1.762054,4.652049,3.620705,2.806308,1.375317,1.491449,1.764837,4.610319,2.821954,4.191855,1.260165,4.016268,0.021817,2.745408,4.382844,1.270646,2.320615,4.131303,0.137900,0.589672,3.080586,2.494286,4.093538,2.896178,0.280830,4.933511,0.057245,2.345831,2.296568,4.301703,3.614835,0.708341,2.356386,0.554123,4.778810,2.463749,2.849993,1.129370,0.425032,1.558928,4.430776,3.090744,1.697631,2.928977,3.757551,4.751305,4.794769,3.539335,4.230602,1.955254,4.154991,3.108261,2.571157,0.158035,2.871672,4.579355,3.944046,4.245379,2.547174,1.447941,4.609783,2.781166,1.361845,4.724646,0.929815,3.827808,1.120755,4.045001,3.041684,2.631211,2.414427,0.450049,2.098124,1.323529,4.991960,3.500606,3.648957,3.708602,2.810509,3.625426,0.883404,3.699482,0.243774,2.075374,2.812658,0.798277,1.157829,0.175418,0.463829,0.835431,0.430142,0.869962,3.039726,0.070725,2.720778,0.318147,3.164778,1.633269,2.081185,0.017178,4.627371,3.833169,0.207515,4.096001,2.297277,1.371621,2.736341,4.827450,2.190265,1.365167,2.821648,1.087283,2.404835,1.783032,1.966488,3.594071,0.534514,2.753936,1.220188,1.615513,2.776980,2.911789,2.194565,4.646636,0.672285,0.727177,2.186325,1.761857,2.237417,3.285329,4.067201,0.432474,4.732269,4.203289,1.434922,3.794892,0.819165,4.461493,3.241599,4.197469,2.124157,4.178743,2.477048,3.761333,0.012977,1.100750,2.964267,3.174802,0.536741,1.207548,3.660382,1.401287,3.411007,2.614465,4.235754,3.100826,2.783271,1.479931,1.010367,0.461807,3.985530,1.854125,2.129993,4.658971,1.026320,3.173966,1.847160,0.018448,3.423117,0.304721,3.352437,2.283892,3.108134,3.173882,3.193274,2.539929,4.375848,4.440590,3.860684,4.831157,3.408959,3.912074,1.434002,0.271461,2.317461,0.030909,3.803518,2.056287,1.762662,0.313523,4.805485,2.518462,3.058083,4.568451,4.270054,2.056410,2.603402,0.710255,4.797000,4.560404,3.013796,1.495173,4.522031,1.038431,0.023293,2.365442,4.045795,0.068591,3.449192,2.952848,0.475157,1.428857,4.168932,3.271606,1.944980,0.708044,2.564022,3.270637,0.338176,1.068258,1.408208,2.682382,4.598150,3.350157,0.041089,3.848019,0.251592,4.279381,2.123275,4.521611,2.911680,1.786155,3.125162,0.436854,0.017933,1.044533,4.272537,2.164500,4.157907,1.466685,3.499038,0.376229,4.715451,4.147694,0.753398,0.960756,0.085093,4.910161,4.371221,1.243278,3.083580,4.220989,4.014757,1.200761,2.669428,3.006563,0.813135,0.674013,0.721717,4.993746,3.558405,3.748554,0.809176,0.010643,3.170120,0.122474,4.428405,2.839603,0.436199,1.471729,0.398173,3.612492,3.391997,2.824841,3.197312,2.673995,0.076590,3.767821,1.129360,4.743346,0.797926,1.849051,1.968911,0.247592,0.736817,4.794303,4.908746,4.927377,1.323183,1.131045,2.267466,3.632825,0.841224,4.458443,1.879020,3.805794,0.186054,4.824866,2.766303,4.342063,3.155753,4.436048,3.212618,3.406841,2.212391,1.645857,3.886752,0.969227,4.708620,4.804058,4.749575,1.608288,0.421665,0.535437,3.491591,1.592726,0.043916,1.263414,4.388223,2.104412,0.761782,3.537696,4.388139,4.512057,1.532319,1.938043,2.568259,0.746081,0.076143,0.647092,4.413970,1.053400,0.041202,0.314098,0.088703,0.716933,2.453818,4.796784,2.856550,2.948878,2.209104,2.615322,2.689918,2.396917,2.601720,3.837519,4.144984,0.391100,0.462142,3.374297,2.085511,1.471809,1.703035,3.006273,3.512767,3.767328,0.557800,1.365212,1.321154,1.685856,3.947607,1.446174,0.246607,2.183338,3.980511,1.769617,2.956213,1.575667,2.948472,2.855035,3.077660,3.721638,0.841841,0.700590,0.376431,0.607379,1.996821,4.487518,3.892630,1.343822,1.518386,3.544904,2.757598,0.166485,4.550474,2.961995,1.224399,3.714867,4.415848,2.137354,4.541292,4.390317,2.248685,1.453260,4.559542,4.048965,0.068047,3.340236,3.342468,3.516662,0.573703,2.892281,3.478556,4.942923,4.773368,2.722646,1.542126,1.474953,0.221065,3.838667,2.664862,1.316771,0.299348,1.157254,2.649778,4.058516,2.546593,3.877529,4.884514,1.005286,0.792039,4.131001,4.894789,3.055279,2.969481,4.935601,3.634792,3.025456,0.923187,0.872681,3.257719,3.612396,0.560996,0.179578,3.931152,3.818388,2.951802,1.965601,1.403873,4.005410,1.733946,0.826524,1.424374,0.741120,4.960530,4.101245,4.942690,2.545165,4.026153,1.607835,1.615113,2.414714,1.652595,3.011658,0.529897,1.287233,3.168733,2.788966,0.375965,1.416305,4.875361,4.770590,1.135981,2.657342,3.123873,4.532935,4.453632,4.254217,4.869099,0.120594,1.691020,0.118177,1.647903,2.555211,1.209710,0.560352,0.833369,4.993918,3.677229,4.152578,4.559245,2.689134,4.789056,3.133479,4.229979,3.984406,1.054241,3.941816,4.433593,1.229414,4.245845,2.315965,4.830925,2.154346,0.395289,0.777406,0.109387,2.716547,4.726360,0.907494,4.373882,1.022980,4.773235,0.223040,0.198525,3.517841,0.928281,3.400306,4.145978,3.597358,3.382736,0.599856,0.762824,4.727409,3.366954,3.802810,4.517543,0.812373,4.040943,0.115029,4.144324,3.942746,4.766703,0.316824,0.472650,1.459537,4.851234,0.600524,2.883209,2.332146,0.843764,0.247751,0.822103,1.590353,3.389307,3.945846,3.065900,0.818690,3.388319,3.506849,4.584183,1.265618,3.407350,4.930719,2.229280,3.804332,0.584183,3.358453,0.655375,3.711255,2.495582,2.716912,4.407632,3.135029,2.064421,2.207949,2.711300,3.321285,0.385441,3.509996,2.279607,0.328152,1.990821,4.896637,0.707290,0.651900,2.068647,4.596839,3.701339,0.612466,3.593721,2.720688,3.900445,4.397418,2.626399,1.093868,0.260491,4.885378,4.081898,4.978410,4.269496,0.565723,4.565070,0.659591,1.787995,2.032760,0.099966,0.568058,4.562064,4.559224,4.312215,0.721414,1.543246,1.323880,3.240228,4.191047,4.676238,1.688951,1.827235,3.947390,2.397374,4.382133,2.151007,4.888384,2.674542,3.550599,1.874885,2.818648,4.698364,0.790168,4.887270,2.795196,4.238639,2.835151,2.731935,4.595334,1.839820,1.873085,4.397939,4.140500,1.652181,1.391565,0.614814,2.798207,2.514797,2.588479,4.066082,3.857453,2.855914,0.532422,2.064136,2.799231,2.524095,4.522555,4.205886,0.524132,4.913618,1.903278,4.397118,2.051196,1.452838,3.538453,2.346310,3.562249,0.813133,3.457615,3.835118,1.436052,4.389359,4.012751,3.336712,0.783373,4.936044,4.147661,2.517911,4.822589,1.635477,4.365475,1.903817,2.961898,0.405062,1.170383,1.374595,4.400810,4.205307,4.717994,2.964155,4.181915,3.662286,3.445793,0.560377,3.390991,0.275347,2.595656,0.051975,0.816594,3.430694,1.228765,0.405522,1.821917,4.075410,4.711500,1.067009,1.491451,1.841214,4.621991,3.452728,0.446694,4.812617,1.409928,2.228173,4.919037,2.130566,3.328029,3.731854,4.362616,2.251097,0.474967,1.787848,2.869848,3.705516,3.345527,2.895079,1.636380,1.728576,3.909503,2.983122,2.865442,2.977718,3.792188,4.753644,1.512958,4.913442,2.075940,4.944306,0.838459,4.414200,1.535752,3.578540,4.134101,0.845114,0.715474,1.035585,3.564804,4.887169,2.053267,0.487608,2.468819,0.565774,0.967135,1.910181,1.461698,4.129847,4.483827,4.412892,4.607375,1.044276,1.737050,3.510345,1.328684,1.267864,1.294607,3.090847,2.280767,4.067768,3.691260,1.429074,1.811479,3.372162,1.715763,3.289365,4.772106,2.415040,3.697256,2.602710,3.366618,4.024663,3.874909,0.653273,0.040499,3.300825,3.641763,1.168085,4.809259,3.791324,2.560887,0.484787,2.997037,0.601376,3.436914,2.112461,3.094785,4.962032,1.565369,3.659580,3.081238,4.280891,4.959151,4.519503,0.429984,3.046041,1.539214,4.679441,1.835841,3.458473,1.505798,2.457489,3.663534,4.917673,4.705212,3.455244,0.253625,0.563591,4.641078,2.068737,3.043010,4.294806,4.342802,1.932524,2.933268,3.442358,2.204280,2.808880,2.706193,3.934038,4.017325,4.660688,4.709071,4.722783,0.080843,1.005474,2.501698,0.379152,4.984817,4.332575,0.240799,4.439163,1.617748,4.833486,1.661430,1.128395,1.441535,2.930711,2.791359,2.663897,0.339862,3.564093,1.577436,2.660157,3.301394,4.195907,1.545121,2.384640,3.235410,3.055004,4.138525,1.386631,0.321359,1.349912,4.605212,2.574961,0.663744,4.686362,0.090795,1.979110,1.719280,4.214485,1.654859,3.021190,2.281062,1.381602,4.973504,2.121747,1.845238,3.087269,1.575525,2.528501,2.344005,3.410715,2.301546,1.329787,4.599675,1.262525,3.677459,0.469586,2.352206,2.853886,2.200801 \ No newline at end of file diff --git a/lapack/src/test/resources/geC.mat b/lapack/src/test/resources/geC.mat new file mode 100644 index 00000000..c6c17489 --- /dev/null +++ b/lapack/src/test/resources/geC.mat @@ -0,0 +1 @@ +4.323773,3.546459,4.358712,3.871009,0.870356,4.142775,1.916142,0.345785,0.653794,4.989860,0.832172,1.639531,0.986640,3.195514,1.179658,1.323391,4.904651,1.611555,4.377888,4.638659,0.080146,4.530323,3.178469,0.473570,3.809564,1.350545,0.027802,3.941896,3.170014,0.387714,0.196646,3.245587,0.570243,3.651065,4.722636,4.887293,4.826329,1.320208,0.941955,0.198116,3.865749,1.039268,2.426914,3.306411,1.821082,0.063204,3.862440,2.005678,3.160546,2.024306,3.836489,2.783114,0.630367,3.395396,4.288362,0.372779,0.114135,4.999276,0.956155,0.808991,0.639050,0.584675,2.097964,4.431505,0.536952,0.814050,0.564889,3.927554,3.117116,3.660471,4.837592,3.852827,1.932502,4.545367,0.544295,2.223688,3.215414,1.687548,2.616630,4.743003,3.113471,3.193462,1.167730,1.498290,4.911271,3.163943,3.846086,1.828533,4.357467,2.515061,3.296193,3.742627,3.549873,2.737005,4.819027,4.654808,4.401407,1.655100,2.383325,0.996722,0.243578,4.784478,2.804727,4.095389,3.773228,4.660444,1.897328,4.350651,3.121078,0.169871,2.078024,4.491863,2.042073,4.750984,3.464362,2.322535,0.536022,3.648198,1.265534,0.770851,4.997515,2.638533,2.911683,2.653712,3.439864,4.909624,3.754567,2.502649,2.747741,0.714990,4.608471,3.696000,3.514410,0.106176,4.794566,4.432775,4.549788,4.296097,4.704688,1.477935,1.416648,0.479348,1.545478,3.663688,4.193746,1.524594,2.963240,4.312959,4.582136,2.427083,1.021536,4.879920,4.488839,2.508258,1.968751,1.551092,2.297454,2.912605,0.056069,0.846450,0.490753,2.646824,4.511124,1.159858,4.365251,2.907021,1.012213,2.227001,4.399300,4.292396,4.088489,2.675425,0.306448,4.740273,1.969469,0.474121,4.573014,4.797977,2.518829,3.022947,0.107632,3.168874,4.294902,1.549514,2.916664,4.165775,4.250579,0.752322,1.037485,2.461871,2.578203,0.914499,1.182743,1.386688,4.000247,2.858843,1.931369,1.162770,4.459071,3.222898,3.979575,0.178497,4.707668,0.011039,4.563618,3.739310,1.028658,2.616478,0.940441,2.063628,1.056595,4.775896,4.327504,0.838920,1.401448,3.841467,3.919922,3.173912,3.459373,2.013841,3.915239,4.866122,2.924291,1.513093,3.568847,1.512424,4.549622,0.283520,1.158421,0.630628,2.171482,2.315517,2.952456,0.479986,3.370114,2.842845,0.459588,0.140392,2.324232,1.045961,2.309001,1.430321,0.819922,2.144769,1.876557,0.762440,1.693673,1.749599,1.711939,3.980679,3.044960,0.967516,2.934836,2.955978,0.065762,2.305467,3.355996,4.103026,1.946713,4.195244,4.628001,0.751909,0.806262,3.812998,0.994524,3.452310,3.498367,1.243731,0.267467,3.729737,1.221480,4.154332,0.240746,3.016701,4.155027,0.942195,0.132827,1.566196,4.860305,3.075803,1.112310,4.949315,2.444880,1.029824,4.309569,3.317138,1.212031,3.853726,2.955572,0.144436,4.399468,2.876191,1.939590,2.224313,4.499099,3.120732,3.982460,4.854735,4.777107,2.459896,1.648554,1.874424,1.054916,4.123234,2.297275,2.500248,0.620542,4.604081,1.009708,1.890305,1.819506,4.361837,0.764461,4.101652,2.636700,1.458554,3.528973,0.885496,4.881295,0.012045,1.455058,1.412566,1.967369,0.708114,4.372576,1.892839,3.292766,1.894684,4.185496,3.288110,0.684989,0.467969,3.740531,3.242781,1.171511,2.153700,1.934461,1.360133,4.477700,1.877055,3.769510,3.986193,4.550378,0.249321,3.184591,0.566123,1.159504,3.798867,3.738236,3.317342,1.393831,1.355058,4.921314,3.987708,4.577233,1.227065,2.000684,1.458547,4.831157,2.816687,2.626712,3.984708,1.881431,3.909853,3.876873,2.943445,0.794039,1.004901,1.307686,4.678695,1.138341,4.090897,0.331727,1.793730,2.433102,1.466162,0.195348,1.575633,2.913790,3.022528,2.386718,4.872171,4.716416,4.238079,2.074261,4.606597,0.964934,3.020609,3.907413,1.870900,1.741643,2.174312,3.426669,0.435080,1.824185,4.174516,4.985277,3.198518,0.707850,1.243862,3.843925,3.473026,2.397756,4.220981,1.990307,0.599658,0.163314,1.661736,3.641003,3.099124,4.954285,4.381209,1.186375,2.856833,3.939418,3.050399,1.621201,0.807108,3.340716,2.788367,3.651964,2.529993,4.130834,2.191741,1.055266,2.588430,2.906832,0.399472,1.251443,2.938080,1.852624,3.078190,2.130011,2.058052,0.075177,4.458654,3.053358,2.287876,2.263784,3.971760,2.110555,3.685001,4.152922,3.593750,2.922805,1.311097,4.003072,2.840667,1.874201,0.403339,0.063730,4.194937,0.898965,2.188498,2.471085,3.501983,2.269900,3.209818,0.709094,2.809606,1.338626,4.597823,3.929526,3.602962,0.274433,3.313095,2.145595,0.103629,3.520453,3.278373,0.890924,4.672373,1.072188,3.280019,3.068518,0.835225,3.105310,4.197317,4.285161,3.499957,4.527358,2.448822,0.838278,1.410347,0.824473,1.426745,3.510879,4.032119,2.138515,1.764638,1.120273,2.061699,4.107012,3.274509,3.659926,2.152900,2.607424,2.478520,3.653824,4.286458,4.820981,0.971277,4.440760,0.422158,4.646909,2.430350,3.096066,1.133755,0.203874,1.468417,2.711894,2.861037,2.125422,1.063060,2.888467,0.635168,3.643097,4.538723,0.445885,2.864063,1.679905,2.376400,3.382392,4.311730,4.845762,0.117673,2.800207,1.403192,3.343806,2.967676,0.523502,0.456296,0.973200,1.389357,0.202505,2.620988,0.456596,3.859948,4.163172,3.660749,2.845087,0.832025,4.325201,2.952884,3.681756,1.992512,3.507713,1.878424,2.938959,1.815832,0.231679,3.967409,1.897162,2.333538,0.738275,3.028211,1.201914,4.172311,4.866109,1.123532,2.801854,2.068586,4.216746,0.036374,2.157967,3.423819,4.504153,3.997007,2.095204,3.719986,1.101677,3.030058,3.211052,3.263796,0.731166,1.069946,1.585159,2.907228,2.544118,0.654322,2.674546,3.488290,0.932143,2.820409,2.601223,3.298916,3.534086,2.212774,2.977549,0.363388,1.292886,2.126687,4.299700,4.701883,4.754055,2.151541,2.738047,2.209681,0.291639,4.419832,3.209139,0.745650,1.059965,3.480577,2.845850,2.593199,3.826397,0.710121,0.747765,4.050509,2.864565,3.586792,0.944054,0.109404,2.752826,3.866751,0.356934,4.326438,1.710674,2.873875,1.787701,1.856191,0.616959,1.355009,2.436634,1.865796,1.571428,4.007528,0.041222,2.677188,2.377267,3.427826,3.010272,0.998136,0.661166,0.167941,1.081960,1.522729,4.621685,1.915841,2.733625,1.590910,3.576682,4.514836,2.526697,3.120101,0.362779,3.569850,0.475194,4.620224,1.388137,4.694434,3.100100,1.066136,4.470721,0.724898,0.660492,2.242837,1.245515,2.669691,2.225062,4.666951,0.470668,0.429940,1.749001,3.733577,4.908182,0.913162,0.632247,0.125020,0.029586,1.485024,3.926450,4.623387,4.963475,4.617855,0.623429,3.639958,1.065012,1.172508,3.662797,4.749055,4.990298,0.214198,1.057015,0.062498,4.616830,2.175148,3.913364,2.954981,1.471295,0.358823,0.790079,3.553473,0.593146,4.485375,2.952637,1.341403,1.942471,4.123198,3.370633,2.426280,3.644053,3.469586,0.557017,2.184009,2.495732,1.093085,2.772602,2.744604,2.896497,1.929825,3.015199,0.751371,1.923477,1.261733,4.722236,2.105619,0.285386,0.761131,2.891282,4.146503,3.335293,4.393213,3.080866,2.181749,3.393380,4.068780,4.426880,0.556389,3.903320,4.107895,0.151169,1.086998,3.697595,1.020472,2.162194,1.601439,2.489887,4.930764,1.770213,2.804721,3.941545,1.264836,4.190961,4.459448,2.939830,0.090235,0.376771,3.020161,2.737454,1.665276,1.300270,0.671247,4.352213,2.063604,1.247666,1.607486,4.426930,2.525227,4.250230,2.841564,2.206406,1.240194,1.846951,2.456045,3.319856,3.031262,0.036781,0.502358,2.018093,1.862470,2.993368,2.729131,3.817698,4.942977,0.295192,3.224945,3.173678,4.139828,0.373185,3.452314,4.904688,1.398117,1.573764,4.158331,3.494663,1.217445,2.651180,0.161516,2.157859,1.270797,4.602696,0.166705,4.218580,4.806847,2.891880,0.757443,1.103819,1.693808,1.412476,4.691146,4.505223,2.832831,3.574906,0.287011,2.961529,0.176098,0.658866,1.594241,0.078065,2.412817,0.265017,1.467954,4.154553,1.121497,1.974697,2.778464,3.103773,4.659936,2.251953,4.963834,0.858586,2.367650,2.097157,1.771745,3.044158,2.066245,2.030812,4.699038,4.727909,0.297076,1.103852,3.598813,1.297175,2.644194,1.367499,1.917156,1.866804,2.538969,1.568538,2.938859,3.368185,2.927623,4.899460,1.076008,1.798350,1.721014,4.142680,1.362018,1.672765,3.595269,0.940085,1.937184,4.330827,2.927222,3.245753,1.180301,0.028737,0.111100,1.341863,4.787935,2.139321,1.521098,1.217182,4.962860,1.113224,0.694986,2.612882,1.606689,3.240513,1.359688,3.715647,2.938585,3.529676,3.816281,0.888937,1.838904,0.996308,3.194964,4.693735,0.808978,1.923068,2.576262,3.272033,0.828861,2.746278,0.803288,1.313271,1.738683,3.200063,1.396191,3.710070,4.942860,1.467785,1.689172,2.088739,4.392593,1.362356,2.148667,0.720489,1.825511,4.041079,2.837664,2.674340,4.218350,0.464918,3.629059,0.178906,4.471055,1.026245,2.978834,0.561597,2.743229,0.979189,4.031528,1.536681,1.426575,1.901523,1.117200,2.975531,4.379561,3.677056,3.917633,3.272659,1.507968,4.776863,2.414954,3.944327,1.080217,2.196089,2.603083,2.723026,4.671615,3.756744,3.633191,3.008844,0.846307,0.611911,0.979010,1.849443,4.676674,4.107899,0.544323,4.243472,2.046313,3.213919,0.882617,0.819024,4.145813,2.247471,3.887330,3.839880,4.726268,4.577843,3.255953,3.066516,4.256937,3.648886,2.170254,1.340488,1.763856,1.483932,2.140592,4.929993,4.543696,1.454053,1.064710,0.196779,4.889961,2.912821,4.829139,2.246705,0.713677,4.961975,0.633873,0.362937,0.672462,3.712115,0.661849,2.855783,1.211307,1.893556,1.757966,2.322254,1.407077,4.352867,4.906310,2.581843,2.436115,2.977129,0.466710,1.535978,3.770853,2.970169,4.160624,1.689582,1.658652,2.317639,1.440970,1.397589,2.004034,2.342378,3.173819,1.838205,3.654446,3.832742,4.560029,3.629043,0.889892,0.451470,0.254395,1.302290,1.685565,1.753566,0.037721,0.848134,0.262968,4.929286,1.840710,3.466993,2.944506,3.867356,4.078744,1.975079,2.347819,0.046120,3.299516,1.117920,1.857894,2.649122,2.199209,2.987305,4.797184,3.756050,4.398027,2.859907,4.629038,3.827468,3.239808,1.058228,1.319361,1.322787,1.237397,1.017838,3.646106,2.555435,1.509357,3.576405,3.486471,3.215685,3.734331,1.045997,3.262072,2.570672,4.758754,1.498911,0.168635,1.475741,3.180425,4.348067,0.638726,1.503879,4.985368,4.491893,0.736010,1.046137,1.749600,0.772814,4.667505,2.453309,0.012511,0.172070,0.848754,4.512290,0.616912,1.788689,1.085816,4.129902,4.541781,4.125123,2.303839,1.094954,0.957062,3.193598,2.486492,2.792828,4.307394,4.757288,4.524888,1.196640,2.098332,2.836678,2.444176,1.279335,1.248031,1.398492,2.835101,2.784711,3.625135,1.199222,4.654176,1.060832,3.424751,3.034463,0.493260,0.963843,4.088119,4.656424,2.155584,4.650609,0.008616,2.748124,4.190916,2.995261,4.272746,0.927330,1.309386,0.464492,0.482598,3.524631,0.439840,3.691917,3.745370,0.305678,0.582181,1.535956,0.322162,4.081171,2.311762,0.050239,3.817257,2.077926,2.197482,4.293182,2.265903,4.002028,2.007338,0.396405,1.744635,0.326716,1.037693,3.800939,1.202333,0.500337,1.695352,2.866864,1.275769,3.856208,4.960962,3.242782,3.415703,0.802384,4.145107,0.276959,4.570503,1.634445,1.285823,0.527288,2.717612,0.268664,2.447502,4.069898,3.790597,0.496527,2.416034,4.372535,3.490361,0.295557,0.964409,4.622708,3.321067,3.901239,2.747867,0.543946,2.428477,2.646121,2.227457,4.894819,1.439841,1.270799,2.236811,2.598775,1.600670,4.947341,0.577809,4.906823,4.583098,4.664954,1.916224,3.034037,2.908207,3.016519,0.298802,4.067786,1.836035,4.580344,0.925709,2.890244,2.992961,0.137494,0.953822,2.409440,2.983439,0.438759,1.546698,2.707435,3.393856,4.180835,3.801396,3.910484,1.402299,1.613764,3.143283,0.867876,4.544555,3.623519,0.289458,3.754408,2.614004,4.695679,2.522139,2.880484,4.196278,4.598141,4.456950,2.822342,3.133187,0.006523,2.859470,0.926542,2.906921,4.945087,1.729122,3.638405,2.406638,3.427764,4.191498,3.578248,1.409986,4.269387,4.893220,4.555609,2.983964,4.417183,0.788780,0.982343,1.286287,3.858425,1.204991,3.601663,4.184494,1.009167,2.746391,4.189847,0.377071,2.968313,0.971100,4.440389,4.391988,3.028553,1.812183,3.893210,1.400093,4.086360,1.002027,0.639617,3.440453,3.582565,1.485007,1.185148,4.637044,0.272260,2.958274,4.015000,4.786479,3.711573,4.047982,4.634441,2.220863,0.333536,1.232328,4.977277,0.938955,1.217686,2.017922,4.367973,3.971122,2.957755,2.504383,3.440082,0.854031,2.935130,2.502532,2.886262,4.028389,3.253353,4.578378,3.008487,1.305354,1.977135,1.823890,3.488716,3.323962,1.370078,4.635755,0.232547,4.367103,2.031649,4.761143,4.435452,2.947974,0.517617,3.600636,3.581022,3.184040,1.300635,3.313933,0.930035,3.673046,2.929662,0.021166,2.729598,1.401881,2.740063,3.098261,3.173821,0.323966,1.149409,3.983986,0.419542,4.229794,3.663323,0.345818,2.410228,1.026782,0.789410,2.485378,1.243597,4.696974,1.687749,0.630680,1.338353,1.107852,3.910434,1.057084,0.906981,2.611711,2.432205,1.508344,0.749510,4.441927,1.734593,2.863645,1.066149,1.369161,2.419242,1.943737,1.884850,2.811336,3.543431,0.127994,0.409722,1.846286,1.253434,4.456280,4.446138,4.944517,1.815119,4.110109,3.267897,2.033222,0.100325,1.636004,2.075255,0.314431,0.570696,0.764460,0.007857,1.805024,2.762167,3.078358,1.391293,4.056581,3.871888,3.468979,3.299849,1.456259,0.616844,0.803344,0.269463,1.485235,0.175458,2.656384,2.255307,0.483537,0.339622,4.016618,1.769898,4.442828,0.114220,1.711391,2.057775,4.624710,0.186191,0.837958,3.070619,1.841619,0.388853,4.007167,1.352769,3.402001,2.579010,0.741772,1.423691,1.257294,2.621604,3.870488,2.909907,2.699001,4.783382,2.161626,4.534315,1.149975,0.779520,3.826329,0.812219,2.409985,0.070482,1.665134,2.060961,1.757683,0.842093,4.766042,2.883733,3.896693,4.863189,3.132860,3.861266,3.135700,4.532897,1.700958,4.657748,1.275595,2.619303,1.752859,3.915622,0.641703,4.114728,2.691521,4.736604,2.280967,1.532881,4.573374,2.954653,0.633009,2.793575,1.347740,3.660331,2.792906,0.600153,2.191909,3.462621,0.643395,2.995911,0.120313,2.564201,0.033519,1.773819,1.866815,2.228883,4.382406,0.796964,2.867239,1.419986,4.536884,0.252389,0.803892,3.652693,4.142059,3.265644,4.870401,2.459838,1.681860,0.300210,3.232986,2.754321,1.170739,3.794334,0.688818,0.983415,1.015026,2.901587,0.170543,2.169281,4.857034,3.852198,3.961718,4.437874,2.059135,1.400580,4.799408,3.240118,0.767697,4.940605,3.359060,3.928571,1.252762,2.495475,0.708524,1.873951,2.738288,2.115238,0.342193,3.617420,3.888669,2.029479,1.195875,3.402812,2.852911,3.275289,1.875155,3.119963,2.027268,2.696127,1.390639,2.018451,1.403748,3.231583,0.811541,2.912760,2.908090,4.090941,3.750341,0.130369,3.012998,0.400486,0.368727,4.197036,1.305159,3.693145,4.925696,4.942005,3.498297,2.820367,4.053569,0.920922,4.950655,1.010295,3.492271,0.360257,0.748797,1.018285,2.160178,1.053928,3.736780,1.533849,1.799551,3.283729,0.155920,4.725340,1.879777,1.154153,3.933833,1.772336,1.778533,1.460759,0.492377,3.581033,3.051811,4.934622,3.126796,0.156601,2.370163,0.148551,1.634628,2.655737,4.766176,0.104621,4.836407,4.532202,3.377775,0.472938,4.824944,2.820303,0.004984,4.139423,1.109147,1.356616,2.979628,0.588073,4.621459,3.296807,1.717470,3.680562,4.315481,4.162930,2.945106,4.019141,0.805370,3.128842,1.768919,1.517706,0.725910,0.198824,0.094482,4.383962,3.425200,3.380513,3.003283,1.913292,1.765200,1.389334,1.714232,3.547161,2.465425,3.766188,0.465413,2.491093,1.934203,0.090021,0.827100,0.456186,1.781359,3.591313,3.227388,3.014366,2.483003,0.430715,2.739157,1.072809,4.242286,1.045109,4.133360,2.803711,1.902261,1.310067,2.581000,2.901758,0.733856,4.929660,0.882763,3.548966,4.888976,4.887168,3.795965,4.667605,3.824491,3.142907,1.068229,0.403399,0.205396,2.098746,2.946795,2.047442,3.682363,2.601587,1.414711,4.755175,1.946583,0.586221,3.947060,0.990782,0.490735,3.252763,3.752398,0.262233,3.303759,3.603396,3.128656,4.286385,0.182791,4.772005,3.141989,2.443587,0.432005,0.231787,4.376000,2.720724,0.699000,1.345026,2.663104,3.938339,1.950015,4.675890,0.922995,4.026559,1.041650,1.801384,4.523904,2.951275,0.619079,1.172875,0.007119,1.632743,2.644233,2.841737,4.714417,4.335764,4.366108,3.791407,2.563492,3.300249,3.076978,2.565980,3.675668,4.800003,2.212340,1.576373,4.931561,3.955680,4.897814,2.028804,4.977977,2.814883,2.159794,1.916497,1.758178,2.096572,2.473020,4.679584,3.120076,3.122450,2.515131,0.366019,1.515661,4.571638,1.426218,0.998473,0.060245,2.922963,0.286331,4.053605,2.748473,1.972794,3.992163,3.798943,1.968322,2.067289,1.222166,0.196621,1.159190,1.416856,3.482855,4.475451,1.254392,4.562029,1.135908,1.565200,4.388401,1.321021,0.809039,4.586656,3.094221,2.577620,3.823332,0.304470,0.396168,1.727060,2.233573,0.008827,4.015985,0.908802,1.922223,3.103509,4.130939,2.649100,1.917702,3.659230,2.296507,4.738146,3.782716,1.995016,2.225002,4.081852,2.084881,3.441114,2.119990,3.560589,2.079556,1.391609,1.240850,1.557032,0.520567,1.958920,1.686133,0.256442,1.220040,0.654701,2.571593,3.427578,3.191036,3.899767,0.600457,4.961853,0.593810,4.969127,0.610704,3.014428,3.893048,4.282371,2.470308,2.105438,3.398741,1.347642,4.048256,2.196576,3.302231,3.346346,4.162020,3.601568,0.223388,1.679040,4.677818,1.091162,3.990124,2.233254,1.018638,0.091066,2.505283,0.763541,4.177692,2.770859,1.217422,2.533164,2.672442,2.811354,4.597848,2.220361,4.975467,3.386478,0.178797,1.207125,0.136171,4.669689,2.517335,4.603315,3.326535,2.772671,0.603544,2.275902,4.432653,2.382262,1.791918,3.578811,0.077402,3.727536,3.851236,4.533924,4.951494,2.865568,0.837164,4.503318,0.438559,0.697524,4.324000,3.007707,2.853545,0.338525,1.783102,0.064202,4.955154,1.722716,4.004810,3.507685,2.847419,3.364709,0.578298,2.759972,1.496205,2.861417,1.358581,0.529659,0.626275,0.681141,4.001570,2.861221,2.862454,1.275855,4.124074,1.563724,1.630859,0.194736,2.065836,2.065837,2.464442,1.350588,0.809067,2.272887,1.589803,1.864036,1.174392,1.492793,1.929578,3.319312,3.230938,4.621188,4.959932,4.917859,4.654683,2.948101,0.666368,1.016368,4.891837,1.642301,1.702880,2.645496,0.015224,2.762344,0.746484,2.223143,0.431184,0.932933,1.882702,2.625523,3.147523,4.835813,0.527759,0.536201,0.010042,1.392223,4.009335,3.341454,4.092070,4.923420,4.646560,3.492002,0.114413,0.321292,4.952992,2.099680,4.043703,2.705204,4.663946,3.684027,2.899919,2.034098,2.348123,0.115866,1.051525,4.816879,1.973846,0.471859,1.969492,0.634352,4.312787,4.411763,4.519680,0.110045,4.163851,1.911826,0.882684,1.170956,2.339226,1.458287,4.339920,0.618866,2.870830,1.612408,0.587458,1.108942,3.082228,3.998720,3.036699,2.882997,2.275837,2.432604,1.562087,2.746761,3.238299,2.514129,0.741711,3.958124,4.118483,4.195076,1.385158,3.856048,3.527723,1.715492,4.086737,3.056614,3.242260,1.720171,1.158447,4.355425,1.005546,2.586796,0.099368,1.385516,0.058755,0.273839,1.722240,2.755229,3.984732,4.019386,0.297034,4.857054,3.779579,4.933186,0.410179,0.436993,2.517058,2.002568,4.814744,1.516631,1.767127,0.076214,4.567262,3.710413,1.211640,2.314082,0.630682,0.711099,3.428399,2.111191,2.945197,0.074343,2.270484,1.217887,2.961639,1.269659,0.288934,1.198040,0.087634,0.935412,3.568559,4.278933,3.952785,1.039126,3.261076,0.618389,0.862704,3.330992,2.220740,2.299635,1.653530,1.730135,2.238288,4.341697,0.756700,2.647863,0.028621,3.532582,4.123795,4.178636,3.463183,1.475270,0.427260,1.481532,4.284693,1.160412,3.527038,1.989807,0.552388,0.961172,3.965879,4.811399,2.679297,3.347875,2.690094,1.161182,4.252112,4.343696,1.318305,2.184888,0.099420,2.421957,4.630825,0.507934,1.100519,3.818080,0.765620,3.896456,2.972098,3.318801,2.648538,3.135903,2.358580,3.350537,4.353873,0.533414,0.937915,0.371031,2.883894,4.829827,3.879844,1.358393,1.976207,1.761985,0.614428,4.508504,1.770754,3.897351,3.247198,2.676061,0.088850,1.704812,2.569364,0.421816,0.940114,0.174562,1.635945,2.793414,3.739362,2.861004,0.492520,1.732593,4.222380,1.159474,3.530891,1.454856,2.488467,2.169434,4.039278,0.664103,3.593209,1.577819,2.249911,0.165555,2.102521,0.035078,3.172947,0.743602,4.650297,3.156163,3.489548,1.514315,0.900261,0.012519,2.155350,4.913388,0.589606,3.439597,1.465413,2.874442,1.008631,1.351875,4.242879,2.976652,1.532809,2.461492,3.694409,0.909606,3.011764,1.798549,4.996990,4.167165,2.476942,2.476159,1.881904,3.752791,1.967562,0.866174,0.239086,4.083569,0.685906,2.465544,3.955741,4.219491,4.366359,0.048219,1.517977,2.567880,4.077711,3.763539,3.189811,0.555801,1.153177,4.996995,4.943837,1.665277,3.375523,2.668545,1.178825,2.998883,3.091995,0.662226,0.052793,4.563526,3.230117,4.419347,4.377989,2.130353,2.229111,3.683738,1.533478,2.035696,2.325857,4.605683,1.648900,3.009238,2.787955,2.007559,0.667554,2.026041,4.195613,2.027924,1.623352,3.042941,0.673761,1.045375,4.246913,2.843540,4.435303,2.890739,0.172037,1.643617,1.432536,2.959435,1.250813,2.624602,0.899870,1.831327,4.836161,1.549872,0.678902,0.287155,2.987829,2.444428,0.141905,1.041490,1.073639,3.108368,2.779665,4.942903,3.922990,2.436859,3.776536,4.272519,3.827228,1.598896,3.644994,1.840182,1.243138,4.251819,4.739269,2.485815,4.597019,1.620319,2.541519,1.722039,0.034071,3.291168,0.362188,1.160953,4.578867,0.270256,1.954359,0.937653,4.897453,3.189629,0.884491,3.234187,3.524320,0.324116,3.122476,2.557690,1.429116,1.748025,2.044298,2.509344,4.048260,1.118985,4.462379,0.565740,0.638147,0.953008,0.807743,3.774210,1.643134,1.311118,1.791928,0.992167,4.084176,2.942641,1.398302,4.998255,4.596012,3.457878,1.469415,0.174157,2.610584,3.863473,1.632514,4.358874,3.894162,4.433694,2.705922,3.050594,1.551253,3.385236,0.188950,0.883216,2.285034,4.450724,2.832147,3.740569,3.523426,0.503900,0.384734,3.024749,4.511315,3.264333,1.069883,1.233605,3.376777,4.460509,1.016005,3.849887,2.439977,3.912186,0.996585,4.361119,3.039053,1.815531,3.522266,3.415415,1.097089,0.011725,0.250947,4.803966,2.604490,2.199826,1.732629,4.377852,3.351554,4.489942,0.994376,3.214162,4.521648,2.771603,1.246135,1.280721,1.805730,4.163091,3.761249,3.352759,2.901535,4.635338,1.130411,4.161933,3.827665,0.231518,4.039279,1.475051,4.853145,4.888521,1.778969,0.564504,2.275701,3.009060,3.836645,4.211602,2.622029,3.913211,1.015855,0.528678,1.744006,4.963354,4.483960,2.500287,1.576431,4.779510,0.855204,0.997851,0.746546,0.999893,0.568044,2.506954,3.103340,2.630627,0.052201,3.975384,0.567231,0.019080,3.892054,0.864608,1.956480,2.888017,3.598484,1.122368,0.460770,1.505161,3.957209,1.716294,0.909492,4.510062,2.342725,2.052436,4.305110,3.990265,2.510368,3.046134,1.420920,1.256436,1.037513,2.573144,4.577338,0.341625,4.765736,3.822778,3.932590,3.400707,0.897939,4.817952,1.710826,3.857543,3.740361,4.667791,3.737015,1.694196,0.104905,1.167207,3.301380,1.024063,2.656805,3.531265,1.017451,2.413457,2.951586,4.872174,0.826267,3.593732,0.523320,0.522375,1.016417,3.265230,4.019981,2.916124,4.143936,1.915252,3.062029,1.583872,0.321537,2.453321,4.896458,2.641014,2.432658,2.261400,3.373781,2.037578,4.592128,0.860715,1.695876,0.167396,4.370966,3.808057,0.484103,2.798866,3.091853,2.795869,0.505435,2.702915,1.080164,3.771858,0.769859,0.153787,4.199431,1.690201,3.278100,2.263619,0.152492,2.881634,1.038684,0.784138,2.215494,0.822031,0.909558,1.945070,0.510058,0.848731,1.514532,2.462068,1.793398,2.857449,0.507843,0.371331,0.429347,0.220704,1.881573,1.182020,2.349513,1.612400,4.403710,0.955575,0.916852,0.493905,3.070285,0.557012,0.379171,4.699668,0.361363,1.587565,2.021588,3.191835,3.183179,0.139142,0.714732,4.699943,2.042637,1.877159,0.078458,0.219786,0.416652,2.985553,1.570980,0.004515,0.987314,3.965921,1.365639,3.589971,1.415353,2.777230,0.863131,2.037549,1.260410,2.384438,2.405962,3.031376,4.537196,1.287368,3.486086,2.611228,1.373524,3.246741,1.365113,4.611453,2.329953,1.910545,0.485475,0.878888,0.653263,1.725537,0.791560,4.421704,4.008342,1.114708,4.218313,3.723341,4.416732,1.446866,0.295284,0.916577,2.047247,4.760320,3.656662,0.047327,1.665191,0.752310,1.101484,2.665282,0.578119,3.180873,0.016747,3.492391,3.867170,3.685164,0.051870,4.767349,4.958248,4.568650,4.598585,4.845358,3.506462,1.275914,1.331356,0.090636,0.335279,0.288142,1.647467,2.978037,4.488922,0.253391,1.248881,2.065560,3.026810,0.089549,3.899582,4.143919,4.200000,1.790153,1.547555,3.600738,4.433145,3.726804,0.929857,4.883500,4.677242,0.335154,0.485455,4.871314,3.742728,3.947187,3.573664,0.552123,4.231801,3.524434,1.152683,4.482490,1.288508,0.400937,0.869570,1.714831,2.008851,2.553587,3.160647,1.406422,2.202398,0.531637,2.370227,4.967054,0.518636,1.324233,3.528942,2.103172,2.607445,2.412603,4.506690,3.255364,2.470868,2.093478,4.566743,2.201727,2.349254,3.319584,0.107737,0.012145,4.273611,1.834946,0.722939,2.267243,2.631018,4.296437,2.725203,4.138601,0.765926,3.173216,0.747898,1.207225,0.222786,4.712137,4.856965,2.803510,0.447391,4.637416,0.136248,2.625766,2.533601,0.076346,2.061387,2.031531,1.818862,4.919480,2.806477,2.656614,3.888664,1.446300,4.626808,1.662397,4.998252,2.118113,3.734366,2.968102,3.049457,0.968807,2.749530,1.762442,4.744115,4.531405,0.318080,4.907727,1.052738,2.814746,1.014229,2.544798,1.057231,4.563925,2.663425,3.847544,0.664363,0.408589,3.484984,1.919353,4.330233,0.617153,4.471062,3.140955,3.118507,0.661636,4.334708,4.016943,2.776229,3.912274,1.518195,3.802794,0.126485,3.198578,4.236878,0.879229,1.606537,3.818095,3.423785,4.919911,0.979567,2.605721,3.015992,3.189707,2.689983,0.500976,1.705124,2.736604,4.958241,0.422728,3.378007,4.233264,3.916333,2.274939,2.112538,3.768250,2.562209,0.222119,3.901454,2.049808,1.548085,1.146032,0.809825,1.799910,3.316521,3.058453,1.263491,2.490962,1.123739,2.264456,3.030825,0.242144,1.372716,3.080115,1.398593,2.471864,0.352088,0.930474,4.582024,0.513872,0.727691,0.184839,2.078689,2.658328,4.663423,2.613017,2.374007,4.805337,1.213882,3.418923,1.805053,1.495626,2.345199,2.200465,0.167590,1.193477,1.623590,1.396173,0.824546,4.725249,2.735375,3.303098,3.164352,4.727537,4.865553,1.269146,4.305211,0.606120,2.244350,3.202956,4.734583,4.140591,0.755971,4.815986,2.681993,3.573753,2.017398,2.304475,0.052424,0.765981,0.164058,1.143976,2.496232,1.476947,3.238574,4.675890,3.584951,0.911173,1.345928,0.725077,1.122412,3.736175,4.453052,3.700395,3.307636,4.836265,2.178247,4.748943,4.642815,1.718950,1.031224,0.518793,4.941465,2.655236,1.188633,2.947007,2.228921,3.872841,0.729994,4.497309,3.950781,3.710123,4.593153,1.595843,3.617298,0.290600,1.790542,2.698085,4.658964,3.908578,0.548666,3.839196,0.632869,4.091902,4.062289,4.575657,4.989308,0.298659,0.116405,3.384196,0.631772,3.798737,1.156805,0.128719,0.255473,2.108858,4.367081,4.960027,3.760794,0.432366,4.957352,0.363819,0.962439,3.973305,1.095565,2.221841,2.164362,1.179371,3.462564,0.915485,2.614105,3.937923,2.249618,4.590532,2.909242,0.652486,4.098492,4.294115,3.107098,3.917049,3.718580,2.515568,2.809837,1.952232,3.471053,1.282300,2.678943,2.333663,0.605422,2.578700,1.818151,1.690181,0.479179,4.311053,3.643404,2.810285,4.154516,2.640110,1.376596,3.758420,1.918810,4.624600,1.629053,1.377195,1.588101,1.802324,2.320474,0.174632,0.280785,1.930726,1.480935,3.109615,3.102892,0.406359,1.136255,3.142121,4.487758,0.174452,2.161130,3.762234,1.817308,3.746424,0.944302,0.672385,3.506422,1.086976,0.198617,3.307665,3.640055,3.952382,0.106124,3.219514,3.733187,2.923258,3.767696,2.398511,3.806494,4.305420,0.004080,4.658516,4.301625,3.847710,1.185581,1.957045,3.477100,2.177035,3.760548,4.299675,3.036150,3.467480,0.554689,3.035177,0.444028,0.108235,3.688795,4.241859,3.471040,3.215261,3.424895,4.809112,1.452481,3.458491,2.219155,2.133023,3.618905,3.052763,4.140353,3.685715,4.153082,0.471383,2.867859,0.890193,1.845380,3.340617,0.159670,0.001725,4.805153,2.230819,0.251258,0.264310,4.761787,4.866362,1.729663,0.904885,2.159009,0.155365,2.821000,1.377506,2.370259,1.385238,2.060358,3.810394,1.907745,0.928695,4.557615,3.523245,0.540097,1.385953,2.413317,3.027351,1.811036,4.240294,1.848835,2.907247,2.043429,4.698514,0.981046,3.510540,4.016081,3.666177,0.596938,0.395618,4.491847,2.831151,3.694056,4.424928,1.234782,2.386446,4.738038,2.043258,2.402130,2.285519,2.742366,4.240149,2.031771,1.770424,3.134875,0.536091,4.745964,0.941656,1.813316,3.718899,2.909050,1.074470,3.456600,4.358846,0.490858,2.533802,1.417200,0.861149,2.856554,4.908663,4.653072,4.599517,4.491588,4.049227,3.601727,4.412932,0.170373,0.845976,4.164766,0.800397,3.008574,0.858921,2.707724,4.700474,3.050185,4.881734,2.061487,2.151518,2.452998,2.481293,0.682052,2.480654,4.033465,0.306515,1.706046,0.470855,0.072746,4.224933,1.719000,1.513533,1.039919,1.493907,4.906597,3.720035,2.480880,1.052349,0.092967,4.774962,3.543051,0.591831,0.903422,1.082005,1.025771,2.607604,1.999980,4.149154,4.765646,2.692276,0.697411,1.515250,2.944738,1.362027,4.012022,1.416747,2.854365,1.499411,0.332366,1.238828,4.795314,4.393460,1.668283,3.702743,4.164981,4.504386,2.246174,2.677467,1.751609,0.979612,2.015006,2.831982,2.990841,4.582538,3.239148,1.757062,3.327260,2.057277,0.744759,3.875661,0.794228,3.969535,4.287659,3.691236,3.118004,0.285021,4.667204,0.355728,3.972222,0.691504,0.163856,4.650472,0.930317,2.686391,0.567378,3.181294,4.341517,1.140152,1.499208,3.108285,3.052261,4.033696,4.128705,0.052090,4.144991,3.074072,1.485805,0.032113,2.298138,2.931953,1.863692,3.729451,0.386086,0.836833,4.333498,4.608439,2.250086,2.783325,3.446385,2.071994,3.899905,2.626173,4.221230,3.366203,3.706020,0.294120,3.765115,2.346470,1.673792,2.155450,0.868951,0.011569,3.346921,4.152125,4.652268,2.658081,2.516752,4.302142,1.878394,1.592102,4.361916,0.839289,3.928022,4.364852,3.855483,2.383562,4.598023,0.681999,2.175251,4.807630,0.566360,3.822633,2.029270,0.189105,0.262040,2.152221,4.291301,3.906398,2.983608,0.004538,1.924593,1.820390,0.272925,0.876509,4.219365,2.760267,0.622820,0.273284,3.551584,1.853229,4.781362,3.705461,2.916528,3.884010,3.960772,0.853996,2.743208,4.097443,1.775015,0.459097,0.916454,2.994713,4.486543,3.149536,3.334500,2.596080,0.299237,4.004616,3.029565,3.551561,4.352194,1.291433,3.726610,0.560508,3.902674,0.512461,1.564284,1.482388,3.325233,3.895982,2.043801,3.750099,3.681629,0.239339,3.108328,3.996497,2.817536,2.498657,2.482748,0.190400,4.164982,1.092698,0.641377,2.969439,3.822661,1.339719,0.504905,0.758241,1.091483,0.565966,2.737318,2.241458,4.933250,4.880065,3.024432,1.500000,1.840245,2.554699,1.847666,4.777577,1.080949,3.797621,2.551576,3.192399,1.523801,4.870732,3.741081,1.793858,2.662317,0.569993,3.693965,4.480988,3.344556,3.690103,0.603816,3.354918,1.482253,3.927735,2.562428,3.594640,1.384687,4.520626,1.349883,1.002804,1.282606,4.433059,1.904625,0.170341,1.049815,3.499338,0.256807,0.518344,1.372616,3.081791,0.002332,4.160810,0.606184,1.135961,4.405122,4.849064,1.560929,2.885484,3.858029,3.677022,1.510769,0.111176,0.080230,0.579342,2.758514,4.772257,4.764414,2.433538,2.470228,0.177962,0.136433,0.641000,0.509688,2.753496,2.181556,0.075867,2.949688,3.883862,2.900338,0.002845,3.230776,4.843306,4.459387,4.522291,4.812893,3.983118,1.812324,4.928240,2.592587,2.608726,0.991689,2.680571,1.411412,1.357366,4.301528,4.779601,3.388330,1.943499,1.522844,4.277511,3.454590,0.887210,2.420308,2.881264,2.595893,1.000237,1.584468,2.814263,3.393955,1.588631,0.311786,2.307173,3.962442,1.755123,0.978407,4.475356,0.178260,1.097742,0.075906,3.429578,4.798220,4.928197,2.744561,4.149499,4.139954,1.035606,2.591916,1.422603,3.867637,3.855960,1.392889,4.342050,1.946263,0.695206,4.607266,1.260188,4.190834,3.686724,3.902118,3.487517,4.292489,0.908035,4.930050,3.077782,2.777541,4.712595,4.713678,4.820992,4.541786,2.771078,4.969504,0.355972,0.173944,3.808528,4.028317,1.835111,0.338015,3.170783,0.703517,2.558955,3.886990,2.843544,2.643705,3.172404,0.398396,1.777517,4.221025,3.873303,4.418472,3.780032,2.350563,1.621832,2.668683,1.983795,4.787095,4.826565,3.299588,3.118179,4.559194,2.785064,2.429321,4.356691,4.276293,1.918074,4.863611,1.537617,3.196957,4.256739,2.929820,2.968315,0.492257,1.594697,2.086986,1.857363,1.533042,0.105976,1.616682,4.292899,3.594255,0.528968,0.524190,2.540748,2.981079,0.302965,4.081865,0.642008,4.392683,4.195145,3.481556,3.427796,2.763831,2.212585,3.393974,4.366122,1.051957,3.609553,0.983803,4.479011,2.936070,0.578774,0.011102,2.330513,3.225111,4.842968,1.818614,0.256724,3.007069,0.838512,4.895423,1.939841,2.724738,1.313105,4.529336,0.364538,1.216180,0.203346,4.701155,1.763408,1.568190,4.170066,4.419568,3.160573,4.308543,4.732784,2.154832,2.629503,0.926106,4.469786,3.171217,4.669712,1.885865,4.875683,2.812898,3.653748,3.166788,0.224031,1.390276,4.670540,2.845916,0.471631,3.196595,1.913113,4.100821,1.099579,4.973221,3.985047,0.345650,1.087053,4.250709,1.176995,4.912394,1.953308,0.035070,3.453910,1.957344,2.996035,2.518885,1.949846,4.133060,3.873840,4.833407,2.326670,1.588708,3.850906,2.079404,0.254224,3.805164,2.468849,3.165705,4.492063,1.079656,0.139107,0.432729,2.152563,0.921217,2.962263,3.822610,3.242309,1.771149,2.124015,0.542649,4.314980,4.049905,2.365244,1.163447,1.010085,4.845853,0.420459,4.965320,0.340684,4.707919,4.221545,1.087241,4.112091,3.397182,0.067881,2.917129,0.231218,2.645676,1.450954,2.240252,1.534625,1.545961,2.013366,1.232272,3.438941,0.824172,0.411050,0.230784,0.029211,1.009858,3.444794,0.269922,4.362256,3.183484,4.565607,0.119997,3.405594,4.930594,1.883889,2.129808,4.066460,1.895835,4.162267,3.011781,2.018584,0.729821,4.798064,1.267446,1.102721,0.411051,3.134476,1.908858,0.632687,3.331620,3.518791,0.625725,4.117316,4.022729,4.745812,0.572363,4.228309,0.372427,4.412529,2.900647,4.734461,0.900270,3.860163,3.044350,3.352765,1.968781,0.897248,4.984210,4.155589,1.456436,2.529652,3.513622,1.139341,1.502995,4.541170,2.036503,2.025368,4.909309,0.736966,0.548716,3.182423,4.115858,2.294421,1.980364,3.998555,3.032355,0.262773,1.065891,4.040539,0.251776,2.544652,4.027159,4.919601,0.828447,4.961356,3.506207,0.593386,4.761566,4.228997,3.403710,4.403113,4.461228,2.147024,1.605772,3.939219,2.382315,4.643109,2.289332,4.219334,3.690597,2.001189,1.468634,0.905533,4.920480,2.263529,2.364135,1.535246,1.877158,1.217766,0.812959,2.354539,4.731276,4.081291,1.782125,1.466886,2.984929,3.887170,3.092069,1.975554,1.636684,1.071786,2.111840,1.540850,2.318026,2.185918,0.913835,4.657029,3.817428,1.036229,1.972805,2.711784,0.195183,0.852976,1.265458,3.015745,4.084417,0.849741,2.818359,0.547990,3.825548,0.425278,3.933656,2.654433,2.442124,3.333295,2.861826,4.515706,2.348926,0.249788,0.820553,2.672922,3.101821,4.303678,0.327844,1.152639,1.507591,4.216329,0.915924,2.533093,2.610417,2.876308,0.821849,4.141118,2.920147,3.207375,1.230266,0.400638,3.360255,3.773499,3.289450,3.511197,0.206796,0.898684,2.877823,3.284990,1.042458,3.248336,0.068595,0.595836,0.214144,4.269264,3.362602,4.991366,4.294714,2.472020,4.417508,0.462492,4.305261,3.320837,2.733468,3.156115,2.416715,1.034095,1.413195,1.920443,4.160468,1.999859,0.370810,2.870528,2.031151,2.081114,3.694931,1.508798,2.286944,4.250420,2.413056,3.692208,1.841920,1.901746,3.524506,2.775631,0.797409,1.883227,3.610025,4.446240,4.669780,4.108947,2.350800,2.170930,2.552409,2.849138,1.343653,3.375343,3.589537,1.280995,1.699259,3.063080,3.330910,4.751256,0.965054,4.406017,2.656105,4.340287,3.887795,4.846606,4.628571,0.846378,2.899820,0.142817,3.441421,2.707528,0.713907,3.332031,1.835447,0.472958,0.014958,3.031599,3.950551,2.369972,1.819593,3.780152,0.031634,4.031247,0.731565,1.467099,3.069187,4.029949,0.735402,3.301458,2.042379,1.281921,1.968708,1.923190,4.178529,2.684953,4.208273,0.830072,4.187979,1.554509,3.583145,2.494714,2.993724,3.212789,3.200686,4.666845,3.402877,2.880579,1.352258,4.169617,1.456689,2.320353,1.931049,2.586175,4.842593,0.216941,2.617774,1.024635,0.635451,2.500594,2.682060,3.491930,1.416779,0.070977,2.117459,1.485127,4.735693,2.247909,4.012196,4.857090,0.350723,3.346399,4.106390,0.044955,0.423074,3.134590,2.770739,0.485606,4.842493,1.417404,4.379334,3.522869,4.396983,2.998723,4.420362,3.501291,2.302983,1.147056,4.679681,4.003449,2.641198,1.223408,0.984603,1.793352,2.063360,4.061643,0.693151,2.747955,1.367505,1.212542,0.491195,0.762738,4.842332,0.455972,0.592050,1.766390,4.720928,2.882299,1.135049,4.609573,2.224503,3.336413,2.365258,0.025494,0.255125,2.743513,0.404554,4.199369,4.159535,3.159152,0.149466,2.934294,3.736134,0.285078,0.103799,0.026732,0.010054,1.057215,2.807566,0.074191,1.344950,3.927342,2.047181,4.326106,2.467691,2.629820,2.003493,4.406097,1.393448,1.317689,4.695262,0.711983,0.031736,3.452401,0.580603,2.668013,1.299145,1.631188,3.700292,4.483235,1.134014,4.409334,3.903450,0.505457,3.714773,0.409196,1.029745,4.378268,1.427478,1.490394,1.598246,4.934344,1.572580,1.470580,4.737068,1.119134,4.247497,1.472886,0.880498,0.130905,2.018284,3.222355,0.534553,1.938161,3.326728,4.309102,0.144544,0.287763,3.744607,1.089085,2.535152,0.078641,2.547111,2.859327,4.748442,2.759309,3.830027,3.299299,3.738381,0.076611,0.863640,4.749186,2.176443,1.451102,2.326326,1.538929,0.251020,4.479342,4.296798,3.339682,0.349975,2.366854,1.235140,0.816356,3.784465,0.250094,4.346667,3.729079,1.733169,3.122028,2.215546,3.869077,4.048925,2.810836,1.709694,2.069241,3.213559,0.415361,4.425758,1.275074,4.952371,1.392986,3.008515,2.009369,1.368995,3.443523,3.180014,3.396190,0.808829,2.925994,0.599731,0.912307,2.683497,0.570074,3.259588,2.437381,0.348739,2.499699,1.696420,4.736884,1.629281,1.437108,0.493523,1.208223,0.408299,3.471115,4.080511,3.432581,2.038279,1.622273,1.581066,4.079369,3.905495,4.562795,0.926364,1.806741,4.270054,2.173680,3.329488,2.552769,3.012870,3.889142,2.343155,4.298627,3.465229,1.187332,4.189649,1.612643,0.810537,1.657629,3.859631,3.670005,4.030600,3.283433,1.216945,0.013759,0.267071,3.810712,4.803021,3.301004,1.292381,3.926255,0.088341,1.720476,3.565121,3.505246,4.369085,3.406437,4.840570,0.463322,1.315399,1.517752,3.653433,2.438363,0.950383,4.555325,0.536326,0.648363,4.897115,4.260380,3.355272,4.139533,0.354529,4.707383,2.154945,0.229395,3.701849,2.920457,0.792496,2.160091,4.090734,1.038236,4.327885,2.829471,3.553170,0.180667,3.841180,4.641972,3.034990,1.027769,3.249046,1.610321,4.122828,0.883209,0.733606,1.826384,1.979259,2.397333,4.939945,2.442024,2.073994,1.011280,4.815831,4.288625,1.711003,0.492029,0.449831,3.995482,0.103402,3.643782,3.604422,2.790720,4.925524,1.195324,2.579025,1.891682,1.300030,2.348529,4.808267,0.914939,4.961315,2.781342,2.322191,0.518551,2.135321,3.101841,1.351805,2.659538,3.190972,0.334170,0.571871,1.148902,0.578294,1.176279,1.373517,2.309456,2.883388,0.560198,2.569001,0.844416,4.247824,3.998664,2.325639,0.489166,1.874559,3.567605,3.355071,4.290116,3.200607,4.996293,1.192198,0.083681,3.455330,4.167561,1.462935,4.460136,2.894501,1.999594,0.444095,1.649649,1.603090,4.326459,1.017256,2.705915,1.819084,3.885190,0.373494,2.668545,3.202624,0.955844,4.835956,1.713903,0.964492,4.066571,3.614025,0.046128,2.901006,2.949452,1.728380,2.213582,1.834229,1.991298,0.528055,2.730812,2.903082,0.115996,1.450585,1.888481,2.134421,0.868905,3.246660,0.974566,2.323623,1.672722,0.287752,1.795095,1.170052,4.017635,2.287671,4.138274,4.221118,2.793027,3.208410,4.320541,1.781195,0.991073,4.876884,2.987291,3.267257,3.371913,1.497655,2.271576,4.511410,2.256710,4.513332,1.532495,1.439425,0.906536,1.222737,2.876109,4.305292,1.730799,4.577574,2.247682,0.909063,0.263122,2.986806,0.743225,2.678506,0.194835,4.425799,1.345167,3.447773,3.066661,3.812584,0.077025,0.429018,4.147281,1.379528,0.433411,0.914875,1.909012,0.249150,3.656200,3.322287,4.571797,0.816510,0.900494,2.157605,0.709173,4.032864,1.047737,0.613367,0.635537,1.544807,4.929474,1.481503,2.732281,1.566292,1.660917,2.887970,0.217471,1.448535,2.650342,2.131066,4.533538,1.353676,1.578311,2.546906,2.688132,2.605094,2.811304,4.810259,2.874497,3.760803,4.198000,4.993265,4.402521,2.003185,4.185547,4.015824,1.456354,2.256297,4.327480,0.671520,4.572225,1.125928,2.617240,1.699005,1.413314,3.423372,3.974140,0.550036,2.073888,2.769450,2.905572,1.980941,2.073417,0.476682,1.252857,1.438051,2.155107,3.502189,2.226037,4.109176,1.429609,3.482633,1.631333,4.590868,1.463960,0.296961,4.895850,4.499221,2.008666,4.445031,4.142720,1.155223,0.838128,0.290290,0.941608,1.247457,0.169549,2.213400,4.218362,3.259307,0.395580,4.222041,4.707201,3.568962,0.184875,3.382824,3.026235,4.347658,2.373911,3.488381,1.422594,1.760207,1.248521,2.517499,0.900502,3.655248,4.559846,3.735630,3.855179,1.385416,3.095970,3.360009,3.994243,4.690820,3.371968,2.166586,1.051024,3.626674,0.709623,0.032676,2.934182,2.322220,2.852933,2.789034,2.883965,2.509397,2.991873,0.665861,3.283832,4.950480,1.341745,0.295175,0.230388,4.819623,1.958067,0.742511,2.496462,4.932835,3.436761,4.289712,2.524970,1.981042,3.659073,4.055181,0.884279,4.526573,2.140343,0.470448,1.185287,0.287346,1.896933,0.113169,4.150699,3.650707,1.585733,2.034762,3.981387,3.539982,3.567874,4.620974,1.319642,1.739425,0.638942,2.085246,3.396647,0.495308,4.026770,3.714259,1.034328,3.011615,4.265201,0.025325,0.911058,1.213476,3.365281,3.075599,2.042436,2.155541,3.616127,2.853986,2.294406,0.090708,4.608714,0.792765,0.213122,3.652332,4.078674,2.037735,2.891314,1.435153,4.833338,3.370268,1.098260,1.858688,0.216983,1.947170,4.778346,1.099238,2.774657,4.394049,4.562131,2.430730,3.814521,4.607998,2.187794,4.514185,4.405970,4.643137,4.574773,1.549470,0.239588,4.495795,1.992647,3.132845,1.653838,2.445970,3.850903,4.175092,2.250693,3.239440,4.164212,4.119381,2.661111,4.218306,3.391596,1.885858,3.960113,1.961036,0.336127,4.586360,4.692722,4.888247,3.285049,3.413075,0.432076,3.775538,3.118698,3.560175,0.637360,1.351536,4.493657,4.214899,2.742154,2.995666,2.733311,4.295205,3.030765,0.719508,0.248674,1.025555,2.217933,4.462979,4.458527,2.826777,2.670193,4.270150,2.505636,0.813507,2.813037,2.173799,1.676321,3.377255,0.027246,1.909999,1.233367,1.500380,3.796204,0.509876,0.169951,3.118185,1.832932,3.251991,1.837288,0.447642,3.831609,2.446193,0.943288,3.374976,3.244397,1.972702,4.742076,2.503453,3.539023,2.202543,4.939701,3.338717,1.943117,0.122491,2.985707,0.085255,0.972181,2.438773,4.200219,1.837450,2.533283,1.766579,3.065723,2.167600,1.637865,2.154420,3.668105,2.244985,3.779846,0.486132,4.923054,0.901621,1.035524,1.622028,1.008920,2.091188,2.568670,4.130019,2.215687,0.749272,2.310211,1.340762,0.373614,1.013402,0.598885,3.449531,4.125163,3.865587,4.090703,2.570784,2.239538,3.568260,0.119642,4.192118,3.441913,0.081635,1.830456,4.569020,3.262255,1.909571,4.532116,3.130162,2.715647,1.790827,0.731971,0.498838,2.033056,1.172796,0.573196,2.140684,3.603700,3.336962,3.330831,0.673033,1.793033,1.253042,4.121297,2.748855,1.055469,0.511281,4.627208,1.855050,1.321136,4.734559,4.704976,3.390190,0.594345,1.131427,1.498435,0.774591,4.893780,4.273298,3.630845,3.342256,1.303489,3.416786,2.253408,4.351715,0.808075,4.909929,1.551439,1.986945,4.848684,2.912441,1.710312,2.549100,4.255965,0.654721,1.765361,0.672730,1.856953,1.468338,0.697377,3.708731,4.243886,0.635879,2.412448,4.430601,3.717018,0.012423,1.664588,1.347687,2.125509,2.632951,2.345877,3.224439,3.221669,2.116146,4.235773,1.755861,3.472284,2.224202,0.487891,1.180111,1.764692,2.242429,4.172807,1.239522,1.652677,3.512826,0.488251,3.490442,3.485577,2.941277,0.079592,4.493241,3.400445,2.940065,2.062906,2.082595,2.892641,3.549270,2.780369,0.828864,2.653854,3.643068,1.645251,4.420537,2.570031,0.028502,2.514987,4.003456,3.723304,0.507140,4.207422,4.591327,1.568285,1.754197,0.830857,2.269726,2.437851,0.457265,2.184758,4.023876,2.719213,4.403074,0.644687,4.382923,0.024356,1.325774,1.324273,0.425126,3.936177,4.345578,2.397426,2.510675,4.425045,2.452942,0.958886,3.579071,2.866142,3.152023,2.271220,4.385520,0.686504,2.234328,3.325769,2.809739,1.707513,0.496823,3.170175,4.885527,4.094547,2.693311,4.880930,4.807472,4.694504,1.216143,2.825740,1.926648,2.008048,4.260904,0.090528,4.535702,0.723778,0.525062,4.942541,2.368573,2.612969,0.477119,3.285554,0.722863,1.930761,0.670234,3.653136,4.782958,4.523546,3.323971,1.373274,2.587153,1.611300,3.119494,4.461676,3.758661,0.746945,0.218350,2.504639,2.897663,4.046190,2.526505,4.642784,1.643710,1.035260,2.406911,2.188020,3.716556,1.461561,0.779454,3.171803,2.724728,0.056222,2.262737,1.846880,0.274876,2.838697,4.537632,1.959049,4.088333,2.213703,0.724777,4.416135,0.927570,1.071030,1.724809,0.333157,0.335809,3.780254,0.914528,3.762223,4.575966,1.075051,4.112368,4.530585,2.533366,4.692447,0.141577,3.145661,2.470127,3.344988,1.752377,3.503513,4.516568,1.848661,4.769941,4.829610,2.522133,0.033365,3.466270,3.507676,2.048977,0.100190,1.509763,3.626040,3.286474,2.567216,3.926385,2.709499,4.516254,3.475032,1.198932,4.520447,3.043247,4.609877,3.824622,2.840644,3.834582,3.736676,2.254918,3.880564,4.338008,3.239011,4.830185,4.920351,4.742551,4.304553,2.512461,3.923382,0.493254,0.702230,2.239594,4.902884,0.773547,4.659346,3.744706,0.578708,4.004783,3.440825,3.804241,2.177224,2.034256,2.085298,3.060534,0.552049,1.034342,0.802239,1.041280,4.665276,0.280961,4.600847,4.740690,3.265588,4.933232,3.358367,1.346865,0.909622,4.481409,1.833964,3.640321,1.277463,3.029116,0.743346,2.122835,4.976154,4.840637,1.381596,0.956449,3.575717,2.306911,0.753953,2.030962,0.132385,0.754378,3.903033,2.474147,3.901510,0.386278,0.036438,3.820011,2.116801,4.848520,1.652665,1.603910,4.044913,0.941036,2.942967,1.394645,0.185904,4.531021,1.847066,3.950320,4.112097,3.407258,3.132199,0.918145,2.028080,2.560212,4.446482,2.605351,2.425984,1.918555,4.324071,4.668191,0.571881,1.918962,4.773899,2.116783,1.235174,4.023270,2.061694,3.808532,2.982800,1.626953,0.948374,0.694019,0.518475,3.094153,1.517692,3.699402,0.754632,0.011082,1.620931,4.253622,2.812066,1.091318,0.681235,0.037221,2.486630,0.262462,1.018117,2.775014,0.222313,1.149230,0.067871,2.666914,0.632850,0.297879,1.842415,3.579783,4.308580,3.851151,0.914410,3.654383,1.717222,0.952685,3.152037,1.498354,0.013444,4.132017,0.991475,1.213338,2.108917,3.464113,1.788427,4.983510,3.124252,0.561380,2.092555,3.052061,4.881507,3.647986,3.741380,2.625646,4.653045,0.309974,2.731658,1.086176,0.363848,4.605515,4.567030,2.286392,2.396960,0.719365,1.590157,2.598823,0.037579,2.553715,2.670885,3.637934,0.991816,3.850977,4.973209,0.566171,4.273463,1.095757,1.464060,2.260997,1.081813,4.200873,3.351706,1.966783,2.869157,2.986022,3.699633,4.460044,4.002962,3.901538,4.650078,1.584803,3.429584,2.968179,1.514993,0.811087,2.949043,2.486487,4.627123,2.545763,2.772187,3.365280,2.007635,1.981044,2.430286,4.225065,4.967855,0.226975,1.777893,2.732813,1.104626,4.510600,3.631885,2.831612,1.998963,2.349681,2.175871,3.549843,0.128402,1.913683,2.924938,1.201374,4.277918,3.166275,2.294059,4.798165,4.338379,3.071841,3.197476,0.128914,4.870055,2.381656,3.548019,0.713017,0.007137,4.013458,3.063416,3.203565,3.707904,2.946931,4.607309,0.551775,0.396458,2.536999,0.127857,2.225024,2.620203,4.198579,2.903040,4.853422,0.220234,2.117826,1.001447,0.914513,0.697611,2.678986,4.727212,0.808354,3.878857,1.362108,3.703441,0.747486,0.524881,0.176150,1.552621,0.508641,1.862256,0.992190,4.056530,3.432454,3.394304,0.100198,2.555917,0.214455,3.672969,0.130458,2.386215,2.364627,1.958054,2.842933,2.700793,0.969907,0.567586,0.467327,1.820871,3.835721,2.353149,2.778831,3.657794,2.630787,0.428372,3.824940,1.828644,3.324625,2.681324,3.068645,2.070235,2.099706,4.452013,0.665702,1.763249,3.800974,4.175616,3.256418,1.664125,4.565516,3.787736,3.546885,2.955907,2.369607,3.956548,2.394594,2.935915,2.280084,1.628724,2.584637,0.924622,4.108530,4.493237,1.532629,2.852976,0.598253,3.766677,4.860936,4.895907,4.688080,4.004414,2.714550,2.471315,2.482200,0.068836,3.458774,3.505730,0.311021,4.333176,0.541358,4.047731,3.810803,1.050008,0.030593,3.100687,0.186052,1.906295,3.248415,0.252351,1.650605,4.465660,4.096941,2.307382,0.609626,2.843339,1.596184,3.396535,2.520645,2.222803,3.459614,2.082758,3.260881,1.185014,1.421908,0.359974,4.118097,2.495476,3.863512,4.497955,4.888757,2.380623,3.804481,3.056288,4.050258,4.686236,2.596353,1.796252,0.325610,4.825671,2.040552,2.256538,3.915993,4.628304,3.866347,0.613987,4.616010,3.838566,2.932279,2.551214,2.136717,4.929145,3.773994,4.909237,4.087434,2.786210,2.158366,3.848914,3.495484,4.525628,1.835660,3.924409,3.163739,0.088434,1.401119,3.603626,3.264159,3.695709,1.964416,3.392588,4.366022,3.532979,4.455187,0.549960,4.537404,2.324520,0.089872,4.862351,1.597916,0.460177,1.842134,3.160943,2.688743,3.085716,2.828402,2.484270,1.153742,3.790023,1.401572,3.493528,1.422211,0.713933,4.691168,2.611002,3.943648,0.679878,3.851917,3.419943,4.463469,0.493524,3.106227,4.397543,4.892705,0.407621,3.226488,2.172599,3.344946,3.806181,4.338089,3.800371,3.869952,0.353430,4.679078,1.989340,1.880334,3.559299,1.110582,0.581773,1.068421,1.146504,2.410150,4.213395,2.425500,2.161047,1.977638,2.364129,4.341697,0.008861,1.225154,4.203311,2.325434,3.731603,3.357133,3.289845,2.314241,4.943682,1.616558,3.253310,0.896072,0.898850,4.370500,3.968137,4.859377,1.355204,2.697523,1.536290,4.919711,1.897667,1.084161,3.736676,0.796488,2.427792,4.134247,2.859979,4.305162,2.507010,0.425467,4.306063,1.670957,3.493904,3.360485,2.652735,4.356825,4.392504,3.605208,2.214645,0.328387,2.398670,2.906129,0.731971,2.364968,1.995611,0.428658,1.936230,4.794606,1.902300,0.772966,4.555070,0.363089,3.518846,1.825066,1.442110,4.652114,1.532344,0.752384,3.281822,0.330661,0.685544,2.221184,2.034028,3.305971,4.969080,2.581099,1.046025,1.883171,0.700630,1.562272,4.916640,3.534734,3.016693,3.531973,4.115805,0.438811,4.478663,4.629033,2.849236,1.463598,0.223267,2.953562,2.651902,1.781115,0.275351,1.326686,0.883104,1.396888,2.923237,0.110881,3.113296,1.712135,0.547844,1.964338,4.020101,4.975034,3.236498,4.860408,2.304149,2.241166,1.237054,2.207213,4.654211,0.922849,1.719568,2.103501,3.103997,0.590015,2.419235,3.484351,1.356803,2.126125,0.468922,2.534177,0.287096,1.650219,0.949994,1.330519,3.053143,4.938878,1.733934,3.324901,0.274568,2.327858,0.578140,4.772271,3.675938,1.888083,1.563167,3.380770,0.820402,4.263028,3.517265,4.734006,0.397107,3.437242,2.411991,1.724115,3.063671,0.997086,0.795087,4.478795,3.699947,0.893952,4.728321,0.206432,0.643761,4.618374,0.045850,3.598204,3.170563,3.729538,0.292462,1.167402,2.675827,3.578390,3.895924,3.572271,3.873198,0.866885,2.917560,2.897806,3.341259,3.640560,0.449879,0.386836,1.418897,1.795346,0.372422,1.759702,4.213229,0.726857,4.737448,1.600467,2.682627,0.591142,0.117945,3.820255,4.579252,1.956604,0.177116,2.936641,4.125917,1.748099,2.641967,1.760624,4.472311,3.035048,0.933324,2.400747,4.416606,3.485407,3.743265,0.426321,4.857496,3.655882,4.293118,3.794080,3.628357,2.896140,1.122937,0.440953,3.263861,1.057434,1.534586,2.100208,1.242401,3.881474,0.455034,2.910501,1.688590,3.611306,2.356790,1.108627,1.473744,0.315306,0.040723,1.142380,0.317560,1.766916,3.199005,3.437301,2.780185,2.476884,1.547991,1.710399,4.156213,3.243594,3.588693,0.018571,4.643296,1.472781,1.315732,3.990113,2.889129,4.112546,1.733104,3.913752,0.320663,0.007202,3.568679,1.528620,2.268861,4.005928,4.994513,2.636230,0.328246,4.951606,3.912231,0.168701,0.554707,4.761035,4.471042,3.656000,0.020207,2.231033,4.051089,2.846993,0.806582,3.416241,2.028915,0.368739,0.907258,3.199531,4.776359,2.839809,0.557025,0.204066,0.761196,4.302946,4.524620,3.627535,3.090649,0.402394,1.293269,1.103246,0.751720,0.097718,2.549033,4.833391,4.144256,4.036753,3.616979,2.136252,0.524600,1.314716,3.299363,3.362585,4.661696,1.617053,2.572422,1.906427,1.393373,2.915557,3.138146,3.821937,0.788682,1.033249,4.032718,3.478786,3.684127,1.994115,2.262197,1.937909,0.538885,0.946194,2.949864,2.009026,3.112667,4.154024,0.417573,3.994436,2.665341,4.915512,3.256115,3.027801,0.334716,4.751575,4.476172,4.183389,4.242530,2.652035,1.435660,0.664609,3.975606,4.842157,3.400878,3.710718,3.702818,1.681511,4.681438,1.753543,1.206498,2.510873,0.661840,1.681221,1.904377,2.075648,1.007661,4.940096,1.626844,3.885981,2.580279,0.028504,1.579832,1.859529,2.917862,3.715141,3.596886,4.265525,3.799288,2.636325,4.956175,4.016399,1.660693,2.005457,3.165355,2.940898,4.914467,3.107458,0.034986,4.932360,2.633231,3.873987,0.022155,0.877349,3.094620,1.131050,0.279091,3.783737,3.725806,1.495763,0.927973,0.105310,0.275527,1.333604,3.488334,1.810718,3.026005,2.155357,4.448565,1.926086,4.670220,3.374948,4.083779,3.282239,0.202131,1.102623,4.770122,3.318836,4.420490,0.517966,4.462439,4.935837,2.757720,0.155183,3.717804,3.871430,2.872149,4.031822,2.761803,0.436493,4.604845,2.630580,4.536762,4.300921,0.739591,2.054850,1.553914,0.169041,2.528031,0.614381,1.418279,1.117257,0.311867,3.637430,4.682927,3.723771,4.068481,0.111293,2.708275,2.144102,2.319989,3.888259,2.428921,4.394468,2.479784,4.908585,3.665998,3.631514,3.803528,0.262311,2.845737,3.693270,3.884104,2.265293,4.441523,4.540613,3.637287,4.281249,2.176166,0.607800,2.280137,1.347488,2.239625,1.722603,1.655860,2.793846,0.895625,2.094959,1.306523,4.997812,2.075889,2.254332,0.334997,0.314216,2.587341,4.678187,3.630057,4.847619,3.092612,2.763322,1.084985,0.172448,1.675248,1.014131,4.798475,0.183160,0.214752,4.409705,0.569513,3.504380,3.405266,1.791899,3.686167,1.775290,3.153387,4.318531,1.534650,0.264741,0.860521,0.122464,2.568282,4.678810,4.530437,0.492285,1.178113,3.155244,1.719982,1.576082,1.641037,0.024683,0.510842,1.200471,3.260262,4.709013,3.574195,3.967267,1.171628,0.675058,1.918410,0.596142,0.769413,1.597708,4.093117,3.897330,1.798034,3.641245,4.210613,3.517776,1.400210,3.993739,2.626201,3.024879,0.339053,2.375300,3.357223,4.146336,3.127679,2.889080,3.622922,2.937344,2.130868,1.690626,0.592099,3.808429,2.617765,4.584679,3.909220,4.336071,0.222617,0.634641,2.303662,0.700793,3.333010,0.744013,0.756174,1.927854,1.795238,2.594924,1.763847,0.958329,4.190568,0.318054,2.847708,1.971071,4.114896,3.513031,0.066433,1.496334,2.210105,4.219153,0.794193,0.576084,2.131993,2.155982,3.500446,2.788014,0.437372,1.452961,2.837935,1.080691,1.084841,3.742688,3.705303,4.141211,1.269067,3.575490,3.114384,0.683333,3.071138,3.575507,2.646789,4.607615,0.250732,1.789572,0.782427,1.290454,2.284260,4.858476,2.911933,3.037576,4.164944,4.997658,2.449126,0.623138,2.763086,0.262347,3.269189,0.319467,1.816444,0.043536,0.205204,0.882036,4.712523,1.771008,2.914126,2.062936,1.322052,0.793939,3.784173,3.548845,0.903426,0.591502,1.321867,3.032301,1.503465,0.625140,4.313211,4.263093,4.637923,2.014909,1.971293,4.068523,3.851863,4.347947,0.706502,3.638027,1.907155,2.564470,0.193725,2.841734,3.348061,0.238980,4.187418,1.795812,3.285777,0.076448,1.137436,3.447620,1.118884,2.147667,2.186669,4.635733,0.964330,4.414259,3.893472,3.115082,4.152013,3.338640,4.017951,3.380205,3.881507,2.113474,4.222963,1.656552,4.482535,4.114388,2.166686,2.174438,1.974521,4.655310,1.823859,0.042233,3.477222,1.473089,2.750323,1.746280,3.968330,2.690176,4.526269,0.700775,3.187678,4.331401,2.849723,1.538416,0.860139,2.959518,4.969814,0.238559,1.137307,1.627202,0.545363,3.897732,1.051222,2.291883,3.979997,3.050548,0.390961,2.618906,0.754339,1.179345,0.079985,2.573736,4.703279,4.797285,3.955951,2.070329,2.222308,1.652152,1.801996,2.236049,3.859903,1.433541,4.570186,0.456829,4.900417,0.573796,3.417600,4.387168,2.349847,1.833379,4.593000,3.863928,0.187574,1.042897,4.243884,2.953089,2.433848,2.435707,1.319725,4.426216,0.630892,1.068015,2.278350,2.527574,3.434029,2.484626,1.656548,2.459842,4.474276,4.847095,1.530558,3.104489,1.032346,4.666241,1.433007,0.682511,2.096157,1.362907,4.860008,4.308972,3.985412,2.843717,1.086528,4.672879,3.709474,2.678869,0.202228,0.863910,0.529309,3.665330,2.565124,1.216823,2.619446,0.039159,0.685109,1.655926,3.748519,4.297448,1.760587,4.984210,2.387462,3.825350,3.780145,1.249239,4.576652,1.873095,2.413784,2.624733,3.387688,1.409196,2.448003,1.791237,2.079469,1.237618,0.966836,2.780760,2.498659,3.820226,1.056261,2.571000,3.592894,1.831618,3.188617,0.846930,3.788016,0.526154,1.018148,0.101683,2.137053,4.333953,4.429116,4.067081,4.238034,0.729049,4.522177,0.145224,1.536683,2.175071,0.043506,3.817091,4.497281,1.413925,1.124750,4.189352,1.611152,0.585500,4.389093,2.927537,0.176313,2.866081,4.572168,2.196540,0.311156,1.547894,1.906346,0.927836,1.770747,3.398121,4.814085,3.838699,4.407596,3.577905,0.258150,4.852219,3.724010,2.270959,1.985047,4.482344,0.227348,0.542386,1.118670,4.906020,3.149569,3.179284,1.109892,0.254257,0.759830,4.809787,0.213507,1.314616,4.934408,0.320328,1.681108,2.589446,2.755328,4.507469,4.947706,2.249111,0.307870,1.918760,1.212788,0.375933,3.312283,2.209567,4.909924,2.833858,3.318792,3.428204,1.334536,3.306478,2.694178,2.308969,2.898857,4.216944,0.626151,1.172427,0.384504,0.524011,2.096185,0.828726,0.696138,0.654617,0.568019,0.969326,0.085933,0.254493,2.729300,4.464604,0.382336,2.074150,1.713108,4.891933,3.323803,2.105794,0.402069,2.996168,3.331102,2.514516,1.631629,0.966405,3.380562,3.320813,2.856291,0.046856,2.720479,0.922061,0.597843,0.294127,4.629014,3.081295,0.210418,2.184339,4.346411,2.888278,1.230245,1.721107,0.878659,1.660652,3.733115,1.591773,2.578248,0.365704,2.809280,1.622652,3.637450,3.091121,1.763266,4.756493,4.381571,1.385639,3.327934,0.200256,3.130980,4.952459,0.360180,2.782955,1.925595,4.113656,0.538906,4.807299,3.610989,1.425609,1.227387,4.201278,2.401600,0.278772,3.925797,3.131909,2.465497,4.167689,0.371807,2.518688,1.480151,2.558775,2.806207,3.597615,2.144631,4.504685,3.950496,0.040420,0.550858,3.569518,1.483634,0.724059,2.814185,2.969454,4.431863,0.661521,1.999340,2.517675,2.437390,3.094454,1.947350,1.162113,2.751228,2.031862,3.233262,2.920561,0.236032,3.906746,3.169763,3.616467,2.776372,0.287930,1.422165,4.450774,3.118894,4.942346,0.263191,0.410285,0.783465,3.227481,0.216553,3.214083,1.352066,2.690707,4.228741,3.559141,3.918622,0.860410,2.293402,3.191065,2.751095,2.050585,0.630083,2.411147,1.658529,2.731925,2.006788,4.429166,4.977480,0.653677,1.590125,0.725648,2.276715,3.861261,3.065634,0.937129,1.613499,0.611665,1.433736,1.174117,3.013528,3.200516,4.837240,2.220873,1.016463,2.002688,0.885613,3.088865,1.779000,1.642951,4.388189,2.901209,0.121296,1.833557,0.597065,2.264601,0.532531,4.999278,4.791303,1.673872,0.492887,1.202614,4.271773,0.905182,3.001521,2.887947,4.490038,4.733222,3.451546,2.604440,3.173372,4.611818,0.626518,2.343188,1.920533,3.318936,2.644677,0.824896,1.533439,4.572899,1.243567,2.912326,3.084081,4.555005,3.641630,4.310914,3.616435,0.525916,0.128502,3.582277,1.322716,4.138581,2.848955,4.976784,0.808438,3.659358,1.622829,0.837337,2.324130,4.095908,4.969708,0.869265,0.679243,0.683809,3.955527,4.603273,4.067217,4.034101,2.955960,2.865902,2.733988,0.713532,0.657749,1.891241,0.523340,0.415643,0.294277,1.954702,3.778754,3.631744,1.413739,0.311243,3.789266,0.519445,1.599815,2.018207,2.398838,0.212353,3.348151,0.900761,1.422618,1.959418,0.195729,2.314473,2.814973,2.548998,3.320134,1.005132,3.843897,4.094334,0.426563,3.234750,0.470999,3.482969,0.751081,1.266116,3.189049,0.658271,2.149999,0.028549,3.012501,4.305556,1.427791,3.879975,2.426044,0.144276,0.671939,3.128448,3.936055,3.906524,4.291454,4.823975,2.210105,4.798614,0.133667,1.300039,2.111471,3.481660,1.473704,4.838905,4.098591,2.407513,3.961391,3.645874,4.960164,2.985158,0.131392,0.949690,3.371079,2.111625,0.594758,1.997478,2.309485,0.942660,1.372869,0.259014,2.877217,2.915842,1.302904,0.153966,3.666962,0.550721,1.466236,1.939972,1.691397,0.063084,1.459615,3.686992,0.708997,4.890635,4.648678,0.643423,3.392809,1.763535,1.122857,2.739121,3.778651,2.472626,0.601145,2.111282,3.251241,0.547322,1.844162,2.230094,2.524307,4.623786,3.863634,1.403040,3.104114,3.365795,3.493680,1.325446,3.444355,3.118807,2.254857,0.531139,0.313455,2.657263,0.756706,3.772634,2.882197,0.564207,4.417247,3.811251,0.129660,3.256778,4.026124,3.005795,3.411480,0.618287,0.343808,1.620786,3.028956,4.141649,0.433977,4.554936,0.413259,4.206473,4.627804,1.287580,1.336233,1.069757,3.911700,0.042711,0.572733,2.005554,2.679718,1.348846,3.143944,1.376684,1.107517,4.021255,4.722230,3.549459,3.135103,1.448067,4.135568,0.138265,2.252974,3.856901,1.725928,1.683837,1.011381,4.581572,1.544133,4.009997,4.212140,2.796159,2.857010,4.699417,2.747513,4.140423,0.712530,0.018324,4.497476,1.507814,3.163062,2.538595,2.929259,0.094971,2.852819,3.904040,2.934968,2.170551,2.886694,3.451632,1.380651,0.256497,2.080016,4.908245,4.158923,0.842872,2.530066,0.912830,3.744016,0.994517,3.153355,3.521223,3.656795,3.859876,4.546857,0.218534,0.218774,1.732185,3.283721,0.611000,3.094934,3.554632,3.494689,3.560579,1.176014,1.885678,1.580688,3.752135,1.299228,3.567480,3.273840,4.176115,3.418513,1.347606,0.012922,3.127074,1.874598,2.866795,4.534932,3.480658,4.968599,3.179619,3.111868,3.129108,3.506504,3.849522,4.658017,4.472213,4.693558,1.179912,3.490710,4.042155,3.466316,4.025375,3.362146,3.572945,4.061051,1.627636,4.232240,0.878268,2.138144,1.784828,4.545163,3.543320,4.710022,3.900966,3.341552,1.180604,2.741250,4.133963,2.639842,1.892866,0.216843,2.503544,3.857604,2.302248,3.427630,1.891864,4.847027,4.964362,3.000131,2.654899,4.465309,1.371442,0.050820,2.851724,2.581442,4.388647,0.927836,4.554315,0.517450,2.274341,3.133748,2.753925,0.324643,1.098908,0.081268,1.611250,4.124833,1.138179,2.657561,0.147866,0.285281,2.982413,3.193453,3.801853,2.911762,3.001671,4.922024,2.296180,0.175465,4.028840,0.307401,1.158422,0.428886,3.968180,0.314641,2.650322,4.588076,1.975833,0.905234,2.890545,1.321927,4.471709,1.391594,4.167694,1.113397,2.902056,4.378059,3.332708,1.317733,3.034662,2.359326,1.895803,4.226475,4.329097,4.298664,4.785536,3.931115,4.828719,2.718890,0.246032,1.756074,0.696121,4.865177,2.374857,4.502463,1.989154,2.372901,3.196574,2.883826,4.101575,1.844513,2.368577,0.500997,3.399970,2.152965,4.145220,1.078191,3.548833,0.100272,1.869607,2.914845,2.987508,1.552401,3.604573,3.882633,4.161809,4.609716,2.433791,3.386165,3.088940,1.023778,4.076494,3.432280,4.202026,3.633651,4.741774,4.989893,1.944843,0.627305,0.773148,4.157128,3.979632,0.422620,4.600657,3.826925,0.033832,0.247191,3.746768,0.710050,4.833171,1.614030,2.137890,3.207081,1.400302,3.554005,3.570830,2.183686,0.303121,0.395974,3.345134,0.384506,0.851250,3.517296,1.806438,3.613615,4.367961,1.699767,4.171537,2.041871,1.382453,2.723415,0.479153,1.089981,0.938562,3.864371,4.068894,0.288461,4.099135,0.740282,3.643173,0.802952,3.585776,3.814141,0.285665,0.604540,3.702172,1.505750,3.973699,0.117073,2.205234,4.235098,2.389183,4.883928,0.378660,1.529255,3.070819,2.508817,1.098044,4.254278,3.922280,2.166753,1.837333,4.988637,2.886486,0.526591,4.867709,0.090323,2.527332,3.941581,4.850285,0.400443,4.248085,0.119407,0.473258,2.633249,3.810832,0.067143,0.344381,1.979768,4.191250,1.819814,4.518043,0.519199,4.797684,4.801820,1.741635,1.325726,2.351775,2.693018,1.902512,0.268144,3.408705,1.201945,3.488067,3.805107,2.815149,3.652988,4.691985,4.630804,2.050658,4.170675,2.730172,1.100640,2.761737,2.590902,2.504409,2.474341,1.101983,0.258464,4.879970,3.587057,1.615234,0.070845,1.210326,4.601823,0.056644,0.927079,4.340221,3.917028,1.576162,1.964237,4.087340,3.862077,1.283171,0.088597,0.909454,1.940020,0.758824,0.237641,0.527172,2.562591,4.077117,2.051984,1.331482,2.846048,4.246115,3.949206,2.294459,3.004489,0.594763,4.130319,1.554631,0.171414,2.573389,0.447860,0.322459,3.554536,0.366707,2.301423,4.163423,2.168416,3.517144,1.310151,0.895102,2.590433,1.687509,0.120114,4.057349,1.269079,4.553997,2.992680,3.423613,1.067721,3.614890,0.918948,1.735575,2.066735,2.395699,4.037403,4.935260,3.961331,4.710426,3.799017,0.234395,2.224135,2.543326,0.180783,1.418010,2.175977,0.305734,1.387591,1.444271,4.281154,2.383542,0.885050,1.582743,0.714947,0.226195,1.489424,3.216699,3.241537,1.259416,1.339143,3.587177,1.190557,1.409643,0.364703,3.116795,0.517675,4.196394,1.787347,4.839211,2.386509,3.945027,4.448233,0.640645,2.548084,2.400929,1.123903,0.905267,2.502206,0.976344,2.634612,0.521644,0.027659,2.412473,0.049259,4.115762,3.627097,1.047192,1.383311,0.511024,3.940963,1.241980,2.135210,3.004829,4.028887,2.446521,3.646608,4.571267,2.331244,4.997178,1.065689,1.647620,4.248970,2.144745,1.221176,1.190819,2.531402,3.277099,0.241012,4.947139,0.514521,1.462075,4.551965,0.847525,0.112407,4.287550,2.641153,4.863670,1.428609,2.716020,0.170931,0.223992,2.218550,0.508430,3.268010,3.754850,2.820536,3.966585,4.950560,1.564901,0.952383,1.688654,2.110536,1.260251,3.586398,4.347820,3.067162,3.698635,2.261091,1.128850,2.495129,4.883878,1.448492,3.532450,0.616375,0.014849,4.698972,0.843485,2.430876,1.190972,1.974943,2.127116,2.187543,0.344493,3.787859,4.146249,4.479812,2.487381,0.019948,0.422354,2.245112,4.650657,4.574235,2.819393,0.332657,2.140455,0.003874,4.437187,1.016682,4.404489,0.524055,4.762677,3.474544,1.717780,3.944489,4.153693,3.510964,3.014159,4.989097,3.019040,1.542933,2.492435,0.396626,2.655670,0.451047,3.760135,1.115414,1.517763,3.633031,4.758024,3.143354,2.966588,4.247063,4.344709,2.572100,2.865798,2.817865,2.037660,3.635623,1.021691,2.439317,0.109629,3.985279,1.496735,2.743757,4.783843,0.219653,0.456818,4.252731,3.029279,2.197225,0.872060,4.585059,4.499574,0.950452,2.219555,4.516813,0.541612,3.409358,4.113904,0.453425,2.034505,1.875566,2.932476,1.021187,2.405597,2.993053,4.937439,1.145629,1.489493,1.103985,3.540693,3.329872,3.853770,1.498460,3.277361,2.319957,3.668596,4.349790,4.207037,1.835446,1.899846,1.597288,1.007942,0.342113,3.523321,4.216234,3.984738,1.572230,0.318087,4.742114,4.231365,3.858634,3.654796,3.964945,2.779939,2.320901,2.962225,3.108922,0.629115,4.459206,0.161454,3.544194,3.341523,0.691162,3.385847,0.962440,4.005133,4.548107,4.889561,4.821360,3.155437,4.537661,4.969985,2.420468,2.306516,2.968195,3.266499,1.548200,3.154455,4.211807,0.415514,0.723135,0.417116,2.648601,1.811240,2.951907,2.447483,0.516615,2.891537,3.730753,4.121656,3.186013,4.464427,1.986661,3.400860,3.387669,2.885309,2.317805,2.379202,2.665048,2.525980,4.828984,1.131169,0.905707,1.705824,4.880251,2.680281,3.585808,3.230623,0.660779,3.958111,2.205309,2.925007,2.470238,0.878949,1.551659,0.607544,2.635823,4.016515,3.741066,2.435594,0.562405,0.773320,3.187570,2.696462,4.768090,2.164871,2.548713,0.820657,0.621423,2.695121,0.724304,3.143240,3.115245,1.369914,0.379652,4.621414,4.573547,0.304726,0.661484,4.149873,3.989795,2.838238,0.378640,4.275115,1.181865,4.254552,2.076037,4.245440,0.209742,1.639784,2.436454,4.533921,0.834958,0.685098,1.035687,0.446359,1.156435,0.788432,3.840961,2.448404,3.486687,1.387469,3.591247,3.829015,1.426541,4.551955,3.137667,0.727873,3.091514,0.425090,4.927934,3.652256,0.606068,4.907426,1.090908,2.238095,2.803060,1.938719,0.670796,3.278292,0.752700,2.410731,4.821502,2.555380,0.478177,4.178351,1.088074,3.954117,3.134750,4.608150,2.883716,2.432046,3.233400,4.220803,1.506749,1.838621,1.072788,2.946861,4.781144,2.098095,2.428416,4.364411,2.441707,2.964024,3.870813,2.905463,2.506896,0.103598,0.567247,3.433558,3.422474,2.517079,2.937070,0.650992,4.302299,4.504502,1.705994,2.233947,0.757251,4.680828,2.396434,3.282684,2.054648,2.609166,1.820456,2.583720,1.978341,3.654274,3.636440,4.114327,2.988946,0.160651,1.604077,1.541460,4.889390,0.725224,3.872753,4.341526,2.043311,4.735958,2.535761,1.572756,1.131901,2.573119,4.195759,3.708507,4.941266,3.044115,1.666242,2.239677,3.554936,3.853981,2.494318,3.053046,3.109985,1.744472,4.692142,0.317461,1.930836,0.445366,0.746436,4.933182,1.855904,1.034238,3.523443,1.605286,0.798620,2.580709,0.784173,3.470085,3.962055,1.718333,0.539003,1.546064,1.845363,4.319253,3.907799,1.905772,1.506882,4.441369,3.080360,0.027007,4.982035,3.508600,1.141583,2.606736,2.029108,1.716996,4.448181,3.226077,0.811936,3.753019,3.117960,1.747042,4.293477,3.933541,2.193985,0.353358,2.909628,0.759107,0.650127,1.624449,4.016657,2.549610,3.849328,2.631350,1.823138,3.083016,1.208151,2.284279,0.476244,2.570534,1.901086,0.511383,0.265273,2.978950,2.508472,1.575146,2.707973,1.398605,2.418788,0.998099,3.896904,1.735509,3.646326,0.917284,2.620945,1.016390,1.301921,1.712974,3.979297,3.481603,0.243513,3.870984,2.134046,4.146902,0.254418,2.165113,0.013962,0.017941,2.578411,2.839334,2.852612,0.150718,4.031273,2.483305,3.199824,4.449509,0.961059,1.481907,3.096791,2.468884,2.615524,2.021050,2.901511,1.119474,3.559588,4.793960,4.007392,0.775394,3.745039,4.627614,0.568464,0.925859,4.581639,3.304121,2.858430,0.477923,1.363815,1.848069,1.057361,3.236371,2.378365,2.908532,0.340105,3.445815,2.025046,2.154646,4.421534,3.612860,0.005496,3.983059,3.398039,3.734986,3.324521,2.265482,1.945521,2.929103,2.032420,2.669038,1.013698,3.368914,1.031645,3.878062,4.112166,3.717950,2.511650,1.475830,1.959344,0.447453,3.861245,2.848327,4.337593,3.600986,4.372122,0.306783,3.876602,1.847562,2.018978,2.353243,4.931649,3.910227,2.898584,2.291914,2.700917,2.470490,0.473582,3.530792,2.681486,4.382879,4.477978,3.329723,4.828518,3.850746,4.505136,3.469519,0.723594,0.461513,2.300158,2.097894,1.513617,0.749863,4.813024,1.158205,2.490085,4.096886,4.198489,2.585094,2.530948,0.714551,3.974524,0.394514,1.982028,3.052251,4.829756,3.283313,2.439840,1.502840,0.898548,0.047482,4.298909,1.561158,4.551189,2.669544,0.460149,4.075212,1.221685,4.885651,1.056209,3.882940,4.063461,0.814917,2.745993,0.278479,4.718973,0.812009,3.955459,3.068166,1.316788,2.341942,2.961116,2.311108,2.198218,0.498291,1.987584,2.604523,0.794739,2.278690,1.084858,3.711238,2.547435,4.505157,3.502668,2.832791,2.225097,0.355609,2.261891,3.248659,0.848843,1.517045,1.130086,2.306223,4.519036,2.763645,2.042228,2.080173,3.677166,0.463304,1.057850,1.360067,0.755431,1.874303,0.766062,3.961561,3.567416,1.916482,0.482797,0.252136,1.111190,3.923207,2.126187,4.805021,0.526376,2.160764,2.126249,3.631511,2.973657,4.337061,3.982810,2.000048,3.598956,3.603793,3.997081,3.681742,1.404374,0.154755,2.310704,4.322896,1.281175,2.430015,1.797682,3.699040,2.740156,2.030469,3.008158,1.074446,1.690696,0.808729,4.092886,2.582704,0.911759,2.335043,3.868545,3.210328,1.304474,0.774059,2.146925,1.966516,1.849342,3.980567,1.796868,1.303261,4.884052,2.288756,4.194905,3.096128,2.529074,2.557192,0.193199,1.683380,2.834551,0.437209,1.557067,4.393458,4.066471,4.304563,1.370107,4.125874,0.964634,1.957250,1.689852,4.773638,2.825180,2.925664,1.536610,0.163977,3.432101,3.833192,0.327305,0.541193,2.684231,4.794592,3.521749,2.872459,2.073862,4.472405,3.770317,4.783021,1.259874,0.195413,0.132720,2.580994,2.044802,2.261264,1.401976,4.130546,3.114393,4.124821,4.263518,1.215322,2.912916,0.239196,0.474205,1.268128,0.782634,4.809864,2.298122,2.989276,1.046470,1.607862,0.356241,2.592570,3.212365,2.862700,3.936057,4.472346,0.407448,1.542961,4.808453,0.447430,3.133977,0.923841,3.257797,2.674543,0.493502,0.460483,2.965364,1.408740,3.379568,4.211693,4.087985,1.457707,2.618615,4.672565,2.681524,1.918951,1.253828,2.657920,1.687606,1.286064,4.064568,0.658137,3.785587,3.875764,3.221130,1.730674,0.244943,1.689914,4.542144,1.022994,2.842838,1.070844,1.770681,2.168471,0.132881,1.289890,4.273929,4.966102,2.914997,3.894303,4.748204,4.770890,2.524305,4.934890,1.629098,0.283566,4.342482,1.289090,0.317329,4.609574,0.768574,4.914659,4.853461,3.197858,1.408809,0.775566,1.459491,2.723167,1.204144,4.174221,4.468551,3.273549,3.395824,2.620080,1.119907,4.436746,3.643060,0.217324,1.579824,1.253900,2.220099,4.216479,2.638426,1.324333,3.946150,0.925984,3.117702,1.564207,1.284544,1.370226,4.360130,3.584764,2.795628,3.153228,2.220336,1.922497,2.678328,3.346649,0.660678,4.649577,3.182259,1.361195,0.411703,2.867764,4.503160,1.799358,3.898982,0.557112,0.368545,1.542280,2.962807,2.991455,4.683351,3.366547,3.765408,2.034587,3.700344,4.843894,1.912358,1.192940,3.207791,1.230585,0.042810,4.670537,1.238703,1.232426,2.248024,0.701770,0.761993,3.657107,0.906929,0.138424,4.453589,0.923253,1.038522,4.298283,4.277107,4.564947,3.798845,1.744000,0.497214,2.785424,0.871197,0.622860,2.059129,4.946625,0.281223,2.102742,4.877069,0.010292,4.851281,4.613520,3.508381,3.369780,4.410862,3.125429,3.773414,0.005220,4.487461,4.653097,1.750657,1.716639,2.925918,2.443689,2.393079,0.006090,1.754362,0.433396,3.582767,3.106308,2.385400,1.158854,3.828879,2.362311,4.018414,2.617353,2.513941,1.217430,4.333739,0.559235,1.692738,2.984266,3.982466,2.577853,0.442962,3.297423,0.599574,1.986837,4.498924,0.967109,2.667089,1.489102,0.710759,3.476285,4.566119,1.390577,0.301583,4.836021,3.357898,1.107451,1.010399,2.379797,2.399538,1.967881,1.422020,1.586497,0.350603,1.057835,1.685573,1.046439,1.239589,4.888046,0.895332,1.967368,4.379636,3.310334,4.734269,0.511682,2.455379,4.840705,3.591350,4.237483,1.790732,3.100609,1.971914,4.600490,3.740142,1.826653,1.624136,3.818184,2.701822,0.051675,4.039921,0.432335,1.423724,1.107657,4.633011,4.228952,4.551147,4.530904,4.409943,0.890912,3.822369,1.620924,0.998028,0.879341,3.016468,3.515234,2.704405,2.764743,2.430631,1.926590,3.505623,3.593403,4.549877,3.530235,3.974820,0.876927,2.677625,2.157045,4.877936,4.605757,4.637261,3.189230,1.183064,3.264843,3.874843,0.720717,0.430965,3.412436,0.995109,1.526155,0.470617,3.025652,3.582449,4.194227,3.793818,2.453561,3.479899,2.458003,2.648256,3.590170,2.088744,2.574431,4.867464,2.151369,2.582374,2.227891,0.980400,2.891678,3.661058,0.298216,1.380580,1.171644,3.965468,3.923333,3.259879,0.045462,4.491889,1.332533,2.702233,1.352332,3.163044,0.464131,0.549555,1.163880,4.261101,2.619740,2.552319,2.220165,3.904084,4.135543,1.164032,2.037403,4.659384,0.100881,0.243801,4.011188,2.876291,2.882714,0.726927,1.792373,4.309709,0.830945,1.231838,4.232671,4.157434,0.943588,0.077419,0.225202,2.194273,1.766398,1.364245,0.613532,2.988093,2.348848,2.891291,2.679564,2.232584,4.932556,0.753874,2.214412,1.870401,4.146401,4.774129,3.247317,4.379968,2.205397,2.661855,1.361674,0.914622,3.228956,2.658544,4.133072,3.402172,0.861773,1.413505,4.144405,0.444452,3.227399,1.626904,2.963781,3.438023,4.853207,3.752147,2.612986,4.498085,1.544893,0.217512,2.180898,2.278213,4.287662,1.404333,4.247153,2.251440,4.411679,0.472083,1.484244,2.543923,2.295851,3.672348,0.515489,4.535669,4.267401,0.128943,0.168959,4.822918,1.991756,2.245574,0.622754,0.542194,4.049536,0.668153,4.742232,0.928641,0.039999,1.585447,2.283382,2.485910,1.632621,4.951055,1.734491,0.158264,0.066481,4.073524,2.608134,4.973343,2.186883,0.711461,2.958013,2.093103,1.037126,3.111729,3.178963,1.721852,0.555174,4.632189,2.977148,0.848483,1.488443,4.818595,2.822937,2.825639,2.562321,4.172300,4.854193,3.321176,3.950652,4.538733,1.522901,3.856314,3.645072,0.853680,4.886836,0.314473,2.897096,2.781318,2.679274,2.086259,4.554250,3.078698,0.272643,4.961939,2.376993,0.385707,4.200878,0.609939,3.961051,4.882765,2.688684,2.437626,3.110569,2.165190,1.861906,3.719241,0.271425,2.487974,2.550085,4.405818,4.636252,0.725572,4.434261,1.473414,2.091702,2.509263,4.259740,2.170945,4.476113,4.281046,4.650516,1.613964,0.655230,3.015659,4.997109,3.183656,4.623595,1.649491,2.563231,2.081049,1.678820,2.734672,4.921831,1.336466,1.363722,2.549813,4.577877,4.421762,3.767905,2.697089,2.878962,4.636492,4.262931,0.697054,4.223262,4.641824,4.684250,0.005567,1.075227,0.786897,2.688264,2.741371,4.486646,4.450456,2.950330,1.446389,1.787395,3.114760,0.512139,3.542814,3.745149,4.583828,0.377252,1.820000,3.966832,3.025301,4.244465,1.884888,3.694864,3.979402,4.458443,3.390748,0.345089,4.306633,0.353491,0.141958,1.463450,2.937037,4.680822,2.605504,4.501622,4.001330,2.390226,1.275804,2.615477,2.562914,3.400760,3.360336,2.312105,0.075305,1.521251,0.537109,2.548510,3.740693,1.417440,3.470604,1.921584,3.359347,3.660371,0.497636,1.242833,2.964929,1.452080,0.371558,2.804461,4.973836,1.064414,0.032105,1.143076,0.838428,2.692739,1.609917,1.320883,4.678173,1.095846,0.364453,1.460856,2.358243,0.875182,1.940980,1.721932,4.763891,3.388454,1.922044,2.507977,2.537350,2.604504,2.644817,3.440214,2.267136,3.688475,2.001478,3.706213,1.669418,2.935390,3.961930,3.051277,4.144968,3.472381,2.446686,0.119151,2.741005,3.832510,1.144597,3.172334,0.941455,2.305259,3.406656,2.698135,0.376159,4.655183,1.644817,3.017534,3.954068,0.382318,0.952528,0.277472,0.721972,0.462813,2.250931,0.137915,3.907762,4.975588,3.000026,1.864861,1.235417,1.226325,4.452101,4.211522,4.884005,1.016747,1.946247,0.772323,0.984908,4.129498,2.750781,0.332918,2.514140,1.190502,0.730031,4.820326,1.105672,0.056882,4.589472,2.474449,3.033293,0.837763,0.019456,2.171530,4.265336,1.552437,3.174548,3.974356,4.780249,2.850826,2.065783,1.270027,4.863407,3.747775,1.093495,0.891094,1.097208,4.581213,3.066702,4.307050,1.522756,0.871726,0.659214,0.349455,1.557798,4.067906,0.447091,0.633309,3.503528,1.591343,2.733171,3.470430,3.806867,2.296988,4.493316,0.503095,0.478920,1.236370,0.151320,2.526535,2.150091,4.974829,2.482379,4.604988,3.798097,4.637987,4.887306,0.305474,0.797838,3.663525,2.613024,4.271255,0.325509,2.785375,4.998279,0.647062,1.552417,2.973165,2.966902,4.694836,2.678229,4.698917,0.282053,4.489690,3.268570,3.919700,0.843724,2.416222,0.112995,3.808788,4.071222,1.424311,0.639318,3.362983,1.748524,3.614939,0.190967,2.467573,1.495091,4.664495,0.448134,2.106694,4.381850,3.104430,3.041608,3.682003,2.046838,4.763831,2.183663,3.561496,4.746785,4.634355,3.219498,0.421557,4.937607,0.756476,1.842243,0.262216,3.061960,4.062408,0.248567,4.144571,2.767344,3.673445,1.341028,4.379992,1.608662,2.787882,0.731580,0.055779,1.592112,3.967084,4.182022,3.525373,0.254405,3.763838,3.986315,4.435554,3.838909,4.648594,3.005460,1.455815,0.553594,4.157229,2.238692,3.672689,4.833727,1.955063,2.481701,3.763735,0.345094,1.190714,2.434440,4.086805,1.139982,3.336129,3.808199,4.862106,2.794597,1.756336,0.124742,0.770842,0.211419,2.965752,4.413389,4.997394,0.029932,3.860855,2.019689,0.287046,1.591588,2.038830,4.411448,2.556028,3.159947,1.866398,3.152419,3.473171,3.590677,1.491970,4.347751,1.267941,3.397390,1.113082,0.177447,2.763565,0.695338,1.762286,0.443890,4.820365,3.053039,2.486323,2.736311,2.153369,4.557909,0.067277,2.183838,0.836047,2.080117,0.892184,2.308308,1.014325,0.824032,4.430023,2.640746,3.597880,0.412170,1.057601,4.530182,3.774650,1.872542,4.883257,4.358118,4.219469,4.800075,1.968247,4.167953,4.998937,3.433563,3.644085,3.753141,2.660086,2.297098,0.906605,4.136110,1.155625,1.648913,3.117370,0.034272,3.410027,2.050556,4.053164,0.117853,2.082776,3.106285,0.520195,4.366509,1.722897,1.038054,1.677066,0.814415,3.482062,3.528560,4.611045,0.850225,0.521098,4.941163,4.676881,1.134597,0.108342,2.342128,1.042430,4.116945,2.003354,2.046314,4.038306,2.202691,0.489063,2.355028,1.724871,2.514898,4.016037,2.238102,2.801930,2.086619,2.498589,4.524866,1.517798,2.312207,2.971861,3.514590,1.427854,3.780667,3.696964,0.906107,0.895298,3.104366,0.531340,4.797047,3.967690,3.260620,4.834807,1.815000,2.559686,1.553686,2.338079,4.394952,0.838394,3.524777,0.014730,4.289471,4.902270,1.622279,3.081308,3.935113,0.735042,1.523760,3.975138,4.500569,2.971832,3.134830,4.360609,2.869927,4.890130,2.445262,2.909105,3.695911,1.727955,3.566121,2.966379,2.255627,1.335551,1.276888,4.640475,2.381172,2.502933,2.431308,0.150684,0.689230,3.238955,4.251105,4.641009,3.098986,1.392234,4.933244,4.868976,1.147089,3.308544,2.312739,3.925164,0.890137,2.467865,1.915179,2.505767,3.799876,0.836043,4.230297,4.067627,2.170515,4.167499,1.441251,4.448026,2.636529,3.555772,1.131592,0.525546,0.689012,2.153584,2.349973,1.797374,0.085357,3.179116,2.804738,3.152003,3.684451,4.839404,3.486999,1.779104,4.059670,0.327219,0.832183,0.281130,2.316876,3.662476,1.544846,2.004902,3.728209,1.703602,2.937417,1.874314,0.272140,4.156035,0.654373,1.502440,0.993462,4.583078,4.241548,1.082084,0.867760,2.613160,3.519861,0.622025,3.052143,2.743442,4.307706,3.619759,4.379262,4.483072,1.762278,4.549501,2.737450,1.380398,3.739901,4.814698,3.378785,3.795260,3.100871,0.897732,2.584328,3.133663,3.836901,0.844978,3.442944,2.840806,0.717429,3.890958,1.558854,2.424504,0.299907,4.201402,0.831521,4.574519,1.866541,0.150621,3.661089,1.372687,3.163834,0.114593,3.881712,4.874076,2.514662,4.657857,3.915132,4.067191,3.251563,1.602523,3.456074,1.637074,4.042473,4.723744,2.826691,4.648575,2.401521,1.685958,3.038227,1.351171,0.728056,0.436193,1.566913,3.892909,3.944502,0.729860,1.286039,4.057358,0.577685,4.221571,3.479685,0.074923,2.449570,0.615638,1.731387,3.561329,0.450412,1.289484,2.660379,0.514611,2.278793,4.641664,3.953180,2.745331,1.913394,3.160215,0.648507,0.133357,4.136907,3.668178,4.461827,2.892149,4.198942,2.892463,1.233595,3.447166,4.604305,4.709971,0.942475,4.115069,3.217689,3.147160,4.126941,1.171864,2.455243,3.758844,1.880385,1.487004,0.279780,2.829641,1.776333,1.912976,2.345021,3.721279,4.165011,0.886035,2.316090,2.907806,1.954920,3.819965,4.433054,2.675948,4.101640,3.111796,2.655702,4.264521,3.671148,3.194987,3.790627,2.516593,0.885083,4.162683,2.584124,4.634598,4.859033,3.375649,1.560501,2.878419,1.856432,1.345020,2.270899,2.068886,3.052946,4.268088,1.748169,2.244560,4.165665,0.954486,0.627353,2.720024,4.155571,1.866667,3.159556,0.049118,4.545475,3.016935,1.293076,0.391144,1.122228,3.143962,3.345844,3.551785,4.231899,2.677374,1.248634,4.851837,0.566359,1.468794,3.567365,3.028178,2.719323,0.572351,4.896886,0.739200,1.651224,1.908428,1.173036,1.453144,3.493675,3.842417,2.936869,4.313234,3.575988,2.313220,2.999659,2.210435,4.752958,2.468387,0.290681,0.171567,2.121601,0.379092,4.408588,4.689687,0.623934,2.616273,1.678289,4.375162,0.196463,4.826497,4.291374,0.440402,4.259373,3.435388,1.256949,2.977637,1.181321,1.198123,3.612692,1.146992,2.114469,4.978619,4.869941,3.302803,3.182147,1.103428,0.662596,0.322257,1.634699,1.705209,2.467008,1.402320,2.657973,1.198123,0.882478,1.990911,4.812078,1.144449,4.327120,2.369870,4.357135,3.706190,0.239705,4.859286,0.275567,3.618703,4.104993,1.333792,0.847156,3.160868,4.854715,4.237409,0.322425,4.344910,1.724285,4.136223,0.087213,3.001902,2.769170,0.049612,2.742184,1.178171,0.025633,2.749072,1.720604,3.930455,4.128002,0.398407,2.095612,2.094166,1.071870,2.948967,3.551963,0.434130,2.519470,2.346699,1.524551,1.409417,1.759035,2.451585,1.372253,2.694288,3.795089,1.984602,0.622684,3.264585,3.553231,1.269887,4.199118,1.376920,3.671084,1.132572,2.136007,3.847146,1.324280,3.711920,1.840674,4.999008,1.263116,0.534366,2.112181,3.600770,4.777832,3.335242,2.703202,3.812476,3.015268,3.412568,2.779733,1.388447,3.779804,2.277972,1.918259,0.010755,1.758411,4.540446,0.238659,0.704649,3.457451,3.186817,3.075264,2.740144,3.035192,3.393500,2.616001,3.142056,0.061785,2.378596,2.112321,3.879157,1.130596,3.845963,2.515654,3.334061,0.235885,4.080271,2.743251,2.931930,1.027348,4.229874,1.383483,4.173757,4.543564,3.991931,4.690086,0.921663,0.972457,4.357583,2.343728,0.629452,0.531097,2.511270,3.209740,4.084207,2.872800,0.219885,4.820316,2.722554,1.102767,1.913665,1.816109,2.789013,4.164988,4.772431,0.655075,2.210493,1.820306,1.511401,3.453485,2.343882,3.384287,4.930695,2.279548,4.840454,0.829800,4.039285,0.257056,1.045604,1.575941,0.799139,2.450076,1.567212,3.030704,1.314339,0.537329,0.940455,2.497733,0.369709,1.850360,2.525330,3.284342,3.615060,3.491601,4.895382,0.613017,3.237495,0.878254,4.249018,2.373656,3.008564,4.803005,1.830671,2.900654,1.206235,2.461784,1.083231,1.596418,4.867624,1.268300,0.120980,3.205438,3.561240,0.093931,2.679340,1.399464,2.154674,3.410713,4.348655,1.674022,4.637410,2.198482,3.845131,0.311008,3.978187,4.280911,1.474043,0.901474,4.068663,0.276228,0.086284,4.764417,2.749035,3.946248,0.761388,2.982131,1.963878,0.842598,2.663557,1.043033,0.036358,4.548248,0.559632,2.458318,4.920586,0.208751,3.107515,0.220053,2.754163,1.423132,1.335936,2.237835,3.552100,2.844852,2.974684,1.452025,3.802378,0.189101,4.519249,4.651368,0.090085,1.123907,1.722385,1.664949,2.389294,4.382299,4.407140,4.965336,0.637935,0.012399,4.391215,4.018740,2.872878,0.595703,1.894650,0.456246,3.449532,2.903945,4.147431,3.373436,1.035075,3.928556,4.377347,1.276086,0.574507,3.315137,3.534148,0.240438,1.911804,2.748822,4.311101,1.609079,3.361157,2.531952,3.209372,0.221214,1.667702,1.597643,0.087688,2.337189,1.105386,3.024115,1.033730,4.653629,0.667566,2.416373,1.019557,1.363792,4.726271,4.508237,0.841996,2.070143,1.612242,0.774616,0.453534,1.098458,2.484164,2.877423,0.979768,0.612467,1.146074,2.013607,2.199245,2.104233,1.073632,2.677953,1.599068,0.393903,3.247508,2.942263,4.241374,0.501930,2.788018,4.908887,0.305510,1.929571,3.701759,4.568676,2.836328,0.484536,2.122691,1.040705,3.660008,0.700023,1.584227,2.962155,4.902904,2.697178,0.947807,2.809838,3.935717,0.999046,1.114282,0.624217,3.976699,3.042866,4.303308,4.634818,0.398531,0.555493,3.240552,1.918443,1.354216,1.946801,2.093120,4.520537,0.839014,0.005095,2.162052,0.159090,2.868248,2.957551,2.716024,0.617080,2.933825,1.003571,1.102491,3.444884,4.820313,4.197029,3.522221,4.326557,4.390820,2.283242,2.667046,3.395232,4.457674,0.478686,1.927782,0.182419,1.242186,4.496999,4.669854,2.419955,2.193267,4.403102,1.011008,1.438383,2.310952,1.009877,0.211090,1.850071,3.530191,1.455119,0.219293,4.828167,4.695511,3.091828,4.904286,4.284340,0.124147,3.401747,2.947612,1.018023,4.269531,1.100504,1.655629,2.055340,3.887514,0.209374,3.606638,0.103732,0.643909,4.076962,0.450797,1.620148,0.776167,3.293809,0.265457,0.706088,4.760389,2.441822,3.181229,0.204439,2.966214,4.727831,2.890151,2.158387,0.137030,1.331942,1.587734,1.300078,1.476970,2.589503,0.717869,0.333155,0.931097,0.514835,4.608921,2.625975,3.971231,2.180067,2.081527,1.578032,2.158541,2.553988,1.209432,2.860176,0.943778,2.438910,4.252057,2.439515,2.364696,3.230398,4.118382,3.822578,2.884424,3.852406,0.788938,2.894216,0.270548,3.541402,0.643432,1.958591,3.431523,0.504042,0.639844,4.892606,3.359766,2.532390,2.066725,2.882868,2.097248,0.445276,0.403979,1.023332,4.048428,0.361353,1.516237,1.136845,2.970882,3.378512,1.799886,3.417569,2.449141,4.726636,2.515781,2.526616,0.148357,3.656494,0.962249,2.830189,3.524939,3.192902,0.356012,3.416722,4.713416,2.277613,0.328546,4.394692,2.156190,0.259863,4.581804,0.080355,2.341598,1.603711,1.142324,1.035898,1.022438,1.027568,4.625017,4.267682,2.179582,2.800322,3.023510,0.515762,1.985425,4.722190,0.346294,3.325679,0.524434,4.856998,2.849033,0.559407,1.158605,3.742065,3.495097,0.903474,0.990475,0.174713,1.005017,2.523398,2.951660,0.108378,2.989163,2.861312,0.436828,0.996279,3.950912,1.016266,2.848758,4.844930,1.693134,0.830385,3.389292,0.294979,1.511126,4.711183,1.082347,2.854723,1.911290,3.744001,2.291123,4.563324,1.154506,3.886020,1.300340,3.552880,0.251940,1.474080,3.912163,3.082179,0.153890,1.000110,0.290796,4.646813,3.841017,0.971064,1.972894,1.464246,2.792463,0.702305,4.325129,3.829189,0.239672,4.872232,4.396945,0.040094,4.364687,4.314782,1.407580,2.178613,4.839047,1.652370,4.069792,3.775975,2.225662,1.221542,1.800308,1.527465,4.719534,2.026267,4.432787,3.642128,3.092798,3.378478,4.963592,1.028494,3.459104,3.367332,0.486100,1.158322,2.170546,1.160228,2.701398,2.036480,1.078161,0.791964,4.355680,1.956930,3.365634,3.881535,3.653546,3.693748,4.734100,2.745255,4.574399,0.381622,1.600242,3.182811,4.835379,4.290117,1.691466,2.405776,0.781170,4.156449,3.882971,2.179011,2.165862,0.642729,4.671985,0.976217,2.860727,1.208619,0.605691,3.642922,2.373285,4.974652,2.933796,4.599096,3.378878,0.855297,0.417279,3.893139,4.684327,3.629479,2.482088,0.945655,2.302823,1.451318,3.660627,1.694701,0.463830,1.018631,1.540707,1.826393,3.728150,1.615475,4.475078,4.786478,2.899368,0.521732,2.526603,2.925453,4.779859,2.815737,3.032316,0.049551,4.717544,1.480861,3.038443,3.783809,2.649782,0.136092,2.180772,2.708764,2.859065,3.297779,4.515613,4.177924,1.561484,2.697878,4.965147,1.858322,4.347810,2.119577,3.841938,4.981807,4.917437,4.594119,0.306569,0.942569,4.568173,0.310926,1.288260,0.766230,4.795047,4.048706,1.150799,0.986439,4.871699,0.078345,2.702508,1.231069,2.956396,3.533294,1.615086,0.411091,3.307359,1.544273,3.902347,3.100254,0.290257,2.524898,4.378576,4.146110,2.395397,3.681805,3.526063,3.370108,4.631784,0.614838,3.463389,1.368711,0.702733,2.057362,0.591928,2.483837,2.153713,4.101452,2.335719,4.045453,0.810238,0.239405,3.627801,2.538262,2.105399,3.564817,4.742721,3.691596,3.296512,2.475069,0.607244,0.396154,0.235176,1.594210,1.760460,2.126622,3.846742,2.659791,0.685185,0.595610,3.236604,0.074760,3.679532,1.863521,4.997802,2.885636,4.325796,3.999673,1.807501,3.633476,4.692552,1.442303,1.289959,0.971602,4.488791,0.678424,2.025589,2.291425,2.472931,4.481274,1.465780,4.226436,2.778349,4.390086,1.694456,1.158879,1.264513,0.963284,0.180685,1.240221,3.152669,2.857399,0.400342,2.149889,4.598310,1.004410,0.739787,0.676664,4.176469,2.476978,1.172989,4.196196,3.232764,4.841449,1.732272,1.895363,0.097090,0.717661,0.188892,1.429335,2.664953,0.547490,1.602951,2.388182,0.691760,2.131467,3.264073,4.069007,0.837230,3.987368,3.432318,4.607254,0.713007,1.290775,1.404516,0.203623,0.297576,4.199441,3.545237,4.706788,1.368038,4.759686,0.373203,4.123716,3.907059,2.132538,4.796496,2.167928,3.782718,3.914466,1.101143,2.436232,4.932890,0.675057,1.763434,1.559564,0.350980,1.036419,3.781054,2.212489,4.602730,0.058734,2.655795,3.437775,3.718904,1.212811,1.440621,3.819075,2.286101,4.718166,4.869229,2.760719,0.394618,3.537026,1.504376,1.141227,4.299605,0.894329,0.244832,3.023225,0.719292,0.288111,0.055685,2.391616,1.372737,3.737325,0.468436,3.520032,1.652252,1.785099,0.390486,1.909909,3.246581,0.993855,3.332704,3.179373,0.854759,1.583011,3.340145,1.362834,4.900885,3.564826,0.116661,2.742575,0.572096,3.245560,1.306302,0.051378,1.030837,0.908576,3.810324,0.278026,0.300042,4.609405,0.948015,4.770921,2.392090,1.698702,4.550967,0.315390,3.050805,3.890195,1.965440,2.988225,4.960712,4.277722,4.641786,4.545747,2.171598,4.027717,4.825331,2.662657,4.647666,0.044383,1.400754,3.082128,1.806969,1.456843,4.486426,0.226301,1.745357,1.620947,1.496425,2.330697,2.405980,3.311002,3.326181,1.305311,2.323243,0.742848,2.165051,3.434011,3.529822,4.459499,0.203189,2.168039,4.923247,2.670295,2.449971,2.509641,2.247153,0.436407,1.580823,2.874605,3.322508,3.000557,2.855567,4.928697,3.995550,4.920550,1.255558,3.218200,0.619796,3.651374,3.659363,2.810172,3.079197,3.788212,3.986841,0.443399,2.783815,1.833684,2.958727,0.398366,2.971307,3.175473,1.774038,2.300497,3.173048,1.743361,0.965917,4.290858,0.924099,3.659946,1.420277,0.866139,1.228157,1.592174,1.906174,0.800409,4.327271,3.248888,2.727841,0.521635,1.265978,4.531992,2.908873,0.378242,0.240325,4.324487,2.425056,1.650625,4.740167,3.692717,1.646375,1.655488,4.347535,4.490398,3.185362,3.605165,3.476742,3.151750,1.433162,4.992540,4.710398,3.424823,3.416129,4.829058,2.029704,1.678152,4.720808,2.926389,4.123664,1.969846,1.156757,1.674243,4.538708,2.305028,0.571541,1.170560,3.026445,0.105680,1.044920,0.773288,4.687001,0.042889,0.878769,3.846373,2.500886,2.749624,4.870893,2.646143,2.606869,2.886177,2.550712,3.440984,3.956153,1.870242,3.206393,1.459697,3.676523,1.022320,2.370027,4.907268,0.730590,3.247461,3.744824,3.320197,4.310562,2.330627,3.169485,2.972061,2.713253,3.478968,2.167254,3.535006,0.786989,0.405959,1.872039,2.524026,3.984640,0.882194,4.053556,4.901872,1.371186,1.902176,4.766563,1.151434,3.027331,3.150123,1.201375,1.593602,0.921198,3.828241,3.311194,4.554787,2.240321,1.145110,2.520505,4.903745,3.266401,3.074347,0.502872,2.040623,0.109902,3.562741,4.460352,1.965509,2.935534,4.720419,2.670725,1.669678,1.447176,0.150010,4.006641,4.750958,4.884572,2.773967,3.528914,0.336331,4.961810,4.031202,0.188596,0.515435,0.731670,2.339940,4.365287,1.861093,4.252035,0.789520,0.489964,4.791142,3.264164,1.071352,2.420344,0.265822,2.329371,4.303040,4.711174,3.673102,2.305014,1.472508,0.554054,2.728203,1.533902,1.782007,0.708220,1.862911,0.716899,3.190215,0.362760,4.954628,0.474119,4.228099,1.217987,1.016913,2.234130,1.557689,4.737573,2.642671,1.546376,0.379792,2.062704,4.915684,4.761813,4.284342,3.888543,0.900958,3.775288,4.146945,1.181923,4.359638,0.598233,0.591532,3.246661,1.369600,2.033505,0.760127,3.823041,4.721193,0.703155,3.182470,3.494532,2.222481,2.473411,3.778170,4.430010,0.774620,1.577516,4.037162,2.128689,2.520998,4.271830,3.511293,2.015915,3.081751,0.421255,3.591351,1.204655,1.820895,0.086627,3.983967,2.025735,4.403686,2.396993,3.779239,3.496983,2.365780,4.765678,0.366466,2.787481,0.257261,3.786890,1.565036,2.923038,1.724394,0.820242,0.917958,4.977689,3.235232,0.896833,1.941052,2.619090,0.649869,4.647575,4.280894,3.063376,3.471900,1.486056,2.402871,3.211623,2.394377,4.931209,4.870677,3.043489,2.446731,3.557810,1.570170,2.417842,3.632515,3.178420,3.068553,3.919539,2.272264,2.314337,3.078946,4.546870,1.873521,0.032862,0.837886,4.370220,1.044815,0.078747,1.914158,3.824319,4.573908,2.002193,3.176967,0.973517,2.288722,2.091870,4.530678,3.842146,0.314830,1.878723,4.778730,2.501960,4.063513,4.953854,4.950409,0.912907,1.797634,2.384449,4.042896,1.445500,3.024493,0.435148,1.626697,4.852384,4.546390,0.956560,3.365771,0.035663,0.705084,3.406432,3.460695,2.523778,2.614587,1.229817,0.583865,0.360570,4.301813,3.188966,4.951121,0.596189,1.537710,1.431529,2.228116,1.118169,4.588798,2.310649,1.656101,2.490859,1.115784,4.295925,2.018548,4.166827,1.450425,1.591613,2.438076,2.990227,0.780884,0.369716,3.117162,4.820367,2.483466,3.995957,2.044040,0.231385,1.119469,1.399900,4.432893,4.070661,0.783504,1.899165,4.450988,1.782630,0.894692,4.855204,3.713833,3.488042,0.822492,1.684430,0.832129,1.001361,1.097777,0.641447,0.307804,4.016437,1.794516,1.191535,3.518494,1.351574,1.828609,2.846974,4.725246,0.342212,1.805309,0.109192,3.464396,1.266937,2.835801,1.328618,0.881577,2.661575,4.791385,3.583201,4.922601,3.522561,1.403011,4.284431,3.845931,0.081472,2.047052,1.505269,3.405110,2.081005,1.262451,3.515710,3.905039,3.989887,1.193584,0.130009,3.664712,2.358523,0.782798,1.738550,0.415488,2.542411,4.185431,2.109851,3.734005,1.781876,4.652489,0.690534,4.924494,1.626291,4.779414,1.183456,0.832311,0.986173,4.260385,2.293352,1.776458,1.696158,1.206343,4.370225,2.414486,1.924969,0.687635,0.432069,0.169667,2.890896,1.380942,1.139355,4.649525,4.570038,3.488582,2.707469,0.225299,2.904699,2.531805,0.386505,1.540925,4.139028,0.976583,3.745576,4.286168,4.986714,3.708433,1.950256,0.122015,1.673469,1.329102,4.679273,2.111847,0.469254,3.503336,4.255499,1.015765,2.450986,1.284920,4.777964,3.978063,4.767855,0.644422,0.572087,4.196899,4.675172,0.301727,1.768216,4.382507,0.367835,3.405374,4.352907,4.709862,4.125582,4.470620,3.621680,0.890445,3.198435,4.285662,4.784951,4.755709,0.023506,3.123327,0.830491,1.365323,1.164411,4.535398,2.543207,1.150602,2.995244,3.637362,4.144533,4.959026,0.769131,0.452929,2.761979,2.236854,0.280521,1.586668,2.364104,1.497947,3.994024,1.804979,3.821671,1.729339,2.673517,2.627626,3.601948,4.163749,0.972740,3.761595,0.799768,3.224634,1.007945,3.952914,4.879515,2.008177,2.092729,2.334405,3.726112,0.123118,3.380948,2.311061,0.176373,1.771389,1.253313,4.583949,2.734760,2.953325,4.003142,1.669665,2.990157,4.682503,0.875731,2.919679,0.766458,2.098373,1.449629,4.433065,4.508163,1.669770,4.131705,2.691133,4.429423,1.752686,0.118075,2.536232,3.262633,0.292559,4.086954,3.161739,1.973717,2.845684,4.975364,1.202949,1.194009,0.394334,0.930719,4.486663,4.068057,1.209500,1.561133,1.792676,4.832930,1.926089,1.970900,3.100944,0.753017,3.914051,1.012799,2.336503,0.431119,2.836296,1.872219,4.710747,4.108249,0.555322,0.618296,4.827536,4.675194,0.722879,2.653158,2.178515,1.208950,1.327640,0.287980,4.178755,4.022275,4.907703,1.870009,0.688338,1.706212,2.546108,2.479356,3.887816,2.633411,1.682238,0.964930,0.898621,2.260199,0.155128,2.290516,3.310337,1.977277,4.479775,1.198647,4.186262,2.897235,1.875533,2.420561,3.189400,0.796348,3.478947,2.899227,3.519405,3.734746,1.773786,0.091536,1.670516,2.422218,1.130470,4.798997,3.150116,0.701091,4.015539,3.717567,1.076981,1.553046,1.899007,3.469738,2.225767,1.779018,1.783534,0.389053,2.560305,3.417370,3.693745,3.139440,4.576526,0.849724,0.138684,0.751352,4.381844,4.649362,2.547753,2.324274,1.291489,3.232569,4.390370,4.645136,3.217199,4.725390,3.307790,1.923788,1.644469,1.079590,2.170371,3.316060,4.448403,1.256216,2.761273,0.474465,0.490909,3.646392,4.796384,0.669371,2.820387,4.061411,0.389955,1.816692,2.815095,0.969081,1.645534,3.736132,1.217191,0.204809,0.648386,4.659210,0.793571,3.433278,0.449386,3.342840,4.265888,4.962132,0.293289,2.236904,2.928607,3.750272,2.095666,0.317591,0.525639,1.732514,3.313779,0.675983,3.333812,3.300548,0.490440,3.589320,2.099317,4.141539,0.999739,3.865527,4.386133,2.357315,3.162070,3.089654,3.768522,2.284135,3.036599,0.935440,3.725311,4.806696,1.150529,0.271360,4.228510,1.166075,0.387357,4.115557,0.586837,0.989504,2.237999,0.840009,0.821112,0.394959,3.919287,0.788564,2.401678,1.702828,4.974722,1.967681,4.802450,2.561426,4.169802,4.353516,0.939275,2.916969,4.425106,3.681441,3.735025,2.468208,2.036053,0.412436,4.388892,1.381623,2.999279,1.775644,4.223056,3.461782,3.484300,3.710455,3.082311,4.465584,1.892583,3.106047,3.321168,2.975687,3.630549,3.799191,1.149409,2.798677,4.879463,4.069720,0.748502,0.175879,2.767869,0.091405,0.149368,3.006425,3.090956,1.780497,2.690762,4.144060,1.769532,3.703889,2.041189,2.253352,3.063507,0.739962,2.322476,4.822575,2.899075,3.903022,4.490068,2.164333,3.962295,1.846313,3.655559,1.640534,1.653083,3.019507,1.397614,3.354730,4.985032,4.099061,3.646705,0.847186,3.649826,1.636192,0.014812,3.729462,3.739875 \ No newline at end of file From 0d6cea6d8a0aa8326a62d56afa5a3b58c606e01a Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Wed, 28 Apr 2021 19:23:46 +0200 Subject: [PATCH 14/42] Add native implementation for benchmarking JDK 8 and 11 It's now supported with JNIBLAS, JNILAPACK, and (upcoming) JNIARPACK. --- .github/workflows/release.yml | 14 +------------- 1 file changed, 1 insertion(+), 13 deletions(-) diff --git a/.github/workflows/release.yml b/.github/workflows/release.yml index 1ae4c5c6..0caf07b8 100644 --- a/.github/workflows/release.yml +++ b/.github/workflows/release.yml @@ -84,7 +84,7 @@ jobs: strategy: matrix: jdk: [8, 11, 16] - implementation: ["f2j", "java"] + implementation: ["f2j", "java", "native"] filter: ["dev.ludovic.netlib.benchmarks.blas.l1", "dev.ludovic.netlib.benchmarks.blas.l2", "dev.ludovic.netlib.benchmarks.blas.l3"] include: - jdk: 16 @@ -99,18 +99,6 @@ jobs: implementation: "java" filter: "dev.ludovic.netlib.benchmarks.blas.l3" jvmArgs: "--add-modules=jdk.incubator.vector" - - jdk: 16 - implementation: "native" - filter: "dev.ludovic.netlib.benchmarks.blas.l1" - jvmArgs: "--add-modules=jdk.incubator.foreign -Dforeign.restricted=permit" - - jdk: 16 - implementation: "native" - filter: "dev.ludovic.netlib.benchmarks.blas.l2" - jvmArgs: "--add-modules=jdk.incubator.foreign -Dforeign.restricted=permit" - - jdk: 16 - implementation: "native" - filter: "dev.ludovic.netlib.benchmarks.blas.l3" - jvmArgs: "--add-modules=jdk.incubator.foreign -Dforeign.restricted=permit" steps: - name: Set up JDK ${{ matrix.jdk }} uses: actions/setup-java@v1 From f9cc171f25371b6cba519731605869c612f781b5 Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Wed, 28 Apr 2021 19:28:20 +0200 Subject: [PATCH 15/42] Allow manual trigger of the workflow --- .github/workflows/release.yml | 1 + 1 file changed, 1 insertion(+) diff --git a/.github/workflows/release.yml b/.github/workflows/release.yml index 0caf07b8..43a3f9b2 100644 --- a/.github/workflows/release.yml +++ b/.github/workflows/release.yml @@ -6,6 +6,7 @@ on: tags: - 'v*' # Push events to matching v*, i.e. v1.0, v20.15.10 - '!v*-SNAPSHOT' # But not v*-SNAPSHOT, i.e. v2-SNAPSHOT + workflow_dispatch: name: Create Release From 9d2fc4178261f737e65b013725442d365da30d8d Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Wed, 28 Apr 2021 19:41:42 +0200 Subject: [PATCH 16/42] Relax the compiler warnings for now --- lapack/src/main/native/jni.c | 45 +++++++++++++++++++++++++++++++++++- pom.xml | 4 ++-- 2 files changed, 46 insertions(+), 3 deletions(-) diff --git a/lapack/src/main/native/jni.c b/lapack/src/main/native/jni.c index 8ba07a9d..3bac9e77 100644 --- a/lapack/src/main/native/jni.c +++ b/lapack/src/main/native/jni.c @@ -576,6 +576,7 @@ static int *(*disnan_)(double *din); jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_disnanK(JNIEnv *env, UNUSED jobject obj, jdouble din) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static void (*dlabad_)(/*FIXME*/void *small, /*FIXME*/void *large); @@ -814,6 +815,7 @@ static int *(*dlaisnan_)(double *din1, double *din2); jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaisnanK(JNIEnv *env, UNUSED jobject obj, jdouble din1, jdouble din2) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static void (*dlaln2_)(int *ltrans, int *na, int *nw, double *smin, double *ca, double *a, int *lda, double *d1, double *d2, double *b, int *ldb, double *wr, double *wi, double *x, int *ldx, /*FIXME*/void *scale, /*FIXME*/void *xnorm, /*FIXME*/void *info); @@ -856,6 +858,7 @@ static int (*dlaneg_)(int *n, double *d, int *offsetd, double *lld, int *offsetl jint Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanegK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray d, jint offsetd, jdoubleArray lld, jint offsetlld, jdouble sigma, jdouble pivmin, jint r) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static double (*dlangb_)(char *norm, int *n, int *kl, int *ku, double *ab, int *offsetab, int *ldab, double *work, int *offsetwork); @@ -863,6 +866,7 @@ static double (*dlangb_)(char *norm, int *n, int *kl, int *ku, double *ab, int * jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlangbK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jint kl, jint ku, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray work, jint offsetwork) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static double (*dlange_)(char *norm, int *m, int *n, double *a, int *offseta, int *lda, double *work, int *offsetwork); @@ -870,6 +874,7 @@ static double (*dlange_)(char *norm, int *m, int *n, double *a, int *offseta, in jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlangeK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray work, jint offsetwork) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static double (*dlangt_)(char *norm, int *n, double *dl, int *offsetdl, double *d, int *offsetd, double *du, int *offsetdu); @@ -877,6 +882,7 @@ static double (*dlangt_)(char *norm, int *n, double *dl, int *offsetdl, double * jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlangtK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static double (*dlanhs_)(char *norm, int *n, double *a, int *offseta, int *lda, double *work, int *offsetwork); @@ -884,6 +890,7 @@ static double (*dlanhs_)(char *norm, int *n, double *a, int *offseta, int *lda, jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanhsK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray work, jint offsetwork) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static double (*dlansb_)(char *norm, const char *uplo, int *n, int *k, double *ab, int *offsetab, int *ldab, double *work, int *offsetwork); @@ -891,6 +898,7 @@ static double (*dlansb_)(char *norm, const char *uplo, int *n, int *k, double *a jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlansbK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jint n, jint k, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray work, jint offsetwork) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static double (*dlansp_)(char *norm, const char *uplo, int *n, double *ap, int *offsetap, double *work, int *offsetwork); @@ -898,6 +906,7 @@ static double (*dlansp_)(char *norm, const char *uplo, int *n, double *ap, int * jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanspK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray work, jint offsetwork) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static double (*dlanst_)(char *norm, int *n, double *d, int *offsetd, double *e, int *offsete); @@ -905,6 +914,7 @@ static double (*dlanst_)(char *norm, int *n, double *d, int *offsetd, double *e, jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanstK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static double (*dlansy_)(char *norm, const char *uplo, int *n, double *a, int *offseta, int *lda, double *work, int *offsetwork); @@ -912,6 +922,7 @@ static double (*dlansy_)(char *norm, const char *uplo, int *n, double *a, int *o jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlansyK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray work, jint offsetwork) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static double (*dlantb_)(char *norm, const char *uplo, char *diag, int *n, int *k, double *ab, int *offsetab, int *ldab, double *work, int *offsetwork); @@ -919,6 +930,7 @@ static double (*dlantb_)(char *norm, const char *uplo, char *diag, int *n, int * jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlantbK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jstring diag, jint n, jint k, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray work, jint offsetwork) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static double (*dlantp_)(char *norm, const char *uplo, char *diag, int *n, double *ap, int *offsetap, double *work, int *offsetwork); @@ -926,6 +938,7 @@ static double (*dlantp_)(char *norm, const char *uplo, char *diag, int *n, doubl jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlantpK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jstring diag, jint n, jdoubleArray ap, jint offsetap, jdoubleArray work, jint offsetwork) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static double (*dlantr_)(char *norm, const char *uplo, char *diag, int *m, int *n, double *a, int *offseta, int *lda, double *work, int *offsetwork); @@ -933,6 +946,7 @@ static double (*dlantr_)(char *norm, const char *uplo, char *diag, int *m, int * jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlantrK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jstring diag, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray work, jint offsetwork) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static void (*dlanv2_)(/*FIXME*/void *a, /*FIXME*/void *b, /*FIXME*/void *c, /*FIXME*/void *d, /*FIXME*/void *rt1r, /*FIXME*/void *rt1i, /*FIXME*/void *rt2r, /*FIXME*/void *rt2i, /*FIXME*/void *cs, /*FIXME*/void *sn); @@ -961,6 +975,7 @@ static double (*dlapy2_)(double *x, double *y); jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlapy2K(JNIEnv *env, UNUSED jobject obj, jdouble x, jdouble y) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static double (*dlapy3_)(double *x, double *y, double *z); @@ -968,6 +983,7 @@ static double (*dlapy3_)(double *x, double *y, double *z); jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlapy3K(JNIEnv *env, UNUSED jobject obj, jdouble x, jdouble y, jdouble z) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static void (*dlaqgb_)(int *m, int *n, int *kl, int *ku, double *ab, int *ldab, double *r, double *c, double *rowcnd, double *colcnd, double *amax, jstring *equed); @@ -1887,7 +1903,7 @@ static void (*dpptri_)(const char *uplo, int *n, double *ap, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpptriK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jobject info) { jboolean failedOOM = FALSE; - const char *nuplo = NULL; double *nap = NULL, *nb = NULL; int ninfo = 0; + const char *nuplo = NULL; double *nap = NULL; int ninfo = 0; ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; if (!(nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto failOOM; @@ -2545,6 +2561,7 @@ static int (*ieeeck_)(int *ispec, float *zero, float *one); jint Java_dev_ludovic_netlib_lapack_JNILAPACK_ieeeckK(JNIEnv *env, UNUSED jobject obj, jint ispec, jfloat zero, jfloat one) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static int (*ilaenv_)(int *ispec, char *name, char *opts, int *n1, int *n2, int *n3, int *n4); @@ -2552,6 +2569,7 @@ static int (*ilaenv_)(int *ispec, char *name, char *opts, int *n1, int *n2, int jint Java_dev_ludovic_netlib_lapack_JNILAPACK_ilaenvK(JNIEnv *env, UNUSED jobject obj, jint ispec, jstring name, jstring opts, jint n1, jint n2, jint n3, jint n4) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static void (*ilaver_)(/*FIXME*/void *vers_major, /*FIXME*/void *vers_minor, /*FIXME*/void *vers_patch); @@ -2566,6 +2584,7 @@ static int (*iparmq_)(int *ispec, char *name, char *opts, int *n, int *ilo, int jint Java_dev_ludovic_netlib_lapack_JNILAPACK_iparmqK(JNIEnv *env, UNUSED jobject obj, jint ispec, jstring name, jstring opts, jint n, jint ilo, jint ihi, jint lwork) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static int *(*lsamen_)(int *n, char *ca, char *cb); @@ -2573,6 +2592,7 @@ static int *(*lsamen_)(int *n, char *ca, char *cb); jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_lsamenK(JNIEnv *env, UNUSED jobject obj, jint n, jstring ca, jstring cb) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static void (*sbdsdc_)(const char *uplo, char *compq, int *n, float *d, float *e, float *u, int *ldu, float *vt, int *ldvt, float *q, int * iq, float *work, int *iwork, int *info); @@ -3105,6 +3125,7 @@ static int *(*sisnan_)(float *sin); jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_sisnanK(JNIEnv *env, UNUSED jobject obj, jfloat sin) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static void (*slabad_)(/*FIXME*/void *small, /*FIXME*/void *large); @@ -3343,6 +3364,7 @@ static int *(*slaisnan_)(float *sin1, float *sin2); jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_slaisnanK(JNIEnv *env, UNUSED jobject obj, jfloat sin1, jfloat sin2) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static void (*slaln2_)(int *ltrans, int *na, int *nw, float *smin, float *ca, float *a, int *lda, float *d1, float *d2, float *b, int *ldb, float *wr, float *wi, float *x, int *ldx, /*FIXME*/void *scale, /*FIXME*/void *xnorm, /*FIXME*/void *info); @@ -3385,6 +3407,7 @@ static int (*slaneg_)(int *n, float *d, int *offsetd, float *lld, int *offsetlld jint Java_dev_ludovic_netlib_lapack_JNILAPACK_slanegK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray d, jint offsetd, jfloatArray lld, jint offsetlld, jfloat sigma, jfloat pivmin, jint r) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static float (*slangb_)(char *norm, int *n, int *kl, int *ku, float *ab, int *offsetab, int *ldab, float *work, int *offsetwork); @@ -3392,6 +3415,7 @@ static float (*slangb_)(char *norm, int *n, int *kl, int *ku, float *ab, int *of jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slangbK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jint kl, jint ku, jfloatArray ab, jint offsetab, jint ldab, jfloatArray work, jint offsetwork) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static float (*slange_)(char *norm, int *m, int *n, float *a, int *offseta, int *lda, float *work, int *offsetwork); @@ -3399,6 +3423,7 @@ static float (*slange_)(char *norm, int *m, int *n, float *a, int *offseta, int jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slangeK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray work, jint offsetwork) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static float (*slangt_)(char *norm, int *n, float *dl, int *offsetdl, float *d, int *offsetd, float *du, int *offsetdu); @@ -3406,6 +3431,7 @@ static float (*slangt_)(char *norm, int *n, float *dl, int *offsetdl, float *d, jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slangtK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static float (*slanhs_)(char *norm, int *n, float *a, int *offseta, int *lda, float *work, int *offsetwork); @@ -3413,6 +3439,7 @@ static float (*slanhs_)(char *norm, int *n, float *a, int *offseta, int *lda, fl jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slanhsK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray work, jint offsetwork) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static float (*slansb_)(char *norm, const char *uplo, int *n, int *k, float *ab, int *offsetab, int *ldab, float *work, int *offsetwork); @@ -3420,6 +3447,7 @@ static float (*slansb_)(char *norm, const char *uplo, int *n, int *k, float *ab, jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slansbK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jint n, jint k, jfloatArray ab, jint offsetab, jint ldab, jfloatArray work, jint offsetwork) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static float (*slansp_)(char *norm, const char *uplo, int *n, float *ap, int *offsetap, float *work, int *offsetwork); @@ -3427,6 +3455,7 @@ static float (*slansp_)(char *norm, const char *uplo, int *n, float *ap, int *of jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slanspK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray work, jint offsetwork) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static float (*slanst_)(char *norm, int *n, float *d, int *offsetd, float *e, int *offsete); @@ -3434,6 +3463,7 @@ static float (*slanst_)(char *norm, int *n, float *d, int *offsetd, float *e, in jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slanstK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static float (*slansy_)(char *norm, const char *uplo, int *n, float *a, int *offseta, int *lda, float *work, int *offsetwork); @@ -3441,6 +3471,7 @@ static float (*slansy_)(char *norm, const char *uplo, int *n, float *a, int *off jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slansyK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray work, jint offsetwork) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static float (*slantb_)(char *norm, const char *uplo, char *diag, int *n, int *k, float *ab, int *offsetab, int *ldab, float *work, int *offsetwork); @@ -3448,6 +3479,7 @@ static float (*slantb_)(char *norm, const char *uplo, char *diag, int *n, int *k jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slantbK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jstring diag, jint n, jint k, jfloatArray ab, jint offsetab, jint ldab, jfloatArray work, jint offsetwork) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static float (*slantp_)(char *norm, const char *uplo, char *diag, int *n, float *ap, int *offsetap, float *work, int *offsetwork); @@ -3455,6 +3487,7 @@ static float (*slantp_)(char *norm, const char *uplo, char *diag, int *n, float jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slantpK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jstring diag, jint n, jfloatArray ap, jint offsetap, jfloatArray work, jint offsetwork) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static float (*slantr_)(char *norm, const char *uplo, char *diag, int *m, int *n, float *a, int *offseta, int *lda, float *work, int *offsetwork); @@ -3462,6 +3495,7 @@ static float (*slantr_)(char *norm, const char *uplo, char *diag, int *m, int *n jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slantrK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jstring diag, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray work, jint offsetwork) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static void (*slanv2_)(/*FIXME*/void *a, /*FIXME*/void *b, /*FIXME*/void *c, /*FIXME*/void *d, /*FIXME*/void *rt1r, /*FIXME*/void *rt1i, /*FIXME*/void *rt2r, /*FIXME*/void *rt2i, /*FIXME*/void *cs, /*FIXME*/void *sn); @@ -3490,6 +3524,7 @@ static float (*slapy2_)(float *x, float *y); jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slapy2K(JNIEnv *env, UNUSED jobject obj, jfloat x, jfloat y) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static float (*slapy3_)(float *x, float *y, float *z); @@ -3497,6 +3532,7 @@ static float (*slapy3_)(float *x, float *y, float *z); jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slapy3K(JNIEnv *env, UNUSED jobject obj, jfloat x, jfloat y, jfloat z) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static void (*slaqgb_)(int *m, int *n, int *kl, int *ku, float *ab, int *ldab, float *r, float *c, float *rowcnd, float *colcnd, float *amax, jstring *equed); @@ -5037,6 +5073,7 @@ static double (*dlamch_)(char *cmach); jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamchK(JNIEnv *env, UNUSED jobject obj, jstring cmach) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } // static void (*dlamc1_)(/*FIXME*/void *beta, /*FIXME*/void *t, /*FIXME*/void *rnd, /*FIXME*/void *ieee1); @@ -5058,6 +5095,7 @@ static double (*dlamc3_)(double *a, double *b); jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc3K(JNIEnv *env, UNUSED jobject obj, jdouble a, jdouble b) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } // static void (*dlamc4_)(/*FIXME*/void *emin, double *start, int *base); @@ -5078,6 +5116,7 @@ static double (*dsecnd_)(void); jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dsecndK(JNIEnv *env, UNUSED jobject obj) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static int *(*lsame_)(char *ca, char *cb); @@ -5085,12 +5124,14 @@ static int *(*lsame_)(char *ca, char *cb); jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_lsameK(JNIEnv *env, UNUSED jobject obj, jstring ca, jstring cb) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } static float (*second_)(void); jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_secondK(JNIEnv *env, UNUSED jobject obj) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } @@ -5099,6 +5140,7 @@ static float (*slamch_)(char *cmach); jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slamchK(JNIEnv *env, UNUSED jobject obj, jstring cmach) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } // static void (*slamc1_)(/*FIXME*/void *beta, /*FIXME*/void *t, /*FIXME*/void *rnd, /*FIXME*/void *ieee1); @@ -5120,6 +5162,7 @@ static float (*slamc3_)(float *a, float *b); jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc3K(JNIEnv *env, UNUSED jobject obj, jfloat a, jfloat b) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; } // static void (*slamc4_)(/*FIXME*/void *emin, float *start, int *base); diff --git a/pom.xml b/pom.xml index 984cafeb..400c1d07 100644 --- a/pom.xml +++ b/pom.xml @@ -221,7 +221,7 @@ information or have any questions. - + @@ -231,7 +231,7 @@ information or have any questions. - + From e03e6e52659ff95da18833915b4c8b80441239d7 Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Wed, 28 Apr 2021 19:45:38 +0200 Subject: [PATCH 17/42] Fix installed dependencies --- .github/workflows/release.yml | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/.github/workflows/release.yml b/.github/workflows/release.yml index 110e9abb..32dc0110 100644 --- a/.github/workflows/release.yml +++ b/.github/workflows/release.yml @@ -49,6 +49,10 @@ jobs: release_upload_url: ${{ steps.create_release.outputs.upload_url }} steps: - uses: actions/checkout@v2 + - name: Install dependencies + run: | + sudo apt-get -y update + sudo apt-get -y install gcc-aarch64-linux-gnu gcc-x86-64-linux-gnu - name: Set up JDK 16 uses: actions/setup-java@v1 with: # running setup-java again overwrites the settings.xml From 3eaf0d9989fc6d2bb29a79ba9f406a42fef9e97f Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Thu, 29 Apr 2021 23:52:07 +0200 Subject: [PATCH 18/42] Implement some more BLAS calls in JNIBLAS --- blas/src/main/native/jni.c | 80 ++++++++++++++++++++++++++++++++++---- 1 file changed, 72 insertions(+), 8 deletions(-) diff --git a/blas/src/main/native/jni.c b/blas/src/main/native/jni.c index d5878ea6..86426c17 100644 --- a/blas/src/main/native/jni.c +++ b/blas/src/main/native/jni.c @@ -521,29 +521,93 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_srotmK(JNIEnv *env, UNUSED jobject obj static void (*drotmg_)(double *dd1, double *dd2, double *dx1, double *dy1, double *dparam); void Java_dev_ludovic_netlib_blas_JNIBLAS_drotmgK(JNIEnv *env, UNUSED jobject obj, - UNUSED jobject dd1, UNUSED jobject dd2, UNUSED jobject dx1, UNUSED jdouble dy1, UNUSED jdoubleArray dparam, UNUSED jint offsetdparam) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + jobject dd1, jobject dd2, jobject dx1, jdouble dy1, jdoubleArray dparam, jint offsetdparam) { + jboolean failed = FALSE; + double ndd1 = 0, ndd2 = 0, ndx1 = 0; double *ndparam = NULL; + ndd1 = (*env)->GetDoubleField(env, dd1, doubleW_val_fieldID); + ndd2 = (*env)->GetDoubleField(env, dd2, doubleW_val_fieldID); + ndx1 = (*env)->GetDoubleField(env, dx1, doubleW_val_fieldID); + if (!(ndparam = (*env)->GetPrimitiveArrayCritical(env, dparam, NULL))) goto fail; + drotmg_(&ndd1, &ndd2, &ndx1, &dy1, ndparam + offsetdparam); +done: + if (ndparam) (*env)->ReleasePrimitiveArrayCritical(env, dparam, ndparam, 0); + (*env)->SetDoubleField(env, dx1, doubleW_val_fieldID, ndx1); + (*env)->SetDoubleField(env, dd2, doubleW_val_fieldID, ndd2); + (*env)->SetDoubleField(env, dd1, doubleW_val_fieldID, ndd1); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*srotmg_)(float *sd1, float *sd2, float *sx1, float *sy1, float *sparam); void Java_dev_ludovic_netlib_blas_JNIBLAS_srotmgK(JNIEnv *env, UNUSED jobject obj, - UNUSED jobject sd1, UNUSED jobject sd2, UNUSED jobject sx1, UNUSED jfloat sy1, UNUSED jfloatArray sparam, UNUSED jint offsetsparam) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + jobject sd1, jobject sd2, jobject sx1, jfloat sy1, jfloatArray sparam, jint offsetsparam) { + jboolean failed = FALSE; + float nsd1 = 0, nsd2 = 0, nsx1 = 0; float *nsparam = NULL; + nsd1 = (*env)->GetFloatField(env, sd1, floatW_val_fieldID); + nsd2 = (*env)->GetFloatField(env, sd2, floatW_val_fieldID); + nsx1 = (*env)->GetFloatField(env, sx1, floatW_val_fieldID); + if (!(nsparam = (*env)->GetPrimitiveArrayCritical(env, sparam, NULL))) goto fail; + srotmg_(&nsd1, &nsd2, &nsx1, &sy1, nsparam + offsetsparam); +done: + if (nsparam) (*env)->ReleasePrimitiveArrayCritical(env, sparam, nsparam, 0); + (*env)->SetFloatField(env, sx1, floatW_val_fieldID, nsx1); + (*env)->SetFloatField(env, sd2, floatW_val_fieldID, nsd2); + (*env)->SetFloatField(env, sd1, floatW_val_fieldID, nsd1); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*dsbmv_)(const char *uplo, int *n, int *k, double *alpha, double *a, int *lda, double *x, int *incx, double *beta, double *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_dsbmvK(JNIEnv *env, UNUSED jobject obj, - UNUSED jstring uplo, UNUSED jint n, UNUSED jint k, UNUSED jdouble alpha, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jdoubleArray x, UNUSED jint offsetx, UNUSED jint incx, UNUSED jdouble beta, UNUSED jdoubleArray y, UNUSED jint offsety, UNUSED jint incy) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + jstring uplo, jint n, jint k, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx, jdouble beta, jdoubleArray y, jint offsety, jint incy) { + jboolean failed = FALSE; + const char *nuplo = NULL; double *na = NULL, *nx = NULL, *ny = NULL; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + dsbmv_(nuplo, &n, &k, &alpha, na + offseta, &lda, nx + offsetx, &incx, &beta, ny + offsety, &incy); +done: + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*ssbmv_)(const char *uplo, int *n, int *k, float *alpha, float *a, int *lda, float *x, int *incx, float *beta, float *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_ssbmvK(JNIEnv *env, UNUSED jobject obj, - UNUSED jstring uplo, UNUSED jint n, UNUSED jint k, UNUSED jfloat alpha, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jfloatArray x, UNUSED jint offsetx, UNUSED jint incx, UNUSED jfloat beta, UNUSED jfloatArray y, UNUSED jint offsety, UNUSED jint incy) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + jstring uplo, jint n, jint k, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx, jfloat beta, jfloatArray y, jint offsety, jint incy) { + jboolean failed = FALSE; + const char *nuplo = NULL; float *na = NULL, *nx = NULL, *ny = NULL; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + ssbmv_(nuplo, &n, &k, &alpha, na + offseta, &lda, nx + offsetx, &incx, &beta, ny + offsety, &incy); +done: + if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*dscal_)(int *n, double *alpha, double *x, int *incx); From 48fe143fa8a619e5c940cbccb8a8cc6838380507 Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Fri, 30 Apr 2021 16:49:47 +0200 Subject: [PATCH 19/42] Fix bound condition check It triggered the "Vector API breaks JNI". Turns out testing just got better and uncovered a bug. --- .../java/dev/ludovic/netlib/blas/VectorBLAS.java | 4 ++-- .../java/dev/ludovic/netlib/blas/BLASTest.java | 15 ++++++--------- 2 files changed, 8 insertions(+), 11 deletions(-) diff --git a/blas/src/main/java/dev/ludovic/netlib/blas/VectorBLAS.java b/blas/src/main/java/dev/ludovic/netlib/blas/VectorBLAS.java index 1d566e58..3154d209 100644 --- a/blas/src/main/java/dev/ludovic/netlib/blas/VectorBLAS.java +++ b/blas/src/main/java/dev/ludovic/netlib/blas/VectorBLAS.java @@ -467,7 +467,7 @@ protected void dgemvT(int m, int n, double alpha, double[] a, int offseta, int l y[offsety + (col + 3)] = alpha * sum3; } } - for (; col < loopBound(n, 4); col += 4) { + for (; col < n; col += 1) { int row = 0; DoubleVector vsum0 = DoubleVector.zero(DMAX); for (; row < DMAX.loopBound(m); row += DMAX.length()) { @@ -608,7 +608,7 @@ protected void sgemvT(int m, int n, float alpha, float[] a, int offseta, int lda y[offsety + (col + 3)] = alpha * sum3; } } - for (; col < loopBound(n, 4); col += 4) { + for (; col < n; col += 1) { int row = 0; FloatVector vsum0 = FloatVector.zero(FMAX); for (; row < FMAX.loopBound(m); row += FMAX.length()) { diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/BLASTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/BLASTest.java index 1639640f..c98f1645 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/BLASTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/BLASTest.java @@ -47,22 +47,19 @@ private static Stream BLASImplementations() { String[] fullVersion = System.getProperty("java.version").split("[+.\\-]+", 2); int major = Integer.parseInt(fullVersion[0]); - if (major >= 11) { + if (major >= 8) { instances = Stream.concat(instances, Stream.of( - Arguments.of(dev.ludovic.netlib.blas.Java11BLAS.getInstance()) + Arguments.of(dev.ludovic.netlib.blas.Java8BLAS.getInstance()) )); - } else { + } + if (major >= 11) { instances = Stream.concat(instances, Stream.of( - Arguments.of(dev.ludovic.netlib.blas.Java8BLAS.getInstance()) + Arguments.of(dev.ludovic.netlib.blas.Java11BLAS.getInstance()) )); } if (major >= 16) { - /* FIXME: enabling VectorBLAS breaks JNI... */ - // instances = Stream.concat(instances, Stream.of( - // Arguments.of(dev.ludovic.netlib.blas.VectorBLAS.getInstance()), - // Arguments.of(dev.ludovic.netlib.blas.ForeignLinkerBLAS.getInstance()) - // )); instances = Stream.concat(instances, Stream.of( + Arguments.of(dev.ludovic.netlib.blas.VectorBLAS.getInstance()), Arguments.of(dev.ludovic.netlib.blas.ForeignLinkerBLAS.getInstance()) )); } From 0b25182b4e5f87018545eeedc12d43a5b97ac586 Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Fri, 30 Apr 2021 16:51:03 +0200 Subject: [PATCH 20/42] Add code coverage information --- pom.xml | 22 +++++++++++++++++++++- 1 file changed, 21 insertions(+), 1 deletion(-) diff --git a/pom.xml b/pom.xml index 400c1d07..b37ae628 100644 --- a/pom.xml +++ b/pom.xml @@ -139,6 +139,26 @@ information or have any questions. + + + org.jacoco + jacoco-maven-plugin + 0.8.6 + + + + prepare-agent + + + + report + test + + report + + + + @@ -197,7 +217,7 @@ information or have any questions. maven-surefire-plugin 3.0.0-M5 - ${jvm.modules} -Dforeign.restricted=permit + ${argLine} ${jvm.modules} -Dforeign.restricted=permit From f09c81ffa133442156524b5b868a5f3085e7bbf5 Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Fri, 30 Apr 2021 18:01:54 +0200 Subject: [PATCH 21/42] Add scaffolding for JNIARPACK --- arpack/pom.xml | 15 +- .../java/dev/ludovic/netlib/JavaARPACK.java | 2 +- .../java/dev/ludovic/netlib/NativeARPACK.java | 4 +- .../{NetlibWrapper.java => F2jARPACK.java} | 126 ++-- .../dev/ludovic/netlib/arpack/JNIARPACK.java | 182 ++++++ arpack/src/main/native/Makefile | 33 + arpack/src/main/native/jni.c | 618 ++++++++++++++++++ .../dev/ludovic/netlib/arpack/ARPACKTest.java | 14 +- .../ludovic/netlib/arpack/DsaupdTest.java} | 24 +- .../ludovic/netlib/arpack/DseupdTest.java} | 26 +- .../benchmarks/arpack/ARPACKBenchmark.java | 2 +- 11 files changed, 934 insertions(+), 112 deletions(-) rename arpack/src/main/java/dev/ludovic/netlib/arpack/{NetlibWrapper.java => F2jARPACK.java} (64%) create mode 100644 arpack/src/main/java/dev/ludovic/netlib/arpack/JNIARPACK.java create mode 100644 arpack/src/main/native/Makefile create mode 100644 arpack/src/main/native/jni.c rename arpack/src/{main/java/dev/ludovic/netlib/arpack/NetlibF2jARPACK.java => test/java/dev/ludovic/netlib/arpack/DsaupdTest.java} (73%) rename arpack/src/{main/java/dev/ludovic/netlib/arpack/NetlibNativeARPACK.java => test/java/dev/ludovic/netlib/arpack/DseupdTest.java} (65%) diff --git a/arpack/pom.xml b/arpack/pom.xml index e47605a7..beef7884 100644 --- a/arpack/pom.xml +++ b/arpack/pom.xml @@ -41,14 +41,13 @@ information or have any questions. 5.5.2 - 1.1.2 - com.github.fommil.netlib - core - ${netlib.java.version} + net.sourceforge.f2j + arpack_combined_all + 0.1 @@ -64,4 +63,12 @@ information or have any questions. test + + + + + maven-antrun-plugin + + + diff --git a/arpack/src/main/java/dev/ludovic/netlib/JavaARPACK.java b/arpack/src/main/java/dev/ludovic/netlib/JavaARPACK.java index a04e181e..9f61d35e 100644 --- a/arpack/src/main/java/dev/ludovic/netlib/JavaARPACK.java +++ b/arpack/src/main/java/dev/ludovic/netlib/JavaARPACK.java @@ -28,6 +28,6 @@ public interface JavaARPACK extends ARPACK { public static JavaARPACK getInstance() { - return dev.ludovic.netlib.arpack.NetlibF2jARPACK.getInstance(); + return dev.ludovic.netlib.arpack.F2jARPACK.getInstance(); } } diff --git a/arpack/src/main/java/dev/ludovic/netlib/NativeARPACK.java b/arpack/src/main/java/dev/ludovic/netlib/NativeARPACK.java index 2a27faed..faaa0b4c 100644 --- a/arpack/src/main/java/dev/ludovic/netlib/NativeARPACK.java +++ b/arpack/src/main/java/dev/ludovic/netlib/NativeARPACK.java @@ -32,9 +32,9 @@ public interface NativeARPACK extends ARPACK { public static NativeARPACK getInstance() { try { - return dev.ludovic.netlib.arpack.NetlibNativeARPACK.getInstance(); + return dev.ludovic.netlib.arpack.JNIARPACK.getInstance(); } catch (Throwable t) { - Logger.getLogger(NativeARPACK.class.getName()).warning("Failed to load implementation from:dev.ludovic.netlib.arpack.NetlibNativeARPACK"); + Logger.getLogger(NativeARPACK.class.getName()).warning("Failed to load implementation from:dev.ludovic.netlib.arpack.JNIARPACK"); } throw new RuntimeException("Unable to load native implementation"); } diff --git a/arpack/src/main/java/dev/ludovic/netlib/arpack/NetlibWrapper.java b/arpack/src/main/java/dev/ludovic/netlib/arpack/F2jARPACK.java similarity index 64% rename from arpack/src/main/java/dev/ludovic/netlib/arpack/NetlibWrapper.java rename to arpack/src/main/java/dev/ludovic/netlib/arpack/F2jARPACK.java index 9e92586b..3ec23ce7 100644 --- a/arpack/src/main/java/dev/ludovic/netlib/arpack/NetlibWrapper.java +++ b/arpack/src/main/java/dev/ludovic/netlib/arpack/F2jARPACK.java @@ -27,243 +27,245 @@ import dev.ludovic.netlib.ARPACK; -abstract class NetlibWrapper extends AbstractARPACK { +public final class F2jARPACK extends AbstractARPACK implements dev.ludovic.netlib.JavaARPACK { - private final com.github.fommil.netlib.ARPACK arpack; + private static final F2jARPACK instance = new F2jARPACK(); - protected NetlibWrapper(com.github.fommil.netlib.ARPACK _arpack) { - arpack = _arpack; + protected F2jARPACK() {} + + public static dev.ludovic.netlib.JavaARPACK getInstance() { + return instance; } protected void dmoutK(int lout, int m, int n, double[] a, int offseta, int lda, int idigit, String ifmt) { - arpack.dmout(lout, m, n, a, offseta, lda, idigit, ifmt); + org.netlib.arpack.Dmout.dmout(lout, m, n, a, offseta, lda, idigit, ifmt); } protected void smoutK(int lout, int m, int n, float[] a, int offseta, int lda, int idigit, String ifmt) { - arpack.smout(lout, m, n, a, offseta, lda, idigit, ifmt); + org.netlib.arpack.Smout.smout(lout, m, n, a, offseta, lda, idigit, ifmt); } protected void dvoutK(int lout, int n, double[] sx, int offsetsx, int idigit, String ifmt) { - arpack.dvout(lout, n, sx, offsetsx, idigit, ifmt); + org.netlib.arpack.Dvout.dvout(lout, n, sx, offsetsx, idigit, ifmt); } protected void svoutK(int lout, int n, float[] sx, int offsetsx, int idigit, String ifmt) { - arpack.svout(lout, n, sx, offsetsx, idigit, ifmt); + org.netlib.arpack.Svout.svout(lout, n, sx, offsetsx, idigit, ifmt); } protected void ivoutK(int lout, int n, int[] ix, int offsetix, int idigit, String ifmt) { - arpack.ivout(lout, n, ix, offsetix, idigit, ifmt); + org.netlib.arpack.Ivout.ivout(lout, n, ix, offsetix, idigit, ifmt); } protected void dgetv0K(org.netlib.util.intW ido, String bmat, int itry, boolean initv, int n, int j, double[] v, int offsetv, int ldv, double[] resid, int offsetresid, org.netlib.util.doubleW rnorm, int[] ipntr, int offsetipntr, double[] workd, int offsetworkd, org.netlib.util.intW ierr) { - arpack.dgetv0(ido, bmat, itry, initv, n, j, v, offsetv, ldv, resid, offsetresid, rnorm, ipntr, offsetipntr, workd, offsetworkd, ierr); + org.netlib.arpack.Dgetv0.dgetv0(ido, bmat, itry, initv, n, j, v, offsetv, ldv, resid, offsetresid, rnorm, ipntr, offsetipntr, workd, offsetworkd, ierr); } protected void sgetv0K(org.netlib.util.intW ido, String bmat, int itry, boolean initv, int n, int j, float[] v, int offsetv, int ldv, float[] resid, int offsetresid, org.netlib.util.floatW rnorm, int[] ipntr, int offsetipntr, float[] workd, int offsetworkd, org.netlib.util.intW ierr) { - arpack.sgetv0(ido, bmat, itry, initv, n, j, v, offsetv, ldv, resid, offsetresid, rnorm, ipntr, offsetipntr, workd, offsetworkd, ierr); + org.netlib.arpack.Sgetv0.sgetv0(ido, bmat, itry, initv, n, j, v, offsetv, ldv, resid, offsetresid, rnorm, ipntr, offsetipntr, workd, offsetworkd, ierr); } protected void dlaqrbK(boolean wantt, int n, int ilo, int ihi, double[] h, int offseth, int ldh, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] z, int offsetz, org.netlib.util.intW info) { - arpack.dlaqrb(wantt, n, ilo, ihi, h, offseth, ldh, wr, offsetwr, wi, offsetwi, z, offsetz, info); + org.netlib.arpack.Dlaqrb.dlaqrb(wantt, n, ilo, ihi, h, offseth, ldh, wr, offsetwr, wi, offsetwi, z, offsetz, info); } protected void slaqrbK(boolean wantt, int n, int ilo, int ihi, float[] h, int offseth, int ldh, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] z, int offsetz, org.netlib.util.intW info) { - arpack.slaqrb(wantt, n, ilo, ihi, h, offseth, ldh, wr, offsetwr, wi, offsetwi, z, offsetz, info); + org.netlib.arpack.Slaqrb.slaqrb(wantt, n, ilo, ihi, h, offseth, ldh, wr, offsetwr, wi, offsetwi, z, offsetz, info); } protected void dnaitrK(org.netlib.util.intW ido, String bmat, int n, int k, int np, int nb, double[] resid, int offsetresid, org.netlib.util.doubleW rnorm, double[] v, int offsetv, int ldv, double[] h, int offseth, int ldh, int[] ipntr, int offsetipntr, double[] workd, int offsetworkd, org.netlib.util.intW info) { - arpack.dnaitr(ido, bmat, n, k, np, nb, resid, offsetresid, rnorm, v, offsetv, ldv, h, offseth, ldh, ipntr, offsetipntr, workd, offsetworkd, info); + org.netlib.arpack.Dnaitr.dnaitr(ido, bmat, n, k, np, nb, resid, offsetresid, rnorm, v, offsetv, ldv, h, offseth, ldh, ipntr, offsetipntr, workd, offsetworkd, info); } protected void snaitrK(org.netlib.util.intW ido, String bmat, int n, int k, int np, int nb, float[] resid, int offsetresid, org.netlib.util.floatW rnorm, float[] v, int offsetv, int ldv, float[] h, int offseth, int ldh, int[] ipntr, int offsetipntr, float[] workd, int offsetworkd, org.netlib.util.intW info) { - arpack.snaitr(ido, bmat, n, k, np, nb, resid, offsetresid, rnorm, v, offsetv, ldv, h, offseth, ldh, ipntr, offsetipntr, workd, offsetworkd, info); + org.netlib.arpack.Snaitr.snaitr(ido, bmat, n, k, np, nb, resid, offsetresid, rnorm, v, offsetv, ldv, h, offseth, ldh, ipntr, offsetipntr, workd, offsetworkd, info); } protected void dnappsK(int n, org.netlib.util.intW kev, int np, double[] shiftr, int offsetshiftr, double[] shifti, int offsetshifti, double[] v, int offsetv, int ldv, double[] h, int offseth, int ldh, double[] resid, int offsetresid, double[] q, int offsetq, int ldq, double[] workl, int offsetworkl, double[] workd, int offsetworkd) { - arpack.dnapps(n, kev, np, shiftr, offsetshiftr, shifti, offsetshifti, v, offsetv, ldv, h, offseth, ldh, resid, offsetresid, q, offsetq, ldq, workl, offsetworkl, workd, offsetworkd); + org.netlib.arpack.Dnapps.dnapps(n, kev, np, shiftr, offsetshiftr, shifti, offsetshifti, v, offsetv, ldv, h, offseth, ldh, resid, offsetresid, q, offsetq, ldq, workl, offsetworkl, workd, offsetworkd); } protected void snappsK(int n, org.netlib.util.intW kev, int np, float[] shiftr, int offsetshiftr, float[] shifti, int offsetshifti, float[] v, int offsetv, int ldv, float[] h, int offseth, int ldh, float[] resid, int offsetresid, float[] q, int offsetq, int ldq, float[] workl, int offsetworkl, float[] workd, int offsetworkd) { - arpack.snapps(n, kev, np, shiftr, offsetshiftr, shifti, offsetshifti, v, offsetv, ldv, h, offseth, ldh, resid, offsetresid, q, offsetq, ldq, workl, offsetworkl, workd, offsetworkd); + org.netlib.arpack.Snapps.snapps(n, kev, np, shiftr, offsetshiftr, shifti, offsetshifti, v, offsetv, ldv, h, offseth, ldh, resid, offsetresid, q, offsetq, ldq, workl, offsetworkl, workd, offsetworkd); } protected void dnaup2K(org.netlib.util.intW ido, String bmat, int n, String which, org.netlib.util.intW nev, org.netlib.util.intW np, double tol, double[] resid, int offsetresid, int mode, int iupd, int ishift, org.netlib.util.intW mxiter, double[] v, int offsetv, int ldv, double[] h, int offseth, int ldh, double[] ritzr, int offsetritzr, double[] ritzi, int offsetritzi, double[] bounds, int offsetbounds, double[] q, int offsetq, int ldq, double[] workl, int offsetworkl, int[] ipntr, int offsetipntr, double[] workd, int offsetworkd, org.netlib.util.intW info) { - arpack.dnaup2(ido, bmat, n, which, nev, np, tol, resid, offsetresid, mode, iupd, ishift, mxiter, v, offsetv, ldv, h, offseth, ldh, ritzr, offsetritzr, ritzi, offsetritzi, bounds, offsetbounds, q, offsetq, ldq, workl, offsetworkl, ipntr, offsetipntr, workd, offsetworkd, info); + org.netlib.arpack.Dnaup2.dnaup2(ido, bmat, n, which, nev, np, tol, resid, offsetresid, mode, iupd, ishift, mxiter, v, offsetv, ldv, h, offseth, ldh, ritzr, offsetritzr, ritzi, offsetritzi, bounds, offsetbounds, q, offsetq, ldq, workl, offsetworkl, ipntr, offsetipntr, workd, offsetworkd, info); } protected void snaup2K(org.netlib.util.intW ido, String bmat, int n, String which, org.netlib.util.intW nev, org.netlib.util.intW np, float tol, float[] resid, int offsetresid, int mode, int iupd, int ishift, org.netlib.util.intW mxiter, float[] v, int offsetv, int ldv, float[] h, int offseth, int ldh, float[] ritzr, int offsetritzr, float[] ritzi, int offsetritzi, float[] bounds, int offsetbounds, float[] q, int offsetq, int ldq, float[] workl, int offsetworkl, int[] ipntr, int offsetipntr, float[] workd, int offsetworkd, org.netlib.util.intW info) { - arpack.snaup2(ido, bmat, n, which, nev, np, tol, resid, offsetresid, mode, iupd, ishift, mxiter, v, offsetv, ldv, h, offseth, ldh, ritzr, offsetritzr, ritzi, offsetritzi, bounds, offsetbounds, q, offsetq, ldq, workl, offsetworkl, ipntr, offsetipntr, workd, offsetworkd, info); + org.netlib.arpack.Snaup2.snaup2(ido, bmat, n, which, nev, np, tol, resid, offsetresid, mode, iupd, ishift, mxiter, v, offsetv, ldv, h, offseth, ldh, ritzr, offsetritzr, ritzi, offsetritzi, bounds, offsetbounds, q, offsetq, ldq, workl, offsetworkl, ipntr, offsetipntr, workd, offsetworkd, info); } protected void dnaupdK(org.netlib.util.intW ido, String bmat, int n, String which, int nev, org.netlib.util.doubleW tol, double[] resid, int offsetresid, int ncv, double[] v, int offsetv, int ldv, int[] iparam, int offsetiparam, int[] ipntr, int offsetipntr, double[] workd, int offsetworkd, double[] workl, int offsetworkl, int lworkl, org.netlib.util.intW info) { - arpack.dnaupd(ido, bmat, n, which, nev, tol, resid, offsetresid, ncv, v, offsetv, ldv, iparam, offsetiparam, ipntr, offsetipntr, workd, offsetworkd, workl, offsetworkl, lworkl, info); + org.netlib.arpack.Dnaupd.dnaupd(ido, bmat, n, which, nev, tol, resid, offsetresid, ncv, v, offsetv, ldv, iparam, offsetiparam, ipntr, offsetipntr, workd, offsetworkd, workl, offsetworkl, lworkl, info); } protected void snaupdK(org.netlib.util.intW ido, String bmat, int n, String which, int nev, org.netlib.util.floatW tol, float[] resid, int offsetresid, int ncv, float[] v, int offsetv, int ldv, int[] iparam, int offsetiparam, int[] ipntr, int offsetipntr, float[] workd, int offsetworkd, float[] workl, int offsetworkl, int lworkl, org.netlib.util.intW info) { - arpack.snaupd(ido, bmat, n, which, nev, tol, resid, offsetresid, ncv, v, offsetv, ldv, iparam, offsetiparam, ipntr, offsetipntr, workd, offsetworkd, workl, offsetworkl, lworkl, info); + org.netlib.arpack.Snaupd.snaupd(ido, bmat, n, which, nev, tol, resid, offsetresid, ncv, v, offsetv, ldv, iparam, offsetiparam, ipntr, offsetipntr, workd, offsetworkd, workl, offsetworkl, lworkl, info); } protected void dnconvK(int n, double[] ritzr, int offsetritzr, double[] ritzi, int offsetritzi, double[] bounds, int offsetbounds, double tol, org.netlib.util.intW nconv) { - arpack.dnconv(n, ritzr, offsetritzr, ritzi, offsetritzi, bounds, offsetbounds, tol, nconv); + org.netlib.arpack.Dnconv.dnconv(n, ritzr, offsetritzr, ritzi, offsetritzi, bounds, offsetbounds, tol, nconv); } protected void snconvK(int n, float[] ritzr, int offsetritzr, float[] ritzi, int offsetritzi, float[] bounds, int offsetbounds, float tol, org.netlib.util.intW nconv) { - arpack.snconv(n, ritzr, offsetritzr, ritzi, offsetritzi, bounds, offsetbounds, tol, nconv); + org.netlib.arpack.Snconv.snconv(n, ritzr, offsetritzr, ritzi, offsetritzi, bounds, offsetbounds, tol, nconv); } protected void dsconvK(int n, double[] ritz, int offsetritz, double[] bounds, int offsetbounds, double tol, org.netlib.util.intW nconv) { - arpack.dsconv(n, ritz, offsetritz, bounds, offsetbounds, tol, nconv); + org.netlib.arpack.Dsconv.dsconv(n, ritz, offsetritz, bounds, offsetbounds, tol, nconv); } protected void ssconvK(int n, float[] ritz, int offsetritz, float[] bounds, int offsetbounds, float tol, org.netlib.util.intW nconv) { - arpack.ssconv(n, ritz, offsetritz, bounds, offsetbounds, tol, nconv); + org.netlib.arpack.Ssconv.ssconv(n, ritz, offsetritz, bounds, offsetbounds, tol, nconv); } protected void dneighK(double rnorm, org.netlib.util.intW n, double[] h, int offseth, int ldh, double[] ritzr, int offsetritzr, double[] ritzi, int offsetritzi, double[] bounds, int offsetbounds, double[] q, int offsetq, int ldq, double[] workl, int offsetworkl, org.netlib.util.intW ierr) { - arpack.dneigh(rnorm, n, h, offseth, ldh, ritzr, offsetritzr, ritzi, offsetritzi, bounds, offsetbounds, q, offsetq, ldq, workl, offsetworkl, ierr); + org.netlib.arpack.Dneigh.dneigh(rnorm, n, h, offseth, ldh, ritzr, offsetritzr, ritzi, offsetritzi, bounds, offsetbounds, q, offsetq, ldq, workl, offsetworkl, ierr); } protected void sneighK(float rnorm, org.netlib.util.intW n, float[] h, int offseth, int ldh, float[] ritzr, int offsetritzr, float[] ritzi, int offsetritzi, float[] bounds, int offsetbounds, float[] q, int offsetq, int ldq, float[] workl, int offsetworkl, org.netlib.util.intW ierr) { - arpack.sneigh(rnorm, n, h, offseth, ldh, ritzr, offsetritzr, ritzi, offsetritzi, bounds, offsetbounds, q, offsetq, ldq, workl, offsetworkl, ierr); + org.netlib.arpack.Sneigh.sneigh(rnorm, n, h, offseth, ldh, ritzr, offsetritzr, ritzi, offsetritzi, bounds, offsetbounds, q, offsetq, ldq, workl, offsetworkl, ierr); } protected void dneupdK(boolean rvec, String howmny, boolean[] select, int offsetselect, double[] dr, int offsetdr, double[] di, int offsetdi, double[] z, int offsetz, int ldz, double sigmar, double sigmai, double[] workev, int offsetworkev, String bmat, int n, String which, org.netlib.util.intW nev, double tol, double[] resid, int offsetresid, int ncv, double[] v, int offsetv, int ldv, int[] iparam, int offsetiparam, int[] ipntr, int offsetipntr, double[] workd, int offsetworkd, double[] workl, int offsetworkl, int lworkl, org.netlib.util.intW info) { - arpack.dneupd(rvec, howmny, select, offsetselect, dr, offsetdr, di, offsetdi, z, offsetz, ldz, sigmar, sigmai, workev, offsetworkev, bmat, n, which, nev, tol, resid, offsetresid, ncv, v, offsetv, ldv, iparam, offsetiparam, ipntr, offsetipntr, workd, offsetworkd, workl, offsetworkl, lworkl, info); + org.netlib.arpack.Dneupd.dneupd(rvec, howmny, select, offsetselect, dr, offsetdr, di, offsetdi, z, offsetz, ldz, sigmar, sigmai, workev, offsetworkev, bmat, n, which, nev, tol, resid, offsetresid, ncv, v, offsetv, ldv, iparam, offsetiparam, ipntr, offsetipntr, workd, offsetworkd, workl, offsetworkl, lworkl, info); } protected void sneupdK(boolean rvec, String howmny, boolean[] select, int offsetselect, float[] dr, int offsetdr, float[] di, int offsetdi, float[] z, int offsetz, int ldz, float sigmar, float sigmai, float[] workev, int offsetworkev, String bmat, int n, String which, org.netlib.util.intW nev, float tol, float[] resid, int offsetresid, int ncv, float[] v, int offsetv, int ldv, int[] iparam, int offsetiparam, int[] ipntr, int offsetipntr, float[] workd, int offsetworkd, float[] workl, int offsetworkl, int lworkl, org.netlib.util.intW info) { - arpack.sneupd(rvec, howmny, select, offsetselect, dr, offsetdr, di, offsetdi, z, offsetz, ldz, sigmar, sigmai, workev, offsetworkev, bmat, n, which, nev, tol, resid, offsetresid, ncv, v, offsetv, ldv, iparam, offsetiparam, ipntr, offsetipntr, workd, offsetworkd, workl, offsetworkl, lworkl, info); + org.netlib.arpack.Sneupd.sneupd(rvec, howmny, select, offsetselect, dr, offsetdr, di, offsetdi, z, offsetz, ldz, sigmar, sigmai, workev, offsetworkev, bmat, n, which, nev, tol, resid, offsetresid, ncv, v, offsetv, ldv, iparam, offsetiparam, ipntr, offsetipntr, workd, offsetworkd, workl, offsetworkl, lworkl, info); } protected void dngetsK(int ishift, String which, org.netlib.util.intW kev, org.netlib.util.intW np, double[] ritzr, int offsetritzr, double[] ritzi, int offsetritzi, double[] bounds, int offsetbounds, double[] shiftr, int offsetshiftr, double[] shifti, int offsetshifti) { - arpack.dngets(ishift, which, kev, np, ritzr, offsetritzr, ritzi, offsetritzi, bounds, offsetbounds, shiftr, offsetshiftr, shifti, offsetshifti); + org.netlib.arpack.Dngets.dngets(ishift, which, kev, np, ritzr, offsetritzr, ritzi, offsetritzi, bounds, offsetbounds, shiftr, offsetshiftr, shifti, offsetshifti); } protected void sngetsK(int ishift, String which, org.netlib.util.intW kev, org.netlib.util.intW np, float[] ritzr, int offsetritzr, float[] ritzi, int offsetritzi, float[] bounds, int offsetbounds, float[] shiftr, int offsetshiftr, float[] shifti, int offsetshifti) { - arpack.sngets(ishift, which, kev, np, ritzr, offsetritzr, ritzi, offsetritzi, bounds, offsetbounds, shiftr, offsetshiftr, shifti, offsetshifti); + org.netlib.arpack.Sngets.sngets(ishift, which, kev, np, ritzr, offsetritzr, ritzi, offsetritzi, bounds, offsetbounds, shiftr, offsetshiftr, shifti, offsetshifti); } protected void dsaitrK(org.netlib.util.intW ido, String bmat, int n, int k, int np, int mode, double[] resid, int offsetresid, org.netlib.util.doubleW rnorm, double[] v, int offsetv, int ldv, double[] h, int offseth, int ldh, int[] ipntr, int offsetipntr, double[] workd, int offsetworkd, org.netlib.util.intW info) { - arpack.dsaitr(ido, bmat, n, k, np, mode, resid, offsetresid, rnorm, v, offsetv, ldv, h, offseth, ldh, ipntr, offsetipntr, workd, offsetworkd, info); + org.netlib.arpack.Dsaitr.dsaitr(ido, bmat, n, k, np, mode, resid, offsetresid, rnorm, v, offsetv, ldv, h, offseth, ldh, ipntr, offsetipntr, workd, offsetworkd, info); } protected void ssaitrK(org.netlib.util.intW ido, String bmat, int n, int k, int np, int mode, float[] resid, int offsetresid, org.netlib.util.floatW rnorm, float[] v, int offsetv, int ldv, float[] h, int offseth, int ldh, int[] ipntr, int offsetipntr, float[] workd, int offsetworkd, org.netlib.util.intW info) { - arpack.ssaitr(ido, bmat, n, k, np, mode, resid, offsetresid, rnorm, v, offsetv, ldv, h, offseth, ldh, ipntr, offsetipntr, workd, offsetworkd, info); + org.netlib.arpack.Ssaitr.ssaitr(ido, bmat, n, k, np, mode, resid, offsetresid, rnorm, v, offsetv, ldv, h, offseth, ldh, ipntr, offsetipntr, workd, offsetworkd, info); } protected void dsappsK(int n, int kev, int np, double[] shift, int offsetshift, double[] v, int offsetv, int ldv, double[] h, int offseth, int ldh, double[] resid, int offsetresid, double[] q, int offsetq, int ldq, double[] workd, int offsetworkd) { - arpack.dsapps(n, kev, np, shift, offsetshift, v, offsetv, ldv, h, offseth, ldh, resid, offsetresid, q, offsetq, ldq, workd, offsetworkd); + org.netlib.arpack.Dsapps.dsapps(n, kev, np, shift, offsetshift, v, offsetv, ldv, h, offseth, ldh, resid, offsetresid, q, offsetq, ldq, workd, offsetworkd); } protected void ssappsK(int n, int kev, int np, float[] shift, int offsetshift, float[] v, int offsetv, int ldv, float[] h, int offseth, int ldh, float[] resid, int offsetresid, float[] q, int offsetq, int ldq, float[] workd, int offsetworkd) { - arpack.ssapps(n, kev, np, shift, offsetshift, v, offsetv, ldv, h, offseth, ldh, resid, offsetresid, q, offsetq, ldq, workd, offsetworkd); + org.netlib.arpack.Ssapps.ssapps(n, kev, np, shift, offsetshift, v, offsetv, ldv, h, offseth, ldh, resid, offsetresid, q, offsetq, ldq, workd, offsetworkd); } protected void dsaup2K(org.netlib.util.intW ido, String bmat, int n, String which, org.netlib.util.intW nev, org.netlib.util.intW np, double tol, double[] resid, int offsetresid, int mode, int iupd, int ishift, org.netlib.util.intW mxiter, double[] v, int offsetv, int ldv, double[] h, int offseth, int ldh, double[] ritz, int offsetritz, double[] bounds, int offsetbounds, double[] q, int offsetq, int ldq, double[] workl, int offsetworkl, int[] ipntr, int offsetipntr, double[] workd, int offsetworkd, org.netlib.util.intW info) { - arpack.dsaup2(ido, bmat, n, which, nev, np, tol, resid, offsetresid, mode, iupd, ishift, mxiter, v, offsetv, ldv, h, offseth, ldh, ritz, offsetritz, bounds, offsetbounds, q, offsetq, ldq, workl, offsetworkl, ipntr, offsetipntr, workd, offsetworkd, info); + org.netlib.arpack.Dsaup2.dsaup2(ido, bmat, n, which, nev, np, tol, resid, offsetresid, mode, iupd, ishift, mxiter, v, offsetv, ldv, h, offseth, ldh, ritz, offsetritz, bounds, offsetbounds, q, offsetq, ldq, workl, offsetworkl, ipntr, offsetipntr, workd, offsetworkd, info); } protected void ssaup2K(org.netlib.util.intW ido, String bmat, int n, String which, org.netlib.util.intW nev, org.netlib.util.intW np, float tol, float[] resid, int offsetresid, int mode, int iupd, int ishift, org.netlib.util.intW mxiter, float[] v, int offsetv, int ldv, float[] h, int offseth, int ldh, float[] ritz, int offsetritz, float[] bounds, int offsetbounds, float[] q, int offsetq, int ldq, float[] workl, int offsetworkl, int[] ipntr, int offsetipntr, float[] workd, int offsetworkd, org.netlib.util.intW info) { - arpack.ssaup2(ido, bmat, n, which, nev, np, tol, resid, offsetresid, mode, iupd, ishift, mxiter, v, offsetv, ldv, h, offseth, ldh, ritz, offsetritz, bounds, offsetbounds, q, offsetq, ldq, workl, offsetworkl, ipntr, offsetipntr, workd, offsetworkd, info); + org.netlib.arpack.Ssaup2.ssaup2(ido, bmat, n, which, nev, np, tol, resid, offsetresid, mode, iupd, ishift, mxiter, v, offsetv, ldv, h, offseth, ldh, ritz, offsetritz, bounds, offsetbounds, q, offsetq, ldq, workl, offsetworkl, ipntr, offsetipntr, workd, offsetworkd, info); } protected void dseigtK(double rnorm, int n, double[] h, int offseth, int ldh, double[] eig, int offseteig, double[] bounds, int offsetbounds, double[] workl, int offsetworkl, org.netlib.util.intW ierr) { - arpack.dseigt(rnorm, n, h, offseth, ldh, eig, offseteig, bounds, offsetbounds, workl, offsetworkl, ierr); + org.netlib.arpack.Dseigt.dseigt(rnorm, n, h, offseth, ldh, eig, offseteig, bounds, offsetbounds, workl, offsetworkl, ierr); } protected void sseigtK(float rnorm, int n, float[] h, int offseth, int ldh, float[] eig, int offseteig, float[] bounds, int offsetbounds, float[] workl, int offsetworkl, org.netlib.util.intW ierr) { - arpack.sseigt(rnorm, n, h, offseth, ldh, eig, offseteig, bounds, offsetbounds, workl, offsetworkl, ierr); + org.netlib.arpack.Sseigt.sseigt(rnorm, n, h, offseth, ldh, eig, offseteig, bounds, offsetbounds, workl, offsetworkl, ierr); } protected void dsesrtK(String which, boolean apply, int n, double[] x, int offsetx, int na, double[] a, int offseta, int lda) { - arpack.dsesrt(which, apply, n, x, offsetx, na, a, offseta, lda); + org.netlib.arpack.Dsesrt.dsesrt(which, apply, n, x, offsetx, na, a, offseta, lda); } protected void ssesrtK(String which, boolean apply, int n, float[] x, int offsetx, int na, float[] a, int offseta, int lda) { - arpack.ssesrt(which, apply, n, x, offsetx, na, a, offseta, lda); + org.netlib.arpack.Ssesrt.ssesrt(which, apply, n, x, offsetx, na, a, offseta, lda); } protected void dsaupdK(org.netlib.util.intW ido, String bmat, int n, String which, int nev, org.netlib.util.doubleW tol, double[] resid, int offsetresid, int ncv, double[] v, int offsetv, int ldv, int[] iparam, int offsetiparam, int[] ipntr, int offsetipntr, double[] workd, int offsetworkd, double[] workl, int offsetworkl, int lworkl, org.netlib.util.intW info) { - arpack.dsaupd(ido, bmat, n, which, nev, tol, resid, offsetresid, ncv, v, offsetv, ldv, iparam, offsetiparam, ipntr, offsetipntr, workd, offsetworkd, workl, offsetworkl, lworkl, info); + org.netlib.arpack.Dsaupd.dsaupd(ido, bmat, n, which, nev, tol, resid, offsetresid, ncv, v, offsetv, ldv, iparam, offsetiparam, ipntr, offsetipntr, workd, offsetworkd, workl, offsetworkl, lworkl, info); } protected void ssaupdK(org.netlib.util.intW ido, String bmat, int n, String which, int nev, org.netlib.util.floatW tol, float[] resid, int offsetresid, int ncv, float[] v, int offsetv, int ldv, int[] iparam, int offsetiparam, int[] ipntr, int offsetipntr, float[] workd, int offsetworkd, float[] workl, int offsetworkl, int lworkl, org.netlib.util.intW info) { - arpack.ssaupd(ido, bmat, n, which, nev, tol, resid, offsetresid, ncv, v, offsetv, ldv, iparam, offsetiparam, ipntr, offsetipntr, workd, offsetworkd, workl, offsetworkl, lworkl, info); + org.netlib.arpack.Ssaupd.ssaupd(ido, bmat, n, which, nev, tol, resid, offsetresid, ncv, v, offsetv, ldv, iparam, offsetiparam, ipntr, offsetipntr, workd, offsetworkd, workl, offsetworkl, lworkl, info); } protected void dseupdK(boolean rvec, String howmny, boolean[] select, int offsetselect, double[] d, int offsetd, double[] z, int offsetz, int ldz, double sigma, String bmat, int n, String which, org.netlib.util.intW nev, double tol, double[] resid, int offsetresid, int ncv, double[] v, int offsetv, int ldv, int[] iparam, int offsetiparam, int[] ipntr, int offsetipntr, double[] workd, int offsetworkd, double[] workl, int offsetworkl, int lworkl, org.netlib.util.intW info) { - arpack.dseupd(rvec, howmny, select, offsetselect, d, offsetd, z, offsetz, ldz, sigma, bmat, n, which, nev, tol, resid, offsetresid, ncv, v, offsetv, ldv, iparam, offsetiparam, ipntr, offsetipntr, workd, offsetworkd, workl, offsetworkl, lworkl, info); + org.netlib.arpack.Dseupd.dseupd(rvec, howmny, select, offsetselect, d, offsetd, z, offsetz, ldz, sigma, bmat, n, which, nev, tol, resid, offsetresid, ncv, v, offsetv, ldv, iparam, offsetiparam, ipntr, offsetipntr, workd, offsetworkd, workl, offsetworkl, lworkl, info); } protected void sseupdK(boolean rvec, String howmny, boolean[] select, int offsetselect, float[] d, int offsetd, float[] z, int offsetz, int ldz, float sigma, String bmat, int n, String which, org.netlib.util.intW nev, float tol, float[] resid, int offsetresid, int ncv, float[] v, int offsetv, int ldv, int[] iparam, int offsetiparam, int[] ipntr, int offsetipntr, float[] workd, int offsetworkd, float[] workl, int offsetworkl, int lworkl, org.netlib.util.intW info) { - arpack.sseupd(rvec, howmny, select, offsetselect, d, offsetd, z, offsetz, ldz, sigma, bmat, n, which, nev, tol, resid, offsetresid, ncv, v, offsetv, ldv, iparam, offsetiparam, ipntr, offsetipntr, workd, offsetworkd, workl, offsetworkl, lworkl, info); + org.netlib.arpack.Sseupd.sseupd(rvec, howmny, select, offsetselect, d, offsetd, z, offsetz, ldz, sigma, bmat, n, which, nev, tol, resid, offsetresid, ncv, v, offsetv, ldv, iparam, offsetiparam, ipntr, offsetipntr, workd, offsetworkd, workl, offsetworkl, lworkl, info); } protected void dsgetsK(int ishift, String which, org.netlib.util.intW kev, org.netlib.util.intW np, double[] ritz, int offsetritz, double[] bounds, int offsetbounds, double[] shifts, int offsetshifts) { - arpack.dsgets(ishift, which, kev, np, ritz, offsetritz, bounds, offsetbounds, shifts, offsetshifts); + org.netlib.arpack.Dsgets.dsgets(ishift, which, kev, np, ritz, offsetritz, bounds, offsetbounds, shifts, offsetshifts); } protected void ssgetsK(int ishift, String which, org.netlib.util.intW kev, org.netlib.util.intW np, float[] ritz, int offsetritz, float[] bounds, int offsetbounds, float[] shifts, int offsetshifts) { - arpack.ssgets(ishift, which, kev, np, ritz, offsetritz, bounds, offsetbounds, shifts, offsetshifts); + org.netlib.arpack.Ssgets.ssgets(ishift, which, kev, np, ritz, offsetritz, bounds, offsetbounds, shifts, offsetshifts); } protected void dsortcK(String which, boolean apply, int n, double[] xreal, int offsetxreal, double[] ximag, int offsetximag, double[] y, int offsety) { - arpack.dsortc(which, apply, n, xreal, offsetxreal, ximag, offsetximag, y, offsety); + org.netlib.arpack.Dsortc.dsortc(which, apply, n, xreal, offsetxreal, ximag, offsetximag, y, offsety); } protected void ssortcK(String which, boolean apply, int n, float[] xreal, int offsetxreal, float[] ximag, int offsetximag, float[] y, int offsety) { - arpack.ssortc(which, apply, n, xreal, offsetxreal, ximag, offsetximag, y, offsety); + org.netlib.arpack.Ssortc.ssortc(which, apply, n, xreal, offsetxreal, ximag, offsetximag, y, offsety); } protected void dsortrK(String which, boolean apply, int n, double[] x1, int offsetx1, double[] x2, int offsetx2) { - arpack.dsortr(which, apply, n, x1, offsetx1, x2, offsetx2); + org.netlib.arpack.Dsortr.dsortr(which, apply, n, x1, offsetx1, x2, offsetx2); } protected void ssortrK(String which, boolean apply, int n, float[] x1, int offsetx1, float[] x2, int offsetx2) { - arpack.ssortr(which, apply, n, x1, offsetx1, x2, offsetx2); + org.netlib.arpack.Ssortr.ssortr(which, apply, n, x1, offsetx1, x2, offsetx2); } protected void dstatnK() { - arpack.dstatn(); + org.netlib.arpack.Dstatn.dstatn(); } protected void sstatnK() { - arpack.sstatn(); + org.netlib.arpack.Sstatn.sstatn(); } protected void dstatsK() { - arpack.dstats(); + org.netlib.arpack.Dstats.dstats(); } protected void sstatsK() { - arpack.sstats(); + org.netlib.arpack.Sstats.sstats(); } protected void dstqrbK(int n, double[] d, int offsetd, double[] e, int offsete, double[] z, int offsetz, double[] work, int offsetwork, org.netlib.util.intW info) { - arpack.dstqrb(n, d, offsetd, e, offsete, z, offsetz, work, offsetwork, info); + org.netlib.arpack.Dstqrb.dstqrb(n, d, offsetd, e, offsete, z, offsetz, work, offsetwork, info); } protected void sstqrbK(int n, float[] d, int offsetd, float[] e, int offsete, float[] z, int offsetz, float[] work, int offsetwork, org.netlib.util.intW info) { - arpack.sstqrb(n, d, offsetd, e, offsete, z, offsetz, work, offsetwork, info); + org.netlib.arpack.Sstqrb.sstqrb(n, d, offsetd, e, offsete, z, offsetz, work, offsetwork, info); } protected int icnteqK(int n, int[] array, int offsetarray, int value) { - return arpack.icnteq(n, array, offsetarray, value); + return org.netlib.arpack.Icnteq.icnteq(n, array, offsetarray, value); } protected void icopyK(int n, int[] lx, int offsetlx, int incx, int[] ly, int offsetly, int incy) { - arpack.icopy(n, lx, offsetlx, incx, ly, offsetly, incy); + org.netlib.arpack.Icopy.icopy(n, lx, offsetlx, incx, ly, offsetly, incy); } protected void isetK(int n, int value, int[] array, int offsetarray, int inc) { - arpack.iset(n, value, array, offsetarray, inc); + org.netlib.arpack.Iset.iset(n, value, array, offsetarray, inc); } protected void iswapK(int n, int[] sx, int offsetsx, int incx, int[] sy, int offsetsy, int incy) { - arpack.iswap(n, sx, offsetsx, incx, sy, offsetsy, incy); + org.netlib.arpack.Iswap.iswap(n, sx, offsetsx, incx, sy, offsetsy, incy); } protected void secondK(org.netlib.util.floatW t) { - arpack.second(t); + org.netlib.arpack.Second.second(t); } } diff --git a/arpack/src/main/java/dev/ludovic/netlib/arpack/JNIARPACK.java b/arpack/src/main/java/dev/ludovic/netlib/arpack/JNIARPACK.java new file mode 100644 index 00000000..1788bdd2 --- /dev/null +++ b/arpack/src/main/java/dev/ludovic/netlib/arpack/JNIARPACK.java @@ -0,0 +1,182 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +package dev.ludovic.netlib.arpack; + +import java.io.InputStream; +import java.io.IOException; +import java.nio.file.Files; +import java.nio.file.Path; +import java.nio.file.StandardCopyOption; +import java.nio.file.attribute.PosixFilePermissions; + +public final class JNIARPACK extends AbstractARPACK implements dev.ludovic.netlib.NativeARPACK { + + private static final JNIARPACK instance = new JNIARPACK(); + + protected JNIARPACK() { + String osName = System.getProperty("os.name"); + if (osName == null || osName.isEmpty()) { + throw new RuntimeException("Unable to load native implementation"); + } + String osArch = System.getProperty("os.arch"); + if (osArch == null || osArch.isEmpty()) { + throw new RuntimeException("Unable to load native implementation"); + } + + Path temp; + try (InputStream resource = this.getClass().getClassLoader().getResourceAsStream( + String.format("resources/native/%s-%s/libnetlibarpackjni.so", osName, osArch))) { + assert resource != null; + Files.copy(resource, temp = Files.createTempFile("libnetlibarpackjni.so", "", + PosixFilePermissions.asFileAttribute(PosixFilePermissions.fromString("rwxr-x---"))), + StandardCopyOption.REPLACE_EXISTING); + } catch (IOException e) { + throw new RuntimeException("Unable to load native implementation", e); + } + + System.load(temp.toString()); + } + + public static dev.ludovic.netlib.NativeARPACK getInstance() { + return instance; + } + + protected native void dmoutK(int lout, int m, int n, double[] a, int offseta, int lda, int idigit, String ifmt); + + protected native void smoutK(int lout, int m, int n, float[] a, int offseta, int lda, int idigit, String ifmt); + + protected native void dvoutK(int lout, int n, double[] sx, int offsetsx, int idigit, String ifmt); + + protected native void svoutK(int lout, int n, float[] sx, int offsetsx, int idigit, String ifmt); + + protected native void ivoutK(int lout, int n, int[] ix, int offsetix, int idigit, String ifmt); + + protected native void dgetv0K(org.netlib.util.intW ido, String bmat, int itry, boolean initv, int n, int j, double[] v, int offsetv, int ldv, double[] resid, int offsetresid, org.netlib.util.doubleW rnorm, int[] ipntr, int offsetipntr, double[] workd, int offsetworkd, org.netlib.util.intW ierr); + + protected native void sgetv0K(org.netlib.util.intW ido, String bmat, int itry, boolean initv, int n, int j, float[] v, int offsetv, int ldv, float[] resid, int offsetresid, org.netlib.util.floatW rnorm, int[] ipntr, int offsetipntr, float[] workd, int offsetworkd, org.netlib.util.intW ierr); + + protected native void dlaqrbK(boolean wantt, int n, int ilo, int ihi, double[] h, int offseth, int ldh, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] z, int offsetz, org.netlib.util.intW info); + + protected native void slaqrbK(boolean wantt, int n, int ilo, int ihi, float[] h, int offseth, int ldh, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] z, int offsetz, org.netlib.util.intW info); + + protected native void dnaitrK(org.netlib.util.intW ido, String bmat, int n, int k, int np, int nb, double[] resid, int offsetresid, org.netlib.util.doubleW rnorm, double[] v, int offsetv, int ldv, double[] h, int offseth, int ldh, int[] ipntr, int offsetipntr, double[] workd, int offsetworkd, org.netlib.util.intW info); + + protected native void snaitrK(org.netlib.util.intW ido, String bmat, int n, int k, int np, int nb, float[] resid, int offsetresid, org.netlib.util.floatW rnorm, float[] v, int offsetv, int ldv, float[] h, int offseth, int ldh, int[] ipntr, int offsetipntr, float[] workd, int offsetworkd, org.netlib.util.intW info); + + protected native void dnappsK(int n, org.netlib.util.intW kev, int np, double[] shiftr, int offsetshiftr, double[] shifti, int offsetshifti, double[] v, int offsetv, int ldv, double[] h, int offseth, int ldh, double[] resid, int offsetresid, double[] q, int offsetq, int ldq, double[] workl, int offsetworkl, double[] workd, int offsetworkd); + + protected native void snappsK(int n, org.netlib.util.intW kev, int np, float[] shiftr, int offsetshiftr, float[] shifti, int offsetshifti, float[] v, int offsetv, int ldv, float[] h, int offseth, int ldh, float[] resid, int offsetresid, float[] q, int offsetq, int ldq, float[] workl, int offsetworkl, float[] workd, int offsetworkd); + + protected native void dnaup2K(org.netlib.util.intW ido, String bmat, int n, String which, org.netlib.util.intW nev, org.netlib.util.intW np, double tol, double[] resid, int offsetresid, int mode, int iupd, int ishift, org.netlib.util.intW mxiter, double[] v, int offsetv, int ldv, double[] h, int offseth, int ldh, double[] ritzr, int offsetritzr, double[] ritzi, int offsetritzi, double[] bounds, int offsetbounds, double[] q, int offsetq, int ldq, double[] workl, int offsetworkl, int[] ipntr, int offsetipntr, double[] workd, int offsetworkd, org.netlib.util.intW info); + + protected native void snaup2K(org.netlib.util.intW ido, String bmat, int n, String which, org.netlib.util.intW nev, org.netlib.util.intW np, float tol, float[] resid, int offsetresid, int mode, int iupd, int ishift, org.netlib.util.intW mxiter, float[] v, int offsetv, int ldv, float[] h, int offseth, int ldh, float[] ritzr, int offsetritzr, float[] ritzi, int offsetritzi, float[] bounds, int offsetbounds, float[] q, int offsetq, int ldq, float[] workl, int offsetworkl, int[] ipntr, int offsetipntr, float[] workd, int offsetworkd, org.netlib.util.intW info); + + protected native void dnaupdK(org.netlib.util.intW ido, String bmat, int n, String which, int nev, org.netlib.util.doubleW tol, double[] resid, int offsetresid, int ncv, double[] v, int offsetv, int ldv, int[] iparam, int offsetiparam, int[] ipntr, int offsetipntr, double[] workd, int offsetworkd, double[] workl, int offsetworkl, int lworkl, org.netlib.util.intW info); + + protected native void snaupdK(org.netlib.util.intW ido, String bmat, int n, String which, int nev, org.netlib.util.floatW tol, float[] resid, int offsetresid, int ncv, float[] v, int offsetv, int ldv, int[] iparam, int offsetiparam, int[] ipntr, int offsetipntr, float[] workd, int offsetworkd, float[] workl, int offsetworkl, int lworkl, org.netlib.util.intW info); + + protected native void dnconvK(int n, double[] ritzr, int offsetritzr, double[] ritzi, int offsetritzi, double[] bounds, int offsetbounds, double tol, org.netlib.util.intW nconv); + + protected native void snconvK(int n, float[] ritzr, int offsetritzr, float[] ritzi, int offsetritzi, float[] bounds, int offsetbounds, float tol, org.netlib.util.intW nconv); + + protected native void dsconvK(int n, double[] ritz, int offsetritz, double[] bounds, int offsetbounds, double tol, org.netlib.util.intW nconv); + + protected native void ssconvK(int n, float[] ritz, int offsetritz, float[] bounds, int offsetbounds, float tol, org.netlib.util.intW nconv); + + protected native void dneighK(double rnorm, org.netlib.util.intW n, double[] h, int offseth, int ldh, double[] ritzr, int offsetritzr, double[] ritzi, int offsetritzi, double[] bounds, int offsetbounds, double[] q, int offsetq, int ldq, double[] workl, int offsetworkl, org.netlib.util.intW ierr); + + protected native void sneighK(float rnorm, org.netlib.util.intW n, float[] h, int offseth, int ldh, float[] ritzr, int offsetritzr, float[] ritzi, int offsetritzi, float[] bounds, int offsetbounds, float[] q, int offsetq, int ldq, float[] workl, int offsetworkl, org.netlib.util.intW ierr); + + protected native void dneupdK(boolean rvec, String howmny, boolean[] select, int offsetselect, double[] dr, int offsetdr, double[] di, int offsetdi, double[] z, int offsetz, int ldz, double sigmar, double sigmai, double[] workev, int offsetworkev, String bmat, int n, String which, org.netlib.util.intW nev, double tol, double[] resid, int offsetresid, int ncv, double[] v, int offsetv, int ldv, int[] iparam, int offsetiparam, int[] ipntr, int offsetipntr, double[] workd, int offsetworkd, double[] workl, int offsetworkl, int lworkl, org.netlib.util.intW info); + + protected native void sneupdK(boolean rvec, String howmny, boolean[] select, int offsetselect, float[] dr, int offsetdr, float[] di, int offsetdi, float[] z, int offsetz, int ldz, float sigmar, float sigmai, float[] workev, int offsetworkev, String bmat, int n, String which, org.netlib.util.intW nev, float tol, float[] resid, int offsetresid, int ncv, float[] v, int offsetv, int ldv, int[] iparam, int offsetiparam, int[] ipntr, int offsetipntr, float[] workd, int offsetworkd, float[] workl, int offsetworkl, int lworkl, org.netlib.util.intW info); + + protected native void dngetsK(int ishift, String which, org.netlib.util.intW kev, org.netlib.util.intW np, double[] ritzr, int offsetritzr, double[] ritzi, int offsetritzi, double[] bounds, int offsetbounds, double[] shiftr, int offsetshiftr, double[] shifti, int offsetshifti); + + protected native void sngetsK(int ishift, String which, org.netlib.util.intW kev, org.netlib.util.intW np, float[] ritzr, int offsetritzr, float[] ritzi, int offsetritzi, float[] bounds, int offsetbounds, float[] shiftr, int offsetshiftr, float[] shifti, int offsetshifti); + + protected native void dsaitrK(org.netlib.util.intW ido, String bmat, int n, int k, int np, int mode, double[] resid, int offsetresid, org.netlib.util.doubleW rnorm, double[] v, int offsetv, int ldv, double[] h, int offseth, int ldh, int[] ipntr, int offsetipntr, double[] workd, int offsetworkd, org.netlib.util.intW info); + + protected native void ssaitrK(org.netlib.util.intW ido, String bmat, int n, int k, int np, int mode, float[] resid, int offsetresid, org.netlib.util.floatW rnorm, float[] v, int offsetv, int ldv, float[] h, int offseth, int ldh, int[] ipntr, int offsetipntr, float[] workd, int offsetworkd, org.netlib.util.intW info); + + protected native void dsappsK(int n, int kev, int np, double[] shift, int offsetshift, double[] v, int offsetv, int ldv, double[] h, int offseth, int ldh, double[] resid, int offsetresid, double[] q, int offsetq, int ldq, double[] workd, int offsetworkd); + + protected native void ssappsK(int n, int kev, int np, float[] shift, int offsetshift, float[] v, int offsetv, int ldv, float[] h, int offseth, int ldh, float[] resid, int offsetresid, float[] q, int offsetq, int ldq, float[] workd, int offsetworkd); + + protected native void dsaup2K(org.netlib.util.intW ido, String bmat, int n, String which, org.netlib.util.intW nev, org.netlib.util.intW np, double tol, double[] resid, int offsetresid, int mode, int iupd, int ishift, org.netlib.util.intW mxiter, double[] v, int offsetv, int ldv, double[] h, int offseth, int ldh, double[] ritz, int offsetritz, double[] bounds, int offsetbounds, double[] q, int offsetq, int ldq, double[] workl, int offsetworkl, int[] ipntr, int offsetipntr, double[] workd, int offsetworkd, org.netlib.util.intW info); + + protected native void ssaup2K(org.netlib.util.intW ido, String bmat, int n, String which, org.netlib.util.intW nev, org.netlib.util.intW np, float tol, float[] resid, int offsetresid, int mode, int iupd, int ishift, org.netlib.util.intW mxiter, float[] v, int offsetv, int ldv, float[] h, int offseth, int ldh, float[] ritz, int offsetritz, float[] bounds, int offsetbounds, float[] q, int offsetq, int ldq, float[] workl, int offsetworkl, int[] ipntr, int offsetipntr, float[] workd, int offsetworkd, org.netlib.util.intW info); + + protected native void dseigtK(double rnorm, int n, double[] h, int offseth, int ldh, double[] eig, int offseteig, double[] bounds, int offsetbounds, double[] workl, int offsetworkl, org.netlib.util.intW ierr); + + protected native void sseigtK(float rnorm, int n, float[] h, int offseth, int ldh, float[] eig, int offseteig, float[] bounds, int offsetbounds, float[] workl, int offsetworkl, org.netlib.util.intW ierr); + + protected native void dsesrtK(String which, boolean apply, int n, double[] x, int offsetx, int na, double[] a, int offseta, int lda); + + protected native void ssesrtK(String which, boolean apply, int n, float[] x, int offsetx, int na, float[] a, int offseta, int lda); + + protected native void dsaupdK(org.netlib.util.intW ido, String bmat, int n, String which, int nev, org.netlib.util.doubleW tol, double[] resid, int offsetresid, int ncv, double[] v, int offsetv, int ldv, int[] iparam, int offsetiparam, int[] ipntr, int offsetipntr, double[] workd, int offsetworkd, double[] workl, int offsetworkl, int lworkl, org.netlib.util.intW info); + + protected native void ssaupdK(org.netlib.util.intW ido, String bmat, int n, String which, int nev, org.netlib.util.floatW tol, float[] resid, int offsetresid, int ncv, float[] v, int offsetv, int ldv, int[] iparam, int offsetiparam, int[] ipntr, int offsetipntr, float[] workd, int offsetworkd, float[] workl, int offsetworkl, int lworkl, org.netlib.util.intW info); + + protected native void dseupdK(boolean rvec, String howmny, boolean[] select, int offsetselect, double[] d, int offsetd, double[] z, int offsetz, int ldz, double sigma, String bmat, int n, String which, org.netlib.util.intW nev, double tol, double[] resid, int offsetresid, int ncv, double[] v, int offsetv, int ldv, int[] iparam, int offsetiparam, int[] ipntr, int offsetipntr, double[] workd, int offsetworkd, double[] workl, int offsetworkl, int lworkl, org.netlib.util.intW info); + + protected native void sseupdK(boolean rvec, String howmny, boolean[] select, int offsetselect, float[] d, int offsetd, float[] z, int offsetz, int ldz, float sigma, String bmat, int n, String which, org.netlib.util.intW nev, float tol, float[] resid, int offsetresid, int ncv, float[] v, int offsetv, int ldv, int[] iparam, int offsetiparam, int[] ipntr, int offsetipntr, float[] workd, int offsetworkd, float[] workl, int offsetworkl, int lworkl, org.netlib.util.intW info); + + protected native void dsgetsK(int ishift, String which, org.netlib.util.intW kev, org.netlib.util.intW np, double[] ritz, int offsetritz, double[] bounds, int offsetbounds, double[] shifts, int offsetshifts); + + protected native void ssgetsK(int ishift, String which, org.netlib.util.intW kev, org.netlib.util.intW np, float[] ritz, int offsetritz, float[] bounds, int offsetbounds, float[] shifts, int offsetshifts); + + protected native void dsortcK(String which, boolean apply, int n, double[] xreal, int offsetxreal, double[] ximag, int offsetximag, double[] y, int offsety); + + protected native void ssortcK(String which, boolean apply, int n, float[] xreal, int offsetxreal, float[] ximag, int offsetximag, float[] y, int offsety); + + protected native void dsortrK(String which, boolean apply, int n, double[] x1, int offsetx1, double[] x2, int offsetx2); + + protected native void ssortrK(String which, boolean apply, int n, float[] x1, int offsetx1, float[] x2, int offsetx2); + + protected native void dstatnK(); + + protected native void sstatnK(); + + protected native void dstatsK(); + + protected native void sstatsK(); + + protected native void dstqrbK(int n, double[] d, int offsetd, double[] e, int offsete, double[] z, int offsetz, double[] work, int offsetwork, org.netlib.util.intW info); + + protected native void sstqrbK(int n, float[] d, int offsetd, float[] e, int offsete, float[] z, int offsetz, float[] work, int offsetwork, org.netlib.util.intW info); + + protected native int icnteqK(int n, int[] array, int offsetarray, int value); + + protected native void icopyK(int n, int[] lx, int offsetlx, int incx, int[] ly, int offsetly, int incy); + + protected native void isetK(int n, int value, int[] array, int offsetarray, int inc); + + protected native void iswapK(int n, int[] sx, int offsetsx, int incx, int[] sy, int offsetsy, int incy); + + protected native void secondK(org.netlib.util.floatW t); +} diff --git a/arpack/src/main/native/Makefile b/arpack/src/main/native/Makefile new file mode 100644 index 00000000..dded1334 --- /dev/null +++ b/arpack/src/main/native/Makefile @@ -0,0 +1,33 @@ +# Copyright 2020, 2021, Ludovic Henry +# +# Permission is hereby granted, free of charge, to any person obtaining a copy +# of this software and associated documentation files (the "Software"), to deal +# in the Software without restriction, including without limitation the rights +# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell +# copies of the Software, and to permit persons to whom the Software is +# furnished to do so, subject to the following conditions: +# +# The above copyright notice and this permission notice shall be included in +# all copies or substantial portions of the Software. +# +# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR +# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, +# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE +# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER +# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, +# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE +# SOFTWARE. +# +# Please contact git@ludovic.dev or visit ludovic.dev if you need additional +# information or have any questions. + +$(OBJDIR) $(dir $(OUTPUT)): + mkdir -p $@ + +$(INPUTS:%.c=$(OBJDIR)/%.o): $(OBJDIR)/%.o: %.c | $(OBJDIR) + $(CC) $(CCFLAGS) -o $@ $< + +$(OUTPUT): $(INPUTS:%.c=$(OBJDIR)/%.o) | $(dir $(OUTPUT)) + $(LD) $(LDFLAGS) -o $@ $^ + +all: $(OUTPUT) diff --git a/arpack/src/main/native/jni.c b/arpack/src/main/native/jni.c new file mode 100644 index 00000000..f450ab78 --- /dev/null +++ b/arpack/src/main/native/jni.c @@ -0,0 +1,618 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +#include +#include +#include + +#include "dev_ludovic_netlib_arpack_JNIARPACK.h" + +#define UNUSED __attribute__((unused)) + +#define TRUE 1 +#define FALSE 0 + +static jfieldID booleanW_val_fieldID; +static jfieldID intW_val_fieldID; +static jfieldID floatW_val_fieldID; +static jfieldID doubleW_val_fieldID; +static jfieldID StringW_val_fieldID; + +static void *arpack; + +static void throwOOM(JNIEnv *env) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); +} + +static void (*dmout_)(int *lout, int *m, int *n, double *a, int *lda, int *idigit, char *ifmt); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dmoutK(JNIEnv *env, UNUSED jobject obj, + jint lout, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jint idigit, jstring ifmt) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*smout_)(int *lout, int *m, int *n, float *a, int *lda, int *idigit, char *ifmt); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_smoutK(JNIEnv *env, UNUSED jobject obj, + jint lout, jint m, jint n, jfloatArray a, jint offseta, jint lda, jint idigit, jstring ifmt) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*dvout_)(int *lout, int *n, double *sx, int *idigit, char *ifmt); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dvoutK(JNIEnv *env, UNUSED jobject obj, + jint lout, jint n, jdoubleArray sx, jint offsetsx, jint idigit, jstring ifmt) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*svout_)(int *lout, int *n, float *sx, int *idigit, char *ifmt); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_svoutK(JNIEnv *env, UNUSED jobject obj, + jint lout, jint n, jfloatArray sx, jint offsetsx, jint idigit, jstring ifmt) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ivout_)(int *lout, int *n, int *ix, int *idigit, char *ifmt); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_ivoutK(JNIEnv *env, UNUSED jobject obj, + jint lout, jint n, jintArray ix, jint offsetix, jint idigit, jstring ifmt) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*dgetv0_)(int *ido, char *bmat, int *itry, int *initv, int *n, int *j, double *v, int *ldv, double *resid, double *rnorm, int *ipntr, double *workd, int *ierr); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dgetv0K(JNIEnv *env, UNUSED jobject obj, + jobject ido, jstring bmat, jint itry, jboolean initv, jint n, jint j, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray resid, jint offsetresid, jobject rnorm, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jobject ierr) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sgetv0_)(int *ido, char *bmat, int *itry, int *initv, int *n, int *j, float *v, int *ldv, float *resid, float *rnorm, int *ipntr, float *workd, int *ierr); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_sgetv0K(JNIEnv *env, UNUSED jobject obj, + jobject ido, jstring bmat, jint itry, jboolean initv, jint n, jint j, jfloatArray v, jint offsetv, jint ldv, jfloatArray resid, jint offsetresid, jobject rnorm, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jobject ierr) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +// static void (*dlaqrb_)(int *wantt, int *n, int *ilo, int *ihi, double *h, int *ldh, double *wr, double *wi, double *z, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dlaqrbK(JNIEnv *env, UNUSED jobject obj, + jboolean wantt, jint n, jint ilo, jint ihi, jdoubleArray h, jint offseth, jint ldh, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jdoubleArray z, jint offsetz, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +// static void (*slaqrb_)(int *wantt, int *n, int *ilo, int *ihi, float *h, int *ldh, float *wr, float *wi, float *z, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_slaqrbK(JNIEnv *env, UNUSED jobject obj, + jboolean wantt, jint n, jint ilo, jint ihi, jfloatArray h, jint offseth, jint ldh, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jfloatArray z, jint offsetz, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*dnaitr_)(int *ido, char *bmat, int *n, int *k, int *np, int *nb, double *resid, double *rnorm, double *v, int *ldv, double *h, int *ldh, int *ipntr, double *workd, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dnaitrK(JNIEnv *env, UNUSED jobject obj, + jobject ido, jstring bmat, jint n, jint k, jint np, jint nb, jdoubleArray resid, jint offsetresid, jobject rnorm, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray h, jint offseth, jint ldh, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*snaitr_)(int *ido, char *bmat, int *n, int *k, int *np, int *nb, float *resid, float *rnorm, float *v, int *ldv, float *h, int *ldh, int *ipntr, float *workd, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_snaitrK(JNIEnv *env, UNUSED jobject obj, + jobject ido, jstring bmat, jint n, jint k, jint np, jint nb, jfloatArray resid, jint offsetresid, jobject rnorm, jfloatArray v, jint offsetv, jint ldv, jfloatArray h, jint offseth, jint ldh, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*dnapps_)(int *n, int *kev, int *np, double *shiftr, double *shifti, double *v, int *ldv, double *h, int *ldh, double *resid, double *q, int *ldq, double *workl, double *workd); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dnappsK(JNIEnv *env, UNUSED jobject obj, + jint n, jobject kev, jint np, jdoubleArray shiftr, jint offsetshiftr, jdoubleArray shifti, jint offsetshifti, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray h, jint offseth, jint ldh, jdoubleArray resid, jint offsetresid, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray workl, jint offsetworkl, jdoubleArray workd, jint offsetworkd) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*snapps_)(int *n, int *kev, int *np, float *shiftr, float *shifti, float *v, int *ldv, float *h, int *ldh, float *resid, float *q, int *ldq, float *workl, float *workd); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_snappsK(JNIEnv *env, UNUSED jobject obj, + jint n, jobject kev, jint np, jfloatArray shiftr, jint offsetshiftr, jfloatArray shifti, jint offsetshifti, jfloatArray v, jint offsetv, jint ldv, jfloatArray h, jint offseth, jint ldh, jfloatArray resid, jint offsetresid, jfloatArray q, jint offsetq, jint ldq, jfloatArray workl, jint offsetworkl, jfloatArray workd, jint offsetworkd) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*dnaup2_)(int *ido, char *bmat, int *n, char *which, int *nev, int *np, double *tol, double *resid, int *mode, int *iupd, int *ishift, int *mxiter, double *v, int *ldv, double *h, int *ldh, double *ritzr, double *ritzi, double *bounds, double *q, int *ldq, double *workl, int *ipntr, double *workd, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dnaup2K(JNIEnv *env, UNUSED jobject obj, + jobject ido, jstring bmat, jint n, jstring which, jobject nev, jobject np, jdouble tol, jdoubleArray resid, jint offsetresid, jint mode, jint iupd, jint ishift, jobject mxiter, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray h, jint offseth, jint ldh, jdoubleArray ritzr, jint offsetritzr, jdoubleArray ritzi, jint offsetritzi, jdoubleArray bounds, jint offsetbounds, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray workl, jint offsetworkl, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*snaup2_)(int *ido, char *bmat, int *n, char *which, int *nev, int *np, float *tol, float *resid, int *mode, int *iupd, int *ishift, int *mxiter, float *v, int *ldv, float *h, int *ldh, float *ritzr, float *ritzi, float *bounds, float *q, int *ldq, float *workl, int *ipntr, float *workd, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_snaup2K(JNIEnv *env, UNUSED jobject obj, + jobject ido, jstring bmat, jint n, jstring which, jobject nev, jobject np, jfloat tol, jfloatArray resid, jint offsetresid, jint mode, jint iupd, jint ishift, jobject mxiter, jfloatArray v, jint offsetv, jint ldv, jfloatArray h, jint offseth, jint ldh, jfloatArray ritzr, jint offsetritzr, jfloatArray ritzi, jint offsetritzi, jfloatArray bounds, jint offsetbounds, jfloatArray q, jint offsetq, jint ldq, jfloatArray workl, jint offsetworkl, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*dnaupd_)(int *ido, char *bmat, int *n, char *which, int *nev, double *tol, double *resid, int *ncv, double *v, int *ldv, int *iparam, int *ipntr, double *workd, double *workl, int *lworkl, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dnaupdK(JNIEnv *env, UNUSED jobject obj, + jobject ido, jstring bmat, jint n, jstring which, jint nev, jobject tol, jdoubleArray resid, jint offsetresid, jint ncv, jdoubleArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jdoubleArray workl, jint offsetworkl, jint lworkl, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*snaupd_)(int *ido, char *bmat, int *n, char *which, int *nev, float *tol, float *resid, int *ncv, float *v, int *ldv, int *iparam, int *ipntr, float *workd, float *workl, int *lworkl, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_snaupdK(JNIEnv *env, UNUSED jobject obj, + jobject ido, jstring bmat, jint n, jstring which, jint nev, jobject tol, jfloatArray resid, jint offsetresid, jint ncv, jfloatArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jfloatArray workl, jint offsetworkl, jint lworkl, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*dnconv_)(int *n, double *ritzr, double *ritzi, double *bounds, double *tol, int *nconv); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dnconvK(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray ritzr, jint offsetritzr, jdoubleArray ritzi, jint offsetritzi, jdoubleArray bounds, jint offsetbounds, jdouble tol, jobject nconv) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*snconv_)(int *n, float *ritzr, float *ritzi, float *bounds, float *tol, int *nconv); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_snconvK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray ritzr, jint offsetritzr, jfloatArray ritzi, jint offsetritzi, jfloatArray bounds, jint offsetbounds, jfloat tol, jobject nconv) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*dsconv_)(int *n, double *ritz, double *bounds, double *tol, int *nconv); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsconvK(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray ritz, jint offsetritz, jdoubleArray bounds, jint offsetbounds, jdouble tol, jobject nconv) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssconv_)(int *n, float *ritz, float *bounds, float *tol, int *nconv); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssconvK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray ritz, jint offsetritz, jfloatArray bounds, jint offsetbounds, jfloat tol, jobject nconv) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*dneigh_)(double *rnorm, int *n, double *h, int *ldh, double *ritzr, double *ritzi, double *bounds, double *q, int *ldq, double *workl, int *ierr); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dneighK(JNIEnv *env, UNUSED jobject obj, + jdouble rnorm, jobject n, jdoubleArray h, jint offseth, jint ldh, jdoubleArray ritzr, jint offsetritzr, jdoubleArray ritzi, jint offsetritzi, jdoubleArray bounds, jint offsetbounds, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray workl, jint offsetworkl, jobject ierr) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sneigh_)(float *rnorm, int *n, float *h, int *ldh, float *ritzr, float *ritzi, float *bounds, float *q, int *ldq, float *workl, int *ierr); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_sneighK(JNIEnv *env, UNUSED jobject obj, + jfloat rnorm, jobject n, jfloatArray h, jint offseth, jint ldh, jfloatArray ritzr, jint offsetritzr, jfloatArray ritzi, jint offsetritzi, jfloatArray bounds, jint offsetbounds, jfloatArray q, jint offsetq, jint ldq, jfloatArray workl, jint offsetworkl, jobject ierr) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*dneupd_)(int *rvec, char *howmny, int *select, double *dr, double *di, double *z, int *ldz, double *sigmar, double *sigmai, double *workev, char *bmat, int *n, char *which, int *nev, double *tol, double *resid, int *ncv, double *v, int *ldv, int *iparam, int *ipntr, double *workd, double *workl, int *lworkl, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dneupdK(JNIEnv *env, UNUSED jobject obj, + jboolean rvec, jstring howmny, jbooleanArray select, jint offsetselect, jdoubleArray dr, jint offsetdr, jdoubleArray di, jint offsetdi, jdoubleArray z, jint offsetz, jint ldz, jdouble sigmar, jdouble sigmai, jdoubleArray workev, jint offsetworkev, jstring bmat, jint n, jstring which, jobject nev, jdouble tol, jdoubleArray resid, jint offsetresid, jint ncv, jdoubleArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jdoubleArray workl, jint offsetworkl, jint lworkl, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sneupd_)(int *rvec, char *howmny, int *select, float *dr, float *di, float *z, int *ldz, float *sigmar, float *sigmai, float *workev, char *bmat, int *n, char *which, int *nev, float *tol, float *resid, int *ncv, float *v, int *ldv, int *iparam, int *ipntr, float *workd, float *workl, int *lworkl, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_sneupdK(JNIEnv *env, UNUSED jobject obj, + jboolean rvec, jstring howmny, jbooleanArray select, jint offsetselect, jfloatArray dr, jint offsetdr, jfloatArray di, jint offsetdi, jfloatArray z, jint offsetz, jint ldz, jfloat sigmar, jfloat sigmai, jfloatArray workev, jint offsetworkev, jstring bmat, jint n, jstring which, jobject nev, jfloat tol, jfloatArray resid, jint offsetresid, jint ncv, jfloatArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jfloatArray workl, jint offsetworkl, jint lworkl, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*dngets_)(int *ishift, char *which, int *kev, int *np, double *ritzr, double *ritzi, double *bounds, double *shiftr, double *shifti); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dngetsK(JNIEnv *env, UNUSED jobject obj, + jint ishift, jstring which, jobject kev, jobject np, jdoubleArray ritzr, jint offsetritzr, jdoubleArray ritzi, jint offsetritzi, jdoubleArray bounds, jint offsetbounds, jdoubleArray shiftr, jint offsetshiftr, jdoubleArray shifti, jint offsetshifti) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sngets_)(int *ishift, char *which, int *kev, int *np, float *ritzr, float *ritzi, float *bounds, float *shiftr, float *shifti); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_sngetsK(JNIEnv *env, UNUSED jobject obj, + jint ishift, jstring which, jobject kev, jobject np, jfloatArray ritzr, jint offsetritzr, jfloatArray ritzi, jint offsetritzi, jfloatArray bounds, jint offsetbounds, jfloatArray shiftr, jint offsetshiftr, jfloatArray shifti, jint offsetshifti) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*dsaitr_)(int *ido, char *bmat, int *n, int *k, int *np, int *mode, double *resid, double *rnorm, double *v, int *ldv, double *h, int *ldh, int *ipntr, double *workd, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsaitrK(JNIEnv *env, UNUSED jobject obj, + jobject ido, jstring bmat, jint n, jint k, jint np, jint mode, jdoubleArray resid, jint offsetresid, jobject rnorm, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray h, jint offseth, jint ldh, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssaitr_)(int *ido, char *bmat, int *n, int *k, int *np, int *mode, float *resid, float *rnorm, float *v, int *ldv, float *h, int *ldh, int *ipntr, float *workd, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssaitrK(JNIEnv *env, UNUSED jobject obj, + jobject ido, jstring bmat, jint n, jint k, jint np, jint mode, jfloatArray resid, jint offsetresid, jobject rnorm, jfloatArray v, jint offsetv, jint ldv, jfloatArray h, jint offseth, jint ldh, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*dsapps_)(int *n, int *kev, int *np, double *shift, double *v, int *ldv, double *h, int *ldh, double *resid, double *q, int *ldq, double *workd); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsappsK(JNIEnv *env, UNUSED jobject obj, + jint n, jint kev, jint np, jdoubleArray shift, jint offsetshift, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray h, jint offseth, jint ldh, jdoubleArray resid, jint offsetresid, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray workd, jint offsetworkd) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssapps_)(int *n, int *kev, int *np, float *shift, float *v, int *ldv, float *h, int *ldh, float *resid, float *q, int *ldq, float *workd); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssappsK(JNIEnv *env, UNUSED jobject obj, + jint n, jint kev, jint np, jfloatArray shift, jint offsetshift, jfloatArray v, jint offsetv, jint ldv, jfloatArray h, jint offseth, jint ldh, jfloatArray resid, jint offsetresid, jfloatArray q, jint offsetq, jint ldq, jfloatArray workd, jint offsetworkd) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*dsaup2_)(int *ido, char *bmat, int *n, char *which, int *nev, int *np, double *tol, double *resid, int *mode, int *iupd, int *ishift, int *mxiter, double *v, int *ldv, double *h, int *ldh, double *ritz, double *bounds, double *q, int *ldq, double *workl, int *ipntr, double *workd, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsaup2K(JNIEnv *env, UNUSED jobject obj, + jobject ido, jstring bmat, jint n, jstring which, jobject nev, jobject np, jdouble tol, jdoubleArray resid, jint offsetresid, jint mode, jint iupd, jint ishift, jobject mxiter, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray h, jint offseth, jint ldh, jdoubleArray ritz, jint offsetritz, jdoubleArray bounds, jint offsetbounds, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray workl, jint offsetworkl, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssaup2_)(int *ido, char *bmat, int *n, char *which, int *nev, int *np, float *tol, float *resid, int *mode, int *iupd, int *ishift, int *mxiter, float *v, int *ldv, float *h, int *ldh, float *ritz, float *bounds, float *q, int *ldq, float *workl, int *ipntr, float *workd, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssaup2K(JNIEnv *env, UNUSED jobject obj, + jobject ido, jstring bmat, jint n, jstring which, jobject nev, jobject np, jfloat tol, jfloatArray resid, jint offsetresid, jint mode, jint iupd, jint ishift, jobject mxiter, jfloatArray v, jint offsetv, jint ldv, jfloatArray h, jint offseth, jint ldh, jfloatArray ritz, jint offsetritz, jfloatArray bounds, jint offsetbounds, jfloatArray q, jint offsetq, jint ldq, jfloatArray workl, jint offsetworkl, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*dseigt_)(double *rnorm, int *n, double *h, int *ldh, double *eig, double *bounds, double *workl, int *ierr); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dseigtK(JNIEnv *env, UNUSED jobject obj, + jdouble rnorm, jint n, jdoubleArray h, jint offseth, jint ldh, jdoubleArray eig, jint offseteig, jdoubleArray bounds, jint offsetbounds, jdoubleArray workl, jint offsetworkl, jobject ierr) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sseigt_)(float *rnorm, int *n, float *h, int *ldh, float *eig, float *bounds, float *workl, int *ierr); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_sseigtK(JNIEnv *env, UNUSED jobject obj, + jfloat rnorm, jint n, jfloatArray h, jint offseth, jint ldh, jfloatArray eig, jint offseteig, jfloatArray bounds, jint offsetbounds, jfloatArray workl, jint offsetworkl, jobject ierr) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*dsesrt_)(char *which, int *apply, int *n, double *x, int *na, double *a, int *lda); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsesrtK(JNIEnv *env, UNUSED jobject obj, + jstring which, jboolean apply, jint n, jdoubleArray x, jint offsetx, jint na, jdoubleArray a, jint offseta, jint lda) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssesrt_)(char *which, int *apply, int *n, float *x, int *na, float *a, int *lda); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssesrtK(JNIEnv *env, UNUSED jobject obj, + jstring which, jboolean apply, jint n, jfloatArray x, jint offsetx, jint na, jfloatArray a, jint offseta, jint lda) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*dsaupd_)(int *ido, char *bmat, int *n, char *which, int *nev, double *tol, double *resid, int *ncv, double *v, int *ldv, int *iparam, int *ipntr, double *workd, double *workl, int *lworkl, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsaupdK(JNIEnv *env, UNUSED jobject obj, + jobject ido, jstring bmat, jint n, jstring which, jint nev, jobject tol, jdoubleArray resid, jint offsetresid, jint ncv, jdoubleArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jdoubleArray workl, jint offsetworkl, jint lworkl, jobject info) { + // TODO + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssaupd_)(int *ido, char *bmat, int *n, char *which, int *nev, float *tol, float *resid, int *ncv, float *v, int *ldv, int *iparam, int *ipntr, float *workd, float *workl, int *lworkl, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssaupdK(JNIEnv *env, UNUSED jobject obj, + jobject ido, jstring bmat, jint n, jstring which, jint nev, jobject tol, jfloatArray resid, jint offsetresid, jint ncv, jfloatArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jfloatArray workl, jint offsetworkl, jint lworkl, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*dseupd_)(int *rvec, char *howmny, int *select, double *d, double *z, int *ldz, double *sigma, char *bmat, int *n, char *which, int *nev, double *tol, double *resid, int *ncv, double *v, int *ldv, int *iparam, int *ipntr, double *workd, double *workl, int *lworkl, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dseupdK(JNIEnv *env, UNUSED jobject obj, + jboolean rvec, jstring howmny, jbooleanArray select, jint offsetselect, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jint ldz, jdouble sigma, jstring bmat, jint n, jstring which, jobject nev, jdouble tol, jdoubleArray resid, jint offsetresid, jint ncv, jdoubleArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jdoubleArray workl, jint offsetworkl, jint lworkl, jobject info) { + // TODO + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sseupd_)(int *rvec, char *howmny, int *select, float *d, float *z, int *ldz, float *sigma, char *bmat, int *n, char *which, int *nev, float *tol, float *resid, int *ncv, float *v, int *ldv, int *iparam, int *ipntr, float *workd, float *workl, int *lworkl, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_sseupdK(JNIEnv *env, UNUSED jobject obj, + jboolean rvec, jstring howmny, jbooleanArray select, jint offsetselect, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jint ldz, jfloat sigma, jstring bmat, jint n, jstring which, jobject nev, jfloat tol, jfloatArray resid, jint offsetresid, jint ncv, jfloatArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jfloatArray workl, jint offsetworkl, jint lworkl, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*dsgets_)(int *ishift, char *which, int *kev, int *np, double *ritz, double *bounds, double *shifts); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsgetsK(JNIEnv *env, UNUSED jobject obj, + jint ishift, jstring which, jobject kev, jobject np, jdoubleArray ritz, jint offsetritz, jdoubleArray bounds, jint offsetbounds, jdoubleArray shifts, jint offsetshifts) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssgets_)(int *ishift, char *which, int *kev, int *np, float *ritz, float *bounds, float *shifts); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssgetsK(JNIEnv *env, UNUSED jobject obj, + jint ishift, jstring which, jobject kev, jobject np, jfloatArray ritz, jint offsetritz, jfloatArray bounds, jint offsetbounds, jfloatArray shifts, jint offsetshifts) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*dsortc_)(char *which, int *apply, int *n, double *xreal, double *ximag, double *y); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsortcK(JNIEnv *env, UNUSED jobject obj, + jstring which, jboolean apply, jint n, jdoubleArray xreal, jint offsetxreal, jdoubleArray ximag, jint offsetximag, jdoubleArray y, jint offsety) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssortc_)(char *which, int *apply, int *n, float *xreal, float *ximag, float *y); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssortcK(JNIEnv *env, UNUSED jobject obj, + jstring which, jboolean apply, jint n, jfloatArray xreal, jint offsetxreal, jfloatArray ximag, jint offsetximag, jfloatArray y, jint offsety) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*dsortr_)(char *which, int *apply, int *n, double *x1, double *x2); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsortrK(JNIEnv *env, UNUSED jobject obj, + jstring which, jboolean apply, jint n, jdoubleArray x1, jint offsetx1, jdoubleArray x2, jint offsetx2) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*ssortr_)(char *which, int *apply, int *n, float *x1, float *x2); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssortrK(JNIEnv *env, UNUSED jobject obj, + jstring which, jboolean apply, jint n, jfloatArray x1, jint offsetx1, jfloatArray x2, jint offsetx2) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*dstatn_)(); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dstatnK(JNIEnv *env, UNUSED jobject obj) { + dstatn_(); +} + +static void (*sstatn_)(); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_sstatnK(JNIEnv *env, UNUSED jobject obj) { + sstatn_(); +} + +static void (*dstats_)(); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dstatsK(JNIEnv *env, UNUSED jobject obj) { + dstats_(); +} + +static void (*sstats_)(); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_sstatsK(JNIEnv *env, UNUSED jobject obj) { + sstats_(); +} + +static void (*dstqrb_)(int *n, double *d, double *e, double *z, double *work, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dstqrbK(JNIEnv *env, UNUSED jobject obj, + jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray z, jint offsetz, jdoubleArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*sstqrb_)(int *n, float *d, float *e, float *z, float *work, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_sstqrbK(JNIEnv *env, UNUSED jobject obj, + jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray z, jint offsetz, jfloatArray work, jint offsetwork, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static int (*icnteq_)(int *n, int *array, int *value); + +jint Java_dev_ludovic_netlib_arpack_JNIARPACK_icnteqK(JNIEnv *env, UNUSED jobject obj, + jint n, jintArray array, jint offsetarray, jint value) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + return 0; +} + +static void (*icopy_)(int *n, int *lx, int *incx, int *ly, int *incy); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_icopyK(JNIEnv *env, UNUSED jobject obj, + jint n, jintArray lx, jint offsetlx, jint incx, jintArray ly, jint offsetly, jint incy) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*iset_)(int *n, int *value, int *array, int *inc); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_isetK(JNIEnv *env, UNUSED jobject obj, + jint n, jint value, jintArray array, jint offsetarray, jint inc) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*iswap_)(int *n, int *sx, int *incx, int *sy, int *incy); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_iswapK(JNIEnv *env, UNUSED jobject obj, + jint n, jintArray sx, jint offsetsx, jint incx, jintArray sy, jint offsetsy, jint incy) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +static void (*second_)(float *t); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_secondK(JNIEnv *env, UNUSED jobject obj, + jobject t) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +jboolean get_system_property(JNIEnv *env, jstring key, jstring def, jstring *res) { + jclass System_class = (*env)->FindClass(env, "java/lang/System"); + if (!System_class) { + return FALSE; + } + jmethodID System_getProperty_methodID = (*env)->GetStaticMethodID(env, System_class, "getProperty", "(Ljava/lang/String;Ljava/lang/String;)Ljava/lang/String;"); + if (!System_getProperty_methodID) { + return FALSE; + } + *res = (jstring)(*env)->CallStaticObjectMethod(env, System_class, System_getProperty_methodID, key, def); + return TRUE; +} + +jint JNI_OnLoad(JavaVM *vm, UNUSED void *reserved) { + JNIEnv *env; + if ((*vm)->GetEnv(vm, (void**)&env, JNI_VERSION_1_6) != JNI_OK) { + return -1; + } + + jclass booleanW_class = (*env)->FindClass(env, "org/netlib/util/booleanW"); + if (!booleanW_class) { + return -1; + } + booleanW_val_fieldID = (*env)->GetFieldID(env, booleanW_class, "val", "Z"); + if (!booleanW_val_fieldID) { + return -1; + } + + jclass intW_class = (*env)->FindClass(env, "org/netlib/util/intW"); + if (!intW_class) { + return -1; + } + intW_val_fieldID = (*env)->GetFieldID(env, intW_class, "val", "I"); + if (!intW_val_fieldID) { + return -1; + } + + jclass floatW_class = (*env)->FindClass(env, "org/netlib/util/floatW"); + if (!floatW_class) { + return -1; + } + floatW_val_fieldID = (*env)->GetFieldID(env, floatW_class, "val", "F"); + if (!floatW_val_fieldID) { + return -1; + } + + jclass doubleW_class = (*env)->FindClass(env, "org/netlib/util/doubleW"); + if (!doubleW_class) { + return -1; + } + doubleW_val_fieldID = (*env)->GetFieldID(env, doubleW_class, "val", "D"); + if (!doubleW_val_fieldID) { + return -1; + } + + jclass StringW_class = (*env)->FindClass(env, "org/netlib/util/StringW"); + if (!StringW_class) { + return -1; + } + StringW_val_fieldID = (*env)->GetFieldID(env, StringW_class, "val", "Ljava/lang/String;"); + if (!StringW_val_fieldID) { + return -1; + } + + jstring property_nativeLibPath; + if (!get_system_property(env, (*env)->NewStringUTF(env, "dev.ludovic.netlib.arpack.nativeLibPath"), NULL, &property_nativeLibPath)) { + return -1; + } + jstring property_nativeLib; + if (!get_system_property(env, (*env)->NewStringUTF(env, "dev.ludovic.netlib.arpack.nativeLib"), (*env)->NewStringUTF(env, "arpack"), &property_nativeLib)) { + return -1; + } + + char arpack_name[1024]; + if (property_nativeLibPath) { + const char *utf = (*env)->GetStringUTFChars(env, property_nativeLibPath, NULL); + snprintf(arpack_name, sizeof(arpack_name), "%s", utf); + (*env)->ReleaseStringUTFChars(env, property_nativeLibPath, utf); + } else if (property_nativeLib) { + const char *utf = (*env)->GetStringUTFChars(env, property_nativeLib, NULL); + snprintf(arpack_name, sizeof(arpack_name), "lib%s.so", utf); + (*env)->ReleaseStringUTFChars(env, property_nativeLib, utf); + } else { + /* either property_nativeLibPath or property_nativeLib should always be non-NULL */ + return -1; + } + + arpack = dlopen(arpack_name, RTLD_LAZY); + if (!arpack) { + return -1; + } + +#define LOAD_SYMBOL(name) \ + name = dlsym(arpack, #name); \ + if (!name) { \ + return -1; \ + } + + LOAD_SYMBOL(dmout_) + LOAD_SYMBOL(smout_) + LOAD_SYMBOL(dvout_) + LOAD_SYMBOL(svout_) + LOAD_SYMBOL(ivout_) + LOAD_SYMBOL(dgetv0_) + LOAD_SYMBOL(sgetv0_) + // LOAD_SYMBOL(dlaqrb_) + // LOAD_SYMBOL(slaqrb_) + LOAD_SYMBOL(dnaitr_) + LOAD_SYMBOL(snaitr_) + LOAD_SYMBOL(dnapps_) + LOAD_SYMBOL(snapps_) + LOAD_SYMBOL(dnaup2_) + LOAD_SYMBOL(snaup2_) + LOAD_SYMBOL(dnaupd_) + LOAD_SYMBOL(snaupd_) + LOAD_SYMBOL(dnconv_) + LOAD_SYMBOL(snconv_) + LOAD_SYMBOL(dsconv_) + LOAD_SYMBOL(ssconv_) + LOAD_SYMBOL(dneigh_) + LOAD_SYMBOL(sneigh_) + LOAD_SYMBOL(dneupd_) + LOAD_SYMBOL(sneupd_) + LOAD_SYMBOL(dngets_) + LOAD_SYMBOL(sngets_) + LOAD_SYMBOL(dsaitr_) + LOAD_SYMBOL(ssaitr_) + LOAD_SYMBOL(dsapps_) + LOAD_SYMBOL(ssapps_) + LOAD_SYMBOL(dsaup2_) + LOAD_SYMBOL(ssaup2_) + LOAD_SYMBOL(dseigt_) + LOAD_SYMBOL(sseigt_) + LOAD_SYMBOL(dsesrt_) + LOAD_SYMBOL(ssesrt_) + LOAD_SYMBOL(dsaupd_) + LOAD_SYMBOL(ssaupd_) + LOAD_SYMBOL(dseupd_) + LOAD_SYMBOL(sseupd_) + LOAD_SYMBOL(dsgets_) + LOAD_SYMBOL(ssgets_) + LOAD_SYMBOL(dsortc_) + LOAD_SYMBOL(ssortc_) + LOAD_SYMBOL(dsortr_) + LOAD_SYMBOL(ssortr_) + LOAD_SYMBOL(dstatn_) + LOAD_SYMBOL(sstatn_) + LOAD_SYMBOL(dstats_) + LOAD_SYMBOL(sstats_) + LOAD_SYMBOL(dstqrb_) + LOAD_SYMBOL(sstqrb_) + LOAD_SYMBOL(icnteq_) + LOAD_SYMBOL(icopy_) + LOAD_SYMBOL(iset_) + LOAD_SYMBOL(iswap_) + LOAD_SYMBOL(second_) + +#undef LOAD_SYMBOL + + return JNI_VERSION_1_6; +} + +void JNI_OnUnload(UNUSED JavaVM *vm, UNUSED void *reserved) { + dlclose(arpack); +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/ARPACKTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/ARPACKTest.java index 7f5ffe1b..c17035cb 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/ARPACKTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/ARPACKTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import java.util.stream.Stream; @@ -32,17 +35,10 @@ public class ARPACKTest { private static Stream ARPACKImplementations() { Stream instances = Stream.of( - Arguments.of(dev.ludovic.netlib.arpack.NetlibF2jARPACK.getInstance()) + Arguments.of(dev.ludovic.netlib.arpack.F2jARPACK.getInstance()), + Arguments.of(dev.ludovic.netlib.arpack.JNIARPACK.getInstance()) ); - try { - instances = Stream.concat(instances, Stream.of( - dev.ludovic.netlib.arpack.NetlibNativeARPACK.getInstance() - )); - } catch (ExceptionInInitializerError e) { - } catch (NoClassDefFoundError e) { - } - return instances; } } diff --git a/arpack/src/main/java/dev/ludovic/netlib/arpack/NetlibF2jARPACK.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsaupdTest.java similarity index 73% rename from arpack/src/main/java/dev/ludovic/netlib/arpack/NetlibF2jARPACK.java rename to arpack/src/test/java/dev/ludovic/netlib/arpack/DsaupdTest.java index 6336a641..0b31a1fd 100644 --- a/arpack/src/main/java/dev/ludovic/netlib/arpack/NetlibF2jARPACK.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsaupdTest.java @@ -23,23 +23,17 @@ * information or have any questions. */ -package dev.ludovic.netlib.arpack; - import dev.ludovic.netlib.ARPACK; -public final class NetlibF2jARPACK extends NetlibWrapper implements dev.ludovic.netlib.JavaARPACK { - - private static final NetlibF2jARPACK instance; - - static { - instance = new NetlibF2jARPACK(new com.github.fommil.netlib.F2jARPACK()); - } +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; - protected NetlibF2jARPACK(com.github.fommil.netlib.ARPACK _arpack) { - super(_arpack); - } +public class DsaupdTest extends ARPACKTest { - public static dev.ludovic.netlib.JavaARPACK getInstance() { - return instance; - } + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } } diff --git a/arpack/src/main/java/dev/ludovic/netlib/arpack/NetlibNativeARPACK.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DseupdTest.java similarity index 65% rename from arpack/src/main/java/dev/ludovic/netlib/arpack/NetlibNativeARPACK.java rename to arpack/src/test/java/dev/ludovic/netlib/arpack/DseupdTest.java index 7c9da441..7aad5793 100644 --- a/arpack/src/main/java/dev/ludovic/netlib/arpack/NetlibNativeARPACK.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DseupdTest.java @@ -23,27 +23,17 @@ * information or have any questions. */ -package dev.ludovic.netlib.arpack; - import dev.ludovic.netlib.ARPACK; -public final class NetlibNativeARPACK extends NetlibWrapper implements dev.ludovic.netlib.NativeARPACK { +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; - private static final NetlibNativeARPACK instance; +public class DseupdTest extends ARPACKTest { - static { - com.github.fommil.netlib.ARPACK arpack = com.github.fommil.netlib.ARPACK.getInstance(); - if (arpack instanceof com.github.fommil.netlib.F2jARPACK) { - throw new RuntimeException("Unable to load native implementation"); + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { } - instance = new NetlibNativeARPACK(arpack); - } - - protected NetlibNativeARPACK(com.github.fommil.netlib.ARPACK _arpack) { - super(_arpack); - } - - public static dev.ludovic.netlib.NativeARPACK getInstance() { - return instance; - } } diff --git a/benchmarks/src/main/java/dev/ludovic/netlib/benchmarks/arpack/ARPACKBenchmark.java b/benchmarks/src/main/java/dev/ludovic/netlib/benchmarks/arpack/ARPACKBenchmark.java index f543c775..d3cd2803 100644 --- a/benchmarks/src/main/java/dev/ludovic/netlib/benchmarks/arpack/ARPACKBenchmark.java +++ b/benchmarks/src/main/java/dev/ludovic/netlib/benchmarks/arpack/ARPACKBenchmark.java @@ -43,7 +43,7 @@ public abstract class ARPACKBenchmark { public void setupImplementation() { switch (implementation) { case "f2j": - arpack = dev.ludovic.netlib.arpack.NetlibF2jARPACK.getInstance(); + arpack = dev.ludovic.netlib.arpack.F2jARPACK.getInstance(); break; case "java": arpack = dev.ludovic.netlib.JavaARPACK.getInstance(); From 96d15fea3168a38ed599df1540ee53acb6ce002c Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Fri, 30 Apr 2021 18:02:16 +0200 Subject: [PATCH 22/42] Make sure license is consistent across all files --- blas/src/main/native/jni.c | 2 +- blas/src/test/java/dev/ludovic/netlib/blas/BLASTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l1/DasumTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l1/DaxpyTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l1/DdotTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l1/Dnrm2Test.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l1/DrotTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l1/DrotgTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l1/DscalTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l1/DswapTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l1/IdamaxTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l1/IsamaxTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l1/SasumTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l1/SaxpyTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l1/SdotTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l1/SdsdotTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l1/Snrm2Test.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l1/SrotTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l1/SrotgTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l1/SscalTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l1/SswapTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l2/DgemvTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l2/DgerTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l2/DspmvTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l2/Dspr2Test.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l2/DsprTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l2/DsymvTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l2/Dsyr2Test.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l2/DsyrTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l2/SgemvTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l2/SgerTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l2/SspmvTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l2/Sspr2Test.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l2/SsprTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l2/SsymvTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l2/Ssyr2Test.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l2/SsyrTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l3/DgemmTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l3/DsymmTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l3/SgemmTest.java | 3 +++ blas/src/test/java/dev/ludovic/netlib/blas/l3/SsymmTest.java | 3 +++ lapack/src/main/native/jni.c | 2 +- lapack/src/test/java/dev/ludovic/netlib/lapack/DppsvTest.java | 3 +++ lapack/src/test/java/dev/ludovic/netlib/lapack/LAPACKTest.java | 3 +++ 44 files changed, 128 insertions(+), 2 deletions(-) diff --git a/blas/src/main/native/jni.c b/blas/src/main/native/jni.c index 86426c17..d1541162 100644 --- a/blas/src/main/native/jni.c +++ b/blas/src/main/native/jni.c @@ -1,7 +1,7 @@ /* * Copyright 2020, 2021, Ludovic Henry * - * Permission is hereby granted, free of intge, to any person obtaining a copy + * Permission is hereby granted, free of charge, to any person obtaining a copy * of this software and associated documentation files (the "Software"), to deal * in the Software without restriction, including without limitation the rights * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/BLASTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/BLASTest.java index c98f1645..553f1c19 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/BLASTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/BLASTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import java.io.BufferedReader; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/DasumTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l1/DasumTest.java index c219f120..37a339b6 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l1/DasumTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l1/DasumTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/DaxpyTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l1/DaxpyTest.java index d011f104..9eab1866 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l1/DaxpyTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l1/DaxpyTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/DdotTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l1/DdotTest.java index facfad9d..cad1c781 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l1/DdotTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l1/DdotTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/Dnrm2Test.java b/blas/src/test/java/dev/ludovic/netlib/blas/l1/Dnrm2Test.java index a81c8f12..f65481c2 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l1/Dnrm2Test.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l1/Dnrm2Test.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/DrotTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l1/DrotTest.java index b5ae6a8b..5dd17655 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l1/DrotTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l1/DrotTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/DrotgTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l1/DrotgTest.java index 5fc56fc7..fb022438 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l1/DrotgTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l1/DrotgTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/DscalTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l1/DscalTest.java index 77657826..9defb944 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l1/DscalTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l1/DscalTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/DswapTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l1/DswapTest.java index d6544239..85f36f5d 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l1/DswapTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l1/DswapTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/IdamaxTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l1/IdamaxTest.java index 5506cf2a..1be59158 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l1/IdamaxTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l1/IdamaxTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/IsamaxTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l1/IsamaxTest.java index 20f124c0..7150ce5f 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l1/IsamaxTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l1/IsamaxTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/SasumTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l1/SasumTest.java index ca50c51b..d07e5454 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l1/SasumTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l1/SasumTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/SaxpyTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l1/SaxpyTest.java index 1927acba..8ab72c28 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l1/SaxpyTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l1/SaxpyTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/SdotTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l1/SdotTest.java index cbe4e137..ed81dece 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l1/SdotTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l1/SdotTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/SdsdotTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l1/SdsdotTest.java index 5be64ac1..e09fa514 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l1/SdsdotTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l1/SdsdotTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/Snrm2Test.java b/blas/src/test/java/dev/ludovic/netlib/blas/l1/Snrm2Test.java index 4d3abfa6..d3a730ce 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l1/Snrm2Test.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l1/Snrm2Test.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/SrotTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l1/SrotTest.java index d663092a..432d9644 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l1/SrotTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l1/SrotTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/SrotgTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l1/SrotgTest.java index 45ea2e71..e0cdb65c 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l1/SrotgTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l1/SrotgTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/SscalTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l1/SscalTest.java index 93e62700..e606dc74 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l1/SscalTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l1/SscalTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/SswapTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l1/SswapTest.java index 91826562..4daa5b81 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l1/SswapTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l1/SswapTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/DgemvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l2/DgemvTest.java index 32ab15d2..4f174e72 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l2/DgemvTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l2/DgemvTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/DgerTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l2/DgerTest.java index d25978dc..7c6c0c33 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l2/DgerTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l2/DgerTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/DspmvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l2/DspmvTest.java index cb2ff5b5..d9d03dae 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l2/DspmvTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l2/DspmvTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/Dspr2Test.java b/blas/src/test/java/dev/ludovic/netlib/blas/l2/Dspr2Test.java index a923af67..dfb9a404 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l2/Dspr2Test.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l2/Dspr2Test.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/DsprTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l2/DsprTest.java index c65bb5e6..a63aa65e 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l2/DsprTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l2/DsprTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/DsymvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l2/DsymvTest.java index a4316a12..51c2ef7d 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l2/DsymvTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l2/DsymvTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/Dsyr2Test.java b/blas/src/test/java/dev/ludovic/netlib/blas/l2/Dsyr2Test.java index 03b66098..9c389d02 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l2/Dsyr2Test.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l2/Dsyr2Test.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/DsyrTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l2/DsyrTest.java index 42c1cf2b..ea2999da 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l2/DsyrTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l2/DsyrTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/SgemvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l2/SgemvTest.java index 564ccbdc..34f80be2 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l2/SgemvTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l2/SgemvTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/SgerTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l2/SgerTest.java index ad0ce87a..26e75176 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l2/SgerTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l2/SgerTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/SspmvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l2/SspmvTest.java index 69391dd8..8f386dc7 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l2/SspmvTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l2/SspmvTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/Sspr2Test.java b/blas/src/test/java/dev/ludovic/netlib/blas/l2/Sspr2Test.java index 89237ae1..110dcaa0 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l2/Sspr2Test.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l2/Sspr2Test.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/SsprTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l2/SsprTest.java index 4a002e73..e7fe3880 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l2/SsprTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l2/SsprTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/SsymvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l2/SsymvTest.java index 2a09977d..2c58605a 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l2/SsymvTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l2/SsymvTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/Ssyr2Test.java b/blas/src/test/java/dev/ludovic/netlib/blas/l2/Ssyr2Test.java index 8bf0ee92..67d4e7e8 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l2/Ssyr2Test.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l2/Ssyr2Test.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/SsyrTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l2/SsyrTest.java index 1731efcb..c6dae2ae 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l2/SsyrTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l2/SsyrTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l3/DgemmTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l3/DgemmTest.java index b74a1cae..9b76781c 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l3/DgemmTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l3/DgemmTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l3/DsymmTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l3/DsymmTest.java index ba7a983c..0e2514c8 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l3/DsymmTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l3/DsymmTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l3/SgemmTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l3/SgemmTest.java index 70c8c02d..ce1d58f9 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l3/SgemmTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l3/SgemmTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l3/SsymmTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/l3/SsymmTest.java index 4ce583f0..bf0696e6 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/l3/SsymmTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/l3/SsymmTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.BLAS; diff --git a/lapack/src/main/native/jni.c b/lapack/src/main/native/jni.c index 3bac9e77..d3417fe5 100644 --- a/lapack/src/main/native/jni.c +++ b/lapack/src/main/native/jni.c @@ -1,7 +1,7 @@ /* * Copyright 2020, 2021, Ludovic Henry * - * Permission is hereby granted, free of intge, to any person obtaining a copy + * Permission is hereby granted, free of charge, to any person obtaining a copy * of this software and associated documentation files (the "Software"), to deal * in the Software without restriction, including without limitation the rights * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DppsvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DppsvTest.java index ec89f70e..2c69a64c 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DppsvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DppsvTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import dev.ludovic.netlib.LAPACK; diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/LAPACKTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/LAPACKTest.java index f7495b6f..4c260142 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/LAPACKTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/LAPACKTest.java @@ -18,6 +18,9 @@ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. */ import java.io.BufferedReader; From 28d0d8090097c2f6ff1fc6bb25ba513fa4f41e86 Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Fri, 30 Apr 2021 20:00:35 +0200 Subject: [PATCH 23/42] There might be cases where we want to make a release on a SNAPSHOT tag --- .github/workflows/release.yml | 1 - 1 file changed, 1 deletion(-) diff --git a/.github/workflows/release.yml b/.github/workflows/release.yml index 32dc0110..5eb27402 100644 --- a/.github/workflows/release.yml +++ b/.github/workflows/release.yml @@ -5,7 +5,6 @@ on: push: tags: - 'v*' # Push events to matching v*, i.e. v1.0, v20.15.10 - - '!v*-SNAPSHOT' # But not v*-SNAPSHOT, i.e. v2-SNAPSHOT workflow_dispatch: name: Release From 4514d49913a4a52d7b9654a62285e4b8e460ccef Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Fri, 30 Apr 2021 20:45:32 +0200 Subject: [PATCH 24/42] Add scaffolding for all ARPACK, BLAS, and LAPACK routines --- .../dev/ludovic/netlib/arpack/ARPACKTest.java | 146 ++++++++++++++++++ .../dev/ludovic/netlib/arpack/Dgetv0Test.java | 39 +++++ .../dev/ludovic/netlib/arpack/DlaqrbTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/DmoutTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/DnaitrTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/DnappsTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/Dnaup2Test.java | 39 +++++ .../dev/ludovic/netlib/arpack/DnaupdTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/DnconvTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/DneighTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/DneupdTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/DngetsTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/DsaitrTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/DsappsTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/Dsaup2Test.java | 39 +++++ .../dev/ludovic/netlib/arpack/DsconvTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/DseigtTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/DsesrtTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/DsgetsTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/DsortcTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/DsortrTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/DstatnTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/DstatsTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/DstqrbTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/DvoutTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/IcnteqTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/IcopyTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/IsetTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/IswapTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/IvoutTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/SecondTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/Sgetv0Test.java | 39 +++++ .../dev/ludovic/netlib/arpack/SlaqrbTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/SmoutTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/SnaitrTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/SnappsTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/Snaup2Test.java | 39 +++++ .../dev/ludovic/netlib/arpack/SnaupdTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/SnconvTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/SneighTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/SneupdTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/SngetsTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/SsaitrTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/SsappsTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/Ssaup2Test.java | 39 +++++ .../dev/ludovic/netlib/arpack/SsaupdTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/SsconvTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/SseigtTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/SsesrtTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/SseupdTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/SsgetsTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/SsortcTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/SsortrTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/SstatnTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/SstatsTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/SstqrbTest.java | 39 +++++ .../dev/ludovic/netlib/arpack/SvoutTest.java | 39 +++++ arpack/src/test/resources/X.vec | 1 + arpack/src/test/resources/Y.vec | 1 + arpack/src/test/resources/geA.mat | 1 + arpack/src/test/resources/geB.mat | 1 + arpack/src/test/resources/geC.mat | 1 + .../netlib/blas/{l1 => }/DasumTest.java | 0 .../netlib/blas/{l1 => }/DaxpyTest.java | 0 .../netlib/blas/{l1 => }/DdotTest.java | 0 .../dev/ludovic/netlib/blas/DgbmvTest.java | 39 +++++ .../netlib/blas/{l3 => }/DgemmTest.java | 0 .../netlib/blas/{l2 => }/DgemvTest.java | 0 .../netlib/blas/{l2 => }/DgerTest.java | 0 .../netlib/blas/{l1 => }/Dnrm2Test.java | 0 .../netlib/blas/{l1 => }/DrotTest.java | 0 .../netlib/blas/{l1 => }/DrotgTest.java | 0 .../dev/ludovic/netlib/blas/DrotmTest.java | 39 +++++ .../dev/ludovic/netlib/blas/DrotmgTest.java | 39 +++++ .../dev/ludovic/netlib/blas/DsbmvTest.java | 39 +++++ .../netlib/blas/{l1 => }/DscalTest.java | 0 .../netlib/blas/{l2 => }/DspmvTest.java | 0 .../netlib/blas/{l2 => }/Dspr2Test.java | 0 .../netlib/blas/{l2 => }/DsprTest.java | 0 .../netlib/blas/{l1 => }/DswapTest.java | 0 .../netlib/blas/{l3 => }/DsymmTest.java | 0 .../netlib/blas/{l2 => }/DsymvTest.java | 0 .../netlib/blas/{l2 => }/Dsyr2Test.java | 0 .../dev/ludovic/netlib/blas/Dsyr2kTest.java | 39 +++++ .../netlib/blas/{l2 => }/DsyrTest.java | 0 .../dev/ludovic/netlib/blas/DsyrkTest.java | 39 +++++ .../dev/ludovic/netlib/blas/DtbmvTest.java | 39 +++++ .../dev/ludovic/netlib/blas/DtbsvTest.java | 39 +++++ .../dev/ludovic/netlib/blas/DtpmvTest.java | 39 +++++ .../dev/ludovic/netlib/blas/DtpsvTest.java | 39 +++++ .../dev/ludovic/netlib/blas/DtrmmTest.java | 39 +++++ .../dev/ludovic/netlib/blas/DtrmvTest.java | 39 +++++ .../dev/ludovic/netlib/blas/DtrsmTest.java | 39 +++++ .../dev/ludovic/netlib/blas/DtrsvTest.java | 39 +++++ .../netlib/blas/{l1 => }/IdamaxTest.java | 0 .../netlib/blas/{l1 => }/IsamaxTest.java | 0 .../netlib/blas/{l1 => }/SasumTest.java | 0 .../netlib/blas/{l1 => }/SaxpyTest.java | 0 .../netlib/blas/{l1 => }/SdotTest.java | 0 .../netlib/blas/{l1 => }/SdsdotTest.java | 0 .../dev/ludovic/netlib/blas/SgbmvTest.java | 39 +++++ .../netlib/blas/{l3 => }/SgemmTest.java | 0 .../netlib/blas/{l2 => }/SgemvTest.java | 0 .../netlib/blas/{l2 => }/SgerTest.java | 0 .../netlib/blas/{l1 => }/Snrm2Test.java | 0 .../netlib/blas/{l1 => }/SrotTest.java | 0 .../netlib/blas/{l1 => }/SrotgTest.java | 0 .../dev/ludovic/netlib/blas/SrotmTest.java | 39 +++++ .../dev/ludovic/netlib/blas/SrotmgTest.java | 39 +++++ .../dev/ludovic/netlib/blas/SsbmvTest.java | 39 +++++ .../netlib/blas/{l1 => }/SscalTest.java | 0 .../netlib/blas/{l2 => }/SspmvTest.java | 0 .../netlib/blas/{l2 => }/Sspr2Test.java | 0 .../netlib/blas/{l2 => }/SsprTest.java | 0 .../netlib/blas/{l1 => }/SswapTest.java | 0 .../netlib/blas/{l3 => }/SsymmTest.java | 0 .../netlib/blas/{l2 => }/SsymvTest.java | 0 .../netlib/blas/{l2 => }/Ssyr2Test.java | 0 .../dev/ludovic/netlib/blas/Ssyr2kTest.java | 39 +++++ .../netlib/blas/{l2 => }/SsyrTest.java | 0 .../dev/ludovic/netlib/blas/SsyrkTest.java | 39 +++++ .../dev/ludovic/netlib/blas/StbmvTest.java | 39 +++++ .../dev/ludovic/netlib/blas/StbsvTest.java | 39 +++++ .../dev/ludovic/netlib/blas/StpmvTest.java | 39 +++++ .../dev/ludovic/netlib/blas/StpsvTest.java | 39 +++++ .../dev/ludovic/netlib/blas/StrmmTest.java | 39 +++++ .../dev/ludovic/netlib/blas/StrmvTest.java | 39 +++++ .../dev/ludovic/netlib/blas/StrsmTest.java | 39 +++++ .../dev/ludovic/netlib/blas/StrsvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DbdsdcTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DbdsqrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DdisnaTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgbbrdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgbconTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgbequTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgbrfsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgbsvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgbsvxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dgbtf2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgbtrfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgbtrsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgebakTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgebalTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dgebd2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgebrdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgeconTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgeequTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgeesTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgeesxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgeevTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgeevxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgegsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgegvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dgehd2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgehrdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dgelq2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgelqfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgelsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgelsdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgelssTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgelsxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgelsyTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dgeql2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgeqlfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dgeqp3Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgeqpfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dgeqr2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgeqrfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgerfsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dgerq2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgerqfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dgesc2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgesddTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgesvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgesvdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgesvxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dgetc2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dgetf2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgetrfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgetriTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgetrsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DggbakTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DggbalTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DggesTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DggesxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DggevTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DggevxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DggglmTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgghrdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgglseTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DggqrfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DggrqfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DggsvdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DggsvpTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgtconTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgtrfsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgtsvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgtsvxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgttrfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DgttrsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dgtts2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DhgeqzTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DhseinTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DhseqrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlabadTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlabrdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlacn2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlaconTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlacpyTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DladivTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlae2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlaebzTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlaed0Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlaed1Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlaed2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlaed3Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlaed4Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlaed5Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlaed6Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlaed7Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlaed8Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlaed9Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlaedaTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlaeinTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlaev2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlaexcTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlag2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlag2sTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlags2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlagtfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlagtmTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlagtsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlagv2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlahqrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlahr2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlahrdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlaic1Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlaln2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlals0Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlalsaTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlalsdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlamc1Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlamc2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlamc4Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlamc5Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlamrgTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlanv2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlapllTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlapmtTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlaqgbTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlaqgeTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlaqp2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlaqpsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlaqr0Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlaqr1Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlaqr2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlaqr3Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlaqr4Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlaqr5Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlaqsbTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlaqspTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlaqsyTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlaqtrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlar1vTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlar2vTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlarfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlarfbTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlarfgTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlarftTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlarfxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlargvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlarnvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlarraTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlarrbTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlarrcTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlarrdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlarreTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlarrfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlarrjTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlarrkTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlarrrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlarrvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlartgTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlartvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlaruvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlarzTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlarzbTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlarztTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlas2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlasclTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlasd0Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlasd1Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlasd2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlasd3Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlasd4Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlasd5Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlasd6Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlasd7Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlasd8Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlasdaTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlasdqTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlasdtTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlasetTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlasq1Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlasq2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlasq3Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlasq4Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlasq5Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlasq6Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlasrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlasrtTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlassqTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlasv2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlaswpTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlasy2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlasyfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlatbsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlatdfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlatpsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlatrdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlatrsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlatrzTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlatzmTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlauu2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DlauumTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlazq3Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dlazq4Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DopgtrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DopmtrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dorg2lTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dorg2rTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DorgbrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DorghrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dorgl2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DorglqTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DorgqlTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DorgqrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dorgr2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DorgrqTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DorgtrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dorm2lTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dorm2rTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DormbrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DormhrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dorml2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DormlqTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DormqlTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DormqrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dormr2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dormr3Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DormrqTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DormrzTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DormtrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DpbconTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DpbequTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DpbrfsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DpbstfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DpbsvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DpbsvxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dpbtf2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DpbtrfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DpbtrsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DpoconTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DpoequTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DporfsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DposvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DposvxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dpotf2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DpotrfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DpotriTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DpotrsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DppconTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DppequTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DpprfsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DppsvTest.java | 9 -- .../dev/ludovic/netlib/lapack/DppsvxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DpptrfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DpptriTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DpptrsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DptconTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DpteqrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DptrfsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DptsvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DptsvxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DpttrfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DpttrsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dptts2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DrsclTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsbevTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsbevdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsbevxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsbgstTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsbgvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsbgvdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsbgvxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsbtrdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsgesvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DspconTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DspevTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DspevdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DspevxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DspgstTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DspgvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DspgvdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DspgvxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsprfsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DspsvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DspsvxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsptrdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsptrfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsptriTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsptrsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DstebzTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DstedcTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DstegrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsteinTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DstemrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsteqrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsterfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DstevTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DstevdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DstevrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DstevxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsyconTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsyevTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsyevdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsyevrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsyevxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dsygs2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsygstTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsygvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsygvdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsygvxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsyrfsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsysvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsysvxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dsytd2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dsytf2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsytrdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsytrfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsytriTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DsytrsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DtbconTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DtbrfsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DtbtrsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DtgevcTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dtgex2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DtgexcTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DtgsenTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DtgsjaTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DtgsnaTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dtgsy2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DtgsylTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DtpconTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DtprfsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DtptriTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DtptrsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DtrconTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DtrevcTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DtrexcTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DtrrfsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DtrsenTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DtrsnaTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DtrsylTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Dtrti2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/DtrtriTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DtrtrsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DtzrqfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/DtzrzfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/IlaverTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SbdsdcTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SbdsqrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SdisnaTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgbbrdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgbconTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgbequTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgbrfsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgbsvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgbsvxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Sgbtf2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgbtrfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgbtrsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgebakTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgebalTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Sgebd2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgebrdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgeconTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgeequTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgeesTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgeesxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgeevTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgeevxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgegsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgegvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Sgehd2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgehrdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Sgelq2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgelqfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgelsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgelsdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgelssTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgelsxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgelsyTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Sgeql2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgeqlfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Sgeqp3Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgeqpfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Sgeqr2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgeqrfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgerfsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Sgerq2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgerqfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Sgesc2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgesddTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgesvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgesvdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgesvxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Sgetc2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Sgetf2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgetrfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgetriTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgetrsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SggbakTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SggbalTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SggesTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SggesxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SggevTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SggevxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SggglmTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgghrdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgglseTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SggqrfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SggrqfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SggsvdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SggsvpTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgtconTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgtrfsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgtsvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgtsvxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgttrfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SgttrsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Sgtts2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/ShgeqzTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/ShseinTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/ShseqrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlabadTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlabrdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slacn2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlaconTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlacpyTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SladivTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slae2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlaebzTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slaed0Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slaed1Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slaed2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slaed3Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slaed4Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slaed5Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slaed6Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slaed7Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slaed8Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slaed9Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlaedaTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlaeinTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slaev2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlaexcTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slag2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slag2dTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slags2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlagtfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlagtmTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlagtsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slagv2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlahqrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slahr2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlahrdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slaic1Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slaln2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slals0Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlalsaTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlalsdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slamc1Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slamc2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slamc4Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slamc5Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlamrgTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slanv2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlapllTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlapmtTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlaqgbTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlaqgeTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slaqp2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlaqpsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slaqr0Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slaqr1Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slaqr2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slaqr3Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slaqr4Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slaqr5Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlaqsbTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlaqspTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlaqsyTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlaqtrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slar1vTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slar2vTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlarfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlarfbTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlarfgTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlarftTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlarfxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlargvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlarnvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlarraTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlarrbTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlarrcTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlarrdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlarreTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlarrfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlarrjTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlarrkTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlarrrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlarrvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlartgTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlartvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlaruvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlarzTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlarzbTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlarztTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slas2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlasclTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slasd0Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slasd1Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slasd2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slasd3Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slasd4Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slasd5Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slasd6Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slasd7Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slasd8Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlasdaTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlasdqTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlasdtTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlasetTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slasq1Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slasq2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slasq3Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slasq4Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slasq5Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slasq6Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlasrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlasrtTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlassqTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slasv2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlaswpTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slasy2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlasyfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlatbsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlatdfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlatpsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlatrdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlatrsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlatrzTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlatzmTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slauu2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SlauumTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slazq3Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Slazq4Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SopgtrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SopmtrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Sorg2lTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Sorg2rTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SorgbrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SorghrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Sorgl2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SorglqTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SorgqlTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SorgqrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Sorgr2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SorgrqTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SorgtrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Sorm2lTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Sorm2rTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SormbrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SormhrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Sorml2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SormlqTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SormqlTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SormqrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Sormr2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Sormr3Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SormrqTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SormrzTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SormtrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SpbconTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SpbequTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SpbrfsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SpbstfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SpbsvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SpbsvxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Spbtf2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SpbtrfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SpbtrsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SpoconTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SpoequTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SporfsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SposvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SposvxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Spotf2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SpotrfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SpotriTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SpotrsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SppconTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SppequTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SpprfsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SppsvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SppsvxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SpptrfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SpptriTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SpptrsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SptconTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SpteqrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SptrfsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SptsvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SptsvxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SpttrfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SpttrsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Sptts2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SrsclTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsbevTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsbevdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsbevxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsbgstTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsbgvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsbgvdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsbgvxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsbtrdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SspconTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SspevTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SspevdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SspevxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SspgstTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SspgvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SspgvdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SspgvxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsprfsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SspsvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SspsvxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsptrdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsptrfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsptriTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsptrsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SstebzTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SstedcTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SstegrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsteinTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SstemrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsteqrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsterfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SstevTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SstevdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SstevrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SstevxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsyconTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsyevTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsyevdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsyevrTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsyevxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Ssygs2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsygstTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsygvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsygvdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsygvxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsyrfsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsysvTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsysvxTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Ssytd2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/Ssytf2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsytrdTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsytrfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsytriTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/SsytrsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/StbconTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/StbrfsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/StbtrsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/StgevcTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Stgex2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/StgexcTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/StgsenTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/StgsjaTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/StgsnaTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Stgsy2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/StgsylTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/StpconTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/StprfsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/StptriTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/StptrsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/StrconTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/StrevcTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/StrexcTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/StrrfsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/StrsenTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/StrsnaTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/StrsylTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/Strti2Test.java | 39 +++++ .../dev/ludovic/netlib/lapack/StrtriTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/StrtrsTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/StzrqfTest.java | 39 +++++ .../dev/ludovic/netlib/lapack/StzrzfTest.java | 39 +++++ 809 files changed, 29908 insertions(+), 9 deletions(-) create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/Dgetv0Test.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/DlaqrbTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/DmoutTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/DnaitrTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/DnappsTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/Dnaup2Test.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/DnaupdTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/DnconvTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/DneighTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/DneupdTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/DngetsTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/DsaitrTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/DsappsTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/Dsaup2Test.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/DsconvTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/DseigtTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/DsesrtTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/DsgetsTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/DsortcTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/DsortrTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/DstatnTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/DstatsTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/DstqrbTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/DvoutTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/IcnteqTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/IcopyTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/IsetTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/IswapTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/IvoutTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/SecondTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/Sgetv0Test.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/SlaqrbTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/SmoutTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/SnaitrTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/SnappsTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/Snaup2Test.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/SnaupdTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/SnconvTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/SneighTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/SneupdTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/SngetsTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/SsaitrTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/SsappsTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/Ssaup2Test.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/SsaupdTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/SsconvTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/SseigtTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/SsesrtTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/SseupdTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/SsgetsTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/SsortcTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/SsortrTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/SstatnTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/SstatsTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/SstqrbTest.java create mode 100644 arpack/src/test/java/dev/ludovic/netlib/arpack/SvoutTest.java create mode 100644 arpack/src/test/resources/X.vec create mode 100644 arpack/src/test/resources/Y.vec create mode 100644 arpack/src/test/resources/geA.mat create mode 100644 arpack/src/test/resources/geB.mat create mode 100644 arpack/src/test/resources/geC.mat rename blas/src/test/java/dev/ludovic/netlib/blas/{l1 => }/DasumTest.java (100%) rename blas/src/test/java/dev/ludovic/netlib/blas/{l1 => }/DaxpyTest.java (100%) rename blas/src/test/java/dev/ludovic/netlib/blas/{l1 => }/DdotTest.java (100%) create mode 100644 blas/src/test/java/dev/ludovic/netlib/blas/DgbmvTest.java rename blas/src/test/java/dev/ludovic/netlib/blas/{l3 => }/DgemmTest.java (100%) rename blas/src/test/java/dev/ludovic/netlib/blas/{l2 => }/DgemvTest.java (100%) rename blas/src/test/java/dev/ludovic/netlib/blas/{l2 => }/DgerTest.java (100%) rename blas/src/test/java/dev/ludovic/netlib/blas/{l1 => }/Dnrm2Test.java (100%) rename blas/src/test/java/dev/ludovic/netlib/blas/{l1 => }/DrotTest.java (100%) rename blas/src/test/java/dev/ludovic/netlib/blas/{l1 => }/DrotgTest.java (100%) create mode 100644 blas/src/test/java/dev/ludovic/netlib/blas/DrotmTest.java create mode 100644 blas/src/test/java/dev/ludovic/netlib/blas/DrotmgTest.java create mode 100644 blas/src/test/java/dev/ludovic/netlib/blas/DsbmvTest.java rename blas/src/test/java/dev/ludovic/netlib/blas/{l1 => }/DscalTest.java (100%) rename blas/src/test/java/dev/ludovic/netlib/blas/{l2 => }/DspmvTest.java (100%) rename blas/src/test/java/dev/ludovic/netlib/blas/{l2 => }/Dspr2Test.java (100%) rename blas/src/test/java/dev/ludovic/netlib/blas/{l2 => }/DsprTest.java (100%) rename blas/src/test/java/dev/ludovic/netlib/blas/{l1 => }/DswapTest.java (100%) rename blas/src/test/java/dev/ludovic/netlib/blas/{l3 => }/DsymmTest.java (100%) rename blas/src/test/java/dev/ludovic/netlib/blas/{l2 => }/DsymvTest.java (100%) rename blas/src/test/java/dev/ludovic/netlib/blas/{l2 => }/Dsyr2Test.java (100%) create mode 100644 blas/src/test/java/dev/ludovic/netlib/blas/Dsyr2kTest.java rename blas/src/test/java/dev/ludovic/netlib/blas/{l2 => }/DsyrTest.java (100%) create mode 100644 blas/src/test/java/dev/ludovic/netlib/blas/DsyrkTest.java create mode 100644 blas/src/test/java/dev/ludovic/netlib/blas/DtbmvTest.java create mode 100644 blas/src/test/java/dev/ludovic/netlib/blas/DtbsvTest.java create mode 100644 blas/src/test/java/dev/ludovic/netlib/blas/DtpmvTest.java create mode 100644 blas/src/test/java/dev/ludovic/netlib/blas/DtpsvTest.java create mode 100644 blas/src/test/java/dev/ludovic/netlib/blas/DtrmmTest.java create mode 100644 blas/src/test/java/dev/ludovic/netlib/blas/DtrmvTest.java create mode 100644 blas/src/test/java/dev/ludovic/netlib/blas/DtrsmTest.java create mode 100644 blas/src/test/java/dev/ludovic/netlib/blas/DtrsvTest.java rename blas/src/test/java/dev/ludovic/netlib/blas/{l1 => }/IdamaxTest.java (100%) rename blas/src/test/java/dev/ludovic/netlib/blas/{l1 => }/IsamaxTest.java (100%) rename blas/src/test/java/dev/ludovic/netlib/blas/{l1 => }/SasumTest.java (100%) rename blas/src/test/java/dev/ludovic/netlib/blas/{l1 => }/SaxpyTest.java (100%) rename blas/src/test/java/dev/ludovic/netlib/blas/{l1 => }/SdotTest.java (100%) rename blas/src/test/java/dev/ludovic/netlib/blas/{l1 => }/SdsdotTest.java (100%) create mode 100644 blas/src/test/java/dev/ludovic/netlib/blas/SgbmvTest.java rename blas/src/test/java/dev/ludovic/netlib/blas/{l3 => }/SgemmTest.java (100%) rename blas/src/test/java/dev/ludovic/netlib/blas/{l2 => }/SgemvTest.java (100%) rename blas/src/test/java/dev/ludovic/netlib/blas/{l2 => }/SgerTest.java (100%) rename blas/src/test/java/dev/ludovic/netlib/blas/{l1 => }/Snrm2Test.java (100%) rename blas/src/test/java/dev/ludovic/netlib/blas/{l1 => }/SrotTest.java (100%) rename blas/src/test/java/dev/ludovic/netlib/blas/{l1 => }/SrotgTest.java (100%) create mode 100644 blas/src/test/java/dev/ludovic/netlib/blas/SrotmTest.java create mode 100644 blas/src/test/java/dev/ludovic/netlib/blas/SrotmgTest.java create mode 100644 blas/src/test/java/dev/ludovic/netlib/blas/SsbmvTest.java rename blas/src/test/java/dev/ludovic/netlib/blas/{l1 => }/SscalTest.java (100%) rename blas/src/test/java/dev/ludovic/netlib/blas/{l2 => }/SspmvTest.java (100%) rename blas/src/test/java/dev/ludovic/netlib/blas/{l2 => }/Sspr2Test.java (100%) rename blas/src/test/java/dev/ludovic/netlib/blas/{l2 => }/SsprTest.java (100%) rename blas/src/test/java/dev/ludovic/netlib/blas/{l1 => }/SswapTest.java (100%) rename blas/src/test/java/dev/ludovic/netlib/blas/{l3 => }/SsymmTest.java (100%) rename blas/src/test/java/dev/ludovic/netlib/blas/{l2 => }/SsymvTest.java (100%) rename blas/src/test/java/dev/ludovic/netlib/blas/{l2 => }/Ssyr2Test.java (100%) create mode 100644 blas/src/test/java/dev/ludovic/netlib/blas/Ssyr2kTest.java rename blas/src/test/java/dev/ludovic/netlib/blas/{l2 => }/SsyrTest.java (100%) create mode 100644 blas/src/test/java/dev/ludovic/netlib/blas/SsyrkTest.java create mode 100644 blas/src/test/java/dev/ludovic/netlib/blas/StbmvTest.java create mode 100644 blas/src/test/java/dev/ludovic/netlib/blas/StbsvTest.java create mode 100644 blas/src/test/java/dev/ludovic/netlib/blas/StpmvTest.java create mode 100644 blas/src/test/java/dev/ludovic/netlib/blas/StpsvTest.java create mode 100644 blas/src/test/java/dev/ludovic/netlib/blas/StrmmTest.java create mode 100644 blas/src/test/java/dev/ludovic/netlib/blas/StrmvTest.java create mode 100644 blas/src/test/java/dev/ludovic/netlib/blas/StrsmTest.java create mode 100644 blas/src/test/java/dev/ludovic/netlib/blas/StrsvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DbdsdcTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DbdsqrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DdisnaTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgbbrdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgbconTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgbequTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgbrfsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgbsvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgbsvxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dgbtf2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgbtrfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgbtrsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgebakTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgebalTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dgebd2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgebrdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgeconTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgeequTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgeesTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgeesxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgeevTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgeevxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgegsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgegvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dgehd2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgehrdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dgelq2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgelqfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgelssTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsyTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dgeql2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgeqlfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dgeqp3Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgeqpfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dgeqr2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgeqrfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgerfsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dgerq2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgerqfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dgesc2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgesddTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgesvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgesvdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgesvxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dgetc2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dgetf2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgetrfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgetriTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgetrsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DggbakTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DggbalTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DggesTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DggesxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DggevTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DggevxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DggglmTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgghrdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgglseTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DggqrfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DggrqfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DggsvdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DggsvpTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgtconTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgtrfsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgtsvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgtsvxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgttrfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DgttrsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dgtts2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DhgeqzTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DhseinTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DhseqrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlabadTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlabrdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlacn2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlaconTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlacpyTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DladivTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlae2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlaebzTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed0Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed1Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed3Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed4Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed5Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed6Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed7Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed8Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed9Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlaedaTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlaeinTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaev2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlaexcTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlag2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlag2sTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlags2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlagtfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlagtmTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlagtsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlagv2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlahqrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlahr2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlahrdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaic1Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaln2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlals0Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlalsaTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlalsdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc1Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc4Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc5Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlamrgTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlanv2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlapllTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlapmtTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqgbTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqgeTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqp2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqpsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr0Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr1Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr3Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr4Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr5Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqsbTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqspTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqsyTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqtrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlar1vTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlar2vTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfbTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfgTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlarftTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlargvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlarnvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlarraTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrbTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrcTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlarreTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrjTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrkTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlartgTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlartvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlaruvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlarzTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlarzbTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlarztTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlas2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlasclTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd0Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd1Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd3Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd4Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd5Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd6Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd7Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd8Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlasdaTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlasdqTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlasdtTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlasetTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq1Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq3Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq4Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq5Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq6Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlasrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlasrtTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlassqTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasv2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlaswpTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasy2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlasyfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlatbsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlatdfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlatpsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlatrdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlatrsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlatrzTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlatzmTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlauu2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DlauumTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlazq3Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dlazq4Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DopgtrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DopmtrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dorg2lTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dorg2rTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DorgbrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DorghrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dorgl2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DorglqTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DorgqlTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DorgqrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dorgr2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DorgrqTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DorgtrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dorm2lTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dorm2rTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DormbrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DormhrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dorml2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DormlqTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DormqlTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DormqrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dormr2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dormr3Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DormrqTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DormrzTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DormtrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DpbconTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DpbequTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DpbrfsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DpbstfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DpbsvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DpbsvxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dpbtf2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DpbtrfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DpbtrsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DpoconTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DpoequTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DporfsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DposvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DposvxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dpotf2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DpotrfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DpotriTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DpotrsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DppconTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DppequTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DpprfsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DppsvxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DpptrfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DpptriTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DpptrsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DptconTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DpteqrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DptrfsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DptsvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DptsvxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DpttrfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DpttrsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dptts2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DrsclTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsbevTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsbevdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsbevxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgstTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgvdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgvxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsbtrdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsgesvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DspconTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DspevTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DspevdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DspevxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DspgstTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DspgvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DspgvdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DspgvxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsprfsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DspsvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DspsvxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsptrdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsptrfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsptriTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsptrsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DstebzTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DstedcTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DstegrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsteinTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DstemrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsteqrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsterfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DstevTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DstevdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DstevrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DstevxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsyconTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dsygs2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsygstTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsygvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsygvdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsygvxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsyrfsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsysvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsysvxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dsytd2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dsytf2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsytrdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsytrfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsytriTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DsytrsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DtbconTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DtbrfsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DtbtrsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DtgevcTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dtgex2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DtgexcTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsenTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsjaTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsnaTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dtgsy2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsylTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DtpconTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DtprfsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DtptriTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DtptrsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DtrconTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DtrevcTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DtrexcTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DtrrfsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DtrsenTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DtrsnaTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DtrsylTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Dtrti2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DtrtriTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DtrtrsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DtzrqfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/DtzrzfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/IlaverTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SbdsdcTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SbdsqrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SdisnaTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgbbrdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgbconTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgbequTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgbrfsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgbsvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgbsvxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Sgbtf2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgbtrfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgbtrsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgebakTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgebalTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Sgebd2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgebrdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgeconTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgeequTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgeesTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgeesxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgeevTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgeevxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgegsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgegvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Sgehd2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgehrdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Sgelq2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgelqfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgelssTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsyTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Sgeql2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgeqlfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Sgeqp3Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgeqpfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Sgeqr2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgeqrfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgerfsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Sgerq2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgerqfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Sgesc2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgesddTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgesvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgesvdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgesvxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Sgetc2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Sgetf2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgetrfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgetriTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgetrsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SggbakTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SggbalTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SggesTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SggesxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SggevTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SggevxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SggglmTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgghrdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgglseTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SggqrfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SggrqfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SggsvdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SggsvpTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgtconTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgtrfsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgtsvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgtsvxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgttrfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SgttrsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Sgtts2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/ShgeqzTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/ShseinTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/ShseqrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlabadTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlabrdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slacn2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlaconTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlacpyTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SladivTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slae2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlaebzTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed0Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed1Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed3Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed4Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed5Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed6Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed7Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed8Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed9Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlaedaTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlaeinTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slaev2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlaexcTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slag2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slag2dTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slags2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlagtfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlagtmTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlagtsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slagv2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlahqrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slahr2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlahrdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slaic1Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slaln2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slals0Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlalsaTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlalsdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc1Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc4Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc5Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlamrgTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slanv2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlapllTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlapmtTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqgbTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqgeTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqp2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqpsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr0Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr1Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr3Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr4Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr5Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqsbTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqspTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqsyTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqtrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slar1vTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slar2vTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfbTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfgTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlarftTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlargvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlarnvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlarraTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrbTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrcTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlarreTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrjTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrkTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlartgTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlartvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlaruvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlarzTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlarzbTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlarztTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slas2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlasclTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd0Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd1Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd3Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd4Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd5Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd6Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd7Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd8Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlasdaTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlasdqTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlasdtTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlasetTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq1Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq3Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq4Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq5Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq6Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlasrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlasrtTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlassqTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slasv2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlaswpTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slasy2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlasyfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlatbsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlatdfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlatpsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlatrdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlatrsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlatrzTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlatzmTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slauu2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SlauumTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slazq3Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Slazq4Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SopgtrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SopmtrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Sorg2lTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Sorg2rTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SorgbrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SorghrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Sorgl2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SorglqTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SorgqlTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SorgqrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Sorgr2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SorgrqTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SorgtrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Sorm2lTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Sorm2rTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SormbrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SormhrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Sorml2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SormlqTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SormqlTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SormqrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Sormr2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Sormr3Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SormrqTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SormrzTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SormtrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SpbconTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SpbequTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SpbrfsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SpbstfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SpbsvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SpbsvxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Spbtf2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SpbtrfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SpbtrsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SpoconTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SpoequTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SporfsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SposvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SposvxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Spotf2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SpotrfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SpotriTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SpotrsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SppconTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SppequTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SpprfsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SppsvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SppsvxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SpptrfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SpptriTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SpptrsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SptconTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SpteqrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SptrfsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SptsvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SptsvxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SpttrfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SpttrsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Sptts2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SrsclTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsbevTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsbevdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsbevxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgstTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgvdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgvxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsbtrdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SspconTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SspevTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SspevdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SspevxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SspgstTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SspgvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SspgvdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SspgvxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsprfsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SspsvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SspsvxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsptrdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsptrfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsptriTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsptrsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SstebzTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SstedcTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SstegrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsteinTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SstemrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsteqrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsterfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SstevTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SstevdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SstevrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SstevxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsyconTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevrTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Ssygs2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsygstTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsygvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsygvdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsygvxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsyrfsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsysvTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsysvxTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Ssytd2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Ssytf2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsytrdTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsytrfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsytriTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/SsytrsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/StbconTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/StbrfsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/StbtrsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/StgevcTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Stgex2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/StgexcTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/StgsenTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/StgsjaTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/StgsnaTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Stgsy2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/StgsylTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/StpconTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/StprfsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/StptriTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/StptrsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/StrconTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/StrevcTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/StrexcTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/StrrfsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/StrsenTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/StrsnaTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/StrsylTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/Strti2Test.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/StrtriTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/StrtrsTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/StzrqfTest.java create mode 100644 lapack/src/test/java/dev/ludovic/netlib/lapack/StzrzfTest.java diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/ARPACKTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/ARPACKTest.java index c17035cb..4be2b83c 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/ARPACKTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/ARPACKTest.java @@ -23,16 +23,25 @@ * information or have any questions. */ +import java.io.BufferedReader; +import java.io.InputStream; +import java.io.InputStreamReader; +import java.io.IOException; +import java.util.Objects; import java.util.stream.Stream; import org.junit.jupiter.api.BeforeEach; import org.junit.jupiter.params.provider.Arguments; +import dev.ludovic.netlib.ARPACK; + public class ARPACKTest { final static double depsilon = 1e-15d; final static float sepsilon = 1e-6f; + final static ARPACK f2j = dev.ludovic.netlib.arpack.F2jARPACK.getInstance(); + private static Stream ARPACKImplementations() { Stream instances = Stream.of( Arguments.of(dev.ludovic.netlib.arpack.F2jARPACK.getInstance()), @@ -41,4 +50,141 @@ private static Stream ARPACKImplementations() { return instances; } + + protected static final double[] readArray(String name) { + InputStream is = ARPACKTest.class.getResourceAsStream(name); + assert is != null; + try (BufferedReader reader = new BufferedReader(new InputStreamReader(is))) { + String[] values = reader.readLine().split(","); + double[] result = new double[values.length]; + for (int i = 0; i < values.length; i += 1) { + result[i] = Double.parseDouble(values[i]); + } + return result; + } catch (Throwable t) { + t.printStackTrace(); + throw new UnsupportedOperationException(t); + } + } + + protected static final double[] transpose(String trans, double[] arr, int m, int n) { + assert arr.length == m * n; + double[] result = new double[n * m]; + if (trans.equals("N")) { + for (int col = 0; col < n; col += 1) { + for (int row = 0; row < m; row += 1) { + result[col + row * n] = arr[row + col * m]; + } + } + } else { + for (int row = 0; row < m; row += 1) { + for (int col = 0; col < n; col += 1) { + result[row + col * m] = arr[col + row * n]; + } + } + } + return result; + } + + protected static final double[] extractUPLO(String uplo, double[] arr, int n, int ldarr) { + assert n <= ldarr; + double[] result = new double[n * (n + 1) / 2]; + int i = 0; + if (uplo.equals("U")) { + for (int col = 0; col < n; col += 1) { + for (int row = 0; row < col + 1; row += 1) { + result[i++] = arr[row + col * ldarr]; + } + } + } else { + for (int col = 0; col < n; col += 1) { + for (int row = col; row < n; row += 1) { + result[i++] = arr[row + col * ldarr]; + } + } + } + assert i == n * (n + 1) / 2; + return result; + } + + protected static final double[] extractSymmetric(double[] arr, int n, int ldarr) { + assert n <= ldarr; + double[] result = new double[n * n]; + for (int col = 0; col < n; col += 1) { + for (int row = 0; row < col + 1; row += 1) { + result[row + col * n] = result[col + row * n] = arr[row + col * ldarr]; + } + } + return result; + } + + protected static final float[] convertToFloat(double[] src) { + float[] result = new float[src.length]; + for (int i = 0; i < src.length; i += 1) { + result[i] = (float)src[i]; + } + return result; + } + + protected static final void dumpArray(String name, double[] arr) { + System.out.print(name + ": "); + for(double e : arr) { + System.out.print(String.format("%.3f,", e)); + } + System.out.println(); + } + + protected final int M = 103; + protected final int N = 103; + protected final int K = 103; + + // double[m, k] + protected final double[] dgeA = readArray("/geA.mat"); + // double[k, n] + protected final double[] dgeB = readArray("/geB.mat"); + // double[m, n] + protected final double[] dgeC = readArray("/geC.mat"); + + // double[m, m] + protected final double[] dsyA = extractSymmetric(dgeA, M, M); + + // double[m] + protected final double[] dX = readArray("/X.vec"); + // double[m] + protected final double[] dY = readArray("/Y.vec"); + + // double[k, m] + protected final double[] dgeAT = transpose("N", dgeA, M, K); + // double[n, k] + protected final double[] dgeBT = transpose("N", dgeB, K, N); + + // double[m, m][U] + protected final double[] dgeAU = extractUPLO("U", dgeA, M, M); + // double[m, m][L] + protected final double[] dgeAL = extractUPLO("L", dgeA, M, M); + + // float[m, k] + protected final float[] sgeA = convertToFloat(dgeA); + // float[k, n] + protected final float[] sgeB = convertToFloat(dgeB); + // float[m, n] + protected final float[] sgeC = convertToFloat(dgeC); + + // float[m, m] + protected final float[] ssyA = convertToFloat(dsyA); + + // double[m] + protected final float[] sX = convertToFloat(dX); + // double[m] + protected final float[] sY = convertToFloat(dY); + + // float[k, m] + protected final float[] sgeAT = convertToFloat(dgeAT); + // float[n, k] + protected final float[] sgeBT = convertToFloat(dgeBT); + + // float[m, k][U] + protected final float[] sgeAU = convertToFloat(dgeAU); + // float[m, k][L] + protected final float[] sgeAL = convertToFloat(dgeAL); } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/Dgetv0Test.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/Dgetv0Test.java new file mode 100644 index 00000000..0b381d3a --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/Dgetv0Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dgetv0Test extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DlaqrbTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DlaqrbTest.java new file mode 100644 index 00000000..97c0c9c9 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DlaqrbTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlaqrbTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DmoutTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DmoutTest.java new file mode 100644 index 00000000..75b72213 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DmoutTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DmoutTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DnaitrTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DnaitrTest.java new file mode 100644 index 00000000..c994363e --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DnaitrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DnaitrTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DnappsTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DnappsTest.java new file mode 100644 index 00000000..1ef784b3 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DnappsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DnappsTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/Dnaup2Test.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/Dnaup2Test.java new file mode 100644 index 00000000..6f50bbe9 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/Dnaup2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dnaup2Test extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DnaupdTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DnaupdTest.java new file mode 100644 index 00000000..90694442 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DnaupdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DnaupdTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DnconvTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DnconvTest.java new file mode 100644 index 00000000..196c14de --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DnconvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DnconvTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DneighTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DneighTest.java new file mode 100644 index 00000000..4991d5d3 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DneighTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DneighTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DneupdTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DneupdTest.java new file mode 100644 index 00000000..843856e7 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DneupdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DneupdTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DngetsTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DngetsTest.java new file mode 100644 index 00000000..eca99efe --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DngetsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DngetsTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DsaitrTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsaitrTest.java new file mode 100644 index 00000000..b4dfe798 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsaitrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsaitrTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DsappsTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsappsTest.java new file mode 100644 index 00000000..a7fe4cf5 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsappsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsappsTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/Dsaup2Test.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/Dsaup2Test.java new file mode 100644 index 00000000..3a994e40 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/Dsaup2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dsaup2Test extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DsconvTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsconvTest.java new file mode 100644 index 00000000..da71711c --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsconvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsconvTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DseigtTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DseigtTest.java new file mode 100644 index 00000000..26173f43 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DseigtTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DseigtTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DsesrtTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsesrtTest.java new file mode 100644 index 00000000..423a1504 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsesrtTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsesrtTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DsgetsTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsgetsTest.java new file mode 100644 index 00000000..9dd5608c --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsgetsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsgetsTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DsortcTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsortcTest.java new file mode 100644 index 00000000..410707ab --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsortcTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsortcTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DsortrTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsortrTest.java new file mode 100644 index 00000000..1f59e701 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsortrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsortrTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DstatnTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DstatnTest.java new file mode 100644 index 00000000..9f05ce85 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DstatnTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DstatnTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DstatsTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DstatsTest.java new file mode 100644 index 00000000..bd9c344e --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DstatsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DstatsTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DstqrbTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DstqrbTest.java new file mode 100644 index 00000000..b36e7b3b --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DstqrbTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DstqrbTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DvoutTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DvoutTest.java new file mode 100644 index 00000000..f2e82eca --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DvoutTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DvoutTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/IcnteqTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/IcnteqTest.java new file mode 100644 index 00000000..a6c68bc2 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/IcnteqTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class IcnteqTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/IcopyTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/IcopyTest.java new file mode 100644 index 00000000..7111c92e --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/IcopyTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class IcopyTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/IsetTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/IsetTest.java new file mode 100644 index 00000000..af207fcf --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/IsetTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class IsetTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/IswapTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/IswapTest.java new file mode 100644 index 00000000..a6597164 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/IswapTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class IswapTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/IvoutTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/IvoutTest.java new file mode 100644 index 00000000..ee22edaf --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/IvoutTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class IvoutTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SecondTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SecondTest.java new file mode 100644 index 00000000..a78dbbfc --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SecondTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SecondTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/Sgetv0Test.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/Sgetv0Test.java new file mode 100644 index 00000000..10e1cc10 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/Sgetv0Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Sgetv0Test extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SlaqrbTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SlaqrbTest.java new file mode 100644 index 00000000..d0930a8e --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SlaqrbTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlaqrbTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SmoutTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SmoutTest.java new file mode 100644 index 00000000..ba919f14 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SmoutTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SmoutTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SnaitrTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SnaitrTest.java new file mode 100644 index 00000000..64f38a8f --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SnaitrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SnaitrTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SnappsTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SnappsTest.java new file mode 100644 index 00000000..3ed8a9e7 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SnappsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SnappsTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/Snaup2Test.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/Snaup2Test.java new file mode 100644 index 00000000..3bf1b9cd --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/Snaup2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Snaup2Test extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SnaupdTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SnaupdTest.java new file mode 100644 index 00000000..f1f2c817 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SnaupdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SnaupdTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SnconvTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SnconvTest.java new file mode 100644 index 00000000..fde4733f --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SnconvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SnconvTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SneighTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SneighTest.java new file mode 100644 index 00000000..70144619 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SneighTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SneighTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SneupdTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SneupdTest.java new file mode 100644 index 00000000..4f647904 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SneupdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SneupdTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SngetsTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SngetsTest.java new file mode 100644 index 00000000..2ff219d8 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SngetsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SngetsTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SsaitrTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsaitrTest.java new file mode 100644 index 00000000..4a81aa13 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsaitrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsaitrTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SsappsTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsappsTest.java new file mode 100644 index 00000000..3f406193 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsappsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsappsTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/Ssaup2Test.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/Ssaup2Test.java new file mode 100644 index 00000000..f3ce255f --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/Ssaup2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Ssaup2Test extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SsaupdTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsaupdTest.java new file mode 100644 index 00000000..4ddb911c --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsaupdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsaupdTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SsconvTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsconvTest.java new file mode 100644 index 00000000..e018c8cb --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsconvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsconvTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SseigtTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SseigtTest.java new file mode 100644 index 00000000..59071574 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SseigtTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SseigtTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SsesrtTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsesrtTest.java new file mode 100644 index 00000000..71588574 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsesrtTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsesrtTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SseupdTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SseupdTest.java new file mode 100644 index 00000000..1291cdc2 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SseupdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SseupdTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SsgetsTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsgetsTest.java new file mode 100644 index 00000000..98280e2d --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsgetsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsgetsTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SsortcTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsortcTest.java new file mode 100644 index 00000000..54cd15b8 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsortcTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsortcTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SsortrTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsortrTest.java new file mode 100644 index 00000000..1e3561d8 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsortrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsortrTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SstatnTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SstatnTest.java new file mode 100644 index 00000000..362ecc81 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SstatnTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SstatnTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SstatsTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SstatsTest.java new file mode 100644 index 00000000..cfdf9203 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SstatsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SstatsTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SstqrbTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SstqrbTest.java new file mode 100644 index 00000000..82a6a1c3 --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SstqrbTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SstqrbTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SvoutTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SvoutTest.java new file mode 100644 index 00000000..d70ec20f --- /dev/null +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SvoutTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.ARPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SvoutTest extends ARPACKTest { + + @ParameterizedTest + @MethodSource("ARPACKImplementations") + void testSanity(ARPACK arpack) { + } +} diff --git a/arpack/src/test/resources/X.vec b/arpack/src/test/resources/X.vec new file mode 100644 index 00000000..5785c50c --- /dev/null +++ b/arpack/src/test/resources/X.vec @@ -0,0 +1 @@ +2.743770,0.835428,4.056319,1.057763,1.288122,0.743487,0.297624,0.720599,4.733356,3.985322,3.689118,2.863023,3.840879,3.841770,1.388431,0.829788,1.992641,2.361518,0.296504,4.544581,1.315937,4.071398,1.222224,1.040035,1.729134,3.159764,4.104973,1.944296,3.332840,1.263181,1.144171,2.119526,4.667703,0.206606,2.789823,4.867032,3.039553,4.559095,3.921917,2.396661,1.773202,3.193527,4.452662,0.225245,3.787477,1.748217,0.020557,0.204250,0.235989,3.295322,2.607994,1.661676,1.829283,1.057310,2.141564,1.248551,3.653989,1.368927,2.794324,3.996130,2.265062,1.857542,0.359007,3.256106,0.167688,4.232306,4.194821,2.420912,2.654466,3.646937,4.274297,2.150499,4.738874,2.725356,4.278588,0.194970,1.141882,2.705893,0.208498,2.530241,2.839940,2.587016,0.572437,3.994174,3.110979,3.714781,2.053858,4.077423,1.408685,4.629359,2.206141,1.299046,4.108358,2.764698,1.433918,0.779362,4.763679,3.561891,4.686232,3.660752,2.956290,2.539581,4.999594 \ No newline at end of file diff --git a/arpack/src/test/resources/Y.vec b/arpack/src/test/resources/Y.vec new file mode 100644 index 00000000..552ed8b5 --- /dev/null +++ b/arpack/src/test/resources/Y.vec @@ -0,0 +1 @@ +1.308161,1.859244,4.271887,2.385419,0.783308,2.460314,2.912655,3.497239,0.489631,3.916928,1.337877,1.423239,3.568072,0.908391,4.471557,3.271646,1.410359,4.456444,1.708393,0.214084,4.793527,1.225499,4.397703,2.923277,4.753397,4.167854,3.083996,1.381753,4.887306,3.264405,0.749737,1.044536,1.717942,2.491489,1.515707,0.776045,3.721097,0.231149,0.891569,2.305177,1.379286,4.388693,2.723391,4.880161,3.816186,0.423202,0.137105,2.338054,0.712574,2.400618,1.648705,2.011272,2.180356,0.231902,4.804938,4.918287,2.458577,1.178577,0.784749,4.442337,4.935286,1.406488,1.756818,0.117174,4.952333,2.184810,2.528438,1.194373,4.205853,0.549411,1.830910,1.753192,2.011837,1.913712,3.023300,1.184178,2.549540,1.210492,3.153036,2.182013,3.418065,2.688047,0.934378,0.334523,0.692445,1.470172,2.386988,3.844825,2.224413,0.769167,0.031627,1.589413,1.845898,0.842862,4.991723,4.275119,1.513772,2.301607,2.333696,0.082954,2.733651,3.399653,0.016225 \ No newline at end of file diff --git a/arpack/src/test/resources/geA.mat b/arpack/src/test/resources/geA.mat new file mode 100644 index 00000000..d3b4b11e --- /dev/null +++ b/arpack/src/test/resources/geA.mat @@ -0,0 +1 @@ +2.744068,3.575947,3.013817,2.724416,2.118274,3.229471,2.187936,4.458865,4.818314,1.917208,3.958625,2.644475,2.840223,4.627983,0.355180,0.435646,0.101092,4.163099,3.890784,4.350061,4.893092,3.995793,2.307397,3.902646,0.591372,3.199605,0.716766,4.723345,2.609242,2.073310,1.322778,3.871168,2.280752,2.842170,0.093949,3.088177,3.060479,3.084670,4.718740,3.409101,1.797540,2.185160,3.488156,0.301127,3.333834,3.353189,1.051913,0.644631,1.577142,1.818554,2.850984,2.193008,4.941869,0.510224,1.044384,0.806548,3.265542,1.266458,2.331554,1.222128,0.794848,0.551876,3.281648,0.690915,0.982912,1.843626,4.104966,0.485506,4.189725,0.480492,4.882297,2.343256,4.883805,3.024228,3.696318,0.195939,1.414035,0.600983,1.480701,0.593639,1.589916,2.071315,0.320737,3.462361,2.833007,1.326947,2.616240,0.469703,2.879732,4.646481,1.592845,3.337052,0.658989,3.581636,1.447030,0.915957,2.932565,0.100538,4.144700,0.023477,3.389083,1.350040,3.675970,4.810943,1.243766,2.880787,2.960210,2.861260,1.115408,4.763745,2.235627,4.232043,3.497396,1.487185,4.068989,1.982529,4.405516,2.906364,4.408677,3.462658,3.626271,2.506622,4.780418,3.219951,2.119275,3.031966,0.095966,1.507874,3.300868,1.450388,3.090077,2.143844,0.677370,1.491412,2.849825,2.954364,2.871626,3.266004,3.260516,2.157092,4.482733,1.837809,2.179325,4.459617,4.030970,3.519443,0.501134,4.597413,3.571206,4.994235,0.747242,4.340630,0.812465,3.077798,0.619100,4.240041,4.036595,2.845504,2.035916,0.345835,3.487144,2.267713,3.610278,4.331912,4.877608,4.279017,0.058570,1.799890,3.649953,0.858148,2.605183,0.271690,0.999983,0.092609,3.968489,1.119623,1.726758,4.640406,3.522072,0.159195,0.823471,3.107392,2.886143,1.189464,4.671070,3.069830,2.678164,2.949550,3.650610,1.559725,1.991105,1.049219,0.930965,4.721862,3.697754,2.452294,1.137073,1.271782,0.290146,2.172083,1.558979,3.481717,1.888759,0.898018,0.123394,0.336248,3.396964,2.268484,2.682896,4.483356,4.951695,1.084485,3.315391,1.316612,0.103255,3.791893,1.600086,1.917319,2.941586,4.155242,3.144909,4.363253,1.367710,3.990234,0.928180,4.763958,3.437441,1.077538,4.736853,3.654279,1.269708,1.066560,2.591004,0.128314,1.037350,2.123427,1.870850,2.317877,1.388144,2.933922,4.319278,0.587659,2.586896,0.660341,3.584298,1.980299,2.827107,0.916399,0.724239,2.440281,1.778064,4.702160,3.826626,3.743318,4.518599,0.417112,2.760962,2.922380,4.809682,1.460738,1.204144,0.501470,0.082148,4.647647,3.349583,3.925765,1.408651,2.932051,0.319776,2.428138,4.887476,4.382526,1.690795,4.807851,1.158508,4.746594,4.706889,3.996013,3.152240,4.371440,1.465101,4.244718,3.089383,0.066184,1.736168,0.740704,4.909147,2.391852,2.486957,3.197363,1.842923,0.684501,4.110589,0.949240,2.556595,1.121585,0.489222,4.310958,4.864597,4.804173,4.532777,3.870237,1.665726,0.405507,2.036206,1.161171,0.662438,0.267136,3.627972,0.057137,3.852904,0.734733,0.397610,0.448015,3.360239,1.226836,2.102697,2.786844,4.302756,3.635221,1.351640,0.657414,0.276872,1.507993,1.310591,2.280703,3.416407,3.478127,1.417594,1.899635,0.905755,3.942728,0.284240,3.484986,3.893477,3.887038,1.297113,1.869066,2.937998,1.364110,1.854264,0.985271,2.299279,0.223062,3.998979,0.384782,2.594176,1.534050,2.887715,4.797167,3.227851,0.176812,2.152012,2.550084,2.680887,3.406963,1.387980,0.644303,1.963378,4.782029,0.935654,4.519920,2.719030,2.284557,4.410207,2.293020,3.620838,1.995127,4.520222,3.450125,3.498110,1.638602,3.783893,3.180305,1.200101,0.802694,3.981957,4.795833,2.290694,2.954921,4.288613,2.286117,4.759372,2.878756,4.103836,4.544219,4.077619,0.797072,3.144492,1.992171,0.313565,2.120161,1.293420,4.245192,0.166523,4.794914,1.776844,1.783534,0.081643,0.926162,2.006298,4.646457,0.498075,4.726508,4.347443,2.270812,1.633504,1.163721,3.072324,0.165373,0.078030,2.143979,0.340370,1.259705,1.105805,1.265956,0.655276,0.060181,0.577421,3.092401,4.871281,4.951725,2.045270,0.814772,3.193809,2.451527,4.947049,0.326521,3.916172,1.441992,1.207093,3.312523,1.230316,3.329296,2.586543,2.120445,2.773439,1.435258,3.532874,2.074284,1.802728,4.143285,4.624835,0.230037,1.163135,1.742597,4.074832,4.927457,4.844859,4.524742,1.482781,4.960056,1.247100,0.529531,4.754763,1.167101,3.448841,0.291782,3.653545,4.408601,1.362184,1.895284,1.871481,3.743941,1.189036,0.859265,2.246458,1.522342,4.195946,1.188709,2.511947,4.712918,3.169988,4.336447,4.701048,3.753824,3.497875,4.839828,4.972004,2.259108,0.354349,1.463970,0.761774,2.087432,0.656447,3.020589,1.914040,4.476929,4.838973,2.734425,1.374118,2.961152,4.483806,2.033667,2.760391,1.358264,2.277221,2.008568,1.242067,2.529332,1.551904,1.865174,2.624852,3.752975,1.667537,4.620794,4.311593,0.243451,1.268213,2.230678,0.523139,1.742380,3.700488,3.402572,3.111922,3.552642,1.024618,1.708491,3.381212,4.396174,2.718390,1.413498,0.151176,3.551684,0.039421,1.863395,2.652686,4.610557,0.447473,2.029712,0.121566,1.713055,3.111155,1.395340,1.048750,0.578516,2.885701,3.476350,3.359786,4.744305,0.013516,3.235983,3.001961,2.943698,4.813852,0.084358,3.482412,4.068393,2.549036,1.669824,3.954201,0.486215,2.210178,2.599762,3.469782,0.454429,1.138798,2.051508,3.116473,4.434804,3.094131,0.667307,4.902901,4.358929,2.513604,4.611740,2.706904,4.616530,4.149487,4.841432,4.598914,0.180169,0.873860,1.945673,4.760713,1.500145,0.802338,4.431523,2.231972,4.539378,0.801152,3.305588,2.201319,0.382434,3.482316,1.236994,0.198078,0.299721,0.305393,4.538665,3.699420,4.490312,3.362912,2.644700,1.522232,4.989811,1.810945,2.353245,1.891226,4.897635,0.873292,1.639940,3.401743,0.316038,3.036247,2.388233,1.420000,1.192066,2.572564,1.839638,2.282599,1.687387,4.852468,0.667197,0.484020,1.716959,2.955135,3.295882,1.986284,4.996390,1.759465,3.607033,3.187913,4.065269,4.881128,4.448968,3.822810,3.491242,1.677491,0.738428,0.313180,1.209509,2.161407,2.609981,3.865418,4.793705,0.586602,0.535021,2.948474,3.726990,4.240752,4.679160,4.917131,1.999008,1.901676,0.739043,3.424672,3.283810,4.310313,0.486290,2.488885,2.905410,1.207785,0.845127,4.297904,0.292675,2.353105,0.579170,2.285294,4.899812,2.118532,4.285625,0.586578,1.356260,2.018964,1.999061,3.356917,1.723591,3.568834,3.195934,1.995806,2.158801,3.072638,0.350211,4.112034,3.267106,3.631712,2.684615,0.552386,2.025178,2.026868,1.605215,0.149752,3.686271,0.548922,3.031541,3.516087,3.173932,4.795711,0.516491,4.335836,0.145951,2.674584,2.021218,2.620919,1.825499,0.952835,0.095614,2.590749,4.213884,1.866080,1.114319,0.402660,0.426555,1.106982,0.500070,1.325198,0.330747,0.328024,4.281381,0.810601,2.798412,3.867278,2.282048,0.766844,0.997981,2.164921,2.641170,1.747201,3.907398,3.755108,4.636059,0.144763,4.478456,1.962844,4.391862,3.453924,4.936744,3.796412,1.822723,2.505316,1.881946,1.824559,1.304522,2.479851,3.408700,1.386701,2.621899,0.586901,0.799226,0.234032,4.853657,0.019302,0.892900,3.064334,0.406848,4.409483,3.598101,4.831950,2.538178,1.502018,2.747503,4.654094,2.603807,1.336035,4.386994,1.859594,0.006917,1.238425,1.591168,4.293887,2.292516,2.222936,1.680511,4.403391,4.725134,4.959452,1.883706,4.830737,3.959398,3.378446,1.224447,1.082286,0.830239,4.613783,1.470383,2.265471,2.469789,3.890858,4.221175,0.695364,2.134522,4.214274,4.090167,0.512069,0.781917,1.520993,0.376795,2.123315,0.538089,2.841088,1.232785,2.982165,0.587628,4.879419,4.662806,1.958985,1.210893,1.251991,2.416968,0.199964,3.198526,2.041515,1.887033,4.046825,3.545177,4.771669,1.759681,4.487714,3.849836,1.787123,3.108327,1.442850,4.372000,0.562137,1.062172,0.915166,2.015130,3.726165,2.634537,2.438382,0.002730,2.127009,0.317769,1.041266,4.661970,1.076991,4.291688,4.014467,0.795731,3.028560,0.578309,3.639441,3.187311,4.059693,2.396923,4.574315,0.246745,1.464443,3.575263,2.090546,0.864757,0.536054,4.086696,2.365715,4.411418,3.666446,2.048631,1.867555,2.578192,4.445300,3.686393,0.025765,3.470789,4.597537,3.552279,0.885029,2.417591,0.701580,1.794976,4.685585,4.616527,1.414184,1.698155,3.001064,4.815986,0.739007,1.284583,4.367784,2.459461,4.494805,0.927589,2.663343,1.631348,1.582713,2.234385,2.165387,1.786734,4.574854,3.658721,3.637735,1.449567,2.888547,3.895897,3.977952,1.722652,3.854364,3.679469,0.707532,4.329727,2.206607,2.432052,2.241846,2.839230,3.105846,2.490898,4.333943,3.138674,2.007140,2.083459,4.054193,1.740960,1.057274,0.296916,4.380134,4.592732,0.600601,1.672369,0.876860,0.579492,4.499334,0.284386,4.902428,0.482254,4.317353,2.832531,1.839587,1.711712,3.786821,1.572866,3.286595,2.586630,2.424828,4.505811,2.773225,4.134308,3.627868,0.192786,3.865550,1.084351,4.515748,0.214621,1.665360,0.498665,2.377946,4.100112,1.490937,0.754674,1.651335,4.069401,0.701920,1.136812,0.344260,3.528550,1.976166,1.554200,3.593132,1.679888,3.638856,4.075997,1.088314,4.869093,0.811790,1.454205,0.898976,1.727528,2.400304,2.610879,4.268030,4.447240,1.100519,3.114470,0.557480,2.294849,1.611668,1.582504,2.412921,3.649138,0.345913,4.395867,3.674069,0.882497,4.695805,2.531561,4.999043,0.986297,2.674541,1.451240,1.520868,2.955327,4.608595,4.026319,3.619707,2.795869,4.611493,2.461807,4.369161,4.169908,1.069177,3.856127,0.060856,1.614148,1.147837,2.534315,3.684266,0.488382,2.574611,4.692060,1.143233,3.385706,2.964401,0.050318,2.379131,3.543852,0.219877,4.397607,2.600407,0.153305,1.122068,4.768378,2.911599,0.537363,1.437723,2.283518,0.104750,2.058078,2.447293,1.218389,2.943195,3.766201,1.179171,3.102500,3.198111,4.742702,3.891381,4.241726,2.452100,0.926743,4.979076,0.646779,2.357287,0.340465,4.719254,4.824625,3.596945,1.749964,1.271912,1.326517,0.636470,2.629045,0.709086,1.583653,3.133532,3.637718,0.121364,2.150580,3.260623,4.266230,2.376624,4.846029,1.328163,0.067544,2.418764,1.280569,4.118588,1.163863,1.553146,3.956137,3.575716,2.790256,3.524740,2.093184,0.026550,0.056776,2.556109,0.416455,0.255377,4.827583,4.295013,0.760136,0.003321,4.708339,1.391626,0.929488,3.457541,0.544519,1.323248,4.875473,3.197314,2.603389,1.989593,3.872505,0.704787,4.836689,4.305615,3.088285,0.214531,3.504278,4.566422,2.622885,1.771124,0.601387,3.774506,4.425109,0.501259,3.794923,0.085302,4.835275,3.075290,2.762195,1.479749,4.646458,1.329528,4.140733,4.925543,3.916983,2.594950,0.330371,2.362069,2.191280,1.013980,2.117938,1.788789,0.818421,2.206871,1.314000,2.610312,0.175800,4.531157,4.081822,2.762907,4.259043,4.811975,0.552611,3.154159,4.989970,4.939446,3.016615,0.640104,2.915964,0.010323,0.994557,4.780616,1.652203,3.191951,1.404297,4.739109,3.642794,1.648256,3.958807,0.540828,1.961595,1.106091,3.418632,0.512231,1.985129,1.383249,2.531715,1.749488,3.532053,0.122885,3.169935,1.152856,1.343545,4.001278,4.777842,1.582751,4.134026,0.519954,3.169908,3.755161,0.779890,2.130012,4.463536,0.517892,0.090482,2.952927,2.177658,3.993446,4.617278,1.495768,1.942021,2.431360,2.940757,4.919269,3.486651,1.947743,1.318838,4.723129,0.677742,3.601329,4.626975,3.323328,2.115272,0.994955,1.837377,3.534359,3.247671,4.639881,4.334305,4.080754,4.557254,1.381686,1.847618,1.899470,2.802253,3.341091,1.433583,0.097312,1.996112,1.542640,4.710924,4.441325,4.301553,3.264999,1.721446,2.744246,4.076125,0.493052,4.005374,0.205899,4.082105,4.037819,0.255037,3.135804,2.512265,0.849098,0.741895,3.866296,2.838464,4.914996,4.911239,4.963335,0.593078,4.691281,1.222848,2.291061,3.787033,1.018105,2.831558,0.929084,0.523681,0.582793,1.788195,0.023274,2.124270,3.320986,2.008441,0.428973,0.313444,1.390583,0.846563,4.825475,0.756151,4.027312,2.930540,2.846435,2.560404,4.858815,1.819224,3.939579,2.776471,1.978168,4.777330,2.991580,0.594585,2.087696,3.907909,3.468735,4.581702,1.296887,3.790969,2.299376,2.868049,4.775233,4.896432,4.307955,1.795485,4.438504,3.193046,2.149984,0.178713,3.850641,2.510528,3.930942,3.740114,3.967837,1.503256,4.003993,2.744232,2.366631,3.375630,0.106793,0.511584,1.460887,4.914951,0.698729,1.652982,0.255265,1.656344,1.601631,4.734036,4.225770,1.913821,0.123845,4.155156,3.302681,0.761822,4.980356,0.501167,4.335573,1.471331,2.176767,3.977283,3.387542,4.689322,3.105702,0.489051,4.421802,3.845778,3.559352,0.268668,1.981114,0.837179,4.109520,3.502643,4.415388,4.832876,3.873738,4.971165,3.073849,0.185648,0.071258,1.710519,4.117359,4.330674,4.804063,0.325607,0.222856,4.566418,1.525233,2.789937,4.912224,2.002243,3.329357,2.004398,3.840973,2.638574,1.187616,1.356531,1.290296,2.661602,3.515945,4.746400,3.470437,3.905964,0.844631,1.870313,2.068901,3.431901,1.479460,1.516460,1.779446,4.051510,2.887950,0.376386,0.391230,1.856435,3.832955,3.443417,3.539912,3.836050,1.435764,2.741281,2.716763,3.698163,4.784353,1.389950,3.966408,3.299853,2.901189,3.874399,4.720162,0.183457,0.737001,3.781436,0.418957,2.580619,1.099304,1.371479,3.509202,0.150964,4.366597,2.222395,2.511966,2.700240,3.227721,1.724283,0.505537,1.591895,0.840711,2.780666,1.590143,4.790336,4.828671,3.100629,3.087486,4.926893,4.436416,3.825350,1.567953,1.827695,1.006334,2.435741,4.951843,4.560755,0.591747,0.125951,4.493188,2.685851,1.000949,3.368266,3.221116,0.610428,1.298001,0.300390,1.049302,0.661528,0.966181,3.427336,0.247499,0.509273,0.670868,1.582706,1.493752,1.275319,3.752683,4.990114,2.669890,4.721014,1.983051,0.533412,2.043869,1.480639,2.467035,3.285218,2.305251,4.675803,4.423824,3.509888,2.448425,0.658436,1.985068,3.522008,1.424428,0.519940,4.539492,3.545254,3.076382,3.962495,4.178230,2.417295,4.405941,4.582095,1.357755,3.037727,2.632920,2.689729,4.688315,1.525944,4.917170,4.510656,2.293614,4.087266,3.845235,3.389475,1.599169,0.982255,3.357638,4.214866,0.081264,3.214017,2.214365,4.490439,1.607365,2.370924,2.573836,0.702198,3.564462,4.152382,0.289546,1.456944,0.190223,4.782721,3.335844,4.821002,2.657471,4.010343,1.872070,1.769095,1.891339,3.289311,1.797266,4.501837,4.916374,0.152133,0.968116,0.561250,0.211820,1.138705,2.233967,4.184952,1.109120,2.469726,4.648094,3.336074,3.990395,2.754970,4.902332,2.943311,0.227554,0.989914,2.023868,3.006386,3.859654,2.065431,3.550292,3.949348,1.586301,4.896351,3.248282,4.404990,2.779688,3.708016,3.852720,4.541242,0.751749,2.791417,2.141893,4.615795,0.525473,4.912869,4.377257,0.369131,2.454832,3.587798,3.690758,4.532471,3.999327,1.554652,2.492174,3.508929,0.692184,0.969954,2.405212,1.491229,4.312796,2.931387,1.743326,4.244165,4.024392,4.991774,4.236538,2.072283,0.637494,4.203205,0.298790,1.751356,4.598690,4.803832,3.202823,3.443242,0.212272,2.572402,2.734341,1.700504,0.342984,1.144538,1.789920,2.175710,2.954634,3.611958,1.588159,1.644769,0.098458,0.204374,1.289108,3.701225,3.141569,3.848945,3.844597,4.282837,3.601596,4.895055,4.494126,2.933586,2.940788,0.171335,4.992633,0.657880,3.701736,4.105076,1.865273,0.984260,0.493799,3.743030,2.263268,3.568589,4.577038,0.732919,4.595855,2.058132,1.526335,4.715311,4.953258,0.994461,3.284192,0.532477,3.254570,4.136566,3.422493,2.086666,1.915332,1.965612,2.948559,4.407836,4.645331,0.267648,0.908112,0.561122,0.966673,1.733039,2.532658,3.147306,3.660711,4.450558,4.945442,3.314282,4.226823,3.890194,1.537660,4.378461,0.213816,0.001837,1.368663,2.310488,3.191814,0.508851,3.365051,4.009079,0.926565,2.075626,2.599925,2.259035,3.999150,4.802612,3.994766,0.389964,4.024678,0.332982,1.179852,0.765484,0.987596,2.641576,3.358449,2.351606,4.798478,1.201462,3.815701,4.350911,2.810331,2.281113,2.980922,2.144049,2.775969,2.084670,2.002349,3.476732,0.464256,0.832710,4.255992,3.855387,1.407269,1.886345,4.630133,4.090386,3.071731,1.107451,0.221260,2.156289,3.363136,4.142402,4.263445,0.163880,1.220785,1.695473,0.943661,4.014877,3.837329,2.584165,4.914632,0.720293,4.498259,0.582316,0.815909,3.481096,0.547848,2.829225,2.101168,3.642370,4.503376,3.849358,4.248449,0.164727,1.550977,2.577165,2.079767,1.156275,1.539370,4.727155,1.470904,1.769521,0.018549,4.225388,0.774204,1.020721,1.276323,4.423110,1.032257,3.987632,4.040247,4.635103,0.577807,1.086395,3.714491,0.980004,1.431648,0.833708,0.863483,2.407767,0.548415,1.608488,2.132970,0.122741,1.941666,0.470612,2.467893,4.128691,4.092111,0.402243,3.006139,4.172932,1.189863,3.809633,4.453822,4.030621,0.536505,0.045300,0.958621,1.352387,3.080915,1.921366,3.517035,1.765375,0.772127,1.563449,4.421621,4.792662,1.037564,3.942342,1.366744,4.435658,0.827728,3.329800,0.421056,4.869467,3.503167,4.209079,2.833347,2.384007,3.109412,2.643708,2.346922,3.797251,0.891005,0.855860,2.159213,1.603740,0.370623,4.222352,3.858014,2.719607,4.896623,0.363000,3.833347,1.331852,1.842995,1.096397,3.945189,0.721201,4.200083,3.307888,0.295116,4.054909,3.138779,4.524912,3.743612,2.805605,4.182736,1.390251,2.734750,1.468084,4.841022,1.130982,0.078691,1.629274,2.512547,0.141815,2.796242,4.371414,3.523661,3.114842,4.779809,4.791397,4.121332,3.038709,2.438823,0.066581,3.031310,4.945440,4.090505,1.703023,0.760235,3.920293,3.719689,4.835234,4.374212,2.778313,0.506421,2.417503,1.568475,2.562042,1.508508,4.309115,4.221635,1.577326,2.997907,2.150904,4.545464,0.936805,3.488642,4.851877,0.876378,1.009832,3.468617,3.895770,2.452745,3.048432,1.063412,2.383071,0.560359,1.607110,1.423899,2.223127,4.650632,0.906338,2.006941,3.077986,4.732785,0.665741,4.589383,0.405269,2.403707,2.272949,1.048014,1.737298,2.270826,4.326057,4.775321,2.594628,4.350499,3.040858,1.745437,0.970971,2.065674,2.614121,0.222217,0.729206,3.000922,1.125008,4.186632,1.634711,0.524171,0.417653,4.685615,0.590102,0.704549,4.313330,1.271441,3.329757,4.083628,3.035903,4.787443,3.544414,0.563758,2.792050,3.590933,4.009786,0.131607,3.594395,4.128404,3.734169,2.561746,2.290105,2.747093,3.523218,4.614571,3.085176,4.439172,3.506284,0.341682,2.504141,1.432432,1.425875,1.779638,1.573664,2.893050,3.418008,1.343747,0.648813,0.294044,2.878764,0.930651,0.046240,4.638765,2.685702,0.462241,4.214606,4.916014,2.243003,0.212448,0.587730,1.908269,4.427613,0.740193,4.119950,0.074881,2.286943,3.221986,0.301897,3.073814,4.722021,0.801300,3.648057,3.045469,0.925582,0.031017,0.046422,2.660462,4.713897,3.221493,3.571499,2.469327,2.909445,0.631838,4.384103,3.803963,4.990995,1.488615,1.135089,0.625808,4.821049,3.904426,0.831623,2.763432,2.068841,0.757430,0.810365,4.817350,1.524821,4.707196,0.378053,2.304015,0.648095,0.023937,2.768830,0.569471,3.610123,3.490582,0.881665,4.708711,3.605217,1.489851,3.546169,3.659651,1.711132,1.877943,1.795533,3.083092,4.502051,0.865966,4.375998,0.138266,3.301693,2.072194,3.956408,3.605991,2.400539,3.219320,2.508866,4.057592,2.380420,2.615780,1.252603,3.025215,1.514524,2.886420,0.848391,0.797345,2.085149,2.134098,1.340546,0.657984,0.196053,0.126159,1.357751,2.309267,3.631216,2.374359,4.520254,0.176099,0.903303,1.692572,2.887481,4.263681,1.751010,1.339943,0.309446,4.106517,1.898332,2.857751,4.917777,0.007973,0.727251,3.895555,4.025637,3.846236,2.684994,4.894285,1.980923,3.009718,0.316845,2.049287,3.612500,1.193694,4.719138,3.433917,1.437877,3.844995,0.415824,4.873872,0.246426,4.667279,1.264269,3.789121,0.000368,1.271200,3.745503,2.661680,0.574761,1.968149,1.877747,2.840811,3.339885,4.204151,2.486157,1.960109,0.719883,4.024115,3.566852,2.043387,2.592162,3.325914,0.824028,0.135989,1.587518,2.977925,2.433030,3.462773,4.098449,2.442212,0.671335,4.253140,2.874952,3.699687,3.523323,4.841059,1.476537,3.526534,1.828382,1.977054,1.152973,1.720051,4.741484,1.462854,1.229953,2.915690,1.290180,2.366929,4.170881,1.152002,2.133457,3.052449,2.728145,4.873616,3.401851,3.699731,4.834780,2.072190,1.776899,0.219312,0.921022,1.185948,0.917522,3.773919,2.679415,3.338169,4.102311,1.153870,1.629620,3.541801,1.963795,0.146355,2.174776,4.541365,2.045108,1.661245,4.947625,3.222078,1.829990,0.510098,3.939247,3.540375,4.609579,1.086378,0.574622,3.620363,1.016979,0.880519,1.599037,4.084126,2.697683,0.229252,2.319473,3.419898,2.691842,2.862251,1.123887,4.238697,2.806994,3.566230,4.909321,2.140993,4.405333,0.036405,0.167036,2.951400,1.557247,1.241383,1.389677,1.592015,3.644738,2.845980,3.945180,4.150983,4.214674,2.073221,2.106367,4.631329,3.308818,0.402336,2.710935,1.780036,4.937175,0.068277,3.060904,3.618115,1.444534,4.868208,4.297683,4.578264,0.096160,2.849361,1.473251,4.245143,3.164248,2.694385,0.572941,2.701114,3.159521,4.779562,2.925255,4.837003,4.808031,3.251002,2.529540,2.330109,4.451893,0.141283,0.569041,0.510359,3.784677,1.698255,3.189843,3.018915,1.929140,2.657839,3.225693,4.704752,2.878170,3.071838,0.339279,4.761079,2.640410,4.006367,0.251455,2.104551,1.284877,1.334879,3.957269,3.119334,2.198727,0.052929,4.824640,4.810116,1.087761,0.206732,2.650997,4.757054,4.551979,2.923314,1.517744,1.649804,4.489568,2.458920,0.655581,1.242127,1.383975,0.617733,2.315222,4.580255,3.343913,0.362370,0.027474,1.381238,1.813465,3.883748,4.835028,1.937836,3.433450,4.974510,3.728333,3.180948,0.390374,1.616076,4.566961,1.005027,4.217952,3.481618,1.831622,2.645871,2.714032,3.570269,2.582780,0.665380,3.867273,2.031362,4.815469,1.417569,1.315394,1.667537,2.861585,4.474349,0.881408,1.398394,2.908399,2.271671,2.236614,4.103671,4.619392,2.406535,3.436759,4.005294,2.591832,1.471582,3.190423,2.925546,4.507814,0.262035,4.550657,2.672160,0.078381,1.723511,3.621668,2.442165,4.900795,2.113050,1.633176,4.108360,2.739533,3.411633,4.028512,3.357138,2.112037,0.623982,2.901241,4.487167,2.094462,4.553626,2.517639,3.104208,4.164942,2.822986,0.454847,4.904897,1.229247,3.552527,2.525567,2.393863,1.219704,3.610754,0.563941,4.952267,4.226868,2.672545,2.122765,1.432323,2.507957,4.397087,1.375032,2.502687,1.172750,1.685746,0.951303,4.952696,2.857487,3.664076,0.491250,1.830588,4.463199,0.422192,0.827416,3.127088,3.113945,4.191135,4.677464,0.709932,1.296869,2.137307,0.004516,0.349072,1.132456,2.405510,1.257614,4.383409,1.621364,4.623114,4.873936,2.249308,1.135644,1.458331,3.881668,1.366749,1.902914,2.392879,2.875556,4.980502,1.161049,1.767119,1.314456,1.805567,0.504023,1.799049,4.439325,1.492949,1.859674,4.722371,3.641895,2.583694,3.885964,0.615898,2.322452,0.591181,1.168091,0.709336,1.809006,1.908197,4.736543,1.320629,2.362144,4.056897,4.078088,3.751716,1.439169,2.474858,0.931058,0.941998,2.179206,3.692961,2.632921,4.433416,4.154544,0.158027,2.842095,3.045806,4.807876,0.116183,2.655519,1.023907,0.268315,2.937443,3.863021,3.874327,0.151442,2.034732,0.222548,1.239193,0.964404,1.075913,1.695592,1.387090,4.811400,1.762036,4.470863,0.905208,3.818734,0.306728,2.313806,0.027552,4.051454,4.752430,0.175537,4.669232,3.869269,1.794308,4.544383,1.481286,2.046477,0.483556,3.284695,0.148004,2.424526,3.415959,4.106188,0.749707,3.770452,3.595385,2.797853,2.923223,0.456354,3.002355,1.907611,4.337904,1.565494,2.882975,2.132857,4.381310,1.269583,0.394012,3.743279,2.064483,2.945492,0.131947,4.760549,4.388092,3.119340,0.085149,1.889882,4.893983,3.406652,0.804939,2.302984,4.833689,2.673541,0.123073,3.098860,1.356083,0.494230,2.014542,2.792615,0.085204,2.795234,2.556016,3.969542,2.117749,2.767252,3.710047,4.485729,1.900173,3.008167,3.473055,0.216353,4.003803,1.887151,3.351195,2.358320,3.511696,3.621655,0.957855,3.310871,4.256617,1.177836,3.790917,3.169126,4.775630,1.301233,0.771389,1.560605,1.289794,3.784164,3.665547,3.348425,1.081896,4.309034,4.782858,2.658029,3.246864,2.503460,1.417789,1.430738,1.567103,0.954250,4.509618,4.291991,2.308197,1.836257,4.695392,1.111867,2.767710,0.272491,0.956011,3.020135,3.310918,2.904979,4.348007,4.967026,3.819309,2.325459,4.169673,0.601937,3.416353,2.591689,0.890329,4.864668,1.692187,3.077117,4.392971,2.533444,0.575689,4.093695,1.766069,4.915334,4.419127,4.267247,1.781266,3.785649,4.931645,2.631608,2.353661,0.073329,3.501019,4.292388,1.237286,1.575123,2.503385,0.360401,0.448212,2.105554,1.306095,2.030187,2.271931,4.881367,4.721299,0.698651,4.412930,0.401033,2.538177,0.819550,1.829461,3.716701,2.122527,4.034756,3.594079,4.714197,2.670780,4.010740,1.614536,1.728729,2.002552,2.054579,0.516266,2.595495,0.484016,4.448811,0.309224,2.248472,1.423470,0.774347,3.919183,3.574662,0.729739,3.163828,3.962776,3.866661,0.461398,3.427564,3.580120,4.310831,2.540222,2.305470,4.825582,3.982561,2.793655,1.653085,4.226190,2.277182,0.463426,2.274521,4.359842,2.241411,0.071746,3.057427,4.979150,4.086243,3.086190,4.571994,4.067908,2.493197,2.956101,3.656464,4.232131,0.290882,3.874019,2.237517,3.303993,3.823165,2.697510,0.792574,2.047634,0.384365,3.446503,4.768531,3.976264,1.948932,2.921457,1.521003,2.705228,1.503635,3.691624,1.296708,4.820102,3.309744,0.343889,0.053889,4.985232,1.102528,1.562814,1.042070,4.640509,3.260064,2.521932,2.788254,1.589364,3.070875,2.098002,0.996141,3.283025,1.869203,3.925332,2.076975,2.541357,3.937332,2.239390,4.831106,3.965143,4.132152,4.769602,1.944253,2.900401,3.467959,3.367292,4.764684,1.441743,1.456808,4.590022,3.996528,1.016783,2.850234,3.728819,1.765182,2.171911,2.876983,2.335543,3.765212,0.029694,2.173163,1.687907,3.045820,3.879792,0.380726,0.790299,3.325408,3.692012,2.941009,4.914017,2.497307,0.681462,3.431455,3.010378,2.952107,2.729268,4.695479,0.645782,0.365986,0.770586,1.224951,2.964732,3.062126,1.163009,2.446127,2.410309,2.265554,4.017726,2.358465,3.791827,0.832406,2.659837,4.120524,0.888583,2.324611,3.045397,0.923873,3.783828,0.394981,4.732078,2.341107,1.680615,0.584035,2.162983,3.299020,0.472436,1.531345,4.180088,3.230905,1.031865,0.804549,4.522425,1.435101,0.897501,4.999820,1.545959,0.623701,2.308788,2.171726,4.634012,0.671025,0.455682,0.464893,4.521437,2.246846,0.753033,2.969150,2.688117,0.992034,3.015191,1.701156,1.191854,2.552003,1.458246,1.110700,4.398612,0.778813,1.402950,1.930692,1.368192,1.053553,3.855730,1.645081,0.562565,2.704476,0.627442,1.787598,4.409134,1.845806,3.162545,2.573128,0.688624,3.245348,4.280175,0.466062,3.768400,3.451056,4.333303,0.520460,1.528477,3.471457,0.110090,3.670378,4.289893,2.266520,2.171650,1.392345,0.025259,0.931518,4.899321,4.336430,1.332523,4.818744,1.838563,1.487927,0.764038,4.508055,4.934962,1.637057,3.517152,1.676517,0.524954,1.963462,2.757850,0.615084,4.091364,2.486816,1.171915,2.963798,3.966297,1.638122,3.507382,2.139296,4.820256,3.854700,1.781755,0.088740,3.287599,0.989361,0.609396,4.658882,4.999745,1.349444,1.508843,0.824945,2.288424,4.329219,3.507530,4.231658,1.142408,3.652280,4.592633,1.407081,3.453268,2.003287,1.451133,4.848117,1.743166,0.539248,1.942946,2.238391,3.761054,4.749571,4.085285,4.654707,2.375301,3.596583,1.545248,0.347936,1.827368,3.489576,1.373111,4.307029,3.953864,0.970213,1.654184,4.126513,1.219689,1.658011,1.715335,4.005210,0.185151,0.368935,2.892258,1.985560,3.164427,1.332306,4.547913,3.804709,0.338731,3.919527,4.847912,4.712178,3.677419,0.617969,2.880384,1.421164,4.851065,3.587429,3.053828,3.475440,2.189896,1.863684,4.678998,1.659636,0.207181,2.004201,3.951702,3.242342,4.810854,0.531009,4.557732,1.844246,2.370013,2.142411,0.582261,1.238982,3.711358,0.115038,0.669439,0.126051,4.286940,3.086624,0.849643,3.843861,4.834003,4.672802,4.607738,0.039051,2.945067,1.283163,2.823236,1.590151,0.768333,2.222469,2.475482,4.948828,0.211939,1.505776,4.259469,3.298477,4.133415,3.301455,3.797682,2.464609,1.024388,4.050019,2.839103,0.697526,4.024470,4.792930,1.730819,1.467561,0.408876,3.322456,4.794808,0.679963,2.425798,0.491191,0.170550,3.322505,4.338436,1.687853,4.378826,0.585265,1.189803,4.508034,2.542549,3.040962,0.190091,0.641950,0.278954,4.525004,0.673975,4.248364,1.755173,4.002987,1.825218,1.338420,0.468304,1.403533,2.357399,4.087544,2.262575,4.857178,2.708165,0.124728,2.076837,3.444496,1.171458,3.493150,2.518487,0.128689,3.871765,2.801869,0.412468,2.376070,1.436464,4.398408,1.424635,4.708435,2.730664,1.618069,4.067725,3.487002,2.069812,3.148092,3.892921,4.257789,4.082064,0.830385,4.141948,0.293145,1.000853,3.114634,0.573463,3.016738,1.539828,2.147333,1.575758,0.350868,2.503794,4.817997,3.058917,1.500159,4.780749,1.946186,3.487589,3.170564,4.764554,4.573013,0.740020,0.428429,4.048212,4.524716,2.464868,3.453806,0.348941,1.099022,0.746881,3.005803,0.987699,0.299232,1.511036,3.386062,2.889319,1.653625,4.167394,1.381346,1.302738,2.799737,2.391078,2.229863,0.778928,2.523231,1.295095,1.960899,3.667852,4.684314,3.869315,2.028169,2.965166,3.732489,2.071105,1.801241,0.676216,3.681304,4.192543,1.582922,3.917539,3.051065,3.920415,2.056687,3.737882,2.042546,0.443790,2.752895,2.271644,1.264399,4.460567,1.914267,0.195631,1.910679,2.122549,4.308189,3.995916,0.999833,4.195146,1.239636,1.709671,0.384092,0.276782,3.404301,4.616705,2.465084,4.220469,3.968756,3.323394,4.891145,4.010940,1.374222,3.945071,3.463308,1.997602,0.383987,1.071798,3.986189,1.242426,4.989290,3.469941,2.386112,2.852183,3.054364,4.844724,0.808706,1.361979,3.547955,1.199290,4.356486,1.732671,0.904197,0.238104,2.977975,4.126411,1.368966,4.587697,3.788671,0.306503,2.863165,2.837205,1.011862,1.672722,2.291394,0.240389,0.748882,0.820022,1.896179,3.736787,4.156518,0.814245,3.759530,3.353550,4.453437,4.843956,0.622303,0.403369,3.998651,0.810854,0.972873,4.410180,4.694824,1.592356,4.210841,4.294285,3.026952,2.830442,2.879192,1.506446,3.094335,1.217901,0.888161,2.064752,3.528902,3.107138,4.824410,3.232280,0.706570,0.806091,0.465336,0.955869,2.989755,4.191432,4.469338,2.000219,2.792915,4.045998,1.560353,2.978345,0.870413,2.382702,0.865361,2.312132,1.984098,2.166324,1.218561,0.680217,1.378327,1.197900,3.671481,3.584875,2.922415,0.456669,2.831309,0.396185,0.090865,1.762981,1.202725,2.973238,4.643212,3.599260,3.836804,4.754466,3.170455,2.888655,3.009340,4.329026,1.940495,3.976681,3.261285,1.522858,0.068442,1.049600,3.499944,2.898452,1.372973,2.171512,3.305744,0.635431,2.161398,2.083121,2.713005,2.609568,1.838633,3.813668,0.336145,0.177692,2.101297,4.483471,1.387847,0.861547,4.641042,0.841116,1.874203,3.645078,1.304620,1.149248,1.988336,3.936824,4.554917,0.156463,0.825541,4.793006,2.963956,2.757051,4.067718,0.198916,0.069181,4.837470,4.142853,3.736909,0.778504,2.383020,4.686468,4.667998,0.046236,3.762457,0.031189,4.921509,2.084836,4.867594,1.838734,1.465936,1.581460,3.653395,0.998364,4.320288,2.952863,4.849555,4.935425,0.925910,4.778910,0.232692,0.139319,4.719323,4.811984,0.736238,2.212079,2.470463,4.301406,3.139586,3.872832,2.425484,3.242069,3.677047,3.689406,0.008689,0.499540,1.818302,0.305987,1.914949,1.947834,4.601168,2.835359,3.531756,4.435993,2.210647,0.009811,1.426680,4.070794,4.509206,1.757548,1.469956,4.622526,1.755369,3.261226,1.401546,0.489594,2.506182,4.616159,3.093204,1.044133,3.412148,3.841806,1.603803,2.796047,3.409766,0.801766,4.820505,2.256260,4.898322,0.947869,2.418868,0.829268,0.050904,1.189376,2.015937,2.155654,4.432526,3.178386,2.172208,4.939988,3.071122,1.613315,3.456554,2.478500,4.405838,4.482556,1.836752,2.811695,1.328867,3.133184,4.961735,4.162943,1.832050,0.476902,4.833410,1.947924,1.466904,1.581677,2.449617,4.783757,4.933112,1.480634,1.757344,2.559033,0.040936,0.874183,4.680295,0.147176,0.504881,2.103235,3.657251,1.344391,1.529828,1.527365,4.363010,1.130488,2.812009,4.999656,3.642327,1.681753,3.827295,4.769579,1.867689,3.540056,0.379021,4.476484,0.481284,1.864625,2.712529,1.317888,3.246347,2.772144,3.585926,1.770697,2.730069,4.060927,4.053482,3.571200,2.709679,3.366306,0.434401,2.356586,4.300718,3.036824,4.708416,1.310893,0.481509,3.133067,0.454630,3.910677,1.283712,2.693759,4.056885,3.940177,2.479875,4.879232,2.488166,1.393957,1.512156,3.718214,2.185535,2.093942,0.102433,1.526391,4.301915,4.017522,3.732554,0.115642,0.134951,1.557325,2.372266,4.548706,1.923149,1.442625,2.855765,4.573471,3.693194,4.283331,0.910988,0.628322,2.720356,3.486854,4.774940,1.857672,1.732784,2.579271,3.424690,2.830119,3.615153,1.901575,4.310988,0.914878,1.579523,3.868388,1.678361,3.340773,1.438988,0.935522,1.503663,4.434966,2.304416,1.127076,1.607193,0.013855,3.779041,1.128387,2.989605,0.125548,4.172492,0.937224,0.023842,1.505939,4.602436,1.313071,2.517394,2.036149,1.471246,4.636768,3.944975,3.809567,2.630536,4.124308,2.292143,2.325948,2.468870,1.184551,4.618259,1.293753,0.990797,1.218759,4.086761,3.842728,2.135534,0.068910,4.878675,0.662655,4.257113,3.908615,4.690379,3.866993,1.656858,1.159570,1.888454,1.015436,3.597874,4.132593,3.232194,0.930464,0.186924,2.902006,2.313366,0.998520,1.840420,2.707331,3.164586,2.383219,4.856964,0.231132,3.291040,4.547790,1.182821,1.068536,3.811164,2.431869,4.960888,2.945618,4.617210,0.061053,0.772698,3.422095,2.082332,4.179823,2.144490,3.564983,2.830800,0.599518,3.589756,3.531859,0.578591,2.809557,1.678250,2.294249,2.113793,0.523872,0.790115,0.434043,0.962235,4.262222,0.122613,2.158086,4.004682,0.501291,1.138568,3.637199,3.237762,2.815119,0.858204,3.972655,0.707071,0.673989,3.975175,1.846117,1.563086,1.393360,1.624861,1.702938,3.481838,1.201311,1.626632,3.881058,4.565753,3.064180,0.525591,2.707923,3.138894,1.570263,4.140002,3.910394,2.876534,0.725078,3.486907,4.476743,1.250506,4.793429,3.856512,1.501608,3.084106,1.539240,0.497339,4.120743,3.329035,3.070003,0.710864,1.886886,4.383180,0.816522,0.239514,0.955757,1.250900,3.918213,3.240707,0.086714,0.086448,2.834482,3.166462,0.627109,3.052311,1.201760,1.683607,2.044158,0.580974,4.815468,4.868822,2.225008,1.287332,4.792972,4.090287,3.621143,2.309059,2.052894,3.896746,2.598068,3.302911,2.830965,3.560927,0.470525,1.888105,0.835446,1.210220,1.004121,2.516611,0.094965,4.819838,2.594819,0.262858,3.410269,1.344440,0.533838,4.151518,0.989538,0.523771,0.284532,3.642789,3.276356,0.040996,1.107403,3.523410,0.760704,2.883754,1.065782,2.246171,4.337115,1.512982,3.429862,2.191406,0.480776,1.803175,4.206400,4.865231,4.225408,0.811142,1.727546,4.155941,2.769480,3.880929,3.888916,0.355440,1.712033,2.395108,4.726124,4.491144,2.115160,0.478330,2.022711,2.679517,4.521986,1.474396,1.544321,3.135916,2.525958,0.979345,0.723636,2.447486,3.896955,3.894156,4.879018,1.913591,1.959947,0.009097,4.149587,3.233142,3.849611,2.353116,4.600967,0.145569,0.576406,1.880087,0.425530,0.439439,2.834363,1.080610,3.132676,4.646999,4.119411,1.242152,0.448315,4.750962,4.972480,1.872474,2.303386,0.726668,3.550904,2.109168,4.015076,2.886484,0.213919,1.674773,4.042981,3.440569,3.162660,3.362523,3.025184,3.205622,3.102106,2.667140,3.788736,1.847463,2.376192,2.007248,1.046052,1.609445,0.275075,1.627638,1.952915,0.466920,1.102276,1.247709,1.137351,1.751109,0.724381,3.657507,1.713274,0.611826,2.967999,0.898241,0.290282,0.816461,2.099974,3.467545,3.207504,0.026030,3.966453,1.678439,3.398578,0.163366,1.968941,0.098053,4.081728,0.934836,3.372740,1.385331,0.676756,4.651477,2.975123,4.453155,1.532997,4.149177,4.708412,1.975919,4.520655,1.675429,1.623000,4.978663,4.762052,1.143092,4.186010,1.712289,4.896217,4.249088,4.524597,2.868368,1.470757,0.987625,2.639360,3.357579,3.708943,0.851916,2.679440,2.180549,1.041121,2.764812,1.379569,2.675273,1.000547,4.499713,1.690514,3.051673,0.609665,3.150086,1.360202,4.782658,1.970771,3.037033,1.079067,4.307381,4.021665,1.228177,4.555243,0.200775,3.762866,2.289344,4.177297,2.327430,0.327910,1.132728,4.971874,1.670888,0.801526,4.029154,0.225349,0.332044,1.487594,0.237005,4.978563,3.455644,2.597932,4.025832,3.312434,0.866325,1.098169,4.338471,1.684807,2.238202,1.955679,0.260149,3.522869,2.700370,3.380700,1.391157,2.034570,0.963249,2.098413,3.267457,4.723445,3.317286,2.625799,2.081836,0.527748,2.385371,0.775540,2.910936,3.651235,4.732478,1.484264,1.984528,0.914760,4.389703,4.120386,3.874799,0.286450,2.783597,1.175068,0.598426,3.908066,1.057907,2.504058,2.630482,1.066410,2.461306,0.264099,0.000362,4.401610,2.077944,4.537099,2.481537,2.155541,1.479561,0.408445,1.548473,3.042351,3.813932,2.704128,3.791279,0.788758,2.916200,4.413016,1.089801,1.138345,3.742163,4.060284,1.240232,1.657849,3.158847,1.992159,3.120055,2.482150,3.868257,4.229443,4.319136,3.057625,3.062921,2.248234,0.138070,1.495901,0.318489,2.188926,4.247426,2.984010,3.377663,0.940040,1.309766,0.815661,4.213444,1.401565,2.811632,0.705643,0.619945,1.737917,1.651766,1.644266,3.004664,1.579951,3.843679,0.453354,1.623929,3.345966,3.014661,0.597578,2.197367,1.546107,3.159352,0.649351,3.352830,2.319163,1.374450,3.737220,0.939549,0.761190,0.076780,4.306502,2.461828,2.583578,0.573813,0.538881,1.668917,2.581153,3.504361,2.496352,4.157792,1.886962,0.140440,2.130761,0.425013,1.610272,4.925773,4.286771,1.182279,1.879812,2.155826,3.819342,0.167286,0.193114,0.585589,3.141625,2.072733,4.244628,1.420289,2.446260,3.533929,2.726006,1.584000,0.762714,2.703017,0.710783,4.696522,2.699453,0.874577,3.603213,0.517736,3.858224,2.286446,0.663310,0.186055,4.966890,1.371841,4.761243,2.509182,2.515077,0.455349,4.753529,3.664479,2.593639,0.601286,0.878383,2.160833,1.811294,2.790690,0.381720,0.201730,2.555515,0.142507,0.297760,1.881707,0.308895,1.927348,1.208753,0.938851,2.023399,0.599520,1.748197,2.174368,4.150015,4.664031,1.541692,1.463210,2.832591,0.687072,1.748561,0.266082,1.895341,0.570757,2.809065,3.207969,4.935458,0.975693,1.036011,4.737098,4.323204,3.080270,4.207036,1.048461,4.370144,4.336538,1.240561,2.541867,4.648871,3.395750,3.302596,2.798823,1.344158,4.892077,2.237548,1.557250,3.642904,3.038524,1.711207,1.518958,1.072533,0.392432,3.128555,2.528468,1.174242,0.275623,0.094505,3.692480,0.941266,1.333218,0.070561,0.753195,4.372229,1.210304,4.769791,0.821734,1.266307,4.338550,2.133042,1.339145,3.464069,0.256142,4.453026,4.207808,0.428985,3.993094,4.805852,2.460348,2.840767,3.398984,1.333635,3.248306,2.374338,2.027709,4.514008,3.989516,4.673038,4.183259,0.209053,3.032647,3.488184,3.324287,1.359782,2.128152,0.195146,0.470471,2.802560,2.912059,1.006146,2.241014,2.360386,0.056684,0.712604,3.121500,4.964101,3.251959,0.601083,4.107201,2.157689,0.418501,2.999123,1.140230,2.083909,1.591471,3.214270,2.155173,0.519910,1.078378,2.502226,3.945921,0.048716,3.062136,0.579409,3.020247,4.184038,1.142415,2.477574,3.870265,0.877887,0.762806,4.525229,3.473233,3.682867,4.219843,2.697129,2.442027,2.781287,3.585090,1.954687,0.475841,0.677984,4.869515,0.258588,3.558097,4.718408,0.646298,3.611322,1.512283,1.184825,4.263113,4.546768,1.735253,3.163238,0.879688,3.948797,4.406199,1.593362,3.264835,4.382088,0.076875,4.278676,2.860572,2.070077,2.613079,4.120310,3.610648,2.506324,2.438262,4.496289,1.161711,0.478508,3.393191,3.511059,2.841930,1.312683,1.479765,3.085216,1.364792,2.498106,1.660372,2.552191,1.146819,0.990302,3.669992,1.928638,1.162831,4.292102,2.008502,0.579351,3.540240,1.399860,2.826211,3.118465,4.812872,0.955506,1.420860,4.661099,3.591465,2.246655,3.673867,2.066926,2.050258,0.782084,2.610241,1.313322,3.167967,1.993031,4.268605,3.856813,0.739666,2.955460,3.568703,2.572205,0.569736,2.516237,2.164495,1.628772,2.912678,1.624362,1.177783,3.679506,1.066855,4.026441,4.895805,2.206194,4.061962,0.841839,3.986518,4.812336,2.585117,1.278599,0.804131,4.583134,1.622863,2.485019,2.167158,2.176078,3.826291,4.675792,3.183873,4.785691,0.952223,2.819686,3.427535,3.574882,3.779237,1.665751,4.410973,0.658528,1.392679,2.343570,2.959990,1.476421,4.539128,2.259234,0.501687,4.095259,4.827269,1.731638,2.773218,2.915353,4.008105,0.759191,4.206270,3.608048,0.174600,2.834576,0.140169,2.482200,2.997066,3.174399,4.634393,1.485285,4.222829,2.261106,3.334699,4.039717,3.620206,3.977503,3.180348,4.003903,4.545067,4.522094,1.639441,4.859864,0.288335,3.082013,2.476123,1.152380,2.675740,0.329773,2.768571,4.272327,0.704862,1.626761,3.155616,1.796506,2.075015,1.692254,2.413349,1.865980,0.721242,0.994064,0.396233,2.338285,4.227020,0.452755,3.293627,2.101116,4.356905,1.816568,3.472217,1.995561,2.709742,3.874728,4.839285,0.674437,2.645485,0.661343,0.152519,3.739753,4.916357,2.977016,0.362163,0.308640,1.572737,1.904420,0.019332,4.213415,2.342899,4.978538,4.420735,2.503882,3.135291,1.572760,1.516781,0.651025,2.727001,0.408356,2.234298,1.608622,3.952667,1.907228,4.507477,0.947652,4.652733,2.966433,0.601208,2.510751,1.339591,3.745182,3.256547,0.313683,2.087731,4.435681,2.039135,3.718153,0.566913,4.334583,2.512159,4.737861,2.686606,3.846128,4.860569,3.646735,2.886367,1.833541,0.212625,2.162729,2.062402,4.115311,0.946264,3.713224,0.187818,4.431827,3.339713,2.112219,1.327539,0.922005,2.928226,2.051193,3.715114,4.533873,1.478258,3.249502,2.113611,0.213695,3.077163,1.818513,0.068630,2.361400,0.458345,3.140848,2.632482,2.501744,4.684396,4.402137,3.569670,2.887704,1.261847,0.040814,0.598174,1.601471,0.983639,2.850019,2.674749,1.948957,4.002723,3.655786,3.439414,2.513376,0.217226,2.140139,2.495909,2.239238,0.022373,3.262144,1.286964,0.223294,2.517343,4.602737,0.147201,0.068708,2.938740,2.714931,0.078532,0.515344,4.181973,2.263192,0.621936,0.779602,3.057114,1.643330,0.128526,3.180092,0.161765,0.551400,0.793841,0.716390,3.807815,0.467227,0.743208,2.235078,0.700418,3.734680,2.438729,4.398217,0.190579,4.275992,0.769055,4.628174,1.630206,2.553915,0.118470,3.645695,1.068856,4.583084,3.308935,1.418096,1.304543,0.852396,4.009353,2.192384,1.384728,4.764098,4.011204,2.931515,4.012243,0.600634,3.360819,1.620758,3.437545,4.808286,3.901798,2.827794,3.727666,2.341658,1.399726,0.203170,3.386015,0.712957,2.296740,3.333773,4.456470,3.046818,1.088623,2.370278,3.338100,0.976588,3.660859,3.819121,2.612647,4.294006,1.123699,2.688687,4.470821,3.520758,4.034372,1.110465,2.863903,1.620214,3.294582,2.613048,3.127444,3.088350,3.682179,3.994411,0.309389,4.741884,2.032225,0.850485,4.609901,3.919957,2.101769,2.999573,1.130986,2.065652,2.004700,3.770202,2.158615,3.774356,3.950397,1.928099,2.200317,2.603580,0.017553,0.975275,4.235686,3.804702,0.385758,3.174488,0.103677,2.671018,0.807408,4.267262,3.074076,0.319911,3.206269,4.460991,3.668532,0.576012,3.325466,3.053513,3.156759,3.975811,1.522096,1.777343,1.009081,2.285880,2.049217,0.420509,1.213033,0.599638,2.772542,0.936333,1.628011,4.085267,2.859246,2.597916,4.721814,2.186757,4.418205,2.889270,2.026677,1.730360,4.516890,2.826227,1.258568,2.597344,1.248854,1.203344,0.645707,3.446546,3.905218,1.618060,2.046483,3.965340,0.081516,1.664155,1.537972,2.717258,4.474346,0.202584,4.213857,2.785639,2.938335,4.784828,0.641416,1.383218,1.150259,2.344200,2.899149,3.639315,0.265196,2.130647,4.621372,2.312964,4.088114,0.559899,1.448408,3.676984,3.106771,2.215763,3.344570,3.854842,4.487544,2.201776,3.213048,1.907301,4.635249,2.403418,2.052615,4.697356,0.009806,1.659855,4.191028,2.257242,1.741932,2.939082,2.023379,1.647518,1.329867,1.565227,4.620810,4.798365,0.494153,3.677069,3.288813,3.154843,0.164217,1.367270,3.730514,2.479034,0.119442,2.632578,4.239024,4.392101,4.493130,2.636662,2.334838,1.221723,4.330388,3.999286,4.317874,1.129725,0.489515,3.492225,4.565756,4.582884,2.643157,3.210526,0.560406,1.376439,2.688755,4.403844,2.420699,2.963541,0.277682,4.823270,2.462136,0.801352,1.694855,2.566537,0.692572,0.983234,4.579485,4.362763,0.611511,1.394990,3.177922,1.298768,0.010419,3.506073,0.965393,1.624778,1.419682,0.761846,0.678426,0.724567,4.837458,3.634254,4.700377,2.857700,1.655044,0.819634,2.416781,2.466993,3.887349,2.642197,0.974252,4.070954,0.739580,2.644570,0.212346,1.845905,3.359366,0.693543,2.624400,2.694196,4.546776,2.333147,0.391754,0.729686,1.378043,3.994770,1.275542,3.047146,0.391908,1.010727,3.095714,0.490694,3.577713,2.245501,1.397876,4.369501,3.365791,0.320922,3.350988,0.991896,4.601295,0.768660,3.083448,1.212033,4.710832,1.622336,2.948183,0.647547,2.396860,3.044181,3.853481,2.785337,3.517994,4.295408,1.492784,1.700835,0.147869,2.771309,4.857655,3.680513,4.962928,2.271760,3.737368,0.806041,2.110032,3.218069,2.251560,0.148611,1.584213,3.380339,1.975969,2.242025,4.280896,1.346954,3.079658,4.228853,4.035753,1.193618,0.255449,1.384139,0.882017,0.138554,1.521808,2.604057,3.251595,1.889476,1.021415,2.846530,3.761832,3.474758,4.284923,1.319335,2.515049,2.442187,1.607913,3.432105,0.671171,4.025746,0.183096,1.940899,3.036602,2.121820,3.278461,0.194003,4.335803,0.388286,1.438732,1.466845,0.059068,0.470119,4.259420,3.879074,3.689967,3.446481,0.372650,1.493287,0.032866,0.302605,0.189438,0.994670,0.281418,0.084419,1.224574,3.994270,0.281555,4.922746,3.287916,4.334104,3.303505,3.884369,1.503894,1.286623,3.322125,2.815772,2.528316,0.886276,1.153243,2.748626,2.049590,4.812561,2.764112,2.158558,4.752994,0.458069,1.358910,1.731972,4.267513,3.832060,1.523571,4.362817,0.312783,2.467335,3.273421,1.560972,0.345855,1.285802,2.418859,1.590532,2.078359,0.465623,0.071368,4.388063,0.390559,1.464123,3.320227,4.222522,1.606314,3.260343,2.360656,0.255065,2.041815,0.149240,4.820951,3.810919,1.696462,1.173702,2.001636,1.580822,1.853972,4.593572,2.022626,3.706997,0.784065,2.668405,2.468670,2.956160,3.399437,4.305097,1.149836,1.907671,0.285914,3.120906,4.673800,1.980986,4.858755,2.989376,1.056234,2.647645,3.200228,3.331364,3.190209,0.948070,1.041553,1.207315,3.664970,2.496773,3.356278,3.996817,2.820348,2.355705,2.012575,2.681314,0.747892,3.932228,4.563796,4.061825,4.109478,4.147007,0.878246,4.979064,3.285929,2.104635,4.440119,2.911756,4.968123,3.760368,1.837554,3.712811,3.650550,1.564954,4.420876,0.703825,1.826368,3.181371,2.395696,3.390779,4.986768,0.389983,3.794844,4.087123,1.411007,1.275780,2.206788,1.969284,2.539095,1.057921,2.469002,4.063762,4.414417,3.333811,1.440652,4.366226,2.106140,1.159036,0.672987,4.808344,0.439896,2.648802,1.010886,4.341402,0.972633,3.682399,0.825580,4.690561,3.316625,2.075604,4.812413,2.620254,1.920369,0.812378,3.605447,2.981665,1.114464,1.249809,1.101911,2.479209,0.236447,1.446237,3.683120,3.106150,4.092981,3.724125,0.106387,2.847846,2.192084,1.806500,4.961908,3.284817,1.255350,2.664330,0.476160,3.726366,1.738259,0.844417,0.812107,0.076144,3.889401,3.643499,2.425129,1.529824,1.958058,4.420442,0.606499,0.147824,1.078622,2.603428,0.038415,0.521324,3.489320,2.240314,4.743195,4.553833,1.382289,1.888580,4.590859,2.896288,1.848610,4.002034,4.622521,3.367465,1.154518,4.096303,2.102631,3.490233,2.431768,4.704325,0.341876,0.778984,0.972841,1.105003,1.177138,0.764251,3.464588,1.090779,1.177267,0.986941,1.993436,4.792966,1.833901,1.488121,0.342998,1.762638,1.160980,3.814637,0.558141,0.718405,1.392552,1.440134,4.231525,3.956418,2.893178,1.442943,1.594392,2.961091,3.699333,1.920490,2.547810,4.440166,3.248954,2.677751,0.356112,0.880076,1.004958,3.115741,0.540564,0.144974,1.801753,3.594296,3.466247,3.963352,3.481241,3.066428,2.430810,1.042492,2.842740,3.183124,0.618717,2.825737,0.488744,2.735384,0.794594,0.595068,0.565500,4.555127,2.990437,1.250794,0.357244,2.680907,0.724015,3.892015,2.480548,3.632244,1.978633,3.511614,3.423072,2.807081,4.228698,2.912368,2.890552,1.539916,4.657531,2.585698,1.958573,2.708211,0.726211,1.325626,1.533409,2.575794,3.477554,1.436012,0.678830,2.796091,4.273249,2.091160,2.378865,1.446043,4.044171,0.603325,0.855444,4.999783,3.411079,2.740262,3.975540,4.984412,0.954371,3.956965,1.710810,3.656163,3.538299,4.991650,0.559360,0.010627,3.738922,2.843885,3.454371,3.767625,2.467533,1.782673,3.851879,1.900650,3.110961,4.467030,0.791957,0.044531,1.283783,3.987360,2.834128,4.730804,2.739370,1.328907,3.829427,3.287752,4.103417,3.339992,2.259745,1.385413,0.278002,1.539681,0.231292,2.150135,1.129000,3.518238,1.100893,0.407159,4.193986,0.300164,3.754792,4.647127,0.535646,2.798340,2.258634,3.993550,3.117400,1.391367,0.007345,2.414339,4.470544,4.526816,0.626485,4.303385,0.172156,0.461746,4.831104,1.934837,0.353919,2.352277,0.230685,0.081851,2.808751,1.056031,3.109563,1.673496,0.662385,4.922009,1.249707,0.309886,1.394183,1.258500,1.498232,1.778371,4.025826,0.298922,1.772663,0.518728,4.910983,0.719859,2.395175,2.400217,3.905891,1.360729,3.688869,0.131693,4.635752,0.494778,2.404148,0.867149,1.843084,3.210103,0.712361,1.445543,3.395912,4.222723,2.964489,2.614923,0.548045,0.732702,4.790957,0.013124,2.422093,3.781712,1.049815,2.297819,2.465306,1.301986,4.393756,4.625781,3.746684,0.043183,3.144628,1.160559,1.335923,0.919020,2.862057,2.233593,0.967821,4.663205,1.196116,3.893695,0.123455,0.917401,4.094330,2.682133,3.230538,2.144492,2.178161,0.627020,0.854963,4.594985,2.288161,2.362275,3.331654,0.070635,2.663471,4.426678,2.086523,2.063018,2.266551,4.275510,3.050005,3.736755,3.590751,0.254299,4.883498,3.531041,2.900626,0.225883,4.590406,2.347784,4.555962,2.092035,2.886525,4.468590,2.304155,0.897657,2.125325,1.908133,3.654315,4.203668,0.056661,2.474076,1.336335,0.822163,3.328528,4.177728,2.722029,0.968971,3.756427,2.606663,4.023191,4.823614,2.096755,1.595010,1.410398,3.454932,4.859387,1.429095,2.311391,2.881655,4.769618,1.235726,4.808165,2.620130,3.641935,3.906704,0.823046,4.873723,4.880603,4.330850,4.216774,1.631322,4.260332,4.441640,1.332632,0.853281,3.784894,2.888676,0.539316,1.997528,1.660000,3.303454,2.102026,3.243381,3.996940,3.535363,3.087677,4.532339,1.238909,2.537782,3.780558,1.120172,1.058468,3.421365,3.903196,4.431824,2.241568,3.581480,0.854748,1.573796,3.160604,0.739418,4.778412,0.639287,3.883821,1.593069,3.664526,2.023789,3.738144,4.501692,2.980717,0.819640,4.755347,2.662428,1.197137,2.042137,3.605463,4.676502,4.532932,0.701446,4.358948,2.950836,2.048397,2.321835,3.973059,4.223875,3.289484,0.292306,4.042318,0.128721,1.938841,2.220837,2.530533,1.279767,2.095331,3.936492,1.356332,4.066254,0.062879,0.713994,4.626503,2.352000,0.253988,3.052216,2.280035,0.442938,1.739812,3.072130,3.138543,4.434515,2.462530,0.523689,0.567766,2.084017,0.926606,4.604769,1.060391,1.881849,2.561909,1.652011,3.322981,3.026278,4.696838,4.159795,3.014808,2.233559,3.073873,3.115330,1.347888,0.890088,2.595038,1.536316,1.926152,0.008318,3.408390,0.290077,3.677357,1.039799,0.823825,3.002781,4.917365,2.110348,4.346596,0.309204,2.543341,3.408829,1.876946,0.647348,0.077032,1.933712,3.713692,4.952759,2.315363,1.474586,1.733334,0.459655,2.250566,3.135643,3.117887,0.063845,3.168660,3.328432,2.510123,4.724396,1.290224,4.259580,0.871108,1.309776,1.024494,4.426597,3.967628,2.252419,1.890115,0.064506,3.509698,4.824691,3.892597,1.165383,1.322510,2.114014,2.038658,1.161688,3.958089,3.930428,3.532354,0.024803,4.586891,1.687791,0.144094,3.187095,3.687996,3.354805,1.954581,4.305830,1.782543,2.691291,4.608783,3.639477,0.473342,3.885693,4.508455,4.126941,2.383826,4.125739,0.378145,1.271133,4.334334,0.206939,1.990270,4.302349,2.229274,0.423104,2.295563,3.661080,1.581960,4.532655,4.703982,0.838828,0.466932,1.496784,2.345213,0.785070,1.207842,4.666494,3.574400,2.989730,3.539779,0.013629,0.727607,3.458751,3.574842,4.264865,2.927751,2.786250,1.988189,4.082780,4.260115,2.257965,1.877964,0.252025,3.960383,3.365285,2.196010,2.523427,4.480261,4.388370,0.895418,4.245047,2.548695,0.530590,1.557419,3.434729,4.467170,0.541749,3.048266,3.390645,1.380885,3.783203,0.516642,1.198384,0.002455,2.513690,1.317180,0.390337,4.404407,0.993325,2.836599,1.357327,2.987498,3.271483,3.627956,1.478630,0.236276,4.286358,4.846469,4.431124,0.413050,3.925681,2.430017,3.160607,3.058576,2.675156,3.375390,3.081607,2.884204,0.714123,4.324687,3.767477,4.821846,3.958715,2.912606,4.585838,3.271314,1.550648,0.877517,3.021539,3.680871,4.120811,1.426440,4.510001,2.889856,3.615465,4.040664,4.656410,1.449952,1.962333,4.499837,4.172381,1.995681,2.336691,3.585738,0.306248,1.836593,1.031151,2.593976,3.860512,0.649624,4.933672,2.335559,3.865083,1.762082,2.440684,4.824321,3.451311,0.128266,1.159911,1.296304,4.794535,3.847843,3.393153,0.348254,4.019073,0.908366,0.743902,4.344250,0.025186,0.316399,4.597030,1.257777,3.871691,3.285866,0.561162,3.974645,1.036955,3.477133,1.904267,2.723799,4.731032,1.295899,1.505497,1.462627,1.850114,2.883117,4.001256,4.465568,0.305944,3.250483,2.962023,3.004695,3.966667,4.689281,3.741281,0.858124,4.773256,4.326030,1.498277,0.611262,4.029953,4.881759,0.637436,3.256797,0.049184,0.177465,3.925911,4.077918,1.746731,2.239802,3.897386,4.288523,1.380504,3.921439,1.004390,2.236711,3.594486,3.428992,2.511445,3.349367,0.252664,1.441336,1.081365,0.408965,1.038446,4.300151,4.481397,2.665531,2.421976,2.315838,4.795225,4.704093,1.082440,0.474959,0.271916,1.788317,2.087714,1.238379,4.601125,4.185770,3.722315,2.419482,4.432479,4.725937,4.438360,1.306806,4.321137,1.751836,0.616341,3.718112,4.044423,4.933904,2.404787,1.255113,0.326958,2.065918,2.887143,2.482490,0.813938,1.857727,4.589532,2.296469,2.561117,2.359558,1.923576,0.303135,1.145923,2.499989,2.922164,2.390690,1.819464,4.017487,3.473828,4.727101,0.138678,3.720397,0.306879,1.454897,4.585510,3.876776,3.310096,1.998482,0.249138,1.301264,2.404344,2.113892,2.290663,0.151555,3.165371,2.254828,0.083944,4.696067,0.988502,0.847948,3.775470,1.743316,3.057742,0.029831,2.157169,0.124170,1.047809,0.973587,4.854634,1.512065,4.196257,2.103783,4.310647,3.313936,0.035462,0.558001,0.156725,0.452225,1.101570,3.927913,3.668403,1.223568,1.952115,4.297440,0.361606,2.824079,0.575140,4.970274,2.208231,4.576356,0.764914,4.951531,0.296520,0.294612,4.116186,3.882961,1.239684,1.234230,2.363275,4.718013,3.129433,4.162648,4.335517,0.672247,2.894043,4.934704,0.478226,2.217732,3.824267,4.947885,0.598581,2.022197,3.764803,2.970400,4.393265,0.510733,2.712563,3.045970,4.071323,4.228113,2.370825,3.021625,0.039264,3.445145,0.077230,3.235442,2.529480,4.770299,0.815370,1.918884,4.286488,2.570477,4.073122,2.537127,3.412010,4.407713,0.274079,4.404290,0.894803,3.776485,2.829156,1.664612,4.792549,4.207167,1.427786,1.013416,1.794953,1.660579,0.798786,4.687038,4.438125,4.374225,2.278557,3.948001,1.801788,4.302994,4.532225,2.691500,2.380961,2.663495,1.190611,0.459293,1.934600,3.920373,3.408759,4.204364,2.257341,0.621360,2.613126,0.197450,2.154342,1.007084,4.221240,0.644630,2.373187,1.925688,4.226925,2.808124,2.374773,2.980970,1.160706,2.606918,1.750188,0.544590,3.957493,1.803977,1.394556,0.002848,0.190022,1.259222,1.647651,3.495638,1.842280,3.982624,2.935831,1.752835,0.786987,0.006847,1.915571,2.033602,1.819456,4.012020,0.477776,0.574511,1.167317,2.568664,3.629507,4.518319,1.335474,0.638997,2.546072,1.497962,4.922460,0.199213,0.954475,3.767794,1.931888,2.811191,4.077259,3.334316,3.017755,3.409118,0.321223,0.488996,3.037745,1.839222,4.978571,4.103295,4.632392,0.902316,3.123651,0.139387,3.675712,0.211108,3.370398,1.061844,2.955955,1.379873,0.112014,3.427685,2.243296,3.621153,0.281422,2.651017,0.271332,0.719235,3.922066,1.143362,0.466618,0.709044,0.707161,4.219119,2.949713,3.961745,1.286095,3.131704,4.494538,2.669777,4.353670,1.090229,4.834634,0.398462,3.805542,1.008594,0.584439,2.795130,1.585111,1.112600,2.195616,4.942107,3.163388,1.393015,4.929511,1.395833,3.598258,1.316664,3.871532,3.219921,2.863534,2.294474,1.214216,3.047136,4.371738,0.156527,3.663349,4.399613,3.084439,1.292153,1.757375,3.744024,1.834112,0.040366,0.527591,1.426702,1.965849,1.821624,4.032139,1.107914,2.051567,4.071134,3.967186,1.026127,1.820365,0.781566,0.450500,2.770966,1.597461,2.568446,2.939549,3.030961,4.703826,1.173246,4.490426,0.256543,0.151914,0.543840,3.218446,2.651468,0.810616,0.739525,2.647147,4.795029,0.913650,1.295648,0.602916,2.973009,4.633846,1.190076,2.362106,4.538073,3.541416,2.641433,3.196534,3.654198,3.642392,2.424886,1.407380,1.030873,4.593069,0.291233,1.685366,3.450251,3.000345,2.166093,0.521164,0.697640,3.482614,2.418483,1.697754,1.873968,2.143430,3.415283,3.004739,0.352415,0.787389,0.352778,0.172951,3.880025,4.254795,2.080889,4.844204,4.317989,4.301925,1.835922,4.771736,3.744649,1.768462,4.444164,0.020561,2.857955,2.600864,0.408950,4.311782,1.408556,1.881750,2.375767,4.084674,2.974690,2.819786,1.811888,1.398423,2.390601,1.278668,1.697557,2.201882,4.217504,4.652553,4.148707,2.628499,3.557786,1.676043,2.295985,4.702448,1.774737,0.864928,2.360470,3.262958,0.632571,0.610507,1.518474,4.538246,3.373019,1.109671,3.017438,3.301199,2.615273,3.796912,0.123695,0.955586,4.831859,2.488700,0.382574,1.540898,0.008862,2.897071,4.997391,2.950497,3.050365,1.638633,1.185163,2.540783,4.498931,0.048756,2.848254,2.142555,3.105897,4.199790,2.245220,1.088414,1.883035,0.752757,0.424496,1.879382,3.128493,1.314177,4.578421,3.444756,3.431567,3.458553,0.008422,4.065034,4.588043,0.096990,2.991470,3.382879,0.981213,4.191056,3.129157,1.125275,4.835951,1.079328,3.392939,2.369449,3.616424,0.488796,4.762726,1.022445,1.101920,2.770143,1.748666,2.210648,0.185492,1.174422,3.867666,4.511076,1.167387,3.866745,0.144733,0.223621,1.965046,0.739556,0.830693,3.136985,4.290821,3.894836,1.682469,4.376080,4.206730,2.621058,2.379380,0.292312,0.752625,0.427066,2.633863,3.383192,3.093910,4.364426,3.293512,4.148538,0.702126,0.858240,4.592061,1.773523,1.084994,4.560346,4.850523,3.188848,1.941693,3.441929,0.077789,0.723561,1.843572,4.161123,1.521580,0.289359,1.893676,1.206271,0.280300,1.994621,1.757107,3.669200,0.316024,1.895272,1.712168,3.234108,4.439604,0.714949,4.081269,3.048617,0.146213,3.834443,2.688440,3.999644,2.044340,3.327514,0.994021,0.959223,1.701312,2.597203,3.582634,3.334024,4.106723,2.131985,4.562646,0.545839,0.936017,3.418588,1.268863,0.822953,4.432469,0.342004,4.957356,4.312947,4.341289,3.143565,1.124278,3.990458,0.269003,2.910577,2.195798,3.752034,0.118841,1.933928,2.385472,0.761796,2.073601,4.552388,2.343171,1.258881,2.661675,0.304212,1.471343,3.918184,3.209571,0.119924,2.849380,1.086700,4.878749,3.918435,0.639540,1.927728,2.449848,0.911859,3.521419,4.206894,0.022323,0.666117,1.417314,4.920551,2.022639,0.851260,0.604636,4.506781,4.051220,3.096503,2.698478,3.885769,1.590753,3.199273,3.684227,2.878244,0.843660,4.929524,4.055978,2.453135,3.099851,3.800380,2.292926,3.695581,3.864639,2.295037,0.938841,2.988835,2.771444,2.502468,0.292910,3.887816,2.693541,2.153257,4.074461,0.984423,1.358407,3.198635,1.950290,1.515346,1.273080,2.428654,3.877684,4.026630,3.952849,4.428226,0.253709,4.911084,2.132307,0.964911,4.850114,4.125912,4.648618,2.615769,3.738709,2.597320,2.697251,4.757505,3.691785,2.833889,1.963676,0.821638,0.578652,1.498331,3.464022,0.957763,0.657311,0.388787,4.231247,1.205949,1.004252,1.954269,3.147431,2.931299,4.618289,3.409861,2.809858,3.557991,3.318617,3.837392,2.862132,4.036454,4.500287,3.482384,1.788099,1.399891,3.185928,3.157146,0.119553,3.735547,1.109372,0.272451,0.765996,3.283904,2.615273,4.234689,0.531264,4.147583,3.254589,1.074648,3.684528,3.706666,0.540008,1.332234,3.194325,1.902873,3.826225,2.680212,4.284985,0.555130,3.668734,2.323200,2.596955,1.420228,1.345316,0.949019,1.866728,1.194939,0.948640,4.808980,2.237071,3.390612,1.870741,2.848969,2.496011,3.063441,3.613644,3.319546,3.810517,0.731522,0.470156,1.694497,2.409139,1.122013,3.866123,3.597780,4.567895,3.644801,0.535727,3.324974,2.060297,1.298074,3.009757,1.510951,2.654282,2.879887,2.645335,0.053433,1.743695,3.952311,1.734478,2.546897,1.733160,0.996190,0.998767,3.744298,3.139763,4.660285,2.105023,3.182836,2.342698,2.369689,4.270437,2.271514,4.640834,3.102536,0.427121,0.339915,4.911571,1.996797,2.937294,2.157930,0.794482,0.627759,1.063481,3.026689,2.732668,1.642942,0.220871,1.620140,1.991517,3.782119,3.687420,1.107040,1.138370,3.139414,3.258882,2.805514,0.559857,1.428601,0.158516,3.807971,4.032517,4.602403,0.439578,4.531065,4.592126,4.988530,3.889443,1.313189,1.322794,3.441084,3.398663,3.301646,1.765604,2.598986,1.507487,2.983954,3.862011,3.493481,2.162527,2.623642,3.862092,1.164265,1.106493,2.424934,2.470682,0.117364,2.909732,2.088707,2.881899,4.574118,1.665590,0.539179,1.032593,1.532685,4.317350,2.745371,4.975410,1.425160,0.343634,1.505941,4.962975,3.715496,4.575307,2.974224,1.376817,4.772157,1.145782,1.985570,1.466939,3.217295,2.090049,4.785541,4.837100,0.484570,4.641665,3.989980,3.561687,1.813930,3.397786,4.053332,4.152124,4.028878,1.600118,0.925065,2.718877,1.271130,3.924926,0.223350,2.127043,3.892940,0.402796,3.434896,1.155316,0.636969,1.539434,0.096681,3.150112,1.664544,4.968556,0.489197,4.474421,2.489789,0.588504,4.280587,0.555228,3.229296,1.226088,2.245588,2.865100,4.598377,1.422569,1.938474,0.997979,1.718108,0.629059,2.740417,2.796158,3.116866,1.151762,2.161778,0.207145,0.201283,1.547314,2.445715,3.464870,3.793367,2.008905,3.778032,3.638020,3.162371,0.708149,1.436220,2.669384,4.069660,2.016569,4.835331,3.327003,1.565278,2.807170,1.875368,4.559906,0.241736,1.144578,0.482833,4.028098,0.955397,3.714237,2.807982,4.151080,4.974744,0.771184,0.752087,3.181078,0.181522,4.087090,1.883196,1.994674,2.860229,1.710477,1.501176,1.024846,3.594107,3.843063,3.040513,1.180169,3.473795,0.789295,4.391412,2.231630,2.379306,1.020741,3.077556,4.925244,2.945502,3.261726,1.442446,1.629257,0.981778,2.573008,0.739873,3.092406,2.326551,3.121559,0.353604,4.420285,1.892907,1.034657,2.503919,4.649104,3.471431,1.700434,1.519218,3.306433,0.444023,1.827051,2.393389,3.802587,1.627587,3.960759,3.913437,0.097316,0.952066,3.266971,2.480210,0.138182,1.798244,3.128868,4.958432,1.034372,0.763595,1.821842,2.754563,3.322497,1.804074,1.142208,0.026122,0.917235,0.500318,1.210549,1.612872,0.393692,2.029230,0.838130,2.906838,1.889387,3.198260,3.880772,0.423515,1.912393,4.888876,0.011548,2.294555,2.344548,4.118608,1.451135,3.880153,0.011001,2.453750,1.596602,4.040778,2.014736,0.349392,3.541935,0.066115,1.672083,2.491650,3.708712,1.565320,0.520487,4.126283,0.049113,4.365656,0.532488,0.628505,0.831144,0.741715,3.973895,4.054907,0.847340,0.562588,2.862403,3.498535,2.795199,0.138449,3.830441,3.570951,3.586298,1.036066,0.351414,4.986422,2.388986,3.631214,0.482087,2.524661,2.520483,0.614290,1.758038,4.457317,3.451075,3.658354,4.391444,1.551428,3.949724,0.482694,2.887744,2.670740,2.155961,1.045846,2.137633,4.221416,3.653517,2.203016,4.837943,3.926460,0.221303,3.753683,3.592689,0.246103,4.632786,2.335194,1.195637,2.241129,4.168902,1.252529,4.570464,0.323699,0.446785,2.996620,2.548985,3.357525,0.217230,1.301212,3.515723,1.722008,1.523273,4.098885,3.980315,3.724955,3.138127,4.772026,0.105285,0.763215,2.299441,1.403449,1.466797,4.901481,0.221102,0.129489,4.675724,0.800450,0.214886,2.292726,4.409453,1.530324,4.661257,4.326381,1.402089,2.177196,4.618690,0.616434,0.309467,0.943598,1.128106,0.896945,0.158560,3.588295,0.809760,2.276945,0.601942,1.827591,1.987338,4.564930,3.526584,4.530711,2.445482,0.846708,2.048166,2.968392,2.706226,4.481527,2.961889,1.283154,4.762932,0.869631,2.382191,4.438253,3.549609,2.676912,3.439140,2.188967,1.984029,3.139190,3.685041,4.687301,4.182728,4.803463,0.579431,4.947367,1.001509,0.404520,3.284053,3.367436,4.869111,3.855118,1.963292,3.000527,3.047272,3.827094,2.905490,1.932203,3.407291,1.200508,1.747756,0.358156,4.081151,0.354995,1.493984,4.628165,2.797048,1.089400,4.964436,4.403647,0.340901,1.151425,3.211303,0.994016,2.685890,0.829304,3.363528,2.656181,4.847161,0.669066,2.653606,1.558619,3.063444,1.016278,4.626962,2.189609,2.158857,3.931625,4.537591,2.469869,3.856446,0.719705,1.262046,3.464952,4.633736,0.586044,0.671936,4.876136,0.456182,0.214479,2.658772,1.122057,1.488133,3.089468,1.756232,4.978271,1.141105,4.326377,4.376114,2.187932,4.986682,1.414001,0.455319,2.835975,0.037359,2.370819,4.184019,2.098535,1.019962,1.278278,4.569041,3.311064,0.806559,2.315967,3.072969,2.525702,3.925444,0.031462,1.405322,2.872954,2.694499,0.520401,0.876081,3.764794,2.673927,3.199837,4.083761,2.919133,1.569747,2.616251,0.651958,1.360386,3.275652,0.205555,0.004255,4.435362,4.821644,4.528063,1.077308,3.773289,2.282340,0.354719,3.974931,4.040874,3.609888,4.982754,4.960586,0.897102,3.977062,3.299120,3.632340,4.954503,4.183096,1.957586,4.687328,4.375827,3.531168,4.684797,2.311334,3.566281,0.020436,2.842905,3.618445,1.915059,4.339591,2.425339,1.412757,2.747225,4.527579,3.412244,4.750397,2.238096,3.292397,3.141968,1.195616,3.722878,0.339958,2.875621,0.890075,0.941718,4.899158,1.922603,2.598057,3.325569,2.491455,3.629382,0.130151,3.383508,1.621967,4.396820,0.717040,0.153217,0.304755,2.610926,1.076243,3.765888,0.277630,1.174144,4.151208,0.228206,3.938064,0.558825,4.213795,3.920211,1.093779,2.009862,2.290023,1.968883,1.055158,1.130789,3.453479,0.757786,1.409933,0.315129,1.090542,0.189043,3.491694,2.022145,1.888341,2.428191,1.306473,1.801668,2.954828,1.122619,2.309840,2.874613,0.690470,1.534850,2.761061,2.006299,3.579973,1.156609,2.353619,4.105230,0.713847,4.474640,2.236229,2.399201,3.179542,2.709168,4.116251,0.933200,0.649523,1.317423,4.989067,0.494322,2.652259,3.866904,4.162981,4.787123,4.975835,2.761281,1.203934,2.599482,3.680161,2.383339,1.361551,4.110465,4.145574,2.753239,3.007800,2.567671,3.910687,4.435391,0.010060,4.868135,1.720604,1.995637,1.838416,4.221817,3.683963,0.894554,2.040468,0.013634,4.015567,1.181402,0.415083,3.303845,1.095478,2.745038,0.806025,3.950542,4.909868,0.537460,4.207063,2.448948,0.257054,2.606538,2.409615,4.457065,1.701959,3.787461,0.661530,1.942516,2.696794,0.907612,0.988850,1.226704,3.713982,4.717455,0.635776,2.739700,0.735519,0.271279,0.197285,2.144532,2.126614,3.320962,1.949659,1.148582,0.481517,2.855789,1.086693,1.885753,0.087652,1.245210,3.255014,0.615689,3.306777,4.302104,4.346845,0.786979,2.336663,4.472818,3.649631,4.331932,1.934465,2.495063,4.475570,2.145069,3.350839,2.122954,3.540032,3.066124,2.208017,2.745110,2.990744,4.395291,3.384356,3.568772,4.849633,0.338309,0.938068,1.590611,4.730337,1.142775,2.825473,0.588806,1.353336,1.380549,3.542331,0.544145,3.784922,1.517731,3.667352,1.832806,2.132005,0.629154,0.534210,2.709209,3.185351,0.460653,0.697161,0.162214,0.812043,1.112888,3.453515,0.326073,3.437033,2.027142,0.714769,4.911646,2.521345,1.470921,0.277526,1.571608,3.062281,1.228865,2.846207,1.391391,0.222272,2.065831,1.783101,1.229451,2.644859,1.948114,4.749727,3.106146,1.790771,1.071683,3.325619,4.600644,3.135566,4.146961,3.421143,4.735908,2.036045,3.863626,2.545930,0.247457,0.066311,2.125617,3.299872,4.316363,0.163116,4.709221,4.423803,4.368086,3.213349,2.333290,4.019970,1.030871,1.461458,0.863466,4.989909,0.960906,3.503755,2.310361,0.166476,0.406318,4.647142,3.722713,2.730049,1.047324,0.031781,3.863250,1.561493,1.070203,0.861558,4.043982,3.103165,3.206504,4.627186,4.458995,3.402306,4.805135,1.144805,0.098011,4.608534,1.321640,4.865515,1.120195,1.392298,4.547249,4.063276,0.486956,2.877356,0.788758,0.358358,3.061909,0.390263,2.359475,3.072564,4.695513,4.606361,3.037287,2.513563,3.251956,4.624827,4.954702,0.165452,4.847760,4.015930,0.375024,4.000839,3.313165,4.528690,2.288986,2.516692,4.186567,2.418939,2.631840,1.221794,1.652113,1.438242,0.228316,2.915169,4.213258,3.851563,1.232928,2.931548,2.452153,4.082770,1.767400,0.182985,4.436379,3.351402,0.909292,1.028521,1.990999,2.381941,1.651501,2.578352,4.462251,3.149804,1.847646,4.302215,3.478615,2.968619,2.582591,0.439185,2.964676,1.991296,2.751645,0.620325,3.930888,2.559780,4.154653,1.034061,4.690421,2.890923,0.378429,1.568588,4.913425,3.066671,2.098735,4.578457,1.806423,3.735729,0.731325,3.485798,2.457199,2.123146,1.158046,4.937279,0.618097,1.017459,1.887057,0.655602,4.676622,4.551907,2.190964,2.462003,0.310453,4.196864,3.902438,1.966445,2.385436,3.296809,2.327895,1.365952,1.487427,2.586565,4.972655,2.449628,0.278987,4.693477,1.529854,0.199127,0.361429,0.855673,3.170782,1.839930,4.586500,3.966368,1.604184,4.930579,3.332494,0.087194,2.315441,4.551619,1.479802,4.634332,3.076816,2.915218,1.829136,4.784618,2.153081,3.171931,3.185427,3.216967,1.530214,4.323707,2.968018,1.942228,1.611372,0.568424,3.051212,3.913037,2.112329,4.578304,0.627678,2.439446,3.212129,2.848021,4.447472,3.420167,4.125166,3.310630,1.721217,1.362919,1.749807,2.040891,4.134037,3.554680,4.134212,4.625682,4.073986,4.811388,4.749307,1.604809,1.961535,2.876029,3.452731,2.323528,3.938845,3.160034,2.979351,0.726976,0.856572,1.566436,4.812375,0.381052,4.801256,2.385536,2.179806,4.234399,4.157381,0.669920,4.058722,2.553517,1.615635,0.541896,2.961139,3.901658,4.428373,4.858096,0.615943,1.983920,0.243382,3.178720,4.438348,3.436315,1.943546,3.799619,4.983065,0.005610,4.140279,1.631358,3.735332,1.185204,1.009102,4.047991,3.836941,4.056102,3.786701,0.479310,4.414392,1.888088,1.098323,2.837835,1.729324,3.549349,3.473093,4.250537,4.967793,3.997820,0.707745,3.813214,2.834498,2.815906,1.686228,0.803665,0.865260,0.287998,4.026749,3.719742,4.283643,3.520716,0.838930,3.679795,2.789260,0.543365,4.525612,4.511586,3.139321,2.098206,1.189621,0.488003,4.029997,4.833765,0.070203,2.396806,0.530179,2.092695,2.903064,2.145503,0.086117,4.939224,4.629021,3.861866,2.003404,3.447451,3.548842,1.701273,0.198433,3.111573,4.740419,3.738936,1.139937,2.779052,1.951074,2.732503,3.620297,2.433586,4.561581,3.460573,1.761594,3.061669,2.276884,3.960154,0.037248,2.927828,0.117457,4.896672,2.537663,1.393998,0.553498,1.708476,3.170396,4.864442,0.472002,1.051185,1.384717,3.830021,0.394867,4.471987,1.094935,3.590138,3.802759,4.465419,1.037695,3.616338,1.765380,1.941435,2.541560,0.655869,1.793623,4.702447,0.903144,1.575820,4.036392,1.249893,0.823952,0.952572,4.928382,2.066538,1.979837,3.785090,0.313698,0.847689,3.599401,1.598256,3.508392,0.114302,2.951798,2.721229,0.724282,0.593679,4.640771,2.525085,0.249503,0.742789,3.362764,2.383822,2.988314,2.291375,4.627575,4.126244,4.900722,4.696165,3.643489,0.262652,4.995509,2.366593,0.304985,4.957117,2.851884,2.295020,0.098947,2.142006,0.916354,3.594745,0.039335,2.665178,0.218581,3.574150,4.765097,0.216603,0.515421,2.577965,4.912311,2.057284,3.077865,3.808267,4.639600,0.885083,4.557130,3.132121,4.028035,1.477776,2.500505,1.044796,4.273021,1.022895,2.741634,2.089566,0.247948,2.060738,3.921987,2.644663,1.523984,2.227067,3.871328,3.340769,0.554516,2.656233,0.993476,4.892037,3.693127,0.405004,1.241146,0.390628,1.850482,4.113423,0.333778,0.826786,1.337226,3.120402,4.873417,4.113660,1.004633,3.550314,2.781939,2.458139,4.541929,2.940649,0.686048,0.824839,4.609867,0.401026,0.689571,3.265568,1.121687,4.130496,2.080032,2.411999,0.643191,0.140818,3.796181,0.369949,3.200795,2.687657,2.592453,1.498425,3.780143,2.003068,0.756273,0.280216,1.712740,3.040275,1.101610,3.711024,0.543629,2.359824,2.683521,4.105060,0.589738,0.008375,2.668549,0.753625,2.858467,0.164514,2.453375,1.953700,0.781237,2.339236,2.385847,0.339407,3.384539,4.568500,3.067214,3.135956,3.742015,4.680353,4.912385,2.463424,4.725039,1.796213,3.638224,4.683978,0.081164,4.602716,4.425251,1.027429,2.048568,0.614598,3.735934,3.887068,4.404710,2.207260,3.150307,4.218238,0.466892,0.595791,4.088923,2.209847,4.014347,0.000752,0.575140,1.841716,1.988286,4.168789,2.548912,4.589823,2.123489,0.334819,2.289810,2.055044,2.747286,3.199146,0.294522,3.087647,0.661368,2.159066,4.461651,0.669183,1.043798,2.115094,0.301969,1.431383,0.387346,2.385218,2.866894,3.746412,4.616197,2.188104,3.139050,0.300341,2.376569,4.350037,2.961393,1.875507,0.446231,2.492929,4.593517,0.369471,2.654357,2.131616,3.797319,0.755752,0.855976,3.580022,3.399788,2.588414,0.022790,4.278324,4.936988,3.337221,4.666140,3.789073,3.420810,1.756317,0.398298,0.160854,2.252808,2.297679,1.930926,0.149615,0.996726,0.682572,0.063693,3.095668,0.494730,0.741948,0.495566,3.823327,4.416892,0.593970,3.078325,3.098443,1.406632,2.942566,2.166409,0.538226,4.791235,3.393177,4.769798,0.755117,3.970768,2.103129,4.648431,3.434955,0.735827,0.162373,0.628111,3.563449,0.052709,2.391323,2.765267,4.061338,2.232974,0.027433,1.093911,0.237771,4.904762,3.192112,0.009600,0.192646,1.127610,3.894278,1.995096,2.526813,4.362544,4.456215,2.139191,3.800797,1.170879,0.875932,4.881471,3.191005,3.286437,4.389189,0.135172,1.429442,3.595850,2.273116,4.714345,2.252872,0.635161,4.536501,0.025584,3.793817,0.041688,2.316075,1.027733,4.758314,1.983702,0.154764,3.883972,1.582920,3.197292,2.026140,2.192570,1.318982,3.941663,2.318602,0.198087,4.723836,2.484604,2.429860,1.732253,3.175739,2.007713,3.747397,4.382913,2.448657,3.262762,1.477685,3.127014,3.176197,2.559875,0.799230,3.626549,1.598321,1.941074,4.257719,3.405625,0.413354,2.826895,0.434601,3.227282,1.973262,4.064995,3.900894,4.998542,1.495851,0.875394,0.926591,2.994595,1.672721,4.534274,0.396781,3.824084,2.448553,3.187167,2.939121,2.651293,3.491737,2.728532,4.612358,2.758388,4.598329,4.031675,4.237739,4.486437,1.012782,1.712773,4.496870,0.746074,2.450724,0.523743,0.762734,2.944446,1.980508,2.118461,2.540657,3.303640,2.496647,1.708862,0.964042,2.322366,1.877765,4.077226,0.076486,2.851989,3.092296,4.939483,4.426821,2.587836,1.442577,0.050925,1.203904,4.237177,4.866281,3.505271,3.019271,3.031171,3.249538,0.008946,1.849792,1.646394,4.889666,0.003633,3.681724,2.026435,0.323802,1.804764,0.639244,0.186800,3.417265,0.123423,0.059821,2.129920,0.652827,2.230638,1.830172,0.511387,3.198536,3.248611,3.223390,4.323150,0.033869,0.138675,2.615826,2.330078,4.952837,1.787680,1.945521,4.178532,3.115461,0.355376,0.288296,2.642759,1.983862,3.677157,3.140311,0.001533,0.084388,4.198572,0.822926,2.847978,4.702484,4.833033,4.221264,4.444616,4.525294,0.382779,4.286214,2.078661,0.213328,2.665856,0.583520,0.395572,2.337894,1.573845,4.406588,1.577954,4.112882,0.024456,4.746043,0.271645,1.314417,0.124433,4.796775,0.258426,1.745015,3.319201,1.610079,0.037434,1.202863,3.573463,1.891392,4.101427,3.694900,2.929933,0.472377,4.909997,2.603364,1.300896,3.010673,3.533899,2.337522,3.209155,0.540201,4.370328,3.403626,3.864935,0.568675,2.596513,3.462974,2.611414,0.496045,0.303296,3.080081,3.984456,4.983145,2.841087,1.147487,2.025383,0.533198,2.069353,4.200836,1.950999,0.258668,0.829557,3.348389,3.456128,0.990209,4.050708,1.404278,2.778576,1.538528,3.465585,1.878376,3.809035,2.417130,3.201351,4.630266,2.176724,2.753225,0.945589,3.467161,1.063537,3.449791,4.615917,4.706504,4.009141,2.695723,4.186093,2.288798,1.884589,3.511676,1.036621,0.371398,1.830133,1.703177,0.602621,4.272811,3.340739,0.128956,2.700798,0.769016,2.556101,3.856263,2.065268,2.984324,2.732195,2.888029,2.390586,0.835160,1.208071,4.470247,3.691032,4.914329,0.270650,1.582861,4.796438,2.196894,3.021687,2.848707,0.703447,3.655521,0.291563,2.689814,2.763189,1.009242,3.752121,4.480884,4.895340,0.134085,1.548625,4.624119,0.252527,1.360126,2.666943,3.700986,1.140282,1.501721,0.972692,2.215310,2.521730,4.496135,3.853772,3.576725,2.863349,1.642901,0.350385,1.294038,0.973436,1.139486,1.133874,2.152733,1.903574,1.685234,4.406188,1.013687,0.818268,0.380014,4.624301,0.971732,2.861340,1.868589,2.776499,3.212832,4.200385,2.536315,1.636204,0.905400,3.034085,0.660022,4.279036,0.138947,4.226499,1.096233,2.439289,3.652604,3.920834,2.008899,2.497274,0.147863,1.720130,1.307894,1.950345,1.504467,0.798699,4.708652,2.146394,3.189014,4.633806,2.862369,0.634996,3.942907,3.873320,2.023049,2.696968,2.124430,1.121222,3.814609,3.722175,3.235279,2.278202,2.324030,1.492219,1.328623,4.244857,4.296871,0.076724,3.598032,1.649611,4.596737,1.210601,1.677016,3.736680,0.370497,3.540195,3.373394,1.520108,3.563847,4.514624,4.019706,2.589212,0.662228,4.461696,2.448590,2.039388,2.738766,1.067738,1.680956,3.677528,2.817372,3.811394,3.809823,3.767897,0.720943,3.251007,2.400900,0.310455,4.175269,1.098576,0.064701,3.217184,0.860527,0.308533,4.668855,0.742393,2.600247,1.836496,0.223703,1.571769,1.752352,2.467188,3.533673,4.999890,2.592856,4.713766,2.637255,2.968412,0.695335,2.854129,1.302810,1.370242,2.169388,3.268691,3.086649,1.531378,0.143758,1.220233,2.264155,4.547577,3.051814,4.387540,2.970137,2.215837,1.642909,4.850466,2.391244,1.796233,4.538641,4.059322,2.943697,2.830321,2.486753,0.481588,3.437486,1.877668,0.085111,3.630278,0.646535,3.989583,1.297828,2.932038,2.848821,0.884351,2.195187,4.095188,4.859899,0.090825,0.733271,3.087198,0.012566,3.789950,2.915065,3.364323,3.121204,2.995069,0.512062,1.176124,2.319587,1.671952,3.915303,3.376365,1.557352,4.755446,3.221210,4.233126,4.522926,0.988166,1.988656,0.304845,0.739106,2.937331,2.585666,2.187617,3.584812,1.329533,2.072235,4.691081,2.835452,3.407167,3.727486,2.233572,2.154047,2.351022,4.310098,1.818078,4.426410,0.204584,1.264176,4.486944,4.663855,1.038375,1.085799,3.771230,1.807327,1.028279,1.136177,1.520921,4.164940,2.281888,0.635443,1.857680,1.615839,0.380509,4.116458,3.656753,2.177810,3.507714,1.693547,4.679180,2.503909,0.556015,2.375910,1.800654,0.170521,1.748549,4.881704,1.298247,3.620014,0.770699,0.846602,1.482455,0.073074,2.418227,4.849128,1.407655,3.349138,4.221406,4.697280,0.126632,4.225592,0.406998,1.566933,3.713261,1.841198,0.282578,3.716225,2.783830,2.326301,2.067784,3.140778,4.585248,2.102298,1.938070,1.806334,0.995954,4.163816,1.150808,2.772058,3.906707,0.128972,2.517571,2.011092,0.363915,4.093622,2.014931,1.863514,3.367084,2.217382,1.860421,2.812208,1.806179,3.768184,3.791426,3.775203,3.951729,2.717363,4.100338,1.342418,4.571971,2.010182,2.651079,0.831226,0.175220,0.458774,0.010891,3.853129,3.798161,2.083783,3.043169,0.750221,4.222747,3.105331,1.761831,4.281446,3.553142,2.091385,1.815607,1.007576,0.873944,2.257420,1.849879,0.306940,1.550745,0.668697,4.010421,2.391081,0.920747,0.807157,4.093163,2.783944,2.514583,2.239995,3.722511,2.751590,0.596631,0.347288,1.339367,4.866320,0.408365,2.689952,4.604296,0.384282,0.951292,3.104941,0.069157,4.631259,0.536805,0.302131,0.961149,3.051724,4.705319,2.395375,2.676350,2.215402,2.681737,1.346764,3.474634,3.549643,2.604205,4.297542,3.303984,2.467478,4.210566,2.921603,0.380012,4.013041,4.227952,0.240380,3.852079,4.904294,3.953666,1.989397,3.588647,1.460871,3.288733,2.587605,3.311137,2.069179,0.770838,2.105215,2.387046,3.389309,1.422568,3.228254,1.169187,3.824543,3.610558,0.588742,2.963275,0.440250,4.845622,1.696198,0.101306,2.518075,0.609313,3.254714,3.655030,4.296330,4.443218,1.547248,1.788799,4.872364,2.169609,2.023529,4.626803,0.936512,2.370379,2.427130,3.712641,2.177068,4.316111,3.351235,4.654838,1.310106,4.062013,0.583866,4.009650,4.243646,2.032982,3.500069,4.843512,0.924670,3.090705,0.237153,1.693018,0.705934,2.683915,3.016079,4.947029,4.834012,4.413307,2.837406,4.430314,1.774589,1.004656,2.630227,2.656046,4.550358,0.028681,4.277757,3.041177,4.698222,3.726080,1.831297,3.173996,1.848598,4.607827,0.098424,2.773951,2.536657,0.950698,2.140733,1.484460,3.352049,3.765644,3.856978,1.971760,0.956947,1.470251,2.673671,3.076513,3.974365,3.598682,0.871850,3.719955,0.575554,4.588772,3.448850,0.559567,4.182889,3.392095,3.559486,2.437144,3.023526,2.140568,2.837548,3.948956,0.998822,4.379480,1.530045,0.737833,3.172745,2.622049,1.457667,3.140854,3.571759,1.362940,0.583204,2.551526,1.414897,1.626126,2.469845,3.656002,0.074800,2.391087,0.617451,4.266139,1.298884,2.020017,0.237117,0.745714,0.008949,1.800177,4.053439,2.878892,4.199531,0.877292,3.386708,3.729288,1.720004,0.571488,3.711014,2.607353,2.348657,4.185550,2.464531,1.474877,3.742159,1.349236,1.381427,1.043674,0.516937,4.007878,3.503425,1.916066,3.624922,4.806229,2.331243,2.441427,2.645304,1.332801,1.240020,2.441924,2.503652,1.446410,2.911565,3.853957,3.447893,0.735542,3.211959,0.017091,1.963484,2.305139,3.977784,4.400469,3.590989,3.876261,4.658069,2.422736,1.398601,1.850704,2.143119,1.580766,1.518571,4.913449,4.961634,3.214640,4.048969,3.605724,3.410559,0.732541,0.683609,4.429199,0.071336,3.398819,4.023927,3.589565,0.722046,3.202520,0.617434,2.311236,3.274163,1.859350,2.586229,4.734773,1.551948,0.875050,4.537826,2.416269,2.481783,4.767813,1.339038,3.982388,2.800780,3.450089,2.353218,1.919294,0.720301,4.937501,3.636005,2.275347,2.464589,0.001269,0.148038,4.037883,0.230848,3.858563,3.566820,3.396620,2.722529,1.736641,4.862991,4.553688,2.371575,0.877100,1.172888,0.070081,4.361376,1.817069,2.429099,2.632266,3.965666,3.075649,0.346405,1.885480,2.281343,3.591180,3.920213,0.025814,2.993322,0.148725,4.177276,1.200197,1.665656,1.164707,4.338865,1.503422,3.710607,3.064843,4.313607,0.988806,2.586108,4.168351,3.052990,0.061274,1.267820,3.421738,3.057946,4.482413,4.627590,4.001578,0.918195,1.859980,4.823428,2.419130,1.669994,4.809987,3.497596,3.482213,2.061823,0.467563,4.917478,0.424004,3.329844,0.255546,0.071615,0.049692,4.712172,2.310810,3.010149,0.706604,2.438664,2.594017,0.763217,2.290133,4.432590,2.875989,0.929767,4.776607,4.464237,4.635034,3.904586,2.806798,3.878839,3.097068,0.028472,0.581411,0.547728,2.769316,3.478675,4.696763,4.506138,2.989172,2.856068,0.341573,3.856058,1.329795,4.589582,1.106028,3.481612,0.561468,2.469412,0.744904,4.213427,3.070036,4.886202,0.705123,4.280506,3.671551,1.936064,0.089511,3.679842,0.490740,4.044717,3.992470,1.078636,4.829543,3.964510,3.022950,3.674757,2.341569,0.464235,3.184651,2.081143,4.894290,0.316725,0.802560,4.501748,2.434963,0.965677,1.563334,0.381500,3.169556,4.600403,2.850990,3.209909,1.464022,3.542095,4.575848,0.231859,1.086404,4.683144,4.024866,0.351286,1.164660,1.825970,1.596454,0.256339,0.853583,1.411850,0.765668,4.137259,2.602062,1.107237,4.238624,3.803333,1.931387,4.206046,3.187243,3.117297,0.519591,2.041024,0.357072,2.004564,0.297240,0.964384,2.281905,3.090411,0.904838,0.411968,4.368603,0.417272,2.843602,3.956262,0.837703,3.231584,3.653110,3.535957,0.258549,3.207943,0.785581,1.509831,4.644069,0.261158,4.308643,2.756138,0.156616,3.769983,4.287510,2.287758,3.959196,4.552354,2.841149,4.583456,2.084875,4.059326,3.903330,3.594649,2.057230,2.341135,1.046972,1.390432,3.411301,1.627194,3.621482,3.122052,1.782318,0.838091,1.598765,1.826149,3.228911,0.309111,4.330575,3.126501,0.265888,1.257279,0.753031,2.909203,2.845082,1.821035,3.798885,0.308861,4.136849,4.442641,0.929380,4.702222,3.661826,4.467229,3.957409,0.339560,1.234467,4.254433,0.240432,3.546044,3.406727,2.220058,2.874127,1.302670,2.953296,3.440411,1.928101,0.740147,4.724772,4.947519,0.349596,0.278263,1.813387,4.697346,1.899838,1.144064,4.881095,1.167778,3.423404,0.558548,3.160705,0.724762,1.393530,2.182496,3.825084,2.775792,0.900378,3.774489,3.188621,0.096131,0.327995,0.460585,1.247532,1.383599,3.387441,3.251643,4.360016,4.076573,3.942754,2.944533,0.533163,3.438743,1.511607,3.916974,1.833434,0.672030,3.026542,4.414027,0.879291,1.472130,1.322170,3.911386,0.760897,2.201948,1.883014,3.846654,2.197063,1.244527,0.403082,2.429097,1.245085,3.427534,1.200416,2.684956,3.182848,4.503389,4.526925,3.342492,1.067130,0.301125,3.761087,1.799899,0.603387,4.176160,2.685325,4.745062,2.894372,4.756401,2.742654,0.859940,4.819850,0.449002,0.913271,4.979514,3.892984,4.204134,2.357429,1.893398,1.357586,0.269170,0.236587,1.639940,1.119385,3.333945,0.848105,4.545253,4.838633,2.374461,0.255581,0.853172,1.335875,4.379890,4.441345,4.831485,1.313228,0.879108,2.624139,1.721793,1.990657,2.261955,0.304504,1.622998,3.716065,2.393291,3.827454,3.361697,4.705794,3.451752,2.797747,0.785857,4.605529,4.983601,4.212389,0.467395,0.557112,1.824577,3.480117,4.134522,0.904076,3.126202,0.797832,0.560520,2.354861,4.305219,3.138528,3.407718,1.965831,1.334402,4.660482,2.057042,2.567023,0.361110,0.345757,3.790320,4.660030,3.183477,4.500228,3.869764,0.644327,0.333287,4.710446,0.808021,3.145781,1.178828,2.577741,2.437619,3.593646,4.102686,4.994274,1.042638,2.183317,1.880042,0.168972,1.184135,2.732244,4.384717,1.568989,3.507114,4.700489,0.896834,0.542853,4.932689,0.250129,1.405035,4.346699,1.377101,0.877654,3.909156,3.628521,0.538864,2.508960,4.467384,2.120331,1.110877,3.471932,1.139709,4.539771,2.094103,2.438927,3.472528,1.797579,4.710204,1.364540,4.828712,1.941025,3.901523,4.049947,3.105159,4.059356,2.953724,3.011737,0.703386,4.452320,0.770019,2.526829,1.591707,1.442615,0.848163,2.738959,4.222698,2.484605,1.799492,4.635554,0.669248,2.401596,3.807056,4.489616,4.638902,0.560023,2.702724,1.057628,0.885843,4.327989,1.845368,0.530318,1.091271,1.904548,3.248256,3.121134,4.622504,1.576469,1.985551,1.415378,0.582986,4.804846,0.480226,2.363869,2.850051,3.501036,1.360354,2.580349,1.938248,0.484790,0.602538,2.018408,0.017620,0.124852,0.266323,3.827010,4.446989,4.521335,0.040615,3.270929,1.432126,0.349397,0.518782,0.333665,2.751338,1.534378,0.831386,0.727381,4.197055,0.112754,2.476287,0.363707,0.729764,2.326470,1.034490,3.183473,1.894915,3.922399,3.289473,4.889575,1.785182,2.230768,3.340992,2.110408,1.195284,0.033386,1.378029,4.320983,2.947696,0.023251,3.939637,0.078058,4.765848,2.569049,4.540460,4.429629,4.426334,1.879011,0.929391,1.755955,0.671383,4.171962,2.842952,1.242912,4.099913,2.304428,0.054397,0.766484,2.108781,0.388057,3.216747,0.986632,2.970555,0.047087,0.724003,1.629656,0.438410,4.917661,1.160086,4.493426,3.431841,4.792831,4.552478,4.393306,2.888866,4.823212,0.904100,2.270961,3.905633,2.417559,4.972112,3.665741,1.031777,4.056978,4.437309,2.697086,4.952701,2.679517,3.865655,1.620143,1.194150,3.918802,0.964853,1.419649,1.841077,3.122536,1.711181,1.604626,2.215322,2.248910,0.104834,1.582382,2.348313,1.177444,2.385021,2.846443,4.197592,3.873732,1.283142,0.643617,0.006485,1.993095,4.276825,0.806964,1.433598,2.716014,2.969091,2.736131,0.012681,3.853584,4.501512,1.263894,0.666081,3.842329,3.650163,3.965244,4.594720,0.221204,2.685166,3.945369,2.506170,2.760711,2.833116,0.051948,4.521443,1.053938,0.127290,3.167195,2.800870,0.638796,4.991473,1.957475,1.329971,0.505985,2.672686,0.821378,0.728377,3.637541,0.334303,3.565759,0.348226,1.971568,0.624693,4.923294,1.181228,1.822311,1.056656,2.719420,4.611342,2.413293,3.710666,1.774443,1.411946,0.492996,4.849494,1.892561,4.368065,3.098482,3.391063,2.286333,1.636228,2.368450,3.831901,4.560472,2.476456,2.654313,3.662291,4.796732,3.289112,4.250241,2.020591,0.897434,3.523574,1.225321,4.429171,0.393618,2.379667,2.181941,4.311771,4.843932,4.768131,0.274649,4.953831,3.339833,1.261431,1.885220,4.443488,4.580263,0.609447,0.716577,0.220978,1.969232,1.725678,3.363574,0.808225,3.984889,2.900740,0.555042,4.484263,4.247134,3.770496,2.398707,3.051897,0.988875,3.798994,3.469724,3.994559,4.689481,4.444340,4.477021,2.149958,3.942992,4.847893,1.330396,3.826010,1.215591,1.426578,2.138413,2.210800,3.504001,0.523701,4.208128,0.680637,0.127883,2.015979,3.875301,1.742118,4.251441,3.316850,3.544496,2.584592,2.946953,0.818978,4.437494,2.128797,2.194471,3.392361,4.441969,3.720224,2.206739,2.311888,1.391778,0.291960,4.698423,0.498114,1.352629,4.737242,2.888875,4.265349,3.475624,0.232017,0.749104,0.587690,2.406417,4.082048,3.590922,1.035696,2.084032,3.491493,4.471934,4.580621,2.523166,2.081006,3.258632,3.312762,4.866410,2.490274,2.688071,2.295904,3.585350,1.676182,0.178311,2.780779,1.406441,3.740018,0.858821,4.225524,3.804549,1.882974,0.861246,4.275899,1.708481,0.520754,2.540535,0.201599,0.803984,0.662032,2.494800,1.641182,3.623379,0.540886,1.528310,1.493489,3.736447,4.398873,2.463574,2.808386,3.984488,4.356048,3.818650,1.294983,0.364842,1.054597,3.097832,2.744435,2.539124,0.365909,2.054348,0.130946,3.266951,1.229352,3.535249,2.661239,0.270870,0.696069,4.558888,4.378924,4.078771,2.855764,1.800946,4.793820,4.547204,0.085137,0.605331,2.715246,3.452626,2.324193,0.910334,2.101403,1.026809,4.021004,2.711114,2.044263,0.708331,2.572191,2.831952,3.265524,3.527775,0.209139,1.888986,1.860188,0.852458,1.611090,0.220689,2.310716,2.569096,2.446015,0.709920,0.529325,3.795822,3.744378,1.484822,3.400140,4.707575,4.195120,1.477093,0.666152,0.256139,2.518642,2.287682,3.755692,3.841770,0.349894,4.857158,1.289571,1.870512,2.881435,0.191413,3.564421,0.960999,4.584995,1.233692,2.066538,1.121626,3.230495,1.886514,1.195876,4.219607,3.514726,2.358243,1.429677,4.361466,2.096919,2.326984,0.959965,4.169602,2.749525,3.284489,2.094086,0.096887,1.502559,0.103361,0.149643,4.925642,0.473734,2.254984,4.193597,2.107752,1.243762,2.070008,4.119444,0.224457,2.443889,0.967530,0.301347,3.927772,0.072413,2.074790,2.727514,0.864419,4.497283,2.043403,0.910519,3.055898,3.197243,1.943357,0.157342,3.308230,1.188833,0.749628,4.104686,2.521207,2.239649,3.774211,2.353446,3.059199,2.031203,4.437611,2.827828,4.512555,4.494148,3.792854,2.740256,3.271098,1.110424,4.595637,4.298680,3.935716,0.127405,0.972636,4.583487,4.045270,4.230798,2.022848,1.281874,4.453489,1.864777,1.494353,1.504312,4.412162,0.884650,4.164787,2.387839,1.305719,2.921156,1.394957,2.574443,3.068379,2.915119,4.081186,3.093834,1.103198,1.474466,2.010889,3.847437,4.520912,0.122662,4.967091,2.457310,0.658720,2.827208,2.292667,0.246608,2.888121,4.657856,2.363153,1.146013,3.354702,1.338127,4.575955,2.385228,3.922772,0.245688,3.662444,0.739881,1.088589,4.306542,0.619626,1.473554,1.849536,4.550053,0.714448,3.084675,1.014539,1.444045,2.225300,2.736133,0.876868,2.977610,3.036222,2.042676,1.003601,1.669636,0.490183,3.724189,0.073087,1.658954,4.621703,0.937597,2.617578,0.746225,4.748842,4.102897,1.563127,3.759729,2.836761,1.108261,0.671936,1.246224,3.144953,4.773875,3.884376,4.517304,0.970392,4.572947,0.423410,4.720934,0.706078,1.807649,1.727777,1.649285,3.683077,4.197360,2.852367,2.730375,1.306540,4.516625,2.823887,2.056561,2.797496,0.522333,0.557171,4.636426,1.092779,1.351406,2.786211,2.434310,2.778664,1.827146,2.026076,0.843994,2.485086,2.114781,4.700419,0.648936,3.078702,4.832630,0.489809,3.605593,4.327580,1.661165,2.846817,0.448151,1.685283,1.244157,3.426840,0.278439,2.416145,2.769229,4.656273,4.605611,0.032965,2.905155,1.998941,2.681281,3.248000,1.371884,3.805754,4.602598,4.443930,3.776714,2.622283,2.425963,3.724993,3.863651,0.060597,0.189139,2.387800,4.331782,1.075032,0.717884,4.665811,4.455562,1.343371,4.201425,3.785051,4.976955,0.816872,4.486968,0.284902,3.365323,3.345789,4.578470,1.139378,0.858162,2.567557,4.762859,1.394330,3.983325,1.599711,1.275609,3.420529,3.857030,0.065317,2.918004,2.654516,1.945036,3.926589,1.779604,2.720140,2.139291,2.240258,2.428088,0.780905,4.017294,1.452962,2.581479,1.365341,4.296417,4.158435,4.753099,1.821321,4.434768,4.294287,2.869022,0.737872,3.520743,4.723939,4.096525,0.382655,0.112617,2.303180,4.565044,3.611814,4.996928,3.136493,4.411150,4.060125,2.693045,0.452253,0.654165,4.077410,1.846869,3.013205,1.458558,4.457646,4.579982,4.778527,4.643184,2.820085,3.009399,4.811238,1.863173,3.154185,2.198591,1.723609,4.647211,2.848221,2.325531,0.270644,0.777444,2.703717,4.973092,2.297182,3.125958,4.258462,4.591986,1.830650,0.817969,4.856515,2.637448,4.428896,1.492531,0.443317,4.392011,2.082817,2.202888,4.917693,2.044213,2.868398,3.686456,1.125992,1.348490,3.694127,4.035724,1.002982,1.543696,0.043606,1.924164,4.505575,2.006702,3.795075,0.286935,2.939474,4.770220,4.921920,2.892019,0.071595,4.199478,3.673576,0.123406,3.783309,3.597492,0.482964,2.681886,2.744380,4.474275,2.215611,2.795788,2.754732,2.596880,4.265792,4.733147,4.574610,0.982258,4.339999,1.588774,0.064058,2.665621,0.471366,2.496541,3.698877,4.228875,1.614067,4.194019,0.285651,3.078107,1.747849,2.743760,0.959739,1.156176,4.181929,3.987969,4.271634,2.391940,3.310658,2.290958,1.245621,0.030989,4.599034,3.485517,3.909159,0.370568,4.414552,0.733673,4.215205,3.823601,3.694091,3.435988,1.012509,3.288955,0.542952,4.298087,1.001854,2.198027,4.530222,3.977137,0.190611,2.442531,2.625731,4.176416,2.984826,0.329622,2.098654,3.301002,4.940172,1.920422,4.922966,2.744304,2.318770,2.077170,2.896697,2.142683,1.917378,4.890845,2.472542,3.900943,2.531492,1.159658,4.741840,4.406535,0.709667,4.424912,0.985070,2.843067,4.655076,2.822466,1.058143,1.324770,3.392854,3.735198,2.958761,1.407129,0.933854,3.273233,1.146656,0.813895,0.655706,3.694223,3.559558,4.637373,1.308563,2.947273,4.598081,1.117528,2.269845,4.829088,4.774412,2.557931,2.243344,4.724134,2.997283,1.234707,2.586633,2.862765,2.761459,2.028396,0.732102,4.340281,0.561640,0.697341,0.746241,0.197053,4.288659,4.458542,0.612818,2.307844,1.965923,0.630769,4.321963,4.320337,3.704092,0.832829,1.318148,0.961521,4.162343,2.338093,0.752231,0.050476,1.392553,4.870653,0.158454,4.557258,0.289702,3.358851,1.748485,2.277492,1.105694,1.692629,1.540531,3.544501,4.356268,2.046583,4.081106,0.057746,3.938488,2.629769,4.168645,1.120203,1.883714,3.488543,4.242102,2.391583,4.231800,2.741597,4.956855,4.523556,1.928140,4.777413,3.826709,2.627514,4.955216,3.474917,0.973034,0.570184,1.310579,3.677511,2.752234,1.985757,3.792148,0.118937,4.067875,3.741340,0.901014,1.945116,0.188001,0.058939,4.981339,2.440983,1.860124,0.980860,4.035961,3.528764,0.007781,3.856133,0.557414,4.743163,1.663680,2.255514,0.024905,4.121963,1.540841,2.782234,4.633004,0.781112,4.336648,2.501195,4.622281,4.111775,2.214900,0.443559,0.150987,4.371154,2.371425,3.318475,4.408242,1.523295,4.478815,0.137662,1.399628,4.058832,4.266102,4.724177,1.515056,3.901178,4.925652,2.635030,1.262981,0.194812,3.798265,0.694227,1.934713,1.546389,2.084253,4.529995,2.129739,4.563722,4.027004,1.441892,1.590445,1.849221,3.028236,3.370313,4.861149,4.632580,3.059359,0.231194,2.726538,2.018201,2.723894,0.200882,4.978811,0.284792,1.363400,0.360620,2.738056,1.759091,1.876499,3.945838,4.520101,0.828485,1.394885,2.363643,0.564408,1.932690,1.510440,4.609882,0.992671,3.606057,1.079466,3.128292,2.909954,2.293621,4.084537,1.113586,2.386401,4.912088,0.916309,2.727162,1.465529,0.619030,4.257965,2.888394,2.894146,2.726674,0.922341,2.843166,0.456945,3.413209,0.257286,0.945756,1.471089,1.394656,4.060511,1.438753,0.369790,0.339913,0.747068,1.970960,0.984071,1.175112,0.919878,1.493677,2.524294,4.856735,3.959952,0.862604,4.014253,3.550465,4.528992,2.173534,4.335493,3.490451,1.365463,1.948881,4.192393,4.038561,1.227530,4.181369,4.728785,4.388847,1.906440,2.705809,4.229803,3.582002,3.545525,1.426257,3.054009,0.272306,1.485737,1.013944,1.935073,3.691148,1.302706,0.894575,4.210178,4.575490,2.231083,1.222489,1.261830,2.080899,4.012215,2.807408,2.886680,4.890787,0.388376,2.375067,2.397011,2.769870,0.839701,0.844611,2.077243,3.031086,1.514013,2.487596,4.933786,0.152155,2.329336,2.369523,3.459032,1.332001,3.999670,2.004967,0.475812,3.150302,0.131966,3.584011,0.060701,2.983351,4.354460,3.492042,3.121719,2.158956,1.680978,1.851478,1.875132,2.649418,0.716650,4.409410,3.129378,1.872181,4.911061,4.362638,3.034081,1.858744,1.845469,0.333534,1.712605,1.228421,3.042756,3.600817,1.462124,2.730737,3.935398,3.209519,3.718307,1.090398,3.175249,1.368922,1.153753,1.354686,1.832628,2.354702,1.146307,1.749817,4.482484,0.673135,1.078620,0.303463,3.544406,2.647054,2.371602,0.172076,4.806713,4.220387,4.101871,4.376087,3.885126,0.697188,4.857462,4.668592,3.480386,1.460053,0.005556,2.429309,2.974017,4.969907,0.664575,0.444100,2.131592,3.754781,1.700352,3.311801,4.447192,3.965810,0.507979,2.230377,0.189963,0.843192,3.853555,0.870466,2.794070,3.074892,0.783182,4.574111,0.292509,4.596173,0.568997,4.504350,1.839455,3.949204,1.971188,3.665782,4.261954,2.627194,2.010698,1.973163,0.282959,0.074079,3.717851,2.076997,0.755464,4.357685,3.188859,2.372522,1.784925,1.723732,1.857101,4.432772,1.893021,0.096582,0.724668,1.731041,0.831761,4.114907,4.993658,1.670815,2.425932,0.238091,0.972321,1.145303,1.937415,4.132083,1.996051,3.707143,2.642949,3.318246,0.986119,0.194059,1.233352,0.506163,3.513341,2.846128,3.968442,2.012982,1.302461,4.305204,2.827653,2.364494,4.456719,1.739063,2.044511,1.287223,0.663538,2.854480,4.606711,3.244012,3.319302,4.292119,3.500605,1.879702,4.016626,0.619987,4.357345,2.545709,2.729107,4.613378,3.413399,0.390842,1.264530,3.553833,0.465605,1.306484,1.318435,3.538543,0.258116,1.724906,2.131865,0.366464,2.292008,2.657039,4.854093,4.367591,4.652766,1.353650,0.750836,3.192462,1.007624,2.932410,0.978624,0.325720,2.244621,3.182249,0.470673,2.748590,2.184174,1.276209,0.859389,1.171630,4.483058,0.159352,0.737423,2.590849,3.413205,2.051598,1.201789,1.371737,3.246993,3.564509,4.851428,3.517539,2.109577,1.227698,2.673194,3.632831,0.582960,0.299046,1.120791,2.096237,3.335872,0.045718,2.692781,1.454373,1.675078,2.166150,2.300124,2.008903,0.436965,0.795719,2.466797,1.932784,4.983508,3.848098,2.914256,2.739175,0.249980,3.383658,2.827151,2.579501,3.832223,3.914952,1.083453,0.923246,3.298333,1.654012,2.273896,0.221887,2.114695,4.709245,3.438343,4.097027,3.137624,2.925542,4.854275,2.448569,3.951510,1.157055,0.509806,0.906635,1.711521,2.303414,4.446935,2.963128,3.213050,1.924745,3.348100,2.020580,3.040346,2.679050,1.539533,0.418012,0.613020,2.874528,0.365557,2.265278,4.495305,2.913195,4.883315,1.439404,3.249567,4.673774,1.747021,2.667903,4.235892,1.656673,0.044768,4.951128,2.030613,0.547375,3.680137,1.625297,0.842284,0.592453,3.487868,4.966311,1.959573,3.818693,3.271202,2.104808,0.244670,2.047145,0.146328,4.761208,2.046941,2.896201,4.703674,2.880123,0.861645,4.758068,0.939699,0.640731,1.812257,2.174254,4.886863,2.770275,4.029203,3.844919,2.011131,0.373246,0.598656,4.963586,4.299726,1.728591,4.163901,4.499337,4.616975,4.376030,0.931100,3.967325,0.278176,4.032635,2.884543,3.674681,2.748528,2.987595,0.185107,0.157279,4.060653,1.455282,4.036071,3.517521,2.824738,0.524805,0.330212,1.919907,4.626259,1.131317,2.111204,3.208439,2.483509,0.125480,3.476433,4.592038,2.998471,2.902063,4.176491,4.164192,0.933783,2.111496,4.096349,3.674170,4.221940,0.647217,2.197335,3.544766,3.650806,0.359025,3.559702,3.131142,1.744565,1.520543,0.145047,1.959949,1.534976,2.157507,3.543728,0.727410,2.399812,3.964266,1.243173,4.318422,4.664797,0.564198,0.578502,3.226010,2.585950,4.517888,4.009760,2.509463,0.343453,0.494352,2.242455,1.522858,4.715647,3.329229,1.352653,1.784793,0.403914,1.248440,1.593857,3.209742,0.862769,3.385918,0.588247,4.470631,3.132183,2.887363,0.936358,3.704353,1.180261,3.990216,3.894773,4.696979,3.913466,1.824726,2.553261,3.134345,1.337590,4.000258,1.645490,0.650680,0.297607,3.300047,1.323557,4.257878,3.862159,0.576040,2.776406,4.836869,4.146155,4.361198,1.313783,3.627392,1.699408,4.140313,0.513261,3.425570,3.224522,1.306591,3.160807,4.554405 \ No newline at end of file diff --git a/arpack/src/test/resources/geB.mat b/arpack/src/test/resources/geB.mat new file mode 100644 index 00000000..c58fe294 --- /dev/null +++ b/arpack/src/test/resources/geB.mat @@ -0,0 +1 @@ +3.075829,0.920215,1.530812,1.757792,1.555847,3.422037,4.750014,2.519551,3.951285,4.721925,1.872222,0.231393,3.766508,3.674952,1.516258,1.345649,3.516641,0.782026,4.217241,4.303145,2.831742,1.094025,4.745015,1.176408,1.545005,2.209160,2.603650,2.277587,0.001035,4.310982,0.118693,4.407753,4.114089,4.683496,1.569817,0.898535,0.271433,3.438713,0.782794,0.839157,1.151965,1.393095,1.067983,3.037086,2.555580,3.253433,3.210241,4.275779,0.183633,2.788558,1.929708,3.946323,1.142774,3.044759,1.347967,1.173356,1.639185,0.317879,3.731931,4.406550,0.084926,3.262212,2.814503,4.526970,3.426801,2.092925,2.890980,0.636072,0.810751,1.119185,2.415450,1.334121,0.502722,2.592542,3.489149,0.482195,3.644764,0.118341,3.494703,4.765426,2.283834,0.329454,1.413410,0.737569,2.504683,0.904017,4.981908,2.097829,1.936706,0.320820,2.992951,0.621517,1.308707,1.495696,0.490580,4.150069,0.552645,2.415025,1.445313,1.182723,1.116479,3.349322,3.968988,2.044567,1.592642,3.655178,1.345821,4.352304,1.469388,0.256263,2.351713,1.499527,2.329769,1.460132,4.935073,4.872680,3.087676,4.532801,1.564680,3.939464,3.825263,1.776573,3.607359,0.468087,1.162906,1.049509,3.128857,1.008811,1.417786,1.361797,4.716747,4.739999,4.158233,2.257610,2.450330,1.872886,2.304148,0.707519,1.354922,0.925507,4.404531,3.449866,0.666674,2.152048,1.628213,0.074714,3.697138,2.201049,1.808299,0.910756,2.441446,1.358195,2.538882,1.251967,1.463226,2.125815,3.054557,4.212815,1.393273,1.636871,3.223375,4.974227,1.153830,1.103868,4.101527,3.990348,1.645059,0.073750,2.147590,2.717418,3.800772,3.304735,3.360633,4.016903,3.874359,2.366270,0.524063,4.071678,3.008870,0.165067,3.942455,1.966697,1.570564,2.575242,3.357802,4.624232,0.130089,1.523358,0.202225,4.215657,3.517689,1.352851,3.846921,3.166899,3.300653,3.752149,0.804886,3.002299,2.588215,1.702393,3.653119,2.171201,2.350340,1.046172,3.694770,0.053002,2.486163,2.688224,1.337923,0.842617,1.739806,0.529340,3.605915,2.905666,0.208845,4.769149,3.858811,4.871949,3.213851,4.710569,4.015770,1.543322,3.770739,0.608033,2.531747,4.543861,2.623102,4.733560,1.908855,2.620768,2.847477,4.802488,3.538408,2.974076,0.328545,1.115284,0.616819,2.555792,4.954087,4.187772,2.444176,2.571967,0.206545,4.176446,1.909155,0.138259,4.621481,2.199384,3.372858,2.700237,3.948270,4.811896,3.104828,0.584596,2.941110,0.158539,1.724206,0.369940,1.428552,4.493644,1.059235,3.912550,1.981957,1.846033,4.221970,2.063323,4.912035,0.994245,4.397451,1.355436,2.776574,0.599137,0.234364,1.863837,0.896418,2.441016,1.214960,0.194369,3.591466,1.669001,0.861510,4.739868,2.442796,2.814792,4.811118,0.590772,0.911347,3.551024,2.803941,2.076359,0.560775,2.919800,2.207227,3.355331,1.502109,2.012550,1.540082,1.004660,2.540070,4.145694,0.172161,2.426895,3.760507,3.170272,4.965128,0.286194,0.808711,1.598399,0.031136,2.597331,3.203173,2.093682,2.086701,4.386394,3.059510,1.317512,1.598230,1.004123,1.323215,3.350811,3.188820,1.308233,2.698659,4.303158,1.341897,0.124481,1.380431,4.703615,0.102562,0.607763,0.868621,3.531543,4.893432,2.941546,0.442490,2.289983,3.915352,0.895444,1.479202,3.337873,1.589173,3.644290,3.975737,4.153910,2.756336,1.893975,3.092315,0.931355,1.022826,4.093522,4.086389,2.034313,2.337031,2.148766,2.261919,1.138956,1.091442,4.163896,3.335410,4.878894,0.801124,4.617227,3.827887,2.637874,3.266259,4.188134,2.638138,3.236912,4.883850,3.601481,0.392371,3.584022,4.869380,1.953647,0.217141,3.636628,1.545730,4.589628,0.912694,1.883343,0.118385,2.193512,0.950019,2.985462,3.730933,1.399199,0.668656,0.598718,1.273684,4.142107,2.165346,0.964821,1.418186,1.749623,1.019784,2.697641,2.847384,3.897904,3.477573,1.229021,0.787531,4.519399,4.128175,0.037199,0.117135,2.444137,4.191700,4.626696,0.969803,4.046730,2.080040,3.259858,1.577711,0.629859,3.537727,1.540347,0.148616,4.833965,2.143976,0.496539,4.062133,4.243022,1.506750,3.413825,0.601183,1.935404,1.107585,1.227917,4.823929,0.173379,2.753662,3.182017,1.669243,1.215069,3.981985,0.855072,3.252699,4.998971,4.189009,2.118588,3.408506,2.942346,3.260548,1.557177,2.524934,0.382243,1.159934,1.998697,0.783629,0.797439,0.891374,2.757598,2.262099,3.110307,4.904938,3.034905,1.126328,1.327035,0.987164,3.884156,2.483999,0.567985,4.368588,1.978487,3.048051,4.873086,2.918009,2.540404,4.539169,4.477362,2.279188,3.412821,3.389036,1.482270,0.816425,2.843969,0.180378,4.114471,3.803135,3.544162,4.640774,4.789952,2.336082,3.374087,4.872877,4.267262,3.270687,2.197458,3.712733,0.292441,0.115907,3.768086,0.647619,4.059428,1.972334,4.757597,0.319922,2.514432,1.349031,0.505431,2.705715,0.031428,1.051103,2.259024,1.730843,4.315854,1.429502,1.610667,4.553730,0.857326,3.122900,1.979370,0.325698,3.984570,4.990543,2.112280,2.991496,4.185531,3.928694,2.525262,1.420949,1.259295,4.346273,0.383753,2.951622,2.445663,2.458582,4.024404,0.760212,4.942612,1.572908,4.130097,0.833382,3.797002,3.378242,3.975354,4.995713,3.416875,2.578876,3.493327,3.792165,2.302115,1.144348,1.090405,0.109379,3.792475,1.747783,3.792958,0.651148,3.361084,0.215132,2.968788,0.128900,3.486822,3.959861,2.061967,1.780561,1.160579,4.269403,2.337225,3.780966,3.099278,0.728940,0.850710,1.311195,4.290845,1.619700,4.444700,3.148847,3.541560,1.402402,0.240964,2.269459,3.203055,1.676150,4.763622,3.193984,4.968320,4.006459,2.551404,0.821625,3.249670,0.756127,2.028524,2.467923,2.473374,1.239116,0.114985,2.766429,2.258744,0.319078,2.588017,0.575002,4.959124,3.700300,1.819176,4.198649,0.510917,4.388904,3.294368,0.408047,2.187231,2.983794,3.118664,3.685033,3.295568,3.218442,4.102231,0.102795,4.798566,2.151306,1.421983,2.448088,4.701484,4.594520,4.088595,1.116290,1.429858,4.145092,3.261052,1.229695,4.345607,4.520672,3.174576,4.923153,2.757673,4.290719,1.516111,4.760337,1.810732,0.497748,0.775671,3.167260,3.785924,0.273630,2.347563,3.921035,2.634921,2.094352,0.884714,0.568197,1.665232,1.424745,1.838640,0.380914,1.130096,2.576583,4.958065,2.078815,2.065460,1.420610,2.788605,4.299349,3.346928,4.993418,4.726382,4.216793,0.208763,3.773843,3.079418,3.729073,4.887271,1.102374,1.806905,2.762946,1.680434,4.323124,2.712687,0.026266,4.555013,2.610959,3.430174,2.543606,3.070553,4.904975,2.208982,3.489842,4.297146,0.522541,2.906700,2.292862,4.960874,4.684867,0.931019,0.488025,2.268192,0.095759,2.484817,3.692213,4.416334,4.816191,4.584390,4.569724,1.674365,1.932933,4.071070,2.335731,0.752807,2.271343,1.849599,0.426611,1.752065,4.796103,4.632371,4.845690,2.858414,0.529475,1.134942,0.931827,0.943268,4.441714,1.020089,1.894827,0.465335,0.182540,4.739254,3.812076,2.174469,0.844084,4.902019,2.170816,2.722770,0.377119,1.397717,1.311670,0.695120,4.470922,0.969096,0.154013,4.929299,4.697868,3.614732,4.207205,0.781199,0.399887,4.321088,1.792424,1.613881,3.443475,3.785203,3.068429,0.476439,1.826363,0.065789,0.487297,3.641852,1.363023,0.798102,4.902278,4.101774,3.410733,1.627977,0.838915,4.080514,4.632697,4.318470,1.263110,0.445923,2.520989,3.865608,4.908215,4.579359,0.159990,0.110352,3.158620,0.639011,3.036897,0.047018,3.708507,1.935760,3.789404,3.463606,2.388200,2.543164,0.451025,3.241801,3.203775,4.079160,0.245845,0.938868,3.314792,2.758663,2.074356,0.134826,4.170098,1.450639,1.823945,2.277655,2.724635,1.204705,2.493556,4.626904,1.008522,2.752821,4.865551,2.398834,4.525603,0.189901,2.619587,0.014373,1.354938,4.583164,2.077235,2.315192,2.015369,3.697346,1.990870,2.554979,0.317136,3.566478,2.671607,4.867841,4.355635,1.727228,1.862288,3.301391,2.292233,2.773057,4.854831,0.453288,2.973928,3.387950,1.096854,2.930474,3.874748,1.427539,4.885055,0.651328,2.369636,3.644355,2.200954,2.572454,2.374079,0.268065,1.607412,0.414567,3.801576,2.387948,2.035808,3.804645,3.285596,2.066368,0.669490,2.412986,0.962185,2.097422,4.403759,1.379438,2.168542,0.157403,4.470150,0.397665,3.172317,4.857129,4.565571,0.154792,1.351036,0.538530,2.027552,2.263712,0.836001,3.872690,1.744690,1.995828,1.486114,1.432749,2.099950,2.051240,2.575852,3.544496,0.558856,0.465110,0.777152,0.480886,0.813153,0.156175,4.135156,4.005483,0.119119,1.625000,3.132469,0.766111,0.858270,0.336670,0.787449,3.235623,3.148735,1.335188,1.290308,2.078116,2.393838,4.587950,3.387457,1.599877,3.827761,2.213284,2.947008,3.281490,1.625651,2.503144,0.505317,4.235222,4.762083,4.509193,0.223768,4.264368,4.210370,0.653345,3.604789,0.269247,4.059304,4.010136,4.838243,2.169734,2.484503,2.155539,2.551872,4.076830,4.341866,0.076822,3.341184,3.120973,3.059353,3.747956,3.665006,0.537034,3.551475,4.145559,0.061318,1.598635,1.000796,0.093975,4.343428,2.688094,3.684679,1.088011,0.623288,0.779391,4.229570,1.292284,3.088326,1.772305,2.201978,4.275869,3.671407,1.678327,4.486002,1.578977,3.751244,3.949162,1.803721,2.622464,2.297160,3.122623,3.649290,4.560704,2.919279,4.511797,4.964570,2.728671,1.260600,3.212567,3.645954,3.241378,0.278544,0.943222,1.192918,1.225109,4.695536,3.340074,1.160968,0.827815,0.241622,1.415060,1.683534,1.403477,3.599096,2.834944,0.516513,3.246805,1.552710,3.706800,2.444846,0.704481,0.914717,2.757375,1.422418,1.910353,3.927836,2.779925,4.386301,3.440192,0.769072,0.497757,3.216607,2.677825,3.671484,2.772750,4.938161,4.908209,1.360796,3.959348,3.830578,4.202307,2.101694,4.639007,1.883881,3.566622,3.011890,1.819736,1.139416,3.426768,4.511659,1.992491,0.482343,1.403038,2.003268,2.035288,3.188375,0.575751,0.563032,0.867716,0.828666,0.878797,0.026126,1.371016,2.828456,4.960959,2.055339,4.230278,1.047357,4.698849,0.085101,0.135666,1.810344,4.376577,2.834622,0.175673,4.201752,0.810906,1.879990,0.427002,4.656046,0.031187,4.392283,0.841810,1.011289,1.103577,0.711733,0.715484,4.357948,2.085418,1.813383,1.227318,4.524552,2.924976,1.726165,0.988385,4.564596,1.024052,0.326645,3.152679,1.385472,0.889461,3.025456,2.281860,0.785351,2.872282,3.336158,3.468883,1.260719,2.594274,1.687569,4.633369,2.406108,2.852766,2.656933,4.990066,4.479693,4.937037,1.201938,2.411830,2.264035,3.507460,3.612926,2.091780,2.633444,2.328259,3.827980,2.472052,3.390175,4.115642,3.391400,1.820858,2.392215,2.331173,4.796346,2.178713,4.567919,4.548205,3.732735,1.010246,2.125745,3.225188,1.283924,0.802041,2.411218,2.999158,3.236722,3.057671,1.457077,1.740993,1.914601,1.022676,1.034661,2.292846,0.641974,0.549845,2.527450,0.238186,2.012367,3.743415,4.871285,2.499384,1.285699,3.139772,0.724706,4.652490,3.775219,0.753293,0.488363,4.631417,4.780268,1.256714,0.859329,3.448070,4.968510,1.288831,1.804301,1.799352,2.327122,1.312000,2.794533,4.158194,2.001805,1.400875,4.672445,2.748730,1.163516,1.735718,2.504713,0.444667,0.169162,3.553522,3.710018,2.351856,4.321581,2.942031,3.786813,4.679913,3.951818,1.552743,0.594857,0.198853,1.952740,0.037265,3.689525,2.258838,3.661150,2.488721,0.074471,4.360631,4.602662,3.005298,3.495831,0.303353,3.478583,0.420002,1.603939,1.492654,4.207151,2.314483,0.313619,1.210999,2.221804,4.737461,1.206611,3.876993,0.874713,3.211680,1.127921,3.859935,2.712602,4.462967,0.533907,0.946418,3.831239,1.679836,0.347380,3.515442,0.678601,0.595969,2.514245,2.059952,0.869984,3.352834,2.077440,3.425801,1.914095,4.129313,2.870366,4.059150,3.130113,1.808450,1.938747,4.037230,0.146134,0.865719,3.147686,3.717109,4.261776,3.855055,4.907416,4.599283,2.104708,3.942544,1.480100,4.643712,4.985817,3.672894,1.672738,4.814978,0.204749,2.050008,2.550174,2.573134,1.124379,2.011186,3.555740,3.887913,3.591601,0.083775,3.377745,1.205890,3.228562,1.900396,2.867503,1.123691,3.386913,4.513132,1.672952,0.318308,4.697065,2.745226,4.158894,4.731007,4.374350,2.601888,4.886553,2.188749,1.248643,4.341144,4.410106,0.296918,3.683919,1.675665,4.300488,1.214660,2.901513,0.651237,4.416650,0.680062,3.239565,1.127867,3.783196,0.920970,3.791425,2.529951,3.543431,2.603039,2.782711,3.022161,1.141719,2.878740,1.319197,1.497299,2.495117,1.141278,3.094901,1.497840,0.930207,4.493600,2.179112,4.714638,2.073600,0.052940,0.996090,4.176752,1.800931,4.231885,1.941045,1.483619,4.003634,0.361443,4.379758,2.099332,1.643551,1.099603,2.972037,4.739730,1.762095,1.153343,1.238260,0.455159,1.183574,3.221000,3.567245,2.083019,4.718216,0.834817,3.578547,2.025727,1.196880,0.973243,0.838065,4.889277,1.947123,3.040691,2.161848,4.054819,3.792935,0.233694,3.206853,4.844106,4.252125,1.478371,3.054676,2.251824,2.922876,2.808841,3.666141,1.604095,2.161609,2.895513,0.040443,1.358301,2.430738,0.902538,3.595365,0.526124,3.614258,4.111076,3.427964,4.586319,3.558388,1.105941,4.110047,1.216400,4.157692,2.944260,2.563266,2.894917,1.967979,1.352352,2.301968,0.690283,3.098191,2.734296,3.365392,3.191333,4.619802,2.585734,0.062380,4.401659,0.604879,3.645972,0.987120,0.616498,4.773728,0.178554,0.150997,2.241692,2.928513,0.883050,3.623390,4.696011,2.492402,0.608809,4.217405,4.714546,4.164112,2.823452,4.198730,1.884418,2.498380,0.406512,1.620776,4.578257,4.267262,2.970783,4.526828,2.134639,4.688054,4.729354,2.849839,0.251016,4.423310,4.556942,4.715268,2.360098,1.456466,0.437565,4.396674,3.615101,4.009028,3.845332,4.086827,0.554948,1.691390,4.070852,3.671381,3.833782,3.798054,0.334600,4.130368,0.429563,4.112027,1.585441,1.060621,0.979530,0.386132,2.491315,3.923012,3.252206,4.960217,3.855134,3.641447,2.056606,0.604046,1.898792,4.298250,1.679234,0.612582,2.656775,3.037238,0.591568,3.831553,2.539515,2.935688,0.192014,1.078951,2.202344,0.520443,3.649393,1.083890,1.806399,0.166972,1.265508,4.245271,2.667584,3.660650,1.037938,0.980890,2.919133,0.960009,0.988615,0.496104,3.797794,0.440903,4.444884,4.352768,0.806309,4.836971,1.704639,4.444984,0.361373,0.718855,2.206979,0.238360,1.347568,2.994183,0.658145,0.622340,2.005933,0.515602,3.264206,3.952128,2.369196,0.326522,3.061536,1.199172,1.900174,0.963898,3.202384,4.094630,4.292715,3.859043,2.733037,2.779124,1.015016,0.075975,2.796250,3.488272,1.980113,3.214622,1.624976,1.764548,1.896340,4.231832,1.017757,4.839369,1.301376,2.453378,1.283494,2.387155,1.996332,1.873896,1.497570,0.109864,4.037890,2.255004,1.298803,0.941172,0.789541,4.745137,2.983474,1.312113,1.306249,4.967372,3.223418,0.816246,3.984175,2.184550,3.344527,2.938898,0.713279,0.616244,3.776547,1.198279,3.564000,0.115280,4.879407,2.502451,2.143559,3.974908,2.050782,3.435797,0.120237,4.588290,2.740781,3.643147,4.708740,2.101554,0.521562,0.168701,2.366068,2.876501,1.759345,2.440032,0.633799,0.809456,4.517640,0.885167,2.686369,1.640872,4.745640,0.487770,1.151088,1.496138,1.806206,0.482274,0.773361,4.327923,2.403950,0.799688,4.585893,3.617939,1.270055,4.382664,3.689760,4.973432,0.394200,3.097453,1.301496,0.762859,1.449818,3.634059,3.143583,1.568580,0.523209,0.619085,3.051045,2.375408,1.854397,0.483743,2.466762,1.323550,4.368029,3.470007,2.087165,4.597568,2.795249,4.145722,2.966873,4.716247,0.444131,3.890005,0.207252,0.536427,4.040641,3.630768,2.973939,4.582183,1.977020,0.027282,0.358271,3.620093,1.296853,2.925791,2.198109,1.160688,3.717346,0.152270,3.433016,3.745832,0.417574,1.397517,4.619796,2.317518,2.916284,3.869173,4.276560,0.514982,2.663556,1.032187,3.468852,4.721209,0.234218,3.228438,3.208562,2.073545,3.135724,1.949361,4.934990,2.399358,4.124496,4.648535,3.706026,3.375389,3.519365,0.646376,1.360936,2.287280,2.119495,0.813759,1.614118,3.574456,0.269999,3.165030,1.827697,4.677249,1.448991,4.844719,4.263646,1.054032,4.485361,1.553377,2.211560,2.169322,0.816075,2.554401,0.260429,4.846001,2.108273,4.168938,1.537730,1.435635,3.020014,3.860453,1.642115,3.681942,0.528917,0.367684,0.448613,1.411791,2.607433,1.499436,1.502649,2.514246,0.208863,4.158942,2.843751,0.590259,4.887878,1.440462,1.162748,4.337340,3.743651,2.466474,4.390397,2.316448,0.132208,3.609113,1.318354,1.616518,4.648922,3.109558,3.819055,2.667904,2.952424,3.833628,4.731425,3.549385,0.140694,1.784971,3.868047,0.166864,4.399792,3.362817,1.185738,2.181970,0.145353,0.352598,2.751347,1.134687,0.894797,4.732053,3.264702,0.216428,1.481330,0.914765,4.791044,1.531208,3.043550,2.599086,4.535554,0.025077,1.629947,0.871908,3.908850,1.945301,4.184943,2.640863,4.750033,2.212530,1.750676,3.682488,0.916648,3.203424,0.297764,3.627862,3.870931,0.660183,4.417428,0.454079,3.726703,4.574578,3.225597,2.835699,3.599274,1.107914,1.509447,4.167587,0.452480,2.936695,4.427393,0.410074,0.850082,0.517484,0.532679,4.012089,3.128278,1.118453,2.153888,2.883673,3.492770,1.792938,1.798188,1.958945,0.812820,0.209814,3.100869,2.300392,1.414831,2.242110,0.474519,1.930010,3.089294,4.655705,2.491443,1.227758,2.223911,1.074828,4.540111,4.653897,0.261840,3.737064,2.196055,4.127900,2.951257,1.562524,0.127675,4.400793,2.973227,1.490352,0.573596,2.774872,3.506257,3.105476,0.082711,4.451710,2.175650,0.361027,3.556113,2.361777,1.927035,2.760120,1.633828,1.191576,4.538362,4.022857,1.664782,1.451601,3.779015,3.861311,0.030426,4.255968,2.235095,0.483744,3.103567,1.603926,4.645427,4.018978,0.839726,3.867941,1.266310,1.438017,4.919151,0.574724,3.723037,3.725090,1.047048,4.411657,0.445522,3.584315,0.001704,3.554410,3.092752,1.894638,3.250316,3.331978,3.061171,1.007819,1.539457,4.372385,4.177582,1.682519,4.942260,4.734557,3.561257,1.029579,1.157091,2.385553,0.374192,4.490359,2.041118,1.785204,2.266722,4.614634,4.554786,1.282387,2.745349,2.163342,0.229592,2.622879,3.837776,3.864161,3.669764,1.017057,0.366042,0.845239,0.049575,3.778932,1.022831,2.177197,0.463057,2.691870,2.042212,1.365656,4.750134,1.552084,3.348362,4.818889,3.489932,3.436936,3.916947,3.249688,2.045775,1.169948,4.783375,3.228654,0.034865,1.879938,0.205960,4.286360,1.103817,2.695536,1.003143,3.191882,3.259411,3.823839,2.628999,4.162765,3.809594,2.583794,4.261829,0.613554,0.701233,4.949411,0.653937,3.153422,3.195062,1.935388,2.178259,2.585092,2.383595,3.152134,0.317611,1.147785,2.834367,2.813124,1.207737,0.464828,1.047757,2.648248,1.910568,1.479080,0.242158,0.263180,4.063362,2.748975,4.666971,1.228561,0.694192,0.150275,2.967484,2.967722,1.076062,2.043020,0.598666,0.737342,3.155728,1.577575,1.511001,3.000356,1.233398,0.080157,1.527563,4.370014,4.378674,4.593216,0.966391,3.349228,2.461023,1.315843,3.218489,3.050105,0.724193,3.804857,4.553206,1.544943,0.495856,1.817488,4.245601,2.311350,3.819611,2.926852,4.878801,2.785450,3.913450,1.923528,2.245473,1.351398,1.268281,2.765143,3.356035,0.178888,0.195704,0.139216,2.666002,2.916119,2.745601,2.420028,2.802560,1.505013,4.571923,4.254688,2.503890,3.057799,3.048818,1.204211,0.797112,4.449728,1.956976,4.543769,3.467145,3.658154,0.913380,4.438593,3.969769,0.292404,4.497926,2.726975,3.482916,4.132127,1.151640,1.716355,4.033710,1.856077,3.269729,4.093949,3.874047,3.023562,4.621733,1.489255,2.142966,3.863439,3.809464,3.298041,0.627934,2.892310,4.829505,1.319614,0.344864,0.073837,3.017183,0.260732,4.625544,4.420920,4.506044,3.241224,0.155130,2.809218,0.387605,0.410705,0.278439,0.607221,2.644178,2.834372,3.884378,3.916206,1.491104,2.223161,2.542824,0.026330,4.386452,2.489809,2.895596,1.159362,3.880196,1.807051,3.421659,2.579065,4.221442,2.658391,4.218077,1.648893,1.750431,3.542386,3.457782,0.555968,1.544898,0.643496,1.166324,1.860353,4.901400,1.856094,2.235600,0.381996,1.856233,1.513249,1.829872,0.592647,3.284498,0.388375,3.481284,1.179696,3.484141,2.242527,4.802163,1.949044,4.089567,4.695862,0.186708,2.998234,1.299310,1.171177,2.557444,4.703994,0.309623,4.795683,4.032965,4.501040,0.251785,1.503671,0.611139,2.007736,0.867759,0.345685,3.234835,2.669978,4.409770,0.780203,1.739384,2.913624,0.404848,4.461266,4.829622,2.690918,4.139555,2.458420,0.478333,2.009604,2.627751,3.661661,0.676394,2.201153,3.478259,3.164438,0.420184,1.682184,0.239245,0.748086,1.045131,2.075917,2.504204,4.114403,3.888507,2.499822,1.547279,0.664430,4.416867,2.281402,3.092345,3.477416,3.724686,4.117052,2.452845,2.166241,3.764546,1.806750,0.272935,4.079726,3.265901,2.295528,4.901469,3.380985,0.669624,1.753869,2.674973,3.961906,4.261765,2.956545,0.386423,1.874800,1.690280,4.400925,0.767690,1.317639,0.236421,2.329491,0.807210,4.882624,2.157164,4.529543,1.013021,2.857924,3.705445,3.973972,3.327626,4.995099,3.581461,3.058804,4.373967,3.591089,0.651556,3.845049,0.753352,0.743369,1.452300,3.732892,2.921558,1.730248,4.004824,0.470219,1.486195,4.241257,1.812028,1.631287,2.675651,4.542907,4.810448,0.396393,4.742349,4.803876,1.746855,0.090393,1.764067,3.852301,0.612588,1.223637,0.598033,0.170820,4.188253,2.984098,4.383579,0.616882,3.400234,2.875227,4.188956,2.401808,1.437401,2.540912,2.385881,3.430618,4.720789,1.833058,2.854024,1.776024,2.788900,4.563009,1.647654,4.661910,3.843361,3.633414,4.028778,2.719651,1.028530,4.948450,1.416358,1.416108,2.638052,2.056052,0.434193,2.292553,1.698119,4.573383,4.470749,3.028164,3.563576,2.940429,1.155103,3.782382,1.358158,1.828146,4.214526,1.825240,0.240744,0.118909,3.656188,0.226308,4.978565,4.963993,2.097965,1.237900,4.037981,3.651348,4.700213,1.086213,4.738669,2.992911,2.763920,3.121446,1.354880,1.854875,4.421833,3.291607,4.321075,1.434865,0.366853,0.675783,1.291591,2.471260,0.958772,3.392922,3.890833,3.565376,3.639172,2.850926,3.722364,4.423892,3.195202,4.716959,2.799737,3.337378,2.379572,2.755012,3.772623,4.991698,0.238010,2.734144,2.046900,4.647256,0.774581,4.118574,0.652094,3.864287,4.463741,3.732553,4.747227,3.001572,1.404818,4.337122,3.748622,4.192174,2.645344,4.211442,0.575875,4.598181,1.129607,3.927644,0.004912,4.648667,4.758047,4.680659,2.743681,0.885669,0.376173,3.111269,2.666999,2.361374,0.511611,4.372936,3.639144,4.372149,1.950886,3.081703,2.397111,4.915993,1.949910,4.078017,2.948906,1.573203,2.058978,1.761665,3.824835,3.332551,0.581142,3.869435,2.306740,1.632599,1.869454,0.650420,1.561579,0.866207,2.288032,2.639564,4.950098,3.844486,2.644469,1.871641,0.795035,1.896488,2.722900,0.889048,4.499570,3.195586,2.025166,3.971281,0.672745,4.188923,0.094615,1.975421,2.793970,0.839631,3.349074,4.805544,0.404589,0.046179,3.541309,3.966780,2.081385,1.729671,1.758175,4.192692,0.289010,3.980948,0.708483,4.104001,2.707323,4.179615,0.730037,0.723432,1.075488,2.587629,2.215153,1.308003,1.400085,3.830445,0.389364,4.490950,1.971835,3.765013,0.773054,3.944201,1.271773,0.012333,3.885669,2.951493,3.357282,2.993131,1.161592,1.645523,0.037070,4.560410,2.194329,0.840402,0.002118,3.925938,1.718709,1.422153,2.657486,2.462802,3.094413,0.021062,1.824327,4.872911,1.036025,1.640765,0.570327,2.502002,2.003361,2.021917,2.107642,3.510473,2.259566,1.302904,2.465583,4.728445,2.355836,0.695058,4.117257,4.587394,1.702451,0.110348,4.028530,1.625506,2.738700,3.923189,2.383992,1.461992,4.283134,4.615406,3.584709,0.060485,0.215711,2.888618,3.879011,0.707177,4.512598,4.585090,3.960986,3.242517,1.836633,0.463227,4.694793,1.421651,0.914516,4.740143,2.984859,4.774512,4.147748,1.454905,3.329660,3.038837,1.987377,2.710318,2.639500,0.324114,0.897811,2.727837,0.217516,4.050686,1.961761,0.378067,4.206815,0.342971,0.842650,3.833319,4.668295,0.172955,0.302489,2.413137,2.099417,4.817037,2.237147,3.551537,1.751992,0.921328,3.447830,2.276322,2.846217,4.023276,1.767194,2.462596,2.534269,0.341429,3.437563,2.219389,2.995819,4.434779,1.311161,3.368437,2.787900,2.705355,4.682423,1.795444,0.341650,1.711394,0.030677,4.113102,4.944672,4.063953,3.969063,3.226125,2.877568,2.838948,2.026617,0.866509,3.264254,0.125888,1.158789,0.021193,2.495872,1.782184,2.135595,2.866710,0.380250,1.313954,1.150081,4.431642,3.706197,0.929468,4.191747,2.463636,4.062289,3.657923,1.808309,3.008791,2.997642,4.600340,0.480835,4.197712,1.968133,0.702981,1.430672,0.871382,0.446103,1.307782,2.223734,3.565116,4.764352,0.940627,0.452980,1.979320,3.681680,4.127143,1.009305,1.661838,0.445188,1.842550,1.624866,2.776486,3.509134,2.241429,0.006595,3.689839,1.007466,3.255958,4.453670,2.045589,0.154319,4.661451,1.463160,3.642642,1.712034,4.208075,3.260311,1.465084,0.682712,0.816817,3.888480,0.506499,0.728905,2.956465,0.632528,0.267040,0.970146,1.458083,2.006932,3.472470,3.790043,3.135828,2.604133,0.322722,2.277759,0.530920,4.158319,1.462799,2.018377,0.291579,2.110854,3.224336,2.484530,4.116329,1.987680,4.746442,4.139760,3.935649,0.767110,1.202283,1.748328,0.902651,0.373666,0.129227,2.062689,0.189182,0.874572,4.606132,2.492726,0.516731,4.432611,0.928389,2.475076,4.214342,4.940038,0.632454,3.491891,0.385331,2.903403,3.855475,1.687594,3.034103,1.617719,1.553172,1.662268,3.242983,3.089612,4.564037,4.096979,2.904095,3.080385,2.762748,3.388346,2.122395,4.825000,0.061759,0.766101,0.933800,0.737797,2.956544,0.092981,0.509885,0.642505,4.030384,4.212976,3.304523,1.961886,3.709838,4.251957,1.860172,3.370828,3.468241,1.899150,0.177958,2.412905,1.913505,4.552969,0.367226,4.925847,3.449731,4.564273,1.068515,3.299636,0.957703,3.796248,0.144880,2.100687,1.506905,3.867664,4.588577,0.115178,4.197672,0.770588,3.297484,3.279259,3.374320,3.464290,4.608832,1.559886,2.185534,3.058361,2.489942,2.176155,4.472902,4.016147,2.546219,1.581104,3.676624,4.238129,1.539834,4.623627,2.117335,1.605702,3.069497,0.705384,4.556203,3.956667,0.604923,4.584500,4.382892,3.143410,4.671864,3.867576,3.447794,4.402457,1.478583,1.479075,0.406823,3.844668,4.428098,3.471883,4.319044,4.343309,2.275220,3.590203,1.884757,1.419829,4.810685,2.110084,4.294660,3.013716,1.737628,1.890810,4.203513,0.997125,2.287143,0.324733,1.289827,0.682034,1.713617,3.578167,1.884377,2.294836,2.367952,3.021235,0.811022,0.413708,4.734558,1.441373,3.808199,2.669562,3.422322,0.230072,3.404947,4.219286,3.815870,2.735328,0.185391,2.467077,1.355333,2.808952,2.893283,1.978918,3.765784,1.744369,1.148102,3.135352,0.471196,1.560515,2.003219,0.378195,0.458797,2.724167,3.561413,4.501321,4.444904,1.958161,3.088218,0.561600,0.444719,1.305160,3.337909,0.591715,1.635733,4.979687,1.241428,3.793640,0.297491,3.563435,2.092461,3.287793,0.102868,3.821305,0.821702,1.254088,3.572536,3.038280,1.271953,4.218572,0.282756,1.038619,0.895604,0.217236,2.993152,4.882849,4.461944,3.305349,1.206844,3.786163,4.636489,3.367882,3.776916,3.964111,3.151041,2.360849,2.616242,4.641389,4.891420,4.209313,1.785163,2.731853,0.346109,1.188845,4.284136,0.246968,3.069992,2.892243,0.124431,0.681041,2.951313,2.686960,0.151874,2.580222,0.108727,1.455322,1.226075,0.376434,3.368531,2.144828,1.236763,1.344105,4.552119,2.750880,1.268514,2.564701,1.893578,4.476734,1.135947,0.825635,4.486919,1.044872,0.011321,2.493932,4.495811,0.892663,4.170658,4.767841,4.301012,3.893205,1.455075,1.710630,0.785394,2.563898,4.138157,2.483122,4.116790,2.399931,1.742377,0.635509,0.063935,1.765462,4.110278,1.729924,4.094876,3.450333,2.196611,0.213257,3.547611,2.838376,2.325463,4.880643,3.741968,1.725009,1.703023,3.073449,0.774426,2.707043,2.788732,3.295384,4.258264,3.297552,4.518264,0.105764,3.028979,0.155168,4.203866,0.634715,2.462641,0.536573,3.214962,2.743859,0.199736,3.753887,2.658665,2.264369,4.468459,3.922241,4.358252,1.021123,2.454677,1.844230,1.592442,1.509492,1.413556,3.040584,2.750090,0.307753,1.558626,1.756804,0.567634,2.786727,3.575219,0.680059,1.218550,2.438131,0.877313,4.448909,1.488626,3.791177,2.589664,2.995532,3.523904,0.901258,2.657858,1.264198,0.545615,4.246686,1.649256,3.839503,3.615294,2.975722,3.055725,2.579347,2.011998,0.116612,2.970597,2.735414,3.601160,1.226265,2.283047,3.649737,4.252771,2.619008,3.065694,1.389178,2.268608,2.480872,0.714830,0.345794,0.929049,4.172307,2.397890,0.593662,4.788416,0.682532,2.903848,2.696833,1.049978,0.667817,4.603996,0.616566,1.470410,2.775966,3.508168,1.433490,0.185980,3.123909,2.713779,0.288442,2.772783,1.636026,4.052043,1.773120,2.810205,2.598924,4.709860,2.966189,3.254098,2.129968,0.678445,2.352317,3.615572,2.550756,3.022746,3.987102,0.041393,2.767143,3.588804,4.849009,4.234230,3.883802,1.649936,2.464245,3.192468,4.748474,4.969678,3.959201,3.024698,4.979205,4.181634,2.579620,2.652463,1.601895,1.672653,3.981462,1.001410,2.480745,3.307386,4.332354,3.432471,1.129632,1.832517,1.186386,2.302619,0.174114,2.259595,0.543039,3.030563,4.076930,4.320459,4.679651,4.871386,0.228186,4.512719,2.707400,4.055878,2.132324,0.564237,2.560431,2.621800,2.178518,0.606657,0.178657,0.182700,0.562708,0.140716,3.440118,4.686193,1.056256,4.391898,2.621344,0.378502,4.367382,2.360911,4.797873,0.035765,1.691176,1.023370,0.085456,1.689338,2.483509,2.617633,3.898062,1.604487,0.244786,3.187351,4.543093,2.936313,1.183952,1.328228,1.794106,4.354834,4.141129,0.417257,0.722695,3.449286,3.364282,4.400072,2.306694,2.829088,4.370372,1.422621,3.721692,1.216576,0.359456,2.251970,0.092967,3.678369,1.239770,4.492458,0.124439,1.936449,2.059489,4.946670,1.983389,3.444197,0.069012,2.693335,2.080084,1.238278,2.465128,4.430323,4.379707,3.352218,1.763327,3.872333,3.868054,4.454154,4.531654,1.532626,2.714634,2.887558,1.003044,4.733992,3.486069,3.814484,2.322705,4.330668,4.329517,0.343084,4.217684,4.251013,4.126951,1.944877,2.912485,2.773314,3.752275,4.912304,0.304251,3.947846,2.089156,1.875900,2.966587,1.030051,4.346839,0.263661,0.516774,4.069170,3.453369,3.657194,1.901525,3.565390,1.533283,3.909949,0.676259,4.636828,4.301580,0.005088,1.936521,1.373575,3.885680,0.903628,1.390077,0.329315,1.308136,0.963994,4.649903,4.034866,4.696390,1.329679,1.052251,2.848992,3.182027,4.671586,3.108150,1.234664,2.314019,1.909434,0.537279,1.741327,2.822408,2.416099,0.796204,1.089897,4.710687,0.951135,2.643277,4.840735,3.804053,3.747166,3.646316,4.776272,4.569839,2.198778,0.927971,1.105164,4.639203,4.957149,4.928726,1.483929,0.259599,2.950114,4.403531,3.617829,2.710598,1.320237,0.055025,3.279686,3.556389,1.062315,3.859676,1.998140,4.453286,3.784288,0.485116,2.780055,0.815021,2.829397,2.856589,1.466429,3.006414,0.633410,4.078682,4.012361,3.348919,0.672668,3.301032,1.876299,2.714188,2.092898,3.680182,0.202065,0.821017,2.160229,3.005176,0.107709,3.858799,1.018775,0.374372,3.481313,0.828125,0.340571,0.302742,2.791798,2.585188,2.597201,2.945685,3.532929,2.037872,2.023436,2.230596,4.388498,3.901437,3.780031,1.259365,0.252013,0.108601,3.348190,4.951243,3.729055,1.732338,0.336434,2.380695,3.204419,2.292245,4.053653,0.950707,4.436740,3.415142,4.883718,1.529274,3.915617,1.654396,2.614724,1.435983,0.516383,0.614503,1.830987,0.074981,4.682488,2.623839,1.900335,4.704483,3.668552,1.558455,2.970157,2.776374,2.046441,0.028923,4.306895,2.785126,0.561374,1.152757,1.665560,1.620365,1.243756,0.004865,0.294995,2.848655,2.746570,3.553345,3.016380,0.940520,2.702832,3.806999,0.089604,2.865776,3.415224,0.337061,1.573634,0.891916,2.862052,4.126202,4.191489,0.809998,3.443102,3.157177,1.153802,1.198747,2.978362,0.484835,1.429635,3.330438,0.354457,4.884002,3.674821,2.993718,2.712419,3.174283,3.949195,0.632844,2.561346,0.316795,3.641004,2.932339,3.280219,4.718267,2.245218,1.597585,1.901050,4.531007,2.880982,4.905066,4.775073,2.990775,1.818957,4.513543,2.233176,3.583089,2.361926,0.450220,4.536187,0.373268,2.535582,3.139826,4.781851,0.848771,1.464108,2.327391,4.282035,0.056232,3.855040,2.832783,4.384424,0.736707,4.262945,3.996940,3.900754,4.747861,2.364568,1.908267,3.167333,0.527299,3.384066,1.695114,2.107045,1.088369,4.386594,0.542121,0.051243,4.824074,2.166372,3.038268,4.761537,2.393525,3.144956,4.078144,4.699222,3.765919,0.512281,1.602975,1.249334,0.155364,4.269614,0.371304,0.681491,4.597270,2.308000,4.249426,4.498548,0.453169,1.475009,3.955415,0.976544,2.133152,4.959531,2.059914,2.151230,2.048495,4.377997,2.675146,4.087957,4.599635,1.834619,1.790886,0.466379,2.055323,4.827922,1.659421,1.600273,2.178385,4.431402,2.609629,2.209905,0.135687,1.302434,2.819658,1.305920,0.269087,0.535151,1.776625,3.254386,4.868521,4.382332,3.977588,0.125823,0.536350,3.462509,2.626026,3.759341,1.421077,2.492215,1.357346,1.364651,3.546299,1.014299,0.682778,0.381722,4.417507,4.247989,4.205198,2.645205,0.259026,1.344918,0.714141,0.844975,4.713435,3.970405,1.843008,1.015124,4.635089,3.042701,4.583773,3.561227,0.945548,1.338397,1.548915,2.204474,0.930205,0.877226,0.350580,0.996630,1.871581,3.711296,3.120414,2.017677,3.555992,1.129122,1.694889,2.740109,2.463442,3.915357,1.139341,4.321489,4.078608,2.000048,4.369202,3.177576,2.752606,2.935491,2.572436,3.237256,2.173577,2.268409,1.140347,2.559801,1.519515,1.781807,0.519242,2.867250,4.895406,1.350613,4.429143,0.100325,2.175201,4.304443,1.510673,0.846738,3.294251,4.748234,3.141517,0.451538,3.745454,0.029675,2.709315,4.245618,2.148784,1.098045,4.384715,0.773090,1.990433,2.302528,0.157339,2.625487,3.015462,2.078590,0.175525,0.551528,1.961355,2.120057,4.566978,1.862401,3.622308,3.076822,0.192308,2.300743,3.362728,1.549336,3.680120,4.674364,1.352243,2.938420,0.069980,3.165050,2.556168,1.903877,4.520137,4.704881,1.695058,2.661194,0.447480,2.661164,4.398601,1.002916,0.240733,1.961915,0.998469,1.434215,4.628930,4.374606,1.662541,4.507802,4.201143,4.900933,2.634339,2.609546,4.721356,4.408671,4.782932,1.738530,2.197150,3.972713,3.137482,0.263698,4.433041,2.648089,2.004976,3.789931,0.512722,2.405442,2.827655,1.465439,3.915761,4.689790,3.155412,3.272331,4.623479,2.590938,0.639072,4.213411,4.720198,1.163003,1.031430,2.661603,1.495588,4.248769,2.292231,1.171765,0.003166,0.514679,1.786995,4.410424,1.851857,0.675104,4.718389,3.428864,2.081369,3.522307,4.532186,0.884699,2.777556,3.706792,4.896298,1.045381,2.289899,0.687573,2.857387,2.577060,3.399518,2.587573,1.136250,2.214183,0.857374,1.055751,1.602914,4.257126,2.425508,0.075356,4.772927,0.629560,4.427163,2.784420,3.113326,3.399999,2.011455,1.822709,0.171945,4.802169,4.755352,2.306995,2.535766,1.681117,0.938573,0.417838,4.697045,0.104544,2.561481,3.403367,4.544192,3.536267,1.947541,0.235492,0.273572,3.821744,4.710701,3.974253,2.241948,1.696783,0.937056,2.712735,2.142540,3.422929,4.147272,0.443423,1.241374,0.537287,1.146989,0.990988,0.297844,0.292198,0.656486,2.429573,1.429524,4.369328,0.229274,1.872227,2.529325,3.988554,4.669316,4.649673,4.252534,3.343745,1.742310,1.305660,4.285774,2.847123,1.503836,3.466413,4.356383,2.120549,4.960333,2.777178,4.463122,2.438360,1.705762,0.811586,1.870223,2.706291,4.029137,0.525619,3.161109,3.910803,3.169497,3.488591,3.996762,4.397293,0.365701,3.106768,0.700391,1.083687,0.248548,0.204551,0.241570,1.958602,0.365330,4.102196,4.525545,1.504732,1.623931,1.959245,2.223716,4.807704,1.284104,0.670516,0.111952,0.207528,4.195915,1.561740,2.422808,2.480275,2.055026,0.753769,3.411894,2.536449,0.869340,3.755578,3.971925,1.123734,0.451448,4.084427,2.570423,1.319747,0.983717,0.269071,1.582126,1.277956,0.834428,2.221023,2.864172,0.291979,3.155089,4.484042,1.615084,1.207576,0.529183,1.859377,3.388634,0.577990,3.915073,3.385918,1.938995,0.873849,2.019066,2.455799,0.707652,1.440777,0.033602,0.038239,3.466207,2.883245,3.671698,1.545770,3.004355,3.588537,0.508854,3.619407,2.756604,0.833672,2.019875,0.216047,1.236370,4.573646,4.587738,3.987756,0.113453,3.916157,1.302490,2.170740,3.115953,2.243692,0.203076,4.619941,0.162105,1.161307,1.913349,4.698815,2.401907,1.092888,3.936985,3.044911,4.038020,0.964144,1.683528,2.474575,2.640831,1.267963,3.654362,0.223151,3.789089,2.557301,4.489938,2.150452,0.126572,3.236838,0.377707,0.637862,4.967666,3.396686,3.300379,1.676407,2.709212,1.920460,2.228013,1.142946,2.487727,0.172006,3.614238,3.548366,4.029215,0.312819,2.692038,1.408500,0.839637,1.272816,1.931568,1.587287,1.780408,0.553507,4.797060,2.986690,0.030428,4.370891,1.014962,0.808011,2.500787,0.009044,4.171407,0.433114,1.156473,1.674888,1.698448,3.608688,0.700599,4.480269,0.775156,3.385956,4.908951,3.695676,3.815217,1.630828,2.971416,0.085421,3.309265,2.966349,3.081388,4.134720,2.470876,4.696059,2.671688,1.408302,0.159173,3.878112,0.630510,3.902961,3.083341,2.371591,2.402293,0.463290,1.113904,3.214236,4.365491,1.186013,0.423885,0.745174,1.248793,0.162119,1.270054,1.550790,3.229415,4.017756,2.285464,1.665157,1.963746,3.065748,0.048751,1.522386,2.755564,4.244111,0.375339,4.695750,1.314607,2.396565,0.544693,3.932600,3.919630,4.611882,3.064039,4.635121,4.114930,2.074875,4.567463,1.458326,2.229192,4.114397,3.073784,1.655949,4.473488,0.037001,4.255448,1.247300,4.919149,0.203680,0.734759,1.353694,0.659123,1.507770,2.918737,0.639341,3.521032,2.200686,3.346347,2.001705,2.711226,0.849300,4.097774,3.611560,1.121786,1.162236,1.145212,0.750898,2.764868,0.955310,2.212228,0.776322,2.889503,0.319120,4.105848,1.711984,0.500757,2.493026,4.499449,2.610814,3.091339,3.692764,0.162449,4.093689,0.266187,0.516704,0.492026,4.798885,2.657763,0.006464,4.575771,4.798861,4.854402,1.961371,1.604175,3.330552,1.591523,2.792571,0.502064,1.421181,4.559163,0.102807,2.517714,0.890576,4.250422,2.620917,4.810754,2.593735,1.452136,0.629130,0.061848,2.362897,2.933033,0.799801,1.689047,1.903257,1.759164,2.977851,2.617756,2.505488,1.338424,4.012588,4.889803,3.837833,0.478315,4.887652,3.353698,0.419817,4.845338,3.087130,0.124515,1.122682,2.596412,4.718003,0.252943,2.264145,0.452670,2.068826,0.681826,4.138498,1.545968,3.831614,0.566316,4.804493,2.804117,1.184936,4.010823,2.886761,1.213734,3.305921,3.164700,4.808243,3.592669,3.320128,1.559146,3.881365,0.435296,0.585631,0.903589,3.034645,0.956434,0.000832,2.914290,1.419348,3.194121,2.399804,4.316399,0.117752,2.835070,2.370655,3.375601,2.845924,4.793098,1.257927,3.366228,3.966954,2.623745,1.402847,1.757926,2.273530,0.542605,1.593767,0.348542,2.256252,1.192186,2.837911,4.328526,0.991863,1.903724,0.659277,2.434056,2.341118,2.395420,4.939868,0.116740,1.748398,3.274996,0.972528,3.584536,0.638611,2.250367,3.343061,0.583067,4.591940,1.769524,4.392303,3.644238,0.871033,4.631225,1.576059,2.449884,3.594211,4.643305,1.577487,4.375485,0.730439,4.409117,4.009102,1.639670,1.441834,3.757875,1.617879,3.730195,3.291654,2.989005,1.411431,3.216646,2.592474,0.136755,4.559607,2.442619,4.389332,0.084334,3.917706,4.770037,1.688418,3.022779,0.009520,1.822500,1.849924,4.551399,1.680015,3.845397,4.416877,4.467529,2.173366,4.819684,4.867668,4.124355,4.464465,0.422637,2.154239,1.926185,0.996383,1.628676,1.291254,3.194502,1.560650,1.492210,0.856012,1.234446,2.979944,3.167373,2.115329,3.491334,0.826602,2.766361,3.335660,3.178438,2.627500,0.613503,0.338881,1.644346,2.109619,1.011198,1.229457,0.007691,0.823538,0.230778,2.462535,3.544356,4.008426,3.229595,1.335382,1.951521,2.475545,1.469557,2.934030,2.467841,3.972403,4.509665,1.911333,4.388927,2.688839,1.316633,4.389546,4.637151,4.515435,2.227713,2.693540,0.781402,4.689474,0.178000,4.118781,1.016092,1.567326,3.571467,0.330383,3.870330,0.264475,4.142949,2.509636,4.590174,2.791856,1.092240,1.176653,2.340394,4.960264,1.820802,4.059448,2.876663,4.692332,3.752263,0.090469,0.487090,0.847553,2.442436,4.109590,4.327810,2.623073,3.068920,1.147076,0.399452,0.347010,0.529893,1.556044,1.820274,4.322121,4.659551,0.780639,3.582139,2.832213,2.820614,2.651106,0.442574,0.812678,1.704661,2.053741,0.101911,0.184657,0.468570,0.328284,4.663364,1.095762,4.803038,0.365473,4.148524,2.951648,1.998830,2.555671,4.966958,0.738238,2.252955,4.949604,3.221013,4.952371,0.565006,0.761020,1.423056,3.156506,1.556071,3.146767,0.252885,1.113830,2.211174,2.364015,2.277183,2.664771,2.088777,4.517094,4.031505,2.114712,4.110790,3.922520,2.685950,2.834706,2.396369,2.751693,2.550372,1.380528,1.697322,4.871888,4.863179,0.372452,4.202395,4.223698,3.289382,4.557591,4.690168,1.790203,4.666115,1.935850,2.096938,2.715362,4.508270,1.587786,3.319944,2.009669,3.294275,4.167980,1.643766,1.183671,4.399228,1.985185,3.486682,2.977539,4.061332,0.254886,0.604605,2.260111,0.896893,2.510272,1.614741,3.597723,3.937684,3.464584,1.240242,1.509389,0.223388,4.073882,2.526185,1.495890,3.379029,4.795526,0.412707,3.740195,2.178326,1.596343,2.179988,1.008929,0.964066,1.591731,4.487341,0.272873,1.506320,1.238576,3.006399,1.035373,0.053403,0.769270,1.809668,4.017345,4.234592,3.232994,2.069247,3.257779,0.976284,3.955354,2.216412,4.827373,1.290554,3.197203,4.267695,1.231504,0.110048,2.185130,2.559368,1.080205,4.022759,3.644770,2.826745,4.916018,2.830752,2.069355,0.755858,4.842150,2.255021,1.672757,3.849769,4.010191,0.458241,0.436678,0.442892,0.167087,2.808362,0.919499,3.342230,4.240147,2.633358,4.146056,1.834287,3.956396,4.167909,1.178526,4.951195,3.620832,0.248498,0.822266,4.180902,3.055302,2.203958,2.698042,1.426765,2.877112,0.117772,4.822246,4.999810,1.134952,1.786269,1.642010,1.239204,0.547875,3.444690,1.671411,0.977492,2.662150,1.870584,0.533560,1.930689,3.562383,2.904927,2.315689,4.718230,3.711982,4.722333,4.013030,0.770262,1.034351,0.330396,1.983772,2.469690,4.948803,4.520096,1.062701,1.992701,2.573405,2.863758,1.185166,1.442729,3.078730,1.688396,3.598606,1.491765,1.052105,2.688249,0.530024,4.673576,1.113784,2.308084,3.578301,3.021788,1.456470,4.679412,2.281587,3.406531,0.725286,1.311479,0.816922,3.065566,0.395236,2.111550,2.040772,0.912019,0.907836,1.641349,2.588216,3.065527,3.539093,4.053478,2.008178,2.061269,2.784942,3.995224,2.873013,0.776705,0.710812,0.386079,0.014654,3.754411,0.776060,0.252979,3.515930,2.034132,3.876119,3.283906,2.140892,4.922741,0.479566,0.243763,1.655460,4.816509,0.066547,0.300738,4.505294,4.446759,4.146224,3.433403,4.629085,3.248321,1.651804,4.619588,0.683281,3.929826,0.058869,1.842875,4.892724,0.574653,3.166642,4.478026,1.245243,0.996255,3.919192,0.839811,4.349045,3.217299,4.350959,4.903703,3.342917,4.461976,3.443470,0.255061,0.312316,0.970630,2.937031,2.377213,3.310437,1.544416,0.197697,1.965277,1.221883,1.747217,4.742623,4.691969,1.545292,1.433388,0.911985,4.650756,1.159331,2.099584,3.481668,3.697679,4.963415,0.681263,2.006307,2.829065,4.059997,1.729714,4.518013,4.754177,4.892212,0.653301,0.821554,1.588274,2.098294,4.988014,3.861090,3.240149,3.597343,1.758017,3.209771,0.196338,1.379322,4.918661,2.760540,3.815204,3.102349,3.750972,2.482881,4.991053,4.622851,4.263124,0.361194,0.058055,1.832823,2.739064,1.602222,3.416860,1.024966,2.053507,3.609740,1.839065,4.957027,2.569671,4.005037,2.820471,3.379422,3.214803,0.240544,3.894415,1.164037,1.527561,0.625235,2.416185,2.226472,1.495223,4.962774,4.582009,0.525687,3.695237,1.685101,3.282144,4.374485,3.626923,0.097438,4.435287,2.998101,4.286777,4.735437,3.846845,2.505695,0.747084,3.928279,2.549715,4.590907,4.685213,0.447935,3.418388,3.199824,2.518675,1.187970,1.510547,3.026118,4.661200,4.740342,3.474450,0.010150,0.905700,0.126487,0.552218,1.732833,1.230156,3.570024,0.374860,4.342909,0.738689,2.305000,4.930842,0.157690,4.550087,4.531975,2.981103,4.046937,1.137972,2.338331,4.698308,2.713753,4.947933,2.863459,1.430027,2.648980,1.613520,1.443902,3.208254,4.641027,1.241832,1.873868,0.920300,0.550967,1.933937,4.587173,2.382940,2.254797,4.761635,4.823401,2.579451,3.455616,3.159567,1.843924,4.346443,2.606280,3.275740,2.133611,0.206312,1.682629,1.473764,0.641931,0.701510,4.480436,3.332036,2.190816,4.071175,1.619539,1.491403,4.363836,2.363032,0.532045,0.060349,3.692558,3.314082,3.912583,0.024715,1.420708,3.342360,3.426254,2.461567,0.459233,2.095924,2.811310,4.943523,2.151735,3.280637,4.245230,2.199416,0.774892,3.949992,4.705891,3.408038,3.047580,4.400033,4.622659,1.367860,4.126343,1.075845,1.127244,1.971382,1.182203,3.945822,2.833491,4.841725,1.756734,3.768717,4.408769,3.137014,3.395735,2.065290,2.415413,2.900937,1.078423,0.279602,0.378133,4.716759,2.981817,0.026816,0.595233,3.953615,1.630640,3.594269,3.630536,3.607723,0.114595,1.332122,1.487497,0.542303,2.227474,4.580892,0.464603,0.999954,2.258123,2.029983,3.404676,0.993704,1.989794,4.081056,3.079026,2.343154,2.838621,2.662206,2.810141,0.104361,4.888252,0.312222,1.632353,4.836554,2.778998,2.297945,3.440686,0.405018,4.198325,2.864459,4.663865,4.933275,4.649016,4.987857,1.863405,2.922746,4.656094,1.007646,0.324450,2.248971,4.220114,0.557858,0.554348,1.379471,3.803146,3.908949,1.720155,3.457038,1.166920,0.952691,2.339853,2.425203,2.652524,0.179686,2.074892,3.765629,1.337366,0.379795,1.885841,2.866550,4.267591,2.136306,0.634988,2.565418,1.780541,4.096381,2.558934,0.943316,0.158529,0.764970,3.648631,4.929578,3.621613,3.420511,0.977780,1.453172,0.217556,2.639637,1.437916,2.998469,2.545990,2.127742,1.087333,2.660288,3.768768,3.647080,4.327901,0.447370,1.894875,4.349831,2.344140,0.448889,1.538284,1.541594,2.042790,3.202651,0.600467,2.589068,0.522972,0.940238,1.776007,2.784687,2.516437,2.300285,2.146050,1.714940,0.303807,2.989515,2.496856,2.436032,3.641802,3.268971,2.620362,0.059728,4.764283,3.041399,0.217352,0.911982,2.200772,4.148299,0.424230,2.145129,1.570741,3.251405,4.423514,2.832810,3.285840,2.258152,4.629104,3.136842,0.128525,0.829183,4.128687,0.447109,3.747440,0.400065,2.870041,0.830121,4.984992,3.873496,3.021855,3.990871,1.302502,4.020170,0.658999,3.875889,4.154736,1.093629,4.864679,0.767380,3.506681,3.526377,4.927266,0.688182,3.363090,1.730725,1.266231,4.674367,0.090346,4.467525,1.723707,2.540079,2.048737,4.116577,2.576299,0.517913,0.376578,3.986684,1.710247,1.960722,4.946449,0.888785,0.374157,2.005151,4.293128,0.509130,3.014484,0.489774,2.524886,0.873599,0.432678,2.268917,2.711537,4.114304,2.881918,2.931735,1.588892,1.487340,1.494136,0.235778,1.415060,3.960058,3.965816,3.721764,3.211543,4.390775,4.327293,1.911634,3.326345,4.426679,3.699247,4.625822,4.886574,2.539281,2.982811,2.289904,2.177515,0.449147,1.836695,2.236698,2.982803,0.631071,4.906840,1.807792,1.277279,2.049133,2.398504,1.714533,3.845084,4.765971,1.114562,0.226928,2.830023,3.198839,4.278725,4.523120,0.055832,0.899123,1.630821,1.557272,2.465919,0.700040,4.234391,2.603890,4.909712,3.111329,2.038346,1.657554,4.327038,4.390944,1.217766,2.451761,2.160474,4.330078,1.141225,0.754825,2.245829,2.265629,1.488256,4.059228,4.102725,3.465423,4.763602,0.450669,4.726156,0.764479,3.619693,2.226721,2.628650,1.907725,1.788497,3.011053,2.982594,3.568884,3.583130,0.148667,2.709259,3.329086,3.895854,4.443362,1.630029,1.969026,0.494264,2.222740,4.579109,1.476139,1.190315,0.825725,2.902884,2.617082,2.234381,1.337368,4.887139,0.804320,1.384887,1.570158,2.094039,0.901316,0.768362,1.211425,2.623179,3.823266,1.388113,3.942162,0.336110,1.171136,2.109666,1.717626,1.385350,1.856143,4.125520,0.919432,2.188466,3.230862,2.069973,4.517876,0.497895,2.050061,4.777199,2.330006,4.171850,0.342236,3.661728,1.391468,0.399581,3.161186,4.023588,0.657297,0.329974,4.648795,2.008312,1.047176,4.811653,4.682327,1.353551,0.957914,0.627766,2.045604,3.867428,1.735867,1.245254,3.904448,1.911446,0.313643,2.219264,4.300663,4.940175,2.887746,1.981157,2.803373,1.916845,1.438197,3.676573,1.044267,0.579488,4.105923,0.267141,0.428155,2.184693,4.999007,0.535197,1.897253,0.494453,2.205921,1.706737,3.141052,4.780194,0.985947,3.398924,4.743095,3.991583,4.327708,2.100144,4.864524,1.163004,0.904367,4.690251,1.687868,2.585363,3.627705,4.976130,0.825427,3.886439,1.268485,1.865067,2.748852,0.497649,4.508623,2.363525,2.361414,2.352387,0.431985,0.869783,1.392887,2.938552,4.980558,1.838420,4.241249,0.068993,3.865413,2.307449,3.330814,2.208060,1.826980,4.494268,2.998238,0.535754,0.284108,0.592486,0.942593,1.017061,4.787877,0.651074,3.570823,4.475761,2.163059,3.798454,4.062463,2.263169,3.822160,0.073934,0.804924,3.152393,1.481626,1.433915,1.961925,1.718339,1.415709,2.151072,2.322500,3.213384,2.907104,0.811368,3.928129,4.859432,1.525358,4.411263,3.196038,1.880504,4.295657,4.330825,2.419595,3.924800,2.899307,0.782578,2.863985,1.977686,3.202443,4.188793,3.465476,1.556478,0.218375,1.773379,0.911933,3.727650,0.045356,2.857837,0.337195,1.087361,1.944488,2.355924,0.171471,0.301665,3.683057,1.438031,2.668544,2.467603,2.371164,3.695065,2.801053,2.540281,0.750306,0.934412,4.597385,1.192383,1.043364,0.928846,2.541988,3.989646,3.689086,0.670213,0.588982,3.612075,2.871218,0.226658,3.861132,2.636703,1.566978,0.938461,4.309325,3.923052,2.628336,1.519538,0.764492,0.404698,3.699236,1.209145,1.892391,0.504788,4.643346,3.647877,4.409683,0.208289,0.395631,1.349976,0.040929,0.888161,1.503348,0.992333,3.140872,1.926247,1.150519,2.584047,1.361242,2.946244,2.412043,0.452537,2.013729,0.664212,1.529866,2.748441,3.002656,3.632189,3.279986,2.246520,3.794649,0.141023,4.737116,1.198786,3.472326,1.487312,3.451496,2.340103,1.260615,4.566524,1.168253,0.410757,0.261101,1.581669,0.701339,1.291377,4.959796,2.412948,3.196909,4.632762,0.131718,2.238027,4.047792,4.416337,4.235515,1.842652,1.092972,3.882301,1.308658,0.913925,0.404500,2.532484,4.616557,1.475029,3.831121,0.458317,0.849565,1.542451,1.390346,2.700920,0.326474,4.122860,2.333041,2.902974,1.721006,0.545598,1.104276,1.064049,1.395223,4.661726,1.227324,2.102062,2.731678,0.543503,1.001740,2.640478,0.363970,0.328240,1.974046,2.455429,0.764752,3.997767,3.198978,4.196706,1.926288,4.129632,0.158465,0.130224,0.422538,2.324425,2.762048,4.540454,4.205788,2.248804,2.893100,1.785358,2.661539,0.396423,2.586772,1.459014,1.211479,1.664083,1.833447,3.179721,4.143126,0.926377,1.084907,3.005586,3.622535,2.252617,3.484455,2.253783,4.466743,3.660982,2.375429,1.849310,2.003155,3.995102,1.526378,0.718470,0.186791,1.112429,4.281878,4.936930,0.868046,3.385511,0.851935,1.604709,3.284688,1.955530,3.212995,1.214800,4.230788,2.675962,2.243493,4.741678,1.758131,4.234474,0.337819,2.495620,4.416853,4.925291,3.910537,0.788924,3.206240,1.851819,1.325536,0.082318,3.760254,2.827709,0.126297,2.581930,3.472081,3.368457,2.966888,0.507397,1.074115,4.483555,0.189627,4.048447,1.603222,1.666853,2.680578,2.870919,2.020879,2.961791,4.965526,1.780422,2.704325,2.144338,3.546974,1.409992,3.958861,3.897856,4.403143,2.308818,0.456313,3.523998,4.984761,4.275264,0.938572,1.946945,4.663600,1.663832,1.977687,4.220087,0.752209,1.531547,0.472851,1.757388,0.048996,2.459668,4.887677,4.758366,2.345300,3.550115,2.071398,3.631079,0.546691,1.037065,0.799877,2.264339,4.197759,0.118821,3.986806,0.754646,4.303683,4.021608,4.988890,3.279701,0.946558,1.795305,1.892905,2.618347,2.509263,4.163552,2.114092,4.493707,3.703286,1.663419,2.524836,4.782749,3.833535,2.003918,2.046815,3.665994,1.369024,0.695806,2.234974,0.899882,1.418266,2.618295,3.904429,1.429329,1.771691,2.530669,4.449134,2.952929,3.517531,3.663743,0.991537,1.009250,0.305442,3.838270,4.313124,1.700874,1.566708,1.062636,1.007096,4.241573,2.786455,1.180413,3.985664,4.537077,1.562442,3.846706,4.560405,4.105889,0.401407,1.295453,4.571425,0.602383,4.565315,2.578370,4.457293,0.933269,4.479794,0.048302,0.569726,3.666035,4.726190,1.084827,3.793526,0.806646,1.793278,1.536835,4.364644,3.891786,1.999382,0.436832,4.918413,4.588396,1.850256,3.162212,0.628396,2.513568,1.652457,3.375886,1.738605,0.215395,1.545466,0.548171,4.883912,3.987589,4.784372,2.349910,2.326155,1.315228,0.876331,0.857896,2.079552,3.643687,3.382090,4.165692,4.107504,0.958452,4.848494,3.000823,4.014114,1.668957,1.511803,0.391360,2.275879,4.201819,3.407012,4.894112,4.783375,2.080670,2.137592,3.596461,0.776614,4.346489,4.749583,3.324066,0.556224,1.350189,1.858621,4.227843,1.832638,3.221822,4.508854,3.461924,0.760665,3.404139,1.791954,1.341360,4.423623,0.023612,3.472836,3.302999,3.296587,2.268271,4.534150,1.979620,0.030390,2.430285,3.567333,3.293997,2.516963,4.303560,4.256087,4.071517,2.236739,3.170664,4.039928,0.350271,0.469813,2.332668,0.142939,2.213234,1.104196,3.476345,2.805835,3.386952,1.921672,1.382290,1.358916,2.063581,1.864968,3.725987,0.962505,1.759997,0.106539,3.107211,4.751753,3.891139,4.770599,2.862781,0.011414,0.567560,1.412180,0.489633,2.073645,2.334643,1.049759,2.383170,1.659083,4.896779,4.917199,4.072814,2.875612,4.397956,4.183957,4.535027,0.215540,3.606656,0.958480,4.281463,3.222819,1.534206,0.786808,2.996998,0.139425,3.957736,1.607971,3.864034,0.421420,4.982035,3.566548,3.997050,4.374476,2.294761,1.570005,2.818233,0.642940,4.321883,0.254739,0.104594,3.037339,2.711399,4.962502,4.173317,2.685092,4.444087,0.256272,2.695045,2.011662,0.222055,0.706270,0.082716,2.617217,0.215572,2.204413,3.146655,4.775282,0.265671,2.284081,4.220863,4.948930,0.396272,0.434493,4.711071,4.921573,0.958697,0.362733,1.226737,2.237494,3.657283,3.493283,3.335137,4.712000,0.181944,3.023982,0.783014,4.043226,4.290752,3.140165,0.482687,0.744158,2.418939,4.615635,0.953178,4.483063,4.931357,0.090999,0.687505,1.259730,1.001384,3.513168,2.822050,0.874667,2.417551,2.363376,0.241866,3.646986,0.631303,0.774100,2.184586,3.190567,3.767057,4.985987,2.438979,4.927226,2.948185,3.375329,1.775476,1.629513,3.092269,4.237147,4.458636,2.988768,1.778620,1.501273,0.273060,4.773152,2.564822,2.505540,2.794332,0.874087,0.873176,0.298202,2.215482,1.389097,4.722492,0.526787,0.449683,0.277282,4.553463,0.875314,1.301592,1.368734,4.969548,0.229506,2.802059,0.107740,3.667484,2.272178,1.659416,0.796068,2.355436,0.214461,4.447539,3.667741,3.793579,2.943878,4.576509,4.851782,3.473933,3.910272,4.958101,0.252057,4.215193,1.752356,4.430109,3.475966,1.295495,1.530225,3.275574,3.184644,0.171008,3.028397,3.351315,0.747898,4.508415,1.213454,3.925748,0.072008,2.004087,0.989341,1.105089,1.915932,0.068854,2.335608,3.515521,3.310615,4.417912,0.497375,2.587293,2.271643,4.212617,3.890724,3.300086,4.051292,4.649272,1.921504,0.058484,4.192587,1.665180,4.427098,3.551982,2.616955,2.529109,4.948526,1.023750,1.886421,2.349747,2.282036,4.145875,4.000496,4.594720,1.069155,3.170341,2.614920,2.749241,2.180572,3.021732,3.145437,2.032385,2.641318,1.735346,1.086705,3.687550,3.783179,2.432873,4.028116,1.480930,2.773976,3.183438,0.067408,0.896135,4.193392,3.469889,4.471437,1.838321,4.305265,1.116215,2.772333,3.682525,4.692620,4.415291,4.945252,4.522631,3.025476,2.154873,0.173364,1.633407,1.282568,1.899554,1.627751,4.860307,0.616911,3.601868,2.107392,2.405751,0.540468,2.401616,1.840446,4.257308,0.323641,0.665408,1.733747,3.316326,2.260691,0.372306,1.647964,2.443508,1.924487,3.894821,0.913326,4.692917,2.279681,1.526392,1.978170,2.821068,0.176561,4.550272,0.136631,4.391481,1.355415,0.225658,2.981665,4.170409,4.673824,4.178086,0.309333,1.474589,4.036639,4.004061,1.208977,3.548110,4.554952,1.365668,0.671205,0.438452,3.303999,3.084204,2.722951,2.501481,3.987253,1.083624,0.608700,3.701438,3.198453,3.608044,2.323851,2.684857,0.429287,1.176650,3.410618,0.055013,4.554768,4.186707,3.586082,2.711839,1.496044,4.753521,1.313756,1.929825,3.151923,1.807246,2.650430,4.262583,2.605435,2.028841,2.878353,1.525922,4.930078,0.464951,2.668795,4.267858,1.458447,3.590412,4.950964,0.581185,1.954001,1.474278,2.252879,0.262753,2.356977,3.428819,2.363318,1.783533,2.878598,0.056869,1.949844,4.591178,0.230670,2.579968,2.544870,0.794693,0.489652,2.079515,2.744872,2.388221,0.301624,4.023834,4.676037,4.366247,2.572836,4.580029,3.629902,2.226000,4.997923,0.385320,2.649099,0.675078,0.535138,1.018762,2.842488,0.478423,0.546493,4.252774,2.096714,2.483836,1.237481,1.905994,4.843124,4.493671,3.834182,0.075942,2.737420,4.044688,4.942139,3.799461,3.765636,0.221631,4.686836,0.987200,1.875003,4.262240,3.488617,3.823209,2.937930,1.199136,4.697719,1.050390,0.224463,0.064570,0.793372,3.642476,0.269160,0.302942,0.948117,3.481652,4.454853,4.831397,3.628164,4.609775,2.750372,2.782386,3.959340,1.517030,2.146011,2.881977,0.310108,2.418424,1.530061,0.423492,1.247094,4.952472,3.645697,3.457332,2.037992,3.871855,4.187483,0.434881,1.760674,4.470946,2.118105,2.549244,0.840172,0.445042,4.757699,1.050590,0.675822,3.945975,0.437038,0.764551,4.280139,4.439756,3.268880,3.348384,0.807102,0.066581,3.223872,4.364444,0.513888,0.537567,0.706415,3.841438,4.029318,4.973067,3.291930,3.302449,4.558086,1.812546,3.893561,1.596303,2.005721,4.335958,0.814740,4.967663,2.457819,3.061998,3.280300,1.898790,4.251672,2.957437,4.625924,4.727662,3.504758,3.600529,2.186968,1.205765,3.372456,1.997069,3.367516,2.201969,1.392765,3.064975,0.457665,3.696188,4.314704,1.036187,1.244308,2.116854,1.821347,4.568623,1.755598,4.921803,3.315236,1.903726,0.314416,1.654601,0.385304,0.961621,0.566229,3.482756,1.780289,4.545250,1.563544,1.779555,1.297072,4.794887,0.728112,1.015861,2.945061,4.568961,1.804083,4.483599,4.695713,3.875606,2.696740,4.063351,4.573667,4.829570,0.736077,3.433383,1.256731,2.860015,0.448395,0.636233,0.627765,1.734752,2.253914,3.773373,4.526601,3.163134,1.576894,2.214584,1.733088,2.959389,3.140660,3.969291,1.031689,0.883209,2.606126,0.421373,1.453292,4.900167,4.031336,1.065246,0.575158,3.282602,1.033718,1.450868,2.870814,2.571050,0.112252,3.338194,4.793219,2.917709,1.281849,2.246320,1.610776,1.459883,3.689273,3.748221,0.866661,3.490698,3.931085,1.389756,4.923294,3.485849,2.925338,4.214565,3.633477,2.975681,3.352093,2.972065,4.314453,0.449511,0.432033,1.456772,2.429685,4.334678,3.127086,2.429072,0.674715,2.722749,0.717008,1.867148,2.081338,0.900092,4.631128,1.781484,2.004343,3.717312,2.796465,1.328675,2.335986,1.310174,2.021859,0.373647,4.592882,4.644246,1.032620,4.705171,2.554946,0.114051,0.984664,3.079912,2.542796,2.124289,1.417027,4.550835,1.620089,0.599292,3.145104,2.817262,4.098889,4.683865,4.731317,3.421189,0.510572,0.189532,1.848462,4.104781,3.686801,1.813782,4.477776,0.306674,1.090292,2.570210,0.846745,2.381602,4.173058,0.718554,4.154673,4.290201,3.349318,0.343430,0.421253,1.817195,2.100028,0.808344,3.050381,1.691718,3.405670,1.566948,2.552542,0.556572,4.535058,1.362710,4.024182,0.284851,4.251436,0.196290,4.363969,0.889560,2.540345,0.280878,0.752336,1.493927,0.969992,2.258911,4.039637,0.690183,3.099665,2.151897,0.305530,4.197110,3.620715,3.220857,0.896933,0.613964,4.531617,4.517259,1.073677,1.704364,1.289752,3.283152,1.380346,1.684789,2.323346,1.749556,3.679681,1.610179,3.307146,4.135755,4.394948,3.559566,0.675653,1.212008,3.394585,2.463045,3.085342,0.777590,0.849065,2.951317,0.724618,2.939693,1.513710,4.331433,2.255378,4.203739,4.912973,0.483753,0.594156,1.453655,0.210667,1.257580,4.305674,3.998177,0.971612,0.957261,1.667794,3.271656,3.504015,4.933396,2.198095,4.634010,0.546814,0.093831,4.104662,3.129981,0.324355,1.961056,4.030323,1.546341,4.826896,3.420208,3.620763,4.937237,3.818662,3.404857,3.208556,4.278353,3.286772,0.028893,3.414611,2.384016,3.000301,2.466180,0.112893,4.420934,4.574061,2.323312,4.412169,4.502900,4.037209,4.925341,0.796192,2.190226,2.034437,4.573850,0.885158,3.853582,0.828171,3.744868,3.636488,2.909591,1.267384,3.897240,4.354376,0.148579,3.996634,2.072552,2.546410,0.158669,0.467601,1.503521,2.812908,4.337891,4.325988,4.789956,0.035806,2.063611,4.946309,2.688590,1.542536,4.086026,2.443588,2.269976,3.468624,0.521845,1.925738,2.961825,3.480356,0.173431,0.426828,1.236086,2.401091,2.623937,1.967132,0.265467,2.610574,0.290391,1.660424,3.139815,1.562266,0.407345,2.678140,0.746890,4.583367,1.527774,2.097067,3.033469,2.944565,4.983381,0.053011,1.997132,0.701420,4.684870,4.832248,1.664588,3.089787,0.677210,4.413602,2.149970,2.601061,0.722411,4.286582,2.720027,3.686860,2.163426,2.678825,0.434616,2.784211,1.890555,4.511939,3.102528,1.370321,0.743938,3.438144,3.813761,1.489216,3.403394,4.942010,2.340002,1.148055,1.517203,0.270224,4.427093,1.692700,3.924778,4.018886,4.153532,1.264852,0.163468,4.542240,1.792809,4.022727,4.977432,0.438252,4.001601,2.208636,0.565223,3.720007,4.343517,0.177028,4.429354,2.030471,1.641454,0.108967,1.192692,2.732945,0.112549,2.704473,1.961977,0.866046,1.563334,3.395673,0.652203,0.216995,2.452491,2.052940,1.388959,3.272239,0.628216,0.281935,4.420724,0.545202,0.604243,0.231232,4.785626,2.707167,1.618285,1.294311,3.259639,2.682328,1.714888,0.573906,0.822449,2.455859,3.233963,4.643924,2.146197,0.256768,0.905584,1.825321,1.186372,1.479484,2.537217,4.018413,0.005563,3.216063,2.496939,0.566540,1.188167,3.510334,4.472319,4.509471,1.782392,2.991113,2.013950,2.157252,0.880344,2.737187,1.293595,3.601716,4.853042,1.405537,2.639074,3.586207,3.609609,3.266154,1.324056,2.779766,3.573295,2.497849,4.538857,3.748827,4.654452,2.829942,0.372280,4.431188,4.323530,1.035626,1.139973,2.766478,0.260158,0.592867,1.719686,2.637602,4.737787,2.994761,0.444703,2.979792,3.005176,4.493603,1.286021,2.647621,1.477572,0.890662,3.607548,3.678093,4.139311,1.161429,2.601127,2.252844,4.271349,3.058913,1.720223,4.724995,2.677324,4.164924,0.714686,1.717673,3.670244,2.818984,4.863571,0.356616,0.051121,4.777824,1.611906,0.442608,0.593517,4.281786,2.208261,1.490858,1.753008,4.265107,2.177394,2.271956,0.166683,1.418601,1.445198,3.249176,4.619541,3.661529,3.816874,2.105995,1.213351,1.340007,1.484611,3.811343,2.065861,2.800873,4.461556,1.429075,4.796129,4.820830,2.159414,0.477164,2.523117,2.166962,2.181026,0.475304,3.903029,3.765275,1.893335,0.228764,2.353700,0.044191,1.084346,3.643118,2.572774,4.598098,0.924558,2.522841,4.301070,4.690467,0.339313,4.161161,3.127667,1.561090,0.168973,2.920546,0.388890,3.284425,4.412628,4.979026,0.529660,1.550149,4.285438,4.345312,1.464761,3.934112,3.146804,1.948143,1.411011,1.099078,2.944683,1.159421,2.719726,0.180064,4.845885,0.010885,0.456778,4.737893,4.268916,2.687268,3.153043,4.594806,4.145545,3.065649,0.536595,4.635828,0.596997,0.814216,1.715775,0.042066,3.256731,0.781464,3.080899,2.723042,1.265701,0.639111,4.063195,1.908089,1.188576,3.280506,2.804582,1.989670,4.351174,3.577733,1.485276,0.830749,2.903660,2.123674,4.576598,3.780925,4.954737,2.870531,0.741399,3.361129,1.918899,2.895848,2.899272,0.748184,3.869740,4.262676,4.829481,1.395640,3.066986,2.131524,4.598155,4.127551,2.765690,3.014644,1.032342,2.175602,2.351983,0.822077,0.668362,2.346547,4.815454,1.762319,4.931036,3.114640,2.702057,4.216588,2.795321,0.132206,3.004444,0.731789,0.656254,3.233861,0.803900,0.813730,2.817819,1.188661,0.312633,4.548165,2.742229,1.525647,0.119746,4.152250,4.395614,3.138795,1.840570,2.710597,0.689303,2.613435,0.571841,0.016835,2.867324,2.297626,1.100338,4.512144,2.388702,3.420170,0.152871,1.495877,0.401822,1.497088,2.885900,2.533403,4.654704,4.555461,0.942004,2.091055,4.478988,4.583170,2.664122,4.796949,2.303230,4.796238,4.442551,1.401582,0.330057,0.944782,1.994987,1.929405,3.367352,2.006860,1.578275,0.731218,4.522297,1.824098,0.890320,2.709570,1.134067,4.790018,0.523997,2.507022,2.861603,1.332474,3.600725,4.654438,1.294634,2.919736,2.971930,3.056409,3.484186,0.041004,0.889035,2.391796,1.385514,3.657555,0.656426,2.493232,3.100910,0.988518,4.039454,4.693131,3.810297,2.331268,3.184984,4.091135,1.063061,3.746770,1.839870,1.544054,2.962556,4.171249,1.285743,1.601048,4.305326,0.353631,1.762047,4.898660,1.608964,1.217237,4.766235,1.214796,1.529527,3.334795,0.638459,2.412232,0.711827,3.077029,3.775886,2.480970,4.264236,1.597455,2.901246,2.243576,1.527300,1.691961,1.448808,0.934529,4.757471,1.705664,4.857554,3.083009,1.043286,0.350131,3.502055,3.623795,1.979450,2.990686,4.297179,4.438600,1.124308,1.182653,2.990485,3.589744,0.982465,0.004782,1.098823,4.748540,2.209479,4.651097,4.766868,3.161673,0.309010,0.680715,1.848313,3.819827,2.266605,0.237816,2.625909,0.063777,4.573935,3.374199,4.690329,2.783421,1.922834,3.981056,2.151981,4.674759,3.709803,0.445449,3.870937,4.020575,0.167066,0.213782,0.635597,3.809443,4.920451,4.103171,3.629830,2.187873,3.306270,1.462360,2.519304,1.856852,1.832888,0.509770,2.475719,1.047142,2.803541,1.554015,0.907592,4.012436,3.395940,4.421850,3.046770,0.860459,2.197308,4.108843,4.886654,3.562587,0.717724,3.486496,4.936992,3.398154,3.264259,4.605408,3.986622,3.871002,4.089254,0.445501,3.464111,4.269075,4.089057,0.726679,1.592317,2.550464,1.370374,1.199669,4.017661,3.967544,4.508350,2.806520,2.473170,4.297098,4.257479,1.755628,2.822988,4.680554,0.303878,0.144631,0.318378,1.404694,4.213177,2.284417,1.407803,3.713551,3.369237,0.092255,0.492733,1.384493,4.164530,4.752707,2.577131,0.971244,2.813350,0.161363,2.917993,1.736279,2.648015,3.703687,0.982063,4.653676,1.392982,3.030208,2.867305,1.420180,0.353099,3.229939,4.571583,1.782992,2.893573,1.121799,2.825751,1.311903,4.811101,0.475993,1.728600,1.291987,1.937354,2.635922,2.106249,3.276337,3.945497,0.881005,0.090480,4.694395,1.813923,2.961465,0.790264,3.855832,2.151316,3.347748,2.898944,3.978993,0.653905,3.064845,4.618889,0.818520,2.884274,4.800002,0.537357,0.216517,0.951129,0.109303,2.850022,3.413360,0.027625,2.243738,1.860781,3.845657,3.915424,3.679866,0.008426,0.940718,0.049167,4.951263,4.676044,2.595877,1.123399,2.979799,1.194942,2.127030,4.250312,2.536597,4.273642,4.341669,2.751782,4.219112,2.203090,4.398657,0.751712,1.961668,4.615849,0.969277,3.776592,1.988397,3.941195,1.550383,2.441611,0.472687,2.677774,1.158588,0.947674,1.168829,3.773795,2.454457,0.670922,2.397883,4.674115,4.520113,0.698443,2.458695,2.482549,3.760711,2.685708,0.515425,4.849429,4.573506,2.766583,1.570573,1.746378,3.472922,0.321700,0.429093,4.365193,2.281165,1.195914,2.729516,0.213054,3.017080,3.109259,4.713726,1.841631,3.590379,0.049094,0.670381,3.792296,4.129169,4.160341,3.957388,3.843715,0.186185,0.724898,2.013614,3.463917,4.230822,3.564808,0.665378,4.953359,1.000594,3.344393,0.286792,2.160803,3.652536,0.451632,4.659216,1.544814,1.086769,0.459171,3.046817,0.590687,4.272230,3.607550,0.408930,4.984109,4.648013,4.976358,0.570949,1.089487,2.499544,2.893996,0.927603,4.754201,4.870157,0.954373,2.406850,1.384322,2.649732,2.305479,2.381114,4.359991,4.905889,0.379996,0.142284,3.299983,0.856885,0.007547,3.588574,4.021854,2.950468,2.452974,0.221634,2.511635,3.128117,4.481088,2.189180,1.154274,0.135383,3.413286,4.163518,1.530976,3.085045,3.298406,0.116624,1.249588,3.491332,4.999070,1.497471,4.622785,2.409121,0.567290,2.457975,1.570539,3.386995,0.098633,3.624493,3.967289,2.040754,3.721519,4.211715,2.096417,3.309274,2.918709,3.889389,0.158315,3.446372,1.323235,2.978581,4.122263,2.676988,3.310686,4.053971,0.184008,2.665354,2.136402,3.853265,4.852931,2.122015,1.333158,3.141498,2.651241,2.290183,0.309222,1.977174,2.874571,1.034455,3.360914,2.495066,1.505414,4.880954,2.107093,2.980427,4.426268,3.047431,3.175392,2.231383,0.380489,1.490203,2.369332,2.165827,3.686258,1.879861,4.184453,1.694333,4.160362,2.990809,4.210625,4.546794,4.762971,3.903647,3.874864,0.511151,3.562178,3.124270,2.260784,2.783005,3.840261,1.815812,3.895040,0.601984,4.499366,1.204866,2.661396,2.081627,0.389905,4.142723,0.649459,2.553858,0.936393,4.847810,3.225490,1.286188,4.096230,0.165674,1.507354,2.893641,1.195399,3.981094,4.348293,2.712581,3.961316,4.421320,0.255070,2.658496,4.641566,0.239371,4.040975,0.261101,2.967913,4.942672,2.110777,4.018757,2.880521,3.085582,3.018441,3.305532,0.181670,2.606351,4.368296,0.980998,0.435799,2.151138,2.709495,2.032314,3.578945,0.121689,1.944067,0.778507,0.350905,0.182479,1.116179,2.063578,4.540808,0.583792,4.336598,2.724867,3.302475,4.443649,2.072616,1.900512,4.666790,3.292828,3.673608,1.635598,3.517174,0.609002,1.109195,3.738838,3.540249,1.899345,4.275496,1.359474,4.927075,0.485035,4.452289,1.650020,0.517818,4.847427,1.360250,4.700452,4.039907,3.005051,2.910585,1.071888,4.287607,4.321029,0.985269,2.554316,2.101351,0.630030,1.569336,0.442377,2.464615,2.176091,4.760875,1.863729,2.806138,4.389806,4.312996,1.189499,2.774499,3.875092,1.848152,3.853168,1.996121,2.759895,3.264675,1.442703,2.849335,0.254907,1.211005,4.596394,2.181019,4.773412,0.796500,2.451347,2.762961,1.396417,4.482624,4.357131,2.285615,0.753774,2.755953,3.056224,1.728519,2.109655,2.871149,3.580374,0.330290,0.123353,1.448401,2.665400,0.065798,4.434614,2.882692,4.988462,4.455135,2.860425,2.464234,0.896709,4.148087,0.313765,3.906080,4.145746,4.155539,2.391328,0.387474,0.302398,4.891237,3.380623,4.293251,4.245020,1.355233,4.768840,1.676370,0.798549,2.205673,4.928700,1.989434,2.640507,2.628116,1.106871,3.118346,2.240291,2.292000,4.714893,4.226592,4.406594,4.244211,2.516716,3.111219,0.129373,0.551596,4.138463,0.032251,0.323303,0.270420,0.883658,4.118846,3.368232,1.708987,2.757770,4.986146,0.657631,0.141199,4.291301,2.083040,0.167286,3.372630,3.249931,3.296278,3.373233,0.606604,3.219366,2.246513,1.778352,2.696896,4.258740,1.211013,0.214419,1.612467,3.766250,1.980345,3.160604,2.007256,4.368763,2.678054,1.772910,4.678905,4.070136,4.256686,2.155683,1.517282,2.383294,4.556323,0.300314,2.983969,1.687551,1.409135,3.087350,2.020626,1.540364,4.627270,3.610286,2.213695,0.233957,2.475831,4.411875,3.180501,3.501674,0.130262,0.888948,4.694882,4.357351,3.595992,1.624062,0.246804,3.734557,0.296413,4.771741,2.958978,2.926010,3.971926,1.974445,2.029677,0.115522,4.951829,1.865616,4.155632,1.082709,4.896495,2.734606,2.862070,1.175789,1.667063,0.094322,0.537790,0.038122,0.620325,4.894162,3.154286,4.298942,0.140616,0.827578,1.862008,0.053311,2.873752,0.455610,3.672147,2.469039,2.805828,3.970718,2.386321,3.793404,0.221372,3.702667,0.029364,2.627634,2.553141,0.128300,0.829160,2.825696,2.976405,1.587018,2.307826,0.318128,3.595088,4.265669,0.952341,1.378939,0.284027,0.669601,2.029698,4.008309,2.393647,0.921895,4.265363,3.020900,0.365626,3.528909,4.489462,1.327371,1.516823,1.430092,3.773045,4.588449,0.198019,0.541296,0.768792,1.838942,1.417292,2.682249,0.510426,4.205016,3.229842,4.887846,4.076198,0.529024,2.073540,1.747067,1.340099,0.292791,0.097621,1.985877,1.009071,3.351906,2.928339,3.265481,0.743102,2.781590,0.706903,1.655107,0.414868,3.010977,3.737528,4.974222,0.471564,3.938422,2.925973,0.244965,1.135660,1.962548,0.537143,4.114663,3.028512,3.208716,4.186613,1.796062,0.015034,3.093668,4.625802,3.885647,3.030866,1.410854,1.424824,3.815970,2.880949,0.552252,3.107410,2.292107,3.847810,1.552842,2.556983,4.655638,2.886932,4.489692,2.575569,3.610750,4.973763,1.366858,1.371405,3.741229,2.823936,2.801280,0.256805,3.237250,1.355590,2.998124,0.593076,0.511522,2.825715,1.640652,2.916753,1.509322,3.456734,2.712519,2.989998,1.230233,3.839040,0.899429,3.921242,3.637513,0.255447,4.155535,1.129652,3.406313,0.935533,2.505945,0.699985,0.862414,4.876603,4.345662,3.667170,3.978276,3.661462,0.317252,3.438407,4.000511,2.379149,4.154811,3.216596,3.709715,2.612500,4.629145,3.244453,3.735783,1.236349,3.573850,3.548637,0.861384,0.518312,1.049000,3.444168,1.063707,1.557222,3.762047,4.037834,4.173566,4.006491,0.650045,4.130522,0.721821,1.181285,3.962416,1.648509,3.991331,3.148740,2.596366,2.781553,3.448884,4.912809,4.821858,0.786266,3.703949,4.461984,4.682253,4.844556,3.852366,2.175867,3.487025,3.624005,1.795973,3.286356,3.557753,1.024634,2.721628,4.239845,3.326544,3.852387,4.581225,0.046209,1.148854,1.136844,3.804996,4.099088,2.769232,0.780931,1.506584,2.078727,4.400905,3.017792,3.051071,0.829975,4.880878,1.540092,3.945187,1.335119,3.944496,3.142126,1.278062,4.409721,2.857796,3.502938,2.259802,4.974279,3.467012,1.526304,0.868601,0.063719,0.417518,0.427054,1.068998,4.434264,3.020342,0.655922,1.832351,0.594642,2.555026,0.982288,4.882838,2.505137,1.480799,3.693011,0.580517,4.027926,1.214894,0.707265,0.901185,2.914466,4.397817,2.288241,2.358680,1.394032,1.549197,4.967611,1.389106,4.687054,1.612175,3.621062,1.289756,1.387231,4.632940,3.988036,4.378906,3.125615,2.063284,4.155386,0.312560,0.163352,3.463560,0.453190,0.158475,4.178886,1.277207,3.077522,4.985974,1.312038,4.491799,2.095709,3.806793,4.522492,0.744773,4.527775,2.093186,4.214281,1.793607,4.333300,3.467057,4.384189,0.829289,4.840056,1.056798,1.142642,1.126905,2.261388,4.463298,1.744949,0.886358,0.216666,4.447513,4.180838,0.871988,3.483844,0.937151,0.698379,4.434607,3.288627,4.704469,0.689283,4.610496,4.378474,1.531314,3.386114,3.612707,3.894954,4.768890,1.778181,4.036432,2.904282,4.235263,2.338120,1.500495,4.818416,0.804872,0.192452,4.421555,0.504991,3.891975,0.932124,2.683576,1.718493,0.454261,4.324986,1.498791,2.505862,1.992464,1.649360,1.146457,0.590570,0.453284,4.590274,1.282937,0.531395,0.055716,1.100642,3.712282,1.972876,4.734841,2.500334,3.909214,4.458649,0.073697,1.007941,3.586594,4.490945,0.213045,1.344011,3.777963,2.253506,0.417590,1.968464,2.665193,2.786533,1.875224,2.003347,3.791495,0.403180,4.794802,4.743929,0.853580,2.785050,2.519502,0.810441,1.240279,2.057395,2.889713,3.374123,3.527666,0.271217,1.259704,1.538979,3.028413,1.281591,0.203570,4.052480,4.297844,0.837179,0.962504,0.207988,3.766751,1.908256,3.036204,2.586024,3.475799,4.188128,4.481510,0.454664,4.224455,3.813952,4.379919,4.614833,4.896956,0.433643,1.822290,3.538976,1.342321,4.574891,1.430508,1.212574,4.672036,1.434597,1.431380,1.695034,4.862993,0.676379,2.426570,1.580388,0.682835,2.028903,3.211075,2.301841,1.523305,4.435327,1.545713,0.091683,2.807150,0.451315,4.094927,2.259413,0.375465,2.369540,2.164962,2.101886,3.332966,4.525970,3.391037,1.133951,0.854254,1.001454,2.573569,2.104173,0.708933,2.325468,0.014134,3.119407,2.222186,4.925327,0.800577,2.205940,0.093195,0.857110,4.830223,4.914869,0.082777,4.039562,2.173264,4.023917,2.401603,4.644768,0.810515,1.224595,1.380661,4.558203,1.643673,4.766924,3.155111,4.328790,4.238599,0.716041,1.191923,4.742162,0.558534,3.688125,4.478628,2.637678,1.830446,1.962413,1.242773,4.817335,2.151161,0.158001,0.685916,0.682844,1.150578,0.855057,1.863835,1.202669,3.802060,4.479256,1.031551,3.297257,2.944337,3.066595,0.177467,1.092063,1.466245,0.437544,4.798793,3.783737,0.777436,0.577451,4.011432,2.625444,0.400684,1.368821,0.629487,2.630058,2.646808,4.951395,0.362925,4.752411,2.991555,0.741961,2.402057,0.679444,4.290751,3.459386,4.574545,4.714600,0.684784,3.837006,1.388381,4.947883,1.060099,1.818201,1.469079,3.491291,1.566533,1.127053,0.700130,0.658912,4.810377,4.524042,3.352639,4.386908,4.930654,1.800109,3.892683,2.979288,0.572878,1.588501,0.110998,4.843047,1.814514,3.410850,4.813181,4.922336,2.279569,0.211269,4.807362,0.223687,3.938733,0.053388,4.040556,1.666448,2.500160,0.179551,0.379204,1.234779,2.559666,4.333402,0.190916,4.488271,0.856994,1.579609,3.451055,4.639954,1.175700,2.007216,1.396538,3.316213,3.991946,2.847725,1.209771,0.862263,0.587601,4.077425,0.346428,4.579451,1.667089,3.085666,3.662077,3.273003,1.353692,3.951683,1.395860,1.204416,1.758522,3.157599,3.087493,4.656297,1.006131,3.930506,0.534484,2.945541,4.808435,4.991826,0.657998,0.249718,2.362479,1.880969,2.945049,4.985143,0.877403,0.813527,2.988890,3.305635,1.769253,3.148577,4.301382,3.500060,0.051897,1.882844,0.019366,0.667452,2.931320,2.731254,0.441064,0.182216,2.451135,0.954199,4.451890,0.590753,0.685042,0.362681,1.878440,4.747658,2.464243,1.511051,1.553757,3.918745,0.007726,1.737543,2.117925,3.681196,4.040709,3.039163,2.649238,4.675096,2.091680,4.918711,3.629352,0.339582,1.831518,4.088788,2.197315,4.923493,1.151459,4.760938,3.222676,4.501395,1.210488,3.548559,3.202987,1.821786,1.728971,0.234794,1.099227,4.532279,1.776651,3.185150,2.008643,3.057243,4.556925,3.014839,3.986164,0.282561,1.542020,4.918082,3.004142,1.472774,3.893003,3.610310,4.709343,4.781248,3.781166,0.177226,0.115478,4.226975,4.041539,4.988562,2.735580,0.620951,0.201191,2.714025,0.450778,4.632545,0.985968,3.688061,3.714188,0.875026,3.383212,1.193808,2.160292,3.228859,4.291295,0.335853,0.092541,1.707865,3.627894,1.166786,2.475390,0.332712,3.985962,3.347117,4.487657,4.508167,3.670795,2.508263,4.985727,4.760493,2.146299,0.460885,2.540991,2.961556,4.985913,4.045603,0.802475,4.717919,1.566223,4.630199,2.928376,3.025486,4.330392,3.979544,3.813235,3.740291,2.782612,0.008202,3.104943,3.938716,0.553814,4.307292,0.025186,1.629912,2.545498,3.812637,1.442956,0.769338,0.155443,2.804785,0.371508,2.607176,4.602078,1.350753,2.882033,0.029462,4.111400,4.469398,3.945015,4.585543,2.186321,1.619947,0.088649,0.912570,2.980918,4.043909,3.627090,1.347037,1.186599,0.959048,2.446084,4.624399,1.151892,1.323480,0.088810,1.638471,4.820292,1.662689,0.262781,2.158301,4.266670,0.322485,2.547580,4.547510,1.252562,1.634764,2.673773,1.834798,0.730864,1.827975,1.394619,2.909607,1.259805,2.833724,0.084555,3.374846,1.033103,1.879538,2.191100,4.055296,4.444007,4.216647,1.476238,4.067215,3.248329,4.286919,0.876573,4.936615,0.668164,3.232499,0.072827,4.558672,1.187510,4.136932,4.029043,1.960796,2.923693,1.797066,4.042878,1.596714,3.296631,2.945155,3.582522,0.269154,4.004717,1.092593,3.176582,1.365010,0.081432,3.694671,0.344612,2.903922,2.557194,0.318556,4.029830,3.907482,2.019546,2.302995,0.367955,2.153817,2.254375,3.550876,4.669645,4.192630,1.714099,3.858833,4.244383,0.362472,1.410037,3.327708,4.641553,3.795397,1.127942,1.713161,1.843636,2.391220,2.125576,1.758844,2.885900,4.948042,3.303723,1.911700,3.544479,2.921016,4.551769,4.278531,1.042587,2.317330,2.019257,2.303304,0.222764,2.055343,0.495129,3.922315,4.607001,3.644073,3.262802,4.023941,2.468796,1.788621,0.518395,3.958170,4.086276,2.031460,1.493556,1.614859,0.624359,1.552165,4.983648,0.571867,4.375538,0.008577,3.660867,2.120586,0.947203,1.041482,3.836375,1.428185,3.747781,4.010459,0.890674,3.227030,4.945293,0.300048,2.550397,4.440673,3.209971,1.384369,1.250945,1.454112,0.211115,0.441069,4.758035,2.621369,0.401183,2.658493,1.531043,3.973256,0.072993,1.907543,3.276065,2.059485,3.454861,2.850267,2.774476,0.810344,1.751821,3.829686,0.374315,4.043146,1.206707,1.967117,2.335783,1.035880,4.569201,3.442176,0.006561,4.014441,0.961840,2.054252,4.140240,4.583141,4.623800,2.970372,1.607905,4.211973,2.636249,4.664703,2.778884,1.086407,3.080875,2.653605,3.724718,2.161915,4.806337,1.650712,0.137405,3.900973,2.292066,3.705120,1.054757,1.691265,0.562209,2.269262,0.182596,3.245675,2.907427,2.875670,2.299458,3.662646,1.865328,3.520307,0.541583,0.481292,1.899760,1.762745,4.973590,4.360485,1.020610,4.697398,3.366329,2.995194,3.643331,0.056984,3.452759,4.129891,0.108599,2.658173,4.314233,4.654649,0.894462,1.004221,1.207847,3.997928,3.621629,2.414293,3.144594,0.199526,4.274928,3.819880,0.276864,1.482280,1.641203,4.330766,3.465612,4.284707,0.767764,3.016896,1.538568,1.438785,4.744108,2.495102,0.086790,0.060014,2.261551,4.240640,0.459354,3.678957,1.379544,2.005765,4.260593,1.596234,3.942564,4.109374,3.340125,4.520580,3.382294,4.051416,0.772657,3.649464,3.127158,0.031888,4.966004,1.750023,0.313813,0.840423,1.259301,1.766174,3.535990,3.897812,4.970729,0.870863,1.434592,4.417798,3.861548,4.629424,4.396040,1.928890,4.766820,4.117974,4.538224,2.845227,3.575367,4.459139,2.715701,0.679180,3.914695,2.627697,0.086040,4.870223,0.644050,4.756020,4.459567,2.628409,0.097294,0.482348,1.623954,2.386294,4.466720,1.900672,3.985423,0.137433,2.598782,0.538922,4.506036,2.869283,1.066415,2.731106,3.361558,1.449067,2.181479,0.338669,3.759846,2.850477,4.950097,4.649906,3.469423,3.324972,2.345201,1.222480,2.397557,0.675042,4.330472,3.850665,3.706093,2.856565,1.393708,4.540825,4.863165,0.681330,1.424304,3.436934,3.527230,2.381602,1.714652,3.732343,2.331597,3.128799,3.321645,2.787792,1.987793,2.444324,1.588017,2.919856,1.096365,4.802934,1.938960,0.520009,3.533378,0.145551,0.418934,2.505492,2.514794,1.353403,4.858396,0.450563,3.258116,3.054143,4.821734,3.551890,1.601587,0.037491,1.942623,4.691717,3.348926,1.527369,0.139948,0.081552,3.800391,3.646166,0.984669,1.055300,0.743462,4.675960,3.743940,3.720634,4.508942,4.905411,3.275758,2.831694,2.671566,0.822072,4.655624,1.180688,3.230610,3.898253,2.853060,3.362090,0.779451,0.522592,0.360994,4.477508,1.764867,0.346874,2.615389,2.985522,4.190369,0.950760,0.163716,4.739847,3.347155,0.033252,4.359137,0.159405,3.985140,3.100736,1.733361,0.845327,0.322475,2.968669,0.245455,4.724848,1.498016,3.884677,1.450238,1.021751,4.587224,4.210118,2.917023,3.222067,3.544743,4.471109,2.382462,2.439443,2.032694,1.260099,2.270202,1.202775,4.498289,0.288786,0.076011,2.370544,2.954998,4.837655,2.228313,2.323105,3.968470,3.565599,3.908474,1.202243,2.715872,2.694812,2.846185,3.986963,1.970041,1.152376,2.440858,0.889359,0.036045,0.008157,2.036884,2.141768,1.081299,2.979595,2.237438,2.158365,4.949329,4.886707,3.715789,1.056705,4.237779,3.058395,3.939725,2.915480,2.161195,2.082445,4.815510,4.586298,4.993459,3.451865,3.489451,4.693241,1.220887,2.111597,0.697615,0.002885,0.871214,2.800939,4.656278,0.238629,4.322921,0.562760,1.151497,1.503561,3.406806,2.260009,2.081608,4.024724,4.326898,4.482872,4.041765,4.861032,0.641037,4.990506,4.428647,3.418686,3.676679,1.327914,2.787229,0.977451,3.739847,4.252668,0.669030,0.681408,2.682441,3.302379,4.135429,3.074043,3.822971,1.320453,1.817078,4.097874,3.337533,0.960583,4.646459,4.969186,2.782841,3.906631,4.760919,3.687955,3.077858,1.179283,4.149518,1.256985,2.614244,2.667513,2.882851,3.950855,1.523150,4.470537,3.965809,1.349871,4.075658,1.147878,3.866572,1.132901,0.928501,2.086939,4.914688,1.368028,1.805219,0.169744,2.795497,3.683512,0.056197,1.213231,1.217406,0.869776,0.321569,2.892271,0.789001,3.247903,2.245192,4.909456,4.532366,2.717467,0.191078,4.405664,2.809338,1.021735,0.777256,2.705788,2.803902,0.756332,2.250579,1.391903,0.112233,3.512988,4.412183,3.672900,2.611896,1.932162,3.299057,0.678230,2.450332,4.700140,1.327778,0.027258,0.975168,2.240246,2.567221,3.605062,1.892356,2.237608,3.048491,3.054903,4.363628,4.517121,3.819766,1.320082,0.556796,1.459877,2.770222,4.305731,1.045076,0.040649,3.249034,2.634651,2.398750,1.063784,0.888364,2.527678,0.083723,1.994303,1.499061,2.672506,4.297542,0.392587,3.986392,2.192742,4.634277,2.707028,3.385147,3.472214,2.894456,3.750399,3.768185,3.195075,1.618422,0.156391,3.598390,2.872586,0.176256,4.897926,1.245433,4.744298,4.318486,1.943981,3.396821,2.607382,1.989446,0.690281,0.582547,3.676732,0.448589,2.971191,2.499360,1.121868,3.380609,3.899901,2.806639,1.574726,1.780088,3.432511,1.643106,3.340473,1.681385,3.934040,0.153177,1.121379,0.573546,4.196366,1.825306,2.901409,3.361183,0.001153,2.669521,3.393577,3.584364,3.968036,0.982074,1.779119,1.333101,3.890682,3.655340,0.569515,3.699494,4.639011,4.425839,0.168971,4.622607,4.493687,4.823857,2.790745,0.933338,0.604353,2.453542,2.722879,0.562909,0.066284,0.852384,2.145278,2.009347,0.697867,1.417747,3.130340,1.580921,0.306505,2.357846,1.923086,3.888716,0.018807,1.991041,4.806995,1.334356,3.668452,4.986285,4.880252,3.119466,3.713949,4.902272,4.793767,2.658851,1.194307,3.236160,4.380958,4.257434,3.715811,0.217333,2.192283,0.841868,2.090060,1.823487,4.125852,2.671892,4.524560,0.858315,4.422840,1.889212,4.431407,2.408704,4.199949,1.943645,0.987434,3.782805,3.968899,1.215503,2.281757,1.708723,2.899208,3.942419,1.583792,1.890634,3.948002,0.075326,3.199597,3.547399,0.768646,2.103541,3.919241,1.631901,0.238693,0.586840,1.364587,4.246649,0.114580,0.965616,2.008814,1.449695,2.342999,4.998612,2.635240,1.151757,4.620541,1.570665,3.650772,3.351256,2.967647,3.416908,0.035870,2.624456,1.022609,1.517173,0.650680,1.008674,1.596875,0.912451,3.026044,0.576022,2.667182,2.440521,3.179769,1.620896,4.046493,0.187666,4.562763,4.465105,2.105556,2.191190,1.058819,3.438483,4.202924,0.961596,4.855829,0.135124,1.523917,3.410617,4.738760,1.661177,4.629377,4.196303,4.581678,1.029183,3.761756,0.347088,2.034203,2.993220,0.451415,4.712015,0.123532,0.263669,0.691603,3.719392,1.995953,2.768168,2.953388,3.499014,4.114868,1.107573,2.980606,2.383953,1.567090,3.094736,2.430970,2.940439,2.311263,2.536755,0.601237,4.229387,0.304679,2.987611,1.986180,0.992203,2.211267,2.151248,2.820204,1.123178,3.539729,4.206974,3.488296,4.284907,2.494312,0.014615,2.964075,4.932364,1.598827,4.979563,0.790942,0.256058,1.660914,1.877817,2.092773,2.671335,1.809678,4.150395,1.241905,2.956512,3.333151,1.866941,1.030753,4.001602,1.765818,1.289499,3.811523,2.143086,3.837048,3.697027,0.088029,3.633307,1.032510,3.243137,1.598968,2.641651,2.727761,4.218789,2.198149,0.047248,3.711682,2.940230,3.906322,1.896600,4.271549,4.848025,0.724216,4.709161,2.274914,3.805225,0.064958,3.785198,1.556237,3.562195,0.784685,4.024198,1.103350,2.361489,0.178726,3.403625,0.477942,3.498084,2.069287,2.291653,0.969238,3.364357,0.381294,4.785543,2.912010,0.814536,3.168158,2.426338,3.704869,3.066044,0.277376,4.419529,4.799586,3.568662,0.019130,1.933589,3.558917,4.693977,3.474340,1.797991,1.434728,0.244495,3.235032,1.868186,3.215194,4.757117,1.721735,1.732102,0.722309,0.313201,1.687696,4.251357,4.590765,1.924329,4.083048,4.895370,4.061203,4.940092,0.135029,0.436916,3.385626,2.271072,2.340200,2.505534,4.930403,2.504798,4.752867,0.297362,4.448203,1.821262,3.860687,1.729023,2.989342,0.487108,0.593456,0.723335,3.315697,3.072558,0.594661,2.943609,1.866329,3.023598,3.681496,4.195052,1.523114,2.416753,2.023974,4.933686,2.831135,0.447090,3.855799,3.463464,1.293895,1.065220,3.749611,4.563092,3.342821,4.036458,3.353686,4.713891,0.873067,1.364212,1.121489,4.946474,4.404353,3.687162,2.059959,1.525354,3.232141,4.827466,3.854197,1.931630,3.070916,0.185939,3.820410,0.704303,1.425205,3.094180,2.090430,3.590166,1.181064,0.491297,2.279910,1.117906,0.910772,4.480278,3.277906,3.909360,4.737103,0.010357,1.044621,4.603691,2.000780,4.705069,3.421909,3.344687,1.949471,2.042101,3.354574,3.852004,0.697176,4.413954,3.614853,4.335003,2.004614,0.685668,1.800166,0.640315,2.519481,0.272656,3.863282,1.805606,1.058290,3.706175,0.128149,0.316382,2.765872,0.309072,2.662290,4.832447,1.934221,3.514884,1.594307,4.236573,4.933029,3.983955,3.047154,4.933149,4.450260,4.078063,3.647365,0.325391,4.634013,0.243946,4.596628,2.418021,4.818827,0.308325,2.250835,4.375704,1.786664,4.712097,0.141442,1.856826,0.157787,3.519078,2.002218,0.416941,2.289805,2.948433,4.024041,1.757295,4.109223,3.984240,4.328268,3.294788,1.339972,4.919040,4.744747,0.461433,2.602811,0.332108,3.489505,3.327098,0.085105,4.185196,0.996750,0.290084,1.198866,4.150198,1.555954,4.552513,1.707770,3.063756,3.677028,4.853847,4.183953,4.183163,0.948943,0.359257,2.069637,2.598888,1.504852,2.760743,2.868212,1.936745,2.999880,2.029403,1.421030,1.314868,1.210780,0.244230,1.010185,3.611966,4.877962,4.351527,1.627936,4.519993,3.572558,2.622302,1.935879,0.285007,3.962605,4.737928,2.827363,3.354745,0.560469,2.073023,2.367826,0.794866,3.400722,4.542477,2.533095,4.322078,3.135993,2.240735,2.475106,3.643197,0.189794,1.679671,3.375179,3.444712,1.093868,0.985292,4.139087,2.973655,2.005557,0.555254,2.441607,3.639946,1.511039,4.222417,0.784535,0.802808,0.369948,4.079189,1.419783,3.624340,2.361110,3.809964,2.673050,0.321551,1.943154,2.178118,1.485320,2.570776,0.578686,1.620272,4.670717,4.963223,2.316478,2.127208,2.356518,2.552526,2.251310,3.577061,3.582530,0.618776,0.850984,2.677184,3.343909,1.796964,4.462635,0.475149,3.281248,0.830182,4.138894,2.684039,2.643571,3.034743,3.526518,4.767754,3.740873,1.491333,2.232279,1.800633,3.129433,1.960865,0.205783,4.616503,2.031175,4.721411,3.613622,4.591600,4.116338,3.234484,0.339695,4.194079,3.464112,4.789958,0.711112,0.438868,2.594400,1.799662,4.801368,3.518861,2.229970,0.961044,2.214407,2.331432,0.045713,1.286077,1.226858,1.905107,2.120192,1.337653,0.563231,0.693398,3.441011,4.779449,1.724272,0.713932,1.300289,0.760875,0.973698,3.310803,1.924637,1.252271,2.905790,4.489120,0.122145,2.983594,3.359980,2.165845,4.601759,0.850936,0.057929,4.201467,1.978888,4.149495,4.976852,0.575434,4.162729,3.802563,3.882774,2.197511,3.045537,1.238210,0.158251,3.638865,0.694165,1.498198,0.267614,2.828765,4.286176,0.364315,1.960662,4.162798,3.873266,1.068461,1.255047,3.157490,1.195664,1.715681,3.904927,3.083195,0.533611,1.925488,0.989813,2.727353,4.744415,2.495334,4.174090,3.397061,2.304419,4.571020,4.863988,4.734524,4.392594,3.702401,4.585481,0.969927,4.360523,2.503357,0.726636,2.466248,0.194096,4.531735,1.293117,1.334897,2.218595,0.945749,4.632089,3.447996,3.394224,4.584211,0.660863,1.301325,3.332779,3.440964,4.168484,3.638166,0.207795,3.117908,3.926425,4.342897,4.359006,0.970139,1.224794,3.015949,2.333191,1.798607,4.826337,1.073600,4.255425,3.026969,3.476988,3.869362,2.355735,4.872533,2.402088,1.413219,4.531089,2.415056,4.642441,2.654962,1.132645,1.719523,4.910417,1.050308,1.812258,1.442165,3.579995,1.158565,4.158735,4.793009,2.082457,2.467091,3.933812,2.207510,0.347692,2.718487,2.610979,2.096143,1.447460,1.221641,2.675339,0.782612,0.648382,2.452403,1.833572,3.909344,1.959561,4.540676,0.772637,4.564839,0.876507,1.154356,1.074848,3.918271,2.099599,4.261522,3.280276,0.538949,0.128585,2.948887,4.470532,1.117601,2.230520,0.223914,2.416081,3.998299,2.396673,2.169784,1.221012,2.673165,4.201503,2.742590,1.466299,3.938145,0.548821,0.178389,0.993486,2.652471,1.483024,3.412963,4.207974,1.588244,3.757686,1.219017,4.108077,4.618415,1.999508,0.443380,2.021350,1.865201,2.547209,2.490539,4.374741,3.097141,0.384698,3.277294,3.927214,0.774121,1.057224,4.550190,4.772582,0.478264,4.633542,4.996805,2.334286,4.149419,0.969673,2.391837,0.557045,3.495811,1.914658,0.731066,1.109610,0.656005,1.756420,4.217467,2.321079,3.345581,4.777969,3.481569,1.214121,0.405715,4.111949,1.396235,3.135274,4.588394,2.631532,2.576892,1.913785,2.441883,3.384953,3.099372,4.346492,4.948494,2.096275,4.900468,3.323558,3.704035,1.972493,3.560802,4.160452,3.006374,0.594064,2.921141,1.136155,2.084930,2.244904,3.524187,2.102333,2.519656,0.584958,3.410361,0.311678,1.563097,3.325390,1.506227,0.038452,2.216821,3.248851,4.233665,4.447502,1.226148,4.771428,1.860760,0.220553,1.545479,0.875268,1.357223,2.774099,2.977625,0.760391,1.966226,3.103896,2.620426,2.789413,4.572893,3.583515,1.508193,2.406138,0.504705,1.489504,4.689477,3.467375,4.956880,2.087978,2.629587,4.821365,3.107114,2.291166,3.653452,3.124468,4.847341,4.777247,3.984960,1.269175,2.963498,4.692461,0.008042,0.528572,2.340262,3.232132,0.641661,1.674243,0.065094,3.740808,1.009015,4.190080,2.805300,3.186651,0.896214,0.926705,1.703900,4.639303,0.614261,2.616834,1.246463,3.649825,1.551054,4.926979,2.559681,2.292126,4.035462,2.131243,4.306601,4.902128,1.601826,4.371917,3.513034,1.723588,4.909948,4.493722,1.762054,4.652049,3.620705,2.806308,1.375317,1.491449,1.764837,4.610319,2.821954,4.191855,1.260165,4.016268,0.021817,2.745408,4.382844,1.270646,2.320615,4.131303,0.137900,0.589672,3.080586,2.494286,4.093538,2.896178,0.280830,4.933511,0.057245,2.345831,2.296568,4.301703,3.614835,0.708341,2.356386,0.554123,4.778810,2.463749,2.849993,1.129370,0.425032,1.558928,4.430776,3.090744,1.697631,2.928977,3.757551,4.751305,4.794769,3.539335,4.230602,1.955254,4.154991,3.108261,2.571157,0.158035,2.871672,4.579355,3.944046,4.245379,2.547174,1.447941,4.609783,2.781166,1.361845,4.724646,0.929815,3.827808,1.120755,4.045001,3.041684,2.631211,2.414427,0.450049,2.098124,1.323529,4.991960,3.500606,3.648957,3.708602,2.810509,3.625426,0.883404,3.699482,0.243774,2.075374,2.812658,0.798277,1.157829,0.175418,0.463829,0.835431,0.430142,0.869962,3.039726,0.070725,2.720778,0.318147,3.164778,1.633269,2.081185,0.017178,4.627371,3.833169,0.207515,4.096001,2.297277,1.371621,2.736341,4.827450,2.190265,1.365167,2.821648,1.087283,2.404835,1.783032,1.966488,3.594071,0.534514,2.753936,1.220188,1.615513,2.776980,2.911789,2.194565,4.646636,0.672285,0.727177,2.186325,1.761857,2.237417,3.285329,4.067201,0.432474,4.732269,4.203289,1.434922,3.794892,0.819165,4.461493,3.241599,4.197469,2.124157,4.178743,2.477048,3.761333,0.012977,1.100750,2.964267,3.174802,0.536741,1.207548,3.660382,1.401287,3.411007,2.614465,4.235754,3.100826,2.783271,1.479931,1.010367,0.461807,3.985530,1.854125,2.129993,4.658971,1.026320,3.173966,1.847160,0.018448,3.423117,0.304721,3.352437,2.283892,3.108134,3.173882,3.193274,2.539929,4.375848,4.440590,3.860684,4.831157,3.408959,3.912074,1.434002,0.271461,2.317461,0.030909,3.803518,2.056287,1.762662,0.313523,4.805485,2.518462,3.058083,4.568451,4.270054,2.056410,2.603402,0.710255,4.797000,4.560404,3.013796,1.495173,4.522031,1.038431,0.023293,2.365442,4.045795,0.068591,3.449192,2.952848,0.475157,1.428857,4.168932,3.271606,1.944980,0.708044,2.564022,3.270637,0.338176,1.068258,1.408208,2.682382,4.598150,3.350157,0.041089,3.848019,0.251592,4.279381,2.123275,4.521611,2.911680,1.786155,3.125162,0.436854,0.017933,1.044533,4.272537,2.164500,4.157907,1.466685,3.499038,0.376229,4.715451,4.147694,0.753398,0.960756,0.085093,4.910161,4.371221,1.243278,3.083580,4.220989,4.014757,1.200761,2.669428,3.006563,0.813135,0.674013,0.721717,4.993746,3.558405,3.748554,0.809176,0.010643,3.170120,0.122474,4.428405,2.839603,0.436199,1.471729,0.398173,3.612492,3.391997,2.824841,3.197312,2.673995,0.076590,3.767821,1.129360,4.743346,0.797926,1.849051,1.968911,0.247592,0.736817,4.794303,4.908746,4.927377,1.323183,1.131045,2.267466,3.632825,0.841224,4.458443,1.879020,3.805794,0.186054,4.824866,2.766303,4.342063,3.155753,4.436048,3.212618,3.406841,2.212391,1.645857,3.886752,0.969227,4.708620,4.804058,4.749575,1.608288,0.421665,0.535437,3.491591,1.592726,0.043916,1.263414,4.388223,2.104412,0.761782,3.537696,4.388139,4.512057,1.532319,1.938043,2.568259,0.746081,0.076143,0.647092,4.413970,1.053400,0.041202,0.314098,0.088703,0.716933,2.453818,4.796784,2.856550,2.948878,2.209104,2.615322,2.689918,2.396917,2.601720,3.837519,4.144984,0.391100,0.462142,3.374297,2.085511,1.471809,1.703035,3.006273,3.512767,3.767328,0.557800,1.365212,1.321154,1.685856,3.947607,1.446174,0.246607,2.183338,3.980511,1.769617,2.956213,1.575667,2.948472,2.855035,3.077660,3.721638,0.841841,0.700590,0.376431,0.607379,1.996821,4.487518,3.892630,1.343822,1.518386,3.544904,2.757598,0.166485,4.550474,2.961995,1.224399,3.714867,4.415848,2.137354,4.541292,4.390317,2.248685,1.453260,4.559542,4.048965,0.068047,3.340236,3.342468,3.516662,0.573703,2.892281,3.478556,4.942923,4.773368,2.722646,1.542126,1.474953,0.221065,3.838667,2.664862,1.316771,0.299348,1.157254,2.649778,4.058516,2.546593,3.877529,4.884514,1.005286,0.792039,4.131001,4.894789,3.055279,2.969481,4.935601,3.634792,3.025456,0.923187,0.872681,3.257719,3.612396,0.560996,0.179578,3.931152,3.818388,2.951802,1.965601,1.403873,4.005410,1.733946,0.826524,1.424374,0.741120,4.960530,4.101245,4.942690,2.545165,4.026153,1.607835,1.615113,2.414714,1.652595,3.011658,0.529897,1.287233,3.168733,2.788966,0.375965,1.416305,4.875361,4.770590,1.135981,2.657342,3.123873,4.532935,4.453632,4.254217,4.869099,0.120594,1.691020,0.118177,1.647903,2.555211,1.209710,0.560352,0.833369,4.993918,3.677229,4.152578,4.559245,2.689134,4.789056,3.133479,4.229979,3.984406,1.054241,3.941816,4.433593,1.229414,4.245845,2.315965,4.830925,2.154346,0.395289,0.777406,0.109387,2.716547,4.726360,0.907494,4.373882,1.022980,4.773235,0.223040,0.198525,3.517841,0.928281,3.400306,4.145978,3.597358,3.382736,0.599856,0.762824,4.727409,3.366954,3.802810,4.517543,0.812373,4.040943,0.115029,4.144324,3.942746,4.766703,0.316824,0.472650,1.459537,4.851234,0.600524,2.883209,2.332146,0.843764,0.247751,0.822103,1.590353,3.389307,3.945846,3.065900,0.818690,3.388319,3.506849,4.584183,1.265618,3.407350,4.930719,2.229280,3.804332,0.584183,3.358453,0.655375,3.711255,2.495582,2.716912,4.407632,3.135029,2.064421,2.207949,2.711300,3.321285,0.385441,3.509996,2.279607,0.328152,1.990821,4.896637,0.707290,0.651900,2.068647,4.596839,3.701339,0.612466,3.593721,2.720688,3.900445,4.397418,2.626399,1.093868,0.260491,4.885378,4.081898,4.978410,4.269496,0.565723,4.565070,0.659591,1.787995,2.032760,0.099966,0.568058,4.562064,4.559224,4.312215,0.721414,1.543246,1.323880,3.240228,4.191047,4.676238,1.688951,1.827235,3.947390,2.397374,4.382133,2.151007,4.888384,2.674542,3.550599,1.874885,2.818648,4.698364,0.790168,4.887270,2.795196,4.238639,2.835151,2.731935,4.595334,1.839820,1.873085,4.397939,4.140500,1.652181,1.391565,0.614814,2.798207,2.514797,2.588479,4.066082,3.857453,2.855914,0.532422,2.064136,2.799231,2.524095,4.522555,4.205886,0.524132,4.913618,1.903278,4.397118,2.051196,1.452838,3.538453,2.346310,3.562249,0.813133,3.457615,3.835118,1.436052,4.389359,4.012751,3.336712,0.783373,4.936044,4.147661,2.517911,4.822589,1.635477,4.365475,1.903817,2.961898,0.405062,1.170383,1.374595,4.400810,4.205307,4.717994,2.964155,4.181915,3.662286,3.445793,0.560377,3.390991,0.275347,2.595656,0.051975,0.816594,3.430694,1.228765,0.405522,1.821917,4.075410,4.711500,1.067009,1.491451,1.841214,4.621991,3.452728,0.446694,4.812617,1.409928,2.228173,4.919037,2.130566,3.328029,3.731854,4.362616,2.251097,0.474967,1.787848,2.869848,3.705516,3.345527,2.895079,1.636380,1.728576,3.909503,2.983122,2.865442,2.977718,3.792188,4.753644,1.512958,4.913442,2.075940,4.944306,0.838459,4.414200,1.535752,3.578540,4.134101,0.845114,0.715474,1.035585,3.564804,4.887169,2.053267,0.487608,2.468819,0.565774,0.967135,1.910181,1.461698,4.129847,4.483827,4.412892,4.607375,1.044276,1.737050,3.510345,1.328684,1.267864,1.294607,3.090847,2.280767,4.067768,3.691260,1.429074,1.811479,3.372162,1.715763,3.289365,4.772106,2.415040,3.697256,2.602710,3.366618,4.024663,3.874909,0.653273,0.040499,3.300825,3.641763,1.168085,4.809259,3.791324,2.560887,0.484787,2.997037,0.601376,3.436914,2.112461,3.094785,4.962032,1.565369,3.659580,3.081238,4.280891,4.959151,4.519503,0.429984,3.046041,1.539214,4.679441,1.835841,3.458473,1.505798,2.457489,3.663534,4.917673,4.705212,3.455244,0.253625,0.563591,4.641078,2.068737,3.043010,4.294806,4.342802,1.932524,2.933268,3.442358,2.204280,2.808880,2.706193,3.934038,4.017325,4.660688,4.709071,4.722783,0.080843,1.005474,2.501698,0.379152,4.984817,4.332575,0.240799,4.439163,1.617748,4.833486,1.661430,1.128395,1.441535,2.930711,2.791359,2.663897,0.339862,3.564093,1.577436,2.660157,3.301394,4.195907,1.545121,2.384640,3.235410,3.055004,4.138525,1.386631,0.321359,1.349912,4.605212,2.574961,0.663744,4.686362,0.090795,1.979110,1.719280,4.214485,1.654859,3.021190,2.281062,1.381602,4.973504,2.121747,1.845238,3.087269,1.575525,2.528501,2.344005,3.410715,2.301546,1.329787,4.599675,1.262525,3.677459,0.469586,2.352206,2.853886,2.200801 \ No newline at end of file diff --git a/arpack/src/test/resources/geC.mat b/arpack/src/test/resources/geC.mat new file mode 100644 index 00000000..c6c17489 --- /dev/null +++ b/arpack/src/test/resources/geC.mat @@ -0,0 +1 @@ +4.323773,3.546459,4.358712,3.871009,0.870356,4.142775,1.916142,0.345785,0.653794,4.989860,0.832172,1.639531,0.986640,3.195514,1.179658,1.323391,4.904651,1.611555,4.377888,4.638659,0.080146,4.530323,3.178469,0.473570,3.809564,1.350545,0.027802,3.941896,3.170014,0.387714,0.196646,3.245587,0.570243,3.651065,4.722636,4.887293,4.826329,1.320208,0.941955,0.198116,3.865749,1.039268,2.426914,3.306411,1.821082,0.063204,3.862440,2.005678,3.160546,2.024306,3.836489,2.783114,0.630367,3.395396,4.288362,0.372779,0.114135,4.999276,0.956155,0.808991,0.639050,0.584675,2.097964,4.431505,0.536952,0.814050,0.564889,3.927554,3.117116,3.660471,4.837592,3.852827,1.932502,4.545367,0.544295,2.223688,3.215414,1.687548,2.616630,4.743003,3.113471,3.193462,1.167730,1.498290,4.911271,3.163943,3.846086,1.828533,4.357467,2.515061,3.296193,3.742627,3.549873,2.737005,4.819027,4.654808,4.401407,1.655100,2.383325,0.996722,0.243578,4.784478,2.804727,4.095389,3.773228,4.660444,1.897328,4.350651,3.121078,0.169871,2.078024,4.491863,2.042073,4.750984,3.464362,2.322535,0.536022,3.648198,1.265534,0.770851,4.997515,2.638533,2.911683,2.653712,3.439864,4.909624,3.754567,2.502649,2.747741,0.714990,4.608471,3.696000,3.514410,0.106176,4.794566,4.432775,4.549788,4.296097,4.704688,1.477935,1.416648,0.479348,1.545478,3.663688,4.193746,1.524594,2.963240,4.312959,4.582136,2.427083,1.021536,4.879920,4.488839,2.508258,1.968751,1.551092,2.297454,2.912605,0.056069,0.846450,0.490753,2.646824,4.511124,1.159858,4.365251,2.907021,1.012213,2.227001,4.399300,4.292396,4.088489,2.675425,0.306448,4.740273,1.969469,0.474121,4.573014,4.797977,2.518829,3.022947,0.107632,3.168874,4.294902,1.549514,2.916664,4.165775,4.250579,0.752322,1.037485,2.461871,2.578203,0.914499,1.182743,1.386688,4.000247,2.858843,1.931369,1.162770,4.459071,3.222898,3.979575,0.178497,4.707668,0.011039,4.563618,3.739310,1.028658,2.616478,0.940441,2.063628,1.056595,4.775896,4.327504,0.838920,1.401448,3.841467,3.919922,3.173912,3.459373,2.013841,3.915239,4.866122,2.924291,1.513093,3.568847,1.512424,4.549622,0.283520,1.158421,0.630628,2.171482,2.315517,2.952456,0.479986,3.370114,2.842845,0.459588,0.140392,2.324232,1.045961,2.309001,1.430321,0.819922,2.144769,1.876557,0.762440,1.693673,1.749599,1.711939,3.980679,3.044960,0.967516,2.934836,2.955978,0.065762,2.305467,3.355996,4.103026,1.946713,4.195244,4.628001,0.751909,0.806262,3.812998,0.994524,3.452310,3.498367,1.243731,0.267467,3.729737,1.221480,4.154332,0.240746,3.016701,4.155027,0.942195,0.132827,1.566196,4.860305,3.075803,1.112310,4.949315,2.444880,1.029824,4.309569,3.317138,1.212031,3.853726,2.955572,0.144436,4.399468,2.876191,1.939590,2.224313,4.499099,3.120732,3.982460,4.854735,4.777107,2.459896,1.648554,1.874424,1.054916,4.123234,2.297275,2.500248,0.620542,4.604081,1.009708,1.890305,1.819506,4.361837,0.764461,4.101652,2.636700,1.458554,3.528973,0.885496,4.881295,0.012045,1.455058,1.412566,1.967369,0.708114,4.372576,1.892839,3.292766,1.894684,4.185496,3.288110,0.684989,0.467969,3.740531,3.242781,1.171511,2.153700,1.934461,1.360133,4.477700,1.877055,3.769510,3.986193,4.550378,0.249321,3.184591,0.566123,1.159504,3.798867,3.738236,3.317342,1.393831,1.355058,4.921314,3.987708,4.577233,1.227065,2.000684,1.458547,4.831157,2.816687,2.626712,3.984708,1.881431,3.909853,3.876873,2.943445,0.794039,1.004901,1.307686,4.678695,1.138341,4.090897,0.331727,1.793730,2.433102,1.466162,0.195348,1.575633,2.913790,3.022528,2.386718,4.872171,4.716416,4.238079,2.074261,4.606597,0.964934,3.020609,3.907413,1.870900,1.741643,2.174312,3.426669,0.435080,1.824185,4.174516,4.985277,3.198518,0.707850,1.243862,3.843925,3.473026,2.397756,4.220981,1.990307,0.599658,0.163314,1.661736,3.641003,3.099124,4.954285,4.381209,1.186375,2.856833,3.939418,3.050399,1.621201,0.807108,3.340716,2.788367,3.651964,2.529993,4.130834,2.191741,1.055266,2.588430,2.906832,0.399472,1.251443,2.938080,1.852624,3.078190,2.130011,2.058052,0.075177,4.458654,3.053358,2.287876,2.263784,3.971760,2.110555,3.685001,4.152922,3.593750,2.922805,1.311097,4.003072,2.840667,1.874201,0.403339,0.063730,4.194937,0.898965,2.188498,2.471085,3.501983,2.269900,3.209818,0.709094,2.809606,1.338626,4.597823,3.929526,3.602962,0.274433,3.313095,2.145595,0.103629,3.520453,3.278373,0.890924,4.672373,1.072188,3.280019,3.068518,0.835225,3.105310,4.197317,4.285161,3.499957,4.527358,2.448822,0.838278,1.410347,0.824473,1.426745,3.510879,4.032119,2.138515,1.764638,1.120273,2.061699,4.107012,3.274509,3.659926,2.152900,2.607424,2.478520,3.653824,4.286458,4.820981,0.971277,4.440760,0.422158,4.646909,2.430350,3.096066,1.133755,0.203874,1.468417,2.711894,2.861037,2.125422,1.063060,2.888467,0.635168,3.643097,4.538723,0.445885,2.864063,1.679905,2.376400,3.382392,4.311730,4.845762,0.117673,2.800207,1.403192,3.343806,2.967676,0.523502,0.456296,0.973200,1.389357,0.202505,2.620988,0.456596,3.859948,4.163172,3.660749,2.845087,0.832025,4.325201,2.952884,3.681756,1.992512,3.507713,1.878424,2.938959,1.815832,0.231679,3.967409,1.897162,2.333538,0.738275,3.028211,1.201914,4.172311,4.866109,1.123532,2.801854,2.068586,4.216746,0.036374,2.157967,3.423819,4.504153,3.997007,2.095204,3.719986,1.101677,3.030058,3.211052,3.263796,0.731166,1.069946,1.585159,2.907228,2.544118,0.654322,2.674546,3.488290,0.932143,2.820409,2.601223,3.298916,3.534086,2.212774,2.977549,0.363388,1.292886,2.126687,4.299700,4.701883,4.754055,2.151541,2.738047,2.209681,0.291639,4.419832,3.209139,0.745650,1.059965,3.480577,2.845850,2.593199,3.826397,0.710121,0.747765,4.050509,2.864565,3.586792,0.944054,0.109404,2.752826,3.866751,0.356934,4.326438,1.710674,2.873875,1.787701,1.856191,0.616959,1.355009,2.436634,1.865796,1.571428,4.007528,0.041222,2.677188,2.377267,3.427826,3.010272,0.998136,0.661166,0.167941,1.081960,1.522729,4.621685,1.915841,2.733625,1.590910,3.576682,4.514836,2.526697,3.120101,0.362779,3.569850,0.475194,4.620224,1.388137,4.694434,3.100100,1.066136,4.470721,0.724898,0.660492,2.242837,1.245515,2.669691,2.225062,4.666951,0.470668,0.429940,1.749001,3.733577,4.908182,0.913162,0.632247,0.125020,0.029586,1.485024,3.926450,4.623387,4.963475,4.617855,0.623429,3.639958,1.065012,1.172508,3.662797,4.749055,4.990298,0.214198,1.057015,0.062498,4.616830,2.175148,3.913364,2.954981,1.471295,0.358823,0.790079,3.553473,0.593146,4.485375,2.952637,1.341403,1.942471,4.123198,3.370633,2.426280,3.644053,3.469586,0.557017,2.184009,2.495732,1.093085,2.772602,2.744604,2.896497,1.929825,3.015199,0.751371,1.923477,1.261733,4.722236,2.105619,0.285386,0.761131,2.891282,4.146503,3.335293,4.393213,3.080866,2.181749,3.393380,4.068780,4.426880,0.556389,3.903320,4.107895,0.151169,1.086998,3.697595,1.020472,2.162194,1.601439,2.489887,4.930764,1.770213,2.804721,3.941545,1.264836,4.190961,4.459448,2.939830,0.090235,0.376771,3.020161,2.737454,1.665276,1.300270,0.671247,4.352213,2.063604,1.247666,1.607486,4.426930,2.525227,4.250230,2.841564,2.206406,1.240194,1.846951,2.456045,3.319856,3.031262,0.036781,0.502358,2.018093,1.862470,2.993368,2.729131,3.817698,4.942977,0.295192,3.224945,3.173678,4.139828,0.373185,3.452314,4.904688,1.398117,1.573764,4.158331,3.494663,1.217445,2.651180,0.161516,2.157859,1.270797,4.602696,0.166705,4.218580,4.806847,2.891880,0.757443,1.103819,1.693808,1.412476,4.691146,4.505223,2.832831,3.574906,0.287011,2.961529,0.176098,0.658866,1.594241,0.078065,2.412817,0.265017,1.467954,4.154553,1.121497,1.974697,2.778464,3.103773,4.659936,2.251953,4.963834,0.858586,2.367650,2.097157,1.771745,3.044158,2.066245,2.030812,4.699038,4.727909,0.297076,1.103852,3.598813,1.297175,2.644194,1.367499,1.917156,1.866804,2.538969,1.568538,2.938859,3.368185,2.927623,4.899460,1.076008,1.798350,1.721014,4.142680,1.362018,1.672765,3.595269,0.940085,1.937184,4.330827,2.927222,3.245753,1.180301,0.028737,0.111100,1.341863,4.787935,2.139321,1.521098,1.217182,4.962860,1.113224,0.694986,2.612882,1.606689,3.240513,1.359688,3.715647,2.938585,3.529676,3.816281,0.888937,1.838904,0.996308,3.194964,4.693735,0.808978,1.923068,2.576262,3.272033,0.828861,2.746278,0.803288,1.313271,1.738683,3.200063,1.396191,3.710070,4.942860,1.467785,1.689172,2.088739,4.392593,1.362356,2.148667,0.720489,1.825511,4.041079,2.837664,2.674340,4.218350,0.464918,3.629059,0.178906,4.471055,1.026245,2.978834,0.561597,2.743229,0.979189,4.031528,1.536681,1.426575,1.901523,1.117200,2.975531,4.379561,3.677056,3.917633,3.272659,1.507968,4.776863,2.414954,3.944327,1.080217,2.196089,2.603083,2.723026,4.671615,3.756744,3.633191,3.008844,0.846307,0.611911,0.979010,1.849443,4.676674,4.107899,0.544323,4.243472,2.046313,3.213919,0.882617,0.819024,4.145813,2.247471,3.887330,3.839880,4.726268,4.577843,3.255953,3.066516,4.256937,3.648886,2.170254,1.340488,1.763856,1.483932,2.140592,4.929993,4.543696,1.454053,1.064710,0.196779,4.889961,2.912821,4.829139,2.246705,0.713677,4.961975,0.633873,0.362937,0.672462,3.712115,0.661849,2.855783,1.211307,1.893556,1.757966,2.322254,1.407077,4.352867,4.906310,2.581843,2.436115,2.977129,0.466710,1.535978,3.770853,2.970169,4.160624,1.689582,1.658652,2.317639,1.440970,1.397589,2.004034,2.342378,3.173819,1.838205,3.654446,3.832742,4.560029,3.629043,0.889892,0.451470,0.254395,1.302290,1.685565,1.753566,0.037721,0.848134,0.262968,4.929286,1.840710,3.466993,2.944506,3.867356,4.078744,1.975079,2.347819,0.046120,3.299516,1.117920,1.857894,2.649122,2.199209,2.987305,4.797184,3.756050,4.398027,2.859907,4.629038,3.827468,3.239808,1.058228,1.319361,1.322787,1.237397,1.017838,3.646106,2.555435,1.509357,3.576405,3.486471,3.215685,3.734331,1.045997,3.262072,2.570672,4.758754,1.498911,0.168635,1.475741,3.180425,4.348067,0.638726,1.503879,4.985368,4.491893,0.736010,1.046137,1.749600,0.772814,4.667505,2.453309,0.012511,0.172070,0.848754,4.512290,0.616912,1.788689,1.085816,4.129902,4.541781,4.125123,2.303839,1.094954,0.957062,3.193598,2.486492,2.792828,4.307394,4.757288,4.524888,1.196640,2.098332,2.836678,2.444176,1.279335,1.248031,1.398492,2.835101,2.784711,3.625135,1.199222,4.654176,1.060832,3.424751,3.034463,0.493260,0.963843,4.088119,4.656424,2.155584,4.650609,0.008616,2.748124,4.190916,2.995261,4.272746,0.927330,1.309386,0.464492,0.482598,3.524631,0.439840,3.691917,3.745370,0.305678,0.582181,1.535956,0.322162,4.081171,2.311762,0.050239,3.817257,2.077926,2.197482,4.293182,2.265903,4.002028,2.007338,0.396405,1.744635,0.326716,1.037693,3.800939,1.202333,0.500337,1.695352,2.866864,1.275769,3.856208,4.960962,3.242782,3.415703,0.802384,4.145107,0.276959,4.570503,1.634445,1.285823,0.527288,2.717612,0.268664,2.447502,4.069898,3.790597,0.496527,2.416034,4.372535,3.490361,0.295557,0.964409,4.622708,3.321067,3.901239,2.747867,0.543946,2.428477,2.646121,2.227457,4.894819,1.439841,1.270799,2.236811,2.598775,1.600670,4.947341,0.577809,4.906823,4.583098,4.664954,1.916224,3.034037,2.908207,3.016519,0.298802,4.067786,1.836035,4.580344,0.925709,2.890244,2.992961,0.137494,0.953822,2.409440,2.983439,0.438759,1.546698,2.707435,3.393856,4.180835,3.801396,3.910484,1.402299,1.613764,3.143283,0.867876,4.544555,3.623519,0.289458,3.754408,2.614004,4.695679,2.522139,2.880484,4.196278,4.598141,4.456950,2.822342,3.133187,0.006523,2.859470,0.926542,2.906921,4.945087,1.729122,3.638405,2.406638,3.427764,4.191498,3.578248,1.409986,4.269387,4.893220,4.555609,2.983964,4.417183,0.788780,0.982343,1.286287,3.858425,1.204991,3.601663,4.184494,1.009167,2.746391,4.189847,0.377071,2.968313,0.971100,4.440389,4.391988,3.028553,1.812183,3.893210,1.400093,4.086360,1.002027,0.639617,3.440453,3.582565,1.485007,1.185148,4.637044,0.272260,2.958274,4.015000,4.786479,3.711573,4.047982,4.634441,2.220863,0.333536,1.232328,4.977277,0.938955,1.217686,2.017922,4.367973,3.971122,2.957755,2.504383,3.440082,0.854031,2.935130,2.502532,2.886262,4.028389,3.253353,4.578378,3.008487,1.305354,1.977135,1.823890,3.488716,3.323962,1.370078,4.635755,0.232547,4.367103,2.031649,4.761143,4.435452,2.947974,0.517617,3.600636,3.581022,3.184040,1.300635,3.313933,0.930035,3.673046,2.929662,0.021166,2.729598,1.401881,2.740063,3.098261,3.173821,0.323966,1.149409,3.983986,0.419542,4.229794,3.663323,0.345818,2.410228,1.026782,0.789410,2.485378,1.243597,4.696974,1.687749,0.630680,1.338353,1.107852,3.910434,1.057084,0.906981,2.611711,2.432205,1.508344,0.749510,4.441927,1.734593,2.863645,1.066149,1.369161,2.419242,1.943737,1.884850,2.811336,3.543431,0.127994,0.409722,1.846286,1.253434,4.456280,4.446138,4.944517,1.815119,4.110109,3.267897,2.033222,0.100325,1.636004,2.075255,0.314431,0.570696,0.764460,0.007857,1.805024,2.762167,3.078358,1.391293,4.056581,3.871888,3.468979,3.299849,1.456259,0.616844,0.803344,0.269463,1.485235,0.175458,2.656384,2.255307,0.483537,0.339622,4.016618,1.769898,4.442828,0.114220,1.711391,2.057775,4.624710,0.186191,0.837958,3.070619,1.841619,0.388853,4.007167,1.352769,3.402001,2.579010,0.741772,1.423691,1.257294,2.621604,3.870488,2.909907,2.699001,4.783382,2.161626,4.534315,1.149975,0.779520,3.826329,0.812219,2.409985,0.070482,1.665134,2.060961,1.757683,0.842093,4.766042,2.883733,3.896693,4.863189,3.132860,3.861266,3.135700,4.532897,1.700958,4.657748,1.275595,2.619303,1.752859,3.915622,0.641703,4.114728,2.691521,4.736604,2.280967,1.532881,4.573374,2.954653,0.633009,2.793575,1.347740,3.660331,2.792906,0.600153,2.191909,3.462621,0.643395,2.995911,0.120313,2.564201,0.033519,1.773819,1.866815,2.228883,4.382406,0.796964,2.867239,1.419986,4.536884,0.252389,0.803892,3.652693,4.142059,3.265644,4.870401,2.459838,1.681860,0.300210,3.232986,2.754321,1.170739,3.794334,0.688818,0.983415,1.015026,2.901587,0.170543,2.169281,4.857034,3.852198,3.961718,4.437874,2.059135,1.400580,4.799408,3.240118,0.767697,4.940605,3.359060,3.928571,1.252762,2.495475,0.708524,1.873951,2.738288,2.115238,0.342193,3.617420,3.888669,2.029479,1.195875,3.402812,2.852911,3.275289,1.875155,3.119963,2.027268,2.696127,1.390639,2.018451,1.403748,3.231583,0.811541,2.912760,2.908090,4.090941,3.750341,0.130369,3.012998,0.400486,0.368727,4.197036,1.305159,3.693145,4.925696,4.942005,3.498297,2.820367,4.053569,0.920922,4.950655,1.010295,3.492271,0.360257,0.748797,1.018285,2.160178,1.053928,3.736780,1.533849,1.799551,3.283729,0.155920,4.725340,1.879777,1.154153,3.933833,1.772336,1.778533,1.460759,0.492377,3.581033,3.051811,4.934622,3.126796,0.156601,2.370163,0.148551,1.634628,2.655737,4.766176,0.104621,4.836407,4.532202,3.377775,0.472938,4.824944,2.820303,0.004984,4.139423,1.109147,1.356616,2.979628,0.588073,4.621459,3.296807,1.717470,3.680562,4.315481,4.162930,2.945106,4.019141,0.805370,3.128842,1.768919,1.517706,0.725910,0.198824,0.094482,4.383962,3.425200,3.380513,3.003283,1.913292,1.765200,1.389334,1.714232,3.547161,2.465425,3.766188,0.465413,2.491093,1.934203,0.090021,0.827100,0.456186,1.781359,3.591313,3.227388,3.014366,2.483003,0.430715,2.739157,1.072809,4.242286,1.045109,4.133360,2.803711,1.902261,1.310067,2.581000,2.901758,0.733856,4.929660,0.882763,3.548966,4.888976,4.887168,3.795965,4.667605,3.824491,3.142907,1.068229,0.403399,0.205396,2.098746,2.946795,2.047442,3.682363,2.601587,1.414711,4.755175,1.946583,0.586221,3.947060,0.990782,0.490735,3.252763,3.752398,0.262233,3.303759,3.603396,3.128656,4.286385,0.182791,4.772005,3.141989,2.443587,0.432005,0.231787,4.376000,2.720724,0.699000,1.345026,2.663104,3.938339,1.950015,4.675890,0.922995,4.026559,1.041650,1.801384,4.523904,2.951275,0.619079,1.172875,0.007119,1.632743,2.644233,2.841737,4.714417,4.335764,4.366108,3.791407,2.563492,3.300249,3.076978,2.565980,3.675668,4.800003,2.212340,1.576373,4.931561,3.955680,4.897814,2.028804,4.977977,2.814883,2.159794,1.916497,1.758178,2.096572,2.473020,4.679584,3.120076,3.122450,2.515131,0.366019,1.515661,4.571638,1.426218,0.998473,0.060245,2.922963,0.286331,4.053605,2.748473,1.972794,3.992163,3.798943,1.968322,2.067289,1.222166,0.196621,1.159190,1.416856,3.482855,4.475451,1.254392,4.562029,1.135908,1.565200,4.388401,1.321021,0.809039,4.586656,3.094221,2.577620,3.823332,0.304470,0.396168,1.727060,2.233573,0.008827,4.015985,0.908802,1.922223,3.103509,4.130939,2.649100,1.917702,3.659230,2.296507,4.738146,3.782716,1.995016,2.225002,4.081852,2.084881,3.441114,2.119990,3.560589,2.079556,1.391609,1.240850,1.557032,0.520567,1.958920,1.686133,0.256442,1.220040,0.654701,2.571593,3.427578,3.191036,3.899767,0.600457,4.961853,0.593810,4.969127,0.610704,3.014428,3.893048,4.282371,2.470308,2.105438,3.398741,1.347642,4.048256,2.196576,3.302231,3.346346,4.162020,3.601568,0.223388,1.679040,4.677818,1.091162,3.990124,2.233254,1.018638,0.091066,2.505283,0.763541,4.177692,2.770859,1.217422,2.533164,2.672442,2.811354,4.597848,2.220361,4.975467,3.386478,0.178797,1.207125,0.136171,4.669689,2.517335,4.603315,3.326535,2.772671,0.603544,2.275902,4.432653,2.382262,1.791918,3.578811,0.077402,3.727536,3.851236,4.533924,4.951494,2.865568,0.837164,4.503318,0.438559,0.697524,4.324000,3.007707,2.853545,0.338525,1.783102,0.064202,4.955154,1.722716,4.004810,3.507685,2.847419,3.364709,0.578298,2.759972,1.496205,2.861417,1.358581,0.529659,0.626275,0.681141,4.001570,2.861221,2.862454,1.275855,4.124074,1.563724,1.630859,0.194736,2.065836,2.065837,2.464442,1.350588,0.809067,2.272887,1.589803,1.864036,1.174392,1.492793,1.929578,3.319312,3.230938,4.621188,4.959932,4.917859,4.654683,2.948101,0.666368,1.016368,4.891837,1.642301,1.702880,2.645496,0.015224,2.762344,0.746484,2.223143,0.431184,0.932933,1.882702,2.625523,3.147523,4.835813,0.527759,0.536201,0.010042,1.392223,4.009335,3.341454,4.092070,4.923420,4.646560,3.492002,0.114413,0.321292,4.952992,2.099680,4.043703,2.705204,4.663946,3.684027,2.899919,2.034098,2.348123,0.115866,1.051525,4.816879,1.973846,0.471859,1.969492,0.634352,4.312787,4.411763,4.519680,0.110045,4.163851,1.911826,0.882684,1.170956,2.339226,1.458287,4.339920,0.618866,2.870830,1.612408,0.587458,1.108942,3.082228,3.998720,3.036699,2.882997,2.275837,2.432604,1.562087,2.746761,3.238299,2.514129,0.741711,3.958124,4.118483,4.195076,1.385158,3.856048,3.527723,1.715492,4.086737,3.056614,3.242260,1.720171,1.158447,4.355425,1.005546,2.586796,0.099368,1.385516,0.058755,0.273839,1.722240,2.755229,3.984732,4.019386,0.297034,4.857054,3.779579,4.933186,0.410179,0.436993,2.517058,2.002568,4.814744,1.516631,1.767127,0.076214,4.567262,3.710413,1.211640,2.314082,0.630682,0.711099,3.428399,2.111191,2.945197,0.074343,2.270484,1.217887,2.961639,1.269659,0.288934,1.198040,0.087634,0.935412,3.568559,4.278933,3.952785,1.039126,3.261076,0.618389,0.862704,3.330992,2.220740,2.299635,1.653530,1.730135,2.238288,4.341697,0.756700,2.647863,0.028621,3.532582,4.123795,4.178636,3.463183,1.475270,0.427260,1.481532,4.284693,1.160412,3.527038,1.989807,0.552388,0.961172,3.965879,4.811399,2.679297,3.347875,2.690094,1.161182,4.252112,4.343696,1.318305,2.184888,0.099420,2.421957,4.630825,0.507934,1.100519,3.818080,0.765620,3.896456,2.972098,3.318801,2.648538,3.135903,2.358580,3.350537,4.353873,0.533414,0.937915,0.371031,2.883894,4.829827,3.879844,1.358393,1.976207,1.761985,0.614428,4.508504,1.770754,3.897351,3.247198,2.676061,0.088850,1.704812,2.569364,0.421816,0.940114,0.174562,1.635945,2.793414,3.739362,2.861004,0.492520,1.732593,4.222380,1.159474,3.530891,1.454856,2.488467,2.169434,4.039278,0.664103,3.593209,1.577819,2.249911,0.165555,2.102521,0.035078,3.172947,0.743602,4.650297,3.156163,3.489548,1.514315,0.900261,0.012519,2.155350,4.913388,0.589606,3.439597,1.465413,2.874442,1.008631,1.351875,4.242879,2.976652,1.532809,2.461492,3.694409,0.909606,3.011764,1.798549,4.996990,4.167165,2.476942,2.476159,1.881904,3.752791,1.967562,0.866174,0.239086,4.083569,0.685906,2.465544,3.955741,4.219491,4.366359,0.048219,1.517977,2.567880,4.077711,3.763539,3.189811,0.555801,1.153177,4.996995,4.943837,1.665277,3.375523,2.668545,1.178825,2.998883,3.091995,0.662226,0.052793,4.563526,3.230117,4.419347,4.377989,2.130353,2.229111,3.683738,1.533478,2.035696,2.325857,4.605683,1.648900,3.009238,2.787955,2.007559,0.667554,2.026041,4.195613,2.027924,1.623352,3.042941,0.673761,1.045375,4.246913,2.843540,4.435303,2.890739,0.172037,1.643617,1.432536,2.959435,1.250813,2.624602,0.899870,1.831327,4.836161,1.549872,0.678902,0.287155,2.987829,2.444428,0.141905,1.041490,1.073639,3.108368,2.779665,4.942903,3.922990,2.436859,3.776536,4.272519,3.827228,1.598896,3.644994,1.840182,1.243138,4.251819,4.739269,2.485815,4.597019,1.620319,2.541519,1.722039,0.034071,3.291168,0.362188,1.160953,4.578867,0.270256,1.954359,0.937653,4.897453,3.189629,0.884491,3.234187,3.524320,0.324116,3.122476,2.557690,1.429116,1.748025,2.044298,2.509344,4.048260,1.118985,4.462379,0.565740,0.638147,0.953008,0.807743,3.774210,1.643134,1.311118,1.791928,0.992167,4.084176,2.942641,1.398302,4.998255,4.596012,3.457878,1.469415,0.174157,2.610584,3.863473,1.632514,4.358874,3.894162,4.433694,2.705922,3.050594,1.551253,3.385236,0.188950,0.883216,2.285034,4.450724,2.832147,3.740569,3.523426,0.503900,0.384734,3.024749,4.511315,3.264333,1.069883,1.233605,3.376777,4.460509,1.016005,3.849887,2.439977,3.912186,0.996585,4.361119,3.039053,1.815531,3.522266,3.415415,1.097089,0.011725,0.250947,4.803966,2.604490,2.199826,1.732629,4.377852,3.351554,4.489942,0.994376,3.214162,4.521648,2.771603,1.246135,1.280721,1.805730,4.163091,3.761249,3.352759,2.901535,4.635338,1.130411,4.161933,3.827665,0.231518,4.039279,1.475051,4.853145,4.888521,1.778969,0.564504,2.275701,3.009060,3.836645,4.211602,2.622029,3.913211,1.015855,0.528678,1.744006,4.963354,4.483960,2.500287,1.576431,4.779510,0.855204,0.997851,0.746546,0.999893,0.568044,2.506954,3.103340,2.630627,0.052201,3.975384,0.567231,0.019080,3.892054,0.864608,1.956480,2.888017,3.598484,1.122368,0.460770,1.505161,3.957209,1.716294,0.909492,4.510062,2.342725,2.052436,4.305110,3.990265,2.510368,3.046134,1.420920,1.256436,1.037513,2.573144,4.577338,0.341625,4.765736,3.822778,3.932590,3.400707,0.897939,4.817952,1.710826,3.857543,3.740361,4.667791,3.737015,1.694196,0.104905,1.167207,3.301380,1.024063,2.656805,3.531265,1.017451,2.413457,2.951586,4.872174,0.826267,3.593732,0.523320,0.522375,1.016417,3.265230,4.019981,2.916124,4.143936,1.915252,3.062029,1.583872,0.321537,2.453321,4.896458,2.641014,2.432658,2.261400,3.373781,2.037578,4.592128,0.860715,1.695876,0.167396,4.370966,3.808057,0.484103,2.798866,3.091853,2.795869,0.505435,2.702915,1.080164,3.771858,0.769859,0.153787,4.199431,1.690201,3.278100,2.263619,0.152492,2.881634,1.038684,0.784138,2.215494,0.822031,0.909558,1.945070,0.510058,0.848731,1.514532,2.462068,1.793398,2.857449,0.507843,0.371331,0.429347,0.220704,1.881573,1.182020,2.349513,1.612400,4.403710,0.955575,0.916852,0.493905,3.070285,0.557012,0.379171,4.699668,0.361363,1.587565,2.021588,3.191835,3.183179,0.139142,0.714732,4.699943,2.042637,1.877159,0.078458,0.219786,0.416652,2.985553,1.570980,0.004515,0.987314,3.965921,1.365639,3.589971,1.415353,2.777230,0.863131,2.037549,1.260410,2.384438,2.405962,3.031376,4.537196,1.287368,3.486086,2.611228,1.373524,3.246741,1.365113,4.611453,2.329953,1.910545,0.485475,0.878888,0.653263,1.725537,0.791560,4.421704,4.008342,1.114708,4.218313,3.723341,4.416732,1.446866,0.295284,0.916577,2.047247,4.760320,3.656662,0.047327,1.665191,0.752310,1.101484,2.665282,0.578119,3.180873,0.016747,3.492391,3.867170,3.685164,0.051870,4.767349,4.958248,4.568650,4.598585,4.845358,3.506462,1.275914,1.331356,0.090636,0.335279,0.288142,1.647467,2.978037,4.488922,0.253391,1.248881,2.065560,3.026810,0.089549,3.899582,4.143919,4.200000,1.790153,1.547555,3.600738,4.433145,3.726804,0.929857,4.883500,4.677242,0.335154,0.485455,4.871314,3.742728,3.947187,3.573664,0.552123,4.231801,3.524434,1.152683,4.482490,1.288508,0.400937,0.869570,1.714831,2.008851,2.553587,3.160647,1.406422,2.202398,0.531637,2.370227,4.967054,0.518636,1.324233,3.528942,2.103172,2.607445,2.412603,4.506690,3.255364,2.470868,2.093478,4.566743,2.201727,2.349254,3.319584,0.107737,0.012145,4.273611,1.834946,0.722939,2.267243,2.631018,4.296437,2.725203,4.138601,0.765926,3.173216,0.747898,1.207225,0.222786,4.712137,4.856965,2.803510,0.447391,4.637416,0.136248,2.625766,2.533601,0.076346,2.061387,2.031531,1.818862,4.919480,2.806477,2.656614,3.888664,1.446300,4.626808,1.662397,4.998252,2.118113,3.734366,2.968102,3.049457,0.968807,2.749530,1.762442,4.744115,4.531405,0.318080,4.907727,1.052738,2.814746,1.014229,2.544798,1.057231,4.563925,2.663425,3.847544,0.664363,0.408589,3.484984,1.919353,4.330233,0.617153,4.471062,3.140955,3.118507,0.661636,4.334708,4.016943,2.776229,3.912274,1.518195,3.802794,0.126485,3.198578,4.236878,0.879229,1.606537,3.818095,3.423785,4.919911,0.979567,2.605721,3.015992,3.189707,2.689983,0.500976,1.705124,2.736604,4.958241,0.422728,3.378007,4.233264,3.916333,2.274939,2.112538,3.768250,2.562209,0.222119,3.901454,2.049808,1.548085,1.146032,0.809825,1.799910,3.316521,3.058453,1.263491,2.490962,1.123739,2.264456,3.030825,0.242144,1.372716,3.080115,1.398593,2.471864,0.352088,0.930474,4.582024,0.513872,0.727691,0.184839,2.078689,2.658328,4.663423,2.613017,2.374007,4.805337,1.213882,3.418923,1.805053,1.495626,2.345199,2.200465,0.167590,1.193477,1.623590,1.396173,0.824546,4.725249,2.735375,3.303098,3.164352,4.727537,4.865553,1.269146,4.305211,0.606120,2.244350,3.202956,4.734583,4.140591,0.755971,4.815986,2.681993,3.573753,2.017398,2.304475,0.052424,0.765981,0.164058,1.143976,2.496232,1.476947,3.238574,4.675890,3.584951,0.911173,1.345928,0.725077,1.122412,3.736175,4.453052,3.700395,3.307636,4.836265,2.178247,4.748943,4.642815,1.718950,1.031224,0.518793,4.941465,2.655236,1.188633,2.947007,2.228921,3.872841,0.729994,4.497309,3.950781,3.710123,4.593153,1.595843,3.617298,0.290600,1.790542,2.698085,4.658964,3.908578,0.548666,3.839196,0.632869,4.091902,4.062289,4.575657,4.989308,0.298659,0.116405,3.384196,0.631772,3.798737,1.156805,0.128719,0.255473,2.108858,4.367081,4.960027,3.760794,0.432366,4.957352,0.363819,0.962439,3.973305,1.095565,2.221841,2.164362,1.179371,3.462564,0.915485,2.614105,3.937923,2.249618,4.590532,2.909242,0.652486,4.098492,4.294115,3.107098,3.917049,3.718580,2.515568,2.809837,1.952232,3.471053,1.282300,2.678943,2.333663,0.605422,2.578700,1.818151,1.690181,0.479179,4.311053,3.643404,2.810285,4.154516,2.640110,1.376596,3.758420,1.918810,4.624600,1.629053,1.377195,1.588101,1.802324,2.320474,0.174632,0.280785,1.930726,1.480935,3.109615,3.102892,0.406359,1.136255,3.142121,4.487758,0.174452,2.161130,3.762234,1.817308,3.746424,0.944302,0.672385,3.506422,1.086976,0.198617,3.307665,3.640055,3.952382,0.106124,3.219514,3.733187,2.923258,3.767696,2.398511,3.806494,4.305420,0.004080,4.658516,4.301625,3.847710,1.185581,1.957045,3.477100,2.177035,3.760548,4.299675,3.036150,3.467480,0.554689,3.035177,0.444028,0.108235,3.688795,4.241859,3.471040,3.215261,3.424895,4.809112,1.452481,3.458491,2.219155,2.133023,3.618905,3.052763,4.140353,3.685715,4.153082,0.471383,2.867859,0.890193,1.845380,3.340617,0.159670,0.001725,4.805153,2.230819,0.251258,0.264310,4.761787,4.866362,1.729663,0.904885,2.159009,0.155365,2.821000,1.377506,2.370259,1.385238,2.060358,3.810394,1.907745,0.928695,4.557615,3.523245,0.540097,1.385953,2.413317,3.027351,1.811036,4.240294,1.848835,2.907247,2.043429,4.698514,0.981046,3.510540,4.016081,3.666177,0.596938,0.395618,4.491847,2.831151,3.694056,4.424928,1.234782,2.386446,4.738038,2.043258,2.402130,2.285519,2.742366,4.240149,2.031771,1.770424,3.134875,0.536091,4.745964,0.941656,1.813316,3.718899,2.909050,1.074470,3.456600,4.358846,0.490858,2.533802,1.417200,0.861149,2.856554,4.908663,4.653072,4.599517,4.491588,4.049227,3.601727,4.412932,0.170373,0.845976,4.164766,0.800397,3.008574,0.858921,2.707724,4.700474,3.050185,4.881734,2.061487,2.151518,2.452998,2.481293,0.682052,2.480654,4.033465,0.306515,1.706046,0.470855,0.072746,4.224933,1.719000,1.513533,1.039919,1.493907,4.906597,3.720035,2.480880,1.052349,0.092967,4.774962,3.543051,0.591831,0.903422,1.082005,1.025771,2.607604,1.999980,4.149154,4.765646,2.692276,0.697411,1.515250,2.944738,1.362027,4.012022,1.416747,2.854365,1.499411,0.332366,1.238828,4.795314,4.393460,1.668283,3.702743,4.164981,4.504386,2.246174,2.677467,1.751609,0.979612,2.015006,2.831982,2.990841,4.582538,3.239148,1.757062,3.327260,2.057277,0.744759,3.875661,0.794228,3.969535,4.287659,3.691236,3.118004,0.285021,4.667204,0.355728,3.972222,0.691504,0.163856,4.650472,0.930317,2.686391,0.567378,3.181294,4.341517,1.140152,1.499208,3.108285,3.052261,4.033696,4.128705,0.052090,4.144991,3.074072,1.485805,0.032113,2.298138,2.931953,1.863692,3.729451,0.386086,0.836833,4.333498,4.608439,2.250086,2.783325,3.446385,2.071994,3.899905,2.626173,4.221230,3.366203,3.706020,0.294120,3.765115,2.346470,1.673792,2.155450,0.868951,0.011569,3.346921,4.152125,4.652268,2.658081,2.516752,4.302142,1.878394,1.592102,4.361916,0.839289,3.928022,4.364852,3.855483,2.383562,4.598023,0.681999,2.175251,4.807630,0.566360,3.822633,2.029270,0.189105,0.262040,2.152221,4.291301,3.906398,2.983608,0.004538,1.924593,1.820390,0.272925,0.876509,4.219365,2.760267,0.622820,0.273284,3.551584,1.853229,4.781362,3.705461,2.916528,3.884010,3.960772,0.853996,2.743208,4.097443,1.775015,0.459097,0.916454,2.994713,4.486543,3.149536,3.334500,2.596080,0.299237,4.004616,3.029565,3.551561,4.352194,1.291433,3.726610,0.560508,3.902674,0.512461,1.564284,1.482388,3.325233,3.895982,2.043801,3.750099,3.681629,0.239339,3.108328,3.996497,2.817536,2.498657,2.482748,0.190400,4.164982,1.092698,0.641377,2.969439,3.822661,1.339719,0.504905,0.758241,1.091483,0.565966,2.737318,2.241458,4.933250,4.880065,3.024432,1.500000,1.840245,2.554699,1.847666,4.777577,1.080949,3.797621,2.551576,3.192399,1.523801,4.870732,3.741081,1.793858,2.662317,0.569993,3.693965,4.480988,3.344556,3.690103,0.603816,3.354918,1.482253,3.927735,2.562428,3.594640,1.384687,4.520626,1.349883,1.002804,1.282606,4.433059,1.904625,0.170341,1.049815,3.499338,0.256807,0.518344,1.372616,3.081791,0.002332,4.160810,0.606184,1.135961,4.405122,4.849064,1.560929,2.885484,3.858029,3.677022,1.510769,0.111176,0.080230,0.579342,2.758514,4.772257,4.764414,2.433538,2.470228,0.177962,0.136433,0.641000,0.509688,2.753496,2.181556,0.075867,2.949688,3.883862,2.900338,0.002845,3.230776,4.843306,4.459387,4.522291,4.812893,3.983118,1.812324,4.928240,2.592587,2.608726,0.991689,2.680571,1.411412,1.357366,4.301528,4.779601,3.388330,1.943499,1.522844,4.277511,3.454590,0.887210,2.420308,2.881264,2.595893,1.000237,1.584468,2.814263,3.393955,1.588631,0.311786,2.307173,3.962442,1.755123,0.978407,4.475356,0.178260,1.097742,0.075906,3.429578,4.798220,4.928197,2.744561,4.149499,4.139954,1.035606,2.591916,1.422603,3.867637,3.855960,1.392889,4.342050,1.946263,0.695206,4.607266,1.260188,4.190834,3.686724,3.902118,3.487517,4.292489,0.908035,4.930050,3.077782,2.777541,4.712595,4.713678,4.820992,4.541786,2.771078,4.969504,0.355972,0.173944,3.808528,4.028317,1.835111,0.338015,3.170783,0.703517,2.558955,3.886990,2.843544,2.643705,3.172404,0.398396,1.777517,4.221025,3.873303,4.418472,3.780032,2.350563,1.621832,2.668683,1.983795,4.787095,4.826565,3.299588,3.118179,4.559194,2.785064,2.429321,4.356691,4.276293,1.918074,4.863611,1.537617,3.196957,4.256739,2.929820,2.968315,0.492257,1.594697,2.086986,1.857363,1.533042,0.105976,1.616682,4.292899,3.594255,0.528968,0.524190,2.540748,2.981079,0.302965,4.081865,0.642008,4.392683,4.195145,3.481556,3.427796,2.763831,2.212585,3.393974,4.366122,1.051957,3.609553,0.983803,4.479011,2.936070,0.578774,0.011102,2.330513,3.225111,4.842968,1.818614,0.256724,3.007069,0.838512,4.895423,1.939841,2.724738,1.313105,4.529336,0.364538,1.216180,0.203346,4.701155,1.763408,1.568190,4.170066,4.419568,3.160573,4.308543,4.732784,2.154832,2.629503,0.926106,4.469786,3.171217,4.669712,1.885865,4.875683,2.812898,3.653748,3.166788,0.224031,1.390276,4.670540,2.845916,0.471631,3.196595,1.913113,4.100821,1.099579,4.973221,3.985047,0.345650,1.087053,4.250709,1.176995,4.912394,1.953308,0.035070,3.453910,1.957344,2.996035,2.518885,1.949846,4.133060,3.873840,4.833407,2.326670,1.588708,3.850906,2.079404,0.254224,3.805164,2.468849,3.165705,4.492063,1.079656,0.139107,0.432729,2.152563,0.921217,2.962263,3.822610,3.242309,1.771149,2.124015,0.542649,4.314980,4.049905,2.365244,1.163447,1.010085,4.845853,0.420459,4.965320,0.340684,4.707919,4.221545,1.087241,4.112091,3.397182,0.067881,2.917129,0.231218,2.645676,1.450954,2.240252,1.534625,1.545961,2.013366,1.232272,3.438941,0.824172,0.411050,0.230784,0.029211,1.009858,3.444794,0.269922,4.362256,3.183484,4.565607,0.119997,3.405594,4.930594,1.883889,2.129808,4.066460,1.895835,4.162267,3.011781,2.018584,0.729821,4.798064,1.267446,1.102721,0.411051,3.134476,1.908858,0.632687,3.331620,3.518791,0.625725,4.117316,4.022729,4.745812,0.572363,4.228309,0.372427,4.412529,2.900647,4.734461,0.900270,3.860163,3.044350,3.352765,1.968781,0.897248,4.984210,4.155589,1.456436,2.529652,3.513622,1.139341,1.502995,4.541170,2.036503,2.025368,4.909309,0.736966,0.548716,3.182423,4.115858,2.294421,1.980364,3.998555,3.032355,0.262773,1.065891,4.040539,0.251776,2.544652,4.027159,4.919601,0.828447,4.961356,3.506207,0.593386,4.761566,4.228997,3.403710,4.403113,4.461228,2.147024,1.605772,3.939219,2.382315,4.643109,2.289332,4.219334,3.690597,2.001189,1.468634,0.905533,4.920480,2.263529,2.364135,1.535246,1.877158,1.217766,0.812959,2.354539,4.731276,4.081291,1.782125,1.466886,2.984929,3.887170,3.092069,1.975554,1.636684,1.071786,2.111840,1.540850,2.318026,2.185918,0.913835,4.657029,3.817428,1.036229,1.972805,2.711784,0.195183,0.852976,1.265458,3.015745,4.084417,0.849741,2.818359,0.547990,3.825548,0.425278,3.933656,2.654433,2.442124,3.333295,2.861826,4.515706,2.348926,0.249788,0.820553,2.672922,3.101821,4.303678,0.327844,1.152639,1.507591,4.216329,0.915924,2.533093,2.610417,2.876308,0.821849,4.141118,2.920147,3.207375,1.230266,0.400638,3.360255,3.773499,3.289450,3.511197,0.206796,0.898684,2.877823,3.284990,1.042458,3.248336,0.068595,0.595836,0.214144,4.269264,3.362602,4.991366,4.294714,2.472020,4.417508,0.462492,4.305261,3.320837,2.733468,3.156115,2.416715,1.034095,1.413195,1.920443,4.160468,1.999859,0.370810,2.870528,2.031151,2.081114,3.694931,1.508798,2.286944,4.250420,2.413056,3.692208,1.841920,1.901746,3.524506,2.775631,0.797409,1.883227,3.610025,4.446240,4.669780,4.108947,2.350800,2.170930,2.552409,2.849138,1.343653,3.375343,3.589537,1.280995,1.699259,3.063080,3.330910,4.751256,0.965054,4.406017,2.656105,4.340287,3.887795,4.846606,4.628571,0.846378,2.899820,0.142817,3.441421,2.707528,0.713907,3.332031,1.835447,0.472958,0.014958,3.031599,3.950551,2.369972,1.819593,3.780152,0.031634,4.031247,0.731565,1.467099,3.069187,4.029949,0.735402,3.301458,2.042379,1.281921,1.968708,1.923190,4.178529,2.684953,4.208273,0.830072,4.187979,1.554509,3.583145,2.494714,2.993724,3.212789,3.200686,4.666845,3.402877,2.880579,1.352258,4.169617,1.456689,2.320353,1.931049,2.586175,4.842593,0.216941,2.617774,1.024635,0.635451,2.500594,2.682060,3.491930,1.416779,0.070977,2.117459,1.485127,4.735693,2.247909,4.012196,4.857090,0.350723,3.346399,4.106390,0.044955,0.423074,3.134590,2.770739,0.485606,4.842493,1.417404,4.379334,3.522869,4.396983,2.998723,4.420362,3.501291,2.302983,1.147056,4.679681,4.003449,2.641198,1.223408,0.984603,1.793352,2.063360,4.061643,0.693151,2.747955,1.367505,1.212542,0.491195,0.762738,4.842332,0.455972,0.592050,1.766390,4.720928,2.882299,1.135049,4.609573,2.224503,3.336413,2.365258,0.025494,0.255125,2.743513,0.404554,4.199369,4.159535,3.159152,0.149466,2.934294,3.736134,0.285078,0.103799,0.026732,0.010054,1.057215,2.807566,0.074191,1.344950,3.927342,2.047181,4.326106,2.467691,2.629820,2.003493,4.406097,1.393448,1.317689,4.695262,0.711983,0.031736,3.452401,0.580603,2.668013,1.299145,1.631188,3.700292,4.483235,1.134014,4.409334,3.903450,0.505457,3.714773,0.409196,1.029745,4.378268,1.427478,1.490394,1.598246,4.934344,1.572580,1.470580,4.737068,1.119134,4.247497,1.472886,0.880498,0.130905,2.018284,3.222355,0.534553,1.938161,3.326728,4.309102,0.144544,0.287763,3.744607,1.089085,2.535152,0.078641,2.547111,2.859327,4.748442,2.759309,3.830027,3.299299,3.738381,0.076611,0.863640,4.749186,2.176443,1.451102,2.326326,1.538929,0.251020,4.479342,4.296798,3.339682,0.349975,2.366854,1.235140,0.816356,3.784465,0.250094,4.346667,3.729079,1.733169,3.122028,2.215546,3.869077,4.048925,2.810836,1.709694,2.069241,3.213559,0.415361,4.425758,1.275074,4.952371,1.392986,3.008515,2.009369,1.368995,3.443523,3.180014,3.396190,0.808829,2.925994,0.599731,0.912307,2.683497,0.570074,3.259588,2.437381,0.348739,2.499699,1.696420,4.736884,1.629281,1.437108,0.493523,1.208223,0.408299,3.471115,4.080511,3.432581,2.038279,1.622273,1.581066,4.079369,3.905495,4.562795,0.926364,1.806741,4.270054,2.173680,3.329488,2.552769,3.012870,3.889142,2.343155,4.298627,3.465229,1.187332,4.189649,1.612643,0.810537,1.657629,3.859631,3.670005,4.030600,3.283433,1.216945,0.013759,0.267071,3.810712,4.803021,3.301004,1.292381,3.926255,0.088341,1.720476,3.565121,3.505246,4.369085,3.406437,4.840570,0.463322,1.315399,1.517752,3.653433,2.438363,0.950383,4.555325,0.536326,0.648363,4.897115,4.260380,3.355272,4.139533,0.354529,4.707383,2.154945,0.229395,3.701849,2.920457,0.792496,2.160091,4.090734,1.038236,4.327885,2.829471,3.553170,0.180667,3.841180,4.641972,3.034990,1.027769,3.249046,1.610321,4.122828,0.883209,0.733606,1.826384,1.979259,2.397333,4.939945,2.442024,2.073994,1.011280,4.815831,4.288625,1.711003,0.492029,0.449831,3.995482,0.103402,3.643782,3.604422,2.790720,4.925524,1.195324,2.579025,1.891682,1.300030,2.348529,4.808267,0.914939,4.961315,2.781342,2.322191,0.518551,2.135321,3.101841,1.351805,2.659538,3.190972,0.334170,0.571871,1.148902,0.578294,1.176279,1.373517,2.309456,2.883388,0.560198,2.569001,0.844416,4.247824,3.998664,2.325639,0.489166,1.874559,3.567605,3.355071,4.290116,3.200607,4.996293,1.192198,0.083681,3.455330,4.167561,1.462935,4.460136,2.894501,1.999594,0.444095,1.649649,1.603090,4.326459,1.017256,2.705915,1.819084,3.885190,0.373494,2.668545,3.202624,0.955844,4.835956,1.713903,0.964492,4.066571,3.614025,0.046128,2.901006,2.949452,1.728380,2.213582,1.834229,1.991298,0.528055,2.730812,2.903082,0.115996,1.450585,1.888481,2.134421,0.868905,3.246660,0.974566,2.323623,1.672722,0.287752,1.795095,1.170052,4.017635,2.287671,4.138274,4.221118,2.793027,3.208410,4.320541,1.781195,0.991073,4.876884,2.987291,3.267257,3.371913,1.497655,2.271576,4.511410,2.256710,4.513332,1.532495,1.439425,0.906536,1.222737,2.876109,4.305292,1.730799,4.577574,2.247682,0.909063,0.263122,2.986806,0.743225,2.678506,0.194835,4.425799,1.345167,3.447773,3.066661,3.812584,0.077025,0.429018,4.147281,1.379528,0.433411,0.914875,1.909012,0.249150,3.656200,3.322287,4.571797,0.816510,0.900494,2.157605,0.709173,4.032864,1.047737,0.613367,0.635537,1.544807,4.929474,1.481503,2.732281,1.566292,1.660917,2.887970,0.217471,1.448535,2.650342,2.131066,4.533538,1.353676,1.578311,2.546906,2.688132,2.605094,2.811304,4.810259,2.874497,3.760803,4.198000,4.993265,4.402521,2.003185,4.185547,4.015824,1.456354,2.256297,4.327480,0.671520,4.572225,1.125928,2.617240,1.699005,1.413314,3.423372,3.974140,0.550036,2.073888,2.769450,2.905572,1.980941,2.073417,0.476682,1.252857,1.438051,2.155107,3.502189,2.226037,4.109176,1.429609,3.482633,1.631333,4.590868,1.463960,0.296961,4.895850,4.499221,2.008666,4.445031,4.142720,1.155223,0.838128,0.290290,0.941608,1.247457,0.169549,2.213400,4.218362,3.259307,0.395580,4.222041,4.707201,3.568962,0.184875,3.382824,3.026235,4.347658,2.373911,3.488381,1.422594,1.760207,1.248521,2.517499,0.900502,3.655248,4.559846,3.735630,3.855179,1.385416,3.095970,3.360009,3.994243,4.690820,3.371968,2.166586,1.051024,3.626674,0.709623,0.032676,2.934182,2.322220,2.852933,2.789034,2.883965,2.509397,2.991873,0.665861,3.283832,4.950480,1.341745,0.295175,0.230388,4.819623,1.958067,0.742511,2.496462,4.932835,3.436761,4.289712,2.524970,1.981042,3.659073,4.055181,0.884279,4.526573,2.140343,0.470448,1.185287,0.287346,1.896933,0.113169,4.150699,3.650707,1.585733,2.034762,3.981387,3.539982,3.567874,4.620974,1.319642,1.739425,0.638942,2.085246,3.396647,0.495308,4.026770,3.714259,1.034328,3.011615,4.265201,0.025325,0.911058,1.213476,3.365281,3.075599,2.042436,2.155541,3.616127,2.853986,2.294406,0.090708,4.608714,0.792765,0.213122,3.652332,4.078674,2.037735,2.891314,1.435153,4.833338,3.370268,1.098260,1.858688,0.216983,1.947170,4.778346,1.099238,2.774657,4.394049,4.562131,2.430730,3.814521,4.607998,2.187794,4.514185,4.405970,4.643137,4.574773,1.549470,0.239588,4.495795,1.992647,3.132845,1.653838,2.445970,3.850903,4.175092,2.250693,3.239440,4.164212,4.119381,2.661111,4.218306,3.391596,1.885858,3.960113,1.961036,0.336127,4.586360,4.692722,4.888247,3.285049,3.413075,0.432076,3.775538,3.118698,3.560175,0.637360,1.351536,4.493657,4.214899,2.742154,2.995666,2.733311,4.295205,3.030765,0.719508,0.248674,1.025555,2.217933,4.462979,4.458527,2.826777,2.670193,4.270150,2.505636,0.813507,2.813037,2.173799,1.676321,3.377255,0.027246,1.909999,1.233367,1.500380,3.796204,0.509876,0.169951,3.118185,1.832932,3.251991,1.837288,0.447642,3.831609,2.446193,0.943288,3.374976,3.244397,1.972702,4.742076,2.503453,3.539023,2.202543,4.939701,3.338717,1.943117,0.122491,2.985707,0.085255,0.972181,2.438773,4.200219,1.837450,2.533283,1.766579,3.065723,2.167600,1.637865,2.154420,3.668105,2.244985,3.779846,0.486132,4.923054,0.901621,1.035524,1.622028,1.008920,2.091188,2.568670,4.130019,2.215687,0.749272,2.310211,1.340762,0.373614,1.013402,0.598885,3.449531,4.125163,3.865587,4.090703,2.570784,2.239538,3.568260,0.119642,4.192118,3.441913,0.081635,1.830456,4.569020,3.262255,1.909571,4.532116,3.130162,2.715647,1.790827,0.731971,0.498838,2.033056,1.172796,0.573196,2.140684,3.603700,3.336962,3.330831,0.673033,1.793033,1.253042,4.121297,2.748855,1.055469,0.511281,4.627208,1.855050,1.321136,4.734559,4.704976,3.390190,0.594345,1.131427,1.498435,0.774591,4.893780,4.273298,3.630845,3.342256,1.303489,3.416786,2.253408,4.351715,0.808075,4.909929,1.551439,1.986945,4.848684,2.912441,1.710312,2.549100,4.255965,0.654721,1.765361,0.672730,1.856953,1.468338,0.697377,3.708731,4.243886,0.635879,2.412448,4.430601,3.717018,0.012423,1.664588,1.347687,2.125509,2.632951,2.345877,3.224439,3.221669,2.116146,4.235773,1.755861,3.472284,2.224202,0.487891,1.180111,1.764692,2.242429,4.172807,1.239522,1.652677,3.512826,0.488251,3.490442,3.485577,2.941277,0.079592,4.493241,3.400445,2.940065,2.062906,2.082595,2.892641,3.549270,2.780369,0.828864,2.653854,3.643068,1.645251,4.420537,2.570031,0.028502,2.514987,4.003456,3.723304,0.507140,4.207422,4.591327,1.568285,1.754197,0.830857,2.269726,2.437851,0.457265,2.184758,4.023876,2.719213,4.403074,0.644687,4.382923,0.024356,1.325774,1.324273,0.425126,3.936177,4.345578,2.397426,2.510675,4.425045,2.452942,0.958886,3.579071,2.866142,3.152023,2.271220,4.385520,0.686504,2.234328,3.325769,2.809739,1.707513,0.496823,3.170175,4.885527,4.094547,2.693311,4.880930,4.807472,4.694504,1.216143,2.825740,1.926648,2.008048,4.260904,0.090528,4.535702,0.723778,0.525062,4.942541,2.368573,2.612969,0.477119,3.285554,0.722863,1.930761,0.670234,3.653136,4.782958,4.523546,3.323971,1.373274,2.587153,1.611300,3.119494,4.461676,3.758661,0.746945,0.218350,2.504639,2.897663,4.046190,2.526505,4.642784,1.643710,1.035260,2.406911,2.188020,3.716556,1.461561,0.779454,3.171803,2.724728,0.056222,2.262737,1.846880,0.274876,2.838697,4.537632,1.959049,4.088333,2.213703,0.724777,4.416135,0.927570,1.071030,1.724809,0.333157,0.335809,3.780254,0.914528,3.762223,4.575966,1.075051,4.112368,4.530585,2.533366,4.692447,0.141577,3.145661,2.470127,3.344988,1.752377,3.503513,4.516568,1.848661,4.769941,4.829610,2.522133,0.033365,3.466270,3.507676,2.048977,0.100190,1.509763,3.626040,3.286474,2.567216,3.926385,2.709499,4.516254,3.475032,1.198932,4.520447,3.043247,4.609877,3.824622,2.840644,3.834582,3.736676,2.254918,3.880564,4.338008,3.239011,4.830185,4.920351,4.742551,4.304553,2.512461,3.923382,0.493254,0.702230,2.239594,4.902884,0.773547,4.659346,3.744706,0.578708,4.004783,3.440825,3.804241,2.177224,2.034256,2.085298,3.060534,0.552049,1.034342,0.802239,1.041280,4.665276,0.280961,4.600847,4.740690,3.265588,4.933232,3.358367,1.346865,0.909622,4.481409,1.833964,3.640321,1.277463,3.029116,0.743346,2.122835,4.976154,4.840637,1.381596,0.956449,3.575717,2.306911,0.753953,2.030962,0.132385,0.754378,3.903033,2.474147,3.901510,0.386278,0.036438,3.820011,2.116801,4.848520,1.652665,1.603910,4.044913,0.941036,2.942967,1.394645,0.185904,4.531021,1.847066,3.950320,4.112097,3.407258,3.132199,0.918145,2.028080,2.560212,4.446482,2.605351,2.425984,1.918555,4.324071,4.668191,0.571881,1.918962,4.773899,2.116783,1.235174,4.023270,2.061694,3.808532,2.982800,1.626953,0.948374,0.694019,0.518475,3.094153,1.517692,3.699402,0.754632,0.011082,1.620931,4.253622,2.812066,1.091318,0.681235,0.037221,2.486630,0.262462,1.018117,2.775014,0.222313,1.149230,0.067871,2.666914,0.632850,0.297879,1.842415,3.579783,4.308580,3.851151,0.914410,3.654383,1.717222,0.952685,3.152037,1.498354,0.013444,4.132017,0.991475,1.213338,2.108917,3.464113,1.788427,4.983510,3.124252,0.561380,2.092555,3.052061,4.881507,3.647986,3.741380,2.625646,4.653045,0.309974,2.731658,1.086176,0.363848,4.605515,4.567030,2.286392,2.396960,0.719365,1.590157,2.598823,0.037579,2.553715,2.670885,3.637934,0.991816,3.850977,4.973209,0.566171,4.273463,1.095757,1.464060,2.260997,1.081813,4.200873,3.351706,1.966783,2.869157,2.986022,3.699633,4.460044,4.002962,3.901538,4.650078,1.584803,3.429584,2.968179,1.514993,0.811087,2.949043,2.486487,4.627123,2.545763,2.772187,3.365280,2.007635,1.981044,2.430286,4.225065,4.967855,0.226975,1.777893,2.732813,1.104626,4.510600,3.631885,2.831612,1.998963,2.349681,2.175871,3.549843,0.128402,1.913683,2.924938,1.201374,4.277918,3.166275,2.294059,4.798165,4.338379,3.071841,3.197476,0.128914,4.870055,2.381656,3.548019,0.713017,0.007137,4.013458,3.063416,3.203565,3.707904,2.946931,4.607309,0.551775,0.396458,2.536999,0.127857,2.225024,2.620203,4.198579,2.903040,4.853422,0.220234,2.117826,1.001447,0.914513,0.697611,2.678986,4.727212,0.808354,3.878857,1.362108,3.703441,0.747486,0.524881,0.176150,1.552621,0.508641,1.862256,0.992190,4.056530,3.432454,3.394304,0.100198,2.555917,0.214455,3.672969,0.130458,2.386215,2.364627,1.958054,2.842933,2.700793,0.969907,0.567586,0.467327,1.820871,3.835721,2.353149,2.778831,3.657794,2.630787,0.428372,3.824940,1.828644,3.324625,2.681324,3.068645,2.070235,2.099706,4.452013,0.665702,1.763249,3.800974,4.175616,3.256418,1.664125,4.565516,3.787736,3.546885,2.955907,2.369607,3.956548,2.394594,2.935915,2.280084,1.628724,2.584637,0.924622,4.108530,4.493237,1.532629,2.852976,0.598253,3.766677,4.860936,4.895907,4.688080,4.004414,2.714550,2.471315,2.482200,0.068836,3.458774,3.505730,0.311021,4.333176,0.541358,4.047731,3.810803,1.050008,0.030593,3.100687,0.186052,1.906295,3.248415,0.252351,1.650605,4.465660,4.096941,2.307382,0.609626,2.843339,1.596184,3.396535,2.520645,2.222803,3.459614,2.082758,3.260881,1.185014,1.421908,0.359974,4.118097,2.495476,3.863512,4.497955,4.888757,2.380623,3.804481,3.056288,4.050258,4.686236,2.596353,1.796252,0.325610,4.825671,2.040552,2.256538,3.915993,4.628304,3.866347,0.613987,4.616010,3.838566,2.932279,2.551214,2.136717,4.929145,3.773994,4.909237,4.087434,2.786210,2.158366,3.848914,3.495484,4.525628,1.835660,3.924409,3.163739,0.088434,1.401119,3.603626,3.264159,3.695709,1.964416,3.392588,4.366022,3.532979,4.455187,0.549960,4.537404,2.324520,0.089872,4.862351,1.597916,0.460177,1.842134,3.160943,2.688743,3.085716,2.828402,2.484270,1.153742,3.790023,1.401572,3.493528,1.422211,0.713933,4.691168,2.611002,3.943648,0.679878,3.851917,3.419943,4.463469,0.493524,3.106227,4.397543,4.892705,0.407621,3.226488,2.172599,3.344946,3.806181,4.338089,3.800371,3.869952,0.353430,4.679078,1.989340,1.880334,3.559299,1.110582,0.581773,1.068421,1.146504,2.410150,4.213395,2.425500,2.161047,1.977638,2.364129,4.341697,0.008861,1.225154,4.203311,2.325434,3.731603,3.357133,3.289845,2.314241,4.943682,1.616558,3.253310,0.896072,0.898850,4.370500,3.968137,4.859377,1.355204,2.697523,1.536290,4.919711,1.897667,1.084161,3.736676,0.796488,2.427792,4.134247,2.859979,4.305162,2.507010,0.425467,4.306063,1.670957,3.493904,3.360485,2.652735,4.356825,4.392504,3.605208,2.214645,0.328387,2.398670,2.906129,0.731971,2.364968,1.995611,0.428658,1.936230,4.794606,1.902300,0.772966,4.555070,0.363089,3.518846,1.825066,1.442110,4.652114,1.532344,0.752384,3.281822,0.330661,0.685544,2.221184,2.034028,3.305971,4.969080,2.581099,1.046025,1.883171,0.700630,1.562272,4.916640,3.534734,3.016693,3.531973,4.115805,0.438811,4.478663,4.629033,2.849236,1.463598,0.223267,2.953562,2.651902,1.781115,0.275351,1.326686,0.883104,1.396888,2.923237,0.110881,3.113296,1.712135,0.547844,1.964338,4.020101,4.975034,3.236498,4.860408,2.304149,2.241166,1.237054,2.207213,4.654211,0.922849,1.719568,2.103501,3.103997,0.590015,2.419235,3.484351,1.356803,2.126125,0.468922,2.534177,0.287096,1.650219,0.949994,1.330519,3.053143,4.938878,1.733934,3.324901,0.274568,2.327858,0.578140,4.772271,3.675938,1.888083,1.563167,3.380770,0.820402,4.263028,3.517265,4.734006,0.397107,3.437242,2.411991,1.724115,3.063671,0.997086,0.795087,4.478795,3.699947,0.893952,4.728321,0.206432,0.643761,4.618374,0.045850,3.598204,3.170563,3.729538,0.292462,1.167402,2.675827,3.578390,3.895924,3.572271,3.873198,0.866885,2.917560,2.897806,3.341259,3.640560,0.449879,0.386836,1.418897,1.795346,0.372422,1.759702,4.213229,0.726857,4.737448,1.600467,2.682627,0.591142,0.117945,3.820255,4.579252,1.956604,0.177116,2.936641,4.125917,1.748099,2.641967,1.760624,4.472311,3.035048,0.933324,2.400747,4.416606,3.485407,3.743265,0.426321,4.857496,3.655882,4.293118,3.794080,3.628357,2.896140,1.122937,0.440953,3.263861,1.057434,1.534586,2.100208,1.242401,3.881474,0.455034,2.910501,1.688590,3.611306,2.356790,1.108627,1.473744,0.315306,0.040723,1.142380,0.317560,1.766916,3.199005,3.437301,2.780185,2.476884,1.547991,1.710399,4.156213,3.243594,3.588693,0.018571,4.643296,1.472781,1.315732,3.990113,2.889129,4.112546,1.733104,3.913752,0.320663,0.007202,3.568679,1.528620,2.268861,4.005928,4.994513,2.636230,0.328246,4.951606,3.912231,0.168701,0.554707,4.761035,4.471042,3.656000,0.020207,2.231033,4.051089,2.846993,0.806582,3.416241,2.028915,0.368739,0.907258,3.199531,4.776359,2.839809,0.557025,0.204066,0.761196,4.302946,4.524620,3.627535,3.090649,0.402394,1.293269,1.103246,0.751720,0.097718,2.549033,4.833391,4.144256,4.036753,3.616979,2.136252,0.524600,1.314716,3.299363,3.362585,4.661696,1.617053,2.572422,1.906427,1.393373,2.915557,3.138146,3.821937,0.788682,1.033249,4.032718,3.478786,3.684127,1.994115,2.262197,1.937909,0.538885,0.946194,2.949864,2.009026,3.112667,4.154024,0.417573,3.994436,2.665341,4.915512,3.256115,3.027801,0.334716,4.751575,4.476172,4.183389,4.242530,2.652035,1.435660,0.664609,3.975606,4.842157,3.400878,3.710718,3.702818,1.681511,4.681438,1.753543,1.206498,2.510873,0.661840,1.681221,1.904377,2.075648,1.007661,4.940096,1.626844,3.885981,2.580279,0.028504,1.579832,1.859529,2.917862,3.715141,3.596886,4.265525,3.799288,2.636325,4.956175,4.016399,1.660693,2.005457,3.165355,2.940898,4.914467,3.107458,0.034986,4.932360,2.633231,3.873987,0.022155,0.877349,3.094620,1.131050,0.279091,3.783737,3.725806,1.495763,0.927973,0.105310,0.275527,1.333604,3.488334,1.810718,3.026005,2.155357,4.448565,1.926086,4.670220,3.374948,4.083779,3.282239,0.202131,1.102623,4.770122,3.318836,4.420490,0.517966,4.462439,4.935837,2.757720,0.155183,3.717804,3.871430,2.872149,4.031822,2.761803,0.436493,4.604845,2.630580,4.536762,4.300921,0.739591,2.054850,1.553914,0.169041,2.528031,0.614381,1.418279,1.117257,0.311867,3.637430,4.682927,3.723771,4.068481,0.111293,2.708275,2.144102,2.319989,3.888259,2.428921,4.394468,2.479784,4.908585,3.665998,3.631514,3.803528,0.262311,2.845737,3.693270,3.884104,2.265293,4.441523,4.540613,3.637287,4.281249,2.176166,0.607800,2.280137,1.347488,2.239625,1.722603,1.655860,2.793846,0.895625,2.094959,1.306523,4.997812,2.075889,2.254332,0.334997,0.314216,2.587341,4.678187,3.630057,4.847619,3.092612,2.763322,1.084985,0.172448,1.675248,1.014131,4.798475,0.183160,0.214752,4.409705,0.569513,3.504380,3.405266,1.791899,3.686167,1.775290,3.153387,4.318531,1.534650,0.264741,0.860521,0.122464,2.568282,4.678810,4.530437,0.492285,1.178113,3.155244,1.719982,1.576082,1.641037,0.024683,0.510842,1.200471,3.260262,4.709013,3.574195,3.967267,1.171628,0.675058,1.918410,0.596142,0.769413,1.597708,4.093117,3.897330,1.798034,3.641245,4.210613,3.517776,1.400210,3.993739,2.626201,3.024879,0.339053,2.375300,3.357223,4.146336,3.127679,2.889080,3.622922,2.937344,2.130868,1.690626,0.592099,3.808429,2.617765,4.584679,3.909220,4.336071,0.222617,0.634641,2.303662,0.700793,3.333010,0.744013,0.756174,1.927854,1.795238,2.594924,1.763847,0.958329,4.190568,0.318054,2.847708,1.971071,4.114896,3.513031,0.066433,1.496334,2.210105,4.219153,0.794193,0.576084,2.131993,2.155982,3.500446,2.788014,0.437372,1.452961,2.837935,1.080691,1.084841,3.742688,3.705303,4.141211,1.269067,3.575490,3.114384,0.683333,3.071138,3.575507,2.646789,4.607615,0.250732,1.789572,0.782427,1.290454,2.284260,4.858476,2.911933,3.037576,4.164944,4.997658,2.449126,0.623138,2.763086,0.262347,3.269189,0.319467,1.816444,0.043536,0.205204,0.882036,4.712523,1.771008,2.914126,2.062936,1.322052,0.793939,3.784173,3.548845,0.903426,0.591502,1.321867,3.032301,1.503465,0.625140,4.313211,4.263093,4.637923,2.014909,1.971293,4.068523,3.851863,4.347947,0.706502,3.638027,1.907155,2.564470,0.193725,2.841734,3.348061,0.238980,4.187418,1.795812,3.285777,0.076448,1.137436,3.447620,1.118884,2.147667,2.186669,4.635733,0.964330,4.414259,3.893472,3.115082,4.152013,3.338640,4.017951,3.380205,3.881507,2.113474,4.222963,1.656552,4.482535,4.114388,2.166686,2.174438,1.974521,4.655310,1.823859,0.042233,3.477222,1.473089,2.750323,1.746280,3.968330,2.690176,4.526269,0.700775,3.187678,4.331401,2.849723,1.538416,0.860139,2.959518,4.969814,0.238559,1.137307,1.627202,0.545363,3.897732,1.051222,2.291883,3.979997,3.050548,0.390961,2.618906,0.754339,1.179345,0.079985,2.573736,4.703279,4.797285,3.955951,2.070329,2.222308,1.652152,1.801996,2.236049,3.859903,1.433541,4.570186,0.456829,4.900417,0.573796,3.417600,4.387168,2.349847,1.833379,4.593000,3.863928,0.187574,1.042897,4.243884,2.953089,2.433848,2.435707,1.319725,4.426216,0.630892,1.068015,2.278350,2.527574,3.434029,2.484626,1.656548,2.459842,4.474276,4.847095,1.530558,3.104489,1.032346,4.666241,1.433007,0.682511,2.096157,1.362907,4.860008,4.308972,3.985412,2.843717,1.086528,4.672879,3.709474,2.678869,0.202228,0.863910,0.529309,3.665330,2.565124,1.216823,2.619446,0.039159,0.685109,1.655926,3.748519,4.297448,1.760587,4.984210,2.387462,3.825350,3.780145,1.249239,4.576652,1.873095,2.413784,2.624733,3.387688,1.409196,2.448003,1.791237,2.079469,1.237618,0.966836,2.780760,2.498659,3.820226,1.056261,2.571000,3.592894,1.831618,3.188617,0.846930,3.788016,0.526154,1.018148,0.101683,2.137053,4.333953,4.429116,4.067081,4.238034,0.729049,4.522177,0.145224,1.536683,2.175071,0.043506,3.817091,4.497281,1.413925,1.124750,4.189352,1.611152,0.585500,4.389093,2.927537,0.176313,2.866081,4.572168,2.196540,0.311156,1.547894,1.906346,0.927836,1.770747,3.398121,4.814085,3.838699,4.407596,3.577905,0.258150,4.852219,3.724010,2.270959,1.985047,4.482344,0.227348,0.542386,1.118670,4.906020,3.149569,3.179284,1.109892,0.254257,0.759830,4.809787,0.213507,1.314616,4.934408,0.320328,1.681108,2.589446,2.755328,4.507469,4.947706,2.249111,0.307870,1.918760,1.212788,0.375933,3.312283,2.209567,4.909924,2.833858,3.318792,3.428204,1.334536,3.306478,2.694178,2.308969,2.898857,4.216944,0.626151,1.172427,0.384504,0.524011,2.096185,0.828726,0.696138,0.654617,0.568019,0.969326,0.085933,0.254493,2.729300,4.464604,0.382336,2.074150,1.713108,4.891933,3.323803,2.105794,0.402069,2.996168,3.331102,2.514516,1.631629,0.966405,3.380562,3.320813,2.856291,0.046856,2.720479,0.922061,0.597843,0.294127,4.629014,3.081295,0.210418,2.184339,4.346411,2.888278,1.230245,1.721107,0.878659,1.660652,3.733115,1.591773,2.578248,0.365704,2.809280,1.622652,3.637450,3.091121,1.763266,4.756493,4.381571,1.385639,3.327934,0.200256,3.130980,4.952459,0.360180,2.782955,1.925595,4.113656,0.538906,4.807299,3.610989,1.425609,1.227387,4.201278,2.401600,0.278772,3.925797,3.131909,2.465497,4.167689,0.371807,2.518688,1.480151,2.558775,2.806207,3.597615,2.144631,4.504685,3.950496,0.040420,0.550858,3.569518,1.483634,0.724059,2.814185,2.969454,4.431863,0.661521,1.999340,2.517675,2.437390,3.094454,1.947350,1.162113,2.751228,2.031862,3.233262,2.920561,0.236032,3.906746,3.169763,3.616467,2.776372,0.287930,1.422165,4.450774,3.118894,4.942346,0.263191,0.410285,0.783465,3.227481,0.216553,3.214083,1.352066,2.690707,4.228741,3.559141,3.918622,0.860410,2.293402,3.191065,2.751095,2.050585,0.630083,2.411147,1.658529,2.731925,2.006788,4.429166,4.977480,0.653677,1.590125,0.725648,2.276715,3.861261,3.065634,0.937129,1.613499,0.611665,1.433736,1.174117,3.013528,3.200516,4.837240,2.220873,1.016463,2.002688,0.885613,3.088865,1.779000,1.642951,4.388189,2.901209,0.121296,1.833557,0.597065,2.264601,0.532531,4.999278,4.791303,1.673872,0.492887,1.202614,4.271773,0.905182,3.001521,2.887947,4.490038,4.733222,3.451546,2.604440,3.173372,4.611818,0.626518,2.343188,1.920533,3.318936,2.644677,0.824896,1.533439,4.572899,1.243567,2.912326,3.084081,4.555005,3.641630,4.310914,3.616435,0.525916,0.128502,3.582277,1.322716,4.138581,2.848955,4.976784,0.808438,3.659358,1.622829,0.837337,2.324130,4.095908,4.969708,0.869265,0.679243,0.683809,3.955527,4.603273,4.067217,4.034101,2.955960,2.865902,2.733988,0.713532,0.657749,1.891241,0.523340,0.415643,0.294277,1.954702,3.778754,3.631744,1.413739,0.311243,3.789266,0.519445,1.599815,2.018207,2.398838,0.212353,3.348151,0.900761,1.422618,1.959418,0.195729,2.314473,2.814973,2.548998,3.320134,1.005132,3.843897,4.094334,0.426563,3.234750,0.470999,3.482969,0.751081,1.266116,3.189049,0.658271,2.149999,0.028549,3.012501,4.305556,1.427791,3.879975,2.426044,0.144276,0.671939,3.128448,3.936055,3.906524,4.291454,4.823975,2.210105,4.798614,0.133667,1.300039,2.111471,3.481660,1.473704,4.838905,4.098591,2.407513,3.961391,3.645874,4.960164,2.985158,0.131392,0.949690,3.371079,2.111625,0.594758,1.997478,2.309485,0.942660,1.372869,0.259014,2.877217,2.915842,1.302904,0.153966,3.666962,0.550721,1.466236,1.939972,1.691397,0.063084,1.459615,3.686992,0.708997,4.890635,4.648678,0.643423,3.392809,1.763535,1.122857,2.739121,3.778651,2.472626,0.601145,2.111282,3.251241,0.547322,1.844162,2.230094,2.524307,4.623786,3.863634,1.403040,3.104114,3.365795,3.493680,1.325446,3.444355,3.118807,2.254857,0.531139,0.313455,2.657263,0.756706,3.772634,2.882197,0.564207,4.417247,3.811251,0.129660,3.256778,4.026124,3.005795,3.411480,0.618287,0.343808,1.620786,3.028956,4.141649,0.433977,4.554936,0.413259,4.206473,4.627804,1.287580,1.336233,1.069757,3.911700,0.042711,0.572733,2.005554,2.679718,1.348846,3.143944,1.376684,1.107517,4.021255,4.722230,3.549459,3.135103,1.448067,4.135568,0.138265,2.252974,3.856901,1.725928,1.683837,1.011381,4.581572,1.544133,4.009997,4.212140,2.796159,2.857010,4.699417,2.747513,4.140423,0.712530,0.018324,4.497476,1.507814,3.163062,2.538595,2.929259,0.094971,2.852819,3.904040,2.934968,2.170551,2.886694,3.451632,1.380651,0.256497,2.080016,4.908245,4.158923,0.842872,2.530066,0.912830,3.744016,0.994517,3.153355,3.521223,3.656795,3.859876,4.546857,0.218534,0.218774,1.732185,3.283721,0.611000,3.094934,3.554632,3.494689,3.560579,1.176014,1.885678,1.580688,3.752135,1.299228,3.567480,3.273840,4.176115,3.418513,1.347606,0.012922,3.127074,1.874598,2.866795,4.534932,3.480658,4.968599,3.179619,3.111868,3.129108,3.506504,3.849522,4.658017,4.472213,4.693558,1.179912,3.490710,4.042155,3.466316,4.025375,3.362146,3.572945,4.061051,1.627636,4.232240,0.878268,2.138144,1.784828,4.545163,3.543320,4.710022,3.900966,3.341552,1.180604,2.741250,4.133963,2.639842,1.892866,0.216843,2.503544,3.857604,2.302248,3.427630,1.891864,4.847027,4.964362,3.000131,2.654899,4.465309,1.371442,0.050820,2.851724,2.581442,4.388647,0.927836,4.554315,0.517450,2.274341,3.133748,2.753925,0.324643,1.098908,0.081268,1.611250,4.124833,1.138179,2.657561,0.147866,0.285281,2.982413,3.193453,3.801853,2.911762,3.001671,4.922024,2.296180,0.175465,4.028840,0.307401,1.158422,0.428886,3.968180,0.314641,2.650322,4.588076,1.975833,0.905234,2.890545,1.321927,4.471709,1.391594,4.167694,1.113397,2.902056,4.378059,3.332708,1.317733,3.034662,2.359326,1.895803,4.226475,4.329097,4.298664,4.785536,3.931115,4.828719,2.718890,0.246032,1.756074,0.696121,4.865177,2.374857,4.502463,1.989154,2.372901,3.196574,2.883826,4.101575,1.844513,2.368577,0.500997,3.399970,2.152965,4.145220,1.078191,3.548833,0.100272,1.869607,2.914845,2.987508,1.552401,3.604573,3.882633,4.161809,4.609716,2.433791,3.386165,3.088940,1.023778,4.076494,3.432280,4.202026,3.633651,4.741774,4.989893,1.944843,0.627305,0.773148,4.157128,3.979632,0.422620,4.600657,3.826925,0.033832,0.247191,3.746768,0.710050,4.833171,1.614030,2.137890,3.207081,1.400302,3.554005,3.570830,2.183686,0.303121,0.395974,3.345134,0.384506,0.851250,3.517296,1.806438,3.613615,4.367961,1.699767,4.171537,2.041871,1.382453,2.723415,0.479153,1.089981,0.938562,3.864371,4.068894,0.288461,4.099135,0.740282,3.643173,0.802952,3.585776,3.814141,0.285665,0.604540,3.702172,1.505750,3.973699,0.117073,2.205234,4.235098,2.389183,4.883928,0.378660,1.529255,3.070819,2.508817,1.098044,4.254278,3.922280,2.166753,1.837333,4.988637,2.886486,0.526591,4.867709,0.090323,2.527332,3.941581,4.850285,0.400443,4.248085,0.119407,0.473258,2.633249,3.810832,0.067143,0.344381,1.979768,4.191250,1.819814,4.518043,0.519199,4.797684,4.801820,1.741635,1.325726,2.351775,2.693018,1.902512,0.268144,3.408705,1.201945,3.488067,3.805107,2.815149,3.652988,4.691985,4.630804,2.050658,4.170675,2.730172,1.100640,2.761737,2.590902,2.504409,2.474341,1.101983,0.258464,4.879970,3.587057,1.615234,0.070845,1.210326,4.601823,0.056644,0.927079,4.340221,3.917028,1.576162,1.964237,4.087340,3.862077,1.283171,0.088597,0.909454,1.940020,0.758824,0.237641,0.527172,2.562591,4.077117,2.051984,1.331482,2.846048,4.246115,3.949206,2.294459,3.004489,0.594763,4.130319,1.554631,0.171414,2.573389,0.447860,0.322459,3.554536,0.366707,2.301423,4.163423,2.168416,3.517144,1.310151,0.895102,2.590433,1.687509,0.120114,4.057349,1.269079,4.553997,2.992680,3.423613,1.067721,3.614890,0.918948,1.735575,2.066735,2.395699,4.037403,4.935260,3.961331,4.710426,3.799017,0.234395,2.224135,2.543326,0.180783,1.418010,2.175977,0.305734,1.387591,1.444271,4.281154,2.383542,0.885050,1.582743,0.714947,0.226195,1.489424,3.216699,3.241537,1.259416,1.339143,3.587177,1.190557,1.409643,0.364703,3.116795,0.517675,4.196394,1.787347,4.839211,2.386509,3.945027,4.448233,0.640645,2.548084,2.400929,1.123903,0.905267,2.502206,0.976344,2.634612,0.521644,0.027659,2.412473,0.049259,4.115762,3.627097,1.047192,1.383311,0.511024,3.940963,1.241980,2.135210,3.004829,4.028887,2.446521,3.646608,4.571267,2.331244,4.997178,1.065689,1.647620,4.248970,2.144745,1.221176,1.190819,2.531402,3.277099,0.241012,4.947139,0.514521,1.462075,4.551965,0.847525,0.112407,4.287550,2.641153,4.863670,1.428609,2.716020,0.170931,0.223992,2.218550,0.508430,3.268010,3.754850,2.820536,3.966585,4.950560,1.564901,0.952383,1.688654,2.110536,1.260251,3.586398,4.347820,3.067162,3.698635,2.261091,1.128850,2.495129,4.883878,1.448492,3.532450,0.616375,0.014849,4.698972,0.843485,2.430876,1.190972,1.974943,2.127116,2.187543,0.344493,3.787859,4.146249,4.479812,2.487381,0.019948,0.422354,2.245112,4.650657,4.574235,2.819393,0.332657,2.140455,0.003874,4.437187,1.016682,4.404489,0.524055,4.762677,3.474544,1.717780,3.944489,4.153693,3.510964,3.014159,4.989097,3.019040,1.542933,2.492435,0.396626,2.655670,0.451047,3.760135,1.115414,1.517763,3.633031,4.758024,3.143354,2.966588,4.247063,4.344709,2.572100,2.865798,2.817865,2.037660,3.635623,1.021691,2.439317,0.109629,3.985279,1.496735,2.743757,4.783843,0.219653,0.456818,4.252731,3.029279,2.197225,0.872060,4.585059,4.499574,0.950452,2.219555,4.516813,0.541612,3.409358,4.113904,0.453425,2.034505,1.875566,2.932476,1.021187,2.405597,2.993053,4.937439,1.145629,1.489493,1.103985,3.540693,3.329872,3.853770,1.498460,3.277361,2.319957,3.668596,4.349790,4.207037,1.835446,1.899846,1.597288,1.007942,0.342113,3.523321,4.216234,3.984738,1.572230,0.318087,4.742114,4.231365,3.858634,3.654796,3.964945,2.779939,2.320901,2.962225,3.108922,0.629115,4.459206,0.161454,3.544194,3.341523,0.691162,3.385847,0.962440,4.005133,4.548107,4.889561,4.821360,3.155437,4.537661,4.969985,2.420468,2.306516,2.968195,3.266499,1.548200,3.154455,4.211807,0.415514,0.723135,0.417116,2.648601,1.811240,2.951907,2.447483,0.516615,2.891537,3.730753,4.121656,3.186013,4.464427,1.986661,3.400860,3.387669,2.885309,2.317805,2.379202,2.665048,2.525980,4.828984,1.131169,0.905707,1.705824,4.880251,2.680281,3.585808,3.230623,0.660779,3.958111,2.205309,2.925007,2.470238,0.878949,1.551659,0.607544,2.635823,4.016515,3.741066,2.435594,0.562405,0.773320,3.187570,2.696462,4.768090,2.164871,2.548713,0.820657,0.621423,2.695121,0.724304,3.143240,3.115245,1.369914,0.379652,4.621414,4.573547,0.304726,0.661484,4.149873,3.989795,2.838238,0.378640,4.275115,1.181865,4.254552,2.076037,4.245440,0.209742,1.639784,2.436454,4.533921,0.834958,0.685098,1.035687,0.446359,1.156435,0.788432,3.840961,2.448404,3.486687,1.387469,3.591247,3.829015,1.426541,4.551955,3.137667,0.727873,3.091514,0.425090,4.927934,3.652256,0.606068,4.907426,1.090908,2.238095,2.803060,1.938719,0.670796,3.278292,0.752700,2.410731,4.821502,2.555380,0.478177,4.178351,1.088074,3.954117,3.134750,4.608150,2.883716,2.432046,3.233400,4.220803,1.506749,1.838621,1.072788,2.946861,4.781144,2.098095,2.428416,4.364411,2.441707,2.964024,3.870813,2.905463,2.506896,0.103598,0.567247,3.433558,3.422474,2.517079,2.937070,0.650992,4.302299,4.504502,1.705994,2.233947,0.757251,4.680828,2.396434,3.282684,2.054648,2.609166,1.820456,2.583720,1.978341,3.654274,3.636440,4.114327,2.988946,0.160651,1.604077,1.541460,4.889390,0.725224,3.872753,4.341526,2.043311,4.735958,2.535761,1.572756,1.131901,2.573119,4.195759,3.708507,4.941266,3.044115,1.666242,2.239677,3.554936,3.853981,2.494318,3.053046,3.109985,1.744472,4.692142,0.317461,1.930836,0.445366,0.746436,4.933182,1.855904,1.034238,3.523443,1.605286,0.798620,2.580709,0.784173,3.470085,3.962055,1.718333,0.539003,1.546064,1.845363,4.319253,3.907799,1.905772,1.506882,4.441369,3.080360,0.027007,4.982035,3.508600,1.141583,2.606736,2.029108,1.716996,4.448181,3.226077,0.811936,3.753019,3.117960,1.747042,4.293477,3.933541,2.193985,0.353358,2.909628,0.759107,0.650127,1.624449,4.016657,2.549610,3.849328,2.631350,1.823138,3.083016,1.208151,2.284279,0.476244,2.570534,1.901086,0.511383,0.265273,2.978950,2.508472,1.575146,2.707973,1.398605,2.418788,0.998099,3.896904,1.735509,3.646326,0.917284,2.620945,1.016390,1.301921,1.712974,3.979297,3.481603,0.243513,3.870984,2.134046,4.146902,0.254418,2.165113,0.013962,0.017941,2.578411,2.839334,2.852612,0.150718,4.031273,2.483305,3.199824,4.449509,0.961059,1.481907,3.096791,2.468884,2.615524,2.021050,2.901511,1.119474,3.559588,4.793960,4.007392,0.775394,3.745039,4.627614,0.568464,0.925859,4.581639,3.304121,2.858430,0.477923,1.363815,1.848069,1.057361,3.236371,2.378365,2.908532,0.340105,3.445815,2.025046,2.154646,4.421534,3.612860,0.005496,3.983059,3.398039,3.734986,3.324521,2.265482,1.945521,2.929103,2.032420,2.669038,1.013698,3.368914,1.031645,3.878062,4.112166,3.717950,2.511650,1.475830,1.959344,0.447453,3.861245,2.848327,4.337593,3.600986,4.372122,0.306783,3.876602,1.847562,2.018978,2.353243,4.931649,3.910227,2.898584,2.291914,2.700917,2.470490,0.473582,3.530792,2.681486,4.382879,4.477978,3.329723,4.828518,3.850746,4.505136,3.469519,0.723594,0.461513,2.300158,2.097894,1.513617,0.749863,4.813024,1.158205,2.490085,4.096886,4.198489,2.585094,2.530948,0.714551,3.974524,0.394514,1.982028,3.052251,4.829756,3.283313,2.439840,1.502840,0.898548,0.047482,4.298909,1.561158,4.551189,2.669544,0.460149,4.075212,1.221685,4.885651,1.056209,3.882940,4.063461,0.814917,2.745993,0.278479,4.718973,0.812009,3.955459,3.068166,1.316788,2.341942,2.961116,2.311108,2.198218,0.498291,1.987584,2.604523,0.794739,2.278690,1.084858,3.711238,2.547435,4.505157,3.502668,2.832791,2.225097,0.355609,2.261891,3.248659,0.848843,1.517045,1.130086,2.306223,4.519036,2.763645,2.042228,2.080173,3.677166,0.463304,1.057850,1.360067,0.755431,1.874303,0.766062,3.961561,3.567416,1.916482,0.482797,0.252136,1.111190,3.923207,2.126187,4.805021,0.526376,2.160764,2.126249,3.631511,2.973657,4.337061,3.982810,2.000048,3.598956,3.603793,3.997081,3.681742,1.404374,0.154755,2.310704,4.322896,1.281175,2.430015,1.797682,3.699040,2.740156,2.030469,3.008158,1.074446,1.690696,0.808729,4.092886,2.582704,0.911759,2.335043,3.868545,3.210328,1.304474,0.774059,2.146925,1.966516,1.849342,3.980567,1.796868,1.303261,4.884052,2.288756,4.194905,3.096128,2.529074,2.557192,0.193199,1.683380,2.834551,0.437209,1.557067,4.393458,4.066471,4.304563,1.370107,4.125874,0.964634,1.957250,1.689852,4.773638,2.825180,2.925664,1.536610,0.163977,3.432101,3.833192,0.327305,0.541193,2.684231,4.794592,3.521749,2.872459,2.073862,4.472405,3.770317,4.783021,1.259874,0.195413,0.132720,2.580994,2.044802,2.261264,1.401976,4.130546,3.114393,4.124821,4.263518,1.215322,2.912916,0.239196,0.474205,1.268128,0.782634,4.809864,2.298122,2.989276,1.046470,1.607862,0.356241,2.592570,3.212365,2.862700,3.936057,4.472346,0.407448,1.542961,4.808453,0.447430,3.133977,0.923841,3.257797,2.674543,0.493502,0.460483,2.965364,1.408740,3.379568,4.211693,4.087985,1.457707,2.618615,4.672565,2.681524,1.918951,1.253828,2.657920,1.687606,1.286064,4.064568,0.658137,3.785587,3.875764,3.221130,1.730674,0.244943,1.689914,4.542144,1.022994,2.842838,1.070844,1.770681,2.168471,0.132881,1.289890,4.273929,4.966102,2.914997,3.894303,4.748204,4.770890,2.524305,4.934890,1.629098,0.283566,4.342482,1.289090,0.317329,4.609574,0.768574,4.914659,4.853461,3.197858,1.408809,0.775566,1.459491,2.723167,1.204144,4.174221,4.468551,3.273549,3.395824,2.620080,1.119907,4.436746,3.643060,0.217324,1.579824,1.253900,2.220099,4.216479,2.638426,1.324333,3.946150,0.925984,3.117702,1.564207,1.284544,1.370226,4.360130,3.584764,2.795628,3.153228,2.220336,1.922497,2.678328,3.346649,0.660678,4.649577,3.182259,1.361195,0.411703,2.867764,4.503160,1.799358,3.898982,0.557112,0.368545,1.542280,2.962807,2.991455,4.683351,3.366547,3.765408,2.034587,3.700344,4.843894,1.912358,1.192940,3.207791,1.230585,0.042810,4.670537,1.238703,1.232426,2.248024,0.701770,0.761993,3.657107,0.906929,0.138424,4.453589,0.923253,1.038522,4.298283,4.277107,4.564947,3.798845,1.744000,0.497214,2.785424,0.871197,0.622860,2.059129,4.946625,0.281223,2.102742,4.877069,0.010292,4.851281,4.613520,3.508381,3.369780,4.410862,3.125429,3.773414,0.005220,4.487461,4.653097,1.750657,1.716639,2.925918,2.443689,2.393079,0.006090,1.754362,0.433396,3.582767,3.106308,2.385400,1.158854,3.828879,2.362311,4.018414,2.617353,2.513941,1.217430,4.333739,0.559235,1.692738,2.984266,3.982466,2.577853,0.442962,3.297423,0.599574,1.986837,4.498924,0.967109,2.667089,1.489102,0.710759,3.476285,4.566119,1.390577,0.301583,4.836021,3.357898,1.107451,1.010399,2.379797,2.399538,1.967881,1.422020,1.586497,0.350603,1.057835,1.685573,1.046439,1.239589,4.888046,0.895332,1.967368,4.379636,3.310334,4.734269,0.511682,2.455379,4.840705,3.591350,4.237483,1.790732,3.100609,1.971914,4.600490,3.740142,1.826653,1.624136,3.818184,2.701822,0.051675,4.039921,0.432335,1.423724,1.107657,4.633011,4.228952,4.551147,4.530904,4.409943,0.890912,3.822369,1.620924,0.998028,0.879341,3.016468,3.515234,2.704405,2.764743,2.430631,1.926590,3.505623,3.593403,4.549877,3.530235,3.974820,0.876927,2.677625,2.157045,4.877936,4.605757,4.637261,3.189230,1.183064,3.264843,3.874843,0.720717,0.430965,3.412436,0.995109,1.526155,0.470617,3.025652,3.582449,4.194227,3.793818,2.453561,3.479899,2.458003,2.648256,3.590170,2.088744,2.574431,4.867464,2.151369,2.582374,2.227891,0.980400,2.891678,3.661058,0.298216,1.380580,1.171644,3.965468,3.923333,3.259879,0.045462,4.491889,1.332533,2.702233,1.352332,3.163044,0.464131,0.549555,1.163880,4.261101,2.619740,2.552319,2.220165,3.904084,4.135543,1.164032,2.037403,4.659384,0.100881,0.243801,4.011188,2.876291,2.882714,0.726927,1.792373,4.309709,0.830945,1.231838,4.232671,4.157434,0.943588,0.077419,0.225202,2.194273,1.766398,1.364245,0.613532,2.988093,2.348848,2.891291,2.679564,2.232584,4.932556,0.753874,2.214412,1.870401,4.146401,4.774129,3.247317,4.379968,2.205397,2.661855,1.361674,0.914622,3.228956,2.658544,4.133072,3.402172,0.861773,1.413505,4.144405,0.444452,3.227399,1.626904,2.963781,3.438023,4.853207,3.752147,2.612986,4.498085,1.544893,0.217512,2.180898,2.278213,4.287662,1.404333,4.247153,2.251440,4.411679,0.472083,1.484244,2.543923,2.295851,3.672348,0.515489,4.535669,4.267401,0.128943,0.168959,4.822918,1.991756,2.245574,0.622754,0.542194,4.049536,0.668153,4.742232,0.928641,0.039999,1.585447,2.283382,2.485910,1.632621,4.951055,1.734491,0.158264,0.066481,4.073524,2.608134,4.973343,2.186883,0.711461,2.958013,2.093103,1.037126,3.111729,3.178963,1.721852,0.555174,4.632189,2.977148,0.848483,1.488443,4.818595,2.822937,2.825639,2.562321,4.172300,4.854193,3.321176,3.950652,4.538733,1.522901,3.856314,3.645072,0.853680,4.886836,0.314473,2.897096,2.781318,2.679274,2.086259,4.554250,3.078698,0.272643,4.961939,2.376993,0.385707,4.200878,0.609939,3.961051,4.882765,2.688684,2.437626,3.110569,2.165190,1.861906,3.719241,0.271425,2.487974,2.550085,4.405818,4.636252,0.725572,4.434261,1.473414,2.091702,2.509263,4.259740,2.170945,4.476113,4.281046,4.650516,1.613964,0.655230,3.015659,4.997109,3.183656,4.623595,1.649491,2.563231,2.081049,1.678820,2.734672,4.921831,1.336466,1.363722,2.549813,4.577877,4.421762,3.767905,2.697089,2.878962,4.636492,4.262931,0.697054,4.223262,4.641824,4.684250,0.005567,1.075227,0.786897,2.688264,2.741371,4.486646,4.450456,2.950330,1.446389,1.787395,3.114760,0.512139,3.542814,3.745149,4.583828,0.377252,1.820000,3.966832,3.025301,4.244465,1.884888,3.694864,3.979402,4.458443,3.390748,0.345089,4.306633,0.353491,0.141958,1.463450,2.937037,4.680822,2.605504,4.501622,4.001330,2.390226,1.275804,2.615477,2.562914,3.400760,3.360336,2.312105,0.075305,1.521251,0.537109,2.548510,3.740693,1.417440,3.470604,1.921584,3.359347,3.660371,0.497636,1.242833,2.964929,1.452080,0.371558,2.804461,4.973836,1.064414,0.032105,1.143076,0.838428,2.692739,1.609917,1.320883,4.678173,1.095846,0.364453,1.460856,2.358243,0.875182,1.940980,1.721932,4.763891,3.388454,1.922044,2.507977,2.537350,2.604504,2.644817,3.440214,2.267136,3.688475,2.001478,3.706213,1.669418,2.935390,3.961930,3.051277,4.144968,3.472381,2.446686,0.119151,2.741005,3.832510,1.144597,3.172334,0.941455,2.305259,3.406656,2.698135,0.376159,4.655183,1.644817,3.017534,3.954068,0.382318,0.952528,0.277472,0.721972,0.462813,2.250931,0.137915,3.907762,4.975588,3.000026,1.864861,1.235417,1.226325,4.452101,4.211522,4.884005,1.016747,1.946247,0.772323,0.984908,4.129498,2.750781,0.332918,2.514140,1.190502,0.730031,4.820326,1.105672,0.056882,4.589472,2.474449,3.033293,0.837763,0.019456,2.171530,4.265336,1.552437,3.174548,3.974356,4.780249,2.850826,2.065783,1.270027,4.863407,3.747775,1.093495,0.891094,1.097208,4.581213,3.066702,4.307050,1.522756,0.871726,0.659214,0.349455,1.557798,4.067906,0.447091,0.633309,3.503528,1.591343,2.733171,3.470430,3.806867,2.296988,4.493316,0.503095,0.478920,1.236370,0.151320,2.526535,2.150091,4.974829,2.482379,4.604988,3.798097,4.637987,4.887306,0.305474,0.797838,3.663525,2.613024,4.271255,0.325509,2.785375,4.998279,0.647062,1.552417,2.973165,2.966902,4.694836,2.678229,4.698917,0.282053,4.489690,3.268570,3.919700,0.843724,2.416222,0.112995,3.808788,4.071222,1.424311,0.639318,3.362983,1.748524,3.614939,0.190967,2.467573,1.495091,4.664495,0.448134,2.106694,4.381850,3.104430,3.041608,3.682003,2.046838,4.763831,2.183663,3.561496,4.746785,4.634355,3.219498,0.421557,4.937607,0.756476,1.842243,0.262216,3.061960,4.062408,0.248567,4.144571,2.767344,3.673445,1.341028,4.379992,1.608662,2.787882,0.731580,0.055779,1.592112,3.967084,4.182022,3.525373,0.254405,3.763838,3.986315,4.435554,3.838909,4.648594,3.005460,1.455815,0.553594,4.157229,2.238692,3.672689,4.833727,1.955063,2.481701,3.763735,0.345094,1.190714,2.434440,4.086805,1.139982,3.336129,3.808199,4.862106,2.794597,1.756336,0.124742,0.770842,0.211419,2.965752,4.413389,4.997394,0.029932,3.860855,2.019689,0.287046,1.591588,2.038830,4.411448,2.556028,3.159947,1.866398,3.152419,3.473171,3.590677,1.491970,4.347751,1.267941,3.397390,1.113082,0.177447,2.763565,0.695338,1.762286,0.443890,4.820365,3.053039,2.486323,2.736311,2.153369,4.557909,0.067277,2.183838,0.836047,2.080117,0.892184,2.308308,1.014325,0.824032,4.430023,2.640746,3.597880,0.412170,1.057601,4.530182,3.774650,1.872542,4.883257,4.358118,4.219469,4.800075,1.968247,4.167953,4.998937,3.433563,3.644085,3.753141,2.660086,2.297098,0.906605,4.136110,1.155625,1.648913,3.117370,0.034272,3.410027,2.050556,4.053164,0.117853,2.082776,3.106285,0.520195,4.366509,1.722897,1.038054,1.677066,0.814415,3.482062,3.528560,4.611045,0.850225,0.521098,4.941163,4.676881,1.134597,0.108342,2.342128,1.042430,4.116945,2.003354,2.046314,4.038306,2.202691,0.489063,2.355028,1.724871,2.514898,4.016037,2.238102,2.801930,2.086619,2.498589,4.524866,1.517798,2.312207,2.971861,3.514590,1.427854,3.780667,3.696964,0.906107,0.895298,3.104366,0.531340,4.797047,3.967690,3.260620,4.834807,1.815000,2.559686,1.553686,2.338079,4.394952,0.838394,3.524777,0.014730,4.289471,4.902270,1.622279,3.081308,3.935113,0.735042,1.523760,3.975138,4.500569,2.971832,3.134830,4.360609,2.869927,4.890130,2.445262,2.909105,3.695911,1.727955,3.566121,2.966379,2.255627,1.335551,1.276888,4.640475,2.381172,2.502933,2.431308,0.150684,0.689230,3.238955,4.251105,4.641009,3.098986,1.392234,4.933244,4.868976,1.147089,3.308544,2.312739,3.925164,0.890137,2.467865,1.915179,2.505767,3.799876,0.836043,4.230297,4.067627,2.170515,4.167499,1.441251,4.448026,2.636529,3.555772,1.131592,0.525546,0.689012,2.153584,2.349973,1.797374,0.085357,3.179116,2.804738,3.152003,3.684451,4.839404,3.486999,1.779104,4.059670,0.327219,0.832183,0.281130,2.316876,3.662476,1.544846,2.004902,3.728209,1.703602,2.937417,1.874314,0.272140,4.156035,0.654373,1.502440,0.993462,4.583078,4.241548,1.082084,0.867760,2.613160,3.519861,0.622025,3.052143,2.743442,4.307706,3.619759,4.379262,4.483072,1.762278,4.549501,2.737450,1.380398,3.739901,4.814698,3.378785,3.795260,3.100871,0.897732,2.584328,3.133663,3.836901,0.844978,3.442944,2.840806,0.717429,3.890958,1.558854,2.424504,0.299907,4.201402,0.831521,4.574519,1.866541,0.150621,3.661089,1.372687,3.163834,0.114593,3.881712,4.874076,2.514662,4.657857,3.915132,4.067191,3.251563,1.602523,3.456074,1.637074,4.042473,4.723744,2.826691,4.648575,2.401521,1.685958,3.038227,1.351171,0.728056,0.436193,1.566913,3.892909,3.944502,0.729860,1.286039,4.057358,0.577685,4.221571,3.479685,0.074923,2.449570,0.615638,1.731387,3.561329,0.450412,1.289484,2.660379,0.514611,2.278793,4.641664,3.953180,2.745331,1.913394,3.160215,0.648507,0.133357,4.136907,3.668178,4.461827,2.892149,4.198942,2.892463,1.233595,3.447166,4.604305,4.709971,0.942475,4.115069,3.217689,3.147160,4.126941,1.171864,2.455243,3.758844,1.880385,1.487004,0.279780,2.829641,1.776333,1.912976,2.345021,3.721279,4.165011,0.886035,2.316090,2.907806,1.954920,3.819965,4.433054,2.675948,4.101640,3.111796,2.655702,4.264521,3.671148,3.194987,3.790627,2.516593,0.885083,4.162683,2.584124,4.634598,4.859033,3.375649,1.560501,2.878419,1.856432,1.345020,2.270899,2.068886,3.052946,4.268088,1.748169,2.244560,4.165665,0.954486,0.627353,2.720024,4.155571,1.866667,3.159556,0.049118,4.545475,3.016935,1.293076,0.391144,1.122228,3.143962,3.345844,3.551785,4.231899,2.677374,1.248634,4.851837,0.566359,1.468794,3.567365,3.028178,2.719323,0.572351,4.896886,0.739200,1.651224,1.908428,1.173036,1.453144,3.493675,3.842417,2.936869,4.313234,3.575988,2.313220,2.999659,2.210435,4.752958,2.468387,0.290681,0.171567,2.121601,0.379092,4.408588,4.689687,0.623934,2.616273,1.678289,4.375162,0.196463,4.826497,4.291374,0.440402,4.259373,3.435388,1.256949,2.977637,1.181321,1.198123,3.612692,1.146992,2.114469,4.978619,4.869941,3.302803,3.182147,1.103428,0.662596,0.322257,1.634699,1.705209,2.467008,1.402320,2.657973,1.198123,0.882478,1.990911,4.812078,1.144449,4.327120,2.369870,4.357135,3.706190,0.239705,4.859286,0.275567,3.618703,4.104993,1.333792,0.847156,3.160868,4.854715,4.237409,0.322425,4.344910,1.724285,4.136223,0.087213,3.001902,2.769170,0.049612,2.742184,1.178171,0.025633,2.749072,1.720604,3.930455,4.128002,0.398407,2.095612,2.094166,1.071870,2.948967,3.551963,0.434130,2.519470,2.346699,1.524551,1.409417,1.759035,2.451585,1.372253,2.694288,3.795089,1.984602,0.622684,3.264585,3.553231,1.269887,4.199118,1.376920,3.671084,1.132572,2.136007,3.847146,1.324280,3.711920,1.840674,4.999008,1.263116,0.534366,2.112181,3.600770,4.777832,3.335242,2.703202,3.812476,3.015268,3.412568,2.779733,1.388447,3.779804,2.277972,1.918259,0.010755,1.758411,4.540446,0.238659,0.704649,3.457451,3.186817,3.075264,2.740144,3.035192,3.393500,2.616001,3.142056,0.061785,2.378596,2.112321,3.879157,1.130596,3.845963,2.515654,3.334061,0.235885,4.080271,2.743251,2.931930,1.027348,4.229874,1.383483,4.173757,4.543564,3.991931,4.690086,0.921663,0.972457,4.357583,2.343728,0.629452,0.531097,2.511270,3.209740,4.084207,2.872800,0.219885,4.820316,2.722554,1.102767,1.913665,1.816109,2.789013,4.164988,4.772431,0.655075,2.210493,1.820306,1.511401,3.453485,2.343882,3.384287,4.930695,2.279548,4.840454,0.829800,4.039285,0.257056,1.045604,1.575941,0.799139,2.450076,1.567212,3.030704,1.314339,0.537329,0.940455,2.497733,0.369709,1.850360,2.525330,3.284342,3.615060,3.491601,4.895382,0.613017,3.237495,0.878254,4.249018,2.373656,3.008564,4.803005,1.830671,2.900654,1.206235,2.461784,1.083231,1.596418,4.867624,1.268300,0.120980,3.205438,3.561240,0.093931,2.679340,1.399464,2.154674,3.410713,4.348655,1.674022,4.637410,2.198482,3.845131,0.311008,3.978187,4.280911,1.474043,0.901474,4.068663,0.276228,0.086284,4.764417,2.749035,3.946248,0.761388,2.982131,1.963878,0.842598,2.663557,1.043033,0.036358,4.548248,0.559632,2.458318,4.920586,0.208751,3.107515,0.220053,2.754163,1.423132,1.335936,2.237835,3.552100,2.844852,2.974684,1.452025,3.802378,0.189101,4.519249,4.651368,0.090085,1.123907,1.722385,1.664949,2.389294,4.382299,4.407140,4.965336,0.637935,0.012399,4.391215,4.018740,2.872878,0.595703,1.894650,0.456246,3.449532,2.903945,4.147431,3.373436,1.035075,3.928556,4.377347,1.276086,0.574507,3.315137,3.534148,0.240438,1.911804,2.748822,4.311101,1.609079,3.361157,2.531952,3.209372,0.221214,1.667702,1.597643,0.087688,2.337189,1.105386,3.024115,1.033730,4.653629,0.667566,2.416373,1.019557,1.363792,4.726271,4.508237,0.841996,2.070143,1.612242,0.774616,0.453534,1.098458,2.484164,2.877423,0.979768,0.612467,1.146074,2.013607,2.199245,2.104233,1.073632,2.677953,1.599068,0.393903,3.247508,2.942263,4.241374,0.501930,2.788018,4.908887,0.305510,1.929571,3.701759,4.568676,2.836328,0.484536,2.122691,1.040705,3.660008,0.700023,1.584227,2.962155,4.902904,2.697178,0.947807,2.809838,3.935717,0.999046,1.114282,0.624217,3.976699,3.042866,4.303308,4.634818,0.398531,0.555493,3.240552,1.918443,1.354216,1.946801,2.093120,4.520537,0.839014,0.005095,2.162052,0.159090,2.868248,2.957551,2.716024,0.617080,2.933825,1.003571,1.102491,3.444884,4.820313,4.197029,3.522221,4.326557,4.390820,2.283242,2.667046,3.395232,4.457674,0.478686,1.927782,0.182419,1.242186,4.496999,4.669854,2.419955,2.193267,4.403102,1.011008,1.438383,2.310952,1.009877,0.211090,1.850071,3.530191,1.455119,0.219293,4.828167,4.695511,3.091828,4.904286,4.284340,0.124147,3.401747,2.947612,1.018023,4.269531,1.100504,1.655629,2.055340,3.887514,0.209374,3.606638,0.103732,0.643909,4.076962,0.450797,1.620148,0.776167,3.293809,0.265457,0.706088,4.760389,2.441822,3.181229,0.204439,2.966214,4.727831,2.890151,2.158387,0.137030,1.331942,1.587734,1.300078,1.476970,2.589503,0.717869,0.333155,0.931097,0.514835,4.608921,2.625975,3.971231,2.180067,2.081527,1.578032,2.158541,2.553988,1.209432,2.860176,0.943778,2.438910,4.252057,2.439515,2.364696,3.230398,4.118382,3.822578,2.884424,3.852406,0.788938,2.894216,0.270548,3.541402,0.643432,1.958591,3.431523,0.504042,0.639844,4.892606,3.359766,2.532390,2.066725,2.882868,2.097248,0.445276,0.403979,1.023332,4.048428,0.361353,1.516237,1.136845,2.970882,3.378512,1.799886,3.417569,2.449141,4.726636,2.515781,2.526616,0.148357,3.656494,0.962249,2.830189,3.524939,3.192902,0.356012,3.416722,4.713416,2.277613,0.328546,4.394692,2.156190,0.259863,4.581804,0.080355,2.341598,1.603711,1.142324,1.035898,1.022438,1.027568,4.625017,4.267682,2.179582,2.800322,3.023510,0.515762,1.985425,4.722190,0.346294,3.325679,0.524434,4.856998,2.849033,0.559407,1.158605,3.742065,3.495097,0.903474,0.990475,0.174713,1.005017,2.523398,2.951660,0.108378,2.989163,2.861312,0.436828,0.996279,3.950912,1.016266,2.848758,4.844930,1.693134,0.830385,3.389292,0.294979,1.511126,4.711183,1.082347,2.854723,1.911290,3.744001,2.291123,4.563324,1.154506,3.886020,1.300340,3.552880,0.251940,1.474080,3.912163,3.082179,0.153890,1.000110,0.290796,4.646813,3.841017,0.971064,1.972894,1.464246,2.792463,0.702305,4.325129,3.829189,0.239672,4.872232,4.396945,0.040094,4.364687,4.314782,1.407580,2.178613,4.839047,1.652370,4.069792,3.775975,2.225662,1.221542,1.800308,1.527465,4.719534,2.026267,4.432787,3.642128,3.092798,3.378478,4.963592,1.028494,3.459104,3.367332,0.486100,1.158322,2.170546,1.160228,2.701398,2.036480,1.078161,0.791964,4.355680,1.956930,3.365634,3.881535,3.653546,3.693748,4.734100,2.745255,4.574399,0.381622,1.600242,3.182811,4.835379,4.290117,1.691466,2.405776,0.781170,4.156449,3.882971,2.179011,2.165862,0.642729,4.671985,0.976217,2.860727,1.208619,0.605691,3.642922,2.373285,4.974652,2.933796,4.599096,3.378878,0.855297,0.417279,3.893139,4.684327,3.629479,2.482088,0.945655,2.302823,1.451318,3.660627,1.694701,0.463830,1.018631,1.540707,1.826393,3.728150,1.615475,4.475078,4.786478,2.899368,0.521732,2.526603,2.925453,4.779859,2.815737,3.032316,0.049551,4.717544,1.480861,3.038443,3.783809,2.649782,0.136092,2.180772,2.708764,2.859065,3.297779,4.515613,4.177924,1.561484,2.697878,4.965147,1.858322,4.347810,2.119577,3.841938,4.981807,4.917437,4.594119,0.306569,0.942569,4.568173,0.310926,1.288260,0.766230,4.795047,4.048706,1.150799,0.986439,4.871699,0.078345,2.702508,1.231069,2.956396,3.533294,1.615086,0.411091,3.307359,1.544273,3.902347,3.100254,0.290257,2.524898,4.378576,4.146110,2.395397,3.681805,3.526063,3.370108,4.631784,0.614838,3.463389,1.368711,0.702733,2.057362,0.591928,2.483837,2.153713,4.101452,2.335719,4.045453,0.810238,0.239405,3.627801,2.538262,2.105399,3.564817,4.742721,3.691596,3.296512,2.475069,0.607244,0.396154,0.235176,1.594210,1.760460,2.126622,3.846742,2.659791,0.685185,0.595610,3.236604,0.074760,3.679532,1.863521,4.997802,2.885636,4.325796,3.999673,1.807501,3.633476,4.692552,1.442303,1.289959,0.971602,4.488791,0.678424,2.025589,2.291425,2.472931,4.481274,1.465780,4.226436,2.778349,4.390086,1.694456,1.158879,1.264513,0.963284,0.180685,1.240221,3.152669,2.857399,0.400342,2.149889,4.598310,1.004410,0.739787,0.676664,4.176469,2.476978,1.172989,4.196196,3.232764,4.841449,1.732272,1.895363,0.097090,0.717661,0.188892,1.429335,2.664953,0.547490,1.602951,2.388182,0.691760,2.131467,3.264073,4.069007,0.837230,3.987368,3.432318,4.607254,0.713007,1.290775,1.404516,0.203623,0.297576,4.199441,3.545237,4.706788,1.368038,4.759686,0.373203,4.123716,3.907059,2.132538,4.796496,2.167928,3.782718,3.914466,1.101143,2.436232,4.932890,0.675057,1.763434,1.559564,0.350980,1.036419,3.781054,2.212489,4.602730,0.058734,2.655795,3.437775,3.718904,1.212811,1.440621,3.819075,2.286101,4.718166,4.869229,2.760719,0.394618,3.537026,1.504376,1.141227,4.299605,0.894329,0.244832,3.023225,0.719292,0.288111,0.055685,2.391616,1.372737,3.737325,0.468436,3.520032,1.652252,1.785099,0.390486,1.909909,3.246581,0.993855,3.332704,3.179373,0.854759,1.583011,3.340145,1.362834,4.900885,3.564826,0.116661,2.742575,0.572096,3.245560,1.306302,0.051378,1.030837,0.908576,3.810324,0.278026,0.300042,4.609405,0.948015,4.770921,2.392090,1.698702,4.550967,0.315390,3.050805,3.890195,1.965440,2.988225,4.960712,4.277722,4.641786,4.545747,2.171598,4.027717,4.825331,2.662657,4.647666,0.044383,1.400754,3.082128,1.806969,1.456843,4.486426,0.226301,1.745357,1.620947,1.496425,2.330697,2.405980,3.311002,3.326181,1.305311,2.323243,0.742848,2.165051,3.434011,3.529822,4.459499,0.203189,2.168039,4.923247,2.670295,2.449971,2.509641,2.247153,0.436407,1.580823,2.874605,3.322508,3.000557,2.855567,4.928697,3.995550,4.920550,1.255558,3.218200,0.619796,3.651374,3.659363,2.810172,3.079197,3.788212,3.986841,0.443399,2.783815,1.833684,2.958727,0.398366,2.971307,3.175473,1.774038,2.300497,3.173048,1.743361,0.965917,4.290858,0.924099,3.659946,1.420277,0.866139,1.228157,1.592174,1.906174,0.800409,4.327271,3.248888,2.727841,0.521635,1.265978,4.531992,2.908873,0.378242,0.240325,4.324487,2.425056,1.650625,4.740167,3.692717,1.646375,1.655488,4.347535,4.490398,3.185362,3.605165,3.476742,3.151750,1.433162,4.992540,4.710398,3.424823,3.416129,4.829058,2.029704,1.678152,4.720808,2.926389,4.123664,1.969846,1.156757,1.674243,4.538708,2.305028,0.571541,1.170560,3.026445,0.105680,1.044920,0.773288,4.687001,0.042889,0.878769,3.846373,2.500886,2.749624,4.870893,2.646143,2.606869,2.886177,2.550712,3.440984,3.956153,1.870242,3.206393,1.459697,3.676523,1.022320,2.370027,4.907268,0.730590,3.247461,3.744824,3.320197,4.310562,2.330627,3.169485,2.972061,2.713253,3.478968,2.167254,3.535006,0.786989,0.405959,1.872039,2.524026,3.984640,0.882194,4.053556,4.901872,1.371186,1.902176,4.766563,1.151434,3.027331,3.150123,1.201375,1.593602,0.921198,3.828241,3.311194,4.554787,2.240321,1.145110,2.520505,4.903745,3.266401,3.074347,0.502872,2.040623,0.109902,3.562741,4.460352,1.965509,2.935534,4.720419,2.670725,1.669678,1.447176,0.150010,4.006641,4.750958,4.884572,2.773967,3.528914,0.336331,4.961810,4.031202,0.188596,0.515435,0.731670,2.339940,4.365287,1.861093,4.252035,0.789520,0.489964,4.791142,3.264164,1.071352,2.420344,0.265822,2.329371,4.303040,4.711174,3.673102,2.305014,1.472508,0.554054,2.728203,1.533902,1.782007,0.708220,1.862911,0.716899,3.190215,0.362760,4.954628,0.474119,4.228099,1.217987,1.016913,2.234130,1.557689,4.737573,2.642671,1.546376,0.379792,2.062704,4.915684,4.761813,4.284342,3.888543,0.900958,3.775288,4.146945,1.181923,4.359638,0.598233,0.591532,3.246661,1.369600,2.033505,0.760127,3.823041,4.721193,0.703155,3.182470,3.494532,2.222481,2.473411,3.778170,4.430010,0.774620,1.577516,4.037162,2.128689,2.520998,4.271830,3.511293,2.015915,3.081751,0.421255,3.591351,1.204655,1.820895,0.086627,3.983967,2.025735,4.403686,2.396993,3.779239,3.496983,2.365780,4.765678,0.366466,2.787481,0.257261,3.786890,1.565036,2.923038,1.724394,0.820242,0.917958,4.977689,3.235232,0.896833,1.941052,2.619090,0.649869,4.647575,4.280894,3.063376,3.471900,1.486056,2.402871,3.211623,2.394377,4.931209,4.870677,3.043489,2.446731,3.557810,1.570170,2.417842,3.632515,3.178420,3.068553,3.919539,2.272264,2.314337,3.078946,4.546870,1.873521,0.032862,0.837886,4.370220,1.044815,0.078747,1.914158,3.824319,4.573908,2.002193,3.176967,0.973517,2.288722,2.091870,4.530678,3.842146,0.314830,1.878723,4.778730,2.501960,4.063513,4.953854,4.950409,0.912907,1.797634,2.384449,4.042896,1.445500,3.024493,0.435148,1.626697,4.852384,4.546390,0.956560,3.365771,0.035663,0.705084,3.406432,3.460695,2.523778,2.614587,1.229817,0.583865,0.360570,4.301813,3.188966,4.951121,0.596189,1.537710,1.431529,2.228116,1.118169,4.588798,2.310649,1.656101,2.490859,1.115784,4.295925,2.018548,4.166827,1.450425,1.591613,2.438076,2.990227,0.780884,0.369716,3.117162,4.820367,2.483466,3.995957,2.044040,0.231385,1.119469,1.399900,4.432893,4.070661,0.783504,1.899165,4.450988,1.782630,0.894692,4.855204,3.713833,3.488042,0.822492,1.684430,0.832129,1.001361,1.097777,0.641447,0.307804,4.016437,1.794516,1.191535,3.518494,1.351574,1.828609,2.846974,4.725246,0.342212,1.805309,0.109192,3.464396,1.266937,2.835801,1.328618,0.881577,2.661575,4.791385,3.583201,4.922601,3.522561,1.403011,4.284431,3.845931,0.081472,2.047052,1.505269,3.405110,2.081005,1.262451,3.515710,3.905039,3.989887,1.193584,0.130009,3.664712,2.358523,0.782798,1.738550,0.415488,2.542411,4.185431,2.109851,3.734005,1.781876,4.652489,0.690534,4.924494,1.626291,4.779414,1.183456,0.832311,0.986173,4.260385,2.293352,1.776458,1.696158,1.206343,4.370225,2.414486,1.924969,0.687635,0.432069,0.169667,2.890896,1.380942,1.139355,4.649525,4.570038,3.488582,2.707469,0.225299,2.904699,2.531805,0.386505,1.540925,4.139028,0.976583,3.745576,4.286168,4.986714,3.708433,1.950256,0.122015,1.673469,1.329102,4.679273,2.111847,0.469254,3.503336,4.255499,1.015765,2.450986,1.284920,4.777964,3.978063,4.767855,0.644422,0.572087,4.196899,4.675172,0.301727,1.768216,4.382507,0.367835,3.405374,4.352907,4.709862,4.125582,4.470620,3.621680,0.890445,3.198435,4.285662,4.784951,4.755709,0.023506,3.123327,0.830491,1.365323,1.164411,4.535398,2.543207,1.150602,2.995244,3.637362,4.144533,4.959026,0.769131,0.452929,2.761979,2.236854,0.280521,1.586668,2.364104,1.497947,3.994024,1.804979,3.821671,1.729339,2.673517,2.627626,3.601948,4.163749,0.972740,3.761595,0.799768,3.224634,1.007945,3.952914,4.879515,2.008177,2.092729,2.334405,3.726112,0.123118,3.380948,2.311061,0.176373,1.771389,1.253313,4.583949,2.734760,2.953325,4.003142,1.669665,2.990157,4.682503,0.875731,2.919679,0.766458,2.098373,1.449629,4.433065,4.508163,1.669770,4.131705,2.691133,4.429423,1.752686,0.118075,2.536232,3.262633,0.292559,4.086954,3.161739,1.973717,2.845684,4.975364,1.202949,1.194009,0.394334,0.930719,4.486663,4.068057,1.209500,1.561133,1.792676,4.832930,1.926089,1.970900,3.100944,0.753017,3.914051,1.012799,2.336503,0.431119,2.836296,1.872219,4.710747,4.108249,0.555322,0.618296,4.827536,4.675194,0.722879,2.653158,2.178515,1.208950,1.327640,0.287980,4.178755,4.022275,4.907703,1.870009,0.688338,1.706212,2.546108,2.479356,3.887816,2.633411,1.682238,0.964930,0.898621,2.260199,0.155128,2.290516,3.310337,1.977277,4.479775,1.198647,4.186262,2.897235,1.875533,2.420561,3.189400,0.796348,3.478947,2.899227,3.519405,3.734746,1.773786,0.091536,1.670516,2.422218,1.130470,4.798997,3.150116,0.701091,4.015539,3.717567,1.076981,1.553046,1.899007,3.469738,2.225767,1.779018,1.783534,0.389053,2.560305,3.417370,3.693745,3.139440,4.576526,0.849724,0.138684,0.751352,4.381844,4.649362,2.547753,2.324274,1.291489,3.232569,4.390370,4.645136,3.217199,4.725390,3.307790,1.923788,1.644469,1.079590,2.170371,3.316060,4.448403,1.256216,2.761273,0.474465,0.490909,3.646392,4.796384,0.669371,2.820387,4.061411,0.389955,1.816692,2.815095,0.969081,1.645534,3.736132,1.217191,0.204809,0.648386,4.659210,0.793571,3.433278,0.449386,3.342840,4.265888,4.962132,0.293289,2.236904,2.928607,3.750272,2.095666,0.317591,0.525639,1.732514,3.313779,0.675983,3.333812,3.300548,0.490440,3.589320,2.099317,4.141539,0.999739,3.865527,4.386133,2.357315,3.162070,3.089654,3.768522,2.284135,3.036599,0.935440,3.725311,4.806696,1.150529,0.271360,4.228510,1.166075,0.387357,4.115557,0.586837,0.989504,2.237999,0.840009,0.821112,0.394959,3.919287,0.788564,2.401678,1.702828,4.974722,1.967681,4.802450,2.561426,4.169802,4.353516,0.939275,2.916969,4.425106,3.681441,3.735025,2.468208,2.036053,0.412436,4.388892,1.381623,2.999279,1.775644,4.223056,3.461782,3.484300,3.710455,3.082311,4.465584,1.892583,3.106047,3.321168,2.975687,3.630549,3.799191,1.149409,2.798677,4.879463,4.069720,0.748502,0.175879,2.767869,0.091405,0.149368,3.006425,3.090956,1.780497,2.690762,4.144060,1.769532,3.703889,2.041189,2.253352,3.063507,0.739962,2.322476,4.822575,2.899075,3.903022,4.490068,2.164333,3.962295,1.846313,3.655559,1.640534,1.653083,3.019507,1.397614,3.354730,4.985032,4.099061,3.646705,0.847186,3.649826,1.636192,0.014812,3.729462,3.739875 \ No newline at end of file diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/DasumTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DasumTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l1/DasumTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/DasumTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/DaxpyTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DaxpyTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l1/DaxpyTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/DaxpyTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/DdotTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DdotTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l1/DdotTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/DdotTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/DgbmvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DgbmvTest.java new file mode 100644 index 00000000..0c70d216 --- /dev/null +++ b/blas/src/test/java/dev/ludovic/netlib/blas/DgbmvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.BLAS; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgbmvTest extends BLASTest { + + @ParameterizedTest + @MethodSource("BLASImplementations") + void testSanity(BLAS blas) { + } +} diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l3/DgemmTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DgemmTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l3/DgemmTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/DgemmTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/DgemvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DgemvTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l2/DgemvTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/DgemvTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/DgerTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DgerTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l2/DgerTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/DgerTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/Dnrm2Test.java b/blas/src/test/java/dev/ludovic/netlib/blas/Dnrm2Test.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l1/Dnrm2Test.java rename to blas/src/test/java/dev/ludovic/netlib/blas/Dnrm2Test.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/DrotTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DrotTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l1/DrotTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/DrotTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/DrotgTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DrotgTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l1/DrotgTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/DrotgTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/DrotmTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DrotmTest.java new file mode 100644 index 00000000..96f189e3 --- /dev/null +++ b/blas/src/test/java/dev/ludovic/netlib/blas/DrotmTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.BLAS; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DrotmTest extends BLASTest { + + @ParameterizedTest + @MethodSource("BLASImplementations") + void testSanity(BLAS blas) { + } +} diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/DrotmgTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DrotmgTest.java new file mode 100644 index 00000000..97eb7abe --- /dev/null +++ b/blas/src/test/java/dev/ludovic/netlib/blas/DrotmgTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.BLAS; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DrotmgTest extends BLASTest { + + @ParameterizedTest + @MethodSource("BLASImplementations") + void testSanity(BLAS blas) { + } +} diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/DsbmvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DsbmvTest.java new file mode 100644 index 00000000..d32bdf5b --- /dev/null +++ b/blas/src/test/java/dev/ludovic/netlib/blas/DsbmvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.BLAS; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsbmvTest extends BLASTest { + + @ParameterizedTest + @MethodSource("BLASImplementations") + void testSanity(BLAS blas) { + } +} diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/DscalTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DscalTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l1/DscalTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/DscalTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/DspmvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DspmvTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l2/DspmvTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/DspmvTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/Dspr2Test.java b/blas/src/test/java/dev/ludovic/netlib/blas/Dspr2Test.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l2/Dspr2Test.java rename to blas/src/test/java/dev/ludovic/netlib/blas/Dspr2Test.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/DsprTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DsprTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l2/DsprTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/DsprTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/DswapTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DswapTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l1/DswapTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/DswapTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l3/DsymmTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DsymmTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l3/DsymmTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/DsymmTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/DsymvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DsymvTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l2/DsymvTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/DsymvTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/Dsyr2Test.java b/blas/src/test/java/dev/ludovic/netlib/blas/Dsyr2Test.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l2/Dsyr2Test.java rename to blas/src/test/java/dev/ludovic/netlib/blas/Dsyr2Test.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/Dsyr2kTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/Dsyr2kTest.java new file mode 100644 index 00000000..6f0d3327 --- /dev/null +++ b/blas/src/test/java/dev/ludovic/netlib/blas/Dsyr2kTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.BLAS; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dsyr2kTest extends BLASTest { + + @ParameterizedTest + @MethodSource("BLASImplementations") + void testSanity(BLAS blas) { + } +} diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/DsyrTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DsyrTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l2/DsyrTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/DsyrTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/DsyrkTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DsyrkTest.java new file mode 100644 index 00000000..54d8a708 --- /dev/null +++ b/blas/src/test/java/dev/ludovic/netlib/blas/DsyrkTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.BLAS; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsyrkTest extends BLASTest { + + @ParameterizedTest + @MethodSource("BLASImplementations") + void testSanity(BLAS blas) { + } +} diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/DtbmvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DtbmvTest.java new file mode 100644 index 00000000..f112cc56 --- /dev/null +++ b/blas/src/test/java/dev/ludovic/netlib/blas/DtbmvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.BLAS; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtbmvTest extends BLASTest { + + @ParameterizedTest + @MethodSource("BLASImplementations") + void testSanity(BLAS blas) { + } +} diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/DtbsvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DtbsvTest.java new file mode 100644 index 00000000..f2eec6c0 --- /dev/null +++ b/blas/src/test/java/dev/ludovic/netlib/blas/DtbsvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.BLAS; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtbsvTest extends BLASTest { + + @ParameterizedTest + @MethodSource("BLASImplementations") + void testSanity(BLAS blas) { + } +} diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/DtpmvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DtpmvTest.java new file mode 100644 index 00000000..e7e9cfce --- /dev/null +++ b/blas/src/test/java/dev/ludovic/netlib/blas/DtpmvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.BLAS; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtpmvTest extends BLASTest { + + @ParameterizedTest + @MethodSource("BLASImplementations") + void testSanity(BLAS blas) { + } +} diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/DtpsvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DtpsvTest.java new file mode 100644 index 00000000..f4d2f327 --- /dev/null +++ b/blas/src/test/java/dev/ludovic/netlib/blas/DtpsvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.BLAS; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtpsvTest extends BLASTest { + + @ParameterizedTest + @MethodSource("BLASImplementations") + void testSanity(BLAS blas) { + } +} diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/DtrmmTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DtrmmTest.java new file mode 100644 index 00000000..6f94b6c7 --- /dev/null +++ b/blas/src/test/java/dev/ludovic/netlib/blas/DtrmmTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.BLAS; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtrmmTest extends BLASTest { + + @ParameterizedTest + @MethodSource("BLASImplementations") + void testSanity(BLAS blas) { + } +} diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/DtrmvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DtrmvTest.java new file mode 100644 index 00000000..4f97d1c7 --- /dev/null +++ b/blas/src/test/java/dev/ludovic/netlib/blas/DtrmvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.BLAS; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtrmvTest extends BLASTest { + + @ParameterizedTest + @MethodSource("BLASImplementations") + void testSanity(BLAS blas) { + } +} diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/DtrsmTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DtrsmTest.java new file mode 100644 index 00000000..baf27766 --- /dev/null +++ b/blas/src/test/java/dev/ludovic/netlib/blas/DtrsmTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.BLAS; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtrsmTest extends BLASTest { + + @ParameterizedTest + @MethodSource("BLASImplementations") + void testSanity(BLAS blas) { + } +} diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/DtrsvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DtrsvTest.java new file mode 100644 index 00000000..5760f220 --- /dev/null +++ b/blas/src/test/java/dev/ludovic/netlib/blas/DtrsvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.BLAS; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtrsvTest extends BLASTest { + + @ParameterizedTest + @MethodSource("BLASImplementations") + void testSanity(BLAS blas) { + } +} diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/IdamaxTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/IdamaxTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l1/IdamaxTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/IdamaxTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/IsamaxTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/IsamaxTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l1/IsamaxTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/IsamaxTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/SasumTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/SasumTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l1/SasumTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/SasumTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/SaxpyTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/SaxpyTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l1/SaxpyTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/SaxpyTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/SdotTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/SdotTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l1/SdotTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/SdotTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/SdsdotTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/SdsdotTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l1/SdsdotTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/SdsdotTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/SgbmvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/SgbmvTest.java new file mode 100644 index 00000000..66bad099 --- /dev/null +++ b/blas/src/test/java/dev/ludovic/netlib/blas/SgbmvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.BLAS; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgbmvTest extends BLASTest { + + @ParameterizedTest + @MethodSource("BLASImplementations") + void testSanity(BLAS blas) { + } +} diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l3/SgemmTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/SgemmTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l3/SgemmTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/SgemmTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/SgemvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/SgemvTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l2/SgemvTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/SgemvTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/SgerTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/SgerTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l2/SgerTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/SgerTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/Snrm2Test.java b/blas/src/test/java/dev/ludovic/netlib/blas/Snrm2Test.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l1/Snrm2Test.java rename to blas/src/test/java/dev/ludovic/netlib/blas/Snrm2Test.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/SrotTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/SrotTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l1/SrotTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/SrotTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/SrotgTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/SrotgTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l1/SrotgTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/SrotgTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/SrotmTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/SrotmTest.java new file mode 100644 index 00000000..eff4a336 --- /dev/null +++ b/blas/src/test/java/dev/ludovic/netlib/blas/SrotmTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.BLAS; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SrotmTest extends BLASTest { + + @ParameterizedTest + @MethodSource("BLASImplementations") + void testSanity(BLAS blas) { + } +} diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/SrotmgTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/SrotmgTest.java new file mode 100644 index 00000000..40793502 --- /dev/null +++ b/blas/src/test/java/dev/ludovic/netlib/blas/SrotmgTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.BLAS; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SrotmgTest extends BLASTest { + + @ParameterizedTest + @MethodSource("BLASImplementations") + void testSanity(BLAS blas) { + } +} diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/SsbmvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/SsbmvTest.java new file mode 100644 index 00000000..22b551f9 --- /dev/null +++ b/blas/src/test/java/dev/ludovic/netlib/blas/SsbmvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.BLAS; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsbmvTest extends BLASTest { + + @ParameterizedTest + @MethodSource("BLASImplementations") + void testSanity(BLAS blas) { + } +} diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/SscalTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/SscalTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l1/SscalTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/SscalTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/SspmvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/SspmvTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l2/SspmvTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/SspmvTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/Sspr2Test.java b/blas/src/test/java/dev/ludovic/netlib/blas/Sspr2Test.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l2/Sspr2Test.java rename to blas/src/test/java/dev/ludovic/netlib/blas/Sspr2Test.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/SsprTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/SsprTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l2/SsprTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/SsprTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l1/SswapTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/SswapTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l1/SswapTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/SswapTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l3/SsymmTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/SsymmTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l3/SsymmTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/SsymmTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/SsymvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/SsymvTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l2/SsymvTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/SsymvTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/Ssyr2Test.java b/blas/src/test/java/dev/ludovic/netlib/blas/Ssyr2Test.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l2/Ssyr2Test.java rename to blas/src/test/java/dev/ludovic/netlib/blas/Ssyr2Test.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/Ssyr2kTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/Ssyr2kTest.java new file mode 100644 index 00000000..88fd9f62 --- /dev/null +++ b/blas/src/test/java/dev/ludovic/netlib/blas/Ssyr2kTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.BLAS; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Ssyr2kTest extends BLASTest { + + @ParameterizedTest + @MethodSource("BLASImplementations") + void testSanity(BLAS blas) { + } +} diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/l2/SsyrTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/SsyrTest.java similarity index 100% rename from blas/src/test/java/dev/ludovic/netlib/blas/l2/SsyrTest.java rename to blas/src/test/java/dev/ludovic/netlib/blas/SsyrTest.java diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/SsyrkTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/SsyrkTest.java new file mode 100644 index 00000000..dac16d87 --- /dev/null +++ b/blas/src/test/java/dev/ludovic/netlib/blas/SsyrkTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.BLAS; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsyrkTest extends BLASTest { + + @ParameterizedTest + @MethodSource("BLASImplementations") + void testSanity(BLAS blas) { + } +} diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/StbmvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/StbmvTest.java new file mode 100644 index 00000000..d54e6f20 --- /dev/null +++ b/blas/src/test/java/dev/ludovic/netlib/blas/StbmvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.BLAS; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StbmvTest extends BLASTest { + + @ParameterizedTest + @MethodSource("BLASImplementations") + void testSanity(BLAS blas) { + } +} diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/StbsvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/StbsvTest.java new file mode 100644 index 00000000..de6e609e --- /dev/null +++ b/blas/src/test/java/dev/ludovic/netlib/blas/StbsvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.BLAS; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StbsvTest extends BLASTest { + + @ParameterizedTest + @MethodSource("BLASImplementations") + void testSanity(BLAS blas) { + } +} diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/StpmvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/StpmvTest.java new file mode 100644 index 00000000..efd6ae53 --- /dev/null +++ b/blas/src/test/java/dev/ludovic/netlib/blas/StpmvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.BLAS; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StpmvTest extends BLASTest { + + @ParameterizedTest + @MethodSource("BLASImplementations") + void testSanity(BLAS blas) { + } +} diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/StpsvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/StpsvTest.java new file mode 100644 index 00000000..8aedba62 --- /dev/null +++ b/blas/src/test/java/dev/ludovic/netlib/blas/StpsvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.BLAS; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StpsvTest extends BLASTest { + + @ParameterizedTest + @MethodSource("BLASImplementations") + void testSanity(BLAS blas) { + } +} diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/StrmmTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/StrmmTest.java new file mode 100644 index 00000000..35d2c9d1 --- /dev/null +++ b/blas/src/test/java/dev/ludovic/netlib/blas/StrmmTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.BLAS; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StrmmTest extends BLASTest { + + @ParameterizedTest + @MethodSource("BLASImplementations") + void testSanity(BLAS blas) { + } +} diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/StrmvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/StrmvTest.java new file mode 100644 index 00000000..ce3f53b3 --- /dev/null +++ b/blas/src/test/java/dev/ludovic/netlib/blas/StrmvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.BLAS; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StrmvTest extends BLASTest { + + @ParameterizedTest + @MethodSource("BLASImplementations") + void testSanity(BLAS blas) { + } +} diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/StrsmTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/StrsmTest.java new file mode 100644 index 00000000..8685e1d8 --- /dev/null +++ b/blas/src/test/java/dev/ludovic/netlib/blas/StrsmTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.BLAS; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StrsmTest extends BLASTest { + + @ParameterizedTest + @MethodSource("BLASImplementations") + void testSanity(BLAS blas) { + } +} diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/StrsvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/StrsvTest.java new file mode 100644 index 00000000..e027a835 --- /dev/null +++ b/blas/src/test/java/dev/ludovic/netlib/blas/StrsvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.BLAS; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StrsvTest extends BLASTest { + + @ParameterizedTest + @MethodSource("BLASImplementations") + void testSanity(BLAS blas) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DbdsdcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DbdsdcTest.java new file mode 100644 index 00000000..f5ecc9bb --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DbdsdcTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DbdsdcTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DbdsqrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DbdsqrTest.java new file mode 100644 index 00000000..ed0b398b --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DbdsqrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DbdsqrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DdisnaTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DdisnaTest.java new file mode 100644 index 00000000..6feeac8f --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DdisnaTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DdisnaTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbbrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbbrdTest.java new file mode 100644 index 00000000..501f4c8c --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbbrdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgbbrdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbconTest.java new file mode 100644 index 00000000..0a84c13a --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbconTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgbconTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbequTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbequTest.java new file mode 100644 index 00000000..4d09f343 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbequTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgbequTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbrfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbrfsTest.java new file mode 100644 index 00000000..3bc074d7 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbrfsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgbrfsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbsvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbsvTest.java new file mode 100644 index 00000000..f40716e4 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbsvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgbsvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbsvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbsvxTest.java new file mode 100644 index 00000000..ae8da8ad --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbsvxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgbsvxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgbtf2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgbtf2Test.java new file mode 100644 index 00000000..286fd2c9 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgbtf2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dgbtf2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbtrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbtrfTest.java new file mode 100644 index 00000000..8ad0e3af --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbtrfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgbtrfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbtrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbtrsTest.java new file mode 100644 index 00000000..cbefe2e0 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbtrsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgbtrsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgebakTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgebakTest.java new file mode 100644 index 00000000..7a567f27 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgebakTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgebakTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgebalTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgebalTest.java new file mode 100644 index 00000000..98dde67c --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgebalTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgebalTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgebd2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgebd2Test.java new file mode 100644 index 00000000..18cd8af7 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgebd2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dgebd2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgebrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgebrdTest.java new file mode 100644 index 00000000..f8004e15 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgebrdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgebrdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeconTest.java new file mode 100644 index 00000000..aee1485d --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeconTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgeconTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeequTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeequTest.java new file mode 100644 index 00000000..0d144ae2 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeequTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgeequTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeesTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeesTest.java new file mode 100644 index 00000000..146701a0 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeesTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgeesTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeesxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeesxTest.java new file mode 100644 index 00000000..5cead174 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeesxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgeesxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeevTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeevTest.java new file mode 100644 index 00000000..50b1b8af --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeevTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgeevTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeevxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeevxTest.java new file mode 100644 index 00000000..1febc4c3 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeevxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgeevxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgegsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgegsTest.java new file mode 100644 index 00000000..ed7da311 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgegsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgegsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgegvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgegvTest.java new file mode 100644 index 00000000..1da9f9da --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgegvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgegvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgehd2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgehd2Test.java new file mode 100644 index 00000000..89fec242 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgehd2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dgehd2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgehrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgehrdTest.java new file mode 100644 index 00000000..0a9c2667 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgehrdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgehrdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgelq2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgelq2Test.java new file mode 100644 index 00000000..c83079ea --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgelq2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dgelq2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelqfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelqfTest.java new file mode 100644 index 00000000..e338fd63 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelqfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgelqfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsTest.java new file mode 100644 index 00000000..bc6c15b2 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgelsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsdTest.java new file mode 100644 index 00000000..ae1cbf4a --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgelsdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelssTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelssTest.java new file mode 100644 index 00000000..55614717 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelssTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgelssTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsxTest.java new file mode 100644 index 00000000..89a58e54 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgelsxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsyTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsyTest.java new file mode 100644 index 00000000..4ef2a80c --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsyTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgelsyTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgeql2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgeql2Test.java new file mode 100644 index 00000000..765f9f07 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgeql2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dgeql2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeqlfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeqlfTest.java new file mode 100644 index 00000000..0c36ce33 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeqlfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgeqlfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgeqp3Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgeqp3Test.java new file mode 100644 index 00000000..3a9e9034 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgeqp3Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dgeqp3Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeqpfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeqpfTest.java new file mode 100644 index 00000000..76179c73 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeqpfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgeqpfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgeqr2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgeqr2Test.java new file mode 100644 index 00000000..2a4374cb --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgeqr2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dgeqr2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeqrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeqrfTest.java new file mode 100644 index 00000000..f13cd6d1 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeqrfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgeqrfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgerfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgerfsTest.java new file mode 100644 index 00000000..7fd04cf9 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgerfsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgerfsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgerq2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgerq2Test.java new file mode 100644 index 00000000..7d784e38 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgerq2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dgerq2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgerqfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgerqfTest.java new file mode 100644 index 00000000..ee815a21 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgerqfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgerqfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgesc2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgesc2Test.java new file mode 100644 index 00000000..a7ab485d --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgesc2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dgesc2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgesddTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgesddTest.java new file mode 100644 index 00000000..10c8b74b --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgesddTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgesddTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgesvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgesvTest.java new file mode 100644 index 00000000..033a97d9 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgesvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgesvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgesvdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgesvdTest.java new file mode 100644 index 00000000..7af4ddef --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgesvdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgesvdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgesvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgesvxTest.java new file mode 100644 index 00000000..837f956b --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgesvxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgesvxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgetc2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgetc2Test.java new file mode 100644 index 00000000..58fc2452 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgetc2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dgetc2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgetf2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgetf2Test.java new file mode 100644 index 00000000..78d1ef48 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgetf2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dgetf2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgetrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgetrfTest.java new file mode 100644 index 00000000..634c5225 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgetrfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgetrfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgetriTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgetriTest.java new file mode 100644 index 00000000..ad25d776 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgetriTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgetriTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgetrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgetrsTest.java new file mode 100644 index 00000000..cf444363 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgetrsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgetrsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggbakTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggbakTest.java new file mode 100644 index 00000000..c8b47c3d --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggbakTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DggbakTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggbalTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggbalTest.java new file mode 100644 index 00000000..e4ab4430 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggbalTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DggbalTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggesTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggesTest.java new file mode 100644 index 00000000..a23d735b --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggesTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DggesTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggesxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggesxTest.java new file mode 100644 index 00000000..1a392cf2 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggesxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DggesxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggevTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggevTest.java new file mode 100644 index 00000000..337bd7c3 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggevTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DggevTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggevxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggevxTest.java new file mode 100644 index 00000000..8f8e5790 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggevxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DggevxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggglmTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggglmTest.java new file mode 100644 index 00000000..945c5518 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggglmTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DggglmTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgghrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgghrdTest.java new file mode 100644 index 00000000..d2fdb167 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgghrdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgghrdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgglseTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgglseTest.java new file mode 100644 index 00000000..0a0744af --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgglseTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgglseTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggqrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggqrfTest.java new file mode 100644 index 00000000..10935dd4 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggqrfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DggqrfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggrqfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggrqfTest.java new file mode 100644 index 00000000..9c8ccf47 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggrqfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DggrqfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggsvdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggsvdTest.java new file mode 100644 index 00000000..42f46f29 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggsvdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DggsvdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggsvpTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggsvpTest.java new file mode 100644 index 00000000..17b8beaf --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggsvpTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DggsvpTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgtconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgtconTest.java new file mode 100644 index 00000000..d0b2b750 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgtconTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgtconTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgtrfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgtrfsTest.java new file mode 100644 index 00000000..20daa4c4 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgtrfsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgtrfsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgtsvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgtsvTest.java new file mode 100644 index 00000000..889f8b2c --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgtsvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgtsvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgtsvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgtsvxTest.java new file mode 100644 index 00000000..274c39ab --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgtsvxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgtsvxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgttrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgttrfTest.java new file mode 100644 index 00000000..6443a039 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgttrfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgttrfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgttrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgttrsTest.java new file mode 100644 index 00000000..21804ba2 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgttrsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DgttrsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgtts2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgtts2Test.java new file mode 100644 index 00000000..8b96838e --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgtts2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dgtts2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DhgeqzTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DhgeqzTest.java new file mode 100644 index 00000000..68469ed2 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DhgeqzTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DhgeqzTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DhseinTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DhseinTest.java new file mode 100644 index 00000000..920b417e --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DhseinTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DhseinTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DhseqrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DhseqrTest.java new file mode 100644 index 00000000..e176cd36 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DhseqrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DhseqrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlabadTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlabadTest.java new file mode 100644 index 00000000..3bdadd22 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlabadTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlabadTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlabrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlabrdTest.java new file mode 100644 index 00000000..c1ba45f5 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlabrdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlabrdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlacn2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlacn2Test.java new file mode 100644 index 00000000..fea271fd --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlacn2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlacn2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaconTest.java new file mode 100644 index 00000000..c7688207 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaconTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlaconTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlacpyTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlacpyTest.java new file mode 100644 index 00000000..f20d2064 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlacpyTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlacpyTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DladivTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DladivTest.java new file mode 100644 index 00000000..dc567015 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DladivTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DladivTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlae2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlae2Test.java new file mode 100644 index 00000000..5fbeb9be --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlae2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlae2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaebzTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaebzTest.java new file mode 100644 index 00000000..edb08bce --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaebzTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlaebzTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed0Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed0Test.java new file mode 100644 index 00000000..7965d04d --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed0Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlaed0Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed1Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed1Test.java new file mode 100644 index 00000000..df5fd4a6 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed1Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlaed1Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed2Test.java new file mode 100644 index 00000000..c4f3c09a --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlaed2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed3Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed3Test.java new file mode 100644 index 00000000..bf433161 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed3Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlaed3Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed4Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed4Test.java new file mode 100644 index 00000000..76ffc5c0 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed4Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlaed4Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed5Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed5Test.java new file mode 100644 index 00000000..77221c5f --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed5Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlaed5Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed6Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed6Test.java new file mode 100644 index 00000000..56bbff60 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed6Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlaed6Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed7Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed7Test.java new file mode 100644 index 00000000..ed4607ea --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed7Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlaed7Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed8Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed8Test.java new file mode 100644 index 00000000..439067df --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed8Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlaed8Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed9Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed9Test.java new file mode 100644 index 00000000..61051449 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed9Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlaed9Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaedaTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaedaTest.java new file mode 100644 index 00000000..91eb593a --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaedaTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlaedaTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaeinTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaeinTest.java new file mode 100644 index 00000000..911079f8 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaeinTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlaeinTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaev2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaev2Test.java new file mode 100644 index 00000000..7b34b597 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaev2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlaev2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaexcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaexcTest.java new file mode 100644 index 00000000..c14931f9 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaexcTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlaexcTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlag2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlag2Test.java new file mode 100644 index 00000000..bedd15c7 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlag2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlag2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlag2sTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlag2sTest.java new file mode 100644 index 00000000..9bc04241 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlag2sTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlag2sTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlags2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlags2Test.java new file mode 100644 index 00000000..a09bc87e --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlags2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlags2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlagtfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlagtfTest.java new file mode 100644 index 00000000..86aa6296 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlagtfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlagtfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlagtmTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlagtmTest.java new file mode 100644 index 00000000..4502dfe8 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlagtmTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlagtmTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlagtsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlagtsTest.java new file mode 100644 index 00000000..57f166d2 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlagtsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlagtsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlagv2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlagv2Test.java new file mode 100644 index 00000000..95f7380c --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlagv2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlagv2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlahqrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlahqrTest.java new file mode 100644 index 00000000..17373605 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlahqrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlahqrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlahr2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlahr2Test.java new file mode 100644 index 00000000..de196d7a --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlahr2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlahr2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlahrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlahrdTest.java new file mode 100644 index 00000000..fa8ca46c --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlahrdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlahrdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaic1Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaic1Test.java new file mode 100644 index 00000000..4789195c --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaic1Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlaic1Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaln2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaln2Test.java new file mode 100644 index 00000000..52b26767 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaln2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlaln2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlals0Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlals0Test.java new file mode 100644 index 00000000..c617e841 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlals0Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlals0Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlalsaTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlalsaTest.java new file mode 100644 index 00000000..1b09982d --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlalsaTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlalsaTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlalsdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlalsdTest.java new file mode 100644 index 00000000..cb9e794d --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlalsdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlalsdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc1Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc1Test.java new file mode 100644 index 00000000..275703f5 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc1Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlamc1Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc2Test.java new file mode 100644 index 00000000..dc89d4fb --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlamc2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc4Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc4Test.java new file mode 100644 index 00000000..8d0c36ab --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc4Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlamc4Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc5Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc5Test.java new file mode 100644 index 00000000..a9733233 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc5Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlamc5Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlamrgTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlamrgTest.java new file mode 100644 index 00000000..9c32aaba --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlamrgTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlamrgTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlanv2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlanv2Test.java new file mode 100644 index 00000000..15ea59e5 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlanv2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlanv2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlapllTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlapllTest.java new file mode 100644 index 00000000..e9cdc600 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlapllTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlapllTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlapmtTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlapmtTest.java new file mode 100644 index 00000000..49003729 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlapmtTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlapmtTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqgbTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqgbTest.java new file mode 100644 index 00000000..a6013561 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqgbTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlaqgbTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqgeTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqgeTest.java new file mode 100644 index 00000000..439406c1 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqgeTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlaqgeTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqp2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqp2Test.java new file mode 100644 index 00000000..4f88a8f0 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqp2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlaqp2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqpsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqpsTest.java new file mode 100644 index 00000000..3129393c --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqpsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlaqpsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr0Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr0Test.java new file mode 100644 index 00000000..6b378304 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr0Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlaqr0Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr1Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr1Test.java new file mode 100644 index 00000000..1a99e586 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr1Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlaqr1Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr2Test.java new file mode 100644 index 00000000..7b3bdad4 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlaqr2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr3Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr3Test.java new file mode 100644 index 00000000..41d6da79 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr3Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlaqr3Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr4Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr4Test.java new file mode 100644 index 00000000..c8dd6bb1 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr4Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlaqr4Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr5Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr5Test.java new file mode 100644 index 00000000..d42a51d7 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr5Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlaqr5Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqsbTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqsbTest.java new file mode 100644 index 00000000..6553dfd0 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqsbTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlaqsbTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqspTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqspTest.java new file mode 100644 index 00000000..7b4fbe84 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqspTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlaqspTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqsyTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqsyTest.java new file mode 100644 index 00000000..80a674d0 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqsyTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlaqsyTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqtrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqtrTest.java new file mode 100644 index 00000000..a9cf0a2d --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqtrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlaqtrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlar1vTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlar1vTest.java new file mode 100644 index 00000000..16665d77 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlar1vTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlar1vTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlar2vTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlar2vTest.java new file mode 100644 index 00000000..09d5a4d7 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlar2vTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlar2vTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfTest.java new file mode 100644 index 00000000..b92d8d11 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlarfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfbTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfbTest.java new file mode 100644 index 00000000..22a8e82d --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfbTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlarfbTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfgTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfgTest.java new file mode 100644 index 00000000..b0ce9d89 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfgTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlarfgTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarftTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarftTest.java new file mode 100644 index 00000000..b6b90e0e --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarftTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlarftTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfxTest.java new file mode 100644 index 00000000..de3d330f --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlarfxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlargvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlargvTest.java new file mode 100644 index 00000000..3f0a701d --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlargvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlargvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarnvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarnvTest.java new file mode 100644 index 00000000..6873980f --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarnvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlarnvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarraTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarraTest.java new file mode 100644 index 00000000..4da2f150 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarraTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlarraTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrbTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrbTest.java new file mode 100644 index 00000000..0af49153 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrbTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlarrbTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrcTest.java new file mode 100644 index 00000000..bedce4be --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrcTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlarrcTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrdTest.java new file mode 100644 index 00000000..f1ba687d --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlarrdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarreTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarreTest.java new file mode 100644 index 00000000..27b04e68 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarreTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlarreTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrfTest.java new file mode 100644 index 00000000..8d4e7e98 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlarrfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrjTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrjTest.java new file mode 100644 index 00000000..4aef5786 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrjTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlarrjTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrkTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrkTest.java new file mode 100644 index 00000000..9a81f1f7 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrkTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlarrkTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrrTest.java new file mode 100644 index 00000000..5ba00785 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlarrrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrvTest.java new file mode 100644 index 00000000..f9b758ff --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlarrvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlartgTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlartgTest.java new file mode 100644 index 00000000..c0180964 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlartgTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlartgTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlartvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlartvTest.java new file mode 100644 index 00000000..315992a4 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlartvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlartvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaruvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaruvTest.java new file mode 100644 index 00000000..48f20b87 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaruvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlaruvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarzTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarzTest.java new file mode 100644 index 00000000..9701a895 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarzTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlarzTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarzbTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarzbTest.java new file mode 100644 index 00000000..90260dce --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarzbTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlarzbTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarztTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarztTest.java new file mode 100644 index 00000000..5534cc6b --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarztTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlarztTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlas2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlas2Test.java new file mode 100644 index 00000000..e0ab587e --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlas2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlas2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasclTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasclTest.java new file mode 100644 index 00000000..e3f0b052 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasclTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlasclTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd0Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd0Test.java new file mode 100644 index 00000000..30f05ad4 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd0Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlasd0Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd1Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd1Test.java new file mode 100644 index 00000000..d0ec9aa5 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd1Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlasd1Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd2Test.java new file mode 100644 index 00000000..c84103fb --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlasd2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd3Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd3Test.java new file mode 100644 index 00000000..fdcf64c8 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd3Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlasd3Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd4Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd4Test.java new file mode 100644 index 00000000..c03ae544 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd4Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlasd4Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd5Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd5Test.java new file mode 100644 index 00000000..633c7438 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd5Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlasd5Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd6Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd6Test.java new file mode 100644 index 00000000..00652545 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd6Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlasd6Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd7Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd7Test.java new file mode 100644 index 00000000..fad24f88 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd7Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlasd7Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd8Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd8Test.java new file mode 100644 index 00000000..9b97d7ba --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd8Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlasd8Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasdaTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasdaTest.java new file mode 100644 index 00000000..52fae845 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasdaTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlasdaTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasdqTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasdqTest.java new file mode 100644 index 00000000..d7533084 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasdqTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlasdqTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasdtTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasdtTest.java new file mode 100644 index 00000000..f165338d --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasdtTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlasdtTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasetTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasetTest.java new file mode 100644 index 00000000..3e5c0011 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasetTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlasetTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq1Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq1Test.java new file mode 100644 index 00000000..43444f52 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq1Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlasq1Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq2Test.java new file mode 100644 index 00000000..18894dcf --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlasq2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq3Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq3Test.java new file mode 100644 index 00000000..bd7f9f79 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq3Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlasq3Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq4Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq4Test.java new file mode 100644 index 00000000..cb77bc1b --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq4Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlasq4Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq5Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq5Test.java new file mode 100644 index 00000000..7c470460 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq5Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlasq5Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq6Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq6Test.java new file mode 100644 index 00000000..9d07d6c0 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq6Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlasq6Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasrTest.java new file mode 100644 index 00000000..03e92038 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlasrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasrtTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasrtTest.java new file mode 100644 index 00000000..e4ba6c7e --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasrtTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlasrtTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlassqTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlassqTest.java new file mode 100644 index 00000000..2c3cf260 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlassqTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlassqTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasv2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasv2Test.java new file mode 100644 index 00000000..9f4c524d --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasv2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlasv2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaswpTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaswpTest.java new file mode 100644 index 00000000..b9aa21c4 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaswpTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlaswpTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasy2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasy2Test.java new file mode 100644 index 00000000..042a8f0b --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasy2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlasy2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasyfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasyfTest.java new file mode 100644 index 00000000..1ffe360f --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasyfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlasyfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatbsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatbsTest.java new file mode 100644 index 00000000..95588e5f --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatbsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlatbsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatdfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatdfTest.java new file mode 100644 index 00000000..637b58bc --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatdfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlatdfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatpsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatpsTest.java new file mode 100644 index 00000000..afbe2a30 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatpsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlatpsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatrdTest.java new file mode 100644 index 00000000..0b9efd45 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatrdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlatrdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatrsTest.java new file mode 100644 index 00000000..aecb0857 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatrsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlatrsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatrzTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatrzTest.java new file mode 100644 index 00000000..cf654490 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatrzTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlatrzTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatzmTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatzmTest.java new file mode 100644 index 00000000..f03428e8 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatzmTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlatzmTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlauu2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlauu2Test.java new file mode 100644 index 00000000..6b3a0fa4 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlauu2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlauu2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlauumTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlauumTest.java new file mode 100644 index 00000000..b24f8616 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlauumTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DlauumTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlazq3Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlazq3Test.java new file mode 100644 index 00000000..e335436e --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlazq3Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlazq3Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlazq4Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlazq4Test.java new file mode 100644 index 00000000..8b63672b --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlazq4Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dlazq4Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DopgtrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DopgtrTest.java new file mode 100644 index 00000000..3bd577a5 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DopgtrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DopgtrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DopmtrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DopmtrTest.java new file mode 100644 index 00000000..1510f4b3 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DopmtrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DopmtrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorg2lTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorg2lTest.java new file mode 100644 index 00000000..0adcf387 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorg2lTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dorg2lTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorg2rTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorg2rTest.java new file mode 100644 index 00000000..8742e3f7 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorg2rTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dorg2rTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgbrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgbrTest.java new file mode 100644 index 00000000..0036dc1f --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgbrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DorgbrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DorghrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DorghrTest.java new file mode 100644 index 00000000..772b9d6b --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DorghrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DorghrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorgl2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorgl2Test.java new file mode 100644 index 00000000..4bd709d6 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorgl2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dorgl2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DorglqTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DorglqTest.java new file mode 100644 index 00000000..08f33bed --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DorglqTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DorglqTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgqlTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgqlTest.java new file mode 100644 index 00000000..21d822da --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgqlTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DorgqlTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgqrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgqrTest.java new file mode 100644 index 00000000..f694c917 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgqrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DorgqrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorgr2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorgr2Test.java new file mode 100644 index 00000000..b5d7f164 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorgr2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dorgr2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgrqTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgrqTest.java new file mode 100644 index 00000000..dfa22b04 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgrqTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DorgrqTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgtrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgtrTest.java new file mode 100644 index 00000000..a8c4bc40 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgtrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DorgtrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorm2lTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorm2lTest.java new file mode 100644 index 00000000..850eb113 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorm2lTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dorm2lTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorm2rTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorm2rTest.java new file mode 100644 index 00000000..b11dd191 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorm2rTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dorm2rTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DormbrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormbrTest.java new file mode 100644 index 00000000..389b0694 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormbrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DormbrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DormhrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormhrTest.java new file mode 100644 index 00000000..28ba987a --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormhrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DormhrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorml2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorml2Test.java new file mode 100644 index 00000000..ccb8f7cb --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorml2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dorml2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DormlqTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormlqTest.java new file mode 100644 index 00000000..f8497721 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormlqTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DormlqTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DormqlTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormqlTest.java new file mode 100644 index 00000000..c72529dd --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormqlTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DormqlTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DormqrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormqrTest.java new file mode 100644 index 00000000..4aaea73d --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormqrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DormqrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dormr2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dormr2Test.java new file mode 100644 index 00000000..bdd17254 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dormr2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dormr2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dormr3Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dormr3Test.java new file mode 100644 index 00000000..533016ec --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dormr3Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dormr3Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DormrqTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormrqTest.java new file mode 100644 index 00000000..b542edad --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormrqTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DormrqTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DormrzTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormrzTest.java new file mode 100644 index 00000000..a2d92c72 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormrzTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DormrzTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DormtrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormtrTest.java new file mode 100644 index 00000000..b1231658 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormtrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DormtrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbconTest.java new file mode 100644 index 00000000..c8ff3b18 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbconTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DpbconTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbequTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbequTest.java new file mode 100644 index 00000000..f78450f9 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbequTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DpbequTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbrfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbrfsTest.java new file mode 100644 index 00000000..102cb0b4 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbrfsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DpbrfsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbstfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbstfTest.java new file mode 100644 index 00000000..d006817f --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbstfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DpbstfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbsvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbsvTest.java new file mode 100644 index 00000000..ac7e6b07 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbsvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DpbsvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbsvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbsvxTest.java new file mode 100644 index 00000000..1687637b --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbsvxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DpbsvxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dpbtf2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dpbtf2Test.java new file mode 100644 index 00000000..b805c2d2 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dpbtf2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dpbtf2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbtrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbtrfTest.java new file mode 100644 index 00000000..f7eb561b --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbtrfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DpbtrfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbtrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbtrsTest.java new file mode 100644 index 00000000..d26c9562 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbtrsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DpbtrsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpoconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpoconTest.java new file mode 100644 index 00000000..6a9ca36d --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpoconTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DpoconTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpoequTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpoequTest.java new file mode 100644 index 00000000..062cac22 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpoequTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DpoequTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DporfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DporfsTest.java new file mode 100644 index 00000000..7c40f0ce --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DporfsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DporfsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DposvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DposvTest.java new file mode 100644 index 00000000..0caab792 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DposvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DposvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DposvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DposvxTest.java new file mode 100644 index 00000000..bbb4182c --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DposvxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DposvxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dpotf2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dpotf2Test.java new file mode 100644 index 00000000..54d6175e --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dpotf2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dpotf2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpotrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpotrfTest.java new file mode 100644 index 00000000..81863e19 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpotrfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DpotrfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpotriTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpotriTest.java new file mode 100644 index 00000000..ab0446d8 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpotriTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DpotriTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpotrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpotrsTest.java new file mode 100644 index 00000000..61f10121 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpotrsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DpotrsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DppconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DppconTest.java new file mode 100644 index 00000000..b5ae527c --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DppconTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DppconTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DppequTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DppequTest.java new file mode 100644 index 00000000..447b1f19 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DppequTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DppequTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpprfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpprfsTest.java new file mode 100644 index 00000000..c1a62a0a --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpprfsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DpprfsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DppsvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DppsvTest.java index 2c69a64c..109eefed 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DppsvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DppsvTest.java @@ -35,14 +35,5 @@ public class DppsvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { - double[] dgeAUexpected, dgeAUobtained, dgeBexpected, dgeBobtained; - org.netlib.util.intW infoexpected, infoobtained; - - f2j.dppsv("U", N, M, dgeAUexpected = dgeAU.clone(), dgeBexpected = dgeB.clone(), N, infoexpected = new org.netlib.util.intW(0)); - lapack.dppsv("U", N, M, dgeAUobtained = dgeAU.clone(), dgeBobtained = dgeB.clone(), N, infoobtained = new org.netlib.util.intW(0)); - assertEquals(2, infoexpected.val); - assertEquals(2, infoobtained.val); - assertArrayEquals(dgeAUexpected, dgeAUobtained, depsilon); - assertArrayEquals(dgeBexpected, dgeBobtained, depsilon); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DppsvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DppsvxTest.java new file mode 100644 index 00000000..23add8dd --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DppsvxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DppsvxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpptrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpptrfTest.java new file mode 100644 index 00000000..aef0cac2 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpptrfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DpptrfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpptriTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpptriTest.java new file mode 100644 index 00000000..52fe57fb --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpptriTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DpptriTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpptrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpptrsTest.java new file mode 100644 index 00000000..19dac1e7 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpptrsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DpptrsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DptconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DptconTest.java new file mode 100644 index 00000000..c741927b --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DptconTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DptconTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpteqrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpteqrTest.java new file mode 100644 index 00000000..5c420791 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpteqrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DpteqrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DptrfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DptrfsTest.java new file mode 100644 index 00000000..607238c5 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DptrfsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DptrfsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DptsvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DptsvTest.java new file mode 100644 index 00000000..8e7dc7b3 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DptsvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DptsvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DptsvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DptsvxTest.java new file mode 100644 index 00000000..ced35e41 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DptsvxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DptsvxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpttrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpttrfTest.java new file mode 100644 index 00000000..486a9f54 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpttrfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DpttrfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpttrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpttrsTest.java new file mode 100644 index 00000000..f7435016 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpttrsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DpttrsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dptts2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dptts2Test.java new file mode 100644 index 00000000..f60c7590 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dptts2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dptts2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DrsclTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DrsclTest.java new file mode 100644 index 00000000..53e39135 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DrsclTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DrsclTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbevTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbevTest.java new file mode 100644 index 00000000..6436c18d --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbevTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsbevTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbevdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbevdTest.java new file mode 100644 index 00000000..9c017a43 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbevdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsbevdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbevxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbevxTest.java new file mode 100644 index 00000000..0f297d1d --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbevxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsbevxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgstTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgstTest.java new file mode 100644 index 00000000..29111023 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgstTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsbgstTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgvTest.java new file mode 100644 index 00000000..26ba0722 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsbgvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgvdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgvdTest.java new file mode 100644 index 00000000..2c524311 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgvdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsbgvdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgvxTest.java new file mode 100644 index 00000000..f1d870dd --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgvxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsbgvxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbtrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbtrdTest.java new file mode 100644 index 00000000..985c3a86 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbtrdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsbtrdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsgesvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsgesvTest.java new file mode 100644 index 00000000..840e04d1 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsgesvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsgesvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DspconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspconTest.java new file mode 100644 index 00000000..ea1b8f06 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspconTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DspconTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DspevTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspevTest.java new file mode 100644 index 00000000..1125f6af --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspevTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DspevTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DspevdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspevdTest.java new file mode 100644 index 00000000..f6aa9cb2 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspevdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DspevdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DspevxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspevxTest.java new file mode 100644 index 00000000..a0a0b2e5 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspevxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DspevxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DspgstTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspgstTest.java new file mode 100644 index 00000000..52b8295c --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspgstTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DspgstTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DspgvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspgvTest.java new file mode 100644 index 00000000..aa260366 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspgvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DspgvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DspgvdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspgvdTest.java new file mode 100644 index 00000000..96fa0519 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspgvdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DspgvdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DspgvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspgvxTest.java new file mode 100644 index 00000000..70d66941 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspgvxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DspgvxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsprfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsprfsTest.java new file mode 100644 index 00000000..bef4a7d8 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsprfsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsprfsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DspsvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspsvTest.java new file mode 100644 index 00000000..137a55c5 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspsvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DspsvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DspsvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspsvxTest.java new file mode 100644 index 00000000..1ff75af5 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspsvxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DspsvxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsptrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsptrdTest.java new file mode 100644 index 00000000..fd1326b9 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsptrdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsptrdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsptrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsptrfTest.java new file mode 100644 index 00000000..3e3cc38d --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsptrfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsptrfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsptriTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsptriTest.java new file mode 100644 index 00000000..409004df --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsptriTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsptriTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsptrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsptrsTest.java new file mode 100644 index 00000000..f122c829 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsptrsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsptrsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DstebzTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstebzTest.java new file mode 100644 index 00000000..4eb54aee --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstebzTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DstebzTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DstedcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstedcTest.java new file mode 100644 index 00000000..a65c48f5 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstedcTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DstedcTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DstegrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstegrTest.java new file mode 100644 index 00000000..69ada315 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstegrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DstegrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsteinTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsteinTest.java new file mode 100644 index 00000000..e811fd1c --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsteinTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsteinTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DstemrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstemrTest.java new file mode 100644 index 00000000..ad807c94 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstemrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DstemrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsteqrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsteqrTest.java new file mode 100644 index 00000000..62c6ca7b --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsteqrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsteqrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsterfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsterfTest.java new file mode 100644 index 00000000..7d5709d8 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsterfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsterfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DstevTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstevTest.java new file mode 100644 index 00000000..61bc7644 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstevTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DstevTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DstevdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstevdTest.java new file mode 100644 index 00000000..06135aa7 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstevdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DstevdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DstevrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstevrTest.java new file mode 100644 index 00000000..bee5dff2 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstevrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DstevrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DstevxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstevxTest.java new file mode 100644 index 00000000..9e5b12f0 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstevxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DstevxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyconTest.java new file mode 100644 index 00000000..b987c20b --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyconTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsyconTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevTest.java new file mode 100644 index 00000000..a8c7bc65 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsyevTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevdTest.java new file mode 100644 index 00000000..7aa978ac --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsyevdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevrTest.java new file mode 100644 index 00000000..866d7ecd --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsyevrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevxTest.java new file mode 100644 index 00000000..0a9d53dc --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsyevxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dsygs2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dsygs2Test.java new file mode 100644 index 00000000..ae590624 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dsygs2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dsygs2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsygstTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsygstTest.java new file mode 100644 index 00000000..83a4e52c --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsygstTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsygstTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsygvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsygvTest.java new file mode 100644 index 00000000..7cc15687 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsygvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsygvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsygvdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsygvdTest.java new file mode 100644 index 00000000..c0cc8dbd --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsygvdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsygvdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsygvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsygvxTest.java new file mode 100644 index 00000000..e3d03e31 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsygvxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsygvxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyrfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyrfsTest.java new file mode 100644 index 00000000..304ef786 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyrfsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsyrfsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsysvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsysvTest.java new file mode 100644 index 00000000..fab0809e --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsysvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsysvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsysvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsysvxTest.java new file mode 100644 index 00000000..4147a3d5 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsysvxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsysvxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dsytd2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dsytd2Test.java new file mode 100644 index 00000000..04138bac --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dsytd2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dsytd2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dsytf2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dsytf2Test.java new file mode 100644 index 00000000..0abe941f --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dsytf2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dsytf2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsytrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsytrdTest.java new file mode 100644 index 00000000..2af7d970 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsytrdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsytrdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsytrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsytrfTest.java new file mode 100644 index 00000000..089c00ac --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsytrfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsytrfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsytriTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsytriTest.java new file mode 100644 index 00000000..48448113 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsytriTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsytriTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsytrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsytrsTest.java new file mode 100644 index 00000000..52c01a74 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsytrsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DsytrsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtbconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtbconTest.java new file mode 100644 index 00000000..4b1cd7f5 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtbconTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtbconTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtbrfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtbrfsTest.java new file mode 100644 index 00000000..14454016 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtbrfsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtbrfsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtbtrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtbtrsTest.java new file mode 100644 index 00000000..47d4a4c8 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtbtrsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtbtrsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgevcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgevcTest.java new file mode 100644 index 00000000..21672448 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgevcTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtgevcTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dtgex2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dtgex2Test.java new file mode 100644 index 00000000..d4318cd7 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dtgex2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dtgex2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgexcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgexcTest.java new file mode 100644 index 00000000..65f75671 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgexcTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtgexcTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsenTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsenTest.java new file mode 100644 index 00000000..f81aca38 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsenTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtgsenTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsjaTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsjaTest.java new file mode 100644 index 00000000..c7ade10e --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsjaTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtgsjaTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsnaTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsnaTest.java new file mode 100644 index 00000000..997e061a --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsnaTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtgsnaTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dtgsy2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dtgsy2Test.java new file mode 100644 index 00000000..dc033118 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dtgsy2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dtgsy2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsylTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsylTest.java new file mode 100644 index 00000000..b304f799 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsylTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtgsylTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtpconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtpconTest.java new file mode 100644 index 00000000..14797236 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtpconTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtpconTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtprfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtprfsTest.java new file mode 100644 index 00000000..6e5b12bf --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtprfsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtprfsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtptriTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtptriTest.java new file mode 100644 index 00000000..b8bb4ae6 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtptriTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtptriTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtptrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtptrsTest.java new file mode 100644 index 00000000..5efa5899 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtptrsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtptrsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrconTest.java new file mode 100644 index 00000000..e46db35c --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrconTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtrconTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrevcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrevcTest.java new file mode 100644 index 00000000..46d95111 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrevcTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtrevcTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrexcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrexcTest.java new file mode 100644 index 00000000..def8a170 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrexcTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtrexcTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrrfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrrfsTest.java new file mode 100644 index 00000000..8fc35606 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrrfsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtrrfsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrsenTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrsenTest.java new file mode 100644 index 00000000..fde3d532 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrsenTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtrsenTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrsnaTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrsnaTest.java new file mode 100644 index 00000000..fee8f9f3 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrsnaTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtrsnaTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrsylTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrsylTest.java new file mode 100644 index 00000000..5391b615 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrsylTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtrsylTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dtrti2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dtrti2Test.java new file mode 100644 index 00000000..503586e1 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dtrti2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Dtrti2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrtriTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrtriTest.java new file mode 100644 index 00000000..3ebd404e --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrtriTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtrtriTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrtrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrtrsTest.java new file mode 100644 index 00000000..20de69e4 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrtrsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtrtrsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtzrqfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtzrqfTest.java new file mode 100644 index 00000000..ef76c2ee --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtzrqfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtzrqfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtzrzfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtzrzfTest.java new file mode 100644 index 00000000..1c0cb7ee --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtzrzfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class DtzrzfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/IlaverTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/IlaverTest.java new file mode 100644 index 00000000..f29c80e2 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/IlaverTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class IlaverTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SbdsdcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SbdsdcTest.java new file mode 100644 index 00000000..1f75a6c4 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SbdsdcTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SbdsdcTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SbdsqrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SbdsqrTest.java new file mode 100644 index 00000000..1eaa2d11 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SbdsqrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SbdsqrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SdisnaTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SdisnaTest.java new file mode 100644 index 00000000..7e38c946 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SdisnaTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SdisnaTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbbrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbbrdTest.java new file mode 100644 index 00000000..f26c5ae4 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbbrdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgbbrdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbconTest.java new file mode 100644 index 00000000..3d177eb6 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbconTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgbconTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbequTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbequTest.java new file mode 100644 index 00000000..363c6414 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbequTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgbequTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbrfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbrfsTest.java new file mode 100644 index 00000000..f778bc66 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbrfsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgbrfsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbsvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbsvTest.java new file mode 100644 index 00000000..3f4fa36b --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbsvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgbsvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbsvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbsvxTest.java new file mode 100644 index 00000000..7bf996b7 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbsvxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgbsvxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgbtf2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgbtf2Test.java new file mode 100644 index 00000000..26133d19 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgbtf2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Sgbtf2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbtrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbtrfTest.java new file mode 100644 index 00000000..45caa61d --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbtrfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgbtrfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbtrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbtrsTest.java new file mode 100644 index 00000000..ffe2c164 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbtrsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgbtrsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgebakTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgebakTest.java new file mode 100644 index 00000000..dd1a5d56 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgebakTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgebakTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgebalTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgebalTest.java new file mode 100644 index 00000000..11ff4f91 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgebalTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgebalTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgebd2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgebd2Test.java new file mode 100644 index 00000000..2539ba97 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgebd2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Sgebd2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgebrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgebrdTest.java new file mode 100644 index 00000000..56138b01 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgebrdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgebrdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeconTest.java new file mode 100644 index 00000000..0fe971e5 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeconTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgeconTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeequTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeequTest.java new file mode 100644 index 00000000..0ccfe34b --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeequTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgeequTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeesTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeesTest.java new file mode 100644 index 00000000..887378a2 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeesTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgeesTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeesxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeesxTest.java new file mode 100644 index 00000000..7f653bd5 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeesxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgeesxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeevTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeevTest.java new file mode 100644 index 00000000..2731afdd --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeevTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgeevTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeevxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeevxTest.java new file mode 100644 index 00000000..0eafffb0 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeevxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgeevxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgegsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgegsTest.java new file mode 100644 index 00000000..880ee126 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgegsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgegsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgegvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgegvTest.java new file mode 100644 index 00000000..7d69fb05 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgegvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgegvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgehd2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgehd2Test.java new file mode 100644 index 00000000..49cdd93e --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgehd2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Sgehd2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgehrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgehrdTest.java new file mode 100644 index 00000000..c265a133 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgehrdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgehrdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgelq2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgelq2Test.java new file mode 100644 index 00000000..72604b09 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgelq2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Sgelq2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelqfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelqfTest.java new file mode 100644 index 00000000..e0ceeb45 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelqfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgelqfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsTest.java new file mode 100644 index 00000000..0553c24b --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgelsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsdTest.java new file mode 100644 index 00000000..08dbd763 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgelsdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelssTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelssTest.java new file mode 100644 index 00000000..8f1d6a31 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelssTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgelssTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsxTest.java new file mode 100644 index 00000000..9438b4c3 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgelsxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsyTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsyTest.java new file mode 100644 index 00000000..5f29f6c7 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsyTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgelsyTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgeql2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgeql2Test.java new file mode 100644 index 00000000..cde88171 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgeql2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Sgeql2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeqlfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeqlfTest.java new file mode 100644 index 00000000..106eefe0 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeqlfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgeqlfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgeqp3Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgeqp3Test.java new file mode 100644 index 00000000..a1e90fb3 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgeqp3Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Sgeqp3Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeqpfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeqpfTest.java new file mode 100644 index 00000000..9c992df3 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeqpfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgeqpfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgeqr2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgeqr2Test.java new file mode 100644 index 00000000..c1ab1e46 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgeqr2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Sgeqr2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeqrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeqrfTest.java new file mode 100644 index 00000000..562b2ebf --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeqrfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgeqrfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgerfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgerfsTest.java new file mode 100644 index 00000000..f1f3e2e9 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgerfsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgerfsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgerq2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgerq2Test.java new file mode 100644 index 00000000..d272e7ec --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgerq2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Sgerq2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgerqfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgerqfTest.java new file mode 100644 index 00000000..10d64219 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgerqfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgerqfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgesc2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgesc2Test.java new file mode 100644 index 00000000..92fd8a8a --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgesc2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Sgesc2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgesddTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgesddTest.java new file mode 100644 index 00000000..c455c39e --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgesddTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgesddTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgesvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgesvTest.java new file mode 100644 index 00000000..da42d01a --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgesvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgesvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgesvdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgesvdTest.java new file mode 100644 index 00000000..fca2e80d --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgesvdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgesvdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgesvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgesvxTest.java new file mode 100644 index 00000000..656753ed --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgesvxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgesvxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgetc2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgetc2Test.java new file mode 100644 index 00000000..d1876dd6 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgetc2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Sgetc2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgetf2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgetf2Test.java new file mode 100644 index 00000000..3916d7ef --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgetf2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Sgetf2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgetrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgetrfTest.java new file mode 100644 index 00000000..1d93df95 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgetrfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgetrfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgetriTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgetriTest.java new file mode 100644 index 00000000..a30a3bb6 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgetriTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgetriTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgetrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgetrsTest.java new file mode 100644 index 00000000..0008c608 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgetrsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgetrsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggbakTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggbakTest.java new file mode 100644 index 00000000..36ccb18f --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggbakTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SggbakTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggbalTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggbalTest.java new file mode 100644 index 00000000..5f69f51b --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggbalTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SggbalTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggesTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggesTest.java new file mode 100644 index 00000000..62d8d5eb --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggesTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SggesTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggesxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggesxTest.java new file mode 100644 index 00000000..2ab576a5 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggesxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SggesxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggevTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggevTest.java new file mode 100644 index 00000000..67c8bd3a --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggevTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SggevTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggevxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggevxTest.java new file mode 100644 index 00000000..5f645b2a --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggevxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SggevxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggglmTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggglmTest.java new file mode 100644 index 00000000..a4c0df80 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggglmTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SggglmTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgghrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgghrdTest.java new file mode 100644 index 00000000..dd85c885 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgghrdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgghrdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgglseTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgglseTest.java new file mode 100644 index 00000000..787e2bd1 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgglseTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgglseTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggqrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggqrfTest.java new file mode 100644 index 00000000..3749b647 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggqrfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SggqrfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggrqfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggrqfTest.java new file mode 100644 index 00000000..fa589298 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggrqfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SggrqfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggsvdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggsvdTest.java new file mode 100644 index 00000000..9a636364 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggsvdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SggsvdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggsvpTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggsvpTest.java new file mode 100644 index 00000000..f66270ef --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggsvpTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SggsvpTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgtconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgtconTest.java new file mode 100644 index 00000000..58945a6b --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgtconTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgtconTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgtrfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgtrfsTest.java new file mode 100644 index 00000000..c0b07cf0 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgtrfsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgtrfsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgtsvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgtsvTest.java new file mode 100644 index 00000000..2b64962f --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgtsvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgtsvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgtsvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgtsvxTest.java new file mode 100644 index 00000000..3049379d --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgtsvxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgtsvxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgttrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgttrfTest.java new file mode 100644 index 00000000..463e1297 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgttrfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgttrfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgttrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgttrsTest.java new file mode 100644 index 00000000..093c9cb5 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgttrsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SgttrsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgtts2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgtts2Test.java new file mode 100644 index 00000000..8591ff40 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgtts2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Sgtts2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/ShgeqzTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/ShgeqzTest.java new file mode 100644 index 00000000..143569d3 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/ShgeqzTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class ShgeqzTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/ShseinTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/ShseinTest.java new file mode 100644 index 00000000..153d84b1 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/ShseinTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class ShseinTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/ShseqrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/ShseqrTest.java new file mode 100644 index 00000000..2039a1b1 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/ShseqrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class ShseqrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlabadTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlabadTest.java new file mode 100644 index 00000000..2460ca32 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlabadTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlabadTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlabrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlabrdTest.java new file mode 100644 index 00000000..255b67da --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlabrdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlabrdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slacn2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slacn2Test.java new file mode 100644 index 00000000..7fb84560 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slacn2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slacn2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaconTest.java new file mode 100644 index 00000000..98de2919 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaconTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlaconTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlacpyTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlacpyTest.java new file mode 100644 index 00000000..351f4b38 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlacpyTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlacpyTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SladivTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SladivTest.java new file mode 100644 index 00000000..d3c05fad --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SladivTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SladivTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slae2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slae2Test.java new file mode 100644 index 00000000..d16531cf --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slae2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slae2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaebzTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaebzTest.java new file mode 100644 index 00000000..c23f8dd7 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaebzTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlaebzTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed0Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed0Test.java new file mode 100644 index 00000000..08480bad --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed0Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slaed0Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed1Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed1Test.java new file mode 100644 index 00000000..4647ca8f --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed1Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slaed1Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed2Test.java new file mode 100644 index 00000000..516f3476 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slaed2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed3Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed3Test.java new file mode 100644 index 00000000..77268544 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed3Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slaed3Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed4Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed4Test.java new file mode 100644 index 00000000..6bf1f61d --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed4Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slaed4Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed5Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed5Test.java new file mode 100644 index 00000000..607e0370 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed5Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slaed5Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed6Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed6Test.java new file mode 100644 index 00000000..c26b9b2f --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed6Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slaed6Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed7Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed7Test.java new file mode 100644 index 00000000..af519ce1 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed7Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slaed7Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed8Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed8Test.java new file mode 100644 index 00000000..49172d61 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed8Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slaed8Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed9Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed9Test.java new file mode 100644 index 00000000..fd216037 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed9Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slaed9Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaedaTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaedaTest.java new file mode 100644 index 00000000..e2c8f176 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaedaTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlaedaTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaeinTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaeinTest.java new file mode 100644 index 00000000..e69b6910 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaeinTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlaeinTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaev2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaev2Test.java new file mode 100644 index 00000000..98c5eaff --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaev2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slaev2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaexcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaexcTest.java new file mode 100644 index 00000000..43b267aa --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaexcTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlaexcTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slag2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slag2Test.java new file mode 100644 index 00000000..72229af6 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slag2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slag2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slag2dTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slag2dTest.java new file mode 100644 index 00000000..efa5649b --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slag2dTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slag2dTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slags2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slags2Test.java new file mode 100644 index 00000000..a83905f0 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slags2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slags2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlagtfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlagtfTest.java new file mode 100644 index 00000000..3be460ff --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlagtfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlagtfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlagtmTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlagtmTest.java new file mode 100644 index 00000000..962036c7 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlagtmTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlagtmTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlagtsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlagtsTest.java new file mode 100644 index 00000000..e474d812 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlagtsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlagtsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slagv2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slagv2Test.java new file mode 100644 index 00000000..e324122d --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slagv2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slagv2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlahqrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlahqrTest.java new file mode 100644 index 00000000..726de7dd --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlahqrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlahqrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slahr2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slahr2Test.java new file mode 100644 index 00000000..a095ea53 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slahr2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slahr2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlahrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlahrdTest.java new file mode 100644 index 00000000..2c9253dc --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlahrdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlahrdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaic1Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaic1Test.java new file mode 100644 index 00000000..da951572 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaic1Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slaic1Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaln2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaln2Test.java new file mode 100644 index 00000000..480387c3 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaln2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slaln2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slals0Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slals0Test.java new file mode 100644 index 00000000..769f6f5f --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slals0Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slals0Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlalsaTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlalsaTest.java new file mode 100644 index 00000000..b70b8de7 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlalsaTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlalsaTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlalsdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlalsdTest.java new file mode 100644 index 00000000..3929332e --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlalsdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlalsdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc1Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc1Test.java new file mode 100644 index 00000000..faa4f946 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc1Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slamc1Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc2Test.java new file mode 100644 index 00000000..24c1188a --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slamc2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc4Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc4Test.java new file mode 100644 index 00000000..bba70513 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc4Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slamc4Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc5Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc5Test.java new file mode 100644 index 00000000..85c47c74 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc5Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slamc5Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlamrgTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlamrgTest.java new file mode 100644 index 00000000..0b1dac21 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlamrgTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlamrgTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slanv2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slanv2Test.java new file mode 100644 index 00000000..d300e1b4 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slanv2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slanv2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlapllTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlapllTest.java new file mode 100644 index 00000000..4b517516 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlapllTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlapllTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlapmtTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlapmtTest.java new file mode 100644 index 00000000..072dd6ee --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlapmtTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlapmtTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqgbTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqgbTest.java new file mode 100644 index 00000000..12c83a73 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqgbTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlaqgbTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqgeTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqgeTest.java new file mode 100644 index 00000000..5f81ce22 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqgeTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlaqgeTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqp2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqp2Test.java new file mode 100644 index 00000000..aeccb9d1 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqp2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slaqp2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqpsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqpsTest.java new file mode 100644 index 00000000..067a0f85 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqpsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlaqpsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr0Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr0Test.java new file mode 100644 index 00000000..db5bdf46 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr0Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slaqr0Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr1Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr1Test.java new file mode 100644 index 00000000..1aa12707 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr1Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slaqr1Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr2Test.java new file mode 100644 index 00000000..af4f7899 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slaqr2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr3Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr3Test.java new file mode 100644 index 00000000..0ce5d304 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr3Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slaqr3Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr4Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr4Test.java new file mode 100644 index 00000000..3db65799 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr4Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slaqr4Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr5Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr5Test.java new file mode 100644 index 00000000..fd73c389 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr5Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slaqr5Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqsbTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqsbTest.java new file mode 100644 index 00000000..e78f011f --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqsbTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlaqsbTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqspTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqspTest.java new file mode 100644 index 00000000..ab228585 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqspTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlaqspTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqsyTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqsyTest.java new file mode 100644 index 00000000..b09dc815 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqsyTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlaqsyTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqtrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqtrTest.java new file mode 100644 index 00000000..39471275 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqtrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlaqtrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slar1vTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slar1vTest.java new file mode 100644 index 00000000..41cf1654 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slar1vTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slar1vTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slar2vTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slar2vTest.java new file mode 100644 index 00000000..6e95430d --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slar2vTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slar2vTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfTest.java new file mode 100644 index 00000000..6a7aa639 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlarfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfbTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfbTest.java new file mode 100644 index 00000000..3e88762a --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfbTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlarfbTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfgTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfgTest.java new file mode 100644 index 00000000..e73dcdf3 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfgTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlarfgTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarftTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarftTest.java new file mode 100644 index 00000000..e3f46c66 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarftTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlarftTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfxTest.java new file mode 100644 index 00000000..c0362f74 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlarfxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlargvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlargvTest.java new file mode 100644 index 00000000..3ccfaf32 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlargvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlargvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarnvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarnvTest.java new file mode 100644 index 00000000..faca14a1 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarnvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlarnvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarraTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarraTest.java new file mode 100644 index 00000000..2c741aa4 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarraTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlarraTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrbTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrbTest.java new file mode 100644 index 00000000..6ebb5e02 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrbTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlarrbTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrcTest.java new file mode 100644 index 00000000..794369f4 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrcTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlarrcTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrdTest.java new file mode 100644 index 00000000..b2540481 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlarrdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarreTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarreTest.java new file mode 100644 index 00000000..c9648696 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarreTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlarreTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrfTest.java new file mode 100644 index 00000000..dd653a18 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlarrfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrjTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrjTest.java new file mode 100644 index 00000000..7fcd0b23 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrjTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlarrjTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrkTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrkTest.java new file mode 100644 index 00000000..7179f51c --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrkTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlarrkTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrrTest.java new file mode 100644 index 00000000..b53238f7 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlarrrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrvTest.java new file mode 100644 index 00000000..b6c63f8c --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlarrvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlartgTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlartgTest.java new file mode 100644 index 00000000..60af17e7 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlartgTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlartgTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlartvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlartvTest.java new file mode 100644 index 00000000..dc3747cf --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlartvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlartvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaruvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaruvTest.java new file mode 100644 index 00000000..1e436884 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaruvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlaruvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarzTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarzTest.java new file mode 100644 index 00000000..1d5dcd4c --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarzTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlarzTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarzbTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarzbTest.java new file mode 100644 index 00000000..bbfe31c7 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarzbTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlarzbTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarztTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarztTest.java new file mode 100644 index 00000000..99b9e884 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarztTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlarztTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slas2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slas2Test.java new file mode 100644 index 00000000..f53d471d --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slas2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slas2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasclTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasclTest.java new file mode 100644 index 00000000..f30c468b --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasclTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlasclTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd0Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd0Test.java new file mode 100644 index 00000000..9a77dfb5 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd0Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slasd0Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd1Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd1Test.java new file mode 100644 index 00000000..c9668394 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd1Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slasd1Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd2Test.java new file mode 100644 index 00000000..37c1a935 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slasd2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd3Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd3Test.java new file mode 100644 index 00000000..dbf57a7b --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd3Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slasd3Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd4Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd4Test.java new file mode 100644 index 00000000..3b814b4b --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd4Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slasd4Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd5Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd5Test.java new file mode 100644 index 00000000..e748babc --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd5Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slasd5Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd6Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd6Test.java new file mode 100644 index 00000000..ea4ffa93 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd6Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slasd6Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd7Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd7Test.java new file mode 100644 index 00000000..54c7e558 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd7Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slasd7Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd8Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd8Test.java new file mode 100644 index 00000000..25e175a0 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd8Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slasd8Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasdaTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasdaTest.java new file mode 100644 index 00000000..5ce7fc99 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasdaTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlasdaTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasdqTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasdqTest.java new file mode 100644 index 00000000..ea875750 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasdqTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlasdqTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasdtTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasdtTest.java new file mode 100644 index 00000000..5db29637 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasdtTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlasdtTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasetTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasetTest.java new file mode 100644 index 00000000..d13c4f89 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasetTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlasetTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq1Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq1Test.java new file mode 100644 index 00000000..e71fa09c --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq1Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slasq1Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq2Test.java new file mode 100644 index 00000000..fa7a2a9b --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slasq2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq3Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq3Test.java new file mode 100644 index 00000000..4f30c3ea --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq3Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slasq3Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq4Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq4Test.java new file mode 100644 index 00000000..da8eb5aa --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq4Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slasq4Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq5Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq5Test.java new file mode 100644 index 00000000..22a51587 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq5Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slasq5Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq6Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq6Test.java new file mode 100644 index 00000000..7c08d042 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq6Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slasq6Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasrTest.java new file mode 100644 index 00000000..adfe555a --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlasrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasrtTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasrtTest.java new file mode 100644 index 00000000..cdbd1487 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasrtTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlasrtTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlassqTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlassqTest.java new file mode 100644 index 00000000..3dc5cd56 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlassqTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlassqTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasv2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasv2Test.java new file mode 100644 index 00000000..ab7e4b63 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasv2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slasv2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaswpTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaswpTest.java new file mode 100644 index 00000000..460bea04 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaswpTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlaswpTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasy2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasy2Test.java new file mode 100644 index 00000000..2663d52b --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasy2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slasy2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasyfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasyfTest.java new file mode 100644 index 00000000..2647397f --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasyfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlasyfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatbsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatbsTest.java new file mode 100644 index 00000000..0bb3f321 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatbsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlatbsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatdfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatdfTest.java new file mode 100644 index 00000000..69cb78f3 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatdfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlatdfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatpsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatpsTest.java new file mode 100644 index 00000000..a86eb880 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatpsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlatpsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatrdTest.java new file mode 100644 index 00000000..de323fea --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatrdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlatrdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatrsTest.java new file mode 100644 index 00000000..fa3b63e3 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatrsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlatrsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatrzTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatrzTest.java new file mode 100644 index 00000000..f3f620b7 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatrzTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlatrzTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatzmTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatzmTest.java new file mode 100644 index 00000000..0d13e018 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatzmTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlatzmTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slauu2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slauu2Test.java new file mode 100644 index 00000000..13d68b80 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slauu2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slauu2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlauumTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlauumTest.java new file mode 100644 index 00000000..024ddefb --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlauumTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SlauumTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slazq3Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slazq3Test.java new file mode 100644 index 00000000..26340aad --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slazq3Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slazq3Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slazq4Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slazq4Test.java new file mode 100644 index 00000000..1a1b1e28 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slazq4Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Slazq4Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SopgtrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SopgtrTest.java new file mode 100644 index 00000000..4b4e699f --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SopgtrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SopgtrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SopmtrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SopmtrTest.java new file mode 100644 index 00000000..23679ed0 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SopmtrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SopmtrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorg2lTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorg2lTest.java new file mode 100644 index 00000000..d10abc05 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorg2lTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Sorg2lTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorg2rTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorg2rTest.java new file mode 100644 index 00000000..ec86870b --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorg2rTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Sorg2rTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgbrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgbrTest.java new file mode 100644 index 00000000..e5bd226c --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgbrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SorgbrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SorghrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SorghrTest.java new file mode 100644 index 00000000..c161692d --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SorghrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SorghrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorgl2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorgl2Test.java new file mode 100644 index 00000000..1decb0d2 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorgl2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Sorgl2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SorglqTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SorglqTest.java new file mode 100644 index 00000000..a2ef61b8 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SorglqTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SorglqTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgqlTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgqlTest.java new file mode 100644 index 00000000..e485ff43 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgqlTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SorgqlTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgqrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgqrTest.java new file mode 100644 index 00000000..d7e0ae8a --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgqrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SorgqrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorgr2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorgr2Test.java new file mode 100644 index 00000000..ce3cd1d5 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorgr2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Sorgr2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgrqTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgrqTest.java new file mode 100644 index 00000000..d7b34e65 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgrqTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SorgrqTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgtrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgtrTest.java new file mode 100644 index 00000000..20dbd1fa --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgtrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SorgtrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorm2lTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorm2lTest.java new file mode 100644 index 00000000..8dc3e5b1 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorm2lTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Sorm2lTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorm2rTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorm2rTest.java new file mode 100644 index 00000000..ad700778 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorm2rTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Sorm2rTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SormbrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormbrTest.java new file mode 100644 index 00000000..4ce17b66 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormbrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SormbrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SormhrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormhrTest.java new file mode 100644 index 00000000..7c40fa60 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormhrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SormhrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorml2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorml2Test.java new file mode 100644 index 00000000..cb1dd364 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorml2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Sorml2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SormlqTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormlqTest.java new file mode 100644 index 00000000..ba7cc9ac --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormlqTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SormlqTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SormqlTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormqlTest.java new file mode 100644 index 00000000..64739ca1 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormqlTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SormqlTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SormqrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormqrTest.java new file mode 100644 index 00000000..f9b413ab --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormqrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SormqrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sormr2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sormr2Test.java new file mode 100644 index 00000000..61618ad1 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sormr2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Sormr2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sormr3Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sormr3Test.java new file mode 100644 index 00000000..51609288 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sormr3Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Sormr3Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SormrqTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormrqTest.java new file mode 100644 index 00000000..42de6665 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormrqTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SormrqTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SormrzTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormrzTest.java new file mode 100644 index 00000000..f4a2c31c --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormrzTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SormrzTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SormtrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormtrTest.java new file mode 100644 index 00000000..a34ad200 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormtrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SormtrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbconTest.java new file mode 100644 index 00000000..9c92f6eb --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbconTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SpbconTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbequTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbequTest.java new file mode 100644 index 00000000..10de0df5 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbequTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SpbequTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbrfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbrfsTest.java new file mode 100644 index 00000000..2c9cb6d4 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbrfsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SpbrfsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbstfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbstfTest.java new file mode 100644 index 00000000..a0cb6da7 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbstfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SpbstfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbsvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbsvTest.java new file mode 100644 index 00000000..a27d9f31 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbsvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SpbsvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbsvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbsvxTest.java new file mode 100644 index 00000000..6ebb6593 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbsvxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SpbsvxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Spbtf2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Spbtf2Test.java new file mode 100644 index 00000000..f6588574 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Spbtf2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Spbtf2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbtrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbtrfTest.java new file mode 100644 index 00000000..33b68bdd --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbtrfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SpbtrfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbtrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbtrsTest.java new file mode 100644 index 00000000..e4c27278 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbtrsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SpbtrsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpoconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpoconTest.java new file mode 100644 index 00000000..6901683c --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpoconTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SpoconTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpoequTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpoequTest.java new file mode 100644 index 00000000..840df15b --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpoequTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SpoequTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SporfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SporfsTest.java new file mode 100644 index 00000000..03a90129 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SporfsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SporfsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SposvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SposvTest.java new file mode 100644 index 00000000..b1b1b1a2 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SposvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SposvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SposvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SposvxTest.java new file mode 100644 index 00000000..7e196aa4 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SposvxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SposvxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Spotf2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Spotf2Test.java new file mode 100644 index 00000000..65d5f231 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Spotf2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Spotf2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpotrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpotrfTest.java new file mode 100644 index 00000000..c7e06f06 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpotrfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SpotrfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpotriTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpotriTest.java new file mode 100644 index 00000000..ced0158c --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpotriTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SpotriTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpotrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpotrsTest.java new file mode 100644 index 00000000..8b67ad72 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpotrsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SpotrsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SppconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SppconTest.java new file mode 100644 index 00000000..f18c2945 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SppconTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SppconTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SppequTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SppequTest.java new file mode 100644 index 00000000..81916322 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SppequTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SppequTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpprfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpprfsTest.java new file mode 100644 index 00000000..a3a4e88f --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpprfsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SpprfsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SppsvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SppsvTest.java new file mode 100644 index 00000000..f83553ae --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SppsvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SppsvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SppsvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SppsvxTest.java new file mode 100644 index 00000000..3268338a --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SppsvxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SppsvxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpptrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpptrfTest.java new file mode 100644 index 00000000..de97cd80 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpptrfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SpptrfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpptriTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpptriTest.java new file mode 100644 index 00000000..2be27988 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpptriTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SpptriTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpptrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpptrsTest.java new file mode 100644 index 00000000..db4f1ecc --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpptrsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SpptrsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SptconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SptconTest.java new file mode 100644 index 00000000..5d37d9f5 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SptconTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SptconTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpteqrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpteqrTest.java new file mode 100644 index 00000000..0eba7a82 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpteqrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SpteqrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SptrfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SptrfsTest.java new file mode 100644 index 00000000..adf5b58b --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SptrfsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SptrfsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SptsvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SptsvTest.java new file mode 100644 index 00000000..21cf303f --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SptsvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SptsvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SptsvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SptsvxTest.java new file mode 100644 index 00000000..11e9efef --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SptsvxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SptsvxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpttrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpttrfTest.java new file mode 100644 index 00000000..0523fd93 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpttrfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SpttrfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpttrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpttrsTest.java new file mode 100644 index 00000000..849c1aad --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpttrsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SpttrsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sptts2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sptts2Test.java new file mode 100644 index 00000000..59b2a3d8 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sptts2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Sptts2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SrsclTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SrsclTest.java new file mode 100644 index 00000000..24bac442 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SrsclTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SrsclTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbevTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbevTest.java new file mode 100644 index 00000000..00b26c29 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbevTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsbevTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbevdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbevdTest.java new file mode 100644 index 00000000..d08ff373 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbevdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsbevdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbevxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbevxTest.java new file mode 100644 index 00000000..a530f584 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbevxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsbevxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgstTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgstTest.java new file mode 100644 index 00000000..8d45eeff --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgstTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsbgstTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgvTest.java new file mode 100644 index 00000000..69d2dc7f --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsbgvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgvdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgvdTest.java new file mode 100644 index 00000000..42fc32ab --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgvdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsbgvdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgvxTest.java new file mode 100644 index 00000000..3394e66b --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgvxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsbgvxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbtrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbtrdTest.java new file mode 100644 index 00000000..5ac526d3 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbtrdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsbtrdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SspconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspconTest.java new file mode 100644 index 00000000..fc0807e0 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspconTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SspconTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SspevTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspevTest.java new file mode 100644 index 00000000..5f22beeb --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspevTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SspevTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SspevdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspevdTest.java new file mode 100644 index 00000000..ea64b6b0 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspevdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SspevdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SspevxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspevxTest.java new file mode 100644 index 00000000..941c626a --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspevxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SspevxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SspgstTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspgstTest.java new file mode 100644 index 00000000..b7ba6b90 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspgstTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SspgstTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SspgvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspgvTest.java new file mode 100644 index 00000000..458921e3 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspgvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SspgvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SspgvdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspgvdTest.java new file mode 100644 index 00000000..c4fd498b --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspgvdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SspgvdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SspgvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspgvxTest.java new file mode 100644 index 00000000..6bbdee24 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspgvxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SspgvxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsprfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsprfsTest.java new file mode 100644 index 00000000..4953fe87 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsprfsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsprfsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SspsvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspsvTest.java new file mode 100644 index 00000000..fe6452d7 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspsvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SspsvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SspsvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspsvxTest.java new file mode 100644 index 00000000..d6fc8490 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspsvxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SspsvxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsptrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsptrdTest.java new file mode 100644 index 00000000..0ee0f743 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsptrdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsptrdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsptrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsptrfTest.java new file mode 100644 index 00000000..9a015fb5 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsptrfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsptrfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsptriTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsptriTest.java new file mode 100644 index 00000000..82f64a2a --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsptriTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsptriTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsptrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsptrsTest.java new file mode 100644 index 00000000..89880780 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsptrsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsptrsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SstebzTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstebzTest.java new file mode 100644 index 00000000..ed9f0810 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstebzTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SstebzTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SstedcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstedcTest.java new file mode 100644 index 00000000..f4977edc --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstedcTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SstedcTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SstegrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstegrTest.java new file mode 100644 index 00000000..425513ec --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstegrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SstegrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsteinTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsteinTest.java new file mode 100644 index 00000000..afd353ac --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsteinTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsteinTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SstemrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstemrTest.java new file mode 100644 index 00000000..4b07d992 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstemrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SstemrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsteqrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsteqrTest.java new file mode 100644 index 00000000..eb042ad5 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsteqrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsteqrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsterfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsterfTest.java new file mode 100644 index 00000000..c4b96603 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsterfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsterfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SstevTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstevTest.java new file mode 100644 index 00000000..fe1586d8 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstevTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SstevTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SstevdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstevdTest.java new file mode 100644 index 00000000..e84903a7 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstevdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SstevdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SstevrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstevrTest.java new file mode 100644 index 00000000..bffe91ac --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstevrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SstevrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SstevxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstevxTest.java new file mode 100644 index 00000000..26270742 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstevxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SstevxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyconTest.java new file mode 100644 index 00000000..5abee40b --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyconTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsyconTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevTest.java new file mode 100644 index 00000000..cee83f82 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsyevTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevdTest.java new file mode 100644 index 00000000..e3feff49 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsyevdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevrTest.java new file mode 100644 index 00000000..4cd78790 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevrTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsyevrTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevxTest.java new file mode 100644 index 00000000..3d4ad319 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsyevxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Ssygs2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Ssygs2Test.java new file mode 100644 index 00000000..6c719606 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Ssygs2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Ssygs2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsygstTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsygstTest.java new file mode 100644 index 00000000..d059079f --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsygstTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsygstTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsygvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsygvTest.java new file mode 100644 index 00000000..22ae85d2 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsygvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsygvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsygvdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsygvdTest.java new file mode 100644 index 00000000..9e2a9e49 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsygvdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsygvdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsygvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsygvxTest.java new file mode 100644 index 00000000..7f6b74f3 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsygvxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsygvxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyrfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyrfsTest.java new file mode 100644 index 00000000..f39cbaf3 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyrfsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsyrfsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsysvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsysvTest.java new file mode 100644 index 00000000..3d7ca076 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsysvTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsysvTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsysvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsysvxTest.java new file mode 100644 index 00000000..583ff9e6 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsysvxTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsysvxTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Ssytd2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Ssytd2Test.java new file mode 100644 index 00000000..bb956131 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Ssytd2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Ssytd2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Ssytf2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Ssytf2Test.java new file mode 100644 index 00000000..7561c56a --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Ssytf2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Ssytf2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsytrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsytrdTest.java new file mode 100644 index 00000000..a6e9f6e2 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsytrdTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsytrdTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsytrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsytrfTest.java new file mode 100644 index 00000000..e624a936 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsytrfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsytrfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsytriTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsytriTest.java new file mode 100644 index 00000000..3f3b70e9 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsytriTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsytriTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsytrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsytrsTest.java new file mode 100644 index 00000000..d0d658a5 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsytrsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class SsytrsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StbconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StbconTest.java new file mode 100644 index 00000000..1f5fe5e8 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StbconTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StbconTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StbrfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StbrfsTest.java new file mode 100644 index 00000000..b038ad4c --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StbrfsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StbrfsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StbtrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StbtrsTest.java new file mode 100644 index 00000000..11c31540 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StbtrsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StbtrsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StgevcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StgevcTest.java new file mode 100644 index 00000000..0c893fb8 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StgevcTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StgevcTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Stgex2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Stgex2Test.java new file mode 100644 index 00000000..ac9e3127 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Stgex2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Stgex2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StgexcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StgexcTest.java new file mode 100644 index 00000000..5a77757a --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StgexcTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StgexcTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StgsenTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StgsenTest.java new file mode 100644 index 00000000..b3150007 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StgsenTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StgsenTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StgsjaTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StgsjaTest.java new file mode 100644 index 00000000..3ae29525 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StgsjaTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StgsjaTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StgsnaTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StgsnaTest.java new file mode 100644 index 00000000..fe9ddce8 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StgsnaTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StgsnaTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Stgsy2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Stgsy2Test.java new file mode 100644 index 00000000..11de230a --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Stgsy2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Stgsy2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StgsylTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StgsylTest.java new file mode 100644 index 00000000..08ad3048 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StgsylTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StgsylTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StpconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StpconTest.java new file mode 100644 index 00000000..05e9a33d --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StpconTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StpconTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StprfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StprfsTest.java new file mode 100644 index 00000000..b11ef203 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StprfsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StprfsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StptriTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StptriTest.java new file mode 100644 index 00000000..e87f7190 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StptriTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StptriTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StptrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StptrsTest.java new file mode 100644 index 00000000..740db062 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StptrsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StptrsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StrconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrconTest.java new file mode 100644 index 00000000..181f2493 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrconTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StrconTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StrevcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrevcTest.java new file mode 100644 index 00000000..aa850788 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrevcTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StrevcTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StrexcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrexcTest.java new file mode 100644 index 00000000..1e098b95 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrexcTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StrexcTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StrrfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrrfsTest.java new file mode 100644 index 00000000..e071c3fa --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrrfsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StrrfsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StrsenTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrsenTest.java new file mode 100644 index 00000000..11e6e086 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrsenTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StrsenTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StrsnaTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrsnaTest.java new file mode 100644 index 00000000..4103c344 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrsnaTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StrsnaTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StrsylTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrsylTest.java new file mode 100644 index 00000000..2b86ca2d --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrsylTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StrsylTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Strti2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Strti2Test.java new file mode 100644 index 00000000..c3de8018 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Strti2Test.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class Strti2Test extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StrtriTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrtriTest.java new file mode 100644 index 00000000..00fdbf8e --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrtriTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StrtriTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StrtrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrtrsTest.java new file mode 100644 index 00000000..9e0c1f30 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrtrsTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StrtrsTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StzrqfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StzrqfTest.java new file mode 100644 index 00000000..56bba3d8 --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StzrqfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StzrqfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StzrzfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StzrzfTest.java new file mode 100644 index 00000000..d297eb8e --- /dev/null +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StzrzfTest.java @@ -0,0 +1,39 @@ +/* + * Copyright 2020, 2021, Ludovic Henry + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + * + * Please contact git@ludovic.dev or visit ludovic.dev if you need additional + * information or have any questions. + */ + +import dev.ludovic.netlib.LAPACK; + +import org.junit.jupiter.api.Test; +import org.junit.jupiter.params.ParameterizedTest; +import org.junit.jupiter.params.provider.MethodSource; +import static org.junit.jupiter.api.Assertions.*; + +public class StzrzfTest extends LAPACKTest { + + @ParameterizedTest + @MethodSource("LAPACKImplementations") + void testSanity(LAPACK lapack) { + } +} From c5eea70df4aaa02b13b98a305aedb4d5bfbf897e Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Fri, 30 Apr 2021 20:49:30 +0200 Subject: [PATCH 25/42] Fix surefire:test jacoco wouldn't setup the argLine variable. Just set it to "" --- pom.xml | 1 + 1 file changed, 1 insertion(+) diff --git a/pom.xml b/pom.xml index b37ae628..19f1fe7d 100644 --- a/pom.xml +++ b/pom.xml @@ -69,6 +69,7 @@ information or have any questions. UTF-8 8 + From adab5983f6da08c9ff7a8237529752e741ce32ab Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Fri, 30 Apr 2021 20:54:38 +0200 Subject: [PATCH 26/42] Add missing libarpack2-dev dependency on CI --- .github/workflows/build-and-test.yml | 2 +- .github/workflows/release.yml | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/.github/workflows/build-and-test.yml b/.github/workflows/build-and-test.yml index 7324dd26..118bc7ca 100644 --- a/.github/workflows/build-and-test.yml +++ b/.github/workflows/build-and-test.yml @@ -23,7 +23,7 @@ jobs: - name: Install dependencies run: | sudo apt-get -y update - sudo apt-get -y install libopenblas-dev gcc-aarch64-linux-gnu gcc-x86-64-linux-gnu + sudo apt-get -y install libopenblas-dev libarpack2-dev gcc-aarch64-linux-gnu gcc-x86-64-linux-gnu # Build with JDK 16 - name: Set up JDK 16 uses: actions/setup-java@v1 diff --git a/.github/workflows/release.yml b/.github/workflows/release.yml index 5eb27402..d185e6cf 100644 --- a/.github/workflows/release.yml +++ b/.github/workflows/release.yml @@ -23,7 +23,7 @@ jobs: - name: Install dependencies run: | sudo apt-get -y update - sudo apt-get -y install libopenblas-dev gcc-aarch64-linux-gnu gcc-x86-64-linux-gnu + sudo apt-get -y install libopenblas-dev libarpack2-dev gcc-aarch64-linux-gnu gcc-x86-64-linux-gnu # Build with JDK 16 - name: Set up JDK 16 uses: actions/setup-java@v1 From 7717097141d87f0e1bd818d8d9c2083d0d6c7e77 Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Fri, 30 Apr 2021 21:14:09 +0200 Subject: [PATCH 27/42] Cache M2 repository to speed up CI --- .github/workflows/build-and-test.yml | 7 +++++++ .github/workflows/release.yml | 14 ++++++++++++++ 2 files changed, 21 insertions(+) diff --git a/.github/workflows/build-and-test.yml b/.github/workflows/build-and-test.yml index 118bc7ca..973a7222 100644 --- a/.github/workflows/build-and-test.yml +++ b/.github/workflows/build-and-test.yml @@ -20,6 +20,13 @@ jobs: jdk: [8, 11, 16] steps: - uses: actions/checkout@v2 + - name: Cache M2 local repository + uses: actions/cache@v2 + with: + path: ~/.m2/repository + key: ${{ matrix.jdk }}-m2-${{ hashFiles('**/pom.xml') }} + restore-keys: | + ${{ matrix.jdk }}-m2- - name: Install dependencies run: | sudo apt-get -y update diff --git a/.github/workflows/release.yml b/.github/workflows/release.yml index d185e6cf..b5f94d33 100644 --- a/.github/workflows/release.yml +++ b/.github/workflows/release.yml @@ -20,6 +20,13 @@ jobs: jdk: [8, 11, 16] steps: - uses: actions/checkout@v2 + - name: Cache M2 local repository + uses: actions/cache@v2 + with: + path: ~/.m2/repository + key: ${{ matrix.jdk }}-m2-${{ hashFiles('**/pom.xml') }} + restore-keys: | + ${{ matrix.jdk }}-m2- - name: Install dependencies run: | sudo apt-get -y update @@ -48,6 +55,13 @@ jobs: release_upload_url: ${{ steps.create_release.outputs.upload_url }} steps: - uses: actions/checkout@v2 + - name: Cache M2 local repository + uses: actions/cache@v2 + with: + path: ~/.m2/repository + key: 16-m2-${{ hashFiles('**/pom.xml') }} + restore-keys: | + 16-m2- - name: Install dependencies run: | sudo apt-get -y update From 07c8a89db887b0d2dbf93c75009faf33e1d9b4e0 Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Fri, 30 Apr 2021 21:19:55 +0200 Subject: [PATCH 28/42] Relax caching across JDK versions --- .github/workflows/build-and-test.yml | 4 ++-- .github/workflows/release.yml | 8 ++++---- 2 files changed, 6 insertions(+), 6 deletions(-) diff --git a/.github/workflows/build-and-test.yml b/.github/workflows/build-and-test.yml index 973a7222..78767551 100644 --- a/.github/workflows/build-and-test.yml +++ b/.github/workflows/build-and-test.yml @@ -24,9 +24,9 @@ jobs: uses: actions/cache@v2 with: path: ~/.m2/repository - key: ${{ matrix.jdk }}-m2-${{ hashFiles('**/pom.xml') }} + key: m2-${{ hashFiles('**/pom.xml') }} restore-keys: | - ${{ matrix.jdk }}-m2- + m2- - name: Install dependencies run: | sudo apt-get -y update diff --git a/.github/workflows/release.yml b/.github/workflows/release.yml index b5f94d33..c8ead05d 100644 --- a/.github/workflows/release.yml +++ b/.github/workflows/release.yml @@ -24,9 +24,9 @@ jobs: uses: actions/cache@v2 with: path: ~/.m2/repository - key: ${{ matrix.jdk }}-m2-${{ hashFiles('**/pom.xml') }} + key: m2-${{ hashFiles('**/pom.xml') }} restore-keys: | - ${{ matrix.jdk }}-m2- + m2- - name: Install dependencies run: | sudo apt-get -y update @@ -59,9 +59,9 @@ jobs: uses: actions/cache@v2 with: path: ~/.m2/repository - key: 16-m2-${{ hashFiles('**/pom.xml') }} + key: m2-${{ hashFiles('**/pom.xml') }} restore-keys: | - 16-m2- + m2- - name: Install dependencies run: | sudo apt-get -y update From e72474b06a0553c8bcb7842e30649e33e335a194 Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Fri, 30 Apr 2021 22:03:54 +0200 Subject: [PATCH 29/42] Implement all BLAS routines for JNIBLAS --- blas/src/main/native/jni.c | 348 ++++++++++++++++++++++++++++++++++--- 1 file changed, 323 insertions(+), 25 deletions(-) diff --git a/blas/src/main/native/jni.c b/blas/src/main/native/jni.c index d1541162..f41b33c2 100644 --- a/blas/src/main/native/jni.c +++ b/blas/src/main/native/jni.c @@ -24,8 +24,10 @@ */ #include -#include +#include + #include +#include #include "dev_ludovic_netlib_blas_JNIBLAS.h" @@ -1098,113 +1100,409 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_ssyrkK(JNIEnv *env, UNUSED jobject obj static void (*dtbmv_)(const char *uplo, const char *trans, const char *diag, int *n, int *k, double *a, int *lda, double *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_dtbmvK(UNUSED JNIEnv *env, UNUSED jobject obj, - UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jint k, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jdoubleArray x, UNUSED jint offsetx, UNUSED jint incx) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + jstring uplo, jstring trans, jstring diag, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx) { + jboolean failed = FALSE; + const char *nuplo = NULL, *ntrans = NULL, *ndiag = NULL; double *na = NULL, *nx = NULL; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + dtbmv_(nuplo, ntrans, ndiag, &n, &k, na + offseta, &lda, nx + offsetx, &incx); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); + if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*stbmv_)(const char *uplo, const char *trans, const char *diag, int *n, int *k, float *a, int *lda, float *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_stbmvK(UNUSED JNIEnv *env, UNUSED jobject obj, - UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jint k, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jfloatArray x, UNUSED jint offsetx, UNUSED jint incx) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + jstring uplo, jstring trans, jstring diag, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx) { + jboolean failed = FALSE; + const char *nuplo = NULL, *ntrans = NULL, *ndiag = NULL; float *na = NULL, *nx = NULL; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + stbmv_(nuplo, ntrans, ndiag, &n, &k, na + offseta, &lda, nx + offsetx, &incx); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); + if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*dtbsv_)(const char *uplo, const char *trans, const char *diag, int *n, int *k, double *a, int *lda, double *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_dtbsvK(JNIEnv *env, UNUSED jobject obj, - UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jint k, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jdoubleArray x, UNUSED jint offsetx, UNUSED jint incx) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + jstring uplo, jstring trans, jstring diag, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx) { + jboolean failed = FALSE; + const char *nuplo = NULL, *ntrans = NULL, *ndiag = NULL; double *na = NULL, *nx = NULL; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + dtbsv_(nuplo, ntrans, ndiag, &n, &k, na + offseta, &lda, nx + offsetx, &incx); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); + if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*stbsv_)(const char *uplo, const char *trans, const char *diag, int *n, int *k, float *a, int *lda, float *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_stbsvK(JNIEnv *env, UNUSED jobject obj, - UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jint k, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jfloatArray x, UNUSED jint offsetx, UNUSED jint incx) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + jstring uplo, jstring trans, jstring diag, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx) { + jboolean failed = FALSE; + const char *nuplo = NULL, *ntrans = NULL, *ndiag = NULL; float *na = NULL, *nx = NULL; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + stbsv_(nuplo, ntrans, ndiag, &n, &k, na + offseta, &lda, nx + offsetx, &incx); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); + if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*dtpmv_)(const char *uplo, const char *trans, const char *diag, int *n, double *a, double *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_dtpmvK(JNIEnv *env, UNUSED jobject obj, - UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jdoubleArray x, UNUSED jint offsetx, UNUSED jint incx) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + jstring uplo, jstring trans, jstring diag, jint n, jdoubleArray a, jint offseta, jdoubleArray x, jint offsetx, jint incx) { + jboolean failed = FALSE; + const char *nuplo = NULL, *ntrans = NULL, *ndiag = NULL; double *na = NULL, *nx = NULL; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + dtpmv_(nuplo, ntrans, ndiag, &n, na + offseta, nx + offsetx, &incx); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); + if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*stpmv_)(const char *uplo, const char *trans, const char *diag, int *n, float *a, float *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_stpmvK(JNIEnv *env, UNUSED jobject obj, - UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jfloatArray x, UNUSED jint offsetx, UNUSED jint incx) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + jstring uplo, jstring trans, jstring diag, jint n, jfloatArray a, jint offseta, jfloatArray x, jint offsetx, jint incx) { + jboolean failed = FALSE; + const char *nuplo = NULL, *ntrans = NULL, *ndiag = NULL; float *na = NULL, *nx = NULL; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + stpmv_(nuplo, ntrans, ndiag, &n, na + offseta, nx + offsetx, &incx); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); + if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*dtpsv_)(const char *uplo, const char *trans, const char *diag, int *n, double *a, double *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_dtpsvK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jdoubleArray x, UNUSED jint offsetx, UNUSED jint incx) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + jboolean failed = FALSE; + const char *nuplo = NULL, *ntrans = NULL, *ndiag = NULL; double *na = NULL, *nx = NULL; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + dtpsv_(nuplo, ntrans, ndiag, &n, na + offseta, nx + offsetx, &incx); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); + if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*stpsv_)(const char *uplo, const char *trans, const char *diag, int *n, float *a, float *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_stpsvK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jfloatArray x, UNUSED jint offsetx, UNUSED jint incx) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + jboolean failed = FALSE; + const char *nuplo = NULL, *ntrans = NULL, *ndiag = NULL; float *na = NULL, *nx = NULL; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + stpsv_(nuplo, ntrans, ndiag, &n, na + offseta, nx + offsetx, &incx); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); + if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*dtrmm_)(const char *side, const char *uplo, const char *transa, const char *diag, int *m, int *n, double *alpha, double *a, int *lda, double *b, int *ldb); void Java_dev_ludovic_netlib_blas_JNIBLAS_dtrmmK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring side, UNUSED jstring uplo, UNUSED jstring transa, UNUSED jstring diag, UNUSED jint m, UNUSED jint n, UNUSED jdouble alpha, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jdoubleArray b, UNUSED jint offsetb, UNUSED jint ldb) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + jboolean failed = FALSE; + const char *nside = NULL, *nuplo = NULL, *ntransa = NULL, *ndiag = NULL; double *na = NULL, *nb = NULL; + if (!(nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) goto fail; + if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + dtrmm_(nside, nuplo, ntransa, ndiag, &m, &n, &alpha, na + offseta, &lda, nb + offsetb, &ldb); +done: + if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, failed ? JNI_ABORT : 0); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); + if (ntransa) (*env)->ReleaseStringUTFChars(env, transa, ntransa); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (nside) (*env)->ReleaseStringUTFChars(env, side, nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*strmm_)(const char *side, const char *uplo, const char *transa, const char *diag, int *m, int *n, float *alpha, float *a, int *lda, float *b, int *ldb); void Java_dev_ludovic_netlib_blas_JNIBLAS_strmmK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring side, UNUSED jstring uplo, UNUSED jstring transa, UNUSED jstring diag, UNUSED jint m, UNUSED jint n, UNUSED jfloat alpha, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jfloatArray b, UNUSED jint offsetb, UNUSED jint ldb) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + jboolean failed = FALSE; + const char *nside = NULL, *nuplo = NULL, *ntransa = NULL, *ndiag = NULL; float *na = NULL, *nb = NULL; + if (!(nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) goto fail; + if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + strmm_(nside, nuplo, ntransa, ndiag, &m, &n, &alpha, na + offseta, &lda, nb + offsetb, &ldb); +done: + if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, failed ? JNI_ABORT : 0); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); + if (ntransa) (*env)->ReleaseStringUTFChars(env, transa, ntransa); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (nside) (*env)->ReleaseStringUTFChars(env, side, nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*dtrmv_)(const char *uplo, const char *trans, const char *diag, int *n, double *a, int *lda, double *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_dtrmvK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jdoubleArray x, UNUSED jint offsetx, UNUSED jint incx) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + jboolean failed = FALSE; + const char *nuplo = NULL, *ntrans = NULL, *ndiag = NULL; double *na = NULL, *nx = NULL; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + dtrmv_(nuplo, ntrans, ndiag, &n, na + offseta, &lda, nx + offsetx, &incx); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); + if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*strmv_)(const char *uplo, const char *trans, const char *diag, int *n, float *a, int *lda, float *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_strmvK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jfloatArray x, UNUSED jint offsetx, UNUSED jint incx) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + jboolean failed = FALSE; + const char *nuplo = NULL, *ntrans = NULL, *ndiag = NULL; float *na = NULL, *nx = NULL; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + strmv_(nuplo, ntrans, ndiag, &n, na + offseta, &lda, nx + offsetx, &incx); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); + if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*dtrsm_)(const char *side, const char *uplo, const char *transa, const char *diag, int *m, int *n, double *alpha, double *a, int *lda, double *b, int *ldb); void Java_dev_ludovic_netlib_blas_JNIBLAS_dtrsmK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring side, UNUSED jstring uplo, UNUSED jstring transa, UNUSED jstring diag, UNUSED jint m, UNUSED jint n, UNUSED jdouble alpha, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jdoubleArray b, UNUSED jint offsetb, UNUSED jint ldb) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + jboolean failed = FALSE; + const char *nside = NULL, *nuplo = NULL, *ntransa = NULL, *ndiag = NULL; double *na = NULL, *nb = NULL; + if (!(nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) goto fail; + if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + dtrsm_(nside, nuplo, ntransa, ndiag, &m, &n, &alpha, na + offseta, &lda, nb + offsetb, &ldb); +done: + if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, failed ? JNI_ABORT : 0); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); + if (ntransa) (*env)->ReleaseStringUTFChars(env, transa, ntransa); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (nside) (*env)->ReleaseStringUTFChars(env, side, nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*strsm_)(const char *side, const char *uplo, const char *transa, const char *diag, int *m, int *n, float *alpha, float *a, int *lda, float *b, int *ldb); void Java_dev_ludovic_netlib_blas_JNIBLAS_strsmK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring side, UNUSED jstring uplo, UNUSED jstring transa, UNUSED jstring diag, UNUSED jint m, UNUSED jint n, UNUSED jfloat alpha, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jfloatArray b, UNUSED jint offsetb, UNUSED jint ldb) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + jboolean failed = FALSE; + const char *nside = NULL, *nuplo = NULL, *ntransa = NULL, *ndiag = NULL; float *na = NULL, *nb = NULL; + if (!(nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) goto fail; + if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + strsm_(nside, nuplo, ntransa, ndiag, &m, &n, &alpha, na + offseta, &lda, nb + offsetb, &ldb); +done: + if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, failed ? JNI_ABORT : 0); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); + if (ntransa) (*env)->ReleaseStringUTFChars(env, transa, ntransa); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (nside) (*env)->ReleaseStringUTFChars(env, side, nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*dtrsv_)(const char *uplo, const char *trans, const char *diag, int *n, double *a, int *lda, double *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_dtrsvK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jdoubleArray x, UNUSED jint offsetx, UNUSED jint incx) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + jboolean failed = FALSE; + const char *nuplo = NULL, *ntrans = NULL, *ndiag = NULL; double *na = NULL, *nx = NULL; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + dtrsv_(nuplo, ntrans, ndiag, &n, na + offseta, &lda, nx + offsetx, &incx); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); + if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*strsv_)(const char *uplo, const char *trans, const char *diag, int *n, float *a, int *lda, float *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_strsvK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jfloatArray x, UNUSED jint offsetx, UNUSED jint incx) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + jboolean failed = FALSE; + const char *nuplo = NULL, *ntrans = NULL, *ndiag = NULL; float *na = NULL, *nx = NULL; + if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + strsv_(nuplo, ntrans, ndiag, &n, na + offseta, &lda, nx + offsetx, &incx); +done: + if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); + if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); + if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); + if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); + if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static int (*idamax_)(int *n, double *dx, int *incdx); @@ -1215,7 +1513,7 @@ jint Java_dev_ludovic_netlib_blas_JNIBLAS_idamaxK(JNIEnv *env, UNUSED jobject ob jboolean failed = FALSE; double *ndx = NULL; if (!(ndx = (*env)->GetPrimitiveArrayCritical(env, dx, NULL))) goto fail; - // It returns 1-based index because that's how Fortran works + /* It returns 1-based index because that's how Fortran works */ ret = idamax_(&n, ndx + offsetdx, &incdx) - 1; done: if (ndx) (*env)->ReleasePrimitiveArrayCritical(env, dx, ndx, JNI_ABORT); @@ -1234,7 +1532,7 @@ jint Java_dev_ludovic_netlib_blas_JNIBLAS_isamaxK(JNIEnv *env, UNUSED jobject ob jboolean failed = FALSE; float *nsx = NULL; if (!(nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto fail; - // It returns 1-based index because that's how Fortran works + /* It returns 1-based index because that's how Fortran works */ ret = isamax_(&n, nsx + offsetsx, &incsx) - 1; done: if (nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, nsx, JNI_ABORT); From 006f21c7a5e8d303266c92af95628fdfda4ed4cb Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Sun, 2 May 2021 01:53:32 +0200 Subject: [PATCH 30/42] Add generator for JNI --- arpack/src/main/native/jni.c | 1630 ++- blas/src/main/native/jni.c | 1480 ++- generator.py | 1070 ++ lapack/src/main/native/jni.c | 20912 ++++++++++++++++++++++++++++----- pom.xml | 4 +- 5 files changed, 20928 insertions(+), 4168 deletions(-) create mode 100644 generator.py diff --git a/arpack/src/main/native/jni.c b/arpack/src/main/native/jni.c index f450ab78..585a48ef 100644 --- a/arpack/src/main/native/jni.c +++ b/arpack/src/main/native/jni.c @@ -46,408 +46,1562 @@ static void throwOOM(JNIEnv *env) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } -static void (*dmout_)(int *lout, int *m, int *n, double *a, int *lda, int *idigit, char *ifmt); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_dmoutK(JNIEnv *env, UNUSED jobject obj, - jint lout, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jint idigit, jstring ifmt) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} - -static void (*smout_)(int *lout, int *m, int *n, float *a, int *lda, int *idigit, char *ifmt); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_smoutK(JNIEnv *env, UNUSED jobject obj, - jint lout, jint m, jint n, jfloatArray a, jint offseta, jint lda, jint idigit, jstring ifmt) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} - -static void (*dvout_)(int *lout, int *n, double *sx, int *idigit, char *ifmt); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_dvoutK(JNIEnv *env, UNUSED jobject obj, - jint lout, jint n, jdoubleArray sx, jint offsetsx, jint idigit, jstring ifmt) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dmout_)(int *lout, int *m, int *n, double *a, int *lda, int *idigit, const char *ifmt); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dmoutK(JNIEnv *env, UNUSED jobject obj, jint lout, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jint idigit, jstring ifmt) { + jboolean failed = FALSE; + const char *__nifmt = NULL; double *__na = NULL; + if (!(__nifmt = (*env)->GetStringUTFChars(env, ifmt, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + dmout_(&lout, &m, &n, __na + offseta, &lda, &idigit, __nifmt); +done: + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nifmt) (*env)->ReleaseStringUTFChars(env, ifmt, __nifmt); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*svout_)(int *lout, int *n, float *sx, int *idigit, char *ifmt); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_svoutK(JNIEnv *env, UNUSED jobject obj, - jint lout, jint n, jfloatArray sx, jint offsetsx, jint idigit, jstring ifmt) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*smout_)(int *lout, int *m, int *n, float *a, int *lda, int *idigit, const char *ifmt); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_smoutK(JNIEnv *env, UNUSED jobject obj, jint lout, jint m, jint n, jfloatArray a, jint offseta, jint lda, jint idigit, jstring ifmt) { + jboolean failed = FALSE; + const char *__nifmt = NULL; float *__na = NULL; + if (!(__nifmt = (*env)->GetStringUTFChars(env, ifmt, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + smout_(&lout, &m, &n, __na + offseta, &lda, &idigit, __nifmt); +done: + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nifmt) (*env)->ReleaseStringUTFChars(env, ifmt, __nifmt); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ivout_)(int *lout, int *n, int *ix, int *idigit, char *ifmt); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_ivoutK(JNIEnv *env, UNUSED jobject obj, - jint lout, jint n, jintArray ix, jint offsetix, jint idigit, jstring ifmt) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dvout_)(int *lout, int *n, double *sx, int *idigit, const char *ifmt); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dvoutK(JNIEnv *env, UNUSED jobject obj, jint lout, jint n, jdoubleArray sx, jint offsetsx, jint idigit, jstring ifmt) { + jboolean failed = FALSE; + const char *__nifmt = NULL; double *__nsx = NULL; + if (!(__nifmt = (*env)->GetStringUTFChars(env, ifmt, NULL))) goto fail; + if (!(__nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto fail; + dvout_(&lout, &n, __nsx + offsetsx, &idigit, __nifmt); +done: + if (__nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, __nsx, failed ? JNI_ABORT : 0); + if (__nifmt) (*env)->ReleaseStringUTFChars(env, ifmt, __nifmt); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgetv0_)(int *ido, char *bmat, int *itry, int *initv, int *n, int *j, double *v, int *ldv, double *resid, double *rnorm, int *ipntr, double *workd, int *ierr); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_dgetv0K(JNIEnv *env, UNUSED jobject obj, - jobject ido, jstring bmat, jint itry, jboolean initv, jint n, jint j, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray resid, jint offsetresid, jobject rnorm, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jobject ierr) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*svout_)(int *lout, int *n, float *sx, int *idigit, const char *ifmt); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_svoutK(JNIEnv *env, UNUSED jobject obj, jint lout, jint n, jfloatArray sx, jint offsetsx, jint idigit, jstring ifmt) { + jboolean failed = FALSE; + const char *__nifmt = NULL; float *__nsx = NULL; + if (!(__nifmt = (*env)->GetStringUTFChars(env, ifmt, NULL))) goto fail; + if (!(__nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto fail; + svout_(&lout, &n, __nsx + offsetsx, &idigit, __nifmt); +done: + if (__nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, __nsx, failed ? JNI_ABORT : 0); + if (__nifmt) (*env)->ReleaseStringUTFChars(env, ifmt, __nifmt); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgetv0_)(int *ido, char *bmat, int *itry, int *initv, int *n, int *j, float *v, int *ldv, float *resid, float *rnorm, int *ipntr, float *workd, int *ierr); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_sgetv0K(JNIEnv *env, UNUSED jobject obj, - jobject ido, jstring bmat, jint itry, jboolean initv, jint n, jint j, jfloatArray v, jint offsetv, jint ldv, jfloatArray resid, jint offsetresid, jobject rnorm, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jobject ierr) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*ivout_)(int *lout, int *n, int *ix, int *idigit, const char *ifmt); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_ivoutK(JNIEnv *env, UNUSED jobject obj, jint lout, jint n, jintArray ix, jint offsetix, jint idigit, jstring ifmt) { + jboolean failed = FALSE; + const char *__nifmt = NULL; int *__nix = NULL; + if (!(__nifmt = (*env)->GetStringUTFChars(env, ifmt, NULL))) goto fail; + if (!(__nix = (*env)->GetPrimitiveArrayCritical(env, ix, NULL))) goto fail; + ivout_(&lout, &n, __nix + offsetix, &idigit, __nifmt); +done: + if (__nix) (*env)->ReleasePrimitiveArrayCritical(env, ix, __nix, failed ? JNI_ABORT : 0); + if (__nifmt) (*env)->ReleaseStringUTFChars(env, ifmt, __nifmt); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -// static void (*dlaqrb_)(int *wantt, int *n, int *ilo, int *ihi, double *h, int *ldh, double *wr, double *wi, double *z, int *info); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_dlaqrbK(JNIEnv *env, UNUSED jobject obj, - jboolean wantt, jint n, jint ilo, jint ihi, jdoubleArray h, jint offseth, jint ldh, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jdoubleArray z, jint offsetz, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dgetv0_)(int *ido, const char *bmat, int *itry, int *initv, int *n, int *j, double *v, int *ldv, double *resid, double *rnorm, int *ipntr, double *workd, int *ierr); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dgetv0K(JNIEnv *env, UNUSED jobject obj, jobject ido, jstring bmat, jint itry, jboolean initv, jint n, jint j, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray resid, jint offsetresid, jobject rnorm, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jobject ierr) { + jboolean failed = FALSE; + int __nido = 0; const char *__nbmat = NULL; int __ninitv; double __nrnorm = 0; int __nierr = 0; double *__nv = NULL; double *__nresid = NULL; int *__nipntr = NULL; double *__nworkd = NULL; + __nido = (*env)->GetIntField(env, ido, intW_val_fieldID); + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; + __ninitv = initv; + __nrnorm = (*env)->GetDoubleField(env, rnorm, doubleW_val_fieldID); + __nierr = (*env)->GetIntField(env, ierr, intW_val_fieldID); + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + dgetv0_(&__nido, __nbmat, &itry, &__ninitv, &n, &j, __nv + offsetv, &ldv, __nresid + offsetresid, &__nrnorm, __nipntr + offsetipntr, __nworkd + offsetworkd, &__nierr); +done: + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, ierr, intW_val_fieldID, __nierr); + if (!failed) (*env)->SetDoubleField(env, rnorm, doubleW_val_fieldID, __nrnorm); + if (!failed) initv = __ninitv; + if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); + if (!failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -// static void (*slaqrb_)(int *wantt, int *n, int *ilo, int *ihi, float *h, int *ldh, float *wr, float *wi, float *z, int *info); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_slaqrbK(JNIEnv *env, UNUSED jobject obj, - jboolean wantt, jint n, jint ilo, jint ihi, jfloatArray h, jint offseth, jint ldh, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jfloatArray z, jint offsetz, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sgetv0_)(int *ido, const char *bmat, int *itry, int *initv, int *n, int *j, float *v, int *ldv, float *resid, float *rnorm, int *ipntr, float *workd, int *ierr); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_sgetv0K(JNIEnv *env, UNUSED jobject obj, jobject ido, jstring bmat, jint itry, jboolean initv, jint n, jint j, jfloatArray v, jint offsetv, jint ldv, jfloatArray resid, jint offsetresid, jobject rnorm, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jobject ierr) { + jboolean failed = FALSE; + int __nido = 0; const char *__nbmat = NULL; int __ninitv; float __nrnorm = 0; int __nierr = 0; float *__nv = NULL; float *__nresid = NULL; int *__nipntr = NULL; float *__nworkd = NULL; + __nido = (*env)->GetIntField(env, ido, intW_val_fieldID); + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; + __ninitv = initv; + __nrnorm = (*env)->GetFloatField(env, rnorm, floatW_val_fieldID); + __nierr = (*env)->GetIntField(env, ierr, intW_val_fieldID); + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + sgetv0_(&__nido, __nbmat, &itry, &__ninitv, &n, &j, __nv + offsetv, &ldv, __nresid + offsetresid, &__nrnorm, __nipntr + offsetipntr, __nworkd + offsetworkd, &__nierr); +done: + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, ierr, intW_val_fieldID, __nierr); + if (!failed) (*env)->SetFloatField(env, rnorm, floatW_val_fieldID, __nrnorm); + if (!failed) initv = __ninitv; + if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); + if (!failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dnaitr_)(int *ido, char *bmat, int *n, int *k, int *np, int *nb, double *resid, double *rnorm, double *v, int *ldv, double *h, int *ldh, int *ipntr, double *workd, int *info); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_dnaitrK(JNIEnv *env, UNUSED jobject obj, - jobject ido, jstring bmat, jint n, jint k, jint np, jint nb, jdoubleArray resid, jint offsetresid, jobject rnorm, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray h, jint offseth, jint ldh, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dnaitr_)(int *ido, const char *bmat, int *n, int *k, int *np, int *nb, double *resid, double *rnorm, double *v, int *ldv, double *h, int *ldh, int *ipntr, double *workd, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dnaitrK(JNIEnv *env, UNUSED jobject obj, jobject ido, jstring bmat, jint n, jint k, jint np, jint nb, jdoubleArray resid, jint offsetresid, jobject rnorm, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray h, jint offseth, jint ldh, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jobject info) { + jboolean failed = FALSE; + int __nido = 0; const char *__nbmat = NULL; double __nrnorm = 0; int __ninfo = 0; double *__nresid = NULL; double *__nv = NULL; double *__nh = NULL; int *__nipntr = NULL; double *__nworkd = NULL; + __nido = (*env)->GetIntField(env, ido, intW_val_fieldID); + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; + __nrnorm = (*env)->GetDoubleField(env, rnorm, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + dnaitr_(&__nido, __nbmat, &n, &k, &np, &nb, __nresid + offsetresid, &__nrnorm, __nv + offsetv, &ldv, __nh + offseth, &ldh, __nipntr + offsetipntr, __nworkd + offsetworkd, &__ninfo); +done: + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, rnorm, doubleW_val_fieldID, __nrnorm); + if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); + if (!failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*snaitr_)(int *ido, char *bmat, int *n, int *k, int *np, int *nb, float *resid, float *rnorm, float *v, int *ldv, float *h, int *ldh, int *ipntr, float *workd, int *info); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_snaitrK(JNIEnv *env, UNUSED jobject obj, - jobject ido, jstring bmat, jint n, jint k, jint np, jint nb, jfloatArray resid, jint offsetresid, jobject rnorm, jfloatArray v, jint offsetv, jint ldv, jfloatArray h, jint offseth, jint ldh, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*snaitr_)(int *ido, const char *bmat, int *n, int *k, int *np, int *nb, float *resid, float *rnorm, float *v, int *ldv, float *h, int *ldh, int *ipntr, float *workd, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_snaitrK(JNIEnv *env, UNUSED jobject obj, jobject ido, jstring bmat, jint n, jint k, jint np, jint nb, jfloatArray resid, jint offsetresid, jobject rnorm, jfloatArray v, jint offsetv, jint ldv, jfloatArray h, jint offseth, jint ldh, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jobject info) { + jboolean failed = FALSE; + int __nido = 0; const char *__nbmat = NULL; float __nrnorm = 0; int __ninfo = 0; float *__nresid = NULL; float *__nv = NULL; float *__nh = NULL; int *__nipntr = NULL; float *__nworkd = NULL; + __nido = (*env)->GetIntField(env, ido, intW_val_fieldID); + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; + __nrnorm = (*env)->GetFloatField(env, rnorm, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + snaitr_(&__nido, __nbmat, &n, &k, &np, &nb, __nresid + offsetresid, &__nrnorm, __nv + offsetv, &ldv, __nh + offseth, &ldh, __nipntr + offsetipntr, __nworkd + offsetworkd, &__ninfo); +done: + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, rnorm, floatW_val_fieldID, __nrnorm); + if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); + if (!failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*dnapps_)(int *n, int *kev, int *np, double *shiftr, double *shifti, double *v, int *ldv, double *h, int *ldh, double *resid, double *q, int *ldq, double *workl, double *workd); -void Java_dev_ludovic_netlib_arpack_JNIARPACK_dnappsK(JNIEnv *env, UNUSED jobject obj, - jint n, jobject kev, jint np, jdoubleArray shiftr, jint offsetshiftr, jdoubleArray shifti, jint offsetshifti, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray h, jint offseth, jint ldh, jdoubleArray resid, jint offsetresid, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray workl, jint offsetworkl, jdoubleArray workd, jint offsetworkd) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dnappsK(JNIEnv *env, UNUSED jobject obj, jint n, jobject kev, jint np, jdoubleArray shiftr, jint offsetshiftr, jdoubleArray shifti, jint offsetshifti, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray h, jint offseth, jint ldh, jdoubleArray resid, jint offsetresid, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray workl, jint offsetworkl, jdoubleArray workd, jint offsetworkd) { + jboolean failed = FALSE; + int __nkev = 0; double *__nshiftr = NULL; double *__nshifti = NULL; double *__nv = NULL; double *__nh = NULL; double *__nresid = NULL; double *__nq = NULL; double *__nworkl = NULL; double *__nworkd = NULL; + __nkev = (*env)->GetIntField(env, kev, intW_val_fieldID); + if (!(__nshiftr = (*env)->GetPrimitiveArrayCritical(env, shiftr, NULL))) goto fail; + if (!(__nshifti = (*env)->GetPrimitiveArrayCritical(env, shifti, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + dnapps_(&n, &__nkev, &np, __nshiftr + offsetshiftr, __nshifti + offsetshifti, __nv + offsetv, &ldv, __nh + offseth, &ldh, __nresid + offsetresid, __nq + offsetq, &ldq, __nworkl + offsetworkl, __nworkd + offsetworkd); +done: + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nshifti) (*env)->ReleasePrimitiveArrayCritical(env, shifti, __nshifti, failed ? JNI_ABORT : 0); + if (__nshiftr) (*env)->ReleasePrimitiveArrayCritical(env, shiftr, __nshiftr, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, kev, intW_val_fieldID, __nkev); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*snapps_)(int *n, int *kev, int *np, float *shiftr, float *shifti, float *v, int *ldv, float *h, int *ldh, float *resid, float *q, int *ldq, float *workl, float *workd); -void Java_dev_ludovic_netlib_arpack_JNIARPACK_snappsK(JNIEnv *env, UNUSED jobject obj, - jint n, jobject kev, jint np, jfloatArray shiftr, jint offsetshiftr, jfloatArray shifti, jint offsetshifti, jfloatArray v, jint offsetv, jint ldv, jfloatArray h, jint offseth, jint ldh, jfloatArray resid, jint offsetresid, jfloatArray q, jint offsetq, jint ldq, jfloatArray workl, jint offsetworkl, jfloatArray workd, jint offsetworkd) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_arpack_JNIARPACK_snappsK(JNIEnv *env, UNUSED jobject obj, jint n, jobject kev, jint np, jfloatArray shiftr, jint offsetshiftr, jfloatArray shifti, jint offsetshifti, jfloatArray v, jint offsetv, jint ldv, jfloatArray h, jint offseth, jint ldh, jfloatArray resid, jint offsetresid, jfloatArray q, jint offsetq, jint ldq, jfloatArray workl, jint offsetworkl, jfloatArray workd, jint offsetworkd) { + jboolean failed = FALSE; + int __nkev = 0; float *__nshiftr = NULL; float *__nshifti = NULL; float *__nv = NULL; float *__nh = NULL; float *__nresid = NULL; float *__nq = NULL; float *__nworkl = NULL; float *__nworkd = NULL; + __nkev = (*env)->GetIntField(env, kev, intW_val_fieldID); + if (!(__nshiftr = (*env)->GetPrimitiveArrayCritical(env, shiftr, NULL))) goto fail; + if (!(__nshifti = (*env)->GetPrimitiveArrayCritical(env, shifti, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + snapps_(&n, &__nkev, &np, __nshiftr + offsetshiftr, __nshifti + offsetshifti, __nv + offsetv, &ldv, __nh + offseth, &ldh, __nresid + offsetresid, __nq + offsetq, &ldq, __nworkl + offsetworkl, __nworkd + offsetworkd); +done: + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nshifti) (*env)->ReleasePrimitiveArrayCritical(env, shifti, __nshifti, failed ? JNI_ABORT : 0); + if (__nshiftr) (*env)->ReleasePrimitiveArrayCritical(env, shiftr, __nshiftr, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, kev, intW_val_fieldID, __nkev); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dnaup2_)(int *ido, char *bmat, int *n, char *which, int *nev, int *np, double *tol, double *resid, int *mode, int *iupd, int *ishift, int *mxiter, double *v, int *ldv, double *h, int *ldh, double *ritzr, double *ritzi, double *bounds, double *q, int *ldq, double *workl, int *ipntr, double *workd, int *info); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_dnaup2K(JNIEnv *env, UNUSED jobject obj, - jobject ido, jstring bmat, jint n, jstring which, jobject nev, jobject np, jdouble tol, jdoubleArray resid, jint offsetresid, jint mode, jint iupd, jint ishift, jobject mxiter, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray h, jint offseth, jint ldh, jdoubleArray ritzr, jint offsetritzr, jdoubleArray ritzi, jint offsetritzi, jdoubleArray bounds, jint offsetbounds, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray workl, jint offsetworkl, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dnaup2_)(int *ido, const char *bmat, int *n, const char *which, int *nev, int *np, double *tol, double *resid, int *mode, int *iupd, int *ishift, int *mxiter, double *v, int *ldv, double *h, int *ldh, double *ritzr, double *ritzi, double *bounds, double *q, int *ldq, double *workl, int *ipntr, double *workd, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dnaup2K(JNIEnv *env, UNUSED jobject obj, jobject ido, jstring bmat, jint n, jstring which, jobject nev, jobject np, jdouble tol, jdoubleArray resid, jint offsetresid, jint mode, jint iupd, jint ishift, jobject mxiter, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray h, jint offseth, jint ldh, jdoubleArray ritzr, jint offsetritzr, jdoubleArray ritzi, jint offsetritzi, jdoubleArray bounds, jint offsetbounds, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray workl, jint offsetworkl, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jobject info) { + jboolean failed = FALSE; + int __nido = 0; const char *__nbmat = NULL; const char *__nwhich = NULL; int __nnev = 0; int __nnp = 0; int __nmxiter = 0; int __ninfo = 0; double *__nresid = NULL; double *__nv = NULL; double *__nh = NULL; double *__nritzr = NULL; double *__nritzi = NULL; double *__nbounds = NULL; double *__nq = NULL; double *__nworkl = NULL; int *__nipntr = NULL; double *__nworkd = NULL; + __nido = (*env)->GetIntField(env, ido, intW_val_fieldID); + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + __nnev = (*env)->GetIntField(env, nev, intW_val_fieldID); + __nnp = (*env)->GetIntField(env, np, intW_val_fieldID); + __nmxiter = (*env)->GetIntField(env, mxiter, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nritzr = (*env)->GetPrimitiveArrayCritical(env, ritzr, NULL))) goto fail; + if (!(__nritzi = (*env)->GetPrimitiveArrayCritical(env, ritzi, NULL))) goto fail; + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + dnaup2_(&__nido, __nbmat, &n, __nwhich, &__nnev, &__nnp, &tol, __nresid + offsetresid, &mode, &iupd, &ishift, &__nmxiter, __nv + offsetv, &ldv, __nh + offseth, &ldh, __nritzr + offsetritzr, __nritzi + offsetritzi, __nbounds + offsetbounds, __nq + offsetq, &ldq, __nworkl + offsetworkl, __nipntr + offsetipntr, __nworkd + offsetworkd, &__ninfo); +done: + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); + if (__nritzi) (*env)->ReleasePrimitiveArrayCritical(env, ritzi, __nritzi, failed ? JNI_ABORT : 0); + if (__nritzr) (*env)->ReleasePrimitiveArrayCritical(env, ritzr, __nritzr, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, mxiter, intW_val_fieldID, __nmxiter); + if (!failed) (*env)->SetIntField(env, np, intW_val_fieldID, __nnp); + if (!failed) (*env)->SetIntField(env, nev, intW_val_fieldID, __nnev); + if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); + if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); + if (!failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*snaup2_)(int *ido, char *bmat, int *n, char *which, int *nev, int *np, float *tol, float *resid, int *mode, int *iupd, int *ishift, int *mxiter, float *v, int *ldv, float *h, int *ldh, float *ritzr, float *ritzi, float *bounds, float *q, int *ldq, float *workl, int *ipntr, float *workd, int *info); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_snaup2K(JNIEnv *env, UNUSED jobject obj, - jobject ido, jstring bmat, jint n, jstring which, jobject nev, jobject np, jfloat tol, jfloatArray resid, jint offsetresid, jint mode, jint iupd, jint ishift, jobject mxiter, jfloatArray v, jint offsetv, jint ldv, jfloatArray h, jint offseth, jint ldh, jfloatArray ritzr, jint offsetritzr, jfloatArray ritzi, jint offsetritzi, jfloatArray bounds, jint offsetbounds, jfloatArray q, jint offsetq, jint ldq, jfloatArray workl, jint offsetworkl, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*snaup2_)(int *ido, const char *bmat, int *n, const char *which, int *nev, int *np, float *tol, float *resid, int *mode, int *iupd, int *ishift, int *mxiter, float *v, int *ldv, float *h, int *ldh, float *ritzr, float *ritzi, float *bounds, float *q, int *ldq, float *workl, int *ipntr, float *workd, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_snaup2K(JNIEnv *env, UNUSED jobject obj, jobject ido, jstring bmat, jint n, jstring which, jobject nev, jobject np, jfloat tol, jfloatArray resid, jint offsetresid, jint mode, jint iupd, jint ishift, jobject mxiter, jfloatArray v, jint offsetv, jint ldv, jfloatArray h, jint offseth, jint ldh, jfloatArray ritzr, jint offsetritzr, jfloatArray ritzi, jint offsetritzi, jfloatArray bounds, jint offsetbounds, jfloatArray q, jint offsetq, jint ldq, jfloatArray workl, jint offsetworkl, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jobject info) { + jboolean failed = FALSE; + int __nido = 0; const char *__nbmat = NULL; const char *__nwhich = NULL; int __nnev = 0; int __nnp = 0; int __nmxiter = 0; int __ninfo = 0; float *__nresid = NULL; float *__nv = NULL; float *__nh = NULL; float *__nritzr = NULL; float *__nritzi = NULL; float *__nbounds = NULL; float *__nq = NULL; float *__nworkl = NULL; int *__nipntr = NULL; float *__nworkd = NULL; + __nido = (*env)->GetIntField(env, ido, intW_val_fieldID); + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + __nnev = (*env)->GetIntField(env, nev, intW_val_fieldID); + __nnp = (*env)->GetIntField(env, np, intW_val_fieldID); + __nmxiter = (*env)->GetIntField(env, mxiter, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nritzr = (*env)->GetPrimitiveArrayCritical(env, ritzr, NULL))) goto fail; + if (!(__nritzi = (*env)->GetPrimitiveArrayCritical(env, ritzi, NULL))) goto fail; + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + snaup2_(&__nido, __nbmat, &n, __nwhich, &__nnev, &__nnp, &tol, __nresid + offsetresid, &mode, &iupd, &ishift, &__nmxiter, __nv + offsetv, &ldv, __nh + offseth, &ldh, __nritzr + offsetritzr, __nritzi + offsetritzi, __nbounds + offsetbounds, __nq + offsetq, &ldq, __nworkl + offsetworkl, __nipntr + offsetipntr, __nworkd + offsetworkd, &__ninfo); +done: + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); + if (__nritzi) (*env)->ReleasePrimitiveArrayCritical(env, ritzi, __nritzi, failed ? JNI_ABORT : 0); + if (__nritzr) (*env)->ReleasePrimitiveArrayCritical(env, ritzr, __nritzr, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, mxiter, intW_val_fieldID, __nmxiter); + if (!failed) (*env)->SetIntField(env, np, intW_val_fieldID, __nnp); + if (!failed) (*env)->SetIntField(env, nev, intW_val_fieldID, __nnev); + if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); + if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); + if (!failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dnaupd_)(int *ido, char *bmat, int *n, char *which, int *nev, double *tol, double *resid, int *ncv, double *v, int *ldv, int *iparam, int *ipntr, double *workd, double *workl, int *lworkl, int *info); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_dnaupdK(JNIEnv *env, UNUSED jobject obj, - jobject ido, jstring bmat, jint n, jstring which, jint nev, jobject tol, jdoubleArray resid, jint offsetresid, jint ncv, jdoubleArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jdoubleArray workl, jint offsetworkl, jint lworkl, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dnaupd_)(int *ido, const char *bmat, int *n, const char *which, int *nev, double *tol, double *resid, int *ncv, double *v, int *ldv, int *iparam, int *ipntr, double *workd, double *workl, int *lworkl, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dnaupdK(JNIEnv *env, UNUSED jobject obj, jobject ido, jstring bmat, jint n, jstring which, jint nev, jobject tol, jdoubleArray resid, jint offsetresid, jint ncv, jdoubleArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jdoubleArray workl, jint offsetworkl, jint lworkl, jobject info) { + jboolean failed = FALSE; + int __nido = 0; const char *__nbmat = NULL; const char *__nwhich = NULL; double __ntol = 0; int __ninfo = 0; double *__nresid = NULL; double *__nv = NULL; int *__niparam = NULL; int *__nipntr = NULL; double *__nworkd = NULL; double *__nworkl = NULL; + __nido = (*env)->GetIntField(env, ido, intW_val_fieldID); + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + __ntol = (*env)->GetDoubleField(env, tol, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__niparam = (*env)->GetPrimitiveArrayCritical(env, iparam, NULL))) goto fail; + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; + dnaupd_(&__nido, __nbmat, &n, __nwhich, &nev, &__ntol, __nresid + offsetresid, &ncv, __nv + offsetv, &ldv, __niparam + offsetiparam, __nipntr + offsetipntr, __nworkd + offsetworkd, __nworkl + offsetworkl, &lworkl, &__ninfo); +done: + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); + if (__niparam) (*env)->ReleasePrimitiveArrayCritical(env, iparam, __niparam, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, tol, doubleW_val_fieldID, __ntol); + if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); + if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); + if (!failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*snaupd_)(int *ido, char *bmat, int *n, char *which, int *nev, float *tol, float *resid, int *ncv, float *v, int *ldv, int *iparam, int *ipntr, float *workd, float *workl, int *lworkl, int *info); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_snaupdK(JNIEnv *env, UNUSED jobject obj, - jobject ido, jstring bmat, jint n, jstring which, jint nev, jobject tol, jfloatArray resid, jint offsetresid, jint ncv, jfloatArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jfloatArray workl, jint offsetworkl, jint lworkl, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*snaupd_)(int *ido, const char *bmat, int *n, const char *which, int *nev, float *tol, float *resid, int *ncv, float *v, int *ldv, int *iparam, int *ipntr, float *workd, float *workl, int *lworkl, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_snaupdK(JNIEnv *env, UNUSED jobject obj, jobject ido, jstring bmat, jint n, jstring which, jint nev, jobject tol, jfloatArray resid, jint offsetresid, jint ncv, jfloatArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jfloatArray workl, jint offsetworkl, jint lworkl, jobject info) { + jboolean failed = FALSE; + int __nido = 0; const char *__nbmat = NULL; const char *__nwhich = NULL; float __ntol = 0; int __ninfo = 0; float *__nresid = NULL; float *__nv = NULL; int *__niparam = NULL; int *__nipntr = NULL; float *__nworkd = NULL; float *__nworkl = NULL; + __nido = (*env)->GetIntField(env, ido, intW_val_fieldID); + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + __ntol = (*env)->GetFloatField(env, tol, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__niparam = (*env)->GetPrimitiveArrayCritical(env, iparam, NULL))) goto fail; + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; + snaupd_(&__nido, __nbmat, &n, __nwhich, &nev, &__ntol, __nresid + offsetresid, &ncv, __nv + offsetv, &ldv, __niparam + offsetiparam, __nipntr + offsetipntr, __nworkd + offsetworkd, __nworkl + offsetworkl, &lworkl, &__ninfo); +done: + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); + if (__niparam) (*env)->ReleasePrimitiveArrayCritical(env, iparam, __niparam, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, tol, floatW_val_fieldID, __ntol); + if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); + if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); + if (!failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*dnconv_)(int *n, double *ritzr, double *ritzi, double *bounds, double *tol, int *nconv); -void Java_dev_ludovic_netlib_arpack_JNIARPACK_dnconvK(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray ritzr, jint offsetritzr, jdoubleArray ritzi, jint offsetritzi, jdoubleArray bounds, jint offsetbounds, jdouble tol, jobject nconv) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dnconvK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray ritzr, jint offsetritzr, jdoubleArray ritzi, jint offsetritzi, jdoubleArray bounds, jint offsetbounds, jdouble tol, jobject nconv) { + jboolean failed = FALSE; + int __nnconv = 0; double *__nritzr = NULL; double *__nritzi = NULL; double *__nbounds = NULL; + __nnconv = (*env)->GetIntField(env, nconv, intW_val_fieldID); + if (!(__nritzr = (*env)->GetPrimitiveArrayCritical(env, ritzr, NULL))) goto fail; + if (!(__nritzi = (*env)->GetPrimitiveArrayCritical(env, ritzi, NULL))) goto fail; + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; + dnconv_(&n, __nritzr + offsetritzr, __nritzi + offsetritzi, __nbounds + offsetbounds, &tol, &__nnconv); +done: + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); + if (__nritzi) (*env)->ReleasePrimitiveArrayCritical(env, ritzi, __nritzi, failed ? JNI_ABORT : 0); + if (__nritzr) (*env)->ReleasePrimitiveArrayCritical(env, ritzr, __nritzr, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, nconv, intW_val_fieldID, __nnconv); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*snconv_)(int *n, float *ritzr, float *ritzi, float *bounds, float *tol, int *nconv); -void Java_dev_ludovic_netlib_arpack_JNIARPACK_snconvK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray ritzr, jint offsetritzr, jfloatArray ritzi, jint offsetritzi, jfloatArray bounds, jint offsetbounds, jfloat tol, jobject nconv) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_arpack_JNIARPACK_snconvK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray ritzr, jint offsetritzr, jfloatArray ritzi, jint offsetritzi, jfloatArray bounds, jint offsetbounds, jfloat tol, jobject nconv) { + jboolean failed = FALSE; + int __nnconv = 0; float *__nritzr = NULL; float *__nritzi = NULL; float *__nbounds = NULL; + __nnconv = (*env)->GetIntField(env, nconv, intW_val_fieldID); + if (!(__nritzr = (*env)->GetPrimitiveArrayCritical(env, ritzr, NULL))) goto fail; + if (!(__nritzi = (*env)->GetPrimitiveArrayCritical(env, ritzi, NULL))) goto fail; + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; + snconv_(&n, __nritzr + offsetritzr, __nritzi + offsetritzi, __nbounds + offsetbounds, &tol, &__nnconv); +done: + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); + if (__nritzi) (*env)->ReleasePrimitiveArrayCritical(env, ritzi, __nritzi, failed ? JNI_ABORT : 0); + if (__nritzr) (*env)->ReleasePrimitiveArrayCritical(env, ritzr, __nritzr, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, nconv, intW_val_fieldID, __nnconv); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*dsconv_)(int *n, double *ritz, double *bounds, double *tol, int *nconv); -void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsconvK(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray ritz, jint offsetritz, jdoubleArray bounds, jint offsetbounds, jdouble tol, jobject nconv) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsconvK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray ritz, jint offsetritz, jdoubleArray bounds, jint offsetbounds, jdouble tol, jobject nconv) { + jboolean failed = FALSE; + int __nnconv = 0; double *__nritz = NULL; double *__nbounds = NULL; + __nnconv = (*env)->GetIntField(env, nconv, intW_val_fieldID); + if (!(__nritz = (*env)->GetPrimitiveArrayCritical(env, ritz, NULL))) goto fail; + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; + dsconv_(&n, __nritz + offsetritz, __nbounds + offsetbounds, &tol, &__nnconv); +done: + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); + if (__nritz) (*env)->ReleasePrimitiveArrayCritical(env, ritz, __nritz, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, nconv, intW_val_fieldID, __nnconv); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*ssconv_)(int *n, float *ritz, float *bounds, float *tol, int *nconv); -void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssconvK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray ritz, jint offsetritz, jfloatArray bounds, jint offsetbounds, jfloat tol, jobject nconv) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssconvK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray ritz, jint offsetritz, jfloatArray bounds, jint offsetbounds, jfloat tol, jobject nconv) { + jboolean failed = FALSE; + int __nnconv = 0; float *__nritz = NULL; float *__nbounds = NULL; + __nnconv = (*env)->GetIntField(env, nconv, intW_val_fieldID); + if (!(__nritz = (*env)->GetPrimitiveArrayCritical(env, ritz, NULL))) goto fail; + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; + ssconv_(&n, __nritz + offsetritz, __nbounds + offsetbounds, &tol, &__nnconv); +done: + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); + if (__nritz) (*env)->ReleasePrimitiveArrayCritical(env, ritz, __nritz, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, nconv, intW_val_fieldID, __nnconv); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*dneigh_)(double *rnorm, int *n, double *h, int *ldh, double *ritzr, double *ritzi, double *bounds, double *q, int *ldq, double *workl, int *ierr); -void Java_dev_ludovic_netlib_arpack_JNIARPACK_dneighK(JNIEnv *env, UNUSED jobject obj, - jdouble rnorm, jobject n, jdoubleArray h, jint offseth, jint ldh, jdoubleArray ritzr, jint offsetritzr, jdoubleArray ritzi, jint offsetritzi, jdoubleArray bounds, jint offsetbounds, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray workl, jint offsetworkl, jobject ierr) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dneighK(JNIEnv *env, UNUSED jobject obj, jdouble rnorm, jobject n, jdoubleArray h, jint offseth, jint ldh, jdoubleArray ritzr, jint offsetritzr, jdoubleArray ritzi, jint offsetritzi, jdoubleArray bounds, jint offsetbounds, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray workl, jint offsetworkl, jobject ierr) { + jboolean failed = FALSE; + int __nn = 0; int __nierr = 0; double *__nh = NULL; double *__nritzr = NULL; double *__nritzi = NULL; double *__nbounds = NULL; double *__nq = NULL; double *__nworkl = NULL; + __nn = (*env)->GetIntField(env, n, intW_val_fieldID); + __nierr = (*env)->GetIntField(env, ierr, intW_val_fieldID); + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nritzr = (*env)->GetPrimitiveArrayCritical(env, ritzr, NULL))) goto fail; + if (!(__nritzi = (*env)->GetPrimitiveArrayCritical(env, ritzi, NULL))) goto fail; + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; + dneigh_(&rnorm, &__nn, __nh + offseth, &ldh, __nritzr + offsetritzr, __nritzi + offsetritzi, __nbounds + offsetbounds, __nq + offsetq, &ldq, __nworkl + offsetworkl, &__nierr); +done: + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); + if (__nritzi) (*env)->ReleasePrimitiveArrayCritical(env, ritzi, __nritzi, failed ? JNI_ABORT : 0); + if (__nritzr) (*env)->ReleasePrimitiveArrayCritical(env, ritzr, __nritzr, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, ierr, intW_val_fieldID, __nierr); + if (!failed) (*env)->SetIntField(env, n, intW_val_fieldID, __nn); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*sneigh_)(float *rnorm, int *n, float *h, int *ldh, float *ritzr, float *ritzi, float *bounds, float *q, int *ldq, float *workl, int *ierr); -void Java_dev_ludovic_netlib_arpack_JNIARPACK_sneighK(JNIEnv *env, UNUSED jobject obj, - jfloat rnorm, jobject n, jfloatArray h, jint offseth, jint ldh, jfloatArray ritzr, jint offsetritzr, jfloatArray ritzi, jint offsetritzi, jfloatArray bounds, jint offsetbounds, jfloatArray q, jint offsetq, jint ldq, jfloatArray workl, jint offsetworkl, jobject ierr) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_arpack_JNIARPACK_sneighK(JNIEnv *env, UNUSED jobject obj, jfloat rnorm, jobject n, jfloatArray h, jint offseth, jint ldh, jfloatArray ritzr, jint offsetritzr, jfloatArray ritzi, jint offsetritzi, jfloatArray bounds, jint offsetbounds, jfloatArray q, jint offsetq, jint ldq, jfloatArray workl, jint offsetworkl, jobject ierr) { + jboolean failed = FALSE; + int __nn = 0; int __nierr = 0; float *__nh = NULL; float *__nritzr = NULL; float *__nritzi = NULL; float *__nbounds = NULL; float *__nq = NULL; float *__nworkl = NULL; + __nn = (*env)->GetIntField(env, n, intW_val_fieldID); + __nierr = (*env)->GetIntField(env, ierr, intW_val_fieldID); + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nritzr = (*env)->GetPrimitiveArrayCritical(env, ritzr, NULL))) goto fail; + if (!(__nritzi = (*env)->GetPrimitiveArrayCritical(env, ritzi, NULL))) goto fail; + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; + sneigh_(&rnorm, &__nn, __nh + offseth, &ldh, __nritzr + offsetritzr, __nritzi + offsetritzi, __nbounds + offsetbounds, __nq + offsetq, &ldq, __nworkl + offsetworkl, &__nierr); +done: + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); + if (__nritzi) (*env)->ReleasePrimitiveArrayCritical(env, ritzi, __nritzi, failed ? JNI_ABORT : 0); + if (__nritzr) (*env)->ReleasePrimitiveArrayCritical(env, ritzr, __nritzr, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, ierr, intW_val_fieldID, __nierr); + if (!failed) (*env)->SetIntField(env, n, intW_val_fieldID, __nn); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dneupd_)(int *rvec, char *howmny, int *select, double *dr, double *di, double *z, int *ldz, double *sigmar, double *sigmai, double *workev, char *bmat, int *n, char *which, int *nev, double *tol, double *resid, int *ncv, double *v, int *ldv, int *iparam, int *ipntr, double *workd, double *workl, int *lworkl, int *info); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_dneupdK(JNIEnv *env, UNUSED jobject obj, - jboolean rvec, jstring howmny, jbooleanArray select, jint offsetselect, jdoubleArray dr, jint offsetdr, jdoubleArray di, jint offsetdi, jdoubleArray z, jint offsetz, jint ldz, jdouble sigmar, jdouble sigmai, jdoubleArray workev, jint offsetworkev, jstring bmat, jint n, jstring which, jobject nev, jdouble tol, jdoubleArray resid, jint offsetresid, jint ncv, jdoubleArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jdoubleArray workl, jint offsetworkl, jint lworkl, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dneupd_)(int *rvec, const char *howmny, int *select, double *dr, double *di, double *z, int *ldz, double *sigmar, double *sigmai, double *workev, const char *bmat, int *n, const char *which, int *nev, double *tol, double *resid, int *ncv, double *v, int *ldv, int *iparam, int *ipntr, double *workd, double *workl, int *lworkl, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dneupdK(JNIEnv *env, UNUSED jobject obj, jboolean rvec, jstring howmny, jbooleanArray select, jint offsetselect, jdoubleArray dr, jint offsetdr, jdoubleArray di, jint offsetdi, jdoubleArray z, jint offsetz, jint ldz, jdouble sigmar, jdouble sigmai, jdoubleArray workev, jint offsetworkev, jstring bmat, jint n, jstring which, jobject nev, jdouble tol, jdoubleArray resid, jint offsetresid, jint ncv, jdoubleArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jdoubleArray workl, jint offsetworkl, jint lworkl, jobject info) { + jboolean failed = FALSE; + int __nrvec; const char *__nhowmny = NULL; const char *__nbmat = NULL; const char *__nwhich = NULL; int __nnev = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; double *__ndr = NULL; double *__ndi = NULL; double *__nz = NULL; double *__nworkev = NULL; double *__nresid = NULL; double *__nv = NULL; int *__niparam = NULL; int *__nipntr = NULL; double *__nworkd = NULL; double *__nworkl = NULL; + __nrvec = rvec; + if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) goto fail; + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + __nnev = (*env)->GetIntField(env, nev, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__ndr = (*env)->GetPrimitiveArrayCritical(env, dr, NULL))) goto fail; + if (!(__ndi = (*env)->GetPrimitiveArrayCritical(env, di, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nworkev = (*env)->GetPrimitiveArrayCritical(env, workev, NULL))) goto fail; + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__niparam = (*env)->GetPrimitiveArrayCritical(env, iparam, NULL))) goto fail; + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; + dneupd_(&__nrvec, __nhowmny, __nselect + offsetselect, __ndr + offsetdr, __ndi + offsetdi, __nz + offsetz, &ldz, &sigmar, &sigmai, __nworkev + offsetworkev, __nbmat, &n, __nwhich, &__nnev, &tol, __nresid + offsetresid, &ncv, __nv + offsetv, &ldv, __niparam + offsetiparam, __nipntr + offsetipntr, __nworkd + offsetworkd, __nworkl + offsetworkl, &lworkl, &__ninfo); +done: + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); + if (__niparam) (*env)->ReleasePrimitiveArrayCritical(env, iparam, __niparam, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); + if (__nworkev) (*env)->ReleasePrimitiveArrayCritical(env, workev, __nworkev, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__ndi) (*env)->ReleasePrimitiveArrayCritical(env, di, __ndi, failed ? JNI_ABORT : 0); + if (__ndr) (*env)->ReleasePrimitiveArrayCritical(env, dr, __ndr, failed ? JNI_ABORT : 0); + if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, nev, intW_val_fieldID, __nnev); + if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); + if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); + if (__nhowmny) (*env)->ReleaseStringUTFChars(env, howmny, __nhowmny); + if (!failed) rvec = __nrvec; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sneupd_)(int *rvec, char *howmny, int *select, float *dr, float *di, float *z, int *ldz, float *sigmar, float *sigmai, float *workev, char *bmat, int *n, char *which, int *nev, float *tol, float *resid, int *ncv, float *v, int *ldv, int *iparam, int *ipntr, float *workd, float *workl, int *lworkl, int *info); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_sneupdK(JNIEnv *env, UNUSED jobject obj, - jboolean rvec, jstring howmny, jbooleanArray select, jint offsetselect, jfloatArray dr, jint offsetdr, jfloatArray di, jint offsetdi, jfloatArray z, jint offsetz, jint ldz, jfloat sigmar, jfloat sigmai, jfloatArray workev, jint offsetworkev, jstring bmat, jint n, jstring which, jobject nev, jfloat tol, jfloatArray resid, jint offsetresid, jint ncv, jfloatArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jfloatArray workl, jint offsetworkl, jint lworkl, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sneupd_)(int *rvec, const char *howmny, int *select, float *dr, float *di, float *z, int *ldz, float *sigmar, float *sigmai, float *workev, const char *bmat, int *n, const char *which, int *nev, float *tol, float *resid, int *ncv, float *v, int *ldv, int *iparam, int *ipntr, float *workd, float *workl, int *lworkl, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_sneupdK(JNIEnv *env, UNUSED jobject obj, jboolean rvec, jstring howmny, jbooleanArray select, jint offsetselect, jfloatArray dr, jint offsetdr, jfloatArray di, jint offsetdi, jfloatArray z, jint offsetz, jint ldz, jfloat sigmar, jfloat sigmai, jfloatArray workev, jint offsetworkev, jstring bmat, jint n, jstring which, jobject nev, jfloat tol, jfloatArray resid, jint offsetresid, jint ncv, jfloatArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jfloatArray workl, jint offsetworkl, jint lworkl, jobject info) { + jboolean failed = FALSE; + int __nrvec; const char *__nhowmny = NULL; const char *__nbmat = NULL; const char *__nwhich = NULL; int __nnev = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; float *__ndr = NULL; float *__ndi = NULL; float *__nz = NULL; float *__nworkev = NULL; float *__nresid = NULL; float *__nv = NULL; int *__niparam = NULL; int *__nipntr = NULL; float *__nworkd = NULL; float *__nworkl = NULL; + __nrvec = rvec; + if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) goto fail; + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + __nnev = (*env)->GetIntField(env, nev, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__ndr = (*env)->GetPrimitiveArrayCritical(env, dr, NULL))) goto fail; + if (!(__ndi = (*env)->GetPrimitiveArrayCritical(env, di, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nworkev = (*env)->GetPrimitiveArrayCritical(env, workev, NULL))) goto fail; + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__niparam = (*env)->GetPrimitiveArrayCritical(env, iparam, NULL))) goto fail; + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; + sneupd_(&__nrvec, __nhowmny, __nselect + offsetselect, __ndr + offsetdr, __ndi + offsetdi, __nz + offsetz, &ldz, &sigmar, &sigmai, __nworkev + offsetworkev, __nbmat, &n, __nwhich, &__nnev, &tol, __nresid + offsetresid, &ncv, __nv + offsetv, &ldv, __niparam + offsetiparam, __nipntr + offsetipntr, __nworkd + offsetworkd, __nworkl + offsetworkl, &lworkl, &__ninfo); +done: + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); + if (__niparam) (*env)->ReleasePrimitiveArrayCritical(env, iparam, __niparam, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); + if (__nworkev) (*env)->ReleasePrimitiveArrayCritical(env, workev, __nworkev, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__ndi) (*env)->ReleasePrimitiveArrayCritical(env, di, __ndi, failed ? JNI_ABORT : 0); + if (__ndr) (*env)->ReleasePrimitiveArrayCritical(env, dr, __ndr, failed ? JNI_ABORT : 0); + if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, nev, intW_val_fieldID, __nnev); + if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); + if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); + if (__nhowmny) (*env)->ReleaseStringUTFChars(env, howmny, __nhowmny); + if (!failed) rvec = __nrvec; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dngets_)(int *ishift, char *which, int *kev, int *np, double *ritzr, double *ritzi, double *bounds, double *shiftr, double *shifti); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_dngetsK(JNIEnv *env, UNUSED jobject obj, - jint ishift, jstring which, jobject kev, jobject np, jdoubleArray ritzr, jint offsetritzr, jdoubleArray ritzi, jint offsetritzi, jdoubleArray bounds, jint offsetbounds, jdoubleArray shiftr, jint offsetshiftr, jdoubleArray shifti, jint offsetshifti) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dngets_)(int *ishift, const char *which, int *kev, int *np, double *ritzr, double *ritzi, double *bounds, double *shiftr, double *shifti); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dngetsK(JNIEnv *env, UNUSED jobject obj, jint ishift, jstring which, jobject kev, jobject np, jdoubleArray ritzr, jint offsetritzr, jdoubleArray ritzi, jint offsetritzi, jdoubleArray bounds, jint offsetbounds, jdoubleArray shiftr, jint offsetshiftr, jdoubleArray shifti, jint offsetshifti) { + jboolean failed = FALSE; + const char *__nwhich = NULL; int __nkev = 0; int __nnp = 0; double *__nritzr = NULL; double *__nritzi = NULL; double *__nbounds = NULL; double *__nshiftr = NULL; double *__nshifti = NULL; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + __nkev = (*env)->GetIntField(env, kev, intW_val_fieldID); + __nnp = (*env)->GetIntField(env, np, intW_val_fieldID); + if (!(__nritzr = (*env)->GetPrimitiveArrayCritical(env, ritzr, NULL))) goto fail; + if (!(__nritzi = (*env)->GetPrimitiveArrayCritical(env, ritzi, NULL))) goto fail; + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; + if (!(__nshiftr = (*env)->GetPrimitiveArrayCritical(env, shiftr, NULL))) goto fail; + if (!(__nshifti = (*env)->GetPrimitiveArrayCritical(env, shifti, NULL))) goto fail; + dngets_(&ishift, __nwhich, &__nkev, &__nnp, __nritzr + offsetritzr, __nritzi + offsetritzi, __nbounds + offsetbounds, __nshiftr + offsetshiftr, __nshifti + offsetshifti); +done: + if (__nshifti) (*env)->ReleasePrimitiveArrayCritical(env, shifti, __nshifti, failed ? JNI_ABORT : 0); + if (__nshiftr) (*env)->ReleasePrimitiveArrayCritical(env, shiftr, __nshiftr, failed ? JNI_ABORT : 0); + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); + if (__nritzi) (*env)->ReleasePrimitiveArrayCritical(env, ritzi, __nritzi, failed ? JNI_ABORT : 0); + if (__nritzr) (*env)->ReleasePrimitiveArrayCritical(env, ritzr, __nritzr, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, np, intW_val_fieldID, __nnp); + if (!failed) (*env)->SetIntField(env, kev, intW_val_fieldID, __nkev); + if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sngets_)(int *ishift, char *which, int *kev, int *np, float *ritzr, float *ritzi, float *bounds, float *shiftr, float *shifti); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_sngetsK(JNIEnv *env, UNUSED jobject obj, - jint ishift, jstring which, jobject kev, jobject np, jfloatArray ritzr, jint offsetritzr, jfloatArray ritzi, jint offsetritzi, jfloatArray bounds, jint offsetbounds, jfloatArray shiftr, jint offsetshiftr, jfloatArray shifti, jint offsetshifti) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sngets_)(int *ishift, const char *which, int *kev, int *np, float *ritzr, float *ritzi, float *bounds, float *shiftr, float *shifti); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_sngetsK(JNIEnv *env, UNUSED jobject obj, jint ishift, jstring which, jobject kev, jobject np, jfloatArray ritzr, jint offsetritzr, jfloatArray ritzi, jint offsetritzi, jfloatArray bounds, jint offsetbounds, jfloatArray shiftr, jint offsetshiftr, jfloatArray shifti, jint offsetshifti) { + jboolean failed = FALSE; + const char *__nwhich = NULL; int __nkev = 0; int __nnp = 0; float *__nritzr = NULL; float *__nritzi = NULL; float *__nbounds = NULL; float *__nshiftr = NULL; float *__nshifti = NULL; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + __nkev = (*env)->GetIntField(env, kev, intW_val_fieldID); + __nnp = (*env)->GetIntField(env, np, intW_val_fieldID); + if (!(__nritzr = (*env)->GetPrimitiveArrayCritical(env, ritzr, NULL))) goto fail; + if (!(__nritzi = (*env)->GetPrimitiveArrayCritical(env, ritzi, NULL))) goto fail; + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; + if (!(__nshiftr = (*env)->GetPrimitiveArrayCritical(env, shiftr, NULL))) goto fail; + if (!(__nshifti = (*env)->GetPrimitiveArrayCritical(env, shifti, NULL))) goto fail; + sngets_(&ishift, __nwhich, &__nkev, &__nnp, __nritzr + offsetritzr, __nritzi + offsetritzi, __nbounds + offsetbounds, __nshiftr + offsetshiftr, __nshifti + offsetshifti); +done: + if (__nshifti) (*env)->ReleasePrimitiveArrayCritical(env, shifti, __nshifti, failed ? JNI_ABORT : 0); + if (__nshiftr) (*env)->ReleasePrimitiveArrayCritical(env, shiftr, __nshiftr, failed ? JNI_ABORT : 0); + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); + if (__nritzi) (*env)->ReleasePrimitiveArrayCritical(env, ritzi, __nritzi, failed ? JNI_ABORT : 0); + if (__nritzr) (*env)->ReleasePrimitiveArrayCritical(env, ritzr, __nritzr, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, np, intW_val_fieldID, __nnp); + if (!failed) (*env)->SetIntField(env, kev, intW_val_fieldID, __nkev); + if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsaitr_)(int *ido, char *bmat, int *n, int *k, int *np, int *mode, double *resid, double *rnorm, double *v, int *ldv, double *h, int *ldh, int *ipntr, double *workd, int *info); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsaitrK(JNIEnv *env, UNUSED jobject obj, - jobject ido, jstring bmat, jint n, jint k, jint np, jint mode, jdoubleArray resid, jint offsetresid, jobject rnorm, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray h, jint offseth, jint ldh, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dsaitr_)(int *ido, const char *bmat, int *n, int *k, int *np, int *mode, double *resid, double *rnorm, double *v, int *ldv, double *h, int *ldh, int *ipntr, double *workd, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsaitrK(JNIEnv *env, UNUSED jobject obj, jobject ido, jstring bmat, jint n, jint k, jint np, jint mode, jdoubleArray resid, jint offsetresid, jobject rnorm, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray h, jint offseth, jint ldh, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jobject info) { + jboolean failed = FALSE; + int __nido = 0; const char *__nbmat = NULL; double __nrnorm = 0; int __ninfo = 0; double *__nresid = NULL; double *__nv = NULL; double *__nh = NULL; int *__nipntr = NULL; double *__nworkd = NULL; + __nido = (*env)->GetIntField(env, ido, intW_val_fieldID); + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; + __nrnorm = (*env)->GetDoubleField(env, rnorm, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + dsaitr_(&__nido, __nbmat, &n, &k, &np, &mode, __nresid + offsetresid, &__nrnorm, __nv + offsetv, &ldv, __nh + offseth, &ldh, __nipntr + offsetipntr, __nworkd + offsetworkd, &__ninfo); +done: + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, rnorm, doubleW_val_fieldID, __nrnorm); + if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); + if (!failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssaitr_)(int *ido, char *bmat, int *n, int *k, int *np, int *mode, float *resid, float *rnorm, float *v, int *ldv, float *h, int *ldh, int *ipntr, float *workd, int *info); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssaitrK(JNIEnv *env, UNUSED jobject obj, - jobject ido, jstring bmat, jint n, jint k, jint np, jint mode, jfloatArray resid, jint offsetresid, jobject rnorm, jfloatArray v, jint offsetv, jint ldv, jfloatArray h, jint offseth, jint ldh, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*ssaitr_)(int *ido, const char *bmat, int *n, int *k, int *np, int *mode, float *resid, float *rnorm, float *v, int *ldv, float *h, int *ldh, int *ipntr, float *workd, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssaitrK(JNIEnv *env, UNUSED jobject obj, jobject ido, jstring bmat, jint n, jint k, jint np, jint mode, jfloatArray resid, jint offsetresid, jobject rnorm, jfloatArray v, jint offsetv, jint ldv, jfloatArray h, jint offseth, jint ldh, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jobject info) { + jboolean failed = FALSE; + int __nido = 0; const char *__nbmat = NULL; float __nrnorm = 0; int __ninfo = 0; float *__nresid = NULL; float *__nv = NULL; float *__nh = NULL; int *__nipntr = NULL; float *__nworkd = NULL; + __nido = (*env)->GetIntField(env, ido, intW_val_fieldID); + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; + __nrnorm = (*env)->GetFloatField(env, rnorm, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + ssaitr_(&__nido, __nbmat, &n, &k, &np, &mode, __nresid + offsetresid, &__nrnorm, __nv + offsetv, &ldv, __nh + offseth, &ldh, __nipntr + offsetipntr, __nworkd + offsetworkd, &__ninfo); +done: + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, rnorm, floatW_val_fieldID, __nrnorm); + if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); + if (!failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*dsapps_)(int *n, int *kev, int *np, double *shift, double *v, int *ldv, double *h, int *ldh, double *resid, double *q, int *ldq, double *workd); -void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsappsK(JNIEnv *env, UNUSED jobject obj, - jint n, jint kev, jint np, jdoubleArray shift, jint offsetshift, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray h, jint offseth, jint ldh, jdoubleArray resid, jint offsetresid, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray workd, jint offsetworkd) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsappsK(JNIEnv *env, UNUSED jobject obj, jint n, jint kev, jint np, jdoubleArray shift, jint offsetshift, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray h, jint offseth, jint ldh, jdoubleArray resid, jint offsetresid, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray workd, jint offsetworkd) { + jboolean failed = FALSE; + double *__nshift = NULL; double *__nv = NULL; double *__nh = NULL; double *__nresid = NULL; double *__nq = NULL; double *__nworkd = NULL; + if (!(__nshift = (*env)->GetPrimitiveArrayCritical(env, shift, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + dsapps_(&n, &kev, &np, __nshift + offsetshift, __nv + offsetv, &ldv, __nh + offseth, &ldh, __nresid + offsetresid, __nq + offsetq, &ldq, __nworkd + offsetworkd); +done: + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nshift) (*env)->ReleasePrimitiveArrayCritical(env, shift, __nshift, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*ssapps_)(int *n, int *kev, int *np, float *shift, float *v, int *ldv, float *h, int *ldh, float *resid, float *q, int *ldq, float *workd); -void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssappsK(JNIEnv *env, UNUSED jobject obj, - jint n, jint kev, jint np, jfloatArray shift, jint offsetshift, jfloatArray v, jint offsetv, jint ldv, jfloatArray h, jint offseth, jint ldh, jfloatArray resid, jint offsetresid, jfloatArray q, jint offsetq, jint ldq, jfloatArray workd, jint offsetworkd) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssappsK(JNIEnv *env, UNUSED jobject obj, jint n, jint kev, jint np, jfloatArray shift, jint offsetshift, jfloatArray v, jint offsetv, jint ldv, jfloatArray h, jint offseth, jint ldh, jfloatArray resid, jint offsetresid, jfloatArray q, jint offsetq, jint ldq, jfloatArray workd, jint offsetworkd) { + jboolean failed = FALSE; + float *__nshift = NULL; float *__nv = NULL; float *__nh = NULL; float *__nresid = NULL; float *__nq = NULL; float *__nworkd = NULL; + if (!(__nshift = (*env)->GetPrimitiveArrayCritical(env, shift, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + ssapps_(&n, &kev, &np, __nshift + offsetshift, __nv + offsetv, &ldv, __nh + offseth, &ldh, __nresid + offsetresid, __nq + offsetq, &ldq, __nworkd + offsetworkd); +done: + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nshift) (*env)->ReleasePrimitiveArrayCritical(env, shift, __nshift, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsaup2_)(int *ido, char *bmat, int *n, char *which, int *nev, int *np, double *tol, double *resid, int *mode, int *iupd, int *ishift, int *mxiter, double *v, int *ldv, double *h, int *ldh, double *ritz, double *bounds, double *q, int *ldq, double *workl, int *ipntr, double *workd, int *info); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsaup2K(JNIEnv *env, UNUSED jobject obj, - jobject ido, jstring bmat, jint n, jstring which, jobject nev, jobject np, jdouble tol, jdoubleArray resid, jint offsetresid, jint mode, jint iupd, jint ishift, jobject mxiter, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray h, jint offseth, jint ldh, jdoubleArray ritz, jint offsetritz, jdoubleArray bounds, jint offsetbounds, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray workl, jint offsetworkl, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dsaup2_)(int *ido, const char *bmat, int *n, const char *which, int *nev, int *np, double *tol, double *resid, int *mode, int *iupd, int *ishift, int *mxiter, double *v, int *ldv, double *h, int *ldh, double *ritz, double *bounds, double *q, int *ldq, double *workl, int *ipntr, double *workd, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsaup2K(JNIEnv *env, UNUSED jobject obj, jobject ido, jstring bmat, jint n, jstring which, jobject nev, jobject np, jdouble tol, jdoubleArray resid, jint offsetresid, jint mode, jint iupd, jint ishift, jobject mxiter, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray h, jint offseth, jint ldh, jdoubleArray ritz, jint offsetritz, jdoubleArray bounds, jint offsetbounds, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray workl, jint offsetworkl, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jobject info) { + jboolean failed = FALSE; + int __nido = 0; const char *__nbmat = NULL; const char *__nwhich = NULL; int __nnev = 0; int __nnp = 0; int __nmxiter = 0; int __ninfo = 0; double *__nresid = NULL; double *__nv = NULL; double *__nh = NULL; double *__nritz = NULL; double *__nbounds = NULL; double *__nq = NULL; double *__nworkl = NULL; int *__nipntr = NULL; double *__nworkd = NULL; + __nido = (*env)->GetIntField(env, ido, intW_val_fieldID); + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + __nnev = (*env)->GetIntField(env, nev, intW_val_fieldID); + __nnp = (*env)->GetIntField(env, np, intW_val_fieldID); + __nmxiter = (*env)->GetIntField(env, mxiter, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nritz = (*env)->GetPrimitiveArrayCritical(env, ritz, NULL))) goto fail; + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + dsaup2_(&__nido, __nbmat, &n, __nwhich, &__nnev, &__nnp, &tol, __nresid + offsetresid, &mode, &iupd, &ishift, &__nmxiter, __nv + offsetv, &ldv, __nh + offseth, &ldh, __nritz + offsetritz, __nbounds + offsetbounds, __nq + offsetq, &ldq, __nworkl + offsetworkl, __nipntr + offsetipntr, __nworkd + offsetworkd, &__ninfo); +done: + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); + if (__nritz) (*env)->ReleasePrimitiveArrayCritical(env, ritz, __nritz, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, mxiter, intW_val_fieldID, __nmxiter); + if (!failed) (*env)->SetIntField(env, np, intW_val_fieldID, __nnp); + if (!failed) (*env)->SetIntField(env, nev, intW_val_fieldID, __nnev); + if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); + if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); + if (!failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssaup2_)(int *ido, char *bmat, int *n, char *which, int *nev, int *np, float *tol, float *resid, int *mode, int *iupd, int *ishift, int *mxiter, float *v, int *ldv, float *h, int *ldh, float *ritz, float *bounds, float *q, int *ldq, float *workl, int *ipntr, float *workd, int *info); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssaup2K(JNIEnv *env, UNUSED jobject obj, - jobject ido, jstring bmat, jint n, jstring which, jobject nev, jobject np, jfloat tol, jfloatArray resid, jint offsetresid, jint mode, jint iupd, jint ishift, jobject mxiter, jfloatArray v, jint offsetv, jint ldv, jfloatArray h, jint offseth, jint ldh, jfloatArray ritz, jint offsetritz, jfloatArray bounds, jint offsetbounds, jfloatArray q, jint offsetq, jint ldq, jfloatArray workl, jint offsetworkl, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*ssaup2_)(int *ido, const char *bmat, int *n, const char *which, int *nev, int *np, float *tol, float *resid, int *mode, int *iupd, int *ishift, int *mxiter, float *v, int *ldv, float *h, int *ldh, float *ritz, float *bounds, float *q, int *ldq, float *workl, int *ipntr, float *workd, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssaup2K(JNIEnv *env, UNUSED jobject obj, jobject ido, jstring bmat, jint n, jstring which, jobject nev, jobject np, jfloat tol, jfloatArray resid, jint offsetresid, jint mode, jint iupd, jint ishift, jobject mxiter, jfloatArray v, jint offsetv, jint ldv, jfloatArray h, jint offseth, jint ldh, jfloatArray ritz, jint offsetritz, jfloatArray bounds, jint offsetbounds, jfloatArray q, jint offsetq, jint ldq, jfloatArray workl, jint offsetworkl, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jobject info) { + jboolean failed = FALSE; + int __nido = 0; const char *__nbmat = NULL; const char *__nwhich = NULL; int __nnev = 0; int __nnp = 0; int __nmxiter = 0; int __ninfo = 0; float *__nresid = NULL; float *__nv = NULL; float *__nh = NULL; float *__nritz = NULL; float *__nbounds = NULL; float *__nq = NULL; float *__nworkl = NULL; int *__nipntr = NULL; float *__nworkd = NULL; + __nido = (*env)->GetIntField(env, ido, intW_val_fieldID); + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + __nnev = (*env)->GetIntField(env, nev, intW_val_fieldID); + __nnp = (*env)->GetIntField(env, np, intW_val_fieldID); + __nmxiter = (*env)->GetIntField(env, mxiter, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nritz = (*env)->GetPrimitiveArrayCritical(env, ritz, NULL))) goto fail; + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + ssaup2_(&__nido, __nbmat, &n, __nwhich, &__nnev, &__nnp, &tol, __nresid + offsetresid, &mode, &iupd, &ishift, &__nmxiter, __nv + offsetv, &ldv, __nh + offseth, &ldh, __nritz + offsetritz, __nbounds + offsetbounds, __nq + offsetq, &ldq, __nworkl + offsetworkl, __nipntr + offsetipntr, __nworkd + offsetworkd, &__ninfo); +done: + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); + if (__nritz) (*env)->ReleasePrimitiveArrayCritical(env, ritz, __nritz, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, mxiter, intW_val_fieldID, __nmxiter); + if (!failed) (*env)->SetIntField(env, np, intW_val_fieldID, __nnp); + if (!failed) (*env)->SetIntField(env, nev, intW_val_fieldID, __nnev); + if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); + if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); + if (!failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*dseigt_)(double *rnorm, int *n, double *h, int *ldh, double *eig, double *bounds, double *workl, int *ierr); -void Java_dev_ludovic_netlib_arpack_JNIARPACK_dseigtK(JNIEnv *env, UNUSED jobject obj, - jdouble rnorm, jint n, jdoubleArray h, jint offseth, jint ldh, jdoubleArray eig, jint offseteig, jdoubleArray bounds, jint offsetbounds, jdoubleArray workl, jint offsetworkl, jobject ierr) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dseigtK(JNIEnv *env, UNUSED jobject obj, jdouble rnorm, jint n, jdoubleArray h, jint offseth, jint ldh, jdoubleArray eig, jint offseteig, jdoubleArray bounds, jint offsetbounds, jdoubleArray workl, jint offsetworkl, jobject ierr) { + jboolean failed = FALSE; + int __nierr = 0; double *__nh = NULL; double *__neig = NULL; double *__nbounds = NULL; double *__nworkl = NULL; + __nierr = (*env)->GetIntField(env, ierr, intW_val_fieldID); + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__neig = (*env)->GetPrimitiveArrayCritical(env, eig, NULL))) goto fail; + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; + dseigt_(&rnorm, &n, __nh + offseth, &ldh, __neig + offseteig, __nbounds + offsetbounds, __nworkl + offsetworkl, &__nierr); +done: + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); + if (__neig) (*env)->ReleasePrimitiveArrayCritical(env, eig, __neig, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, ierr, intW_val_fieldID, __nierr); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*sseigt_)(float *rnorm, int *n, float *h, int *ldh, float *eig, float *bounds, float *workl, int *ierr); -void Java_dev_ludovic_netlib_arpack_JNIARPACK_sseigtK(JNIEnv *env, UNUSED jobject obj, - jfloat rnorm, jint n, jfloatArray h, jint offseth, jint ldh, jfloatArray eig, jint offseteig, jfloatArray bounds, jint offsetbounds, jfloatArray workl, jint offsetworkl, jobject ierr) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_arpack_JNIARPACK_sseigtK(JNIEnv *env, UNUSED jobject obj, jfloat rnorm, jint n, jfloatArray h, jint offseth, jint ldh, jfloatArray eig, jint offseteig, jfloatArray bounds, jint offsetbounds, jfloatArray workl, jint offsetworkl, jobject ierr) { + jboolean failed = FALSE; + int __nierr = 0; float *__nh = NULL; float *__neig = NULL; float *__nbounds = NULL; float *__nworkl = NULL; + __nierr = (*env)->GetIntField(env, ierr, intW_val_fieldID); + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__neig = (*env)->GetPrimitiveArrayCritical(env, eig, NULL))) goto fail; + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; + sseigt_(&rnorm, &n, __nh + offseth, &ldh, __neig + offseteig, __nbounds + offsetbounds, __nworkl + offsetworkl, &__nierr); +done: + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); + if (__neig) (*env)->ReleasePrimitiveArrayCritical(env, eig, __neig, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, ierr, intW_val_fieldID, __nierr); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsesrt_)(char *which, int *apply, int *n, double *x, int *na, double *a, int *lda); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsesrtK(JNIEnv *env, UNUSED jobject obj, - jstring which, jboolean apply, jint n, jdoubleArray x, jint offsetx, jint na, jdoubleArray a, jint offseta, jint lda) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dsesrt_)(const char *which, int *apply, int *n, double *x, int *na, double *a, int *lda); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsesrtK(JNIEnv *env, UNUSED jobject obj, jstring which, jboolean apply, jint n, jdoubleArray x, jint offsetx, jint na, jdoubleArray a, jint offseta, jint lda) { + jboolean failed = FALSE; + const char *__nwhich = NULL; int __napply; double *__nx = NULL; double *__na = NULL; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + __napply = apply; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + dsesrt_(__nwhich, &__napply, &n, __nx + offsetx, &na, __na + offseta, &lda); +done: + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (!failed) apply = __napply; + if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssesrt_)(char *which, int *apply, int *n, float *x, int *na, float *a, int *lda); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssesrtK(JNIEnv *env, UNUSED jobject obj, - jstring which, jboolean apply, jint n, jfloatArray x, jint offsetx, jint na, jfloatArray a, jint offseta, jint lda) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*ssesrt_)(const char *which, int *apply, int *n, float *x, int *na, float *a, int *lda); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssesrtK(JNIEnv *env, UNUSED jobject obj, jstring which, jboolean apply, jint n, jfloatArray x, jint offsetx, jint na, jfloatArray a, jint offseta, jint lda) { + jboolean failed = FALSE; + const char *__nwhich = NULL; int __napply; float *__nx = NULL; float *__na = NULL; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + __napply = apply; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + ssesrt_(__nwhich, &__napply, &n, __nx + offsetx, &na, __na + offseta, &lda); +done: + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (!failed) apply = __napply; + if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsaupd_)(int *ido, char *bmat, int *n, char *which, int *nev, double *tol, double *resid, int *ncv, double *v, int *ldv, int *iparam, int *ipntr, double *workd, double *workl, int *lworkl, int *info); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsaupdK(JNIEnv *env, UNUSED jobject obj, - jobject ido, jstring bmat, jint n, jstring which, jint nev, jobject tol, jdoubleArray resid, jint offsetresid, jint ncv, jdoubleArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jdoubleArray workl, jint offsetworkl, jint lworkl, jobject info) { - // TODO - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dsaupd_)(int *ido, const char *bmat, int *n, const char *which, int *nev, double *tol, double *resid, int *ncv, double *v, int *ldv, int *iparam, int *ipntr, double *workd, double *workl, int *lworkl, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsaupdK(JNIEnv *env, UNUSED jobject obj, jobject ido, jstring bmat, jint n, jstring which, jint nev, jobject tol, jdoubleArray resid, jint offsetresid, jint ncv, jdoubleArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jdoubleArray workl, jint offsetworkl, jint lworkl, jobject info) { + jboolean failed = FALSE; + int __nido = 0; const char *__nbmat = NULL; const char *__nwhich = NULL; double __ntol = 0; int __ninfo = 0; double *__nresid = NULL; double *__nv = NULL; int *__niparam = NULL; int *__nipntr = NULL; double *__nworkd = NULL; double *__nworkl = NULL; + __nido = (*env)->GetIntField(env, ido, intW_val_fieldID); + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + __ntol = (*env)->GetDoubleField(env, tol, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__niparam = (*env)->GetPrimitiveArrayCritical(env, iparam, NULL))) goto fail; + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; + dsaupd_(&__nido, __nbmat, &n, __nwhich, &nev, &__ntol, __nresid + offsetresid, &ncv, __nv + offsetv, &ldv, __niparam + offsetiparam, __nipntr + offsetipntr, __nworkd + offsetworkd, __nworkl + offsetworkl, &lworkl, &__ninfo); +done: + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); + if (__niparam) (*env)->ReleasePrimitiveArrayCritical(env, iparam, __niparam, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, tol, doubleW_val_fieldID, __ntol); + if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); + if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); + if (!failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssaupd_)(int *ido, char *bmat, int *n, char *which, int *nev, float *tol, float *resid, int *ncv, float *v, int *ldv, int *iparam, int *ipntr, float *workd, float *workl, int *lworkl, int *info); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssaupdK(JNIEnv *env, UNUSED jobject obj, - jobject ido, jstring bmat, jint n, jstring which, jint nev, jobject tol, jfloatArray resid, jint offsetresid, jint ncv, jfloatArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jfloatArray workl, jint offsetworkl, jint lworkl, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*ssaupd_)(int *ido, const char *bmat, int *n, const char *which, int *nev, float *tol, float *resid, int *ncv, float *v, int *ldv, int *iparam, int *ipntr, float *workd, float *workl, int *lworkl, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssaupdK(JNIEnv *env, UNUSED jobject obj, jobject ido, jstring bmat, jint n, jstring which, jint nev, jobject tol, jfloatArray resid, jint offsetresid, jint ncv, jfloatArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jfloatArray workl, jint offsetworkl, jint lworkl, jobject info) { + jboolean failed = FALSE; + int __nido = 0; const char *__nbmat = NULL; const char *__nwhich = NULL; float __ntol = 0; int __ninfo = 0; float *__nresid = NULL; float *__nv = NULL; int *__niparam = NULL; int *__nipntr = NULL; float *__nworkd = NULL; float *__nworkl = NULL; + __nido = (*env)->GetIntField(env, ido, intW_val_fieldID); + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + __ntol = (*env)->GetFloatField(env, tol, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__niparam = (*env)->GetPrimitiveArrayCritical(env, iparam, NULL))) goto fail; + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; + ssaupd_(&__nido, __nbmat, &n, __nwhich, &nev, &__ntol, __nresid + offsetresid, &ncv, __nv + offsetv, &ldv, __niparam + offsetiparam, __nipntr + offsetipntr, __nworkd + offsetworkd, __nworkl + offsetworkl, &lworkl, &__ninfo); +done: + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); + if (__niparam) (*env)->ReleasePrimitiveArrayCritical(env, iparam, __niparam, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, tol, floatW_val_fieldID, __ntol); + if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); + if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); + if (!failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dseupd_)(int *rvec, char *howmny, int *select, double *d, double *z, int *ldz, double *sigma, char *bmat, int *n, char *which, int *nev, double *tol, double *resid, int *ncv, double *v, int *ldv, int *iparam, int *ipntr, double *workd, double *workl, int *lworkl, int *info); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_dseupdK(JNIEnv *env, UNUSED jobject obj, - jboolean rvec, jstring howmny, jbooleanArray select, jint offsetselect, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jint ldz, jdouble sigma, jstring bmat, jint n, jstring which, jobject nev, jdouble tol, jdoubleArray resid, jint offsetresid, jint ncv, jdoubleArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jdoubleArray workl, jint offsetworkl, jint lworkl, jobject info) { - // TODO - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dseupd_)(int *rvec, const char *howmny, int *select, double *d, double *z, int *ldz, double *sigma, const char *bmat, int *n, const char *which, int *nev, double *tol, double *resid, int *ncv, double *v, int *ldv, int *iparam, int *ipntr, double *workd, double *workl, int *lworkl, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dseupdK(JNIEnv *env, UNUSED jobject obj, jboolean rvec, jstring howmny, jbooleanArray select, jint offsetselect, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jint ldz, jdouble sigma, jstring bmat, jint n, jstring which, jobject nev, jdouble tol, jdoubleArray resid, jint offsetresid, jint ncv, jdoubleArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jdoubleArray workl, jint offsetworkl, jint lworkl, jobject info) { + jboolean failed = FALSE; + int __nrvec; const char *__nhowmny = NULL; const char *__nbmat = NULL; const char *__nwhich = NULL; int __nnev = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; double *__nd = NULL; double *__nz = NULL; double *__nresid = NULL; double *__nv = NULL; int *__niparam = NULL; int *__nipntr = NULL; double *__nworkd = NULL; double *__nworkl = NULL; + __nrvec = rvec; + if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) goto fail; + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + __nnev = (*env)->GetIntField(env, nev, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__niparam = (*env)->GetPrimitiveArrayCritical(env, iparam, NULL))) goto fail; + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; + dseupd_(&__nrvec, __nhowmny, __nselect + offsetselect, __nd + offsetd, __nz + offsetz, &ldz, &sigma, __nbmat, &n, __nwhich, &__nnev, &tol, __nresid + offsetresid, &ncv, __nv + offsetv, &ldv, __niparam + offsetiparam, __nipntr + offsetipntr, __nworkd + offsetworkd, __nworkl + offsetworkl, &lworkl, &__ninfo); +done: + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); + if (__niparam) (*env)->ReleasePrimitiveArrayCritical(env, iparam, __niparam, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, nev, intW_val_fieldID, __nnev); + if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); + if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); + if (__nhowmny) (*env)->ReleaseStringUTFChars(env, howmny, __nhowmny); + if (!failed) rvec = __nrvec; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sseupd_)(int *rvec, char *howmny, int *select, float *d, float *z, int *ldz, float *sigma, char *bmat, int *n, char *which, int *nev, float *tol, float *resid, int *ncv, float *v, int *ldv, int *iparam, int *ipntr, float *workd, float *workl, int *lworkl, int *info); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_sseupdK(JNIEnv *env, UNUSED jobject obj, - jboolean rvec, jstring howmny, jbooleanArray select, jint offsetselect, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jint ldz, jfloat sigma, jstring bmat, jint n, jstring which, jobject nev, jfloat tol, jfloatArray resid, jint offsetresid, jint ncv, jfloatArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jfloatArray workl, jint offsetworkl, jint lworkl, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sseupd_)(int *rvec, const char *howmny, int *select, float *d, float *z, int *ldz, float *sigma, const char *bmat, int *n, const char *which, int *nev, float *tol, float *resid, int *ncv, float *v, int *ldv, int *iparam, int *ipntr, float *workd, float *workl, int *lworkl, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_sseupdK(JNIEnv *env, UNUSED jobject obj, jboolean rvec, jstring howmny, jbooleanArray select, jint offsetselect, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jint ldz, jfloat sigma, jstring bmat, jint n, jstring which, jobject nev, jfloat tol, jfloatArray resid, jint offsetresid, jint ncv, jfloatArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jfloatArray workl, jint offsetworkl, jint lworkl, jobject info) { + jboolean failed = FALSE; + int __nrvec; const char *__nhowmny = NULL; const char *__nbmat = NULL; const char *__nwhich = NULL; int __nnev = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; float *__nd = NULL; float *__nz = NULL; float *__nresid = NULL; float *__nv = NULL; int *__niparam = NULL; int *__nipntr = NULL; float *__nworkd = NULL; float *__nworkl = NULL; + __nrvec = rvec; + if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) goto fail; + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + __nnev = (*env)->GetIntField(env, nev, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__niparam = (*env)->GetPrimitiveArrayCritical(env, iparam, NULL))) goto fail; + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; + sseupd_(&__nrvec, __nhowmny, __nselect + offsetselect, __nd + offsetd, __nz + offsetz, &ldz, &sigma, __nbmat, &n, __nwhich, &__nnev, &tol, __nresid + offsetresid, &ncv, __nv + offsetv, &ldv, __niparam + offsetiparam, __nipntr + offsetipntr, __nworkd + offsetworkd, __nworkl + offsetworkl, &lworkl, &__ninfo); +done: + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); + if (__niparam) (*env)->ReleasePrimitiveArrayCritical(env, iparam, __niparam, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, nev, intW_val_fieldID, __nnev); + if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); + if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); + if (__nhowmny) (*env)->ReleaseStringUTFChars(env, howmny, __nhowmny); + if (!failed) rvec = __nrvec; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsgets_)(int *ishift, char *which, int *kev, int *np, double *ritz, double *bounds, double *shifts); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsgetsK(JNIEnv *env, UNUSED jobject obj, - jint ishift, jstring which, jobject kev, jobject np, jdoubleArray ritz, jint offsetritz, jdoubleArray bounds, jint offsetbounds, jdoubleArray shifts, jint offsetshifts) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dsgets_)(int *ishift, const char *which, int *kev, int *np, double *ritz, double *bounds, double *shifts); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsgetsK(JNIEnv *env, UNUSED jobject obj, jint ishift, jstring which, jobject kev, jobject np, jdoubleArray ritz, jint offsetritz, jdoubleArray bounds, jint offsetbounds, jdoubleArray shifts, jint offsetshifts) { + jboolean failed = FALSE; + const char *__nwhich = NULL; int __nkev = 0; int __nnp = 0; double *__nritz = NULL; double *__nbounds = NULL; double *__nshifts = NULL; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + __nkev = (*env)->GetIntField(env, kev, intW_val_fieldID); + __nnp = (*env)->GetIntField(env, np, intW_val_fieldID); + if (!(__nritz = (*env)->GetPrimitiveArrayCritical(env, ritz, NULL))) goto fail; + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; + if (!(__nshifts = (*env)->GetPrimitiveArrayCritical(env, shifts, NULL))) goto fail; + dsgets_(&ishift, __nwhich, &__nkev, &__nnp, __nritz + offsetritz, __nbounds + offsetbounds, __nshifts + offsetshifts); +done: + if (__nshifts) (*env)->ReleasePrimitiveArrayCritical(env, shifts, __nshifts, failed ? JNI_ABORT : 0); + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); + if (__nritz) (*env)->ReleasePrimitiveArrayCritical(env, ritz, __nritz, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, np, intW_val_fieldID, __nnp); + if (!failed) (*env)->SetIntField(env, kev, intW_val_fieldID, __nkev); + if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssgets_)(int *ishift, char *which, int *kev, int *np, float *ritz, float *bounds, float *shifts); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssgetsK(JNIEnv *env, UNUSED jobject obj, - jint ishift, jstring which, jobject kev, jobject np, jfloatArray ritz, jint offsetritz, jfloatArray bounds, jint offsetbounds, jfloatArray shifts, jint offsetshifts) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*ssgets_)(int *ishift, const char *which, int *kev, int *np, float *ritz, float *bounds, float *shifts); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssgetsK(JNIEnv *env, UNUSED jobject obj, jint ishift, jstring which, jobject kev, jobject np, jfloatArray ritz, jint offsetritz, jfloatArray bounds, jint offsetbounds, jfloatArray shifts, jint offsetshifts) { + jboolean failed = FALSE; + const char *__nwhich = NULL; int __nkev = 0; int __nnp = 0; float *__nritz = NULL; float *__nbounds = NULL; float *__nshifts = NULL; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + __nkev = (*env)->GetIntField(env, kev, intW_val_fieldID); + __nnp = (*env)->GetIntField(env, np, intW_val_fieldID); + if (!(__nritz = (*env)->GetPrimitiveArrayCritical(env, ritz, NULL))) goto fail; + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; + if (!(__nshifts = (*env)->GetPrimitiveArrayCritical(env, shifts, NULL))) goto fail; + ssgets_(&ishift, __nwhich, &__nkev, &__nnp, __nritz + offsetritz, __nbounds + offsetbounds, __nshifts + offsetshifts); +done: + if (__nshifts) (*env)->ReleasePrimitiveArrayCritical(env, shifts, __nshifts, failed ? JNI_ABORT : 0); + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); + if (__nritz) (*env)->ReleasePrimitiveArrayCritical(env, ritz, __nritz, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, np, intW_val_fieldID, __nnp); + if (!failed) (*env)->SetIntField(env, kev, intW_val_fieldID, __nkev); + if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsortc_)(char *which, int *apply, int *n, double *xreal, double *ximag, double *y); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsortcK(JNIEnv *env, UNUSED jobject obj, - jstring which, jboolean apply, jint n, jdoubleArray xreal, jint offsetxreal, jdoubleArray ximag, jint offsetximag, jdoubleArray y, jint offsety) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dsortc_)(const char *which, int *apply, int *n, double *xreal, double *ximag, double *y); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsortcK(JNIEnv *env, UNUSED jobject obj, jstring which, jboolean apply, jint n, jdoubleArray xreal, jint offsetxreal, jdoubleArray ximag, jint offsetximag, jdoubleArray y, jint offsety) { + jboolean failed = FALSE; + const char *__nwhich = NULL; int __napply; double *__nxreal = NULL; double *__nximag = NULL; double *__ny = NULL; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + __napply = apply; + if (!(__nxreal = (*env)->GetPrimitiveArrayCritical(env, xreal, NULL))) goto fail; + if (!(__nximag = (*env)->GetPrimitiveArrayCritical(env, ximag, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + dsortc_(__nwhich, &__napply, &n, __nxreal + offsetxreal, __nximag + offsetximag, __ny + offsety); +done: + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nximag) (*env)->ReleasePrimitiveArrayCritical(env, ximag, __nximag, failed ? JNI_ABORT : 0); + if (__nxreal) (*env)->ReleasePrimitiveArrayCritical(env, xreal, __nxreal, failed ? JNI_ABORT : 0); + if (!failed) apply = __napply; + if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssortc_)(char *which, int *apply, int *n, float *xreal, float *ximag, float *y); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssortcK(JNIEnv *env, UNUSED jobject obj, - jstring which, jboolean apply, jint n, jfloatArray xreal, jint offsetxreal, jfloatArray ximag, jint offsetximag, jfloatArray y, jint offsety) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*ssortc_)(const char *which, int *apply, int *n, float *xreal, float *ximag, float *y); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssortcK(JNIEnv *env, UNUSED jobject obj, jstring which, jboolean apply, jint n, jfloatArray xreal, jint offsetxreal, jfloatArray ximag, jint offsetximag, jfloatArray y, jint offsety) { + jboolean failed = FALSE; + const char *__nwhich = NULL; int __napply; float *__nxreal = NULL; float *__nximag = NULL; float *__ny = NULL; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + __napply = apply; + if (!(__nxreal = (*env)->GetPrimitiveArrayCritical(env, xreal, NULL))) goto fail; + if (!(__nximag = (*env)->GetPrimitiveArrayCritical(env, ximag, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + ssortc_(__nwhich, &__napply, &n, __nxreal + offsetxreal, __nximag + offsetximag, __ny + offsety); +done: + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nximag) (*env)->ReleasePrimitiveArrayCritical(env, ximag, __nximag, failed ? JNI_ABORT : 0); + if (__nxreal) (*env)->ReleasePrimitiveArrayCritical(env, xreal, __nxreal, failed ? JNI_ABORT : 0); + if (!failed) apply = __napply; + if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsortr_)(char *which, int *apply, int *n, double *x1, double *x2); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsortrK(JNIEnv *env, UNUSED jobject obj, - jstring which, jboolean apply, jint n, jdoubleArray x1, jint offsetx1, jdoubleArray x2, jint offsetx2) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dsortr_)(const char *which, int *apply, int *n, double *x1, double *x2); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsortrK(JNIEnv *env, UNUSED jobject obj, jstring which, jboolean apply, jint n, jdoubleArray x1, jint offsetx1, jdoubleArray x2, jint offsetx2) { + jboolean failed = FALSE; + const char *__nwhich = NULL; int __napply; double *__nx1 = NULL; double *__nx2 = NULL; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + __napply = apply; + if (!(__nx1 = (*env)->GetPrimitiveArrayCritical(env, x1, NULL))) goto fail; + if (!(__nx2 = (*env)->GetPrimitiveArrayCritical(env, x2, NULL))) goto fail; + dsortr_(__nwhich, &__napply, &n, __nx1 + offsetx1, __nx2 + offsetx2); +done: + if (__nx2) (*env)->ReleasePrimitiveArrayCritical(env, x2, __nx2, failed ? JNI_ABORT : 0); + if (__nx1) (*env)->ReleasePrimitiveArrayCritical(env, x1, __nx1, failed ? JNI_ABORT : 0); + if (!failed) apply = __napply; + if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssortr_)(char *which, int *apply, int *n, float *x1, float *x2); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssortrK(JNIEnv *env, UNUSED jobject obj, - jstring which, jboolean apply, jint n, jfloatArray x1, jint offsetx1, jfloatArray x2, jint offsetx2) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*ssortr_)(const char *which, int *apply, int *n, float *x1, float *x2); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssortrK(JNIEnv *env, UNUSED jobject obj, jstring which, jboolean apply, jint n, jfloatArray x1, jint offsetx1, jfloatArray x2, jint offsetx2) { + jboolean failed = FALSE; + const char *__nwhich = NULL; int __napply; float *__nx1 = NULL; float *__nx2 = NULL; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + __napply = apply; + if (!(__nx1 = (*env)->GetPrimitiveArrayCritical(env, x1, NULL))) goto fail; + if (!(__nx2 = (*env)->GetPrimitiveArrayCritical(env, x2, NULL))) goto fail; + ssortr_(__nwhich, &__napply, &n, __nx1 + offsetx1, __nx2 + offsetx2); +done: + if (__nx2) (*env)->ReleasePrimitiveArrayCritical(env, x2, __nx2, failed ? JNI_ABORT : 0); + if (__nx1) (*env)->ReleasePrimitiveArrayCritical(env, x1, __nx1, failed ? JNI_ABORT : 0); + if (!failed) apply = __napply; + if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*dstatn_)(); void Java_dev_ludovic_netlib_arpack_JNIARPACK_dstatnK(JNIEnv *env, UNUSED jobject obj) { + jboolean failed = FALSE; + dstatn_(); +done: + + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*sstatn_)(); void Java_dev_ludovic_netlib_arpack_JNIARPACK_sstatnK(JNIEnv *env, UNUSED jobject obj) { + jboolean failed = FALSE; + sstatn_(); +done: + + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*dstats_)(); void Java_dev_ludovic_netlib_arpack_JNIARPACK_dstatsK(JNIEnv *env, UNUSED jobject obj) { + jboolean failed = FALSE; + dstats_(); +done: + + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*sstats_)(); void Java_dev_ludovic_netlib_arpack_JNIARPACK_sstatsK(JNIEnv *env, UNUSED jobject obj) { + jboolean failed = FALSE; + sstats_(); +done: + + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*dstqrb_)(int *n, double *d, double *e, double *z, double *work, int *info); -void Java_dev_ludovic_netlib_arpack_JNIARPACK_dstqrbK(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray z, jint offsetz, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dstqrbK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray z, jint offsetz, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nz = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dstqrb_(&n, __nd + offsetd, __ne + offsete, __nz + offsetz, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*sstqrb_)(int *n, float *d, float *e, float *z, float *work, int *info); -void Java_dev_ludovic_netlib_arpack_JNIARPACK_sstqrbK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray z, jint offsetz, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_arpack_JNIARPACK_sstqrbK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray z, jint offsetz, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nz = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sstqrb_(&n, __nd + offsetd, __ne + offsete, __nz + offsetz, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static int (*icnteq_)(int *n, int *array, int *value); -jint Java_dev_ludovic_netlib_arpack_JNIARPACK_icnteqK(JNIEnv *env, UNUSED jobject obj, - jint n, jintArray array, jint offsetarray, jint value) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +jint Java_dev_ludovic_netlib_arpack_JNIARPACK_icnteqK(JNIEnv *env, UNUSED jobject obj, jint n, jintArray array, jint offsetarray, jint value) { + jint __ret; + jboolean failed = FALSE; + int *__narray = NULL; + if (!(__narray = (*env)->GetPrimitiveArrayCritical(env, array, NULL))) goto fail; + __ret = icnteq_(&n, __narray + offsetarray, &value); +done: + if (__narray) (*env)->ReleasePrimitiveArrayCritical(env, array, __narray, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } static void (*icopy_)(int *n, int *lx, int *incx, int *ly, int *incy); -void Java_dev_ludovic_netlib_arpack_JNIARPACK_icopyK(JNIEnv *env, UNUSED jobject obj, - jint n, jintArray lx, jint offsetlx, jint incx, jintArray ly, jint offsetly, jint incy) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_arpack_JNIARPACK_icopyK(JNIEnv *env, UNUSED jobject obj, jint n, jintArray lx, jint offsetlx, jint incx, jintArray ly, jint offsetly, jint incy) { + jboolean failed = FALSE; + int *__nlx = NULL; int *__nly = NULL; + if (!(__nlx = (*env)->GetPrimitiveArrayCritical(env, lx, NULL))) goto fail; + if (!(__nly = (*env)->GetPrimitiveArrayCritical(env, ly, NULL))) goto fail; + icopy_(&n, __nlx + offsetlx, &incx, __nly + offsetly, &incy); +done: + if (__nly) (*env)->ReleasePrimitiveArrayCritical(env, ly, __nly, failed ? JNI_ABORT : 0); + if (__nlx) (*env)->ReleasePrimitiveArrayCritical(env, lx, __nlx, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*iset_)(int *n, int *value, int *array, int *inc); -void Java_dev_ludovic_netlib_arpack_JNIARPACK_isetK(JNIEnv *env, UNUSED jobject obj, - jint n, jint value, jintArray array, jint offsetarray, jint inc) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_arpack_JNIARPACK_isetK(JNIEnv *env, UNUSED jobject obj, jint n, jint value, jintArray array, jint offsetarray, jint inc) { + jboolean failed = FALSE; + int *__narray = NULL; + if (!(__narray = (*env)->GetPrimitiveArrayCritical(env, array, NULL))) goto fail; + iset_(&n, &value, __narray + offsetarray, &inc); +done: + if (__narray) (*env)->ReleasePrimitiveArrayCritical(env, array, __narray, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*iswap_)(int *n, int *sx, int *incx, int *sy, int *incy); -void Java_dev_ludovic_netlib_arpack_JNIARPACK_iswapK(JNIEnv *env, UNUSED jobject obj, - jint n, jintArray sx, jint offsetsx, jint incx, jintArray sy, jint offsetsy, jint incy) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_arpack_JNIARPACK_iswapK(JNIEnv *env, UNUSED jobject obj, jint n, jintArray sx, jint offsetsx, jint incx, jintArray sy, jint offsetsy, jint incy) { + jboolean failed = FALSE; + int *__nsx = NULL; int *__nsy = NULL; + if (!(__nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto fail; + if (!(__nsy = (*env)->GetPrimitiveArrayCritical(env, sy, NULL))) goto fail; + iswap_(&n, __nsx + offsetsx, &incx, __nsy + offsetsy, &incy); +done: + if (__nsy) (*env)->ReleasePrimitiveArrayCritical(env, sy, __nsy, failed ? JNI_ABORT : 0); + if (__nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, __nsx, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } static void (*second_)(float *t); -void Java_dev_ludovic_netlib_arpack_JNIARPACK_secondK(JNIEnv *env, UNUSED jobject obj, - jobject t) { +void Java_dev_ludovic_netlib_arpack_JNIARPACK_secondK(JNIEnv *env, UNUSED jobject obj, jobject t) { + jboolean failed = FALSE; + float __nt = 0; + __nt = (*env)->GetFloatField(env, t, floatW_val_fieldID); + second_(&__nt); +done: + if (!failed) (*env)->SetFloatField(env, t, floatW_val_fieldID, __nt); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; +} + +// static void (*dlaqrb_)(int *wantt, int *n, int *ilo, int *ihi, double *h, int *ldh, double *wr, double *wi, double *z, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dlaqrbK(JNIEnv *env, UNUSED jobject obj, jboolean wantt, jint n, jint ilo, jint ihi, jdoubleArray h, jint offseth, jint ldh, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jdoubleArray z, jint offsetz, jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +// static void (*slaqrb_)(int *wantt, int *n, int *ilo, int *ihi, float *h, int *ldh, float *wr, float *wi, float *z, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_slaqrbK(JNIEnv *env, UNUSED jobject obj, jboolean wantt, jint n, jint ilo, jint ihi, jfloatArray h, jint offseth, jint ldh, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jfloatArray z, jint offsetz, jobject info) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } diff --git a/blas/src/main/native/jni.c b/blas/src/main/native/jni.c index f41b33c2..ba71ceda 100644 --- a/blas/src/main/native/jni.c +++ b/blas/src/main/native/jni.c @@ -50,17 +50,16 @@ static void throwOOM(JNIEnv *env) { static double (*dasum_)(int *n, double *x, int *incx); -jdouble Java_dev_ludovic_netlib_blas_JNIBLAS_dasumK(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray x, jint offsetx, jint incx) { - jdouble ret; +jdouble Java_dev_ludovic_netlib_blas_JNIBLAS_dasumK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray x, jint offsetx, jint incx) { + jdouble __ret; jboolean failed = FALSE; - double *nx = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - ret = dasum_(&n, nx + offsetx, &incx); + double *__nx = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + __ret = dasum_(&n, __nx + offsetx, &incx); done: - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); if (failed) throwOOM(env); - return ret; + return __ret; fail: failed = TRUE; goto done; @@ -68,17 +67,16 @@ jdouble Java_dev_ludovic_netlib_blas_JNIBLAS_dasumK(JNIEnv *env, UNUSED jobject static float (*sasum_)(int *n, float *x, int *incx); -jfloat Java_dev_ludovic_netlib_blas_JNIBLAS_sasumK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray x, jint offsetx, jint incx) { - jfloat ret; +jfloat Java_dev_ludovic_netlib_blas_JNIBLAS_sasumK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray x, jint offsetx, jint incx) { + jfloat __ret; jboolean failed = FALSE; - float *nx = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - ret = sasum_(&n, nx + offsetx, &incx); + float *__nx = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + __ret = sasum_(&n, __nx + offsetx, &incx); done: - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); if (failed) throwOOM(env); - return ret; + return __ret; fail: failed = TRUE; goto done; @@ -86,16 +84,15 @@ jfloat Java_dev_ludovic_netlib_blas_JNIBLAS_sasumK(JNIEnv *env, UNUSED jobject o static void (*daxpy_)(int *n, double *alpha, double *x, int *incx, double *y, int *incy); -void Java_dev_ludovic_netlib_blas_JNIBLAS_daxpyK(JNIEnv *env, UNUSED jobject obj, - jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_daxpyK(JNIEnv *env, UNUSED jobject obj, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy) { jboolean failed = FALSE; - double *nx = NULL, *ny = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - daxpy_(&n, &alpha, nx + offsetx, &incx, ny + offsety, &incy); + double *__nx = NULL; double *__ny = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + daxpy_(&n, &alpha, __nx + offsetx, &incx, __ny + offsety, &incy); done: - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, failed ? JNI_ABORT : 0); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); if (failed) throwOOM(env); return; fail: @@ -105,16 +102,15 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_daxpyK(JNIEnv *env, UNUSED jobject obj static void (*saxpy_)(int *n, float *alpha, float *x, int *incx, float *y, int *incy); -void Java_dev_ludovic_netlib_blas_JNIBLAS_saxpyK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_saxpyK(JNIEnv *env, UNUSED jobject obj, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy) { jboolean failed = FALSE; - float *nx = NULL, *ny = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - saxpy_(&n, &alpha, nx + offsetx, &incx, ny + offsety, &incy); + float *__nx = NULL; float *__ny = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + saxpy_(&n, &alpha, __nx + offsetx, &incx, __ny + offsety, &incy); done: - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, failed ? JNI_ABORT : 0); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); if (failed) throwOOM(env); return; fail: @@ -124,16 +120,15 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_saxpyK(JNIEnv *env, UNUSED jobject obj static void (*dcopy_)(int *n, double *x, int *incx, double *y, int *incy); -void Java_dev_ludovic_netlib_blas_JNIBLAS_dcopyK(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_dcopyK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy) { jboolean failed = FALSE; - double *nx = NULL, *ny = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - dcopy_(&n, nx + offsetx, &incx, ny + offsety, &incy); + double *__nx = NULL; double *__ny = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + dcopy_(&n, __nx + offsetx, &incx, __ny + offsety, &incy); done: - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, failed ? JNI_ABORT : 0); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); if (failed) throwOOM(env); return; fail: @@ -143,16 +138,15 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_dcopyK(JNIEnv *env, UNUSED jobject obj static void (*scopy_)(int *n, float *x, int *incx, float *y, int *incy); -void Java_dev_ludovic_netlib_blas_JNIBLAS_scopyK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_scopyK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy) { jboolean failed = FALSE; - float *nx = NULL, *ny = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - scopy_(&n, nx + offsetx, &incx, ny + offsety, &incy); + float *__nx = NULL; float *__ny = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + scopy_(&n, __nx + offsetx, &incx, __ny + offsety, &incy); done: - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, failed ? JNI_ABORT : 0); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); if (failed) throwOOM(env); return; fail: @@ -162,19 +156,18 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_scopyK(JNIEnv *env, UNUSED jobject obj static double (*ddot_)(int *n, double *x, int *incx, double *y, int *incy); -jdouble Java_dev_ludovic_netlib_blas_JNIBLAS_ddotK(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy) { +jdouble Java_dev_ludovic_netlib_blas_JNIBLAS_ddotK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy) { + jdouble __ret; jboolean failed = FALSE; - jdouble ret; - double *nx = NULL, *ny = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - ret = ddot_(&n, nx + offsetx, &incx, ny + offsety, &incy); + double *__nx = NULL; double *__ny = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + __ret = ddot_(&n, __nx + offsetx, &incx, __ny + offsety, &incy); done: - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, JNI_ABORT); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); if (failed) throwOOM(env); - return ret; + return __ret; fail: failed = TRUE; goto done; @@ -182,19 +175,18 @@ jdouble Java_dev_ludovic_netlib_blas_JNIBLAS_ddotK(JNIEnv *env, UNUSED jobject o static float (*sdot_)(int *n, float *x, int *incx, float *y, int *incy); -jfloat Java_dev_ludovic_netlib_blas_JNIBLAS_sdotK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy) { - jfloat ret; +jfloat Java_dev_ludovic_netlib_blas_JNIBLAS_sdotK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy) { + jfloat __ret; jboolean failed = FALSE; - float *nx = NULL, *ny = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - ret = sdot_(&n, nx + offsetx, &incx, ny + offsety, &incy); + float *__nx = NULL; float *__ny = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + __ret = sdot_(&n, __nx + offsetx, &incx, __ny + offsety, &incy); done: - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, JNI_ABORT); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); if (failed) throwOOM(env); - return ret; + return __ret; fail: failed = TRUE; goto done; @@ -202,19 +194,18 @@ jfloat Java_dev_ludovic_netlib_blas_JNIBLAS_sdotK(JNIEnv *env, UNUSED jobject ob static float (*sdsdot_)(int *n, float *sb, float *sx, int *incsx, float *sy, int *incsy); -jfloat Java_dev_ludovic_netlib_blas_JNIBLAS_sdsdotK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloat sb, jfloatArray sx, jint offsetsx, jint incsx, jfloatArray sy, jint offsetsy, jint incsy) { - jfloat ret; +jfloat Java_dev_ludovic_netlib_blas_JNIBLAS_sdsdotK(JNIEnv *env, UNUSED jobject obj, jint n, jfloat sb, jfloatArray sx, jint offsetsx, jint incsx, jfloatArray sy, jint offsetsy, jint incsy) { + jfloat __ret; jboolean failed = FALSE; - float *nsx = NULL, *nsy = NULL; - if (!(nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto fail; - if (!(nsy = (*env)->GetPrimitiveArrayCritical(env, sy, NULL))) goto fail; - ret = sdsdot_(&n, &sb, nsx + offsetsx, &incsx, nsy + offsetsy, &incsy); + float *__nsx = NULL; float *__nsy = NULL; + if (!(__nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto fail; + if (!(__nsy = (*env)->GetPrimitiveArrayCritical(env, sy, NULL))) goto fail; + __ret = sdsdot_(&n, &sb, __nsx + offsetsx, &incsx, __nsy + offsetsy, &incsy); done: - if (nsy) (*env)->ReleasePrimitiveArrayCritical(env, sy, nsy, JNI_ABORT); - if (nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, nsx, JNI_ABORT); + if (__nsy) (*env)->ReleasePrimitiveArrayCritical(env, sy, __nsy, JNI_ABORT); + if (__nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, __nsx, JNI_ABORT); if (failed) throwOOM(env); - return ret; + return __ret; fail: failed = TRUE; goto done; @@ -222,20 +213,19 @@ jfloat Java_dev_ludovic_netlib_blas_JNIBLAS_sdsdotK(JNIEnv *env, UNUSED jobject static void (*dgbmv_)(const char *trans, int *m, int *n, int *kl, int *ku, double *alpha, double *a, int *lda, double *x, int *incx, double *beta, double *y, int *incy); -void Java_dev_ludovic_netlib_blas_JNIBLAS_dgbmvK(JNIEnv *env, UNUSED jobject obj, - jstring trans, jint m, jint n, jint kl, jint ku, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx, jdouble beta, jdoubleArray y, jint offsety, jint incy) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_dgbmvK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint m, jint n, jint kl, jint ku, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx, jdouble beta, jdoubleArray y, jint offsety, jint incy) { jboolean failed = FALSE; - const char *ntrans = NULL; double *na = NULL, *nx = NULL, *ny = NULL; - if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - dgbmv_(ntrans, &m, &n, &kl, &ku, &alpha, na + offseta, &lda, nx + offsetx, &incx, &beta, ny + offsety, &incy); + const char *__ntrans = NULL; double *__na = NULL; double *__nx = NULL; double *__ny = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + dgbmv_(__ntrans, &m, &n, &kl, &ku, &alpha, __na + offseta, &lda, __nx + offsetx, &incx, &beta, __ny + offsety, &incy); done: - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, failed ? JNI_ABORT : 0); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (failed) throwOOM(env); return; fail: @@ -245,20 +235,19 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_dgbmvK(JNIEnv *env, UNUSED jobject obj static void (*sgbmv_)(const char *trans, int *m, int *n, int *kl, int *ku, float *alpha, float *a, int *lda, float *x, int *incx, float *beta, float *y, int *incy); -void Java_dev_ludovic_netlib_blas_JNIBLAS_sgbmvK(JNIEnv *env, UNUSED jobject obj, - jstring trans, jint m, jint n, jint kl, jint ku, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx, jfloat beta, jfloatArray y, jint offsety, jint incy) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_sgbmvK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint m, jint n, jint kl, jint ku, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx, jfloat beta, jfloatArray y, jint offsety, jint incy) { jboolean failed = FALSE; - const char *ntrans = NULL; float *na = NULL, *nx = NULL, *ny = NULL; - if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - sgbmv_(ntrans, &m, &n, &kl, &ku, &alpha, na + offseta, &lda, nx + offsetx, &incx, &beta, ny + offsety, &incy); + const char *__ntrans = NULL; float *__na = NULL; float *__nx = NULL; float *__ny = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + sgbmv_(__ntrans, &m, &n, &kl, &ku, &alpha, __na + offseta, &lda, __nx + offsetx, &incx, &beta, __ny + offsety, &incy); done: - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, failed ? JNI_ABORT : 0); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (failed) throwOOM(env); return; fail: @@ -268,22 +257,21 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_sgbmvK(JNIEnv *env, UNUSED jobject obj static void (*dgemm_)(const char *transa, const char *transb, int *m, int *n, int *k, double *alpha, double *a, int *lda, double *b, int *ldb, double *beta, double *c, int *ldc); -void Java_dev_ludovic_netlib_blas_JNIBLAS_dgemmK(JNIEnv *env, UNUSED jobject obj, - jstring transa, jstring transb, jint m, jint n, jint k, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble beta, jdoubleArray c, jint offsetc, jint ldc) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_dgemmK(JNIEnv *env, UNUSED jobject obj, jstring transa, jstring transb, jint m, jint n, jint k, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble beta, jdoubleArray c, jint offsetc, jint ldc) { jboolean failed = FALSE; - const char *ntransa = NULL, *ntransb = NULL; double *na = NULL, *nb = NULL, *nc = NULL; - if (!(ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) goto fail; - if (!(ntransb = (*env)->GetStringUTFChars(env, transb, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - dgemm_(ntransa, ntransb, &m, &n, &k, &alpha, na + offseta, &lda, nb + offsetb, &ldb, &beta, nc + offsetc, &ldc); + const char *__ntransa = NULL; const char *__ntransb = NULL; double *__na = NULL; double *__nb = NULL; double *__nc = NULL; + if (!(__ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) goto fail; + if (!(__ntransb = (*env)->GetStringUTFChars(env, transb, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + dgemm_(__ntransa, __ntransb, &m, &n, &k, &alpha, __na + offseta, &lda, __nb + offsetb, &ldb, &beta, __nc + offsetc, &ldc); done: - if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, failed ? JNI_ABORT : 0); - if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, JNI_ABORT); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (ntransb) (*env)->ReleaseStringUTFChars(env, transb, ntransb); - if (ntransa) (*env)->ReleaseStringUTFChars(env, transa, ntransa); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, JNI_ABORT); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__ntransb) (*env)->ReleaseStringUTFChars(env, transb, __ntransb); + if (__ntransa) (*env)->ReleaseStringUTFChars(env, transa, __ntransa); if (failed) throwOOM(env); return; fail: @@ -293,22 +281,21 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_dgemmK(JNIEnv *env, UNUSED jobject obj static void (*sgemm_)(const char *transa, const char *transb, int *m, int *n, int *k, float *alpha, float *a, int *lda, float *b, int *ldb, float *beta, float *c, int *ldc); -void Java_dev_ludovic_netlib_blas_JNIBLAS_sgemmK(JNIEnv *env, UNUSED jobject obj, - jstring transa, jstring transb, jint m, jint n, jint k, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat beta, jfloatArray c, jint offsetc, jint ldc) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_sgemmK(JNIEnv *env, UNUSED jobject obj, jstring transa, jstring transb, jint m, jint n, jint k, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat beta, jfloatArray c, jint offsetc, jint ldc) { jboolean failed = FALSE; - const char *ntransa = NULL, *ntransb = NULL; float *na = NULL, *nb = NULL, *nc = NULL; - if (!(ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) goto fail; - if (!(ntransb = (*env)->GetStringUTFChars(env, transb, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - sgemm_(ntransa, ntransb, &m, &n, &k, &alpha, na + offseta, &lda, nb + offsetb, &ldb, &beta, nc + offsetc, &ldc); + const char *__ntransa = NULL; const char *__ntransb = NULL; float *__na = NULL; float *__nb = NULL; float *__nc = NULL; + if (!(__ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) goto fail; + if (!(__ntransb = (*env)->GetStringUTFChars(env, transb, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + sgemm_(__ntransa, __ntransb, &m, &n, &k, &alpha, __na + offseta, &lda, __nb + offsetb, &ldb, &beta, __nc + offsetc, &ldc); done: - if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, failed ? JNI_ABORT : 0); - if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, JNI_ABORT); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (ntransb) (*env)->ReleaseStringUTFChars(env, transb, ntransb); - if (ntransa) (*env)->ReleaseStringUTFChars(env, transa, ntransa); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, JNI_ABORT); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__ntransb) (*env)->ReleaseStringUTFChars(env, transb, __ntransb); + if (__ntransa) (*env)->ReleaseStringUTFChars(env, transa, __ntransa); if (failed) throwOOM(env); return; fail: @@ -318,20 +305,19 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_sgemmK(JNIEnv *env, UNUSED jobject obj static void (*dgemv_)(const char *trans, int *m, int *n, double *alpha, double *a, int *lda, double *x, int *incx, double *beta, double *y, int *incy); -void Java_dev_ludovic_netlib_blas_JNIBLAS_dgemvK(JNIEnv *env, UNUSED jobject obj, - jstring trans, jint m, jint n, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx, jdouble beta, jdoubleArray y, jint offsety, jint incy) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_dgemvK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint m, jint n, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx, jdouble beta, jdoubleArray y, jint offsety, jint incy) { jboolean failed = FALSE; - const char *ntrans = NULL; jdouble *na = NULL, *nx = NULL, *ny = NULL; - if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - dgemv_(ntrans, &m, &n, &alpha, na + offseta, &lda, nx + offsetx, &incx, &beta, ny + offsety, &incy); + const char *__ntrans = NULL; double *__na = NULL; double *__nx = NULL; double *__ny = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + dgemv_(__ntrans, &m, &n, &alpha, __na + offseta, &lda, __nx + offsetx, &incx, &beta, __ny + offsety, &incy); done: - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, failed ? JNI_ABORT : 0); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (failed) throwOOM(env); return; fail: @@ -341,20 +327,19 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_dgemvK(JNIEnv *env, UNUSED jobject obj static void (*sgemv_)(const char *trans, int *m, int *n, float *alpha, float *a, int *lda, float *x, int *incx, float *beta, float *y, int *incy); -void Java_dev_ludovic_netlib_blas_JNIBLAS_sgemvK(JNIEnv *env, UNUSED jobject obj, - jstring trans, jint m, jint n, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx, jfloat beta, jfloatArray y, jint offsety, jint incy) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_sgemvK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint m, jint n, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx, jfloat beta, jfloatArray y, jint offsety, jint incy) { jboolean failed = FALSE; - const char *ntrans = NULL; float *na = NULL, *nx = NULL, *ny = NULL; - if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - sgemv_(ntrans, &m, &n, &alpha, na + offseta, &lda, nx + offsetx, &incx, &beta, ny + offsety, &incy); + const char *__ntrans = NULL; float *__na = NULL; float *__nx = NULL; float *__ny = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + sgemv_(__ntrans, &m, &n, &alpha, __na + offseta, &lda, __nx + offsetx, &incx, &beta, __ny + offsety, &incy); done: - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, failed ? JNI_ABORT : 0); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (failed) throwOOM(env); return; fail: @@ -364,18 +349,17 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_sgemvK(JNIEnv *env, UNUSED jobject obj static void (*dger_)(int *m, int *n, double *alpha, double *x, int *incx, double *y, int *incy, double *a, int *lda); -void Java_dev_ludovic_netlib_blas_JNIBLAS_dgerK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy, jdoubleArray a, jint offseta, jint lda) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_dgerK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy, jdoubleArray a, jint offseta, jint lda) { jboolean failed = FALSE; - double *na = NULL, *nx = NULL, *ny = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - dger_(&m, &n, &alpha, nx + offsetx, &incx, ny + offsety, &incy, na + offseta, &lda); + double *__nx = NULL; double *__ny = NULL; double *__na = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + dger_(&m, &n, &alpha, __nx + offsetx, &incx, __ny + offsety, &incy, __na + offseta, &lda); done: - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, failed ? JNI_ABORT : 0); - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, JNI_ABORT); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); if (failed) throwOOM(env); return; fail: @@ -385,18 +369,17 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_dgerK(JNIEnv *env, UNUSED jobject obj, static void (*sger_)(int *m, int *n, float *alpha, float *x, int *incx, float *y, int *incy, float *a, int *lda); -void Java_dev_ludovic_netlib_blas_JNIBLAS_sgerK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy, jfloatArray a, jint offseta, jint lda) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_sgerK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy, jfloatArray a, jint offseta, jint lda) { jboolean failed = FALSE; - float *na = NULL, *nx = NULL, *ny = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - sger_(&m, &n, &alpha, nx + offsetx, &incx, ny + offsety, &incy, na + offseta, &lda); + float *__nx = NULL; float *__ny = NULL; float *__na = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + sger_(&m, &n, &alpha, __nx + offsetx, &incx, __ny + offsety, &incy, __na + offseta, &lda); done: - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, failed ? JNI_ABORT : 0); - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, JNI_ABORT); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); if (failed) throwOOM(env); return; fail: @@ -406,17 +389,16 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_sgerK(JNIEnv *env, UNUSED jobject obj, static double (*dnrm2_)(int *n, double *x, int *incx); -jdouble Java_dev_ludovic_netlib_blas_JNIBLAS_dnrm2K(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray x, jint offsetx, jint incx) { - jdouble ret; +jdouble Java_dev_ludovic_netlib_blas_JNIBLAS_dnrm2K(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray x, jint offsetx, jint incx) { + jdouble __ret; jboolean failed = FALSE; - double *nx = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - ret = dnrm2_(&n, nx + offsetx, &incx); + double *__nx = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + __ret = dnrm2_(&n, __nx + offsetx, &incx); done: - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); if (failed) throwOOM(env); - return ret; + return __ret; fail: failed = TRUE; goto done; @@ -424,17 +406,16 @@ jdouble Java_dev_ludovic_netlib_blas_JNIBLAS_dnrm2K(JNIEnv *env, UNUSED jobject static float (*snrm2_)(int *n, float *x, int *incx); -jfloat Java_dev_ludovic_netlib_blas_JNIBLAS_snrm2K(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray x, jint offsetx, jint incx) { - jfloat ret; +jfloat Java_dev_ludovic_netlib_blas_JNIBLAS_snrm2K(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray x, jint offsetx, jint incx) { + jfloat __ret; jboolean failed = FALSE; - float *nx = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - ret = snrm2_(&n, nx + offsetx, &incx); + float *__nx = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + __ret = snrm2_(&n, __nx + offsetx, &incx); done: - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); if (failed) throwOOM(env); - return ret; + return __ret; fail: failed = TRUE; goto done; @@ -442,16 +423,15 @@ jfloat Java_dev_ludovic_netlib_blas_JNIBLAS_snrm2K(JNIEnv *env, UNUSED jobject o static void (*drot_)(int *n, double *dx, int *incx, double *dy, int *incy, double *c, double *s); -void Java_dev_ludovic_netlib_blas_JNIBLAS_drotK(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray dx, jint offsetdx, jint incx, jdoubleArray dy, jint offsetdy, jint incy, jdouble c, jdouble s) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_drotK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray dx, jint offsetdx, jint incx, jdoubleArray dy, jint offsetdy, jint incy, jdouble c, jdouble s) { jboolean failed = FALSE; - double *ndx = NULL, *ndy = NULL; - if (!(ndx = (*env)->GetPrimitiveArrayCritical(env, dx, NULL))) goto fail; - if (!(ndy = (*env)->GetPrimitiveArrayCritical(env, dy, NULL))) goto fail; - drot_(&n, ndx + offsetdx, &incx, ndy + offsetdy, &incy, &c, &s); + double *__ndx = NULL; double *__ndy = NULL; + if (!(__ndx = (*env)->GetPrimitiveArrayCritical(env, dx, NULL))) goto fail; + if (!(__ndy = (*env)->GetPrimitiveArrayCritical(env, dy, NULL))) goto fail; + drot_(&n, __ndx + offsetdx, &incx, __ndy + offsetdy, &incy, &c, &s); done: - if (ndy) (*env)->ReleasePrimitiveArrayCritical(env, dy, ndy, failed ? JNI_ABORT : 0); - if (ndx) (*env)->ReleasePrimitiveArrayCritical(env, dx, ndx, failed ? JNI_ABORT : 0); + if (__ndy) (*env)->ReleasePrimitiveArrayCritical(env, dy, __ndy, failed ? JNI_ABORT : 0); + if (__ndx) (*env)->ReleasePrimitiveArrayCritical(env, dx, __ndx, failed ? JNI_ABORT : 0); if (failed) throwOOM(env); return; fail: @@ -461,16 +441,15 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_drotK(JNIEnv *env, UNUSED jobject obj, static void (*srot_)(int *n, float *sx, int *incx, float *sy, int *incy, float *c, float *s); -void Java_dev_ludovic_netlib_blas_JNIBLAS_srotK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray sx, jint offsetsx, jint incx, jfloatArray sy, jint offsetsy, jint incy, jfloat c, jfloat s) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_srotK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray sx, jint offsetsx, jint incx, jfloatArray sy, jint offsetsy, jint incy, jfloat c, jfloat s) { jboolean failed = FALSE; - float *nsx = NULL, *nsy = NULL; - if (!(nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto fail; - if (!(nsy = (*env)->GetPrimitiveArrayCritical(env, sy, NULL))) goto fail; - srot_(&n, nsx + offsetsx, &incx, nsy + offsetsy, &incy, &c, &s); + float *__nsx = NULL; float *__nsy = NULL; + if (!(__nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto fail; + if (!(__nsy = (*env)->GetPrimitiveArrayCritical(env, sy, NULL))) goto fail; + srot_(&n, __nsx + offsetsx, &incx, __nsy + offsetsy, &incy, &c, &s); done: - if (nsy) (*env)->ReleasePrimitiveArrayCritical(env, sy, nsy, failed ? JNI_ABORT : 0); - if (nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, nsx, failed ? JNI_ABORT : 0); + if (__nsy) (*env)->ReleasePrimitiveArrayCritical(env, sy, __nsy, failed ? JNI_ABORT : 0); + if (__nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, __nsx, failed ? JNI_ABORT : 0); if (failed) throwOOM(env); return; fail: @@ -480,18 +459,17 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_srotK(JNIEnv *env, UNUSED jobject obj, static void (*drotm_)(int *n, double *dx, int *incx, double *dy, int *incy, double *dparam); -void Java_dev_ludovic_netlib_blas_JNIBLAS_drotmK(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray dx, jint offsetdx, jint incx, jdoubleArray dy, jint offsetdy, jint incy, jdoubleArray dparam, jint offsetdparam) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_drotmK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray dx, jint offsetdx, jint incx, jdoubleArray dy, jint offsetdy, jint incy, jdoubleArray dparam, jint offsetdparam) { jboolean failed = FALSE; - double *ndx = NULL, *ndy = NULL, *ndparam = NULL; - if (!(ndx = (*env)->GetPrimitiveArrayCritical(env, dx, NULL))) goto fail; - if (!(ndy = (*env)->GetPrimitiveArrayCritical(env, dy, NULL))) goto fail; - if (!(ndparam = (*env)->GetPrimitiveArrayCritical(env, dparam, NULL))) goto fail; - drotm_(&n, ndx + offsetdx, &incx, ndy + offsetdy, &incy, ndparam + offsetdparam); + double *__ndx = NULL; double *__ndy = NULL; double *__ndparam = NULL; + if (!(__ndx = (*env)->GetPrimitiveArrayCritical(env, dx, NULL))) goto fail; + if (!(__ndy = (*env)->GetPrimitiveArrayCritical(env, dy, NULL))) goto fail; + if (!(__ndparam = (*env)->GetPrimitiveArrayCritical(env, dparam, NULL))) goto fail; + drotm_(&n, __ndx + offsetdx, &incx, __ndy + offsetdy, &incy, __ndparam + offsetdparam); done: - if (ndparam) (*env)->ReleasePrimitiveArrayCritical(env, dparam, ndparam, JNI_ABORT); - if (ndy) (*env)->ReleasePrimitiveArrayCritical(env, dy, ndy, failed ? JNI_ABORT : 0); - if (ndx) (*env)->ReleasePrimitiveArrayCritical(env, dx, ndx, JNI_ABORT); + if (__ndparam) (*env)->ReleasePrimitiveArrayCritical(env, dparam, __ndparam, JNI_ABORT); + if (__ndy) (*env)->ReleasePrimitiveArrayCritical(env, dy, __ndy, failed ? JNI_ABORT : 0); + if (__ndx) (*env)->ReleasePrimitiveArrayCritical(env, dx, __ndx, JNI_ABORT); if (failed) throwOOM(env); return; fail: @@ -501,18 +479,17 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_drotmK(JNIEnv *env, UNUSED jobject obj static void (*srotm_)(int *n, float *sx, int *incx, float *sy, int *incy, float *sparam); -void Java_dev_ludovic_netlib_blas_JNIBLAS_srotmK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray sx, jint offsetsx, jint incx, jfloatArray sy, jint offsetsy, jint incy, jfloatArray sparam, jint offsetsparam) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_srotmK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray sx, jint offsetsx, jint incx, jfloatArray sy, jint offsetsy, jint incy, jfloatArray sparam, jint offsetsparam) { jboolean failed = FALSE; - float *nsx = NULL, *nsy = NULL, *nsparam = NULL; - if (!(nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto fail; - if (!(nsy = (*env)->GetPrimitiveArrayCritical(env, sy, NULL))) goto fail; - if (!(nsparam = (*env)->GetPrimitiveArrayCritical(env, sparam, NULL))) goto fail; - srotm_(&n, nsx + offsetsx, &incx, nsy + offsetsy, &incy, nsparam + offsetsparam); + float *__nsx = NULL; float *__nsy = NULL; float *__nsparam = NULL; + if (!(__nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto fail; + if (!(__nsy = (*env)->GetPrimitiveArrayCritical(env, sy, NULL))) goto fail; + if (!(__nsparam = (*env)->GetPrimitiveArrayCritical(env, sparam, NULL))) goto fail; + srotm_(&n, __nsx + offsetsx, &incx, __nsy + offsetsy, &incy, __nsparam + offsetsparam); done: - if (nsparam) (*env)->ReleasePrimitiveArrayCritical(env, sparam, nsparam, JNI_ABORT); - if (nsy) (*env)->ReleasePrimitiveArrayCritical(env, sy, nsy, failed ? JNI_ABORT : 0); - if (nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, nsx, JNI_ABORT); + if (__nsparam) (*env)->ReleasePrimitiveArrayCritical(env, sparam, __nsparam, JNI_ABORT); + if (__nsy) (*env)->ReleasePrimitiveArrayCritical(env, sy, __nsy, failed ? JNI_ABORT : 0); + if (__nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, __nsx, JNI_ABORT); if (failed) throwOOM(env); return; fail: @@ -522,20 +499,19 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_srotmK(JNIEnv *env, UNUSED jobject obj static void (*drotmg_)(double *dd1, double *dd2, double *dx1, double *dy1, double *dparam); -void Java_dev_ludovic_netlib_blas_JNIBLAS_drotmgK(JNIEnv *env, UNUSED jobject obj, - jobject dd1, jobject dd2, jobject dx1, jdouble dy1, jdoubleArray dparam, jint offsetdparam) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_drotmgK(JNIEnv *env, UNUSED jobject obj, jobject dd1, jobject dd2, jobject dx1, jdouble dy1, jdoubleArray dparam, jint offsetdparam) { jboolean failed = FALSE; - double ndd1 = 0, ndd2 = 0, ndx1 = 0; double *ndparam = NULL; - ndd1 = (*env)->GetDoubleField(env, dd1, doubleW_val_fieldID); - ndd2 = (*env)->GetDoubleField(env, dd2, doubleW_val_fieldID); - ndx1 = (*env)->GetDoubleField(env, dx1, doubleW_val_fieldID); - if (!(ndparam = (*env)->GetPrimitiveArrayCritical(env, dparam, NULL))) goto fail; - drotmg_(&ndd1, &ndd2, &ndx1, &dy1, ndparam + offsetdparam); + double __ndd1 = 0; double __ndd2 = 0; double __ndx1 = 0; double *__ndparam = NULL; + __ndd1 = (*env)->GetDoubleField(env, dd1, doubleW_val_fieldID); + __ndd2 = (*env)->GetDoubleField(env, dd2, doubleW_val_fieldID); + __ndx1 = (*env)->GetDoubleField(env, dx1, doubleW_val_fieldID); + if (!(__ndparam = (*env)->GetPrimitiveArrayCritical(env, dparam, NULL))) goto fail; + drotmg_(&__ndd1, &__ndd2, &__ndx1, &dy1, __ndparam + offsetdparam); done: - if (ndparam) (*env)->ReleasePrimitiveArrayCritical(env, dparam, ndparam, 0); - (*env)->SetDoubleField(env, dx1, doubleW_val_fieldID, ndx1); - (*env)->SetDoubleField(env, dd2, doubleW_val_fieldID, ndd2); - (*env)->SetDoubleField(env, dd1, doubleW_val_fieldID, ndd1); + if (__ndparam) (*env)->ReleasePrimitiveArrayCritical(env, dparam, __ndparam, JNI_ABORT); + if (!failed) (*env)->SetDoubleField(env, dx1, doubleW_val_fieldID, __ndx1); + if (!failed) (*env)->SetDoubleField(env, dd2, doubleW_val_fieldID, __ndd2); + if (!failed) (*env)->SetDoubleField(env, dd1, doubleW_val_fieldID, __ndd1); if (failed) throwOOM(env); return; fail: @@ -545,20 +521,19 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_drotmgK(JNIEnv *env, UNUSED jobject ob static void (*srotmg_)(float *sd1, float *sd2, float *sx1, float *sy1, float *sparam); -void Java_dev_ludovic_netlib_blas_JNIBLAS_srotmgK(JNIEnv *env, UNUSED jobject obj, - jobject sd1, jobject sd2, jobject sx1, jfloat sy1, jfloatArray sparam, jint offsetsparam) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_srotmgK(JNIEnv *env, UNUSED jobject obj, jobject sd1, jobject sd2, jobject sx1, jfloat sy1, jfloatArray sparam, jint offsetsparam) { jboolean failed = FALSE; - float nsd1 = 0, nsd2 = 0, nsx1 = 0; float *nsparam = NULL; - nsd1 = (*env)->GetFloatField(env, sd1, floatW_val_fieldID); - nsd2 = (*env)->GetFloatField(env, sd2, floatW_val_fieldID); - nsx1 = (*env)->GetFloatField(env, sx1, floatW_val_fieldID); - if (!(nsparam = (*env)->GetPrimitiveArrayCritical(env, sparam, NULL))) goto fail; - srotmg_(&nsd1, &nsd2, &nsx1, &sy1, nsparam + offsetsparam); + float __nsd1 = 0; float __nsd2 = 0; float __nsx1 = 0; float *__nsparam = NULL; + __nsd1 = (*env)->GetFloatField(env, sd1, floatW_val_fieldID); + __nsd2 = (*env)->GetFloatField(env, sd2, floatW_val_fieldID); + __nsx1 = (*env)->GetFloatField(env, sx1, floatW_val_fieldID); + if (!(__nsparam = (*env)->GetPrimitiveArrayCritical(env, sparam, NULL))) goto fail; + srotmg_(&__nsd1, &__nsd2, &__nsx1, &sy1, __nsparam + offsetsparam); done: - if (nsparam) (*env)->ReleasePrimitiveArrayCritical(env, sparam, nsparam, 0); - (*env)->SetFloatField(env, sx1, floatW_val_fieldID, nsx1); - (*env)->SetFloatField(env, sd2, floatW_val_fieldID, nsd2); - (*env)->SetFloatField(env, sd1, floatW_val_fieldID, nsd1); + if (__nsparam) (*env)->ReleasePrimitiveArrayCritical(env, sparam, __nsparam, JNI_ABORT); + if (!failed) (*env)->SetFloatField(env, sx1, floatW_val_fieldID, __nsx1); + if (!failed) (*env)->SetFloatField(env, sd2, floatW_val_fieldID, __nsd2); + if (!failed) (*env)->SetFloatField(env, sd1, floatW_val_fieldID, __nsd1); if (failed) throwOOM(env); return; fail: @@ -568,20 +543,19 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_srotmgK(JNIEnv *env, UNUSED jobject ob static void (*dsbmv_)(const char *uplo, int *n, int *k, double *alpha, double *a, int *lda, double *x, int *incx, double *beta, double *y, int *incy); -void Java_dev_ludovic_netlib_blas_JNIBLAS_dsbmvK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint k, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx, jdouble beta, jdoubleArray y, jint offsety, jint incy) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_dsbmvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint k, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx, jdouble beta, jdoubleArray y, jint offsety, jint incy) { jboolean failed = FALSE; - const char *nuplo = NULL; double *na = NULL, *nx = NULL, *ny = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - dsbmv_(nuplo, &n, &k, &alpha, na + offseta, &lda, nx + offsetx, &incx, &beta, ny + offsety, &incy); + const char *__nuplo = NULL; double *__na = NULL; double *__nx = NULL; double *__ny = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + dsbmv_(__nuplo, &n, &k, &alpha, __na + offseta, &lda, __nx + offsetx, &incx, &beta, __ny + offsety, &incy); done: - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (failed) throwOOM(env); return; fail: @@ -591,20 +565,19 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_dsbmvK(JNIEnv *env, UNUSED jobject obj static void (*ssbmv_)(const char *uplo, int *n, int *k, float *alpha, float *a, int *lda, float *x, int *incx, float *beta, float *y, int *incy); -void Java_dev_ludovic_netlib_blas_JNIBLAS_ssbmvK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint k, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx, jfloat beta, jfloatArray y, jint offsety, jint incy) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_ssbmvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint k, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx, jfloat beta, jfloatArray y, jint offsety, jint incy) { jboolean failed = FALSE; - const char *nuplo = NULL; float *na = NULL, *nx = NULL, *ny = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - ssbmv_(nuplo, &n, &k, &alpha, na + offseta, &lda, nx + offsetx, &incx, &beta, ny + offsety, &incy); + const char *__nuplo = NULL; float *__na = NULL; float *__nx = NULL; float *__ny = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + ssbmv_(__nuplo, &n, &k, &alpha, __na + offseta, &lda, __nx + offsetx, &incx, &beta, __ny + offsety, &incy); done: - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, 0); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (failed) throwOOM(env); return; fail: @@ -614,14 +587,13 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_ssbmvK(JNIEnv *env, UNUSED jobject obj static void (*dscal_)(int *n, double *alpha, double *x, int *incx); -void Java_dev_ludovic_netlib_blas_JNIBLAS_dscalK(JNIEnv *env, UNUSED jobject obj, - jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_dscalK(JNIEnv *env, UNUSED jobject obj, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx) { jboolean failed = FALSE; - double *nx = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - dscal_(&n, &alpha, nx + offsetx, &incx); + double *__nx = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + dscal_(&n, &alpha, __nx + offsetx, &incx); done: - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); if (failed) throwOOM(env); return; fail: @@ -631,14 +603,13 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_dscalK(JNIEnv *env, UNUSED jobject obj static void (*sscal_)(int *n, float *alpha, float *x, int *incx); -void Java_dev_ludovic_netlib_blas_JNIBLAS_sscalK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_sscalK(JNIEnv *env, UNUSED jobject obj, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx) { jboolean failed = FALSE; - float *nx = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - sscal_(&n, &alpha, nx + offsetx, &incx); + float *__nx = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + sscal_(&n, &alpha, __nx + offsetx, &incx); done: - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); if (failed) throwOOM(env); return; fail: @@ -648,20 +619,19 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_sscalK(JNIEnv *env, UNUSED jobject obj static void (*dspmv_)(const char *uplo, int *n, double *alpha, double *a, double *x, int *incx, double *beta, double *y, int *incy); -void Java_dev_ludovic_netlib_blas_JNIBLAS_dspmvK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jdouble alpha, jdoubleArray a, jint offseta, jdoubleArray x, jint offsetx, jint incx, jdouble beta, jdoubleArray y, jint offsety, jint incy) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_dspmvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdouble alpha, jdoubleArray a, jint offseta, jdoubleArray x, jint offsetx, jint incx, jdouble beta, jdoubleArray y, jint offsety, jint incy) { jboolean failed = FALSE; - const char *nuplo = NULL; double *na = NULL, *nx = NULL, *ny = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - dspmv_(nuplo, &n, &alpha, na + offseta, nx + offsetx, &incx, &beta, ny + offsety, &incy); + const char *__nuplo = NULL; double *__na = NULL; double *__nx = NULL; double *__ny = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + dspmv_(__nuplo, &n, &alpha, __na + offseta, __nx + offsetx, &incx, &beta, __ny + offsety, &incy); done: - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, failed ? JNI_ABORT : 0); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (failed) throwOOM(env); return; fail: @@ -671,20 +641,19 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_dspmvK(JNIEnv *env, UNUSED jobject obj static void (*sspmv_)(const char *uplo, int *n, float *alpha, float *a, float *x, int *incx, float *beta, float *y, int *incy); -void Java_dev_ludovic_netlib_blas_JNIBLAS_sspmvK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jfloat alpha, jfloatArray a, jint offseta, jfloatArray x, jint offsetx, jint incx, jfloat beta, jfloatArray y, jint offsety, jint incy) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_sspmvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloat alpha, jfloatArray a, jint offseta, jfloatArray x, jint offsetx, jint incx, jfloat beta, jfloatArray y, jint offsety, jint incy) { jboolean failed = FALSE; - const char *nuplo = NULL; float *na = NULL, *nx = NULL, *ny = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - sspmv_(nuplo, &n, &alpha, na + offseta, nx + offsetx, &incx, &beta, ny + offsety, &incy); + const char *__nuplo = NULL; float *__na = NULL; float *__nx = NULL; float *__ny = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + sspmv_(__nuplo, &n, &alpha, __na + offseta, __nx + offsetx, &incx, &beta, __ny + offsety, &incy); done: - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, failed ? JNI_ABORT : 0); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (failed) throwOOM(env); return; fail: @@ -694,18 +663,17 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_sspmvK(JNIEnv *env, UNUSED jobject obj static void (*dspr_)(const char *uplo, int *n, double *alpha, double *x, int *incx, double *a); -void Java_dev_ludovic_netlib_blas_JNIBLAS_dsprK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray a, jint offseta) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_dsprK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray a, jint offseta) { jboolean failed = FALSE; - const char *nuplo = NULL; double *na = NULL, *nx = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - dspr_(nuplo, &n, &alpha, nx + offsetx, &incx, na + offseta); + const char *__nuplo = NULL; double *__nx = NULL; double *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + dspr_(__nuplo, &n, &alpha, __nx + offsetx, &incx, __na + offseta); done: - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, failed ? JNI_ABORT : 0); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (failed) throwOOM(env); return; fail: @@ -715,18 +683,17 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_dsprK(JNIEnv *env, UNUSED jobject obj, static void (*sspr_)(const char *uplo, int *n, float *alpha, float *x, int *incx, float *a); -void Java_dev_ludovic_netlib_blas_JNIBLAS_ssprK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray a, jint offseta) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_ssprK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray a, jint offseta) { jboolean failed = FALSE; - const char *nuplo = NULL; float *na = NULL, *nx = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - sspr_(nuplo, &n, &alpha, nx + offsetx, &incx, na + offseta); + const char *__nuplo = NULL; float *__nx = NULL; float *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + sspr_(__nuplo, &n, &alpha, __nx + offsetx, &incx, __na + offseta); done: - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, failed ? JNI_ABORT : 0); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (failed) throwOOM(env); return; fail: @@ -736,20 +703,19 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_ssprK(JNIEnv *env, UNUSED jobject obj, static void (*dspr2_)(const char *uplo, int *n, double *alpha, double *x, int *incx, double *y, int *incy, double *a); -void Java_dev_ludovic_netlib_blas_JNIBLAS_dspr2K(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy, jdoubleArray a, jint offseta) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_dspr2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy, jdoubleArray a, jint offseta) { jboolean failed = FALSE; - const char *nuplo = NULL; double *na = NULL, *nx = NULL, *ny = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - dspr2_(nuplo, &n, &alpha, nx + offsetx, &incx, ny + offsety, &incy, na + offseta); + const char *__nuplo = NULL; double *__nx = NULL; double *__ny = NULL; double *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + dspr2_(__nuplo, &n, &alpha, __nx + offsetx, &incx, __ny + offsety, &incy, __na + offseta); done: - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, failed ? JNI_ABORT : 0); - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, JNI_ABORT); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (failed) throwOOM(env); return; fail: @@ -759,20 +725,19 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_dspr2K(JNIEnv *env, UNUSED jobject obj static void (*sspr2_)(const char *uplo, int *n, float *alpha, float *x, int *incx, float *y, int *incy, float *a); -void Java_dev_ludovic_netlib_blas_JNIBLAS_sspr2K(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy, jfloatArray a, jint offseta) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_sspr2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy, jfloatArray a, jint offseta) { jboolean failed = FALSE; - const char *nuplo = NULL; float *na = NULL, *nx = NULL, *ny = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - sspr2_(nuplo, &n, &alpha, nx + offsetx, &incx, ny + offsety, &incy, na + offseta); + const char *__nuplo = NULL; float *__nx = NULL; float *__ny = NULL; float *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + sspr2_(__nuplo, &n, &alpha, __nx + offsetx, &incx, __ny + offsety, &incy, __na + offseta); done: - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, failed ? JNI_ABORT : 0); - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, JNI_ABORT); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (failed) throwOOM(env); return; fail: @@ -782,16 +747,15 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_sspr2K(JNIEnv *env, UNUSED jobject obj static void (*dswap_)(int *n, double *x, int *incx, double *y, int *incy); -void Java_dev_ludovic_netlib_blas_JNIBLAS_dswapK(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_dswapK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy) { jboolean failed = FALSE; - double *nx = NULL, *ny = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - dswap_(&n, nx + offsetx, &incx, ny + offsety, &incy); + double *__nx = NULL; double *__ny = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + dswap_(&n, __nx + offsetx, &incx, __ny + offsety, &incy); done: - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, failed ? JNI_ABORT : 0); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); if (failed) throwOOM(env); return; fail: @@ -801,16 +765,15 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_dswapK(JNIEnv *env, UNUSED jobject obj static void (*sswap_)(int *n, float *x, int *incx, float *y, int *incy); -void Java_dev_ludovic_netlib_blas_JNIBLAS_sswapK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_sswapK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy) { jboolean failed = FALSE; - float *nx = NULL, *ny = NULL; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - sswap_(&n, nx + offsetx, &incx, ny + offsety, &incy); + float *__nx = NULL; float *__ny = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + sswap_(&n, __nx + offsetx, &incx, __ny + offsety, &incy); done: - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, failed ? JNI_ABORT : 0); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); if (failed) throwOOM(env); return; fail: @@ -820,22 +783,21 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_sswapK(JNIEnv *env, UNUSED jobject obj static void (*dsymm_)(const char *side, const char *uplo, int *m, int *n, double *alpha, double *a, int *lda, double *b, int *ldb, double *beta, double *c, int *ldc); -void Java_dev_ludovic_netlib_blas_JNIBLAS_dsymmK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring uplo, jint m, jint n, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble beta, jdoubleArray c, jint offsetc, jint ldc) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_dsymmK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring uplo, jint m, jint n, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble beta, jdoubleArray c, jint offsetc, jint ldc) { jboolean failed = FALSE; - const char *nside = NULL, *nuplo = NULL; double *na = NULL, *nb = NULL, *nc = NULL; - if (!(nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - dsymm_(nside, nuplo, &m, &n, &alpha, na + offseta, &lda, nb + offsetb, &ldb, &beta, nc + offsetc, &ldc); + const char *__nside = NULL; const char *__nuplo = NULL; double *__na = NULL; double *__nb = NULL; double *__nc = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + dsymm_(__nside, __nuplo, &m, &n, &alpha, __na + offseta, &lda, __nb + offsetb, &ldb, &beta, __nc + offsetc, &ldc); done: - if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, failed ? JNI_ABORT : 0); - if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, JNI_ABORT); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); - if (nside) (*env)->ReleaseStringUTFChars(env, side, nside); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, JNI_ABORT); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); if (failed) throwOOM(env); return; fail: @@ -845,22 +807,21 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_dsymmK(JNIEnv *env, UNUSED jobject obj static void (*ssymm_)(const char *side, const char *uplo, int *m, int *n, float *alpha, float *a, int *lda, float *b, int *ldb, float *beta, float *c, int *ldc); -void Java_dev_ludovic_netlib_blas_JNIBLAS_ssymmK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring uplo, jint m, jint n, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat beta, jfloatArray c, jint offsetc, jint ldc) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_ssymmK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring uplo, jint m, jint n, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat beta, jfloatArray c, jint offsetc, jint ldc) { jboolean failed = FALSE; - const char *nside = NULL, *nuplo = NULL; float *na = NULL, *nb = NULL, *nc = NULL; - if (!(nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - ssymm_(nside, nuplo, &m, &n, &alpha, na + offseta, &lda, nb + offsetb, &ldb, &beta, nc + offsetc, &ldc); + const char *__nside = NULL; const char *__nuplo = NULL; float *__na = NULL; float *__nb = NULL; float *__nc = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + ssymm_(__nside, __nuplo, &m, &n, &alpha, __na + offseta, &lda, __nb + offsetb, &ldb, &beta, __nc + offsetc, &ldc); done: - if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, failed ? JNI_ABORT : 0); - if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, JNI_ABORT); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); - if (nside) (*env)->ReleaseStringUTFChars(env, side, nside); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, JNI_ABORT); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); if (failed) throwOOM(env); return; fail: @@ -870,20 +831,19 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_ssymmK(JNIEnv *env, UNUSED jobject obj static void (*dsymv_)(const char *uplo, int *n, double *alpha, double *a, int *lda, double *x, int *incx, double *beta, double *y, int *incy); -void Java_dev_ludovic_netlib_blas_JNIBLAS_dsymvK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx, jdouble beta, jdoubleArray y, jint offsety, jint incy) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_dsymvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx, jdouble beta, jdoubleArray y, jint offsety, jint incy) { jboolean failed = FALSE; - const char *nuplo = NULL; double *na = NULL, *nx = NULL, *ny = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - dsymv_(nuplo, &n, &alpha, na + offseta, &lda, nx + offsetx, &incx, &beta, ny + offsety, &incy); + const char *__nuplo = NULL; double *__na = NULL; double *__nx = NULL; double *__ny = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + dsymv_(__nuplo, &n, &alpha, __na + offseta, &lda, __nx + offsetx, &incx, &beta, __ny + offsety, &incy); done: - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, failed ? JNI_ABORT : 0); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (failed) throwOOM(env); return; fail: @@ -893,20 +853,19 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_dsymvK(JNIEnv *env, UNUSED jobject obj static void (*ssymv_)(const char *uplo, int *n, float *alpha, float *a, int *lda, float *x, int *incx, float *beta, float *y, int *incy); -void Java_dev_ludovic_netlib_blas_JNIBLAS_ssymvK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx, jfloat beta, jfloatArray y, jint offsety, jint incy) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_ssymvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx, jfloat beta, jfloatArray y, jint offsety, jint incy) { jboolean failed = FALSE; - const char *nuplo = NULL; float *na = NULL, *nx = NULL, *ny = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - ssymv_(nuplo, &n, &alpha, na + offseta, &lda, nx + offsetx, &incx, &beta, ny + offsety, &incy); + const char *__nuplo = NULL; float *__na = NULL; float *__nx = NULL; float *__ny = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + ssymv_(__nuplo, &n, &alpha, __na + offseta, &lda, __nx + offsetx, &incx, &beta, __ny + offsety, &incy); done: - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, failed ? JNI_ABORT : 0); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (failed) throwOOM(env); return; fail: @@ -916,18 +875,17 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_ssymvK(JNIEnv *env, UNUSED jobject obj static void (*dsyr_)(const char *uplo, int *n, double *alpha, double *x, int *incx, double *a, int *lda); -void Java_dev_ludovic_netlib_blas_JNIBLAS_dsyrK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray a, jint offseta, jint lda) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_dsyrK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray a, jint offseta, jint lda) { jboolean failed = FALSE; - const char *nuplo = NULL; double *na = NULL, *nx = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - dsyr_(nuplo, &n, &alpha, nx + offsetx, &incx, na + offseta, &lda); + const char *__nuplo = NULL; double *__nx = NULL; double *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + dsyr_(__nuplo, &n, &alpha, __nx + offsetx, &incx, __na + offseta, &lda); done: - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, failed ? JNI_ABORT : 0); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (failed) throwOOM(env); return; fail: @@ -937,18 +895,17 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_dsyrK(JNIEnv *env, UNUSED jobject obj, static void (*ssyr_)(const char *uplo, int *n, float *alpha, float *x, int *incx, float *a, int *lda); -void Java_dev_ludovic_netlib_blas_JNIBLAS_ssyrK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray a, jint offseta, jint lda) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_ssyrK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray a, jint offseta, jint lda) { jboolean failed = FALSE; - const char *nuplo = NULL; float *na = NULL, *nx = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - ssyr_(nuplo, &n, &alpha, nx + offsetx, &incx, na + offseta, &lda); + const char *__nuplo = NULL; float *__nx = NULL; float *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + ssyr_(__nuplo, &n, &alpha, __nx + offsetx, &incx, __na + offseta, &lda); done: - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, failed ? JNI_ABORT : 0); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (failed) throwOOM(env); return; fail: @@ -958,20 +915,19 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_ssyrK(JNIEnv *env, UNUSED jobject obj, static void (*dsyr2_)(const char *uplo, int *n, double *alpha, double *x, int *incx, double *y, int *incy, double *a, int *lda); -void Java_dev_ludovic_netlib_blas_JNIBLAS_dsyr2K(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy, jdoubleArray a, jint offseta, jint lda) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_dsyr2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy, jdoubleArray a, jint offseta, jint lda) { jboolean failed = FALSE; - const char *nuplo = NULL; double *na = NULL, *nx = NULL, *ny = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - dsyr2_(nuplo, &n, &alpha, nx + offsetx, &incx, ny + offsety, &incy, na + offseta, &lda); + const char *__nuplo = NULL; double *__nx = NULL; double *__ny = NULL; double *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + dsyr2_(__nuplo, &n, &alpha, __nx + offsetx, &incx, __ny + offsety, &incy, __na + offseta, &lda); done: - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, failed ? JNI_ABORT : 0); - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, JNI_ABORT); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (failed) throwOOM(env); return; fail: @@ -981,20 +937,19 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_dsyr2K(JNIEnv *env, UNUSED jobject obj static void (*ssyr2_)(const char *uplo, int *n, float *alpha, float *x, int *incx, float *y, int *incy, float *a, int *lda); -void Java_dev_ludovic_netlib_blas_JNIBLAS_ssyr2K(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy, jfloatArray a, jint offseta, jint lda) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_ssyr2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy, jfloatArray a, jint offseta, jint lda) { jboolean failed = FALSE; - const char *nuplo = NULL; float *na = NULL, *nx = NULL, *ny = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - ssyr2_(nuplo, &n, &alpha, nx + offsetx, &incx, ny + offsety, &incy, na + offseta, &lda); + const char *__nuplo = NULL; float *__nx = NULL; float *__ny = NULL; float *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + ssyr2_(__nuplo, &n, &alpha, __nx + offsetx, &incx, __ny + offsety, &incy, __na + offseta, &lda); done: - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, failed ? JNI_ABORT : 0); - if (ny) (*env)->ReleasePrimitiveArrayCritical(env, y, ny, JNI_ABORT); - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, JNI_ABORT); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, JNI_ABORT); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (failed) throwOOM(env); return; fail: @@ -1004,21 +959,21 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_ssyr2K(JNIEnv *env, UNUSED jobject obj static void (*dsyr2k_)(const char *uplo, const char *trans, int *n, int *k, double *alpha, double *a, int *lda, double *b, int *ldb, double *beta, double *c, int *ldc); -void Java_dev_ludovic_netlib_blas_JNIBLAS_dsyr2kK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring trans, jint n, jint k, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble beta, jdoubleArray c, jint offsetc, jint ldc) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_dsyr2kK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jint n, jint k, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble beta, jdoubleArray c, jint offsetc, jint ldc) { jboolean failed = FALSE; - const char *nuplo = NULL, *ntrans = NULL; double *na = NULL, *nb = NULL, *nc = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - dsyr2k_(nuplo, ntrans, &n, &k, &alpha, na + offseta, &lda, nb + offsetb, &ldb, &beta, nc + offsetc, &ldc); + const char *__nuplo = NULL; const char *__ntrans = NULL; double *__na = NULL; double *__nb = NULL; double *__nc = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + dsyr2k_(__nuplo, __ntrans, &n, &k, &alpha, __na + offseta, &lda, __nb + offsetb, &ldb, &beta, __nc + offsetc, &ldc); done: - if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, failed ? JNI_ABORT : 0); - if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, JNI_ABORT); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, JNI_ABORT); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (failed) throwOOM(env); return; fail: @@ -1028,22 +983,21 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_dsyr2kK(JNIEnv *env, UNUSED jobject ob static void (*ssyr2k_)(const char *uplo, const char *trans, int *n, int *k, float *alpha, float *a, int *lda, float *b, int *ldb, float *beta, float *c, int *ldc); -void Java_dev_ludovic_netlib_blas_JNIBLAS_ssyr2kK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring trans, jint n, jint k, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat beta, jfloatArray c, jint offsetc, jint ldc) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_ssyr2kK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jint n, jint k, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat beta, jfloatArray c, jint offsetc, jint ldc) { jboolean failed = FALSE; - const char *nuplo = NULL, *ntrans = NULL; float *na = NULL, *nb = NULL, *nc = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - ssyr2k_(nuplo, ntrans, &n, &k, &alpha, na + offseta, &lda, nb + offsetb, &ldb, &beta, nc + offsetc, &ldc); + const char *__nuplo = NULL; const char *__ntrans = NULL; float *__na = NULL; float *__nb = NULL; float *__nc = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + ssyr2k_(__nuplo, __ntrans, &n, &k, &alpha, __na + offseta, &lda, __nb + offsetb, &ldb, &beta, __nc + offsetc, &ldc); done: - if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, failed ? JNI_ABORT : 0); - if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, JNI_ABORT); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, JNI_ABORT); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (failed) throwOOM(env); return; fail: @@ -1053,20 +1007,19 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_ssyr2kK(JNIEnv *env, UNUSED jobject ob static void (*dsyrk_)(const char *uplo, const char *trans, int *n, int *k, double *alpha, double *a, int *lda, double *beta, double *c, int *ldc); -void Java_dev_ludovic_netlib_blas_JNIBLAS_dsyrkK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring trans, jint n, jint k, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdouble beta, jdoubleArray c, jint offsetc, jint ldc) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_dsyrkK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jint n, jint k, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdouble beta, jdoubleArray c, jint offsetc, jint ldc) { jboolean failed = FALSE; - const char *nuplo = NULL, *ntrans = NULL; double *na = NULL, *nc = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - dsyrk_(nuplo, ntrans, &n, &k, &alpha, na + offseta, &lda, &beta, nc + offsetc, &ldc); + const char *__nuplo = NULL; const char *__ntrans = NULL; double *__na = NULL; double *__nc = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + dsyrk_(__nuplo, __ntrans, &n, &k, &alpha, __na + offseta, &lda, &beta, __nc + offsetc, &ldc); done: - if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, failed ? JNI_ABORT : 0); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (failed) throwOOM(env); return; fail: @@ -1076,20 +1029,19 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_dsyrkK(JNIEnv *env, UNUSED jobject obj static void (*ssyrk_)(const char *uplo, const char *trans, int *n, int *k, float *alpha, float *a, int *lda, float *beta, float *c, int *ldc); -void Java_dev_ludovic_netlib_blas_JNIBLAS_ssyrkK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring trans, jint n, jint k, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloat beta, jfloatArray c, jint offsetc, jint ldc) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_ssyrkK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jint n, jint k, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloat beta, jfloatArray c, jint offsetc, jint ldc) { jboolean failed = FALSE; - const char *nuplo = NULL, *ntrans = NULL; float *na = NULL, *nc = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - ssyrk_(nuplo, ntrans, &n, &k, &alpha, na + offseta, &lda, &beta, nc + offsetc, &ldc); + const char *__nuplo = NULL; const char *__ntrans = NULL; float *__na = NULL; float *__nc = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + ssyrk_(__nuplo, __ntrans, &n, &k, &alpha, __na + offseta, &lda, &beta, __nc + offsetc, &ldc); done: - if (nc) (*env)->ReleasePrimitiveArrayCritical(env, c, nc, failed ? JNI_ABORT : 0); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (failed) throwOOM(env); return; fail: @@ -1099,22 +1051,21 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_ssyrkK(JNIEnv *env, UNUSED jobject obj static void (*dtbmv_)(const char *uplo, const char *trans, const char *diag, int *n, int *k, double *a, int *lda, double *x, int *incx); -void Java_dev_ludovic_netlib_blas_JNIBLAS_dtbmvK(UNUSED JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring trans, jstring diag, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_dtbmvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx) { jboolean failed = FALSE; - const char *nuplo = NULL, *ntrans = NULL, *ndiag = NULL; double *na = NULL, *nx = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - dtbmv_(nuplo, ntrans, ndiag, &n, &k, na + offseta, &lda, nx + offsetx, &incx); + const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; double *__na = NULL; double *__nx = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + dtbmv_(__nuplo, __ntrans, __ndiag, &n, &k, __na + offseta, &lda, __nx + offsetx, &incx); done: - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); - if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (failed) throwOOM(env); return; fail: @@ -1124,22 +1075,21 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_dtbmvK(UNUSED JNIEnv *env, UNUSED jobj static void (*stbmv_)(const char *uplo, const char *trans, const char *diag, int *n, int *k, float *a, int *lda, float *x, int *incx); -void Java_dev_ludovic_netlib_blas_JNIBLAS_stbmvK(UNUSED JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring trans, jstring diag, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_stbmvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx) { jboolean failed = FALSE; - const char *nuplo = NULL, *ntrans = NULL, *ndiag = NULL; float *na = NULL, *nx = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - stbmv_(nuplo, ntrans, ndiag, &n, &k, na + offseta, &lda, nx + offsetx, &incx); + const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; float *__na = NULL; float *__nx = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + stbmv_(__nuplo, __ntrans, __ndiag, &n, &k, __na + offseta, &lda, __nx + offsetx, &incx); done: - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); - if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (failed) throwOOM(env); return; fail: @@ -1149,22 +1099,21 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_stbmvK(UNUSED JNIEnv *env, UNUSED jobj static void (*dtbsv_)(const char *uplo, const char *trans, const char *diag, int *n, int *k, double *a, int *lda, double *x, int *incx); -void Java_dev_ludovic_netlib_blas_JNIBLAS_dtbsvK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring trans, jstring diag, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_dtbsvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx) { jboolean failed = FALSE; - const char *nuplo = NULL, *ntrans = NULL, *ndiag = NULL; double *na = NULL, *nx = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - dtbsv_(nuplo, ntrans, ndiag, &n, &k, na + offseta, &lda, nx + offsetx, &incx); + const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; double *__na = NULL; double *__nx = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + dtbsv_(__nuplo, __ntrans, __ndiag, &n, &k, __na + offseta, &lda, __nx + offsetx, &incx); done: - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); - if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (failed) throwOOM(env); return; fail: @@ -1174,22 +1123,21 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_dtbsvK(JNIEnv *env, UNUSED jobject obj static void (*stbsv_)(const char *uplo, const char *trans, const char *diag, int *n, int *k, float *a, int *lda, float *x, int *incx); -void Java_dev_ludovic_netlib_blas_JNIBLAS_stbsvK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring trans, jstring diag, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_stbsvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx) { jboolean failed = FALSE; - const char *nuplo = NULL, *ntrans = NULL, *ndiag = NULL; float *na = NULL, *nx = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - stbsv_(nuplo, ntrans, ndiag, &n, &k, na + offseta, &lda, nx + offsetx, &incx); + const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; float *__na = NULL; float *__nx = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + stbsv_(__nuplo, __ntrans, __ndiag, &n, &k, __na + offseta, &lda, __nx + offsetx, &incx); done: - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); - if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (failed) throwOOM(env); return; fail: @@ -1199,22 +1147,21 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_stbsvK(JNIEnv *env, UNUSED jobject obj static void (*dtpmv_)(const char *uplo, const char *trans, const char *diag, int *n, double *a, double *x, int *incx); -void Java_dev_ludovic_netlib_blas_JNIBLAS_dtpmvK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring trans, jstring diag, jint n, jdoubleArray a, jint offseta, jdoubleArray x, jint offsetx, jint incx) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_dtpmvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jdoubleArray a, jint offseta, jdoubleArray x, jint offsetx, jint incx) { jboolean failed = FALSE; - const char *nuplo = NULL, *ntrans = NULL, *ndiag = NULL; double *na = NULL, *nx = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - dtpmv_(nuplo, ntrans, ndiag, &n, na + offseta, nx + offsetx, &incx); + const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; double *__na = NULL; double *__nx = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + dtpmv_(__nuplo, __ntrans, __ndiag, &n, __na + offseta, __nx + offsetx, &incx); done: - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); - if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (failed) throwOOM(env); return; fail: @@ -1224,22 +1171,21 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_dtpmvK(JNIEnv *env, UNUSED jobject obj static void (*stpmv_)(const char *uplo, const char *trans, const char *diag, int *n, float *a, float *x, int *incx); -void Java_dev_ludovic_netlib_blas_JNIBLAS_stpmvK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring trans, jstring diag, jint n, jfloatArray a, jint offseta, jfloatArray x, jint offsetx, jint incx) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_stpmvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jfloatArray a, jint offseta, jfloatArray x, jint offsetx, jint incx) { jboolean failed = FALSE; - const char *nuplo = NULL, *ntrans = NULL, *ndiag = NULL; float *na = NULL, *nx = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - stpmv_(nuplo, ntrans, ndiag, &n, na + offseta, nx + offsetx, &incx); + const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; float *__na = NULL; float *__nx = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + stpmv_(__nuplo, __ntrans, __ndiag, &n, __na + offseta, __nx + offsetx, &incx); done: - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); - if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (failed) throwOOM(env); return; fail: @@ -1249,22 +1195,21 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_stpmvK(JNIEnv *env, UNUSED jobject obj static void (*dtpsv_)(const char *uplo, const char *trans, const char *diag, int *n, double *a, double *x, int *incx); -void Java_dev_ludovic_netlib_blas_JNIBLAS_dtpsvK(JNIEnv *env, UNUSED jobject obj, - UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jdoubleArray x, UNUSED jint offsetx, UNUSED jint incx) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_dtpsvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jdoubleArray a, jint offseta, jdoubleArray x, jint offsetx, jint incx) { jboolean failed = FALSE; - const char *nuplo = NULL, *ntrans = NULL, *ndiag = NULL; double *na = NULL, *nx = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - dtpsv_(nuplo, ntrans, ndiag, &n, na + offseta, nx + offsetx, &incx); + const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; double *__na = NULL; double *__nx = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + dtpsv_(__nuplo, __ntrans, __ndiag, &n, __na + offseta, __nx + offsetx, &incx); done: - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); - if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (failed) throwOOM(env); return; fail: @@ -1274,22 +1219,21 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_dtpsvK(JNIEnv *env, UNUSED jobject obj static void (*stpsv_)(const char *uplo, const char *trans, const char *diag, int *n, float *a, float *x, int *incx); -void Java_dev_ludovic_netlib_blas_JNIBLAS_stpsvK(JNIEnv *env, UNUSED jobject obj, - UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jfloatArray x, UNUSED jint offsetx, UNUSED jint incx) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_stpsvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jfloatArray a, jint offseta, jfloatArray x, jint offsetx, jint incx) { jboolean failed = FALSE; - const char *nuplo = NULL, *ntrans = NULL, *ndiag = NULL; float *na = NULL, *nx = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - stpsv_(nuplo, ntrans, ndiag, &n, na + offseta, nx + offsetx, &incx); + const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; float *__na = NULL; float *__nx = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + stpsv_(__nuplo, __ntrans, __ndiag, &n, __na + offseta, __nx + offsetx, &incx); done: - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); - if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (failed) throwOOM(env); return; fail: @@ -1299,24 +1243,23 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_stpsvK(JNIEnv *env, UNUSED jobject obj static void (*dtrmm_)(const char *side, const char *uplo, const char *transa, const char *diag, int *m, int *n, double *alpha, double *a, int *lda, double *b, int *ldb); -void Java_dev_ludovic_netlib_blas_JNIBLAS_dtrmmK(JNIEnv *env, UNUSED jobject obj, - UNUSED jstring side, UNUSED jstring uplo, UNUSED jstring transa, UNUSED jstring diag, UNUSED jint m, UNUSED jint n, UNUSED jdouble alpha, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jdoubleArray b, UNUSED jint offsetb, UNUSED jint ldb) { - jboolean failed = FALSE; - const char *nside = NULL, *nuplo = NULL, *ntransa = NULL, *ndiag = NULL; double *na = NULL, *nb = NULL; - if (!(nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) goto fail; - if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - dtrmm_(nside, nuplo, ntransa, ndiag, &m, &n, &alpha, na + offseta, &lda, nb + offsetb, &ldb); -done: - if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, failed ? JNI_ABORT : 0); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); - if (ntransa) (*env)->ReleaseStringUTFChars(env, transa, ntransa); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); - if (nside) (*env)->ReleaseStringUTFChars(env, side, nside); +void Java_dev_ludovic_netlib_blas_JNIBLAS_dtrmmK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring uplo, jstring transa, jstring diag, jint m, jint n, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__nuplo = NULL; const char *__ntransa = NULL; const char *__ndiag = NULL; double *__na = NULL; double *__nb = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + dtrmm_(__nside, __nuplo, __ntransa, __ndiag, &m, &n, &alpha, __na + offseta, &lda, __nb + offsetb, &ldb); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntransa) (*env)->ReleaseStringUTFChars(env, transa, __ntransa); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); if (failed) throwOOM(env); return; fail: @@ -1326,24 +1269,23 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_dtrmmK(JNIEnv *env, UNUSED jobject obj static void (*strmm_)(const char *side, const char *uplo, const char *transa, const char *diag, int *m, int *n, float *alpha, float *a, int *lda, float *b, int *ldb); -void Java_dev_ludovic_netlib_blas_JNIBLAS_strmmK(JNIEnv *env, UNUSED jobject obj, - UNUSED jstring side, UNUSED jstring uplo, UNUSED jstring transa, UNUSED jstring diag, UNUSED jint m, UNUSED jint n, UNUSED jfloat alpha, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jfloatArray b, UNUSED jint offsetb, UNUSED jint ldb) { - jboolean failed = FALSE; - const char *nside = NULL, *nuplo = NULL, *ntransa = NULL, *ndiag = NULL; float *na = NULL, *nb = NULL; - if (!(nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) goto fail; - if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - strmm_(nside, nuplo, ntransa, ndiag, &m, &n, &alpha, na + offseta, &lda, nb + offsetb, &ldb); -done: - if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, failed ? JNI_ABORT : 0); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); - if (ntransa) (*env)->ReleaseStringUTFChars(env, transa, ntransa); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); - if (nside) (*env)->ReleaseStringUTFChars(env, side, nside); +void Java_dev_ludovic_netlib_blas_JNIBLAS_strmmK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring uplo, jstring transa, jstring diag, jint m, jint n, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__nuplo = NULL; const char *__ntransa = NULL; const char *__ndiag = NULL; float *__na = NULL; float *__nb = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + strmm_(__nside, __nuplo, __ntransa, __ndiag, &m, &n, &alpha, __na + offseta, &lda, __nb + offsetb, &ldb); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntransa) (*env)->ReleaseStringUTFChars(env, transa, __ntransa); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); if (failed) throwOOM(env); return; fail: @@ -1353,22 +1295,21 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_strmmK(JNIEnv *env, UNUSED jobject obj static void (*dtrmv_)(const char *uplo, const char *trans, const char *diag, int *n, double *a, int *lda, double *x, int *incx); -void Java_dev_ludovic_netlib_blas_JNIBLAS_dtrmvK(JNIEnv *env, UNUSED jobject obj, - UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jdoubleArray x, UNUSED jint offsetx, UNUSED jint incx) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_dtrmvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx) { jboolean failed = FALSE; - const char *nuplo = NULL, *ntrans = NULL, *ndiag = NULL; double *na = NULL, *nx = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - dtrmv_(nuplo, ntrans, ndiag, &n, na + offseta, &lda, nx + offsetx, &incx); + const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; double *__na = NULL; double *__nx = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + dtrmv_(__nuplo, __ntrans, __ndiag, &n, __na + offseta, &lda, __nx + offsetx, &incx); done: - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); - if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (failed) throwOOM(env); return; fail: @@ -1378,22 +1319,21 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_dtrmvK(JNIEnv *env, UNUSED jobject obj static void (*strmv_)(const char *uplo, const char *trans, const char *diag, int *n, float *a, int *lda, float *x, int *incx); -void Java_dev_ludovic_netlib_blas_JNIBLAS_strmvK(JNIEnv *env, UNUSED jobject obj, - UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jfloatArray x, UNUSED jint offsetx, UNUSED jint incx) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_strmvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx) { jboolean failed = FALSE; - const char *nuplo = NULL, *ntrans = NULL, *ndiag = NULL; float *na = NULL, *nx = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - strmv_(nuplo, ntrans, ndiag, &n, na + offseta, &lda, nx + offsetx, &incx); + const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; float *__na = NULL; float *__nx = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + strmv_(__nuplo, __ntrans, __ndiag, &n, __na + offseta, &lda, __nx + offsetx, &incx); done: - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); - if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (failed) throwOOM(env); return; fail: @@ -1403,24 +1343,23 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_strmvK(JNIEnv *env, UNUSED jobject obj static void (*dtrsm_)(const char *side, const char *uplo, const char *transa, const char *diag, int *m, int *n, double *alpha, double *a, int *lda, double *b, int *ldb); -void Java_dev_ludovic_netlib_blas_JNIBLAS_dtrsmK(JNIEnv *env, UNUSED jobject obj, - UNUSED jstring side, UNUSED jstring uplo, UNUSED jstring transa, UNUSED jstring diag, UNUSED jint m, UNUSED jint n, UNUSED jdouble alpha, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jdoubleArray b, UNUSED jint offsetb, UNUSED jint ldb) { - jboolean failed = FALSE; - const char *nside = NULL, *nuplo = NULL, *ntransa = NULL, *ndiag = NULL; double *na = NULL, *nb = NULL; - if (!(nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) goto fail; - if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - dtrsm_(nside, nuplo, ntransa, ndiag, &m, &n, &alpha, na + offseta, &lda, nb + offsetb, &ldb); -done: - if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, failed ? JNI_ABORT : 0); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); - if (ntransa) (*env)->ReleaseStringUTFChars(env, transa, ntransa); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); - if (nside) (*env)->ReleaseStringUTFChars(env, side, nside); +void Java_dev_ludovic_netlib_blas_JNIBLAS_dtrsmK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring uplo, jstring transa, jstring diag, jint m, jint n, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__nuplo = NULL; const char *__ntransa = NULL; const char *__ndiag = NULL; double *__na = NULL; double *__nb = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + dtrsm_(__nside, __nuplo, __ntransa, __ndiag, &m, &n, &alpha, __na + offseta, &lda, __nb + offsetb, &ldb); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntransa) (*env)->ReleaseStringUTFChars(env, transa, __ntransa); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); if (failed) throwOOM(env); return; fail: @@ -1430,24 +1369,23 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_dtrsmK(JNIEnv *env, UNUSED jobject obj static void (*strsm_)(const char *side, const char *uplo, const char *transa, const char *diag, int *m, int *n, float *alpha, float *a, int *lda, float *b, int *ldb); -void Java_dev_ludovic_netlib_blas_JNIBLAS_strsmK(JNIEnv *env, UNUSED jobject obj, - UNUSED jstring side, UNUSED jstring uplo, UNUSED jstring transa, UNUSED jstring diag, UNUSED jint m, UNUSED jint n, UNUSED jfloat alpha, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jfloatArray b, UNUSED jint offsetb, UNUSED jint ldb) { - jboolean failed = FALSE; - const char *nside = NULL, *nuplo = NULL, *ntransa = NULL, *ndiag = NULL; float *na = NULL, *nb = NULL; - if (!(nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) goto fail; - if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - strsm_(nside, nuplo, ntransa, ndiag, &m, &n, &alpha, na + offseta, &lda, nb + offsetb, &ldb); -done: - if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, failed ? JNI_ABORT : 0); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); - if (ntransa) (*env)->ReleaseStringUTFChars(env, transa, ntransa); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); - if (nside) (*env)->ReleaseStringUTFChars(env, side, nside); +void Java_dev_ludovic_netlib_blas_JNIBLAS_strsmK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring uplo, jstring transa, jstring diag, jint m, jint n, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__nuplo = NULL; const char *__ntransa = NULL; const char *__ndiag = NULL; float *__na = NULL; float *__nb = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + strsm_(__nside, __nuplo, __ntransa, __ndiag, &m, &n, &alpha, __na + offseta, &lda, __nb + offsetb, &ldb); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntransa) (*env)->ReleaseStringUTFChars(env, transa, __ntransa); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); if (failed) throwOOM(env); return; fail: @@ -1457,22 +1395,21 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_strsmK(JNIEnv *env, UNUSED jobject obj static void (*dtrsv_)(const char *uplo, const char *trans, const char *diag, int *n, double *a, int *lda, double *x, int *incx); -void Java_dev_ludovic_netlib_blas_JNIBLAS_dtrsvK(JNIEnv *env, UNUSED jobject obj, - UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jdoubleArray x, UNUSED jint offsetx, UNUSED jint incx) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_dtrsvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx) { jboolean failed = FALSE; - const char *nuplo = NULL, *ntrans = NULL, *ndiag = NULL; double *na = NULL, *nx = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - dtrsv_(nuplo, ntrans, ndiag, &n, na + offseta, &lda, nx + offsetx, &incx); + const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; double *__na = NULL; double *__nx = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + dtrsv_(__nuplo, __ntrans, __ndiag, &n, __na + offseta, &lda, __nx + offsetx, &incx); done: - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); - if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (failed) throwOOM(env); return; fail: @@ -1482,22 +1419,21 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_dtrsvK(JNIEnv *env, UNUSED jobject obj static void (*strsv_)(const char *uplo, const char *trans, const char *diag, int *n, float *a, int *lda, float *x, int *incx); -void Java_dev_ludovic_netlib_blas_JNIBLAS_strsvK(JNIEnv *env, UNUSED jobject obj, - UNUSED jstring uplo, UNUSED jstring trans, UNUSED jstring diag, UNUSED jint n, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jfloatArray x, UNUSED jint offsetx, UNUSED jint incx) { +void Java_dev_ludovic_netlib_blas_JNIBLAS_strsvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx) { jboolean failed = FALSE; - const char *nuplo = NULL, *ntrans = NULL, *ndiag = NULL; float *na = NULL, *nx = NULL; - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - strsv_(nuplo, ntrans, ndiag, &n, na + offseta, &lda, nx + offsetx, &incx); + const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; float *__na = NULL; float *__nx = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + strsv_(__nuplo, __ntrans, __ndiag, &n, __na + offseta, &lda, __nx + offsetx, &incx); done: - if (nx) (*env)->ReleasePrimitiveArrayCritical(env, x, nx, failed ? JNI_ABORT : 0); - if (na) (*env)->ReleasePrimitiveArrayCritical(env, a, na, JNI_ABORT); - if (ndiag) (*env)->ReleaseStringUTFChars(env, diag, ndiag); - if (ntrans) (*env)->ReleaseStringUTFChars(env, trans, ntrans); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (failed) throwOOM(env); return; fail: @@ -1507,18 +1443,17 @@ void Java_dev_ludovic_netlib_blas_JNIBLAS_strsvK(JNIEnv *env, UNUSED jobject obj static int (*idamax_)(int *n, double *dx, int *incdx); -jint Java_dev_ludovic_netlib_blas_JNIBLAS_idamaxK(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray dx, jint offsetdx, jint incdx) { - jint ret; +jint Java_dev_ludovic_netlib_blas_JNIBLAS_idamaxK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray dx, jint offsetdx, jint incdx) { + jint __ret; jboolean failed = FALSE; - double *ndx = NULL; - if (!(ndx = (*env)->GetPrimitiveArrayCritical(env, dx, NULL))) goto fail; + double *__ndx = NULL; + if (!(__ndx = (*env)->GetPrimitiveArrayCritical(env, dx, NULL))) goto fail; /* It returns 1-based index because that's how Fortran works */ - ret = idamax_(&n, ndx + offsetdx, &incdx) - 1; + __ret = idamax_(&n, __ndx + offsetdx, &incdx) - 1; done: - if (ndx) (*env)->ReleasePrimitiveArrayCritical(env, dx, ndx, JNI_ABORT); + if (__ndx) (*env)->ReleasePrimitiveArrayCritical(env, dx, __ndx, JNI_ABORT); if (failed) throwOOM(env); - return ret; + return __ret; fail: failed = TRUE; goto done; @@ -1526,18 +1461,17 @@ jint Java_dev_ludovic_netlib_blas_JNIBLAS_idamaxK(JNIEnv *env, UNUSED jobject ob static int (*isamax_)(int *n, float *sx, int *incsx); -jint Java_dev_ludovic_netlib_blas_JNIBLAS_isamaxK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray sx, jint offsetsx, jint incsx) { - jint ret; +jint Java_dev_ludovic_netlib_blas_JNIBLAS_isamaxK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray sx, jint offsetsx, jint incsx) { + jint __ret; jboolean failed = FALSE; - float *nsx = NULL; - if (!(nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto fail; + float *__nsx = NULL; + if (!(__nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto fail; /* It returns 1-based index because that's how Fortran works */ - ret = isamax_(&n, nsx + offsetsx, &incsx) - 1; + __ret = isamax_(&n, __nsx + offsetsx, &incsx) - 1; done: - if (nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, nsx, JNI_ABORT); + if (__nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, __nsx, JNI_ABORT); if (failed) throwOOM(env); - return ret; + return __ret; fail: failed = TRUE; goto done; diff --git a/generator.py b/generator.py new file mode 100644 index 00000000..f56a1b21 --- /dev/null +++ b/generator.py @@ -0,0 +1,1070 @@ + +import sys + +class JBooleanR: + def __init__(self): + self.native_type = "int" + self.java_type = "jboolean" +class JIntR: + def __init__(self): + self.native_type = "int" + self.java_type = "jint" +class JFloatR: + def __init__(self): + self.native_type = "float" + self.java_type = "jfloat" +class JDoubleR: + def __init__(self): + self.native_type = "double" + self.java_type = "jdouble" + +class JBoolean: + def __init__(self, name): + self.idx = 0 + self.name = name + self.native_type_and_name = "int *{name}".format(name=name) + self.java_type_and_name = "jboolean {name}".format(name=name) + self.native_argument = "&__n{name}".format(name=name) + self.native_local = "int __n{name}".format(name=name) + self.prolog = "__n{name} = {name};".format(name=name) + self.epilog = "if (!failed) {name} = __n{name};".format(name=name) +class JInt: + def __init__(self, name): + self.idx = 0 + self.name = name + self.native_type_and_name = "int *{name}".format(name=name) + self.java_type_and_name = "jint {name}".format(name=name) + self.native_argument = "&{name}".format(name=name) + self.native_local = "" + self.prolog = "" + self.epilog = "" +class JFloat: + def __init__(self, name): + self.idx = 0 + self.name = name + self.native_type_and_name = "float *{name}".format(name=name) + self.java_type_and_name = "jfloat {name}".format(name=name) + self.native_argument = "&{name}".format(name=name) + self.native_local = "" + self.prolog = "" + self.epilog = "" +class JDouble: + def __init__(self, name): + self.idx = 0 + self.name = name + self.native_type_and_name = "double *{name}".format(name=name) + self.java_type_and_name = "jdouble {name}".format(name=name) + self.native_argument = "&{name}".format(name=name) + self.native_local = "" + self.prolog = "" + self.epilog = "" +class JString: + def __init__(self, name): + self.idx = 0 + self.name = name + self.native_type_and_name = "const char *{name}".format(name=name) + self.java_type_and_name = "jstring {name}".format(name=name) + self.native_argument = "__n{name}".format(name=name) + self.native_local = "const char *__n{name} = NULL".format(name=name) + self.prolog = "if (!(__n{name} = (*env)->GetStringUTFChars(env, {name}, NULL))) goto fail;".format(name=name) + self.epilog = "if (__n{name}) (*env)->ReleaseStringUTFChars(env, {name}, __n{name});".format(name=name) + +class JBooleanW: + def __init__(self, name): + self.idx = 0 + self.name = name + self.native_type_and_name = "int *{name}".format(name=name) + self.java_type_and_name = "jobject {name}".format(name=name) + self.native_argument = "&__n{name}".format(name=name) + self.native_local = "int __n{name} = 0".format(name=name) + self.prolog = "__n{name} = (*env)->GetBooleanField(env, {name}, booleanW_val_fieldID);".format(name=name) + self.epilog = "if (!failed) (*env)->SetBooleanField(env, {name}, booleanW_val_fieldID, __n{name});".format(name=name) +class JIntW: + def __init__(self, name): + self.idx = 0 + self.name = name + self.native_type_and_name = "int *{name}".format(name=name) + self.java_type_and_name = "jobject {name}".format(name=name) + self.native_argument = "&__n{name}".format(name=name) + self.native_local = "int __n{name} = 0".format(name=name) + self.prolog = "__n{name} = (*env)->GetIntField(env, {name}, intW_val_fieldID);".format(name=name) + self.epilog = "if (!failed) (*env)->SetIntField(env, {name}, intW_val_fieldID, __n{name});".format(name=name) +class JFloatW: + def __init__(self, name): + self.idx = 0 + self.name = name + self.native_type_and_name = "float *{name}".format(name=name) + self.java_type_and_name = "jobject {name}".format(name=name) + self.native_argument = "&__n{name}".format(name=name) + self.native_local = "float __n{name} = 0".format(name=name) + self.prolog = "__n{name} = (*env)->GetFloatField(env, {name}, floatW_val_fieldID);".format(name=name) + self.epilog = "if (!failed) (*env)->SetFloatField(env, {name}, floatW_val_fieldID, __n{name});".format(name=name) +class JDoubleW: + def __init__(self, name): + self.idx = 0 + self.name = name + self.native_type_and_name = "double *{name}".format(name=name) + self.java_type_and_name = "jobject {name}".format(name=name) + self.native_argument = "&__n{name}".format(name=name) + self.native_local = "double __n{name} = 0".format(name=name) + self.prolog = "__n{name} = (*env)->GetDoubleField(env, {name}, doubleW_val_fieldID);".format(name=name) + self.epilog = "if (!failed) (*env)->SetDoubleField(env, {name}, doubleW_val_fieldID, __n{name});".format(name=name) +class JStringW: + def __init__(self, name): + self.idx = 0 + self.name = name + self.native_type_and_name = "char *{name}".format(name=name) + self.java_type_and_name = "jobject {name}".format(name=name) + self.native_argument = "__n{name}".format(name=name) + self.native_local = "char *__n{name} = NULL; jstring __j{name} = NULL;".format(name=name) + self.prolog = "__j{name} = (jstring)(*env)->GetObjectField(env, {name}, StringW_val_fieldID); if (!(__n{name} = (char*)(*env)->GetStringUTFChars(env, {name}, NULL))) goto fail;".format(name=name) + self.epilog = "if (__n{name}) {{ (*env)->ReleaseStringUTFChars(env, __j{name}, (const char*)__n{name}); if (!failed) (*env)->SetObjectField(env, {name}, StringW_val_fieldID, __j{name}); }}".format(name=name) + +class JBooleanArray: + def __init__(self, name): + self.idx = 1 + self.name = name + self.native_type_and_name = "int *{name}".format(name=name) + self.java_type_and_name = "jbooleanArray {name}, jint offset{name}".format(name=name) + self.native_argument = "__n{name} + offset{name}".format(name=name) + self.native_local = "jboolean *__j{name} = NULL; int *__n{name} = NULL".format(name=name) + self.prolog = "if (!(__j{name} = (*env)->GetPrimitiveArrayCritical(env, {name}, NULL))) {{ goto fail; }} do {{ int length = (*env)->GetArrayLength(env, {name}); if (length <= 0) goto fail; if (!(__n{name} = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) {{ __n{name}[i] = __j{name}[i]; }} }} while(0);".format(name=name) + self.epilog = "if (__n{name}) {{ free(__n{name}); }} if (__j{name}) (*env)->ReleasePrimitiveArrayCritical(env, {name}, __n{name}, JNI_ABORT);".format(name=name) +class JIntArray: + def __init__(self, name, mode = "0"): + self.idx = 1 + self.name = name + self.native_type_and_name = "int *{name}".format(name=name) + self.java_type_and_name = "jintArray {name}, jint offset{name}".format(name=name) + self.native_argument = "__n{name} + offset{name}".format(name=name) + self.native_local = "int *__n{name} = NULL".format(name=name) + self.prolog = "if (!(__n{name} = (*env)->GetPrimitiveArrayCritical(env, {name}, NULL))) goto fail;".format(name=name) + self.epilog = "if (__n{name}) (*env)->ReleasePrimitiveArrayCritical(env, {name}, __n{name}, {mode});".format(name=name, mode=("JNI_ABORT" if mode == "JNI_ABORT" else ("failed ? JNI_ABORT : %s" % mode))) +class JFloatArray: + def __init__(self, name, mode = "0"): + self.idx = 1 + self.name = name + self.native_type_and_name = "float *{name}".format(name=name) + self.java_type_and_name = "jfloatArray {name}, jint offset{name}".format(name=name) + self.native_argument = "__n{name} + offset{name}".format(name=name) + self.native_local = "float *__n{name} = NULL".format(name=name) + self.prolog = "if (!(__n{name} = (*env)->GetPrimitiveArrayCritical(env, {name}, NULL))) goto fail;".format(name=name) + self.epilog = "if (__n{name}) (*env)->ReleasePrimitiveArrayCritical(env, {name}, __n{name}, {mode});".format(name=name, mode=("JNI_ABORT" if mode == "JNI_ABORT" else ("failed ? JNI_ABORT : %s" % mode))) +class JDoubleArray: + def __init__(self, name, mode = "0"): + self.idx = 1 + self.name = name + self.native_type_and_name = "double *{name}".format(name=name) + self.java_type_and_name = "jdoubleArray {name}, jint offset{name}".format(name=name) + self.native_argument = "__n{name} + offset{name}".format(name=name) + self.native_local = "double *__n{name} = NULL".format(name=name) + self.prolog = "if (!(__n{name} = (*env)->GetPrimitiveArrayCritical(env, {name}, NULL))) goto fail;".format(name=name) + self.epilog = "if (__n{name}) (*env)->ReleasePrimitiveArrayCritical(env, {name}, __n{name}, {mode});".format(name=name, mode=("JNI_ABORT" if mode == "JNI_ABORT" else ("failed ? JNI_ABORT : %s" % mode))) + +def routine_r(pkg, ret, name, *args): + # Print native function signature + print("static {ret} (*{name}_)({args});".format(ret=ret.native_type, name=name, args=", ".join([arg.native_type_and_name for arg in args]))) + print() + # Print JNI function implementation + print("{ret} Java_dev_ludovic_netlib_{pkg}_JNI{pkgupper}_{name}K(JNIEnv *env, UNUSED jobject obj{args}) {{".format(ret=ret.java_type, pkg=pkg, pkgupper=pkg.upper(), name=name, args="".join([", " + arg.java_type_and_name for arg in args]))) + print(" {rettype} __ret;".format(rettype=ret.java_type)) + print(" jboolean failed = FALSE;") + if len(args) > 0: + print(" " + " ".join([a + ";" for a in [arg.native_local for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0])) + print("\n".join([" " + a for a in [arg.prolog for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0])) + print(" __ret = {name}_({args});".format(name=name, args=", ".join([arg.native_argument for arg in args]))) + print("done:") + print("\n".join([" " + a for a in [arg.epilog for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0][::-1])) + print(" if (failed) throwOOM(env);") + print(" return __ret;") + print("fail:") + print(" failed = TRUE;") + print(" goto done;") + print("}") + print() + +def routine(pkg, name, *args): + # Print native function signature + print("static void (*{name}_)({args});".format(name=name, args=", ".join([arg.native_type_and_name for arg in args]))) + print() + # Print JNI function implementation + print("void Java_dev_ludovic_netlib_{pkg}_JNI{pkgupper}_{name}K(JNIEnv *env, UNUSED jobject obj{args}) {{".format(pkg=pkg, pkgupper=pkg.upper(), name=name, args="".join([", " + arg.java_type_and_name for arg in args]))) + print(" jboolean failed = FALSE;") + if len(args) > 0: + print(" " + " ".join([a + ";" for a in [arg.native_local for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0])) + print("\n".join([" " + a for a in [arg.prolog for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0])) + print(" {name}_({args});".format(name=name, args=", ".join([arg.native_argument for arg in args]))) + print("done:") + print("\n".join([" " + a for a in [arg.epilog for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0][::-1])) + print(" if (failed) throwOOM(env);") + print(" return;") + print("fail:") + print(" failed = TRUE;") + print(" goto done;") + print("}") + print() + +# Copy from Java + +# $> [] +# $< Array + +# $> (, (int|float|double)Array [a-zA-Z0-9]+), int offset[a-zA-Z0-9]+ +# $< $1 + +# $> ((boolean|int|float|double|String|java.lang.Object|org.netlib.util.(boolean|int|float|double|String)W)(Array)?) ([a-z0-9]+) +# $< $1("$5") + +if sys.argv[1] == "blas": + routine_r("blas", JDoubleR(), "dasum", JInt("n"), JDoubleArray("x", "JNI_ABORT"), JInt("incx")) + routine_r("blas", JFloatR(), "sasum", JInt("n"), JFloatArray("x", "JNI_ABORT"), JInt("incx")) + routine ("blas", "daxpy", JInt("n"), JDouble("alpha"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("y"), JInt("incy")) + routine ("blas", "saxpy", JInt("n"), JFloat("alpha"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("y"), JInt("incy")) + routine ("blas", "dcopy", JInt("n"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("y"), JInt("incy")) + routine ("blas", "scopy", JInt("n"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("y"), JInt("incy")) + routine_r("blas", JDoubleR(), "ddot", JInt("n"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("y", "JNI_ABORT"), JInt("incy")) + routine_r("blas", JFloatR(), "sdot", JInt("n"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("y", "JNI_ABORT"), JInt("incy")) + routine_r("blas", JFloatR(), "sdsdot", JInt("n"), JFloat("sb"), JFloatArray("sx", "JNI_ABORT"), JInt("incsx"), JFloatArray("sy", "JNI_ABORT"), JInt("incsy")) + routine ("blas", "dgbmv", JString("trans"), JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDouble("beta"), JDoubleArray("y"), JInt("incy")) + routine ("blas", "sgbmv", JString("trans"), JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloat("beta"), JFloatArray("y"), JInt("incy")) + routine ("blas", "dgemm", JString("transa"), JString("transb"), JInt("m"), JInt("n"), JInt("k"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("b", "JNI_ABORT"), JInt("ldb"), JDouble("beta"), JDoubleArray("c"), JInt("ldc")) + routine ("blas", "sgemm", JString("transa"), JString("transb"), JInt("m"), JInt("n"), JInt("k"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("b", "JNI_ABORT"), JInt("ldb"), JFloat("beta"), JFloatArray("c"), JInt("ldc")) + routine ("blas", "dgemv", JString("trans"), JInt("m"), JInt("n"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDouble("beta"), JDoubleArray("y"), JInt("incy")) + routine ("blas", "sgemv", JString("trans"), JInt("m"), JInt("n"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloat("beta"), JFloatArray("y"), JInt("incy")) + routine ("blas", "dger", JInt("m"), JInt("n"), JDouble("alpha"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("y", "JNI_ABORT"), JInt("incy"), JDoubleArray("a"), JInt("lda")) + routine ("blas", "sger", JInt("m"), JInt("n"), JFloat("alpha"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("y", "JNI_ABORT"), JInt("incy"), JFloatArray("a"), JInt("lda")) + routine_r("blas", JDoubleR(), "dnrm2", JInt("n"), JDoubleArray("x", "JNI_ABORT"), JInt("incx")) + routine_r("blas", JFloatR(), "snrm2", JInt("n"), JFloatArray("x", "JNI_ABORT"), JInt("incx")) + routine ("blas", "drot", JInt("n"), JDoubleArray("dx"), JInt("incx"), JDoubleArray("dy"), JInt("incy"), JDouble("c"), JDouble("s")) + routine ("blas", "srot", JInt("n"), JFloatArray("sx"), JInt("incx"), JFloatArray("sy"), JInt("incy"), JFloat("c"), JFloat("s")) + routine ("blas", "drotm", JInt("n"), JDoubleArray("dx", "JNI_ABORT"), JInt("incx"), JDoubleArray("dy"), JInt("incy"), JDoubleArray("dparam", "JNI_ABORT")) + routine ("blas", "srotm", JInt("n"), JFloatArray("sx", "JNI_ABORT"), JInt("incx"), JFloatArray("sy"), JInt("incy"), JFloatArray("sparam", "JNI_ABORT")) + routine ("blas", "drotmg", JDoubleW("dd1"), JDoubleW("dd2"), JDoubleW("dx1"), JDouble("dy1"), JDoubleArray("dparam", "JNI_ABORT")) + routine ("blas", "srotmg", JFloatW("sd1"), JFloatW("sd2"), JFloatW("sx1"), JFloat("sy1"), JFloatArray("sparam", "JNI_ABORT")) + routine ("blas", "dsbmv", JString("uplo"), JInt("n"), JInt("k"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDouble("beta"), JDoubleArray("y"), JInt("incy")) + routine ("blas", "ssbmv", JString("uplo"), JInt("n"), JInt("k"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloat("beta"), JFloatArray("y"), JInt("incy")) + routine ("blas", "dscal", JInt("n"), JDouble("alpha"), JDoubleArray("x"), JInt("incx")) + routine ("blas", "sscal", JInt("n"), JFloat("alpha"), JFloatArray("x"), JInt("incx")) + routine ("blas", "dspmv", JString("uplo"), JInt("n"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDouble("beta"), JDoubleArray("y"), JInt("incy")) + routine ("blas", "sspmv", JString("uplo"), JInt("n"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloat("beta"), JFloatArray("y"), JInt("incy")) + routine ("blas", "dspr", JString("uplo"), JInt("n"), JDouble("alpha"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("a")) + routine ("blas", "sspr", JString("uplo"), JInt("n"), JFloat("alpha"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("a")) + routine ("blas", "dspr2", JString("uplo"), JInt("n"), JDouble("alpha"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("y", "JNI_ABORT"), JInt("incy"), JDoubleArray("a")) + routine ("blas", "sspr2", JString("uplo"), JInt("n"), JFloat("alpha"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("y", "JNI_ABORT"), JInt("incy"), JFloatArray("a")) + routine ("blas", "dswap", JInt("n"), JDoubleArray("x"), JInt("incx"), JDoubleArray("y"), JInt("incy")) + routine ("blas", "sswap", JInt("n"), JFloatArray("x"), JInt("incx"), JFloatArray("y"), JInt("incy")) + routine ("blas", "dsymm", JString("side"), JString("uplo"), JInt("m"), JInt("n"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("b", "JNI_ABORT"), JInt("ldb"), JDouble("beta"), JDoubleArray("c"), JInt("ldc")) + routine ("blas", "ssymm", JString("side"), JString("uplo"), JInt("m"), JInt("n"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("b", "JNI_ABORT"), JInt("ldb"), JFloat("beta"), JFloatArray("c"), JInt("ldc")) + routine ("blas", "dsymv", JString("uplo"), JInt("n"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDouble("beta"), JDoubleArray("y"), JInt("incy")) + routine ("blas", "ssymv", JString("uplo"), JInt("n"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloat("beta"), JFloatArray("y"), JInt("incy")) + routine ("blas", "dsyr", JString("uplo"), JInt("n"), JDouble("alpha"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("a"), JInt("lda")) + routine ("blas", "ssyr", JString("uplo"), JInt("n"), JFloat("alpha"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("a"), JInt("lda")) + routine ("blas", "dsyr2", JString("uplo"), JInt("n"), JDouble("alpha"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("y", "JNI_ABORT"), JInt("incy"), JDoubleArray("a"), JInt("lda")) + routine ("blas", "ssyr2", JString("uplo"), JInt("n"), JFloat("alpha"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("y", "JNI_ABORT"), JInt("incy"), JFloatArray("a"), JInt("lda")) + routine ("blas", "dsyr2k", JString("uplo"), JString("trans"), JInt("n"), JInt("k"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("b", "JNI_ABORT"), JInt("ldb"), JDouble("beta"), JDoubleArray("c"), JInt("ldc")) + routine ("blas", "ssyr2k", JString("uplo"), JString("trans"), JInt("n"), JInt("k"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("b", "JNI_ABORT"), JInt("ldb"), JFloat("beta"), JFloatArray("c"), JInt("ldc")) + routine ("blas", "dsyrk", JString("uplo"), JString("trans"), JInt("n"), JInt("k"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDouble("beta"), JDoubleArray("c"), JInt("ldc")) + routine ("blas", "ssyrk", JString("uplo"), JString("trans"), JInt("n"), JInt("k"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloat("beta"), JFloatArray("c"), JInt("ldc")) + routine ("blas", "dtbmv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("k"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x"), JInt("incx")) + routine ("blas", "stbmv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("k"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x"), JInt("incx")) + routine ("blas", "dtbsv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("k"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x"), JInt("incx")) + routine ("blas", "stbsv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("k"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x"), JInt("incx")) + routine ("blas", "dtpmv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JDoubleArray("a", "JNI_ABORT"), JDoubleArray("x"), JInt("incx")) + routine ("blas", "stpmv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JFloatArray("a", "JNI_ABORT"), JFloatArray("x"), JInt("incx")) + routine ("blas", "dtpsv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JDoubleArray("a", "JNI_ABORT"), JDoubleArray("x"), JInt("incx")) + routine ("blas", "stpsv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JFloatArray("a", "JNI_ABORT"), JFloatArray("x"), JInt("incx")) + routine ("blas", "dtrmm", JString("side"), JString("uplo"), JString("transa"), JString("diag"), JInt("m"), JInt("n"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("b"), JInt("ldb")) + routine ("blas", "strmm", JString("side"), JString("uplo"), JString("transa"), JString("diag"), JInt("m"), JInt("n"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("b"), JInt("ldb")) + routine ("blas", "dtrmv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x"), JInt("incx")) + routine ("blas", "strmv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x"), JInt("incx")) + routine ("blas", "dtrsm", JString("side"), JString("uplo"), JString("transa"), JString("diag"), JInt("m"), JInt("n"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("b"), JInt("ldb")) + routine ("blas", "strsm", JString("side"), JString("uplo"), JString("transa"), JString("diag"), JInt("m"), JInt("n"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("b"), JInt("ldb")) + routine ("blas", "dtrsv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x"), JInt("incx")) + routine ("blas", "strsv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x"), JInt("incx")) + routine_r("blas", JIntR(), "idamax", JInt("n"), JDoubleArray("dx", "JNI_ABORT"), JInt("incdx")) + routine_r("blas", JIntR(), "isamax", JInt("n"), JFloatArray("sx", "JNI_ABORT"), JInt("incsx")) + +if sys.argv[1] == "arpack": + routine ("arpack", "dmout", JInt("lout"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JInt("idigit"), JString("ifmt")) + routine ("arpack", "smout", JInt("lout"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JInt("idigit"), JString("ifmt")) + routine ("arpack", "dvout", JInt("lout"), JInt("n"), JDoubleArray("sx"), JInt("idigit"), JString("ifmt")) + routine ("arpack", "svout", JInt("lout"), JInt("n"), JFloatArray("sx"), JInt("idigit"), JString("ifmt")) + routine ("arpack", "ivout", JInt("lout"), JInt("n"), JIntArray("ix"), JInt("idigit"), JString("ifmt")) + routine ("arpack", "dgetv0", JIntW("ido"), JString("bmat"), JInt("itry"), JBoolean("initv"), JInt("n"), JInt("j"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("resid"), JDoubleW("rnorm"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("ierr")) + routine ("arpack", "sgetv0", JIntW("ido"), JString("bmat"), JInt("itry"), JBoolean("initv"), JInt("n"), JInt("j"), JFloatArray("v"), JInt("ldv"), JFloatArray("resid"), JFloatW("rnorm"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("ierr")) + # routine ("arpack", "dlaqrb", JBoolean("wantt"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("z"), JIntW("info")) + # routine ("arpack", "slaqrb", JBoolean("wantt"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("z"), JIntW("info")) + routine ("arpack", "dnaitr", JIntW("ido"), JString("bmat"), JInt("n"), JInt("k"), JInt("np"), JInt("nb"), JDoubleArray("resid"), JDoubleW("rnorm"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("info")) + routine ("arpack", "snaitr", JIntW("ido"), JString("bmat"), JInt("n"), JInt("k"), JInt("np"), JInt("nb"), JFloatArray("resid"), JFloatW("rnorm"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("info")) + routine ("arpack", "dnapps", JInt("n"), JIntW("kev"), JInt("np"), JDoubleArray("shiftr"), JDoubleArray("shifti"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("resid"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workl"), JDoubleArray("workd")) + routine ("arpack", "snapps", JInt("n"), JIntW("kev"), JInt("np"), JFloatArray("shiftr"), JFloatArray("shifti"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JFloatArray("resid"), JFloatArray("q"), JInt("ldq"), JFloatArray("workl"), JFloatArray("workd")) + routine ("arpack", "dnaup2", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JIntW("np"), JDouble("tol"), JDoubleArray("resid"), JInt("mode"), JInt("iupd"), JInt("ishift"), JIntW("mxiter"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("ritzr"), JDoubleArray("ritzi"), JDoubleArray("bounds"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workl"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("info")) + routine ("arpack", "snaup2", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JIntW("np"), JFloat("tol"), JFloatArray("resid"), JInt("mode"), JInt("iupd"), JInt("ishift"), JIntW("mxiter"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JFloatArray("ritzr"), JFloatArray("ritzi"), JFloatArray("bounds"), JFloatArray("q"), JInt("ldq"), JFloatArray("workl"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("info")) + routine ("arpack", "dnaupd", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JInt("nev"), JDoubleW("tol"), JDoubleArray("resid"), JInt("ncv"), JDoubleArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JDoubleArray("workd"), JDoubleArray("workl"), JInt("lworkl"), JIntW("info")) + routine ("arpack", "snaupd", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JInt("nev"), JFloatW("tol"), JFloatArray("resid"), JInt("ncv"), JFloatArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JFloatArray("workd"), JFloatArray("workl"), JInt("lworkl"), JIntW("info")) + routine ("arpack", "dnconv", JInt("n"), JDoubleArray("ritzr"), JDoubleArray("ritzi"), JDoubleArray("bounds"), JDouble("tol"), JIntW("nconv")) + routine ("arpack", "snconv", JInt("n"), JFloatArray("ritzr"), JFloatArray("ritzi"), JFloatArray("bounds"), JFloat("tol"), JIntW("nconv")) + routine ("arpack", "dsconv", JInt("n"), JDoubleArray("ritz"), JDoubleArray("bounds"), JDouble("tol"), JIntW("nconv")) + routine ("arpack", "ssconv", JInt("n"), JFloatArray("ritz"), JFloatArray("bounds"), JFloat("tol"), JIntW("nconv")) + routine ("arpack", "dneigh", JDouble("rnorm"), JIntW("n"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("ritzr"), JDoubleArray("ritzi"), JDoubleArray("bounds"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workl"), JIntW("ierr")) + routine ("arpack", "sneigh", JFloat("rnorm"), JIntW("n"), JFloatArray("h"), JInt("ldh"), JFloatArray("ritzr"), JFloatArray("ritzi"), JFloatArray("bounds"), JFloatArray("q"), JInt("ldq"), JFloatArray("workl"), JIntW("ierr")) + routine ("arpack", "dneupd", JBoolean("rvec"), JString("howmny"), JBooleanArray("select"), JDoubleArray("dr"), JDoubleArray("di"), JDoubleArray("z"), JInt("ldz"), JDouble("sigmar"), JDouble("sigmai"), JDoubleArray("workev"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JDouble("tol"), JDoubleArray("resid"), JInt("ncv"), JDoubleArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JDoubleArray("workd"), JDoubleArray("workl"), JInt("lworkl"), JIntW("info")) + routine ("arpack", "sneupd", JBoolean("rvec"), JString("howmny"), JBooleanArray("select"), JFloatArray("dr"), JFloatArray("di"), JFloatArray("z"), JInt("ldz"), JFloat("sigmar"), JFloat("sigmai"), JFloatArray("workev"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JFloat("tol"), JFloatArray("resid"), JInt("ncv"), JFloatArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JFloatArray("workd"), JFloatArray("workl"), JInt("lworkl"), JIntW("info")) + routine ("arpack", "dngets", JInt("ishift"), JString("which"), JIntW("kev"), JIntW("np"), JDoubleArray("ritzr"), JDoubleArray("ritzi"), JDoubleArray("bounds"), JDoubleArray("shiftr"), JDoubleArray("shifti")) + routine ("arpack", "sngets", JInt("ishift"), JString("which"), JIntW("kev"), JIntW("np"), JFloatArray("ritzr"), JFloatArray("ritzi"), JFloatArray("bounds"), JFloatArray("shiftr"), JFloatArray("shifti")) + routine ("arpack", "dsaitr", JIntW("ido"), JString("bmat"), JInt("n"), JInt("k"), JInt("np"), JInt("mode"), JDoubleArray("resid"), JDoubleW("rnorm"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("info")) + routine ("arpack", "ssaitr", JIntW("ido"), JString("bmat"), JInt("n"), JInt("k"), JInt("np"), JInt("mode"), JFloatArray("resid"), JFloatW("rnorm"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("info")) + routine ("arpack", "dsapps", JInt("n"), JInt("kev"), JInt("np"), JDoubleArray("shift"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("resid"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workd")) + routine ("arpack", "ssapps", JInt("n"), JInt("kev"), JInt("np"), JFloatArray("shift"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JFloatArray("resid"), JFloatArray("q"), JInt("ldq"), JFloatArray("workd")) + routine ("arpack", "dsaup2", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JIntW("np"), JDouble("tol"), JDoubleArray("resid"), JInt("mode"), JInt("iupd"), JInt("ishift"), JIntW("mxiter"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("ritz"), JDoubleArray("bounds"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workl"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("info")) + routine ("arpack", "ssaup2", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JIntW("np"), JFloat("tol"), JFloatArray("resid"), JInt("mode"), JInt("iupd"), JInt("ishift"), JIntW("mxiter"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JFloatArray("ritz"), JFloatArray("bounds"), JFloatArray("q"), JInt("ldq"), JFloatArray("workl"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("info")) + routine ("arpack", "dseigt", JDouble("rnorm"), JInt("n"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("eig"), JDoubleArray("bounds"), JDoubleArray("workl"), JIntW("ierr")) + routine ("arpack", "sseigt", JFloat("rnorm"), JInt("n"), JFloatArray("h"), JInt("ldh"), JFloatArray("eig"), JFloatArray("bounds"), JFloatArray("workl"), JIntW("ierr")) + routine ("arpack", "dsesrt", JString("which"), JBoolean("apply"), JInt("n"), JDoubleArray("x"), JInt("na"), JDoubleArray("a"), JInt("lda")) + routine ("arpack", "ssesrt", JString("which"), JBoolean("apply"), JInt("n"), JFloatArray("x"), JInt("na"), JFloatArray("a"), JInt("lda")) + routine ("arpack", "dsaupd", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JInt("nev"), JDoubleW("tol"), JDoubleArray("resid"), JInt("ncv"), JDoubleArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JDoubleArray("workd"), JDoubleArray("workl"), JInt("lworkl"), JIntW("info")) + routine ("arpack", "ssaupd", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JInt("nev"), JFloatW("tol"), JFloatArray("resid"), JInt("ncv"), JFloatArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JFloatArray("workd"), JFloatArray("workl"), JInt("lworkl"), JIntW("info")) + routine ("arpack", "dseupd", JBoolean("rvec"), JString("howmny"), JBooleanArray("select"), JDoubleArray("d"), JDoubleArray("z"), JInt("ldz"), JDouble("sigma"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JDouble("tol"), JDoubleArray("resid"), JInt("ncv"), JDoubleArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JDoubleArray("workd"), JDoubleArray("workl"), JInt("lworkl"), JIntW("info")) + routine ("arpack", "sseupd", JBoolean("rvec"), JString("howmny"), JBooleanArray("select"), JFloatArray("d"), JFloatArray("z"), JInt("ldz"), JFloat("sigma"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JFloat("tol"), JFloatArray("resid"), JInt("ncv"), JFloatArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JFloatArray("workd"), JFloatArray("workl"), JInt("lworkl"), JIntW("info")) + routine ("arpack", "dsgets", JInt("ishift"), JString("which"), JIntW("kev"), JIntW("np"), JDoubleArray("ritz"), JDoubleArray("bounds"), JDoubleArray("shifts")) + routine ("arpack", "ssgets", JInt("ishift"), JString("which"), JIntW("kev"), JIntW("np"), JFloatArray("ritz"), JFloatArray("bounds"), JFloatArray("shifts")) + routine ("arpack", "dsortc", JString("which"), JBoolean("apply"), JInt("n"), JDoubleArray("xreal"), JDoubleArray("ximag"), JDoubleArray("y")) + routine ("arpack", "ssortc", JString("which"), JBoolean("apply"), JInt("n"), JFloatArray("xreal"), JFloatArray("ximag"), JFloatArray("y")) + routine ("arpack", "dsortr", JString("which"), JBoolean("apply"), JInt("n"), JDoubleArray("x1"), JDoubleArray("x2")) + routine ("arpack", "ssortr", JString("which"), JBoolean("apply"), JInt("n"), JFloatArray("x1"), JFloatArray("x2")) + routine ("arpack", "dstatn") + routine ("arpack", "sstatn") + routine ("arpack", "dstats") + routine ("arpack", "sstats") + routine ("arpack", "dstqrb", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JDoubleArray("work"), JIntW("info")) + routine ("arpack", "sstqrb", JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JFloatArray("work"), JIntW("info")) + routine_r("arpack", JIntR(), "icnteq", JInt("n"), JIntArray("array"), JInt("value")) + routine ("arpack", "icopy", JInt("n"), JIntArray("lx"), JInt("incx"), JIntArray("ly"), JInt("incy")) + routine ("arpack", "iset", JInt("n"), JInt("value"), JIntArray("array"), JInt("inc")) + routine ("arpack", "iswap", JInt("n"), JIntArray("sx"), JInt("incx"), JIntArray("sy"), JInt("incy")) + routine ("arpack", "second", JFloatW("t")) + +if sys.argv[1] == "lapack": + routine ("lapack", "dbdsdc", JString("uplo"), JString("compq"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("q"), JIntArray("iq"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dbdsqr", JString("uplo"), JInt("n"), JInt("ncvt"), JInt("nru"), JInt("ncc"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "ddisna", JString("job"), JInt("m"), JInt("n"), JDoubleArray("d"), JDoubleArray("sep"), JIntW("info")) + routine ("lapack", "dgbbrd", JString("vect"), JInt("m"), JInt("n"), JInt("ncc"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("pt"), JInt("ldpt"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dgbcon", JString("norm"), JInt("n"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JIntArray("ipiv"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dgbequ", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("r"), JDoubleArray("c"), JDoubleW("rowcnd"), JDoubleW("colcnd"), JDoubleW("amax"), JIntW("info")) + routine ("lapack", "dgbrfs", JString("trans"), JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("afb"), JInt("ldafb"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dgbsv", JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "dgbsvx", JString("fact"), JString("trans"), JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("afb"), JInt("ldafb"), JIntArray("ipiv"), JStringW("equed"), JDoubleArray("r"), JDoubleArray("c"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dgbtf2", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JIntArray("ipiv"), JIntW("info")) + routine ("lapack", "dgbtrf", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JIntArray("ipiv"), JIntW("info")) + routine ("lapack", "dgbtrs", JString("trans"), JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "dgebak", JString("job"), JString("side"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("scale"), JInt("m"), JDoubleArray("v"), JInt("ldv"), JIntW("info")) + routine ("lapack", "dgebal", JString("job"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("ilo"), JIntW("ihi"), JDoubleArray("scale"), JIntW("info")) + routine ("lapack", "dgebd2", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("tauq"), JDoubleArray("taup"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dgebrd", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("tauq"), JDoubleArray("taup"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dgecon", JString("norm"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dgeequ", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("r"), JDoubleArray("c"), JDoubleW("rowcnd"), JDoubleW("colcnd"), JDoubleW("amax"), JIntW("info")) + # routine ("lapack", "dgees", JString("jobvs"), JString("sort"), JObject("select"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("sdim"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("vs"), JInt("ldvs"), JDoubleArray("work"), JInt("lwork"), JBooleanArray("bwork"), JIntW("info")) + # routine ("lapack", "dgeesx", JString("jobvs"), JString("sort"), JObject("select"), JString("sense"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("sdim"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("vs"), JInt("ldvs"), JDoubleW("rconde"), JDoubleW("rcondv"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JBooleanArray("bwork"), JIntW("info")) + routine ("lapack", "dgeev", JString("jobvl"), JString("jobvr"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dgeevx", JString("balanc"), JString("jobvl"), JString("jobvr"), JString("sense"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JIntW("ilo"), JIntW("ihi"), JDoubleArray("scale"), JDoubleW("abnrm"), JDoubleArray("rconde"), JDoubleArray("rcondv"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dgegs", JString("jobvsl"), JString("jobvsr"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("vsl"), JInt("ldvsl"), JDoubleArray("vsr"), JInt("ldvsr"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dgegv", JString("jobvl"), JString("jobvr"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dgehd2", JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dgehrd", JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dgelq2", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dgelqf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dgels", JString("trans"), JInt("m"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dgelsd", JInt("m"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("s"), JDouble("rcond"), JIntW("rank"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dgelss", JInt("m"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("s"), JDouble("rcond"), JIntW("rank"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dgelsx", JInt("m"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntArray("jpvt"), JDouble("rcond"), JIntW("rank"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dgelsy", JInt("m"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntArray("jpvt"), JDouble("rcond"), JIntW("rank"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dgeql2", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dgeqlf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dgeqp3", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("jpvt"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dgeqpf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("jpvt"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dgeqr2", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dgeqrf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dgerfs", JString("trans"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("af"), JInt("ldaf"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dgerq2", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dgerqf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dgesc2", JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("rhs"), JIntArray("ipiv"), JIntArray("jpiv"), JDoubleW("scale")) + routine ("lapack", "dgesdd", JString("jobz"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("s"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dgesv", JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "dgesvd", JString("jobu"), JString("jobvt"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("s"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dgesvx", JString("fact"), JString("trans"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("af"), JInt("ldaf"), JIntArray("ipiv"), JStringW("equed"), JDoubleArray("r"), JDoubleArray("c"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dgetc2", JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JIntArray("jpiv"), JIntW("info")) + routine ("lapack", "dgetf2", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JIntW("info")) + routine ("lapack", "dgetrf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JIntW("info")) + routine ("lapack", "dgetri", JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dgetrs", JString("trans"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "dggbak", JString("job"), JString("side"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("lscale"), JDoubleArray("rscale"), JInt("m"), JDoubleArray("v"), JInt("ldv"), JIntW("info")) + routine ("lapack", "dggbal", JString("job"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("ilo"), JIntW("ihi"), JDoubleArray("lscale"), JDoubleArray("rscale"), JDoubleArray("work"), JIntW("info")) + # routine ("lapack", "dgges", JString("jobvsl"), JString("jobvsr"), JString("sort"), JObject("selctg"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("sdim"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("vsl"), JInt("ldvsl"), JDoubleArray("vsr"), JInt("ldvsr"), JDoubleArray("work"), JInt("lwork"), JBooleanArray("bwork"), JIntW("info")) + # routine ("lapack", "dggesx", JString("jobvsl"), JString("jobvsr"), JString("sort"), JObject("selctg"), JString("sense"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("sdim"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("vsl"), JInt("ldvsl"), JDoubleArray("vsr"), JInt("ldvsr"), JDoubleArray("rconde"), JDoubleArray("rcondv"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JBooleanArray("bwork"), JIntW("info")) + routine ("lapack", "dggev", JString("jobvl"), JString("jobvr"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dggevx", JString("balanc"), JString("jobvl"), JString("jobvr"), JString("sense"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JIntW("ilo"), JIntW("ihi"), JDoubleArray("lscale"), JDoubleArray("rscale"), JDoubleW("abnrm"), JDoubleW("bbnrm"), JDoubleArray("rconde"), JDoubleArray("rcondv"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JBooleanArray("bwork"), JIntW("info")) + routine ("lapack", "dggglm", JInt("n"), JInt("m"), JInt("p"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("d"), JDoubleArray("x"), JDoubleArray("y"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dgghrd", JString("compq"), JString("compz"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("z"), JInt("ldz"), JIntW("info")) + routine ("lapack", "dgglse", JInt("m"), JInt("n"), JInt("p"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("c"), JDoubleArray("d"), JDoubleArray("x"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dggqrf", JInt("n"), JInt("m"), JInt("p"), JDoubleArray("a"), JInt("lda"), JDoubleArray("taua"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("taub"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dggrqf", JInt("m"), JInt("p"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("taua"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("taub"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dggsvd", JString("jobu"), JString("jobv"), JString("jobq"), JInt("m"), JInt("n"), JInt("p"), JIntW("k"), JIntW("l"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alpha"), JDoubleArray("beta"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dggsvp", JString("jobu"), JString("jobv"), JString("jobq"), JInt("m"), JInt("p"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDouble("tola"), JDouble("tolb"), JIntW("k"), JIntW("l"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("q"), JInt("ldq"), JIntArray("iwork"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dgtcon", JString("norm"), JInt("n"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("du2"), JIntArray("ipiv"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dgtrfs", JString("trans"), JInt("n"), JInt("nrhs"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("dlf"), JDoubleArray("df"), JDoubleArray("duf"), JDoubleArray("du2"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dgtsv", JInt("n"), JInt("nrhs"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "dgtsvx", JString("fact"), JString("trans"), JInt("n"), JInt("nrhs"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("dlf"), JDoubleArray("df"), JDoubleArray("duf"), JDoubleArray("du2"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dgttrf", JInt("n"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("du2"), JIntArray("ipiv"), JIntW("info")) + routine ("lapack", "dgttrs", JString("trans"), JInt("n"), JInt("nrhs"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("du2"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "dgtts2", JInt("itrans"), JInt("n"), JInt("nrhs"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("du2"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb")) + routine ("lapack", "dhgeqz", JString("job"), JString("compq"), JString("compz"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dhsein", JString("side"), JString("eigsrc"), JString("initv"), JBooleanArray("select"), JInt("n"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JInt("mm"), JIntW("m"), JDoubleArray("work"), JIntArray("ifaill"), JIntArray("ifailr"), JIntW("info")) + routine ("lapack", "dhseqr", JString("job"), JString("compz"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine_r("lapack", JBooleanR(), "disnan", JDouble("din")) + routine ("lapack", "dlabad", JDoubleW("small"), JDoubleW("large")) + routine ("lapack", "dlabrd", JInt("m"), JInt("n"), JInt("nb"), JDoubleArray("a"), JInt("lda"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("tauq"), JDoubleArray("taup"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("y"), JInt("ldy")) + routine ("lapack", "dlacn2", JInt("n"), JDoubleArray("v"), JDoubleArray("x"), JIntArray("isgn"), JDoubleW("est"), JIntW("kase"), JIntArray("isave")) + routine ("lapack", "dlacon", JInt("n"), JDoubleArray("v"), JDoubleArray("x"), JIntArray("isgn"), JDoubleW("est"), JIntW("kase")) + routine ("lapack", "dlacpy", JString("uplo"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb")) + routine ("lapack", "dladiv", JDouble("a"), JDouble("b"), JDouble("c"), JDouble("d"), JDoubleW("p"), JDoubleW("q")) + routine ("lapack", "dlae2", JDouble("a"), JDouble("b"), JDouble("c"), JDoubleW("rt1"), JDoubleW("rt2")) + routine ("lapack", "dlaebz", JInt("ijob"), JInt("nitmax"), JInt("n"), JInt("mmax"), JInt("minp"), JInt("nbmin"), JDouble("abstol"), JDouble("reltol"), JDouble("pivmin"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("e2"), JIntArray("nval"), JDoubleArray("ab"), JDoubleArray("c"), JIntW("mout"), JIntArray("nab"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dlaed0", JInt("icompq"), JInt("qsiz"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("qstore"), JInt("ldqs"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dlaed1", JInt("n"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JIntArray("indxq"), JDoubleW("rho"), JInt("cutpnt"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dlaed2", JIntW("k"), JInt("n"), JInt("n1"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JIntArray("indxq"), JDoubleW("rho"), JDoubleArray("z"), JDoubleArray("dlamda"), JDoubleArray("w"), JDoubleArray("q2"), JIntArray("indx"), JIntArray("indxc"), JIntArray("indxp"), JIntArray("coltyp"), JIntW("info")) + routine ("lapack", "dlaed3", JInt("k"), JInt("n"), JInt("n1"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JDouble("rho"), JDoubleArray("dlamda"), JDoubleArray("q2"), JIntArray("indx"), JIntArray("ctot"), JDoubleArray("w"), JDoubleArray("s"), JIntW("info")) + routine ("lapack", "dlaed4", JInt("n"), JInt("i"), JDoubleArray("d"), JDoubleArray("z"), JDoubleArray("delta"), JDouble("rho"), JDoubleW("dlam"), JIntW("info")) + routine ("lapack", "dlaed5", JInt("i"), JDoubleArray("d"), JDoubleArray("z"), JDoubleArray("delta"), JDouble("rho"), JDoubleW("dlam")) + routine ("lapack", "dlaed6", JInt("kniter"), JBoolean("orgati"), JDouble("rho"), JDoubleArray("d"), JDoubleArray("z"), JDouble("finit"), JDoubleW("tau"), JIntW("info")) + routine ("lapack", "dlaed7", JInt("icompq"), JInt("n"), JInt("qsiz"), JInt("tlvls"), JInt("curlvl"), JInt("curpbm"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JIntArray("indxq"), JDoubleW("rho"), JInt("cutpnt"), JDoubleArray("qstore"), JIntArray("qptr"), JIntArray("prmptr"), JIntArray("perm"), JIntArray("givptr"), JIntArray("givcol"), JDoubleArray("givnum"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dlaed8", JInt("icompq"), JIntW("k"), JInt("n"), JInt("qsiz"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JIntArray("indxq"), JDoubleW("rho"), JInt("cutpnt"), JDoubleArray("z"), JDoubleArray("dlamda"), JDoubleArray("q2"), JInt("ldq2"), JDoubleArray("w"), JIntArray("perm"), JIntW("givptr"), JIntArray("givcol"), JDoubleArray("givnum"), JIntArray("indxp"), JIntArray("indx"), JIntW("info")) + routine ("lapack", "dlaed9", JInt("k"), JInt("kstart"), JInt("kstop"), JInt("n"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JDouble("rho"), JDoubleArray("dlamda"), JDoubleArray("w"), JDoubleArray("s"), JInt("lds"), JIntW("info")) + routine ("lapack", "dlaeda", JInt("n"), JInt("tlvls"), JInt("curlvl"), JInt("curpbm"), JIntArray("prmptr"), JIntArray("perm"), JIntArray("givptr"), JIntArray("givcol"), JDoubleArray("givnum"), JDoubleArray("q"), JIntArray("qptr"), JDoubleArray("z"), JDoubleArray("ztemp"), JIntW("info")) + routine ("lapack", "dlaein", JBoolean("rightv"), JBoolean("noinit"), JInt("n"), JDoubleArray("h"), JInt("ldh"), JDouble("wr"), JDouble("wi"), JDoubleArray("vr"), JDoubleArray("vi"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("work"), JDouble("eps3"), JDouble("smlnum"), JDouble("bignum"), JIntW("info")) + routine ("lapack", "dlaev2", JDouble("a"), JDouble("b"), JDouble("c"), JDoubleW("rt1"), JDoubleW("rt2"), JDoubleW("cs1"), JDoubleW("sn1")) + routine ("lapack", "dlaexc", JBoolean("wantq"), JInt("n"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("q"), JInt("ldq"), JInt("j1"), JInt("n1"), JInt("n2"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dlag2", JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDouble("safmin"), JDoubleW("scale1"), JDoubleW("scale2"), JDoubleW("wr1"), JDoubleW("wr2"), JDoubleW("wi")) + routine ("lapack", "dlag2s", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JFloatArray("sa"), JInt("ldsa"), JIntW("info")) + routine ("lapack", "dlags2", JBoolean("upper"), JDouble("a1"), JDouble("a2"), JDouble("a3"), JDouble("b1"), JDouble("b2"), JDouble("b3"), JDoubleW("csu"), JDoubleW("snu"), JDoubleW("csv"), JDoubleW("snv"), JDoubleW("csq"), JDoubleW("snq")) + routine ("lapack", "dlagtf", JInt("n"), JDoubleArray("a"), JDouble("lambda"), JDoubleArray("b"), JDoubleArray("c"), JDouble("tol"), JDoubleArray("d"), JIntArray("in"), JIntW("info")) + routine ("lapack", "dlagtm", JString("trans"), JInt("n"), JInt("nrhs"), JDouble("alpha"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("x"), JInt("ldx"), JDouble("beta"), JDoubleArray("b"), JInt("ldb")) + routine ("lapack", "dlagts", JInt("job"), JInt("n"), JDoubleArray("a"), JDoubleArray("b"), JDoubleArray("c"), JDoubleArray("d"), JIntArray("in"), JDoubleArray("y"), JDoubleW("tol"), JIntW("info")) + routine ("lapack", "dlagv2", JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleW("csl"), JDoubleW("snl"), JDoubleW("csr"), JDoubleW("snr")) + routine ("lapack", "dlahqr", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JInt("iloz"), JInt("ihiz"), JDoubleArray("z"), JInt("ldz"), JIntW("info")) + routine ("lapack", "dlahr2", JInt("n"), JInt("k"), JInt("nb"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("y"), JInt("ldy")) + routine ("lapack", "dlahrd", JInt("n"), JInt("k"), JInt("nb"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("y"), JInt("ldy")) + routine ("lapack", "dlaic1", JInt("job"), JInt("j"), JDoubleArray("x"), JDouble("sest"), JDoubleArray("w"), JDouble("gamma"), JDoubleW("sestpr"), JDoubleW("s"), JDoubleW("c")) + routine_r("lapack", JBooleanR(), "dlaisnan", JDouble("din1"), JDouble("din2")) + routine ("lapack", "dlaln2", JBoolean("ltrans"), JInt("na"), JInt("nw"), JDouble("smin"), JDouble("ca"), JDoubleArray("a"), JInt("lda"), JDouble("d1"), JDouble("d2"), JDoubleArray("b"), JInt("ldb"), JDouble("wr"), JDouble("wi"), JDoubleArray("x"), JInt("ldx"), JDoubleW("scale"), JDoubleW("xnorm"), JIntW("info")) + routine ("lapack", "dlals0", JInt("icompq"), JInt("nl"), JInt("nr"), JInt("sqre"), JInt("nrhs"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("bx"), JInt("ldbx"), JIntArray("perm"), JInt("givptr"), JIntArray("givcol"), JInt("ldgcol"), JDoubleArray("givnum"), JInt("ldgnum"), JDoubleArray("poles"), JDoubleArray("difl"), JDoubleArray("difr"), JDoubleArray("z"), JInt("k"), JDouble("c"), JDouble("s"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dlalsa", JInt("icompq"), JInt("smlsiz"), JInt("n"), JInt("nrhs"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("bx"), JInt("ldbx"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JIntArray("k"), JDoubleArray("difl"), JDoubleArray("difr"), JDoubleArray("z"), JDoubleArray("poles"), JIntArray("givptr"), JIntArray("givcol"), JInt("ldgcol"), JIntArray("perm"), JDoubleArray("givnum"), JDoubleArray("c"), JDoubleArray("s"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dlalsd", JString("uplo"), JInt("smlsiz"), JInt("n"), JInt("nrhs"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("b"), JInt("ldb"), JDouble("rcond"), JIntW("rank"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dlamrg", JInt("n1"), JInt("n2"), JDoubleArray("a"), JInt("dtrd1"), JInt("dtrd2"), JIntArray("index")) + routine_r("lapack", JIntR(), "dlaneg", JInt("n"), JDoubleArray("d"), JDoubleArray("lld"), JDouble("sigma"), JDouble("pivmin"), JInt("r")) + routine_r("lapack", JDoubleR(), "dlangb", JString("norm"), JInt("n"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("work")) + routine_r("lapack", JDoubleR(), "dlange", JString("norm"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("work")) + routine_r("lapack", JDoubleR(), "dlangt", JString("norm"), JInt("n"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du")) + routine_r("lapack", JDoubleR(), "dlanhs", JString("norm"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("work")) + routine_r("lapack", JDoubleR(), "dlansb", JString("norm"), JString("uplo"), JInt("n"), JInt("k"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("work")) + routine_r("lapack", JDoubleR(), "dlansp", JString("norm"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("work")) + routine_r("lapack", JDoubleR(), "dlanst", JString("norm"), JInt("n"), JDoubleArray("d"), JDoubleArray("e")) + routine_r("lapack", JDoubleR(), "dlansy", JString("norm"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("work")) + routine_r("lapack", JDoubleR(), "dlantb", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JInt("k"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("work")) + routine_r("lapack", JDoubleR(), "dlantp", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JDoubleArray("ap"), JDoubleArray("work")) + routine_r("lapack", JDoubleR(), "dlantr", JString("norm"), JString("uplo"), JString("diag"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("work")) + routine ("lapack", "dlanv2", JDoubleW("a"), JDoubleW("b"), JDoubleW("c"), JDoubleW("d"), JDoubleW("rt1r"), JDoubleW("rt1i"), JDoubleW("rt2r"), JDoubleW("rt2i"), JDoubleW("cs"), JDoubleW("sn")) + routine ("lapack", "dlapll", JInt("n"), JDoubleArray("x"), JInt("incx"), JDoubleArray("y"), JInt("incy"), JDoubleW("ssmin")) + routine ("lapack", "dlapmt", JBoolean("forwrd"), JInt("m"), JInt("n"), JDoubleArray("x"), JInt("ldx"), JIntArray("k")) + routine_r("lapack", JDoubleR(), "dlapy2", JDouble("x"), JDouble("y")) + routine_r("lapack", JDoubleR(), "dlapy3", JDouble("x"), JDouble("y"), JDouble("z")) + routine ("lapack", "dlaqgb", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("r"), JDoubleArray("c"), JDouble("rowcnd"), JDouble("colcnd"), JDouble("amax"), JStringW("equed")) + routine ("lapack", "dlaqge", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("r"), JDoubleArray("c"), JDouble("rowcnd"), JDouble("colcnd"), JDouble("amax"), JStringW("equed")) + routine ("lapack", "dlaqp2", JInt("m"), JInt("n"), JInt("offset"), JDoubleArray("a"), JInt("lda"), JIntArray("jpvt"), JDoubleArray("tau"), JDoubleArray("vn1"), JDoubleArray("vn2"), JDoubleArray("work")) + routine ("lapack", "dlaqps", JInt("m"), JInt("n"), JInt("offset"), JInt("nb"), JIntW("kb"), JDoubleArray("a"), JInt("lda"), JIntArray("jpvt"), JDoubleArray("tau"), JDoubleArray("vn1"), JDoubleArray("vn2"), JDoubleArray("auxv"), JDoubleArray("f"), JInt("ldf")) + routine ("lapack", "dlaqr0", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JInt("iloz"), JInt("ihiz"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dlaqr1", JInt("n"), JDoubleArray("h"), JInt("ldh"), JDouble("sr1"), JDouble("si1"), JDouble("sr2"), JDouble("si2"), JDoubleArray("v")) + routine ("lapack", "dlaqr2", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ktop"), JInt("kbot"), JInt("nw"), JDoubleArray("h"), JInt("ldh"), JInt("iloz"), JInt("ihiz"), JDoubleArray("z"), JInt("ldz"), JIntW("ns"), JIntW("nd"), JDoubleArray("sr"), JDoubleArray("si"), JDoubleArray("v"), JInt("ldv"), JInt("nh"), JDoubleArray("t"), JInt("ldt"), JInt("nv"), JDoubleArray("wv"), JInt("ldwv"), JDoubleArray("work"), JInt("lwork")) + routine ("lapack", "dlaqr3", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ktop"), JInt("kbot"), JInt("nw"), JDoubleArray("h"), JInt("ldh"), JInt("iloz"), JInt("ihiz"), JDoubleArray("z"), JInt("ldz"), JIntW("ns"), JIntW("nd"), JDoubleArray("sr"), JDoubleArray("si"), JDoubleArray("v"), JInt("ldv"), JInt("nh"), JDoubleArray("t"), JInt("ldt"), JInt("nv"), JDoubleArray("wv"), JInt("ldwv"), JDoubleArray("work"), JInt("lwork")) + routine ("lapack", "dlaqr4", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JInt("iloz"), JInt("ihiz"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dlaqr5", JBoolean("wantt"), JBoolean("wantz"), JInt("kacc22"), JInt("n"), JInt("ktop"), JInt("kbot"), JInt("nshfts"), JDoubleArray("sr"), JDoubleArray("si"), JDoubleArray("h"), JInt("ldh"), JInt("iloz"), JInt("ihiz"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("u"), JInt("ldu"), JInt("nv"), JDoubleArray("wv"), JInt("ldwv"), JInt("nh"), JDoubleArray("wh"), JInt("ldwh")) + routine ("lapack", "dlaqsb", JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("s"), JDouble("scond"), JDouble("amax"), JStringW("equed")) + routine ("lapack", "dlaqsp", JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("s"), JDouble("scond"), JDouble("amax"), JStringW("equed")) + routine ("lapack", "dlaqsy", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("s"), JDouble("scond"), JDouble("amax"), JStringW("equed")) + routine ("lapack", "dlaqtr", JBoolean("ltran"), JBoolean("lreal"), JInt("n"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("b"), JDouble("w"), JDoubleW("scale"), JDoubleArray("x"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dlar1v", JInt("n"), JInt("b1"), JInt("bn"), JDouble("lambda"), JDoubleArray("d"), JDoubleArray("l"), JDoubleArray("ld"), JDoubleArray("lld"), JDouble("pivmin"), JDouble("gaptol"), JDoubleArray("z"), JBoolean("wantnc"), JIntW("negcnt"), JDoubleW("ztz"), JDoubleW("mingma"), JIntW("r"), JIntArray("isuppz"), JDoubleW("nrminv"), JDoubleW("resid"), JDoubleW("rqcorr"), JDoubleArray("work")) + routine ("lapack", "dlar2v", JInt("n"), JDoubleArray("x"), JDoubleArray("y"), JDoubleArray("z"), JInt("incx"), JDoubleArray("c"), JDoubleArray("s"), JInt("incc")) + routine ("lapack", "dlarf", JString("side"), JInt("m"), JInt("n"), JDoubleArray("v"), JInt("incv"), JDouble("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work")) + routine ("lapack", "dlarfb", JString("side"), JString("trans"), JString("direct"), JString("storev"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("ldwork")) + routine ("lapack", "dlarfg", JInt("n"), JDoubleW("alpha"), JDoubleArray("x"), JInt("incx"), JDoubleW("tau")) + routine ("lapack", "dlarft", JString("direct"), JString("storev"), JInt("n"), JInt("k"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("tau"), JDoubleArray("t"), JInt("ldt")) + routine ("lapack", "dlarfx", JString("side"), JInt("m"), JInt("n"), JDoubleArray("v"), JDouble("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work")) + routine ("lapack", "dlargv", JInt("n"), JDoubleArray("x"), JInt("incx"), JDoubleArray("y"), JInt("incy"), JDoubleArray("c"), JInt("incc")) + routine ("lapack", "dlarnv", JInt("idist"), JIntArray("iseed"), JInt("n"), JDoubleArray("x")) + routine ("lapack", "dlarra", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("e2"), JDouble("spltol"), JDouble("tnrm"), JIntW("nsplit"), JIntArray("isplit"), JIntW("info")) + routine ("lapack", "dlarrb", JInt("n"), JDoubleArray("d"), JDoubleArray("lld"), JInt("ifirst"), JInt("ilast"), JDouble("rtol1"), JDouble("rtol2"), JInt("offset"), JDoubleArray("w"), JDoubleArray("wgap"), JDoubleArray("werr"), JDoubleArray("work"), JIntArray("iwork"), JDouble("pivmin"), JDouble("spdiam"), JInt("twist"), JIntW("info")) + routine ("lapack", "dlarrc", JString("jobt"), JInt("n"), JDouble("vl"), JDouble("vu"), JDoubleArray("d"), JDoubleArray("e"), JDouble("pivmin"), JIntW("eigcnt"), JIntW("lcnt"), JIntW("rcnt"), JIntW("info")) + routine ("lapack", "dlarrd", JString("range"), JString("order"), JInt("n"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDoubleArray("gers"), JDouble("reltol"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("e2"), JDouble("pivmin"), JInt("nsplit"), JIntArray("isplit"), JIntW("m"), JDoubleArray("w"), JDoubleArray("werr"), JDoubleW("wl"), JDoubleW("wu"), JIntArray("iblock"), JIntArray("indexw"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dlarre", JString("range"), JInt("n"), JDoubleW("vl"), JDoubleW("vu"), JInt("il"), JInt("iu"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("e2"), JDouble("rtol1"), JDouble("rtol2"), JDouble("spltol"), JIntW("nsplit"), JIntArray("isplit"), JIntW("m"), JDoubleArray("w"), JDoubleArray("werr"), JDoubleArray("wgap"), JIntArray("iblock"), JIntArray("indexw"), JDoubleArray("gers"), JDoubleW("pivmin"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dlarrf", JInt("n"), JDoubleArray("d"), JDoubleArray("l"), JDoubleArray("ld"), JInt("clstrt"), JInt("clend"), JDoubleArray("w"), JDoubleArray("wgap"), JDoubleArray("werr"), JDouble("spdiam"), JDouble("clgapl"), JDouble("clgapr"), JDouble("pivmin"), JDoubleW("sigma"), JDoubleArray("dplus"), JDoubleArray("lplus"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dlarrj", JInt("n"), JDoubleArray("d"), JDoubleArray("e2"), JInt("ifirst"), JInt("ilast"), JDouble("rtol"), JInt("offset"), JDoubleArray("w"), JDoubleArray("werr"), JDoubleArray("work"), JIntArray("iwork"), JDouble("pivmin"), JDouble("spdiam"), JIntW("info")) + routine ("lapack", "dlarrk", JInt("n"), JInt("iw"), JDouble("gl"), JDouble("gu"), JDoubleArray("d"), JDoubleArray("e2"), JDouble("pivmin"), JDouble("reltol"), JDoubleW("w"), JDoubleW("werr"), JIntW("info")) + routine ("lapack", "dlarrr", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JIntW("info")) + routine ("lapack", "dlarrv", JInt("n"), JDouble("vl"), JDouble("vu"), JDoubleArray("d"), JDoubleArray("l"), JDouble("pivmin"), JIntArray("isplit"), JInt("m"), JInt("dol"), JInt("dou"), JDouble("minrgp"), JDoubleW("rtol1"), JDoubleW("rtol2"), JDoubleArray("w"), JDoubleArray("werr"), JDoubleArray("wgap"), JIntArray("iblock"), JIntArray("indexw"), JDoubleArray("gers"), JDoubleArray("z"), JInt("ldz"), JIntArray("isuppz"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dlartg", JDouble("f"), JDouble("g"), JDoubleW("cs"), JDoubleW("sn"), JDoubleW("r")) + routine ("lapack", "dlartv", JInt("n"), JDoubleArray("x"), JInt("incx"), JDoubleArray("y"), JInt("incy"), JDoubleArray("c"), JDoubleArray("s"), JInt("incc")) + routine ("lapack", "dlaruv", JIntArray("iseed"), JInt("n"), JDoubleArray("x")) + routine ("lapack", "dlarz", JString("side"), JInt("m"), JInt("n"), JInt("l"), JDoubleArray("v"), JInt("incv"), JDouble("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work")) + routine ("lapack", "dlarzb", JString("side"), JString("trans"), JString("direct"), JString("storev"), JInt("m"), JInt("n"), JInt("k"), JInt("l"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("ldwork")) + routine ("lapack", "dlarzt", JString("direct"), JString("storev"), JInt("n"), JInt("k"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("tau"), JDoubleArray("t"), JInt("ldt")) + routine ("lapack", "dlas2", JDouble("f"), JDouble("g"), JDouble("h"), JDoubleW("ssmin"), JDoubleW("ssmax")) + routine ("lapack", "dlascl", JString("type"), JInt("kl"), JInt("ku"), JDouble("cfrom"), JDouble("cto"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) + routine ("lapack", "dlasd0", JInt("n"), JInt("sqre"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JInt("ldvt"), JInt("smlsiz"), JIntArray("iwork"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dlasd1", JInt("nl"), JInt("nr"), JInt("sqre"), JDoubleArray("d"), JDoubleW("alpha"), JDoubleW("beta"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JInt("ldvt"), JIntArray("idxq"), JIntArray("iwork"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dlasd2", JInt("nl"), JInt("nr"), JInt("sqre"), JIntW("k"), JDoubleArray("d"), JDoubleArray("z"), JDouble("alpha"), JDouble("beta"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("dsigma"), JDoubleArray("u2"), JInt("ldu2"), JDoubleArray("vt2"), JInt("ldvt2"), JIntArray("idxp"), JIntArray("idx"), JIntArray("idxc"), JIntArray("idxq"), JIntArray("coltyp"), JIntW("info")) + routine ("lapack", "dlasd3", JInt("nl"), JInt("nr"), JInt("sqre"), JInt("k"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("dsigma"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("u2"), JInt("ldu2"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("vt2"), JInt("ldvt2"), JIntArray("idxc"), JIntArray("ctot"), JDoubleArray("z"), JIntW("info")) + routine ("lapack", "dlasd4", JInt("n"), JInt("i"), JDoubleArray("d"), JDoubleArray("z"), JDoubleArray("delta"), JDouble("rho"), JDoubleW("sigma"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dlasd5", JInt("i"), JDoubleArray("d"), JDoubleArray("z"), JDoubleArray("delta"), JDouble("rho"), JDoubleW("dsigma"), JDoubleArray("work")) + routine ("lapack", "dlasd6", JInt("icompq"), JInt("nl"), JInt("nr"), JInt("sqre"), JDoubleArray("d"), JDoubleArray("vf"), JDoubleArray("vl"), JDoubleW("alpha"), JDoubleW("beta"), JIntArray("idxq"), JIntArray("perm"), JIntW("givptr"), JIntArray("givcol"), JInt("ldgcol"), JDoubleArray("givnum"), JInt("ldgnum"), JDoubleArray("poles"), JDoubleArray("difl"), JDoubleArray("difr"), JDoubleArray("z"), JIntW("k"), JDoubleW("c"), JDoubleW("s"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dlasd7", JInt("icompq"), JInt("nl"), JInt("nr"), JInt("sqre"), JIntW("k"), JDoubleArray("d"), JDoubleArray("z"), JDoubleArray("zw"), JDoubleArray("vf"), JDoubleArray("vfw"), JDoubleArray("vl"), JDoubleArray("vlw"), JDouble("alpha"), JDouble("beta"), JDoubleArray("dsigma"), JIntArray("idx"), JIntArray("idxp"), JIntArray("idxq"), JIntArray("perm"), JIntW("givptr"), JIntArray("givcol"), JInt("ldgcol"), JDoubleArray("givnum"), JInt("ldgnum"), JDoubleW("c"), JDoubleW("s"), JIntW("info")) + routine ("lapack", "dlasd8", JInt("icompq"), JInt("k"), JDoubleArray("d"), JDoubleArray("z"), JDoubleArray("vf"), JDoubleArray("vl"), JDoubleArray("difl"), JDoubleArray("difr"), JInt("lddifr"), JDoubleArray("dsigma"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dlasda", JInt("icompq"), JInt("smlsiz"), JInt("n"), JInt("sqre"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JIntArray("k"), JDoubleArray("difl"), JDoubleArray("difr"), JDoubleArray("z"), JDoubleArray("poles"), JIntArray("givptr"), JIntArray("givcol"), JInt("ldgcol"), JIntArray("perm"), JDoubleArray("givnum"), JDoubleArray("c"), JDoubleArray("s"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dlasdq", JString("uplo"), JInt("sqre"), JInt("n"), JInt("ncvt"), JInt("nru"), JInt("ncc"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dlasdt", JInt("n"), JIntW("lvl"), JIntW("nd"), JIntArray("inode"), JIntArray("ndiml"), JIntArray("ndimr"), JInt("msub")) + routine ("lapack", "dlaset", JString("uplo"), JInt("m"), JInt("n"), JDouble("alpha"), JDouble("beta"), JDoubleArray("a"), JInt("lda")) + routine ("lapack", "dlasq1", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dlasq2", JInt("n"), JDoubleArray("z"), JIntW("info")) + routine ("lapack", "dlasq3", JInt("i0"), JIntW("n0"), JDoubleArray("z"), JInt("pp"), JDoubleW("dmin"), JDoubleW("sigma"), JDoubleW("desig"), JDoubleW("qmax"), JIntW("nfail"), JIntW("iter"), JIntW("ndiv"), JBoolean("ieee")) + routine ("lapack", "dlasq4", JInt("i0"), JInt("n0"), JDoubleArray("z"), JInt("pp"), JInt("n0in"), JDouble("dmin"), JDouble("dmin1"), JDouble("dmin2"), JDouble("dn"), JDouble("dn1"), JDouble("dn2"), JDoubleW("tau"), JIntW("ttype")) + routine ("lapack", "dlasq5", JInt("i0"), JInt("n0"), JDoubleArray("z"), JInt("pp"), JDouble("tau"), JDoubleW("dmin"), JDoubleW("dmin1"), JDoubleW("dmin2"), JDoubleW("dn"), JDoubleW("dnm1"), JDoubleW("dnm2"), JBoolean("ieee")) + routine ("lapack", "dlasq6", JInt("i0"), JInt("n0"), JDoubleArray("z"), JInt("pp"), JDoubleW("dmin"), JDoubleW("dmin1"), JDoubleW("dmin2"), JDoubleW("dn"), JDoubleW("dnm1"), JDoubleW("dnm2")) + routine ("lapack", "dlasr", JString("side"), JString("pivot"), JString("direct"), JInt("m"), JInt("n"), JDoubleArray("c"), JDoubleArray("s"), JDoubleArray("a"), JInt("lda")) + routine ("lapack", "dlasrt", JString("id"), JInt("n"), JDoubleArray("d"), JIntW("info")) + routine ("lapack", "dlassq", JInt("n"), JDoubleArray("x"), JInt("incx"), JDoubleW("scale"), JDoubleW("sumsq")) + routine ("lapack", "dlasv2", JDouble("f"), JDouble("g"), JDouble("h"), JDoubleW("ssmin"), JDoubleW("ssmax"), JDoubleW("snr"), JDoubleW("csr"), JDoubleW("snl"), JDoubleW("csl")) + routine ("lapack", "dlaswp", JInt("n"), JDoubleArray("a"), JInt("lda"), JInt("k1"), JInt("k2"), JIntArray("ipiv"), JInt("incx")) + routine ("lapack", "dlasy2", JBoolean("ltranl"), JBoolean("ltranr"), JInt("isgn"), JInt("n1"), JInt("n2"), JDoubleArray("tl"), JInt("ldtl"), JDoubleArray("tr"), JInt("ldtr"), JDoubleArray("b"), JInt("ldb"), JDoubleW("scale"), JDoubleArray("x"), JInt("ldx"), JDoubleW("xnorm"), JIntW("info")) + routine ("lapack", "dlasyf", JString("uplo"), JInt("n"), JInt("nb"), JIntW("kb"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("w"), JInt("ldw"), JIntW("info")) + routine ("lapack", "dlatbs", JString("uplo"), JString("trans"), JString("diag"), JString("normin"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("x"), JDoubleW("scale"), JDoubleArray("cnorm"), JIntW("info")) + routine ("lapack", "dlatdf", JInt("ijob"), JInt("n"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("rhs"), JDoubleW("rdsum"), JDoubleW("rdscal"), JIntArray("ipiv"), JIntArray("jpiv")) + routine ("lapack", "dlatps", JString("uplo"), JString("trans"), JString("diag"), JString("normin"), JInt("n"), JDoubleArray("ap"), JDoubleArray("x"), JDoubleW("scale"), JDoubleArray("cnorm"), JIntW("info")) + routine ("lapack", "dlatrd", JString("uplo"), JInt("n"), JInt("nb"), JDoubleArray("a"), JInt("lda"), JDoubleArray("e"), JDoubleArray("tau"), JDoubleArray("w"), JInt("ldw")) + routine ("lapack", "dlatrs", JString("uplo"), JString("trans"), JString("diag"), JString("normin"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("x"), JDoubleW("scale"), JDoubleArray("cnorm"), JIntW("info")) + routine ("lapack", "dlatrz", JInt("m"), JInt("n"), JInt("l"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work")) + routine ("lapack", "dlatzm", JString("side"), JInt("m"), JInt("n"), JDoubleArray("v"), JInt("incv"), JDouble("tau"), JDoubleArray("c1"), JDoubleArray("c2"), JInt("Ldc"), JDoubleArray("work")) + routine ("lapack", "dlauu2", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) + routine ("lapack", "dlauum", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) + # routine ("lapack", "dlazq3", JInt("i0"), JIntW("n0"), JDoubleArray("z"), JInt("pp"), JDoubleW("dmin"), JDoubleW("sigma"), JDoubleW("desig"), JDoubleW("qmax"), JIntW("nfail"), JIntW("iter"), JIntW("ndiv"), JBoolean("ieee"), JIntW("ttype"), JDoubleW("dmin1"), JDoubleW("dmin2"), JDoubleW("dn"), JDoubleW("dn1"), JDoubleW("dn2"), JDoubleW("tau")) + # routine ("lapack", "dlazq4", JInt("i0"), JInt("n0"), JDoubleArray("z"), JInt("pp"), JInt("n0in"), JDouble("dmin"), JDouble("dmin1"), JDouble("dmin2"), JDouble("dn"), JDouble("dn1"), JDouble("dn2"), JDoubleW("tau"), JIntW("ttype"), JDoubleW("g")) + routine ("lapack", "dopgtr", JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("tau"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dopmtr", JString("side"), JString("uplo"), JString("trans"), JInt("m"), JInt("n"), JDoubleArray("ap"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dorg2l", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dorg2r", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dorgbr", JString("vect"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dorghr", JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dorgl2", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dorglq", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dorgql", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dorgqr", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dorgr2", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dorgrq", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dorgtr", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dorm2l", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dorm2r", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dormbr", JString("vect"), JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dormhr", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dorml2", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dormlq", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dormql", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dormqr", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dormr2", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dormr3", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JInt("l"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dormrq", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dormrz", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JInt("l"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dormtr", JString("side"), JString("uplo"), JString("trans"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dpbcon", JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dpbequ", JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("s"), JDoubleW("scond"), JDoubleW("amax"), JIntW("info")) + routine ("lapack", "dpbrfs", JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("afb"), JInt("ldafb"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dpbstf", JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JIntW("info")) + routine ("lapack", "dpbsv", JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "dpbsvx", JString("fact"), JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("afb"), JInt("ldafb"), JStringW("equed"), JDoubleArray("s"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dpbtf2", JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JIntW("info")) + routine ("lapack", "dpbtrf", JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JIntW("info")) + routine ("lapack", "dpbtrs", JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "dpocon", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dpoequ", JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("s"), JDoubleW("scond"), JDoubleW("amax"), JIntW("info")) + routine ("lapack", "dporfs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("af"), JInt("ldaf"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dposv", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "dposvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("af"), JInt("ldaf"), JStringW("equed"), JDoubleArray("s"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dpotf2", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) + routine ("lapack", "dpotrf", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) + routine ("lapack", "dpotri", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) + routine ("lapack", "dpotrs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "dppcon", JString("uplo"), JInt("n"), JDoubleArray("ap"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dppequ", JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("s"), JDoubleW("scond"), JDoubleW("amax"), JIntW("info")) + routine ("lapack", "dpprfs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("afp"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dppsv", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "dppsvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("afp"), JStringW("equed"), JDoubleArray("s"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dpptrf", JString("uplo"), JInt("n"), JDoubleArray("ap"), JIntW("info")) + routine ("lapack", "dpptri", JString("uplo"), JInt("n"), JDoubleArray("ap"), JIntW("info")) + routine ("lapack", "dpptrs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "dptcon", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dpteqr", JString("compz"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dptrfs", JInt("n"), JInt("nrhs"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("df"), JDoubleArray("ef"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dptsv", JInt("n"), JInt("nrhs"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "dptsvx", JString("fact"), JInt("n"), JInt("nrhs"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("df"), JDoubleArray("ef"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dpttrf", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JIntW("info")) + routine ("lapack", "dpttrs", JInt("n"), JInt("nrhs"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "dptts2", JInt("n"), JInt("nrhs"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("b"), JInt("ldb")) + routine ("lapack", "drscl", JInt("n"), JDouble("sa"), JDoubleArray("sx"), JInt("incx")) + routine ("lapack", "dsbev", JString("jobz"), JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dsbevd", JString("jobz"), JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + routine ("lapack", "dsbevx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("q"), JInt("ldq"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + routine ("lapack", "dsbgst", JString("vect"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("bb"), JInt("ldbb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dsbgv", JString("jobz"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("bb"), JInt("ldbb"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dsbgvd", JString("jobz"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("bb"), JInt("ldbb"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + routine ("lapack", "dsbgvx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("bb"), JInt("ldbb"), JDoubleArray("q"), JInt("ldq"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + routine ("lapack", "dsbtrd", JString("vect"), JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dsgesv", JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("work"), JFloatArray("swork"), JIntW("iter"), JIntW("info")) + routine ("lapack", "dspcon", JString("uplo"), JInt("n"), JDoubleArray("ap"), JIntArray("ipiv"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dspev", JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dspevd", JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + routine ("lapack", "dspevx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + routine ("lapack", "dspgst", JInt("itype"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("bp"), JIntW("info")) + routine ("lapack", "dspgv", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("bp"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dspgvd", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("bp"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + routine ("lapack", "dspgvx", JInt("itype"), JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("bp"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + routine ("lapack", "dsprfs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("afp"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dspsv", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "dspsvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("afp"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dsptrd", JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("tau"), JIntW("info")) + routine ("lapack", "dsptrf", JString("uplo"), JInt("n"), JDoubleArray("ap"), JIntArray("ipiv"), JIntW("info")) + routine ("lapack", "dsptri", JString("uplo"), JInt("n"), JDoubleArray("ap"), JIntArray("ipiv"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dsptrs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "dstebz", JString("range"), JString("order"), JInt("n"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JDoubleArray("d"), JDoubleArray("e"), JIntW("m"), JIntW("nsplit"), JDoubleArray("w"), JIntArray("iblock"), JIntArray("isplit"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dstedc", JString("compz"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + routine ("lapack", "dstegr", JString("jobz"), JString("range"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JIntArray("isuppz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + routine ("lapack", "dstein", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JInt("m"), JDoubleArray("w"), JIntArray("iblock"), JIntArray("isplit"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + routine ("lapack", "dstemr", JString("jobz"), JString("range"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JInt("nzc"), JIntArray("isuppz"), JBooleanW("tryrac"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + routine ("lapack", "dsteqr", JString("compz"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dsterf", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JIntW("info")) + routine ("lapack", "dstev", JString("jobz"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dstevd", JString("jobz"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + routine ("lapack", "dstevr", JString("jobz"), JString("range"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JIntArray("isuppz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + routine ("lapack", "dstevx", JString("jobz"), JString("range"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + routine ("lapack", "dsycon", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dsyev", JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("w"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dsyevd", JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("w"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + routine ("lapack", "dsyevr", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JIntArray("isuppz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + routine ("lapack", "dsyevx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + routine ("lapack", "dsygs2", JInt("itype"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "dsygst", JInt("itype"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "dsygv", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("w"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dsygvd", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("w"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + routine ("lapack", "dsygvx", JInt("itype"), JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + routine ("lapack", "dsyrfs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("af"), JInt("ldaf"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dsysv", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dsysvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("af"), JInt("ldaf"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dsytd2", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("tau"), JIntW("info")) + routine ("lapack", "dsytf2", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JIntW("info")) + routine ("lapack", "dsytrd", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dsytrf", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dsytri", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dsytrs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "dtbcon", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dtbrfs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("kd"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dtbtrs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("kd"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "dtgevc", JString("side"), JString("howmny"), JBooleanArray("select"), JInt("n"), JDoubleArray("s"), JInt("lds"), JDoubleArray("p"), JInt("ldp"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JInt("mm"), JIntW("m"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dtgex2", JBoolean("wantq"), JBoolean("wantz"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("z"), JInt("ldz"), JInt("j1"), JInt("n1"), JInt("n2"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dtgexc", JBoolean("wantq"), JBoolean("wantz"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("z"), JInt("ldz"), JIntW("ifst"), JIntW("ilst"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "dtgsen", JInt("ijob"), JBoolean("wantq"), JBoolean("wantz"), JBooleanArray("select"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("z"), JInt("ldz"), JIntW("m"), JDoubleW("pl"), JDoubleW("pr"), JDoubleArray("dif"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + routine ("lapack", "dtgsja", JString("jobu"), JString("jobv"), JString("jobq"), JInt("m"), JInt("p"), JInt("n"), JInt("k"), JInt("l"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDouble("tola"), JDouble("tolb"), JDoubleArray("alpha"), JDoubleArray("beta"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("work"), JIntW("ncycle"), JIntW("info")) + routine ("lapack", "dtgsna", JString("job"), JString("howmny"), JBooleanArray("select"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JDoubleArray("s"), JDoubleArray("dif"), JInt("mm"), JIntW("m"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dtgsy2", JString("trans"), JInt("ijob"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("d"), JInt("ldd"), JDoubleArray("e"), JInt("lde"), JDoubleArray("f"), JInt("ldf"), JDoubleW("scale"), JDoubleW("rdsum"), JDoubleW("rdscal"), JIntArray("iwork"), JIntW("pq"), JIntW("info")) + routine ("lapack", "dtgsyl", JString("trans"), JInt("ijob"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("d"), JInt("ldd"), JDoubleArray("e"), JInt("lde"), JDoubleArray("f"), JInt("ldf"), JDoubleW("scale"), JDoubleW("dif"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dtpcon", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JDoubleArray("ap"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dtprfs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dtptri", JString("uplo"), JString("diag"), JInt("n"), JDoubleArray("ap"), JIntW("info")) + routine ("lapack", "dtptrs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "dtrcon", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dtrevc", JString("side"), JString("howmny"), JBooleanArray("select"), JInt("n"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JInt("mm"), JIntW("m"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dtrexc", JString("compq"), JInt("n"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("q"), JInt("ldq"), JIntW("ifst"), JIntW("ilst"), JDoubleArray("work"), JIntW("info")) + routine ("lapack", "dtrrfs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dtrsen", JString("job"), JString("compq"), JBooleanArray("select"), JInt("n"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("wr"), JDoubleArray("wi"), JIntW("m"), JDoubleW("s"), JDoubleW("sep"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + routine ("lapack", "dtrsna", JString("job"), JString("howmny"), JBooleanArray("select"), JInt("n"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JDoubleArray("s"), JDoubleArray("sep"), JInt("mm"), JIntW("m"), JDoubleArray("work"), JInt("ldwork"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "dtrsyl", JString("trana"), JString("tranb"), JInt("isgn"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("c"), JInt("Ldc"), JDoubleW("scale"), JIntW("info")) + routine ("lapack", "dtrti2", JString("uplo"), JString("diag"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) + routine ("lapack", "dtrtri", JString("uplo"), JString("diag"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) + routine ("lapack", "dtrtrs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "dtzrqf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JIntW("info")) + routine ("lapack", "dtzrzf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + routine_r("lapack", JIntR(), "ieeeck", JInt("ispec"), JFloat("zero"), JFloat("one")) + routine_r("lapack", JIntR(), "ilaenv", JInt("ispec"), JString("name"), JString("opts"), JInt("n1"), JInt("n2"), JInt("n3"), JInt("n4")) + routine ("lapack", "ilaver", JIntW("vers_major"), JIntW("vers_minor"), JIntW("vers_patch")) + routine_r("lapack", JIntR(), "iparmq", JInt("ispec"), JString("name"), JString("opts"), JInt("n"), JInt("ilo"), JInt("ihi"), JInt("lwork")) + routine_r("lapack", JBooleanR(), "lsamen", JInt("n"), JString("ca"), JString("cb")) + routine ("lapack", "sbdsdc", JString("uplo"), JString("compq"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("q"), JIntArray("iq"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "sbdsqr", JString("uplo"), JInt("n"), JInt("ncvt"), JInt("nru"), JInt("ncc"), JFloatArray("d"), JFloatArray("e"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("u"), JInt("ldu"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "sdisna", JString("job"), JInt("m"), JInt("n"), JFloatArray("d"), JFloatArray("sep"), JIntW("info")) + routine ("lapack", "sgbbrd", JString("vect"), JInt("m"), JInt("n"), JInt("ncc"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JFloatArray("d"), JFloatArray("e"), JFloatArray("q"), JInt("ldq"), JFloatArray("pt"), JInt("ldpt"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "sgbcon", JString("norm"), JInt("n"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JIntArray("ipiv"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "sgbequ", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JFloatArray("r"), JFloatArray("c"), JFloatW("rowcnd"), JFloatW("colcnd"), JFloatW("amax"), JIntW("info")) + routine ("lapack", "sgbrfs", JString("trans"), JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("afb"), JInt("ldafb"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "sgbsv", JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "sgbsvx", JString("fact"), JString("trans"), JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("afb"), JInt("ldafb"), JIntArray("ipiv"), JStringW("equed"), JFloatArray("r"), JFloatArray("c"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "sgbtf2", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JIntArray("ipiv"), JIntW("info")) + routine ("lapack", "sgbtrf", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JIntArray("ipiv"), JIntW("info")) + routine ("lapack", "sgbtrs", JString("trans"), JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "sgebak", JString("job"), JString("side"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("scale"), JInt("m"), JFloatArray("v"), JInt("ldv"), JIntW("info")) + routine ("lapack", "sgebal", JString("job"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("ilo"), JIntW("ihi"), JFloatArray("scale"), JIntW("info")) + routine ("lapack", "sgebd2", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("d"), JFloatArray("e"), JFloatArray("tauq"), JFloatArray("taup"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "sgebrd", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("d"), JFloatArray("e"), JFloatArray("tauq"), JFloatArray("taup"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sgecon", JString("norm"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "sgeequ", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("r"), JFloatArray("c"), JFloatW("rowcnd"), JFloatW("colcnd"), JFloatW("amax"), JIntW("info")) + # routine ("lapack", "sgees", JString("jobvs"), JString("sort"), JObject("select"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("sdim"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("vs"), JInt("ldvs"), JFloatArray("work"), JInt("lwork"), JBooleanArray("bwork"), JIntW("info")) + # routine ("lapack", "sgeesx", JString("jobvs"), JString("sort"), JObject("select"), JString("sense"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("sdim"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("vs"), JInt("ldvs"), JFloatW("rconde"), JFloatW("rcondv"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JBooleanArray("bwork"), JIntW("info")) + routine ("lapack", "sgeev", JString("jobvl"), JString("jobvr"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sgeevx", JString("balanc"), JString("jobvl"), JString("jobvr"), JString("sense"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JIntW("ilo"), JIntW("ihi"), JFloatArray("scale"), JFloatW("abnrm"), JFloatArray("rconde"), JFloatArray("rcondv"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "sgegs", JString("jobvsl"), JString("jobvsr"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("vsl"), JInt("ldvsl"), JFloatArray("vsr"), JInt("ldvsr"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sgegv", JString("jobvl"), JString("jobvr"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sgehd2", JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "sgehrd", JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sgelq2", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "sgelqf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sgels", JString("trans"), JInt("m"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sgelsd", JInt("m"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("s"), JFloat("rcond"), JIntW("rank"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "sgelss", JInt("m"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("s"), JFloat("rcond"), JIntW("rank"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sgelsx", JInt("m"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntArray("jpvt"), JFloat("rcond"), JIntW("rank"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "sgelsy", JInt("m"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntArray("jpvt"), JFloat("rcond"), JIntW("rank"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sgeql2", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "sgeqlf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sgeqp3", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("jpvt"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sgeqpf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("jpvt"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "sgeqr2", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "sgeqrf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sgerfs", JString("trans"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("af"), JInt("ldaf"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "sgerq2", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "sgerqf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sgesc2", JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("rhs"), JIntArray("ipiv"), JIntArray("jpiv"), JFloatW("scale")) + routine ("lapack", "sgesdd", JString("jobz"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("s"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "sgesv", JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "sgesvd", JString("jobu"), JString("jobvt"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("s"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sgesvx", JString("fact"), JString("trans"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("af"), JInt("ldaf"), JIntArray("ipiv"), JStringW("equed"), JFloatArray("r"), JFloatArray("c"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "sgetc2", JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JIntArray("jpiv"), JIntW("info")) + routine ("lapack", "sgetf2", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JIntW("info")) + routine ("lapack", "sgetrf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JIntW("info")) + routine ("lapack", "sgetri", JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sgetrs", JString("trans"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "sggbak", JString("job"), JString("side"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("lscale"), JFloatArray("rscale"), JInt("m"), JFloatArray("v"), JInt("ldv"), JIntW("info")) + routine ("lapack", "sggbal", JString("job"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("ilo"), JIntW("ihi"), JFloatArray("lscale"), JFloatArray("rscale"), JFloatArray("work"), JIntW("info")) + # routine ("lapack", "sgges", JString("jobvsl"), JString("jobvsr"), JString("sort"), JObject("selctg"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("sdim"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("vsl"), JInt("ldvsl"), JFloatArray("vsr"), JInt("ldvsr"), JFloatArray("work"), JInt("lwork"), JBooleanArray("bwork"), JIntW("info")) + # routine ("lapack", "sggesx", JString("jobvsl"), JString("jobvsr"), JString("sort"), JObject("selctg"), JString("sense"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("sdim"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("vsl"), JInt("ldvsl"), JFloatArray("vsr"), JInt("ldvsr"), JFloatArray("rconde"), JFloatArray("rcondv"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JBooleanArray("bwork"), JIntW("info")) + routine ("lapack", "sggev", JString("jobvl"), JString("jobvr"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sggevx", JString("balanc"), JString("jobvl"), JString("jobvr"), JString("sense"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JIntW("ilo"), JIntW("ihi"), JFloatArray("lscale"), JFloatArray("rscale"), JFloatW("abnrm"), JFloatW("bbnrm"), JFloatArray("rconde"), JFloatArray("rcondv"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JBooleanArray("bwork"), JIntW("info")) + routine ("lapack", "sggglm", JInt("n"), JInt("m"), JInt("p"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("d"), JFloatArray("x"), JFloatArray("y"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sgghrd", JString("compq"), JString("compz"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("q"), JInt("ldq"), JFloatArray("z"), JInt("ldz"), JIntW("info")) + routine ("lapack", "sgglse", JInt("m"), JInt("n"), JInt("p"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("c"), JFloatArray("d"), JFloatArray("x"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sggqrf", JInt("n"), JInt("m"), JInt("p"), JFloatArray("a"), JInt("lda"), JFloatArray("taua"), JFloatArray("b"), JInt("ldb"), JFloatArray("taub"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sggrqf", JInt("m"), JInt("p"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("taua"), JFloatArray("b"), JInt("ldb"), JFloatArray("taub"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sggsvd", JString("jobu"), JString("jobv"), JString("jobq"), JInt("m"), JInt("n"), JInt("p"), JIntW("k"), JIntW("l"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alpha"), JFloatArray("beta"), JFloatArray("u"), JInt("ldu"), JFloatArray("v"), JInt("ldv"), JFloatArray("q"), JInt("ldq"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "sggsvp", JString("jobu"), JString("jobv"), JString("jobq"), JInt("m"), JInt("p"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloat("tola"), JFloat("tolb"), JIntW("k"), JIntW("l"), JFloatArray("u"), JInt("ldu"), JFloatArray("v"), JInt("ldv"), JFloatArray("q"), JInt("ldq"), JIntArray("iwork"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "sgtcon", JString("norm"), JInt("n"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("du2"), JIntArray("ipiv"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "sgtrfs", JString("trans"), JInt("n"), JInt("nrhs"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("dlf"), JFloatArray("df"), JFloatArray("duf"), JFloatArray("du2"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "sgtsv", JInt("n"), JInt("nrhs"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "sgtsvx", JString("fact"), JString("trans"), JInt("n"), JInt("nrhs"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("dlf"), JFloatArray("df"), JFloatArray("duf"), JFloatArray("du2"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "sgttrf", JInt("n"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("du2"), JIntArray("ipiv"), JIntW("info")) + routine ("lapack", "sgttrs", JString("trans"), JInt("n"), JInt("nrhs"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("du2"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "sgtts2", JInt("itrans"), JInt("n"), JInt("nrhs"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("du2"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb")) + routine ("lapack", "shgeqz", JString("job"), JString("compq"), JString("compz"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("t"), JInt("ldt"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("q"), JInt("ldq"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "shsein", JString("side"), JString("eigsrc"), JString("initv"), JBooleanArray("select"), JInt("n"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JInt("mm"), JIntW("m"), JFloatArray("work"), JIntArray("ifaill"), JIntArray("ifailr"), JIntW("info")) + routine ("lapack", "shseqr", JString("job"), JString("compz"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine_r("lapack", JBooleanR(), "sisnan", JFloat("sin")) + routine ("lapack", "slabad", JFloatW("small"), JFloatW("large")) + routine ("lapack", "slabrd", JInt("m"), JInt("n"), JInt("nb"), JFloatArray("a"), JInt("lda"), JFloatArray("d"), JFloatArray("e"), JFloatArray("tauq"), JFloatArray("taup"), JFloatArray("x"), JInt("ldx"), JFloatArray("y"), JInt("ldy")) + routine ("lapack", "slacn2", JInt("n"), JFloatArray("v"), JFloatArray("x"), JIntArray("isgn"), JFloatW("est"), JIntW("kase"), JIntArray("isave")) + routine ("lapack", "slacon", JInt("n"), JFloatArray("v"), JFloatArray("x"), JIntArray("isgn"), JFloatW("est"), JIntW("kase")) + routine ("lapack", "slacpy", JString("uplo"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb")) + routine ("lapack", "sladiv", JFloat("a"), JFloat("b"), JFloat("c"), JFloat("d"), JFloatW("p"), JFloatW("q")) + routine ("lapack", "slae2", JFloat("a"), JFloat("b"), JFloat("c"), JFloatW("rt1"), JFloatW("rt2")) + routine ("lapack", "slaebz", JInt("ijob"), JInt("nitmax"), JInt("n"), JInt("mmax"), JInt("minp"), JInt("nbmin"), JFloat("abstol"), JFloat("reltol"), JFloat("pivmin"), JFloatArray("d"), JFloatArray("e"), JFloatArray("e2"), JIntArray("nval"), JFloatArray("ab"), JFloatArray("c"), JIntW("mout"), JIntArray("nab"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "slaed0", JInt("icompq"), JInt("qsiz"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("q"), JInt("ldq"), JFloatArray("qstore"), JInt("ldqs"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "slaed1", JInt("n"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JIntArray("indxq"), JFloatW("rho"), JInt("cutpnt"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "slaed2", JIntW("k"), JInt("n"), JInt("n1"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JIntArray("indxq"), JFloatW("rho"), JFloatArray("z"), JFloatArray("dlamda"), JFloatArray("w"), JFloatArray("q2"), JIntArray("indx"), JIntArray("indxc"), JIntArray("indxp"), JIntArray("coltyp"), JIntW("info")) + routine ("lapack", "slaed3", JInt("k"), JInt("n"), JInt("n1"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JFloat("rho"), JFloatArray("dlamda"), JFloatArray("q2"), JIntArray("indx"), JIntArray("ctot"), JFloatArray("w"), JFloatArray("s"), JIntW("info")) + routine ("lapack", "slaed4", JInt("n"), JInt("i"), JFloatArray("d"), JFloatArray("z"), JFloatArray("delta"), JFloat("rho"), JFloatW("dlam"), JIntW("info")) + routine ("lapack", "slaed5", JInt("i"), JFloatArray("d"), JFloatArray("z"), JFloatArray("delta"), JFloat("rho"), JFloatW("dlam")) + routine ("lapack", "slaed6", JInt("kniter"), JBoolean("orgati"), JFloat("rho"), JFloatArray("d"), JFloatArray("z"), JFloat("finit"), JFloatW("tau"), JIntW("info")) + routine ("lapack", "slaed7", JInt("icompq"), JInt("n"), JInt("qsiz"), JInt("tlvls"), JInt("curlvl"), JInt("curpbm"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JIntArray("indxq"), JFloatW("rho"), JInt("cutpnt"), JFloatArray("qstore"), JIntArray("qptr"), JIntArray("prmptr"), JIntArray("perm"), JIntArray("givptr"), JIntArray("givcol"), JFloatArray("givnum"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "slaed8", JInt("icompq"), JIntW("k"), JInt("n"), JInt("qsiz"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JIntArray("indxq"), JFloatW("rho"), JInt("cutpnt"), JFloatArray("z"), JFloatArray("dlamda"), JFloatArray("q2"), JInt("ldq2"), JFloatArray("w"), JIntArray("perm"), JIntW("givptr"), JIntArray("givcol"), JFloatArray("givnum"), JIntArray("indxp"), JIntArray("indx"), JIntW("info")) + routine ("lapack", "slaed9", JInt("k"), JInt("kstart"), JInt("kstop"), JInt("n"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JFloat("rho"), JFloatArray("dlamda"), JFloatArray("w"), JFloatArray("s"), JInt("lds"), JIntW("info")) + routine ("lapack", "slaeda", JInt("n"), JInt("tlvls"), JInt("curlvl"), JInt("curpbm"), JIntArray("prmptr"), JIntArray("perm"), JIntArray("givptr"), JIntArray("givcol"), JFloatArray("givnum"), JFloatArray("q"), JIntArray("qptr"), JFloatArray("z"), JFloatArray("ztemp"), JIntW("info")) + routine ("lapack", "slaein", JBoolean("rightv"), JBoolean("noinit"), JInt("n"), JFloatArray("h"), JInt("ldh"), JFloat("wr"), JFloat("wi"), JFloatArray("vr"), JFloatArray("vi"), JFloatArray("b"), JInt("ldb"), JFloatArray("work"), JFloat("eps3"), JFloat("smlnum"), JFloat("bignum"), JIntW("info")) + routine ("lapack", "slaev2", JFloat("a"), JFloat("b"), JFloat("c"), JFloatW("rt1"), JFloatW("rt2"), JFloatW("cs1"), JFloatW("sn1")) + routine ("lapack", "slaexc", JBoolean("wantq"), JInt("n"), JFloatArray("t"), JInt("ldt"), JFloatArray("q"), JInt("ldq"), JInt("j1"), JInt("n1"), JInt("n2"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "slag2", JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloat("safmin"), JFloatW("scale1"), JFloatW("scale2"), JFloatW("wr1"), JFloatW("wr2"), JFloatW("wi")) + routine ("lapack", "slag2d", JInt("m"), JInt("n"), JFloatArray("sa"), JInt("ldsa"), JDoubleArray("a"), JInt("lda"), JIntW("info")) + routine ("lapack", "slags2", JBoolean("upper"), JFloat("a1"), JFloat("a2"), JFloat("a3"), JFloat("b1"), JFloat("b2"), JFloat("b3"), JFloatW("csu"), JFloatW("snu"), JFloatW("csv"), JFloatW("snv"), JFloatW("csq"), JFloatW("snq")) + routine ("lapack", "slagtf", JInt("n"), JFloatArray("a"), JFloat("lambda"), JFloatArray("b"), JFloatArray("c"), JFloat("tol"), JFloatArray("d"), JIntArray("in"), JIntW("info")) + routine ("lapack", "slagtm", JString("trans"), JInt("n"), JInt("nrhs"), JFloat("alpha"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("x"), JInt("ldx"), JFloat("beta"), JFloatArray("b"), JInt("ldb")) + routine ("lapack", "slagts", JInt("job"), JInt("n"), JFloatArray("a"), JFloatArray("b"), JFloatArray("c"), JFloatArray("d"), JIntArray("in"), JFloatArray("y"), JFloatW("tol"), JIntW("info")) + routine ("lapack", "slagv2", JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatW("csl"), JFloatW("snl"), JFloatW("csr"), JFloatW("snr")) + routine ("lapack", "slahqr", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JInt("iloz"), JInt("ihiz"), JFloatArray("z"), JInt("ldz"), JIntW("info")) + routine ("lapack", "slahr2", JInt("n"), JInt("k"), JInt("nb"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("t"), JInt("ldt"), JFloatArray("y"), JInt("ldy")) + routine ("lapack", "slahrd", JInt("n"), JInt("k"), JInt("nb"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("t"), JInt("ldt"), JFloatArray("y"), JInt("ldy")) + routine ("lapack", "slaic1", JInt("job"), JInt("j"), JFloatArray("x"), JFloat("sest"), JFloatArray("w"), JFloat("gamma"), JFloatW("sestpr"), JFloatW("s"), JFloatW("c")) + routine_r("lapack", JBooleanR(), "slaisnan", JFloat("sin1"), JFloat("sin2")) + routine ("lapack", "slaln2", JBoolean("ltrans"), JInt("na"), JInt("nw"), JFloat("smin"), JFloat("ca"), JFloatArray("a"), JInt("lda"), JFloat("d1"), JFloat("d2"), JFloatArray("b"), JInt("ldb"), JFloat("wr"), JFloat("wi"), JFloatArray("x"), JInt("ldx"), JFloatW("scale"), JFloatW("xnorm"), JIntW("info")) + routine ("lapack", "slals0", JInt("icompq"), JInt("nl"), JInt("nr"), JInt("sqre"), JInt("nrhs"), JFloatArray("b"), JInt("ldb"), JFloatArray("bx"), JInt("ldbx"), JIntArray("perm"), JInt("givptr"), JIntArray("givcol"), JInt("ldgcol"), JFloatArray("givnum"), JInt("ldgnum"), JFloatArray("poles"), JFloatArray("difl"), JFloatArray("difr"), JFloatArray("z"), JInt("k"), JFloat("c"), JFloat("s"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "slalsa", JInt("icompq"), JInt("smlsiz"), JInt("n"), JInt("nrhs"), JFloatArray("b"), JInt("ldb"), JFloatArray("bx"), JInt("ldbx"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JIntArray("k"), JFloatArray("difl"), JFloatArray("difr"), JFloatArray("z"), JFloatArray("poles"), JIntArray("givptr"), JIntArray("givcol"), JInt("ldgcol"), JIntArray("perm"), JFloatArray("givnum"), JFloatArray("c"), JFloatArray("s"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "slalsd", JString("uplo"), JInt("smlsiz"), JInt("n"), JInt("nrhs"), JFloatArray("d"), JFloatArray("e"), JFloatArray("b"), JInt("ldb"), JFloat("rcond"), JIntW("rank"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "slamrg", JInt("n1"), JInt("n2"), JFloatArray("a"), JInt("strd1"), JInt("strd2"), JIntArray("index")) + routine_r("lapack", JIntR(), "slaneg", JInt("n"), JFloatArray("d"), JFloatArray("lld"), JFloat("sigma"), JFloat("pivmin"), JInt("r")) + routine_r("lapack", JFloatR(), "slangb", JString("norm"), JInt("n"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JFloatArray("work")) + routine_r("lapack", JFloatR(), "slange", JString("norm"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("work")) + routine_r("lapack", JFloatR(), "slangt", JString("norm"), JInt("n"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du")) + routine_r("lapack", JFloatR(), "slanhs", JString("norm"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("work")) + routine_r("lapack", JFloatR(), "slansb", JString("norm"), JString("uplo"), JInt("n"), JInt("k"), JFloatArray("ab"), JInt("ldab"), JFloatArray("work")) + routine_r("lapack", JFloatR(), "slansp", JString("norm"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("work")) + routine_r("lapack", JFloatR(), "slanst", JString("norm"), JInt("n"), JFloatArray("d"), JFloatArray("e")) + routine_r("lapack", JFloatR(), "slansy", JString("norm"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("work")) + routine_r("lapack", JFloatR(), "slantb", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JInt("k"), JFloatArray("ab"), JInt("ldab"), JFloatArray("work")) + routine_r("lapack", JFloatR(), "slantp", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JFloatArray("ap"), JFloatArray("work")) + routine_r("lapack", JFloatR(), "slantr", JString("norm"), JString("uplo"), JString("diag"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("work")) + routine ("lapack", "slanv2", JFloatW("a"), JFloatW("b"), JFloatW("c"), JFloatW("d"), JFloatW("rt1r"), JFloatW("rt1i"), JFloatW("rt2r"), JFloatW("rt2i"), JFloatW("cs"), JFloatW("sn")) + routine ("lapack", "slapll", JInt("n"), JFloatArray("x"), JInt("incx"), JFloatArray("y"), JInt("incy"), JFloatW("ssmin")) + routine ("lapack", "slapmt", JBoolean("forwrd"), JInt("m"), JInt("n"), JFloatArray("x"), JInt("ldx"), JIntArray("k")) + routine_r("lapack", JFloatR(), "slapy2", JFloat("x"), JFloat("y")) + routine_r("lapack", JFloatR(), "slapy3", JFloat("x"), JFloat("y"), JFloat("z")) + routine ("lapack", "slaqgb", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JFloatArray("r"), JFloatArray("c"), JFloat("rowcnd"), JFloat("colcnd"), JFloat("amax"), JStringW("equed")) + routine ("lapack", "slaqge", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("r"), JFloatArray("c"), JFloat("rowcnd"), JFloat("colcnd"), JFloat("amax"), JStringW("equed")) + routine ("lapack", "slaqp2", JInt("m"), JInt("n"), JInt("offset"), JFloatArray("a"), JInt("lda"), JIntArray("jpvt"), JFloatArray("tau"), JFloatArray("vn1"), JFloatArray("vn2"), JFloatArray("work")) + routine ("lapack", "slaqps", JInt("m"), JInt("n"), JInt("offset"), JInt("nb"), JIntW("kb"), JFloatArray("a"), JInt("lda"), JIntArray("jpvt"), JFloatArray("tau"), JFloatArray("vn1"), JFloatArray("vn2"), JFloatArray("auxv"), JFloatArray("f"), JInt("ldf")) + routine ("lapack", "slaqr0", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JInt("iloz"), JInt("ihiz"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "slaqr1", JInt("n"), JFloatArray("h"), JInt("ldh"), JFloat("sr1"), JFloat("si1"), JFloat("sr2"), JFloat("si2"), JFloatArray("v")) + routine ("lapack", "slaqr2", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ktop"), JInt("kbot"), JInt("nw"), JFloatArray("h"), JInt("ldh"), JInt("iloz"), JInt("ihiz"), JFloatArray("z"), JInt("ldz"), JIntW("ns"), JIntW("nd"), JFloatArray("sr"), JFloatArray("si"), JFloatArray("v"), JInt("ldv"), JInt("nh"), JFloatArray("t"), JInt("ldt"), JInt("nv"), JFloatArray("wv"), JInt("ldwv"), JFloatArray("work"), JInt("lwork")) + routine ("lapack", "slaqr3", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ktop"), JInt("kbot"), JInt("nw"), JFloatArray("h"), JInt("ldh"), JInt("iloz"), JInt("ihiz"), JFloatArray("z"), JInt("ldz"), JIntW("ns"), JIntW("nd"), JFloatArray("sr"), JFloatArray("si"), JFloatArray("v"), JInt("ldv"), JInt("nh"), JFloatArray("t"), JInt("ldt"), JInt("nv"), JFloatArray("wv"), JInt("ldwv"), JFloatArray("work"), JInt("lwork")) + routine ("lapack", "slaqr4", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JInt("iloz"), JInt("ihiz"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "slaqr5", JBoolean("wantt"), JBoolean("wantz"), JInt("kacc22"), JInt("n"), JInt("ktop"), JInt("kbot"), JInt("nshfts"), JFloatArray("sr"), JFloatArray("si"), JFloatArray("h"), JInt("ldh"), JInt("iloz"), JInt("ihiz"), JFloatArray("z"), JInt("ldz"), JFloatArray("v"), JInt("ldv"), JFloatArray("u"), JInt("ldu"), JInt("nv"), JFloatArray("wv"), JInt("ldwv"), JInt("nh"), JFloatArray("wh"), JInt("ldwh")) + routine ("lapack", "slaqsb", JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("s"), JFloat("scond"), JFloat("amax"), JStringW("equed")) + routine ("lapack", "slaqsp", JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("s"), JFloat("scond"), JFloat("amax"), JStringW("equed")) + routine ("lapack", "slaqsy", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("s"), JFloat("scond"), JFloat("amax"), JStringW("equed")) + routine ("lapack", "slaqtr", JBoolean("ltran"), JBoolean("lreal"), JInt("n"), JFloatArray("t"), JInt("ldt"), JFloatArray("b"), JFloat("w"), JFloatW("scale"), JFloatArray("x"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "slar1v", JInt("n"), JInt("b1"), JInt("bn"), JFloat("lambda"), JFloatArray("d"), JFloatArray("l"), JFloatArray("ld"), JFloatArray("lld"), JFloat("pivmin"), JFloat("gaptol"), JFloatArray("z"), JBoolean("wantnc"), JIntW("negcnt"), JFloatW("ztz"), JFloatW("mingma"), JIntW("r"), JIntArray("isuppz"), JFloatW("nrminv"), JFloatW("resid"), JFloatW("rqcorr"), JFloatArray("work")) + routine ("lapack", "slar2v", JInt("n"), JFloatArray("x"), JFloatArray("y"), JFloatArray("z"), JInt("incx"), JFloatArray("c"), JFloatArray("s"), JInt("incc")) + routine ("lapack", "slarf", JString("side"), JInt("m"), JInt("n"), JFloatArray("v"), JInt("incv"), JFloat("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work")) + routine ("lapack", "slarfb", JString("side"), JString("trans"), JString("direct"), JString("storev"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("v"), JInt("ldv"), JFloatArray("t"), JInt("ldt"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("ldwork")) + routine ("lapack", "slarfg", JInt("n"), JFloatW("alpha"), JFloatArray("x"), JInt("incx"), JFloatW("tau")) + routine ("lapack", "slarft", JString("direct"), JString("storev"), JInt("n"), JInt("k"), JFloatArray("v"), JInt("ldv"), JFloatArray("tau"), JFloatArray("t"), JInt("ldt")) + routine ("lapack", "slarfx", JString("side"), JInt("m"), JInt("n"), JFloatArray("v"), JFloat("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work")) + routine ("lapack", "slargv", JInt("n"), JFloatArray("x"), JInt("incx"), JFloatArray("y"), JInt("incy"), JFloatArray("c"), JInt("incc")) + routine ("lapack", "slarnv", JInt("idist"), JIntArray("iseed"), JInt("n"), JFloatArray("x")) + routine ("lapack", "slarra", JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("e2"), JFloat("spltol"), JFloat("tnrm"), JIntW("nsplit"), JIntArray("isplit"), JIntW("info")) + routine ("lapack", "slarrb", JInt("n"), JFloatArray("d"), JFloatArray("lld"), JInt("ifirst"), JInt("ilast"), JFloat("rtol1"), JFloat("rtol2"), JInt("offset"), JFloatArray("w"), JFloatArray("wgap"), JFloatArray("werr"), JFloatArray("work"), JIntArray("iwork"), JFloat("pivmin"), JFloat("spdiam"), JInt("twist"), JIntW("info")) + routine ("lapack", "slarrc", JString("jobt"), JInt("n"), JFloat("vl"), JFloat("vu"), JFloatArray("d"), JFloatArray("e"), JFloat("pivmin"), JIntW("eigcnt"), JIntW("lcnt"), JIntW("rcnt"), JIntW("info")) + routine ("lapack", "slarrd", JString("range"), JString("order"), JInt("n"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloatArray("gers"), JFloat("reltol"), JFloatArray("d"), JFloatArray("e"), JFloatArray("e2"), JFloat("pivmin"), JInt("nsplit"), JIntArray("isplit"), JIntW("m"), JFloatArray("w"), JFloatArray("werr"), JFloatW("wl"), JFloatW("wu"), JIntArray("iblock"), JIntArray("indexw"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "slarre", JString("range"), JInt("n"), JFloatW("vl"), JFloatW("vu"), JInt("il"), JInt("iu"), JFloatArray("d"), JFloatArray("e"), JFloatArray("e2"), JFloat("rtol1"), JFloat("rtol2"), JFloat("spltol"), JIntW("nsplit"), JIntArray("isplit"), JIntW("m"), JFloatArray("w"), JFloatArray("werr"), JFloatArray("wgap"), JIntArray("iblock"), JIntArray("indexw"), JFloatArray("gers"), JFloatW("pivmin"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "slarrf", JInt("n"), JFloatArray("d"), JFloatArray("l"), JFloatArray("ld"), JInt("clstrt"), JInt("clend"), JFloatArray("w"), JFloatArray("wgap"), JFloatArray("werr"), JFloat("spdiam"), JFloat("clgapl"), JFloat("clgapr"), JFloat("pivmin"), JFloatW("sigma"), JFloatArray("dplus"), JFloatArray("lplus"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "slarrj", JInt("n"), JFloatArray("d"), JFloatArray("e2"), JInt("ifirst"), JInt("ilast"), JFloat("rtol"), JInt("offset"), JFloatArray("w"), JFloatArray("werr"), JFloatArray("work"), JIntArray("iwork"), JFloat("pivmin"), JFloat("spdiam"), JIntW("info")) + routine ("lapack", "slarrk", JInt("n"), JInt("iw"), JFloat("gl"), JFloat("gu"), JFloatArray("d"), JFloatArray("e2"), JFloat("pivmin"), JFloat("reltol"), JFloatW("w"), JFloatW("werr"), JIntW("info")) + routine ("lapack", "slarrr", JInt("n"), JFloatArray("d"), JFloatArray("e"), JIntW("info")) + routine ("lapack", "slarrv", JInt("n"), JFloat("vl"), JFloat("vu"), JFloatArray("d"), JFloatArray("l"), JFloat("pivmin"), JIntArray("isplit"), JInt("m"), JInt("dol"), JInt("dou"), JFloat("minrgp"), JFloatW("rtol1"), JFloatW("rtol2"), JFloatArray("w"), JFloatArray("werr"), JFloatArray("wgap"), JIntArray("iblock"), JIntArray("indexw"), JFloatArray("gers"), JFloatArray("z"), JInt("ldz"), JIntArray("isuppz"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "slartg", JFloat("f"), JFloat("g"), JFloatW("cs"), JFloatW("sn"), JFloatW("r")) + routine ("lapack", "slartv", JInt("n"), JFloatArray("x"), JInt("incx"), JFloatArray("y"), JInt("incy"), JFloatArray("c"), JFloatArray("s"), JInt("incc")) + routine ("lapack", "slaruv", JIntArray("iseed"), JInt("n"), JFloatArray("x")) + routine ("lapack", "slarz", JString("side"), JInt("m"), JInt("n"), JInt("l"), JFloatArray("v"), JInt("incv"), JFloat("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work")) + routine ("lapack", "slarzb", JString("side"), JString("trans"), JString("direct"), JString("storev"), JInt("m"), JInt("n"), JInt("k"), JInt("l"), JFloatArray("v"), JInt("ldv"), JFloatArray("t"), JInt("ldt"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("ldwork")) + routine ("lapack", "slarzt", JString("direct"), JString("storev"), JInt("n"), JInt("k"), JFloatArray("v"), JInt("ldv"), JFloatArray("tau"), JFloatArray("t"), JInt("ldt")) + routine ("lapack", "slas2", JFloat("f"), JFloat("g"), JFloat("h"), JFloatW("ssmin"), JFloatW("ssmax")) + routine ("lapack", "slascl", JString("type"), JInt("kl"), JInt("ku"), JFloat("cfrom"), JFloat("cto"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) + routine ("lapack", "slasd0", JInt("n"), JInt("sqre"), JFloatArray("d"), JFloatArray("e"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JInt("ldvt"), JInt("smlsiz"), JIntArray("iwork"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "slasd1", JInt("nl"), JInt("nr"), JInt("sqre"), JFloatArray("d"), JFloatW("alpha"), JFloatW("beta"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JInt("ldvt"), JIntArray("idxq"), JIntArray("iwork"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "slasd2", JInt("nl"), JInt("nr"), JInt("sqre"), JIntW("k"), JFloatArray("d"), JFloatArray("z"), JFloat("alpha"), JFloat("beta"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("dsigma"), JFloatArray("u2"), JInt("ldu2"), JFloatArray("vt2"), JInt("ldvt2"), JIntArray("idxp"), JIntArray("idx"), JIntArray("idxc"), JIntArray("idxq"), JIntArray("coltyp"), JIntW("info")) + routine ("lapack", "slasd3", JInt("nl"), JInt("nr"), JInt("sqre"), JInt("k"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JFloatArray("dsigma"), JFloatArray("u"), JInt("ldu"), JFloatArray("u2"), JInt("ldu2"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("vt2"), JInt("ldvt2"), JIntArray("idxc"), JIntArray("ctot"), JFloatArray("z"), JIntW("info")) + routine ("lapack", "slasd4", JInt("n"), JInt("i"), JFloatArray("d"), JFloatArray("z"), JFloatArray("delta"), JFloat("rho"), JFloatW("sigma"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "slasd5", JInt("i"), JFloatArray("d"), JFloatArray("z"), JFloatArray("delta"), JFloat("rho"), JFloatW("dsigma"), JFloatArray("work")) + routine ("lapack", "slasd6", JInt("icompq"), JInt("nl"), JInt("nr"), JInt("sqre"), JFloatArray("d"), JFloatArray("vf"), JFloatArray("vl"), JFloatW("alpha"), JFloatW("beta"), JIntArray("idxq"), JIntArray("perm"), JIntW("givptr"), JIntArray("givcol"), JInt("ldgcol"), JFloatArray("givnum"), JInt("ldgnum"), JFloatArray("poles"), JFloatArray("difl"), JFloatArray("difr"), JFloatArray("z"), JIntW("k"), JFloatW("c"), JFloatW("s"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "slasd7", JInt("icompq"), JInt("nl"), JInt("nr"), JInt("sqre"), JIntW("k"), JFloatArray("d"), JFloatArray("z"), JFloatArray("zw"), JFloatArray("vf"), JFloatArray("vfw"), JFloatArray("vl"), JFloatArray("vlw"), JFloat("alpha"), JFloat("beta"), JFloatArray("dsigma"), JIntArray("idx"), JIntArray("idxp"), JIntArray("idxq"), JIntArray("perm"), JIntW("givptr"), JIntArray("givcol"), JInt("ldgcol"), JFloatArray("givnum"), JInt("ldgnum"), JFloatW("c"), JFloatW("s"), JIntW("info")) + routine ("lapack", "slasd8", JInt("icompq"), JInt("k"), JFloatArray("d"), JFloatArray("z"), JFloatArray("vf"), JFloatArray("vl"), JFloatArray("difl"), JFloatArray("difr"), JInt("lddifr"), JFloatArray("dsigma"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "slasda", JInt("icompq"), JInt("smlsiz"), JInt("n"), JInt("sqre"), JFloatArray("d"), JFloatArray("e"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JIntArray("k"), JFloatArray("difl"), JFloatArray("difr"), JFloatArray("z"), JFloatArray("poles"), JIntArray("givptr"), JIntArray("givcol"), JInt("ldgcol"), JIntArray("perm"), JFloatArray("givnum"), JFloatArray("c"), JFloatArray("s"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "slasdq", JString("uplo"), JInt("sqre"), JInt("n"), JInt("ncvt"), JInt("nru"), JInt("ncc"), JFloatArray("d"), JFloatArray("e"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("u"), JInt("ldu"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "slasdt", JInt("n"), JIntW("lvl"), JIntW("nd"), JIntArray("inode"), JIntArray("ndiml"), JIntArray("ndimr"), JInt("msub")) + routine ("lapack", "slaset", JString("uplo"), JInt("m"), JInt("n"), JFloat("alpha"), JFloat("beta"), JFloatArray("a"), JInt("lda")) + routine ("lapack", "slasq1", JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "slasq2", JInt("n"), JFloatArray("z"), JIntW("info")) + routine ("lapack", "slasq3", JInt("i0"), JIntW("n0"), JFloatArray("z"), JInt("pp"), JFloatW("dmin"), JFloatW("sigma"), JFloatW("desig"), JFloatW("qmax"), JIntW("nfail"), JIntW("iter"), JIntW("ndiv"), JBoolean("ieee")) + routine ("lapack", "slasq4", JInt("i0"), JInt("n0"), JFloatArray("z"), JInt("pp"), JInt("n0in"), JFloat("dmin"), JFloat("dmin1"), JFloat("dmin2"), JFloat("dn"), JFloat("dn1"), JFloat("dn2"), JFloatW("tau"), JIntW("ttype")) + routine ("lapack", "slasq5", JInt("i0"), JInt("n0"), JFloatArray("z"), JInt("pp"), JFloat("tau"), JFloatW("dmin"), JFloatW("dmin1"), JFloatW("dmin2"), JFloatW("dn"), JFloatW("dnm1"), JFloatW("dnm2"), JBoolean("ieee")) + routine ("lapack", "slasq6", JInt("i0"), JInt("n0"), JFloatArray("z"), JInt("pp"), JFloatW("dmin"), JFloatW("dmin1"), JFloatW("dmin2"), JFloatW("dn"), JFloatW("dnm1"), JFloatW("dnm2")) + routine ("lapack", "slasr", JString("side"), JString("pivot"), JString("direct"), JInt("m"), JInt("n"), JFloatArray("c"), JFloatArray("s"), JFloatArray("a"), JInt("lda")) + routine ("lapack", "slasrt", JString("id"), JInt("n"), JFloatArray("d"), JIntW("info")) + routine ("lapack", "slassq", JInt("n"), JFloatArray("x"), JInt("incx"), JFloatW("scale"), JFloatW("sumsq")) + routine ("lapack", "slasv2", JFloat("f"), JFloat("g"), JFloat("h"), JFloatW("ssmin"), JFloatW("ssmax"), JFloatW("snr"), JFloatW("csr"), JFloatW("snl"), JFloatW("csl")) + routine ("lapack", "slaswp", JInt("n"), JFloatArray("a"), JInt("lda"), JInt("k1"), JInt("k2"), JIntArray("ipiv"), JInt("incx")) + routine ("lapack", "slasy2", JBoolean("ltranl"), JBoolean("ltranr"), JInt("isgn"), JInt("n1"), JInt("n2"), JFloatArray("tl"), JInt("ldtl"), JFloatArray("tr"), JInt("ldtr"), JFloatArray("b"), JInt("ldb"), JFloatW("scale"), JFloatArray("x"), JInt("ldx"), JFloatW("xnorm"), JIntW("info")) + routine ("lapack", "slasyf", JString("uplo"), JInt("n"), JInt("nb"), JIntW("kb"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("w"), JInt("ldw"), JIntW("info")) + routine ("lapack", "slatbs", JString("uplo"), JString("trans"), JString("diag"), JString("normin"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("x"), JFloatW("scale"), JFloatArray("cnorm"), JIntW("info")) + routine ("lapack", "slatdf", JInt("ijob"), JInt("n"), JFloatArray("z"), JInt("ldz"), JFloatArray("rhs"), JFloatW("rdsum"), JFloatW("rdscal"), JIntArray("ipiv"), JIntArray("jpiv")) + routine ("lapack", "slatps", JString("uplo"), JString("trans"), JString("diag"), JString("normin"), JInt("n"), JFloatArray("ap"), JFloatArray("x"), JFloatW("scale"), JFloatArray("cnorm"), JIntW("info")) + routine ("lapack", "slatrd", JString("uplo"), JInt("n"), JInt("nb"), JFloatArray("a"), JInt("lda"), JFloatArray("e"), JFloatArray("tau"), JFloatArray("w"), JInt("ldw")) + routine ("lapack", "slatrs", JString("uplo"), JString("trans"), JString("diag"), JString("normin"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("x"), JFloatW("scale"), JFloatArray("cnorm"), JIntW("info")) + routine ("lapack", "slatrz", JInt("m"), JInt("n"), JInt("l"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work")) + routine ("lapack", "slatzm", JString("side"), JInt("m"), JInt("n"), JFloatArray("v"), JInt("incv"), JFloat("tau"), JFloatArray("c1"), JFloatArray("c2"), JInt("Ldc"), JFloatArray("work")) + routine ("lapack", "slauu2", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) + routine ("lapack", "slauum", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) + # routine ("lapack", "slazq3", JInt("i0"), JIntW("n0"), JFloatArray("z"), JInt("pp"), JFloatW("dmin"), JFloatW("sigma"), JFloatW("desig"), JFloatW("qmax"), JIntW("nfail"), JIntW("iter"), JIntW("ndiv"), JBoolean("ieee"), JIntW("ttype"), JFloatW("dmin1"), JFloatW("dmin2"), JFloatW("dn"), JFloatW("dn1"), JFloatW("dn2"), JFloatW("tau")) + # routine ("lapack", "slazq4", JInt("i0"), JInt("n0"), JFloatArray("z"), JInt("pp"), JInt("n0in"), JFloat("dmin"), JFloat("dmin1"), JFloat("dmin2"), JFloat("dn"), JFloat("dn1"), JFloat("dn2"), JFloatW("tau"), JIntW("ttype"), JFloatW("g")) + routine ("lapack", "sopgtr", JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("tau"), JFloatArray("q"), JInt("ldq"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "sopmtr", JString("side"), JString("uplo"), JString("trans"), JInt("m"), JInt("n"), JFloatArray("ap"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "sorg2l", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "sorg2r", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "sorgbr", JString("vect"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sorghr", JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sorgl2", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "sorglq", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sorgql", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sorgqr", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sorgr2", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "sorgrq", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sorgtr", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sorm2l", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "sorm2r", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "sormbr", JString("vect"), JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sormhr", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sorml2", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "sormlq", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sormql", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sormqr", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sormr2", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "sormr3", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JInt("l"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "sormrq", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sormrz", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JInt("l"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "sormtr", JString("side"), JString("uplo"), JString("trans"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "spbcon", JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "spbequ", JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("s"), JFloatW("scond"), JFloatW("amax"), JIntW("info")) + routine ("lapack", "spbrfs", JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("afb"), JInt("ldafb"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "spbstf", JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JIntW("info")) + routine ("lapack", "spbsv", JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "spbsvx", JString("fact"), JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("afb"), JInt("ldafb"), JStringW("equed"), JFloatArray("s"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "spbtf2", JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JIntW("info")) + routine ("lapack", "spbtrf", JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JIntW("info")) + routine ("lapack", "spbtrs", JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "spocon", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "spoequ", JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("s"), JFloatW("scond"), JFloatW("amax"), JIntW("info")) + routine ("lapack", "sporfs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("af"), JInt("ldaf"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "sposv", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "sposvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("af"), JInt("ldaf"), JStringW("equed"), JFloatArray("s"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "spotf2", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) + routine ("lapack", "spotrf", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) + routine ("lapack", "spotri", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) + routine ("lapack", "spotrs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "sppcon", JString("uplo"), JInt("n"), JFloatArray("ap"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "sppequ", JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("s"), JFloatW("scond"), JFloatW("amax"), JIntW("info")) + routine ("lapack", "spprfs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("afp"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "sppsv", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "sppsvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("afp"), JStringW("equed"), JFloatArray("s"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "spptrf", JString("uplo"), JInt("n"), JFloatArray("ap"), JIntW("info")) + routine ("lapack", "spptri", JString("uplo"), JInt("n"), JFloatArray("ap"), JIntW("info")) + routine ("lapack", "spptrs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "sptcon", JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "spteqr", JString("compz"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "sptrfs", JInt("n"), JInt("nrhs"), JFloatArray("d"), JFloatArray("e"), JFloatArray("df"), JFloatArray("ef"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "sptsv", JInt("n"), JInt("nrhs"), JFloatArray("d"), JFloatArray("e"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "sptsvx", JString("fact"), JInt("n"), JInt("nrhs"), JFloatArray("d"), JFloatArray("e"), JFloatArray("df"), JFloatArray("ef"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "spttrf", JInt("n"), JFloatArray("d"), JFloatArray("e"), JIntW("info")) + routine ("lapack", "spttrs", JInt("n"), JInt("nrhs"), JFloatArray("d"), JFloatArray("e"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "sptts2", JInt("n"), JInt("nrhs"), JFloatArray("d"), JFloatArray("e"), JFloatArray("b"), JInt("ldb")) + routine ("lapack", "srscl", JInt("n"), JFloat("sa"), JFloatArray("sx"), JInt("incx")) + routine ("lapack", "ssbev", JString("jobz"), JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "ssbevd", JString("jobz"), JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + routine ("lapack", "ssbevx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("q"), JInt("ldq"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + routine ("lapack", "ssbgst", JString("vect"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JFloatArray("ab"), JInt("ldab"), JFloatArray("bb"), JInt("ldbb"), JFloatArray("x"), JInt("ldx"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "ssbgv", JString("jobz"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JFloatArray("ab"), JInt("ldab"), JFloatArray("bb"), JInt("ldbb"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "ssbgvd", JString("jobz"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JFloatArray("ab"), JInt("ldab"), JFloatArray("bb"), JInt("ldbb"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + routine ("lapack", "ssbgvx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JFloatArray("ab"), JInt("ldab"), JFloatArray("bb"), JInt("ldbb"), JFloatArray("q"), JInt("ldq"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + routine ("lapack", "ssbtrd", JString("vect"), JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("d"), JFloatArray("e"), JFloatArray("q"), JInt("ldq"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "sspcon", JString("uplo"), JInt("n"), JFloatArray("ap"), JIntArray("ipiv"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "sspev", JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "sspevd", JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + routine ("lapack", "sspevx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + routine ("lapack", "sspgst", JInt("itype"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("bp"), JIntW("info")) + routine ("lapack", "sspgv", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("bp"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "sspgvd", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("bp"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + routine ("lapack", "sspgvx", JInt("itype"), JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("bp"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + routine ("lapack", "ssprfs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("afp"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "sspsv", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "sspsvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("afp"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "ssptrd", JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("d"), JFloatArray("e"), JFloatArray("tau"), JIntW("info")) + routine ("lapack", "ssptrf", JString("uplo"), JInt("n"), JFloatArray("ap"), JIntArray("ipiv"), JIntW("info")) + routine ("lapack", "ssptri", JString("uplo"), JInt("n"), JFloatArray("ap"), JIntArray("ipiv"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "ssptrs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "sstebz", JString("range"), JString("order"), JInt("n"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JFloatArray("d"), JFloatArray("e"), JIntW("m"), JIntW("nsplit"), JFloatArray("w"), JIntArray("iblock"), JIntArray("isplit"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "sstedc", JString("compz"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + routine ("lapack", "sstegr", JString("jobz"), JString("range"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JIntArray("isuppz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + routine ("lapack", "sstein", JInt("n"), JFloatArray("d"), JFloatArray("e"), JInt("m"), JFloatArray("w"), JIntArray("iblock"), JIntArray("isplit"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + routine ("lapack", "sstemr", JString("jobz"), JString("range"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JInt("nzc"), JIntArray("isuppz"), JBooleanW("tryrac"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + routine ("lapack", "ssteqr", JString("compz"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "ssterf", JInt("n"), JFloatArray("d"), JFloatArray("e"), JIntW("info")) + routine ("lapack", "sstev", JString("jobz"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "sstevd", JString("jobz"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + routine ("lapack", "sstevr", JString("jobz"), JString("range"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JIntArray("isuppz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + routine ("lapack", "sstevx", JString("jobz"), JString("range"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + routine ("lapack", "ssycon", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "ssyev", JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("w"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "ssyevd", JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("w"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + routine ("lapack", "ssyevr", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JIntArray("isuppz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + routine ("lapack", "ssyevx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + routine ("lapack", "ssygs2", JInt("itype"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "ssygst", JInt("itype"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "ssygv", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("w"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "ssygvd", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("w"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + routine ("lapack", "ssygvx", JInt("itype"), JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + routine ("lapack", "ssyrfs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("af"), JInt("ldaf"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "ssysv", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "ssysvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("af"), JInt("ldaf"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "ssytd2", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("d"), JFloatArray("e"), JFloatArray("tau"), JIntW("info")) + routine ("lapack", "ssytf2", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JIntW("info")) + routine ("lapack", "ssytrd", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("d"), JFloatArray("e"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "ssytrf", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "ssytri", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "ssytrs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "stbcon", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "stbrfs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("kd"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "stbtrs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("kd"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "stgevc", JString("side"), JString("howmny"), JBooleanArray("select"), JInt("n"), JFloatArray("s"), JInt("lds"), JFloatArray("p"), JInt("ldp"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JInt("mm"), JIntW("m"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "stgex2", JBoolean("wantq"), JBoolean("wantz"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("q"), JInt("ldq"), JFloatArray("z"), JInt("ldz"), JInt("j1"), JInt("n1"), JInt("n2"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "stgexc", JBoolean("wantq"), JBoolean("wantz"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("q"), JInt("ldq"), JFloatArray("z"), JInt("ldz"), JIntW("ifst"), JIntW("ilst"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine ("lapack", "stgsen", JInt("ijob"), JBoolean("wantq"), JBoolean("wantz"), JBooleanArray("select"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("q"), JInt("ldq"), JFloatArray("z"), JInt("ldz"), JIntW("m"), JFloatW("pl"), JFloatW("pr"), JFloatArray("dif"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + routine ("lapack", "stgsja", JString("jobu"), JString("jobv"), JString("jobq"), JInt("m"), JInt("p"), JInt("n"), JInt("k"), JInt("l"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloat("tola"), JFloat("tolb"), JFloatArray("alpha"), JFloatArray("beta"), JFloatArray("u"), JInt("ldu"), JFloatArray("v"), JInt("ldv"), JFloatArray("q"), JInt("ldq"), JFloatArray("work"), JIntW("ncycle"), JIntW("info")) + routine ("lapack", "stgsna", JString("job"), JString("howmny"), JBooleanArray("select"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JFloatArray("s"), JFloatArray("dif"), JInt("mm"), JIntW("m"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "stgsy2", JString("trans"), JInt("ijob"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("c"), JInt("Ldc"), JFloatArray("d"), JInt("ldd"), JFloatArray("e"), JInt("lde"), JFloatArray("f"), JInt("ldf"), JFloatW("scale"), JFloatW("rdsum"), JFloatW("rdscal"), JIntArray("iwork"), JIntW("pq"), JIntW("info")) + routine ("lapack", "stgsyl", JString("trans"), JInt("ijob"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("c"), JInt("Ldc"), JFloatArray("d"), JInt("ldd"), JFloatArray("e"), JInt("lde"), JFloatArray("f"), JInt("ldf"), JFloatW("scale"), JFloatW("dif"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "stpcon", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JFloatArray("ap"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "stprfs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "stptri", JString("uplo"), JString("diag"), JInt("n"), JFloatArray("ap"), JIntW("info")) + routine ("lapack", "stptrs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "strcon", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "strevc", JString("side"), JString("howmny"), JBooleanArray("select"), JInt("n"), JFloatArray("t"), JInt("ldt"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JInt("mm"), JIntW("m"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "strexc", JString("compq"), JInt("n"), JFloatArray("t"), JInt("ldt"), JFloatArray("q"), JInt("ldq"), JIntW("ifst"), JIntW("ilst"), JFloatArray("work"), JIntW("info")) + routine ("lapack", "strrfs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "strsen", JString("job"), JString("compq"), JBooleanArray("select"), JInt("n"), JFloatArray("t"), JInt("ldt"), JFloatArray("q"), JInt("ldq"), JFloatArray("wr"), JFloatArray("wi"), JIntW("m"), JFloatW("s"), JFloatW("sep"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + routine ("lapack", "strsna", JString("job"), JString("howmny"), JBooleanArray("select"), JInt("n"), JFloatArray("t"), JInt("ldt"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JFloatArray("s"), JFloatArray("sep"), JInt("mm"), JIntW("m"), JFloatArray("work"), JInt("ldwork"), JIntArray("iwork"), JIntW("info")) + routine ("lapack", "strsyl", JString("trana"), JString("tranb"), JInt("isgn"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("c"), JInt("Ldc"), JFloatW("scale"), JIntW("info")) + routine ("lapack", "strti2", JString("uplo"), JString("diag"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) + routine ("lapack", "strtri", JString("uplo"), JString("diag"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) + routine ("lapack", "strtrs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + routine ("lapack", "stzrqf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JIntW("info")) + routine ("lapack", "stzrzf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + routine_r("lapack", JDoubleR(), "dlamch", JString("cmach")) + # routine ("lapack", "dlamc1", JIntW("beta"), JIntW("t"), JBooleanW("rnd"), JBooleanW("ieee1")) + # routine ("lapack", "dlamc2", JIntW("beta"), JIntW("t"), JBooleanW("rnd"), JDoubleW("eps"), JIntW("emin"), JDoubleW("rmin"), JIntW("emax"), JDoubleW("rmax")) + routine_r("lapack", JDoubleR(), "dlamc3", JDouble("a"), JDouble("b")) + # routine ("lapack", "dlamc4", JIntW("emin"), JDouble("start"), JInt("base")) + # routine ("lapack", "dlamc5", JInt("beta"), JInt("p"), JInt("emin"), JBoolean("ieee"), JIntW("emax"), JDoubleW("rmax")) + routine_r("lapack", JDoubleR(), "dsecnd") + routine_r("lapack", JBooleanR(), "lsame", JString("ca"), JString("cb")) + routine_r("lapack", JFloatR(), "second") + routine_r("lapack", JFloatR(), "slamch", JString("cmach")) + # routine ("lapack", "slamc1", JIntW("beta"), JIntW("t"), JBooleanW("rnd"), JBooleanW("ieee1")) + # routine ("lapack", "slamc2", JIntW("beta"), JIntW("t"), JBooleanW("rnd"), JFloatW("eps"), JIntW("emin"), JFloatW("rmin"), JIntW("emax"), JFloatW("rmax")) + routine_r("lapack", JFloatR(), "slamc3", JFloat("a"), JFloat("b")) + # routine ("lapack", "slamc4", JIntW("emin"), JFloat("start"), JInt("base")) + # routine ("lapack", "slamc5", JInt("beta"), JInt("p"), JInt("emin"), JBoolean("ieee"), JIntW("emax"), JFloatW("rmax")) \ No newline at end of file diff --git a/lapack/src/main/native/jni.c b/lapack/src/main/native/jni.c index d3417fe5..68d0f8d7 100644 --- a/lapack/src/main/native/jni.c +++ b/lapack/src/main/native/jni.c @@ -46,5036 +46,19678 @@ static void throwOOM(JNIEnv *env) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } -static void (*dbdsdc_)(const char *uplo, char *compq, int *n, double *d, double *e, double *u, int *ldu, double *vt, int *ldvt, double *q, int * iq, double *work, int * iwork, int *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dbdsdcK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring compq, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jint ldvt, jdoubleArray q, jint offsetq, jintArray iq, jint offsetiq, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dbdsdc_)(const char *uplo, const char *compq, int *n, double *d, double *e, double *u, int *ldu, double *vt, int *ldvt, double *q, int *iq, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dbdsdcK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring compq, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jint ldvt, jdoubleArray q, jint offsetq, jintArray iq, jint offsetiq, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; const char *__ncompq = NULL; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nu = NULL; double *__nvt = NULL; double *__nq = NULL; int *__niq = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ncompq = (*env)->GetStringUTFChars(env, compq, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__niq = (*env)->GetPrimitiveArrayCritical(env, iq, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dbdsdc_(__nuplo, __ncompq, &n, __nd + offsetd, __ne + offsete, __nu + offsetu, &ldu, __nvt + offsetvt, &ldvt, __nq + offsetq, __niq + offsetiq, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__niq) (*env)->ReleasePrimitiveArrayCritical(env, iq, __niq, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ncompq) (*env)->ReleaseStringUTFChars(env, compq, __ncompq); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dbdsqr_)(const char *uplo, int *n, int *ncvt, int *nru, int *ncc, double *d, double *e, double *vt, int *ldvt, double *u, int *ldu, double *c, int *Ldc, double *work, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dbdsqrK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint ncvt, jint nru, jint ncc, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray vt, jint offsetvt, jint ldvt, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dbdsqr_)(const char *uplo, int *n, int *ncvt, int *nru, int *ncc, double *d, double *e, double *vt, int *ldvt, double *u, int *ldu, double *c, int *Ldc, double *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dbdsqrK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint ncvt, jint nru, jint ncc, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray vt, jint offsetvt, jint ldvt, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nvt = NULL; double *__nu = NULL; double *__nc = NULL; double *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dbdsqr_(__nuplo, &n, &ncvt, &nru, &ncc, __nd + offsetd, __ne + offsete, __nvt + offsetvt, &ldvt, __nu + offsetu, &ldu, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ddisna_)(char *job, int *m, int *n, double *d, double *sep, /*FIXME*/void *info); +static void (*ddisna_)(const char *job, int *m, int *n, double *d, double *sep, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ddisnaK(JNIEnv *env, UNUSED jobject obj, - jstring job, jint m, jint n, jdoubleArray d, jint offsetd, jdoubleArray sep, jint offsetsep, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ddisnaK(JNIEnv *env, UNUSED jobject obj, jstring job, jint m, jint n, jdoubleArray d, jint offsetd, jdoubleArray sep, jint offsetsep, jobject info) { + jboolean failed = FALSE; + const char *__njob = NULL; int __ninfo = 0; double *__nd = NULL; double *__nsep = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nsep = (*env)->GetPrimitiveArrayCritical(env, sep, NULL))) goto fail; + ddisna_(__njob, &m, &n, __nd + offsetd, __nsep + offsetsep, &__ninfo); +done: + if (__nsep) (*env)->ReleasePrimitiveArrayCritical(env, sep, __nsep, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgbbrd_)(char *vect, int *m, int *n, int *ncc, int *kl, int *ku, double *ab, int *ldab, double *d, double *e, double *q, int *ldq, double *pt, int *ldpt, double *c, int *Ldc, double *work, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbbrdK(JNIEnv *env, UNUSED jobject obj, - jstring vect, jint m, jint n, jint ncc, jint kl, jint ku, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray pt, jint offsetpt, jint ldpt, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dgbbrd_)(const char *vect, int *m, int *n, int *ncc, int *kl, int *ku, double *ab, int *ldab, double *d, double *e, double *q, int *ldq, double *pt, int *ldpt, double *c, int *Ldc, double *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbbrdK(JNIEnv *env, UNUSED jobject obj, jstring vect, jint m, jint n, jint ncc, jint kl, jint ku, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray pt, jint offsetpt, jint ldpt, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nvect = NULL; int __ninfo = 0; double *__nab = NULL; double *__nd = NULL; double *__ne = NULL; double *__nq = NULL; double *__npt = NULL; double *__nc = NULL; double *__nwork = NULL; + if (!(__nvect = (*env)->GetStringUTFChars(env, vect, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__npt = (*env)->GetPrimitiveArrayCritical(env, pt, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dgbbrd_(__nvect, &m, &n, &ncc, &kl, &ku, __nab + offsetab, &ldab, __nd + offsetd, __ne + offsete, __nq + offsetq, &ldq, __npt + offsetpt, &ldpt, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__npt) (*env)->ReleasePrimitiveArrayCritical(env, pt, __npt, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nvect) (*env)->ReleaseStringUTFChars(env, vect, __nvect); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgbcon_)(char *norm, int *n, int *kl, int *ku, double *ab, int *ldab, int * ipiv, double *anorm, /*FIXME*/void *rcond, double *work, int * iwork, /*FIXME*/void *info); +static void (*dgbcon_)(const char *norm, int *n, int *kl, int *ku, double *ab, int *ldab, int *ipiv, double *anorm, double *rcond, double *work, int *iwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbconK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jint n, jint kl, jint ku, jdoubleArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbconK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jint kl, jint ku, jdoubleArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nnorm = NULL; double __nrcond = 0; int __ninfo = 0; double *__nab = NULL; int *__nipiv = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dgbcon_(__nnorm, &n, &kl, &ku, __nab + offsetab, &ldab, __nipiv + offsetipiv, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgbequ_)(int *m, int *n, int *kl, int *ku, double *ab, int *ldab, double *r, double *c, /*FIXME*/void *rowcnd, /*FIXME*/void *colcnd, /*FIXME*/void *amax, /*FIXME*/void *info); +static void (*dgbequ_)(int *m, int *n, int *kl, int *ku, double *ab, int *ldab, double *r, double *c, double *rowcnd, double *colcnd, double *amax, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbequK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint kl, jint ku, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray r, jint offsetr, jdoubleArray c, jint offsetc, jobject rowcnd, jobject colcnd, jobject amax, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbequK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint kl, jint ku, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray r, jint offsetr, jdoubleArray c, jint offsetc, jobject rowcnd, jobject colcnd, jobject amax, jobject info) { + jboolean failed = FALSE; + double __nrowcnd = 0; double __ncolcnd = 0; double __namax = 0; int __ninfo = 0; double *__nab = NULL; double *__nr = NULL; double *__nc = NULL; + __nrowcnd = (*env)->GetDoubleField(env, rowcnd, doubleW_val_fieldID); + __ncolcnd = (*env)->GetDoubleField(env, colcnd, doubleW_val_fieldID); + __namax = (*env)->GetDoubleField(env, amax, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + dgbequ_(&m, &n, &kl, &ku, __nab + offsetab, &ldab, __nr + offsetr, __nc + offsetc, &__nrowcnd, &__ncolcnd, &__namax, &__ninfo); +done: + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, amax, doubleW_val_fieldID, __namax); + if (!failed) (*env)->SetDoubleField(env, colcnd, doubleW_val_fieldID, __ncolcnd); + if (!failed) (*env)->SetDoubleField(env, rowcnd, doubleW_val_fieldID, __nrowcnd); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgbrfs_)(char *trans, int *n, int *kl, int *ku, int *nrhs, double *ab, int *ldab, double *afb, int *ldafb, int * ipiv, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbrfsK(JNIEnv *env, UNUSED jobject obj, - jstring trans, jint n, jint kl, jint ku, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray afb, jint offsetafb, jint ldafb, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dgbrfs_)(const char *trans, int *n, int *kl, int *ku, int *nrhs, double *ab, int *ldab, double *afb, int *ldafb, int *ipiv, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbrfsK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint n, jint kl, jint ku, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray afb, jint offsetafb, jint ldafb, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__ntrans = NULL; int __ninfo = 0; double *__nab = NULL; double *__nafb = NULL; int *__nipiv = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nafb = (*env)->GetPrimitiveArrayCritical(env, afb, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dgbrfs_(__ntrans, &n, &kl, &ku, &nrhs, __nab + offsetab, &ldab, __nafb + offsetafb, &ldafb, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nafb) (*env)->ReleasePrimitiveArrayCritical(env, afb, __nafb, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgbsv_)(int *n, int *kl, int *ku, int *nrhs, double *ab, int *ldab, int * ipiv, double *b, int *ldb, /*FIXME*/void *info); +static void (*dgbsv_)(int *n, int *kl, int *ku, int *nrhs, double *ab, int *ldab, int *ipiv, double *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbsvK(JNIEnv *env, UNUSED jobject obj, - jint n, jint kl, jint ku, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbsvK(JNIEnv *env, UNUSED jobject obj, jint n, jint kl, jint ku, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__nab = NULL; int *__nipiv = NULL; double *__nb = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + dgbsv_(&n, &kl, &ku, &nrhs, __nab + offsetab, &ldab, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgbsvx_)(char *fact, char *trans, int *n, int *kl, int *ku, int *nrhs, double *ab, int *ldab, double *afb, int *ldafb, int * ipiv, jstring *equed, double *r, double *c, double *b, int *ldb, double *x, int *ldx, /*FIXME*/void *rcond, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbsvxK(JNIEnv *env, UNUSED jobject obj, - jstring fact, jstring trans, jint n, jint kl, jint ku, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray afb, jint offsetafb, jint ldafb, jintArray ipiv, jint offsetipiv, jobject equed, jdoubleArray r, jint offsetr, jdoubleArray c, jint offsetc, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dgbsvx_)(const char *fact, const char *trans, int *n, int *kl, int *ku, int *nrhs, double *ab, int *ldab, double *afb, int *ldafb, int *ipiv, char *equed, double *r, double *c, double *b, int *ldb, double *x, int *ldx, double *rcond, double *ferr, double *berr, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbsvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring trans, jint n, jint kl, jint ku, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray afb, jint offsetafb, jint ldafb, jintArray ipiv, jint offsetipiv, jobject equed, jdoubleArray r, jint offsetr, jdoubleArray c, jint offsetc, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nfact = NULL; const char *__ntrans = NULL; char *__nequed = NULL; jstring __jequed = NULL;; double __nrcond = 0; int __ninfo = 0; double *__nab = NULL; double *__nafb = NULL; int *__nipiv = NULL; double *__nr = NULL; double *__nc = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; + __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nafb = (*env)->GetPrimitiveArrayCritical(env, afb, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dgbsvx_(__nfact, __ntrans, &n, &kl, &ku, &nrhs, __nab + offsetab, &ldab, __nafb + offsetafb, &ldafb, __nipiv + offsetipiv, __nequed, __nr + offsetr, __nc + offsetc, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nafb) (*env)->ReleasePrimitiveArrayCritical(env, afb, __nafb, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgbtf2_)(int *m, int *n, int *kl, int *ku, double *ab, int *ldab, int * ipiv, /*FIXME*/void *info); +static void (*dgbtf2_)(int *m, int *n, int *kl, int *ku, double *ab, int *ldab, int *ipiv, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbtf2K(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint kl, jint ku, jdoubleArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbtf2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint kl, jint ku, jdoubleArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__nab = NULL; int *__nipiv = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + dgbtf2_(&m, &n, &kl, &ku, __nab + offsetab, &ldab, __nipiv + offsetipiv, &__ninfo); +done: + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgbtrf_)(int *m, int *n, int *kl, int *ku, double *ab, int *ldab, int * ipiv, /*FIXME*/void *info); +static void (*dgbtrf_)(int *m, int *n, int *kl, int *ku, double *ab, int *ldab, int *ipiv, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbtrfK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint kl, jint ku, jdoubleArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbtrfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint kl, jint ku, jdoubleArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__nab = NULL; int *__nipiv = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + dgbtrf_(&m, &n, &kl, &ku, __nab + offsetab, &ldab, __nipiv + offsetipiv, &__ninfo); +done: + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgbtrs_)(char *trans, int *n, int *kl, int *ku, int *nrhs, double *ab, int *ldab, int * ipiv, double *b, int *ldb, /*FIXME*/void *info); +static void (*dgbtrs_)(const char *trans, int *n, int *kl, int *ku, int *nrhs, double *ab, int *ldab, int *ipiv, double *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbtrsK(JNIEnv *env, UNUSED jobject obj, - jstring trans, jint n, jint kl, jint ku, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbtrsK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint n, jint kl, jint ku, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__ntrans = NULL; int __ninfo = 0; double *__nab = NULL; int *__nipiv = NULL; double *__nb = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + dgbtrs_(__ntrans, &n, &kl, &ku, &nrhs, __nab + offsetab, &ldab, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgebak_)(char *job, char *side, int *n, int *ilo, int *ihi, double *scale, int *m, double *v, int *ldv, /*FIXME*/void *info); +static void (*dgebak_)(const char *job, const char *side, int *n, int *ilo, int *ihi, double *scale, int *m, double *v, int *ldv, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgebakK(JNIEnv *env, UNUSED jobject obj, - jstring job, jstring side, jint n, jint ilo, jint ihi, jdoubleArray scale, jint offsetscale, jint m, jdoubleArray v, jint offsetv, jint ldv, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgebakK(JNIEnv *env, UNUSED jobject obj, jstring job, jstring side, jint n, jint ilo, jint ihi, jdoubleArray scale, jint offsetscale, jint m, jdoubleArray v, jint offsetv, jint ldv, jobject info) { + jboolean failed = FALSE; + const char *__njob = NULL; const char *__nside = NULL; int __ninfo = 0; double *__nscale = NULL; double *__nv = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nscale = (*env)->GetPrimitiveArrayCritical(env, scale, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + dgebak_(__njob, __nside, &n, &ilo, &ihi, __nscale + offsetscale, &m, __nv + offsetv, &ldv, &__ninfo); +done: + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nscale) (*env)->ReleasePrimitiveArrayCritical(env, scale, __nscale, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgebal_)(char *job, int *n, double *a, int *lda, /*FIXME*/void *ilo, /*FIXME*/void *ihi, double *scale, /*FIXME*/void *info); +static void (*dgebal_)(const char *job, int *n, double *a, int *lda, int *ilo, int *ihi, double *scale, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgebalK(JNIEnv *env, UNUSED jobject obj, - jstring job, jint n, jdoubleArray a, jint offseta, jint lda, jobject ilo, jobject ihi, jdoubleArray scale, jint offsetscale, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgebalK(JNIEnv *env, UNUSED jobject obj, jstring job, jint n, jdoubleArray a, jint offseta, jint lda, jobject ilo, jobject ihi, jdoubleArray scale, jint offsetscale, jobject info) { + jboolean failed = FALSE; + const char *__njob = NULL; int __nilo = 0; int __nihi = 0; int __ninfo = 0; double *__na = NULL; double *__nscale = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; + __nilo = (*env)->GetIntField(env, ilo, intW_val_fieldID); + __nihi = (*env)->GetIntField(env, ihi, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nscale = (*env)->GetPrimitiveArrayCritical(env, scale, NULL))) goto fail; + dgebal_(__njob, &n, __na + offseta, &lda, &__nilo, &__nihi, __nscale + offsetscale, &__ninfo); +done: + if (__nscale) (*env)->ReleasePrimitiveArrayCritical(env, scale, __nscale, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, ihi, intW_val_fieldID, __nihi); + if (!failed) (*env)->SetIntField(env, ilo, intW_val_fieldID, __nilo); + if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgebd2_)(int *m, int *n, double *a, int *lda, double *d, double *e, double *tauq, double *taup, double *work, /*FIXME*/void *info); +static void (*dgebd2_)(int *m, int *n, double *a, int *lda, double *d, double *e, double *tauq, double *taup, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgebd2K(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray tauq, jint offsettauq, jdoubleArray taup, jint offsettaup, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgebd2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray tauq, jint offsettauq, jdoubleArray taup, jint offsettaup, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; double *__nd = NULL; double *__ne = NULL; double *__ntauq = NULL; double *__ntaup = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__ntauq = (*env)->GetPrimitiveArrayCritical(env, tauq, NULL))) goto fail; + if (!(__ntaup = (*env)->GetPrimitiveArrayCritical(env, taup, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dgebd2_(&m, &n, __na + offseta, &lda, __nd + offsetd, __ne + offsete, __ntauq + offsettauq, __ntaup + offsettaup, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntaup) (*env)->ReleasePrimitiveArrayCritical(env, taup, __ntaup, failed ? JNI_ABORT : 0); + if (__ntauq) (*env)->ReleasePrimitiveArrayCritical(env, tauq, __ntauq, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgebrd_)(int *m, int *n, double *a, int *lda, double *d, double *e, double *tauq, double *taup, double *work, int *lwork, /*FIXME*/void *info); +static void (*dgebrd_)(int *m, int *n, double *a, int *lda, double *d, double *e, double *tauq, double *taup, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgebrdK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray tauq, jint offsettauq, jdoubleArray taup, jint offsettaup, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgebrdK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray tauq, jint offsettauq, jdoubleArray taup, jint offsettaup, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; double *__nd = NULL; double *__ne = NULL; double *__ntauq = NULL; double *__ntaup = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__ntauq = (*env)->GetPrimitiveArrayCritical(env, tauq, NULL))) goto fail; + if (!(__ntaup = (*env)->GetPrimitiveArrayCritical(env, taup, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dgebrd_(&m, &n, __na + offseta, &lda, __nd + offsetd, __ne + offsete, __ntauq + offsettauq, __ntaup + offsettaup, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntaup) (*env)->ReleasePrimitiveArrayCritical(env, taup, __ntaup, failed ? JNI_ABORT : 0); + if (__ntauq) (*env)->ReleasePrimitiveArrayCritical(env, tauq, __ntauq, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgecon_)(char *norm, int *n, double *a, int *lda, double *anorm, /*FIXME*/void *rcond, double *work, int * iwork, /*FIXME*/void *info); +static void (*dgecon_)(const char *norm, int *n, double *a, int *lda, double *anorm, double *rcond, double *work, int *iwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeconK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jint n, jdoubleArray a, jint offseta, jint lda, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeconK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jdoubleArray a, jint offseta, jint lda, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nnorm = NULL; double __nrcond = 0; int __ninfo = 0; double *__na = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dgecon_(__nnorm, &n, __na + offseta, &lda, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgeequ_)(int *m, int *n, double *a, int *lda, double *r, double *c, /*FIXME*/void *rowcnd, /*FIXME*/void *colcnd, /*FIXME*/void *amax, /*FIXME*/void *info); +static void (*dgeequ_)(int *m, int *n, double *a, int *lda, double *r, double *c, double *rowcnd, double *colcnd, double *amax, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeequK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray r, jint offsetr, jdoubleArray c, jint offsetc, jobject rowcnd, jobject colcnd, jobject amax, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeequK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray r, jint offsetr, jdoubleArray c, jint offsetc, jobject rowcnd, jobject colcnd, jobject amax, jobject info) { + jboolean failed = FALSE; + double __nrowcnd = 0; double __ncolcnd = 0; double __namax = 0; int __ninfo = 0; double *__na = NULL; double *__nr = NULL; double *__nc = NULL; + __nrowcnd = (*env)->GetDoubleField(env, rowcnd, doubleW_val_fieldID); + __ncolcnd = (*env)->GetDoubleField(env, colcnd, doubleW_val_fieldID); + __namax = (*env)->GetDoubleField(env, amax, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + dgeequ_(&m, &n, __na + offseta, &lda, __nr + offsetr, __nc + offsetc, &__nrowcnd, &__ncolcnd, &__namax, &__ninfo); +done: + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, amax, doubleW_val_fieldID, __namax); + if (!failed) (*env)->SetDoubleField(env, colcnd, doubleW_val_fieldID, __ncolcnd); + if (!failed) (*env)->SetDoubleField(env, rowcnd, doubleW_val_fieldID, __nrowcnd); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgees_)(char *jobvs, char *sort, /*FIXME*/void *select, int *n, double *a, int *lda, /*FIXME*/void *sdim, double *wr, double *wi, double *vs, int *ldvs, double *work, int *lwork, int *bwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeesK(JNIEnv *env, UNUSED jobject obj, - jstring jobvs, jstring sort, jobject select, jint n, jdoubleArray a, jint offseta, jint lda, jobject sdim, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jdoubleArray vs, jint offsetvs, jint ldvs, jdoubleArray work, jint offsetwork, jint lwork, jbooleanArray bwork, jint offsetbwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dgeev_)(const char *jobvl, const char *jobvr, int *n, double *a, int *lda, double *wr, double *wi, double *vl, int *ldvl, double *vr, int *ldvr, double *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeevK(JNIEnv *env, UNUSED jobject obj, jstring jobvl, jstring jobvr, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__njobvl = NULL; const char *__njobvr = NULL; int __ninfo = 0; double *__na = NULL; double *__nwr = NULL; double *__nwi = NULL; double *__nvl = NULL; double *__nvr = NULL; double *__nwork = NULL; + if (!(__njobvl = (*env)->GetStringUTFChars(env, jobvl, NULL))) goto fail; + if (!(__njobvr = (*env)->GetStringUTFChars(env, jobvr, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dgeev_(__njobvl, __njobvr, &n, __na + offseta, &lda, __nwr + offsetwr, __nwi + offsetwi, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__njobvr) (*env)->ReleaseStringUTFChars(env, jobvr, __njobvr); + if (__njobvl) (*env)->ReleaseStringUTFChars(env, jobvl, __njobvl); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgeesx_)(char *jobvs, char *sort, /*FIXME*/void *select, char *sense, int *n, double *a, int *lda, /*FIXME*/void *sdim, double *wr, double *wi, double *vs, int *ldvs, /*FIXME*/void *rconde, /*FIXME*/void *rcondv, double *work, int *lwork, int * iwork, int *liwork, int *bwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeesxK(JNIEnv *env, UNUSED jobject obj, - jstring jobvs, jstring sort, jobject select, jstring sense, jint n, jdoubleArray a, jint offseta, jint lda, jobject sdim, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jdoubleArray vs, jint offsetvs, jint ldvs, jobject rconde, jobject rcondv, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jbooleanArray bwork, jint offsetbwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dgeevx_)(const char *balanc, const char *jobvl, const char *jobvr, const char *sense, int *n, double *a, int *lda, double *wr, double *wi, double *vl, int *ldvl, double *vr, int *ldvr, int *ilo, int *ihi, double *scale, double *abnrm, double *rconde, double *rcondv, double *work, int *lwork, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeevxK(JNIEnv *env, UNUSED jobject obj, jstring balanc, jstring jobvl, jstring jobvr, jstring sense, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jobject ilo, jobject ihi, jdoubleArray scale, jint offsetscale, jobject abnrm, jdoubleArray rconde, jint offsetrconde, jdoubleArray rcondv, jint offsetrcondv, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nbalanc = NULL; const char *__njobvl = NULL; const char *__njobvr = NULL; const char *__nsense = NULL; int __nilo = 0; int __nihi = 0; double __nabnrm = 0; int __ninfo = 0; double *__na = NULL; double *__nwr = NULL; double *__nwi = NULL; double *__nvl = NULL; double *__nvr = NULL; double *__nscale = NULL; double *__nrconde = NULL; double *__nrcondv = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nbalanc = (*env)->GetStringUTFChars(env, balanc, NULL))) goto fail; + if (!(__njobvl = (*env)->GetStringUTFChars(env, jobvl, NULL))) goto fail; + if (!(__njobvr = (*env)->GetStringUTFChars(env, jobvr, NULL))) goto fail; + if (!(__nsense = (*env)->GetStringUTFChars(env, sense, NULL))) goto fail; + __nilo = (*env)->GetIntField(env, ilo, intW_val_fieldID); + __nihi = (*env)->GetIntField(env, ihi, intW_val_fieldID); + __nabnrm = (*env)->GetDoubleField(env, abnrm, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; + if (!(__nscale = (*env)->GetPrimitiveArrayCritical(env, scale, NULL))) goto fail; + if (!(__nrconde = (*env)->GetPrimitiveArrayCritical(env, rconde, NULL))) goto fail; + if (!(__nrcondv = (*env)->GetPrimitiveArrayCritical(env, rcondv, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dgeevx_(__nbalanc, __njobvl, __njobvr, __nsense, &n, __na + offseta, &lda, __nwr + offsetwr, __nwi + offsetwi, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, &__nilo, &__nihi, __nscale + offsetscale, &__nabnrm, __nrconde + offsetrconde, __nrcondv + offsetrcondv, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nrcondv) (*env)->ReleasePrimitiveArrayCritical(env, rcondv, __nrcondv, failed ? JNI_ABORT : 0); + if (__nrconde) (*env)->ReleasePrimitiveArrayCritical(env, rconde, __nrconde, failed ? JNI_ABORT : 0); + if (__nscale) (*env)->ReleasePrimitiveArrayCritical(env, scale, __nscale, failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, abnrm, doubleW_val_fieldID, __nabnrm); + if (!failed) (*env)->SetIntField(env, ihi, intW_val_fieldID, __nihi); + if (!failed) (*env)->SetIntField(env, ilo, intW_val_fieldID, __nilo); + if (__nsense) (*env)->ReleaseStringUTFChars(env, sense, __nsense); + if (__njobvr) (*env)->ReleaseStringUTFChars(env, jobvr, __njobvr); + if (__njobvl) (*env)->ReleaseStringUTFChars(env, jobvl, __njobvl); + if (__nbalanc) (*env)->ReleaseStringUTFChars(env, balanc, __nbalanc); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgeev_)(char *jobvl, char *jobvr, int *n, double *a, int *lda, double *wr, double *wi, double *vl, int *ldvl, double *vr, int *ldvr, double *work, int *lwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeevK(JNIEnv *env, UNUSED jobject obj, - jstring jobvl, jstring jobvr, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dgegs_)(const char *jobvsl, const char *jobvsr, int *n, double *a, int *lda, double *b, int *ldb, double *alphar, double *alphai, double *beta, double *vsl, int *ldvsl, double *vsr, int *ldvsr, double *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgegsK(JNIEnv *env, UNUSED jobject obj, jstring jobvsl, jstring jobvsr, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray vsl, jint offsetvsl, jint ldvsl, jdoubleArray vsr, jint offsetvsr, jint ldvsr, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__njobvsl = NULL; const char *__njobvsr = NULL; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nalphar = NULL; double *__nalphai = NULL; double *__nbeta = NULL; double *__nvsl = NULL; double *__nvsr = NULL; double *__nwork = NULL; + if (!(__njobvsl = (*env)->GetStringUTFChars(env, jobvsl, NULL))) goto fail; + if (!(__njobvsr = (*env)->GetStringUTFChars(env, jobvsr, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) goto fail; + if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) goto fail; + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; + if (!(__nvsl = (*env)->GetPrimitiveArrayCritical(env, vsl, NULL))) goto fail; + if (!(__nvsr = (*env)->GetPrimitiveArrayCritical(env, vsr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dgegs_(__njobvsl, __njobvsr, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nalphar + offsetalphar, __nalphai + offsetalphai, __nbeta + offsetbeta, __nvsl + offsetvsl, &ldvsl, __nvsr + offsetvsr, &ldvsr, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nvsr) (*env)->ReleasePrimitiveArrayCritical(env, vsr, __nvsr, failed ? JNI_ABORT : 0); + if (__nvsl) (*env)->ReleasePrimitiveArrayCritical(env, vsl, __nvsl, failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); + if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, failed ? JNI_ABORT : 0); + if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__njobvsr) (*env)->ReleaseStringUTFChars(env, jobvsr, __njobvsr); + if (__njobvsl) (*env)->ReleaseStringUTFChars(env, jobvsl, __njobvsl); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgeevx_)(char *balanc, char *jobvl, char *jobvr, char *sense, int *n, double *a, int *lda, double *wr, double *wi, double *vl, int *ldvl, double *vr, int *ldvr, /*FIXME*/void *ilo, /*FIXME*/void *ihi, double *scale, /*FIXME*/void *abnrm, double *rconde, double *rcondv, double *work, int *lwork, int * iwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeevxK(JNIEnv *env, UNUSED jobject obj, - jstring balanc, jstring jobvl, jstring jobvr, jstring sense, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jobject ilo, jobject ihi, jdoubleArray scale, jint offsetscale, jobject abnrm, jdoubleArray rconde, jint offsetrconde, jdoubleArray rcondv, jint offsetrcondv, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dgegv_)(const char *jobvl, const char *jobvr, int *n, double *a, int *lda, double *b, int *ldb, double *alphar, double *alphai, double *beta, double *vl, int *ldvl, double *vr, int *ldvr, double *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgegvK(JNIEnv *env, UNUSED jobject obj, jstring jobvl, jstring jobvr, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__njobvl = NULL; const char *__njobvr = NULL; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nalphar = NULL; double *__nalphai = NULL; double *__nbeta = NULL; double *__nvl = NULL; double *__nvr = NULL; double *__nwork = NULL; + if (!(__njobvl = (*env)->GetStringUTFChars(env, jobvl, NULL))) goto fail; + if (!(__njobvr = (*env)->GetStringUTFChars(env, jobvr, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) goto fail; + if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) goto fail; + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dgegv_(__njobvl, __njobvr, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nalphar + offsetalphar, __nalphai + offsetalphai, __nbeta + offsetbeta, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); + if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, failed ? JNI_ABORT : 0); + if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__njobvr) (*env)->ReleaseStringUTFChars(env, jobvr, __njobvr); + if (__njobvl) (*env)->ReleaseStringUTFChars(env, jobvl, __njobvl); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgegs_)(char *jobvsl, char *jobvsr, int *n, double *a, int *lda, double *b, int *ldb, double *alphar, double *alphai, double *beta, double *vsl, int *ldvsl, double *vsr, int *ldvsr, double *work, int *lwork, /*FIXME*/void *info); +static void (*dgehd2_)(int *n, int *ilo, int *ihi, double *a, int *lda, double *tau, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgegsK(JNIEnv *env, UNUSED jobject obj, - jstring jobvsl, jstring jobvsr, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray vsl, jint offsetvsl, jint ldvsl, jdoubleArray vsr, jint offsetvsr, jint ldvsr, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgehd2K(JNIEnv *env, UNUSED jobject obj, jint n, jint ilo, jint ihi, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dgehd2_(&n, &ilo, &ihi, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgegv_)(char *jobvl, char *jobvr, int *n, double *a, int *lda, double *b, int *ldb, double *alphar, double *alphai, double *beta, double *vl, int *ldvl, double *vr, int *ldvr, double *work, int *lwork, /*FIXME*/void *info); +static void (*dgehrd_)(int *n, int *ilo, int *ihi, double *a, int *lda, double *tau, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgegvK(JNIEnv *env, UNUSED jobject obj, - jstring jobvl, jstring jobvr, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgehrdK(JNIEnv *env, UNUSED jobject obj, jint n, jint ilo, jint ihi, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dgehrd_(&n, &ilo, &ihi, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgehd2_)(int *n, int *ilo, int *ihi, double *a, int *lda, double *tau, double *work, /*FIXME*/void *info); +static void (*dgelq2_)(int *m, int *n, double *a, int *lda, double *tau, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgehd2K(JNIEnv *env, UNUSED jobject obj, - jint n, jint ilo, jint ihi, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelq2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dgelq2_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgehrd_)(int *n, int *ilo, int *ihi, double *a, int *lda, double *tau, double *work, int *lwork, /*FIXME*/void *info); +static void (*dgelqf_)(int *m, int *n, double *a, int *lda, double *tau, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgehrdK(JNIEnv *env, UNUSED jobject obj, - jint n, jint ilo, jint ihi, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelqfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dgelqf_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgelq2_)(int *m, int *n, double *a, int *lda, double *tau, double *work, /*FIXME*/void *info); +static void (*dgels_)(const char *trans, int *m, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelq2K(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelsK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint m, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nwork = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dgels_(__ntrans, &m, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgelqf_)(int *m, int *n, double *a, int *lda, double *tau, double *work, int *lwork, /*FIXME*/void *info); +static void (*dgelsd_)(int *m, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, double *s, double *rcond, int *rank, double *work, int *lwork, int *iwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelqfK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelsdK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray s, jint offsets, jdouble rcond, jobject rank, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + int __nrank = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__ns = NULL; double *__nwork = NULL; int *__niwork = NULL; + __nrank = (*env)->GetIntField(env, rank, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dgelsd_(&m, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, __ns + offsets, &rcond, &__nrank, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, rank, intW_val_fieldID, __nrank); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgels_)(char *trans, int *m, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, double *work, int *lwork, /*FIXME*/void *info); +static void (*dgelss_)(int *m, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, double *s, double *rcond, int *rank, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelsK(JNIEnv *env, UNUSED jobject obj, - jstring trans, jint m, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelssK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray s, jint offsets, jdouble rcond, jobject rank, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __nrank = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__ns = NULL; double *__nwork = NULL; + __nrank = (*env)->GetIntField(env, rank, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dgelss_(&m, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, __ns + offsets, &rcond, &__nrank, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, rank, intW_val_fieldID, __nrank); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgelsd_)(int *m, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, double *s, double *rcond, /*FIXME*/void *rank, double *work, int *lwork, int * iwork, /*FIXME*/void *info); +static void (*dgelsx_)(int *m, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, int *jpvt, double *rcond, int *rank, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelsdK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray s, jint offsets, jdouble rcond, jobject rank, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelsxK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jintArray jpvt, jint offsetjpvt, jdouble rcond, jobject rank, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __nrank = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; int *__njpvt = NULL; double *__nwork = NULL; + __nrank = (*env)->GetIntField(env, rank, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dgelsx_(&m, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, __njpvt + offsetjpvt, &rcond, &__nrank, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, rank, intW_val_fieldID, __nrank); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgelss_)(int *m, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, double *s, double *rcond, /*FIXME*/void *rank, double *work, int *lwork, /*FIXME*/void *info); +static void (*dgelsy_)(int *m, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, int *jpvt, double *rcond, int *rank, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelssK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray s, jint offsets, jdouble rcond, jobject rank, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelsyK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jintArray jpvt, jint offsetjpvt, jdouble rcond, jobject rank, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __nrank = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; int *__njpvt = NULL; double *__nwork = NULL; + __nrank = (*env)->GetIntField(env, rank, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dgelsy_(&m, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, __njpvt + offsetjpvt, &rcond, &__nrank, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, rank, intW_val_fieldID, __nrank); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgelsx_)(int *m, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, int * jpvt, double *rcond, /*FIXME*/void *rank, double *work, /*FIXME*/void *info); +static void (*dgeql2_)(int *m, int *n, double *a, int *lda, double *tau, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelsxK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jintArray jpvt, jint offsetjpvt, jdouble rcond, jobject rank, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeql2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dgeql2_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgelsy_)(int *m, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, int * jpvt, double *rcond, /*FIXME*/void *rank, double *work, int *lwork, /*FIXME*/void *info); +static void (*dgeqlf_)(int *m, int *n, double *a, int *lda, double *tau, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelsyK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jintArray jpvt, jint offsetjpvt, jdouble rcond, jobject rank, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeqlfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dgeqlf_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgeql2_)(int *m, int *n, double *a, int *lda, double *tau, double *work, /*FIXME*/void *info); +static void (*dgeqp3_)(int *m, int *n, double *a, int *lda, int *jpvt, double *tau, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeql2K(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeqp3K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; int *__njpvt = NULL; double *__ntau = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dgeqp3_(&m, &n, __na + offseta, &lda, __njpvt + offsetjpvt, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgeqlf_)(int *m, int *n, double *a, int *lda, double *tau, double *work, int *lwork, /*FIXME*/void *info); +static void (*dgeqpf_)(int *m, int *n, double *a, int *lda, int *jpvt, double *tau, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeqlfK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeqpfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; int *__njpvt = NULL; double *__ntau = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dgeqpf_(&m, &n, __na + offseta, &lda, __njpvt + offsetjpvt, __ntau + offsettau, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgeqp3_)(int *m, int *n, double *a, int *lda, int * jpvt, double *tau, double *work, int *lwork, /*FIXME*/void *info); +static void (*dgeqr2_)(int *m, int *n, double *a, int *lda, double *tau, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeqp3K(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jdoubleArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeqr2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dgeqr2_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgeqpf_)(int *m, int *n, double *a, int *lda, int * jpvt, double *tau, double *work, /*FIXME*/void *info); +static void (*dgeqrf_)(int *m, int *n, double *a, int *lda, double *tau, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeqpfK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jdoubleArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeqrfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dgeqrf_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgeqr2_)(int *m, int *n, double *a, int *lda, double *tau, double *work, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeqr2K(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dgerfs_)(const char *trans, int *n, int *nrhs, double *a, int *lda, double *af, int *ldaf, int *ipiv, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgerfsK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; double *__naf = NULL; int *__nipiv = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dgerfs_(__ntrans, &n, &nrhs, __na + offseta, &lda, __naf + offsetaf, &ldaf, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgeqrf_)(int *m, int *n, double *a, int *lda, double *tau, double *work, int *lwork, /*FIXME*/void *info); +static void (*dgerq2_)(int *m, int *n, double *a, int *lda, double *tau, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeqrfK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgerq2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dgerq2_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgerfs_)(char *trans, int *n, int *nrhs, double *a, int *lda, double *af, int *ldaf, int * ipiv, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); +static void (*dgerqf_)(int *m, int *n, double *a, int *lda, double *tau, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgerfsK(JNIEnv *env, UNUSED jobject obj, - jstring trans, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgerqfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dgerqf_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgerq2_)(int *m, int *n, double *a, int *lda, double *tau, double *work, /*FIXME*/void *info); +static void (*dgesc2_)(int *n, double *a, int *lda, double *rhs, int *ipiv, int *jpiv, double *scale); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgerq2K(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgesc2K(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray rhs, jint offsetrhs, jintArray ipiv, jint offsetipiv, jintArray jpiv, jint offsetjpiv, jobject scale) { + jboolean failed = FALSE; + double __nscale = 0; double *__na = NULL; double *__nrhs = NULL; int *__nipiv = NULL; int *__njpiv = NULL; + __nscale = (*env)->GetDoubleField(env, scale, doubleW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nrhs = (*env)->GetPrimitiveArrayCritical(env, rhs, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__njpiv = (*env)->GetPrimitiveArrayCritical(env, jpiv, NULL))) goto fail; + dgesc2_(&n, __na + offseta, &lda, __nrhs + offsetrhs, __nipiv + offsetipiv, __njpiv + offsetjpiv, &__nscale); +done: + if (__njpiv) (*env)->ReleasePrimitiveArrayCritical(env, jpiv, __njpiv, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nrhs) (*env)->ReleasePrimitiveArrayCritical(env, rhs, __nrhs, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgerqf_)(int *m, int *n, double *a, int *lda, double *tau, double *work, int *lwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgerqfK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dgesdd_)(const char *jobz, int *m, int *n, double *a, int *lda, double *s, double *u, int *ldu, double *vt, int *ldvt, double *work, int *lwork, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgesddK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray s, jint offsets, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jint ldvt, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; int __ninfo = 0; double *__na = NULL; double *__ns = NULL; double *__nu = NULL; double *__nvt = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dgesdd_(__njobz, &m, &n, __na + offseta, &lda, __ns + offsets, __nu + offsetu, &ldu, __nvt + offsetvt, &ldvt, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgesc2_)(int *n, double *a, int *lda, double *rhs, int * ipiv, int * jpiv, /*FIXME*/void *scale); +static void (*dgesv_)(int *n, int *nrhs, double *a, int *lda, int *ipiv, double *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgesc2K(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray rhs, jint offsetrhs, jintArray ipiv, jint offsetipiv, jintArray jpiv, jint offsetjpiv, jobject scale) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgesvK(JNIEnv *env, UNUSED jobject obj, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; int *__nipiv = NULL; double *__nb = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + dgesv_(&n, &nrhs, __na + offseta, &lda, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgesdd_)(char *jobz, int *m, int *n, double *a, int *lda, double *s, double *u, int *ldu, double *vt, int *ldvt, double *work, int *lwork, int * iwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgesddK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray s, jint offsets, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jint ldvt, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dgesvd_)(const char *jobu, const char *jobvt, int *m, int *n, double *a, int *lda, double *s, double *u, int *ldu, double *vt, int *ldvt, double *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgesvdK(JNIEnv *env, UNUSED jobject obj, jstring jobu, jstring jobvt, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray s, jint offsets, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jint ldvt, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__njobu = NULL; const char *__njobvt = NULL; int __ninfo = 0; double *__na = NULL; double *__ns = NULL; double *__nu = NULL; double *__nvt = NULL; double *__nwork = NULL; + if (!(__njobu = (*env)->GetStringUTFChars(env, jobu, NULL))) goto fail; + if (!(__njobvt = (*env)->GetStringUTFChars(env, jobvt, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dgesvd_(__njobu, __njobvt, &m, &n, __na + offseta, &lda, __ns + offsets, __nu + offsetu, &ldu, __nvt + offsetvt, &ldvt, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__njobvt) (*env)->ReleaseStringUTFChars(env, jobvt, __njobvt); + if (__njobu) (*env)->ReleaseStringUTFChars(env, jobu, __njobu); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgesv_)(int *n, int *nrhs, double *a, int *lda, int * ipiv, double *b, int *ldb, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgesvK(JNIEnv *env, UNUSED jobject obj, - jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dgesvx_)(const char *fact, const char *trans, int *n, int *nrhs, double *a, int *lda, double *af, int *ldaf, int *ipiv, char *equed, double *r, double *c, double *b, int *ldb, double *x, int *ldx, double *rcond, double *ferr, double *berr, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgesvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring trans, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jobject equed, jdoubleArray r, jint offsetr, jdoubleArray c, jint offsetc, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nfact = NULL; const char *__ntrans = NULL; char *__nequed = NULL; jstring __jequed = NULL;; double __nrcond = 0; int __ninfo = 0; double *__na = NULL; double *__naf = NULL; int *__nipiv = NULL; double *__nr = NULL; double *__nc = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; + __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dgesvx_(__nfact, __ntrans, &n, &nrhs, __na + offseta, &lda, __naf + offsetaf, &ldaf, __nipiv + offsetipiv, __nequed, __nr + offsetr, __nc + offsetc, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgesvd_)(char *jobu, char *jobvt, int *m, int *n, double *a, int *lda, double *s, double *u, int *ldu, double *vt, int *ldvt, double *work, int *lwork, /*FIXME*/void *info); +static void (*dgetc2_)(int *n, double *a, int *lda, int *ipiv, int *jpiv, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgesvdK(JNIEnv *env, UNUSED jobject obj, - jstring jobu, jstring jobvt, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray s, jint offsets, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jint ldvt, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgetc2K(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jintArray jpiv, jint offsetjpiv, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; int *__nipiv = NULL; int *__njpiv = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__njpiv = (*env)->GetPrimitiveArrayCritical(env, jpiv, NULL))) goto fail; + dgetc2_(&n, __na + offseta, &lda, __nipiv + offsetipiv, __njpiv + offsetjpiv, &__ninfo); +done: + if (__njpiv) (*env)->ReleasePrimitiveArrayCritical(env, jpiv, __njpiv, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgesvx_)(char *fact, char *trans, int *n, int *nrhs, double *a, int *lda, double *af, int *ldaf, int * ipiv, jstring *equed, double *r, double *c, double *b, int *ldb, double *x, int *ldx, /*FIXME*/void *rcond, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); +static void (*dgetf2_)(int *m, int *n, double *a, int *lda, int *ipiv, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgesvxK(JNIEnv *env, UNUSED jobject obj, - jstring fact, jstring trans, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jobject equed, jdoubleArray r, jint offsetr, jdoubleArray c, jint offsetc, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgetf2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; int *__nipiv = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + dgetf2_(&m, &n, __na + offseta, &lda, __nipiv + offsetipiv, &__ninfo); +done: + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgetc2_)(int *n, double *a, int *lda, int * ipiv, int * jpiv, /*FIXME*/void *info); +static void (*dgetrf_)(int *m, int *n, double *a, int *lda, int *ipiv, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgetc2K(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jintArray jpiv, jint offsetjpiv, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgetrfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; int *__nipiv = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + dgetrf_(&m, &n, __na + offseta, &lda, __nipiv + offsetipiv, &__ninfo); +done: + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgetf2_)(int *m, int *n, double *a, int *lda, int * ipiv, /*FIXME*/void *info); +static void (*dgetri_)(int *n, double *a, int *lda, int *ipiv, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgetf2K(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgetriK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; int *__nipiv = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dgetri_(&n, __na + offseta, &lda, __nipiv + offsetipiv, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgetrf_)(int *m, int *n, double *a, int *lda, int * ipiv, /*FIXME*/void *info); +static void (*dgetrs_)(const char *trans, int *n, int *nrhs, double *a, int *lda, int *ipiv, double *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgetrfK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgetrsK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; int *__nipiv = NULL; double *__nb = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + dgetrs_(__ntrans, &n, &nrhs, __na + offseta, &lda, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgetri_)(int *n, double *a, int *lda, int * ipiv, double *work, int *lwork, /*FIXME*/void *info); +static void (*dggbak_)(const char *job, const char *side, int *n, int *ilo, int *ihi, double *lscale, double *rscale, int *m, double *v, int *ldv, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgetriK(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggbakK(JNIEnv *env, UNUSED jobject obj, jstring job, jstring side, jint n, jint ilo, jint ihi, jdoubleArray lscale, jint offsetlscale, jdoubleArray rscale, jint offsetrscale, jint m, jdoubleArray v, jint offsetv, jint ldv, jobject info) { + jboolean failed = FALSE; + const char *__njob = NULL; const char *__nside = NULL; int __ninfo = 0; double *__nlscale = NULL; double *__nrscale = NULL; double *__nv = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nlscale = (*env)->GetPrimitiveArrayCritical(env, lscale, NULL))) goto fail; + if (!(__nrscale = (*env)->GetPrimitiveArrayCritical(env, rscale, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + dggbak_(__njob, __nside, &n, &ilo, &ihi, __nlscale + offsetlscale, __nrscale + offsetrscale, &m, __nv + offsetv, &ldv, &__ninfo); +done: + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nrscale) (*env)->ReleasePrimitiveArrayCritical(env, rscale, __nrscale, failed ? JNI_ABORT : 0); + if (__nlscale) (*env)->ReleasePrimitiveArrayCritical(env, lscale, __nlscale, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgetrs_)(char *trans, int *n, int *nrhs, double *a, int *lda, int * ipiv, double *b, int *ldb, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgetrsK(JNIEnv *env, UNUSED jobject obj, - jstring trans, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dggbal_)(const char *job, int *n, double *a, int *lda, double *b, int *ldb, int *ilo, int *ihi, double *lscale, double *rscale, double *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggbalK(JNIEnv *env, UNUSED jobject obj, jstring job, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject ilo, jobject ihi, jdoubleArray lscale, jint offsetlscale, jdoubleArray rscale, jint offsetrscale, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__njob = NULL; int __nilo = 0; int __nihi = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nlscale = NULL; double *__nrscale = NULL; double *__nwork = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; + __nilo = (*env)->GetIntField(env, ilo, intW_val_fieldID); + __nihi = (*env)->GetIntField(env, ihi, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nlscale = (*env)->GetPrimitiveArrayCritical(env, lscale, NULL))) goto fail; + if (!(__nrscale = (*env)->GetPrimitiveArrayCritical(env, rscale, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dggbal_(__njob, &n, __na + offseta, &lda, __nb + offsetb, &ldb, &__nilo, &__nihi, __nlscale + offsetlscale, __nrscale + offsetrscale, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nrscale) (*env)->ReleasePrimitiveArrayCritical(env, rscale, __nrscale, failed ? JNI_ABORT : 0); + if (__nlscale) (*env)->ReleasePrimitiveArrayCritical(env, lscale, __nlscale, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, ihi, intW_val_fieldID, __nihi); + if (!failed) (*env)->SetIntField(env, ilo, intW_val_fieldID, __nilo); + if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dggbak_)(char *job, char *side, int *n, int *ilo, int *ihi, double *lscale, double *rscale, int *m, double *v, int *ldv, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggbakK(JNIEnv *env, UNUSED jobject obj, - jstring job, jstring side, jint n, jint ilo, jint ihi, jdoubleArray lscale, jint offsetlscale, jdoubleArray rscale, jint offsetrscale, jint m, jdoubleArray v, jint offsetv, jint ldv, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dggev_)(const char *jobvl, const char *jobvr, int *n, double *a, int *lda, double *b, int *ldb, double *alphar, double *alphai, double *beta, double *vl, int *ldvl, double *vr, int *ldvr, double *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggevK(JNIEnv *env, UNUSED jobject obj, jstring jobvl, jstring jobvr, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__njobvl = NULL; const char *__njobvr = NULL; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nalphar = NULL; double *__nalphai = NULL; double *__nbeta = NULL; double *__nvl = NULL; double *__nvr = NULL; double *__nwork = NULL; + if (!(__njobvl = (*env)->GetStringUTFChars(env, jobvl, NULL))) goto fail; + if (!(__njobvr = (*env)->GetStringUTFChars(env, jobvr, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) goto fail; + if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) goto fail; + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dggev_(__njobvl, __njobvr, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nalphar + offsetalphar, __nalphai + offsetalphai, __nbeta + offsetbeta, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); + if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, failed ? JNI_ABORT : 0); + if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__njobvr) (*env)->ReleaseStringUTFChars(env, jobvr, __njobvr); + if (__njobvl) (*env)->ReleaseStringUTFChars(env, jobvl, __njobvl); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dggbal_)(char *job, int *n, double *a, int *lda, double *b, int *ldb, /*FIXME*/void *ilo, /*FIXME*/void *ihi, double *lscale, double *rscale, double *work, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggbalK(JNIEnv *env, UNUSED jobject obj, - jstring job, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject ilo, jobject ihi, jdoubleArray lscale, jint offsetlscale, jdoubleArray rscale, jint offsetrscale, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dggevx_)(const char *balanc, const char *jobvl, const char *jobvr, const char *sense, int *n, double *a, int *lda, double *b, int *ldb, double *alphar, double *alphai, double *beta, double *vl, int *ldvl, double *vr, int *ldvr, int *ilo, int *ihi, double *lscale, double *rscale, double *abnrm, double *bbnrm, double *rconde, double *rcondv, double *work, int *lwork, int *iwork, int *bwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggevxK(JNIEnv *env, UNUSED jobject obj, jstring balanc, jstring jobvl, jstring jobvr, jstring sense, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jobject ilo, jobject ihi, jdoubleArray lscale, jint offsetlscale, jdoubleArray rscale, jint offsetrscale, jobject abnrm, jobject bbnrm, jdoubleArray rconde, jint offsetrconde, jdoubleArray rcondv, jint offsetrcondv, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jbooleanArray bwork, jint offsetbwork, jobject info) { + jboolean failed = FALSE; + const char *__nbalanc = NULL; const char *__njobvl = NULL; const char *__njobvr = NULL; const char *__nsense = NULL; int __nilo = 0; int __nihi = 0; double __nabnrm = 0; double __nbbnrm = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nalphar = NULL; double *__nalphai = NULL; double *__nbeta = NULL; double *__nvl = NULL; double *__nvr = NULL; double *__nlscale = NULL; double *__nrscale = NULL; double *__nrconde = NULL; double *__nrcondv = NULL; double *__nwork = NULL; int *__niwork = NULL; jboolean *__jbwork = NULL; int *__nbwork = NULL; + if (!(__nbalanc = (*env)->GetStringUTFChars(env, balanc, NULL))) goto fail; + if (!(__njobvl = (*env)->GetStringUTFChars(env, jobvl, NULL))) goto fail; + if (!(__njobvr = (*env)->GetStringUTFChars(env, jobvr, NULL))) goto fail; + if (!(__nsense = (*env)->GetStringUTFChars(env, sense, NULL))) goto fail; + __nilo = (*env)->GetIntField(env, ilo, intW_val_fieldID); + __nihi = (*env)->GetIntField(env, ihi, intW_val_fieldID); + __nabnrm = (*env)->GetDoubleField(env, abnrm, doubleW_val_fieldID); + __nbbnrm = (*env)->GetDoubleField(env, bbnrm, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) goto fail; + if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) goto fail; + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; + if (!(__nlscale = (*env)->GetPrimitiveArrayCritical(env, lscale, NULL))) goto fail; + if (!(__nrscale = (*env)->GetPrimitiveArrayCritical(env, rscale, NULL))) goto fail; + if (!(__nrconde = (*env)->GetPrimitiveArrayCritical(env, rconde, NULL))) goto fail; + if (!(__nrcondv = (*env)->GetPrimitiveArrayCritical(env, rcondv, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__jbwork = (*env)->GetPrimitiveArrayCritical(env, bwork, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, bwork); if (length <= 0) goto fail; if (!(__nbwork = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nbwork[i] = __jbwork[i]; } } while(0); + dggevx_(__nbalanc, __njobvl, __njobvr, __nsense, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nalphar + offsetalphar, __nalphai + offsetalphai, __nbeta + offsetbeta, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, &__nilo, &__nihi, __nlscale + offsetlscale, __nrscale + offsetrscale, &__nabnrm, &__nbbnrm, __nrconde + offsetrconde, __nrcondv + offsetrcondv, __nwork + offsetwork, &lwork, __niwork + offsetiwork, __nbwork + offsetbwork, &__ninfo); +done: + if (__nbwork) { free(__nbwork); } if (__jbwork) (*env)->ReleasePrimitiveArrayCritical(env, bwork, __nbwork, JNI_ABORT); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nrcondv) (*env)->ReleasePrimitiveArrayCritical(env, rcondv, __nrcondv, failed ? JNI_ABORT : 0); + if (__nrconde) (*env)->ReleasePrimitiveArrayCritical(env, rconde, __nrconde, failed ? JNI_ABORT : 0); + if (__nrscale) (*env)->ReleasePrimitiveArrayCritical(env, rscale, __nrscale, failed ? JNI_ABORT : 0); + if (__nlscale) (*env)->ReleasePrimitiveArrayCritical(env, lscale, __nlscale, failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); + if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, failed ? JNI_ABORT : 0); + if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, bbnrm, doubleW_val_fieldID, __nbbnrm); + if (!failed) (*env)->SetDoubleField(env, abnrm, doubleW_val_fieldID, __nabnrm); + if (!failed) (*env)->SetIntField(env, ihi, intW_val_fieldID, __nihi); + if (!failed) (*env)->SetIntField(env, ilo, intW_val_fieldID, __nilo); + if (__nsense) (*env)->ReleaseStringUTFChars(env, sense, __nsense); + if (__njobvr) (*env)->ReleaseStringUTFChars(env, jobvr, __njobvr); + if (__njobvl) (*env)->ReleaseStringUTFChars(env, jobvl, __njobvl); + if (__nbalanc) (*env)->ReleaseStringUTFChars(env, balanc, __nbalanc); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgges_)(char *jobvsl, char *jobvsr, char *sort, /*FIXME*/void *selctg, int *n, double *a, int *lda, double *b, int *ldb, /*FIXME*/void *sdim, double *alphar, double *alphai, double *beta, double *vsl, int *ldvsl, double *vsr, int *ldvsr, double *work, int *lwork, int *bwork, /*FIXME*/void *info); +static void (*dggglm_)(int *n, int *m, int *p, double *a, int *lda, double *b, int *ldb, double *d, double *x, double *y, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggesK(JNIEnv *env, UNUSED jobject obj, - jstring jobvsl, jstring jobvsr, jstring sort, jobject selctg, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject sdim, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray vsl, jint offsetvsl, jint ldvsl, jdoubleArray vsr, jint offsetvsr, jint ldvsr, jdoubleArray work, jint offsetwork, jint lwork, jbooleanArray bwork, jint offsetbwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggglmK(JNIEnv *env, UNUSED jobject obj, jint n, jint m, jint p, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray d, jint offsetd, jdoubleArray x, jint offsetx, jdoubleArray y, jint offsety, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nd = NULL; double *__nx = NULL; double *__ny = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dggglm_(&n, &m, &p, __na + offseta, &lda, __nb + offsetb, &ldb, __nd + offsetd, __nx + offsetx, __ny + offsety, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dggesx_)(char *jobvsl, char *jobvsr, char *sort, /*FIXME*/void *selctg, char *sense, int *n, double *a, int *lda, double *b, int *ldb, /*FIXME*/void *sdim, double *alphar, double *alphai, double *beta, double *vsl, int *ldvsl, double *vsr, int *ldvsr, double *rconde, double *rcondv, double *work, int *lwork, int * iwork, int *liwork, int *bwork, /*FIXME*/void *info); +static void (*dgghrd_)(const char *compq, const char *compz, int *n, int *ilo, int *ihi, double *a, int *lda, double *b, int *ldb, double *q, int *ldq, double *z, int *ldz, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggesxK(JNIEnv *env, UNUSED jobject obj, - jstring jobvsl, jstring jobvsr, jstring sort, jobject selctg, jstring sense, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject sdim, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray vsl, jint offsetvsl, jint ldvsl, jdoubleArray vsr, jint offsetvsr, jint ldvsr, jdoubleArray rconde, jint offsetrconde, jdoubleArray rcondv, jint offsetrcondv, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jbooleanArray bwork, jint offsetbwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgghrdK(JNIEnv *env, UNUSED jobject obj, jstring compq, jstring compz, jint n, jint ilo, jint ihi, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray z, jint offsetz, jint ldz, jobject info) { + jboolean failed = FALSE; + const char *__ncompq = NULL; const char *__ncompz = NULL; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nq = NULL; double *__nz = NULL; + if (!(__ncompq = (*env)->GetStringUTFChars(env, compq, NULL))) goto fail; + if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + dgghrd_(__ncompq, __ncompz, &n, &ilo, &ihi, __na + offseta, &lda, __nb + offsetb, &ldb, __nq + offsetq, &ldq, __nz + offsetz, &ldz, &__ninfo); +done: + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ncompz) (*env)->ReleaseStringUTFChars(env, compz, __ncompz); + if (__ncompq) (*env)->ReleaseStringUTFChars(env, compq, __ncompq); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dggev_)(char *jobvl, char *jobvr, int *n, double *a, int *lda, double *b, int *ldb, double *alphar, double *alphai, double *beta, double *vl, int *ldvl, double *vr, int *ldvr, double *work, int *lwork, /*FIXME*/void *info); +static void (*dgglse_)(int *m, int *n, int *p, double *a, int *lda, double *b, int *ldb, double *c, double *d, double *x, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggevK(JNIEnv *env, UNUSED jobject obj, - jstring jobvl, jstring jobvr, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgglseK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint p, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray c, jint offsetc, jdoubleArray d, jint offsetd, jdoubleArray x, jint offsetx, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nc = NULL; double *__nd = NULL; double *__nx = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dgglse_(&m, &n, &p, __na + offseta, &lda, __nb + offsetb, &ldb, __nc + offsetc, __nd + offsetd, __nx + offsetx, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dggevx_)(char *balanc, char *jobvl, char *jobvr, char *sense, int *n, double *a, int *lda, double *b, int *ldb, double *alphar, double *alphai, double *beta, double *vl, int *ldvl, double *vr, int *ldvr, /*FIXME*/void *ilo, /*FIXME*/void *ihi, double *lscale, double *rscale, /*FIXME*/void *abnrm, /*FIXME*/void *bbnrm, double *rconde, double *rcondv, double *work, int *lwork, int * iwork, int *bwork, /*FIXME*/void *info); +static void (*dggqrf_)(int *n, int *m, int *p, double *a, int *lda, double *taua, double *b, int *ldb, double *taub, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggevxK(JNIEnv *env, UNUSED jobject obj, - jstring balanc, jstring jobvl, jstring jobvr, jstring sense, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jobject ilo, jobject ihi, jdoubleArray lscale, jint offsetlscale, jdoubleArray rscale, jint offsetrscale, jobject abnrm, jobject bbnrm, jdoubleArray rconde, jint offsetrconde, jdoubleArray rcondv, jint offsetrcondv, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jbooleanArray bwork, jint offsetbwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggqrfK(JNIEnv *env, UNUSED jobject obj, jint n, jint m, jint p, jdoubleArray a, jint offseta, jint lda, jdoubleArray taua, jint offsettaua, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray taub, jint offsettaub, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; double *__ntaua = NULL; double *__nb = NULL; double *__ntaub = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntaua = (*env)->GetPrimitiveArrayCritical(env, taua, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__ntaub = (*env)->GetPrimitiveArrayCritical(env, taub, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dggqrf_(&n, &m, &p, __na + offseta, &lda, __ntaua + offsettaua, __nb + offsetb, &ldb, __ntaub + offsettaub, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntaub) (*env)->ReleasePrimitiveArrayCritical(env, taub, __ntaub, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__ntaua) (*env)->ReleasePrimitiveArrayCritical(env, taua, __ntaua, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dggglm_)(int *n, int *m, int *p, double *a, int *lda, double *b, int *ldb, double *d, double *x, double *y, double *work, int *lwork, /*FIXME*/void *info); +static void (*dggrqf_)(int *m, int *p, int *n, double *a, int *lda, double *taua, double *b, int *ldb, double *taub, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggglmK(JNIEnv *env, UNUSED jobject obj, - jint n, jint m, jint p, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray d, jint offsetd, jdoubleArray x, jint offsetx, jdoubleArray y, jint offsety, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggrqfK(JNIEnv *env, UNUSED jobject obj, jint m, jint p, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray taua, jint offsettaua, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray taub, jint offsettaub, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; double *__ntaua = NULL; double *__nb = NULL; double *__ntaub = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntaua = (*env)->GetPrimitiveArrayCritical(env, taua, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__ntaub = (*env)->GetPrimitiveArrayCritical(env, taub, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dggrqf_(&m, &p, &n, __na + offseta, &lda, __ntaua + offsettaua, __nb + offsetb, &ldb, __ntaub + offsettaub, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntaub) (*env)->ReleasePrimitiveArrayCritical(env, taub, __ntaub, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__ntaua) (*env)->ReleasePrimitiveArrayCritical(env, taua, __ntaua, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgghrd_)(char *compq, char *compz, int *n, int *ilo, int *ihi, double *a, int *lda, double *b, int *ldb, double *q, int *ldq, double *z, int *ldz, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgghrdK(JNIEnv *env, UNUSED jobject obj, - jstring compq, jstring compz, jint n, jint ilo, jint ihi, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray z, jint offsetz, jint ldz, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dggsvd_)(const char *jobu, const char *jobv, const char *jobq, int *m, int *n, int *p, int *k, int *l, double *a, int *lda, double *b, int *ldb, double *alpha, double *beta, double *u, int *ldu, double *v, int *ldv, double *q, int *ldq, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggsvdK(JNIEnv *env, UNUSED jobject obj, jstring jobu, jstring jobv, jstring jobq, jint m, jint n, jint p, jobject k, jobject l, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray alpha, jint offsetalpha, jdoubleArray beta, jint offsetbeta, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__njobu = NULL; const char *__njobv = NULL; const char *__njobq = NULL; int __nk = 0; int __nl = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nalpha = NULL; double *__nbeta = NULL; double *__nu = NULL; double *__nv = NULL; double *__nq = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__njobu = (*env)->GetStringUTFChars(env, jobu, NULL))) goto fail; + if (!(__njobv = (*env)->GetStringUTFChars(env, jobv, NULL))) goto fail; + if (!(__njobq = (*env)->GetStringUTFChars(env, jobq, NULL))) goto fail; + __nk = (*env)->GetIntField(env, k, intW_val_fieldID); + __nl = (*env)->GetIntField(env, l, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nalpha = (*env)->GetPrimitiveArrayCritical(env, alpha, NULL))) goto fail; + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dggsvd_(__njobu, __njobv, __njobq, &m, &n, &p, &__nk, &__nl, __na + offseta, &lda, __nb + offsetb, &ldb, __nalpha + offsetalpha, __nbeta + offsetbeta, __nu + offsetu, &ldu, __nv + offsetv, &ldv, __nq + offsetq, &ldq, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); + if (__nalpha) (*env)->ReleasePrimitiveArrayCritical(env, alpha, __nalpha, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, l, intW_val_fieldID, __nl); + if (!failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); + if (__njobq) (*env)->ReleaseStringUTFChars(env, jobq, __njobq); + if (__njobv) (*env)->ReleaseStringUTFChars(env, jobv, __njobv); + if (__njobu) (*env)->ReleaseStringUTFChars(env, jobu, __njobu); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgglse_)(int *m, int *n, int *p, double *a, int *lda, double *b, int *ldb, double *c, double *d, double *x, double *work, int *lwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgglseK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint p, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray c, jint offsetc, jdoubleArray d, jint offsetd, jdoubleArray x, jint offsetx, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dggsvp_)(const char *jobu, const char *jobv, const char *jobq, int *m, int *p, int *n, double *a, int *lda, double *b, int *ldb, double *tola, double *tolb, int *k, int *l, double *u, int *ldu, double *v, int *ldv, double *q, int *ldq, int *iwork, double *tau, double *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggsvpK(JNIEnv *env, UNUSED jobject obj, jstring jobu, jstring jobv, jstring jobq, jint m, jint p, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble tola, jdouble tolb, jobject k, jobject l, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray q, jint offsetq, jint ldq, jintArray iwork, jint offsetiwork, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__njobu = NULL; const char *__njobv = NULL; const char *__njobq = NULL; int __nk = 0; int __nl = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nu = NULL; double *__nv = NULL; double *__nq = NULL; int *__niwork = NULL; double *__ntau = NULL; double *__nwork = NULL; + if (!(__njobu = (*env)->GetStringUTFChars(env, jobu, NULL))) goto fail; + if (!(__njobv = (*env)->GetStringUTFChars(env, jobv, NULL))) goto fail; + if (!(__njobq = (*env)->GetStringUTFChars(env, jobq, NULL))) goto fail; + __nk = (*env)->GetIntField(env, k, intW_val_fieldID); + __nl = (*env)->GetIntField(env, l, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dggsvp_(__njobu, __njobv, __njobq, &m, &p, &n, __na + offseta, &lda, __nb + offsetb, &ldb, &tola, &tolb, &__nk, &__nl, __nu + offsetu, &ldu, __nv + offsetv, &ldv, __nq + offsetq, &ldq, __niwork + offsetiwork, __ntau + offsettau, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, l, intW_val_fieldID, __nl); + if (!failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); + if (__njobq) (*env)->ReleaseStringUTFChars(env, jobq, __njobq); + if (__njobv) (*env)->ReleaseStringUTFChars(env, jobv, __njobv); + if (__njobu) (*env)->ReleaseStringUTFChars(env, jobu, __njobu); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dggqrf_)(int *n, int *m, int *p, double *a, int *lda, double *taua, double *b, int *ldb, double *taub, double *work, int *lwork, /*FIXME*/void *info); +static void (*dgtcon_)(const char *norm, int *n, double *dl, double *d, double *du, double *du2, int *ipiv, double *anorm, double *rcond, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgtconK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nnorm = NULL; double __nrcond = 0; int __ninfo = 0; double *__ndl = NULL; double *__nd = NULL; double *__ndu = NULL; double *__ndu2 = NULL; int *__nipiv = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; + if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dgtcon_(__nnorm, &n, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __ndu2 + offsetdu2, __nipiv + offsetipiv, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; +} -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggqrfK(JNIEnv *env, UNUSED jobject obj, - jint n, jint m, jint p, jdoubleArray a, jint offseta, jint lda, jdoubleArray taua, jint offsettaua, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray taub, jint offsettaub, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dgtrfs_)(const char *trans, int *n, int *nrhs, double *dl, double *d, double *du, double *dlf, double *df, double *duf, double *du2, int *ipiv, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgtrfsK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint n, jint nrhs, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray dlf, jint offsetdlf, jdoubleArray df, jint offsetdf, jdoubleArray duf, jint offsetduf, jdoubleArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__ntrans = NULL; int __ninfo = 0; double *__ndl = NULL; double *__nd = NULL; double *__ndu = NULL; double *__ndlf = NULL; double *__ndf = NULL; double *__nduf = NULL; double *__ndu2 = NULL; int *__nipiv = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; + if (!(__ndlf = (*env)->GetPrimitiveArrayCritical(env, dlf, NULL))) goto fail; + if (!(__ndf = (*env)->GetPrimitiveArrayCritical(env, df, NULL))) goto fail; + if (!(__nduf = (*env)->GetPrimitiveArrayCritical(env, duf, NULL))) goto fail; + if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dgtrfs_(__ntrans, &n, &nrhs, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __ndlf + offsetdlf, __ndf + offsetdf, __nduf + offsetduf, __ndu2 + offsetdu2, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, failed ? JNI_ABORT : 0); + if (__nduf) (*env)->ReleasePrimitiveArrayCritical(env, duf, __nduf, failed ? JNI_ABORT : 0); + if (__ndf) (*env)->ReleasePrimitiveArrayCritical(env, df, __ndf, failed ? JNI_ABORT : 0); + if (__ndlf) (*env)->ReleasePrimitiveArrayCritical(env, dlf, __ndlf, failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dggrqf_)(int *m, int *p, int *n, double *a, int *lda, double *taua, double *b, int *ldb, double *taub, double *work, int *lwork, /*FIXME*/void *info); +static void (*dgtsv_)(int *n, int *nrhs, double *dl, double *d, double *du, double *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggrqfK(JNIEnv *env, UNUSED jobject obj, - jint m, jint p, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray taua, jint offsettaua, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray taub, jint offsettaub, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgtsvK(JNIEnv *env, UNUSED jobject obj, jint n, jint nrhs, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__ndl = NULL; double *__nd = NULL; double *__ndu = NULL; double *__nb = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + dgtsv_(&n, &nrhs, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dggsvd_)(char *jobu, char *jobv, char *jobq, int *m, int *n, int *p, /*FIXME*/void *k, /*FIXME*/void *l, double *a, int *lda, double *b, int *ldb, double *alpha, double *beta, double *u, int *ldu, double *v, int *ldv, double *q, int *ldq, double *work, int * iwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggsvdK(JNIEnv *env, UNUSED jobject obj, - jstring jobu, jstring jobv, jstring jobq, jint m, jint n, jint p, jobject k, jobject l, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray alpha, jint offsetalpha, jdoubleArray beta, jint offsetbeta, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dgtsvx_)(const char *fact, const char *trans, int *n, int *nrhs, double *dl, double *d, double *du, double *dlf, double *df, double *duf, double *du2, int *ipiv, double *b, int *ldb, double *x, int *ldx, double *rcond, double *ferr, double *berr, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgtsvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring trans, jint n, jint nrhs, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray dlf, jint offsetdlf, jdoubleArray df, jint offsetdf, jdoubleArray duf, jint offsetduf, jdoubleArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nfact = NULL; const char *__ntrans = NULL; double __nrcond = 0; int __ninfo = 0; double *__ndl = NULL; double *__nd = NULL; double *__ndu = NULL; double *__ndlf = NULL; double *__ndf = NULL; double *__nduf = NULL; double *__ndu2 = NULL; int *__nipiv = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; + if (!(__ndlf = (*env)->GetPrimitiveArrayCritical(env, dlf, NULL))) goto fail; + if (!(__ndf = (*env)->GetPrimitiveArrayCritical(env, df, NULL))) goto fail; + if (!(__nduf = (*env)->GetPrimitiveArrayCritical(env, duf, NULL))) goto fail; + if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dgtsvx_(__nfact, __ntrans, &n, &nrhs, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __ndlf + offsetdlf, __ndf + offsetdf, __nduf + offsetduf, __ndu2 + offsetdu2, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, failed ? JNI_ABORT : 0); + if (__nduf) (*env)->ReleasePrimitiveArrayCritical(env, duf, __nduf, failed ? JNI_ABORT : 0); + if (__ndf) (*env)->ReleasePrimitiveArrayCritical(env, df, __ndf, failed ? JNI_ABORT : 0); + if (__ndlf) (*env)->ReleasePrimitiveArrayCritical(env, dlf, __ndlf, failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dggsvp_)(char *jobu, char *jobv, char *jobq, int *m, int *p, int *n, double *a, int *lda, double *b, int *ldb, double *tola, double *tolb, /*FIXME*/void *k, /*FIXME*/void *l, double *u, int *ldu, double *v, int *ldv, double *q, int *ldq, int * iwork, double *tau, double *work, /*FIXME*/void *info); +static void (*dgttrf_)(int *n, double *dl, double *d, double *du, double *du2, int *ipiv, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggsvpK(JNIEnv *env, UNUSED jobject obj, - jstring jobu, jstring jobv, jstring jobq, jint m, jint p, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble tola, jdouble tolb, jobject k, jobject l, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray q, jint offsetq, jint ldq, jintArray iwork, jint offsetiwork, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgttrfK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__ndl = NULL; double *__nd = NULL; double *__ndu = NULL; double *__ndu2 = NULL; int *__nipiv = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; + if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + dgttrf_(&n, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __ndu2 + offsetdu2, __nipiv + offsetipiv, &__ninfo); +done: + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgtcon_)(char *norm, int *n, double *dl, double *d, double *du, double *du22, int * ipiv, double *anorm, /*FIXME*/void *rcond, double *work, int * iwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgtconK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jint n, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dgttrs_)(const char *trans, int *n, int *nrhs, double *dl, double *d, double *du, double *du2, int *ipiv, double *b, int *ldb, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgttrsK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint n, jint nrhs, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__ntrans = NULL; int __ninfo = 0; double *__ndl = NULL; double *__nd = NULL; double *__ndu = NULL; double *__ndu2 = NULL; int *__nipiv = NULL; double *__nb = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; + if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + dgttrs_(__ntrans, &n, &nrhs, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __ndu2 + offsetdu2, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgtrfs_)(char *trans, int *n, int *nrhs, double *dl, double *d, double *du, double *dlf, double *df, double *duf, double *du22, int * ipiv, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); +static void (*dgtts2_)(int *itrans, int *n, int *nrhs, double *dl, double *d, double *du, double *du2, int *ipiv, double *b, int *ldb); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgtrfsK(JNIEnv *env, UNUSED jobject obj, - jstring trans, jint n, jint nrhs, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray dlf, jint offsetdlf, jdoubleArray df, jint offsetdf, jdoubleArray duf, jint offsetduf, jdoubleArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgtts2K(JNIEnv *env, UNUSED jobject obj, jint itrans, jint n, jint nrhs, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb) { + jboolean failed = FALSE; + double *__ndl = NULL; double *__nd = NULL; double *__ndu = NULL; double *__ndu2 = NULL; int *__nipiv = NULL; double *__nb = NULL; + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; + if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + dgtts2_(&itrans, &n, &nrhs, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __ndu2 + offsetdu2, __nipiv + offsetipiv, __nb + offsetb, &ldb); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgtsv_)(int *n, int *nrhs, double *dl, double *d, double *du, double *b, int *ldb, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgtsvK(JNIEnv *env, UNUSED jobject obj, - jint n, jint nrhs, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dhgeqz_)(const char *job, const char *compq, const char *compz, int *n, int *ilo, int *ihi, double *h, int *ldh, double *t, int *ldt, double *alphar, double *alphai, double *beta, double *q, int *ldq, double *z, int *ldz, double *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dhgeqzK(JNIEnv *env, UNUSED jobject obj, jstring job, jstring compq, jstring compz, jint n, jint ilo, jint ihi, jdoubleArray h, jint offseth, jint ldh, jdoubleArray t, jint offsett, jint ldt, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__njob = NULL; const char *__ncompq = NULL; const char *__ncompz = NULL; int __ninfo = 0; double *__nh = NULL; double *__nt = NULL; double *__nalphar = NULL; double *__nalphai = NULL; double *__nbeta = NULL; double *__nq = NULL; double *__nz = NULL; double *__nwork = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; + if (!(__ncompq = (*env)->GetStringUTFChars(env, compq, NULL))) goto fail; + if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) goto fail; + if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) goto fail; + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dhgeqz_(__njob, __ncompq, __ncompz, &n, &ilo, &ihi, __nh + offseth, &ldh, __nt + offsett, &ldt, __nalphar + offsetalphar, __nalphai + offsetalphai, __nbeta + offsetbeta, __nq + offsetq, &ldq, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); + if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, failed ? JNI_ABORT : 0); + if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ncompz) (*env)->ReleaseStringUTFChars(env, compz, __ncompz); + if (__ncompq) (*env)->ReleaseStringUTFChars(env, compq, __ncompq); + if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgtsvx_)(char *fact, char *trans, int *n, int *nrhs, double *dl, double *d, double *du, double *dlf, double *df, double *duf, double *du22, int * ipiv, double *b, int *ldb, double *x, int *ldx, /*FIXME*/void *rcond, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); +static void (*dhsein_)(const char *side, const char *eigsrc, const char *initv, int *select, int *n, double *h, int *ldh, double *wr, double *wi, double *vl, int *ldvl, double *vr, int *ldvr, int *mm, int *m, double *work, int *ifaill, int *ifailr, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dhseinK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring eigsrc, jstring initv, jbooleanArray select, jint offsetselect, jint n, jdoubleArray h, jint offseth, jint ldh, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jint mm, jobject m, jdoubleArray work, jint offsetwork, jintArray ifaill, jint offsetifaill, jintArray ifailr, jint offsetifailr, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__neigsrc = NULL; const char *__ninitv = NULL; int __nm = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; double *__nh = NULL; double *__nwr = NULL; double *__nwi = NULL; double *__nvl = NULL; double *__nvr = NULL; double *__nwork = NULL; int *__nifaill = NULL; int *__nifailr = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__neigsrc = (*env)->GetStringUTFChars(env, eigsrc, NULL))) goto fail; + if (!(__ninitv = (*env)->GetStringUTFChars(env, initv, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nifaill = (*env)->GetPrimitiveArrayCritical(env, ifaill, NULL))) goto fail; + if (!(__nifailr = (*env)->GetPrimitiveArrayCritical(env, ifailr, NULL))) goto fail; + dhsein_(__nside, __neigsrc, __ninitv, __nselect + offsetselect, &n, __nh + offseth, &ldh, __nwr + offsetwr, __nwi + offsetwi, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, &mm, &__nm, __nwork + offsetwork, __nifaill + offsetifaill, __nifailr + offsetifailr, &__ninfo); +done: + if (__nifailr) (*env)->ReleasePrimitiveArrayCritical(env, ifailr, __nifailr, failed ? JNI_ABORT : 0); + if (__nifaill) (*env)->ReleasePrimitiveArrayCritical(env, ifaill, __nifaill, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__ninitv) (*env)->ReleaseStringUTFChars(env, initv, __ninitv); + if (__neigsrc) (*env)->ReleaseStringUTFChars(env, eigsrc, __neigsrc); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; +} -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgtsvxK(JNIEnv *env, UNUSED jobject obj, - jstring fact, jstring trans, jint n, jint nrhs, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray dlf, jint offsetdlf, jdoubleArray df, jint offsetdf, jdoubleArray duf, jint offsetduf, jdoubleArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dhseqr_)(const char *job, const char *compz, int *n, int *ilo, int *ihi, double *h, int *ldh, double *wr, double *wi, double *z, int *ldz, double *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dhseqrK(JNIEnv *env, UNUSED jobject obj, jstring job, jstring compz, jint n, jint ilo, jint ihi, jdoubleArray h, jint offseth, jint ldh, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__njob = NULL; const char *__ncompz = NULL; int __ninfo = 0; double *__nh = NULL; double *__nwr = NULL; double *__nwi = NULL; double *__nz = NULL; double *__nwork = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; + if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dhseqr_(__njob, __ncompz, &n, &ilo, &ihi, __nh + offseth, &ldh, __nwr + offsetwr, __nwi + offsetwi, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ncompz) (*env)->ReleaseStringUTFChars(env, compz, __ncompz); + if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dgttrf_)(int *n, double *dl, double *d, double *du, double *du22, int * ipiv, /*FIXME*/void *info); +static int (*disnan_)(double *din); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgttrfK(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} +jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_disnanK(JNIEnv *env, UNUSED jobject obj, jdouble din) { + jboolean __ret; + jboolean failed = FALSE; + -static void (*dgttrs_)(char *trans, int *n, int *nrhs, double *dl, double *d, double *du, double *du22, int * ipiv, double *b, int *ldb, /*FIXME*/void *info); + __ret = disnan_(&din); +done: -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgttrsK(JNIEnv *env, UNUSED jobject obj, - jstring trans, jint n, jint nrhs, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*dgtts2_)(int *itrans, int *n, int *nrhs, double *dl, double *d, double *du, double *du22, int * ipiv, double *b, int *ldb); +static void (*dlabad_)(double *small, double *large); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgtts2K(JNIEnv *env, UNUSED jobject obj, - jint itrans, jint n, jint nrhs, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlabadK(JNIEnv *env, UNUSED jobject obj, jobject small, jobject large) { + jboolean failed = FALSE; + double __nsmall = 0; double __nlarge = 0; + __nsmall = (*env)->GetDoubleField(env, small, doubleW_val_fieldID); + __nlarge = (*env)->GetDoubleField(env, large, doubleW_val_fieldID); + dlabad_(&__nsmall, &__nlarge); +done: + if (!failed) (*env)->SetDoubleField(env, large, doubleW_val_fieldID, __nlarge); + if (!failed) (*env)->SetDoubleField(env, small, doubleW_val_fieldID, __nsmall); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dhgeqz_)(char *job, char *compq, char *compz, int *n, int *ilo, int *ihi, double *h, int *ldh, double *t, int *ldt, double *alphar, double *alphai, double *beta, double *q, int *ldq, double *z, int *ldz, double *work, int *lwork, /*FIXME*/void *info); +static void (*dlabrd_)(int *m, int *n, int *nb, double *a, int *lda, double *d, double *e, double *tauq, double *taup, double *x, int *ldx, double *y, int *ldy); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dhgeqzK(JNIEnv *env, UNUSED jobject obj, - jstring job, jstring compq, jstring compz, jint n, jint ilo, jint ihi, jdoubleArray h, jint offseth, jint ldh, jdoubleArray t, jint offsett, jint ldt, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlabrdK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint nb, jdoubleArray a, jint offseta, jint lda, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray tauq, jint offsettauq, jdoubleArray taup, jint offsettaup, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray y, jint offsety, jint ldy) { + jboolean failed = FALSE; + double *__na = NULL; double *__nd = NULL; double *__ne = NULL; double *__ntauq = NULL; double *__ntaup = NULL; double *__nx = NULL; double *__ny = NULL; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__ntauq = (*env)->GetPrimitiveArrayCritical(env, tauq, NULL))) goto fail; + if (!(__ntaup = (*env)->GetPrimitiveArrayCritical(env, taup, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + dlabrd_(&m, &n, &nb, __na + offseta, &lda, __nd + offsetd, __ne + offsete, __ntauq + offsettauq, __ntaup + offsettaup, __nx + offsetx, &ldx, __ny + offsety, &ldy); +done: + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__ntaup) (*env)->ReleasePrimitiveArrayCritical(env, taup, __ntaup, failed ? JNI_ABORT : 0); + if (__ntauq) (*env)->ReleasePrimitiveArrayCritical(env, tauq, __ntauq, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dhsein_)(char *side, char *eigsrc, char *initv, int *select, int *n, double *h, int *ldh, double *wr, double *wi, double *vl, int *ldvl, double *vr, int *ldvr, int *mm, /*FIXME*/void *m, double *work, int * ifaill, int * ifailr, /*FIXME*/void *info); +static void (*dlacn2_)(int *n, double *v, double *x, int *isgn, double *est, int *kase, int *isave); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dhseinK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring eigsrc, jstring initv, jbooleanArray select, jint offsetselect, jint n, jdoubleArray h, jint offseth, jint ldh, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jint mm, jobject m, jdoubleArray work, jint offsetwork, jintArray ifaill, jint offsetifaill, jintArray ifailr, jint offsetifailr, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlacn2K(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray v, jint offsetv, jdoubleArray x, jint offsetx, jintArray isgn, jint offsetisgn, jobject est, jobject kase, jintArray isave, jint offsetisave) { + jboolean failed = FALSE; + double __nest = 0; int __nkase = 0; double *__nv = NULL; double *__nx = NULL; int *__nisgn = NULL; int *__nisave = NULL; + __nest = (*env)->GetDoubleField(env, est, doubleW_val_fieldID); + __nkase = (*env)->GetIntField(env, kase, intW_val_fieldID); + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nisgn = (*env)->GetPrimitiveArrayCritical(env, isgn, NULL))) goto fail; + if (!(__nisave = (*env)->GetPrimitiveArrayCritical(env, isave, NULL))) goto fail; + dlacn2_(&n, __nv + offsetv, __nx + offsetx, __nisgn + offsetisgn, &__nest, &__nkase, __nisave + offsetisave); +done: + if (__nisave) (*env)->ReleasePrimitiveArrayCritical(env, isave, __nisave, failed ? JNI_ABORT : 0); + if (__nisgn) (*env)->ReleasePrimitiveArrayCritical(env, isgn, __nisgn, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, kase, intW_val_fieldID, __nkase); + if (!failed) (*env)->SetDoubleField(env, est, doubleW_val_fieldID, __nest); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dhseqr_)(char *job, char *compz, int *n, int *ilo, int *ihi, double *h, int *ldh, double *wr, double *wi, double *z, int *ldz, double *work, int *lwork, /*FIXME*/void *info); +static void (*dlacon_)(int *n, double *v, double *x, int *isgn, double *est, int *kase); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dhseqrK(JNIEnv *env, UNUSED jobject obj, - jstring job, jstring compz, jint n, jint ilo, jint ihi, jdoubleArray h, jint offseth, jint ldh, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaconK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray v, jint offsetv, jdoubleArray x, jint offsetx, jintArray isgn, jint offsetisgn, jobject est, jobject kase) { + jboolean failed = FALSE; + double __nest = 0; int __nkase = 0; double *__nv = NULL; double *__nx = NULL; int *__nisgn = NULL; + __nest = (*env)->GetDoubleField(env, est, doubleW_val_fieldID); + __nkase = (*env)->GetIntField(env, kase, intW_val_fieldID); + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nisgn = (*env)->GetPrimitiveArrayCritical(env, isgn, NULL))) goto fail; + dlacon_(&n, __nv + offsetv, __nx + offsetx, __nisgn + offsetisgn, &__nest, &__nkase); +done: + if (__nisgn) (*env)->ReleasePrimitiveArrayCritical(env, isgn, __nisgn, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, kase, intW_val_fieldID, __nkase); + if (!failed) (*env)->SetDoubleField(env, est, doubleW_val_fieldID, __nest); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static int *(*disnan_)(double *din); +static void (*dlacpy_)(const char *uplo, int *m, int *n, double *a, int *lda, double *b, int *ldb); -jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_disnanK(JNIEnv *env, UNUSED jobject obj, - jdouble din) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlacpyK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb) { + jboolean failed = FALSE; + const char *__nuplo = NULL; double *__na = NULL; double *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + dlacpy_(__nuplo, &m, &n, __na + offseta, &lda, __nb + offsetb, &ldb); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlabad_)(/*FIXME*/void *small, /*FIXME*/void *large); +static void (*dladiv_)(double *a, double *b, double *c, double *d, double *p, double *q); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlabadK(JNIEnv *env, UNUSED jobject obj, - jobject small, jobject large) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dladivK(JNIEnv *env, UNUSED jobject obj, jdouble a, jdouble b, jdouble c, jdouble d, jobject p, jobject q) { + jboolean failed = FALSE; + double __np = 0; double __nq = 0; + __np = (*env)->GetDoubleField(env, p, doubleW_val_fieldID); + __nq = (*env)->GetDoubleField(env, q, doubleW_val_fieldID); + dladiv_(&a, &b, &c, &d, &__np, &__nq); +done: + if (!failed) (*env)->SetDoubleField(env, q, doubleW_val_fieldID, __nq); + if (!failed) (*env)->SetDoubleField(env, p, doubleW_val_fieldID, __np); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlabrd_)(int *m, int *n, int *nb, double *a, int *lda, double *d, double *e, double *tauq, double *taup, double *x, int *ldx, double *y, int *ldy); +static void (*dlae2_)(double *a, double *b, double *c, double *rt1, double *rt2); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlabrdK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint nb, jdoubleArray a, jint offseta, jint lda, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray tauq, jint offsettauq, jdoubleArray taup, jint offsettaup, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray y, jint offsety, jint ldy) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlae2K(JNIEnv *env, UNUSED jobject obj, jdouble a, jdouble b, jdouble c, jobject rt1, jobject rt2) { + jboolean failed = FALSE; + double __nrt1 = 0; double __nrt2 = 0; + __nrt1 = (*env)->GetDoubleField(env, rt1, doubleW_val_fieldID); + __nrt2 = (*env)->GetDoubleField(env, rt2, doubleW_val_fieldID); + dlae2_(&a, &b, &c, &__nrt1, &__nrt2); +done: + if (!failed) (*env)->SetDoubleField(env, rt2, doubleW_val_fieldID, __nrt2); + if (!failed) (*env)->SetDoubleField(env, rt1, doubleW_val_fieldID, __nrt1); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlacn2_)(int *n, double *v, double *x, int * isgn, /*FIXME*/void *est, /*FIXME*/void *kase, int * isave); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlacn2K(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray v, jint offsetv, jdoubleArray x, jint offsetx, jintArray isgn, jint offsetisgn, jobject est, jobject kase, jintArray isave, jint offsetisave) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlaebz_)(int *ijob, int *nitmax, int *n, int *mmax, int *minp, int *nbmin, double *abstol, double *reltol, double *pivmin, double *d, double *e, double *e2, int *nval, double *ab, double *c, int *mout, int *nab, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaebzK(JNIEnv *env, UNUSED jobject obj, jint ijob, jint nitmax, jint n, jint mmax, jint minp, jint nbmin, jdouble abstol, jdouble reltol, jdouble pivmin, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray e2, jint offsete2, jintArray nval, jint offsetnval, jdoubleArray ab, jint offsetab, jdoubleArray c, jint offsetc, jobject mout, jintArray nab, jint offsetnab, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + int __nmout = 0; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__ne2 = NULL; int *__nnval = NULL; double *__nab = NULL; double *__nc = NULL; int *__nnab = NULL; double *__nwork = NULL; int *__niwork = NULL; + __nmout = (*env)->GetIntField(env, mout, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) goto fail; + if (!(__nnval = (*env)->GetPrimitiveArrayCritical(env, nval, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nnab = (*env)->GetPrimitiveArrayCritical(env, nab, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dlaebz_(&ijob, &nitmax, &n, &mmax, &minp, &nbmin, &abstol, &reltol, &pivmin, __nd + offsetd, __ne + offsete, __ne2 + offsete2, __nnval + offsetnval, __nab + offsetab, __nc + offsetc, &__nmout, __nnab + offsetnab, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nnab) (*env)->ReleasePrimitiveArrayCritical(env, nab, __nnab, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (__nnval) (*env)->ReleasePrimitiveArrayCritical(env, nval, __nnval, failed ? JNI_ABORT : 0); + if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, mout, intW_val_fieldID, __nmout); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlacon_)(int *n, double *v, double *x, int * isgn, /*FIXME*/void *est, /*FIXME*/void *kase); +static void (*dlaed0_)(int *icompq, int *qsiz, int *n, double *d, double *e, double *q, int *ldq, double *qstore, int *ldqs, double *work, int *iwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaconK(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray v, jint offsetv, jdoubleArray x, jint offsetx, jintArray isgn, jint offsetisgn, jobject est, jobject kase) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed0K(JNIEnv *env, UNUSED jobject obj, jint icompq, jint qsiz, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray qstore, jint offsetqstore, jint ldqs, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nq = NULL; double *__nqstore = NULL; double *__nwork = NULL; int *__niwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nqstore = (*env)->GetPrimitiveArrayCritical(env, qstore, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dlaed0_(&icompq, &qsiz, &n, __nd + offsetd, __ne + offsete, __nq + offsetq, &ldq, __nqstore + offsetqstore, &ldqs, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nqstore) (*env)->ReleasePrimitiveArrayCritical(env, qstore, __nqstore, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlacpy_)(const char *uplo, int *m, int *n, double *a, int *lda, double *b, int *ldb); +static void (*dlaed1_)(int *n, double *d, double *q, int *ldq, int *indxq, double *rho, int *cutpnt, double *work, int *iwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlacpyK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed1K(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray d, jint offsetd, jdoubleArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jint cutpnt, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + double __nrho = 0; int __ninfo = 0; double *__nd = NULL; double *__nq = NULL; int *__nindxq = NULL; double *__nwork = NULL; int *__niwork = NULL; + __nrho = (*env)->GetDoubleField(env, rho, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nindxq = (*env)->GetPrimitiveArrayCritical(env, indxq, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dlaed1_(&n, __nd + offsetd, __nq + offsetq, &ldq, __nindxq + offsetindxq, &__nrho, &cutpnt, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nindxq) (*env)->ReleasePrimitiveArrayCritical(env, indxq, __nindxq, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, rho, doubleW_val_fieldID, __nrho); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dladiv_)(double *a, double *b, double *c, double *d, /*FIXME*/void *p, /*FIXME*/void *q); +static void (*dlaed2_)(int *k, int *n, int *n1, double *d, double *q, int *ldq, int *indxq, double *rho, double *z, double *dlamda, double *w, double *q2, int *indx, int *indxc, int *indxp, int *coltyp, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed2K(JNIEnv *env, UNUSED jobject obj, jobject k, jint n, jint n1, jdoubleArray d, jint offsetd, jdoubleArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jdoubleArray z, jint offsetz, jdoubleArray dlamda, jint offsetdlamda, jdoubleArray w, jint offsetw, jdoubleArray q2, jint offsetq2, jintArray indx, jint offsetindx, jintArray indxc, jint offsetindxc, jintArray indxp, jint offsetindxp, jintArray coltyp, jint offsetcoltyp, jobject info) { + jboolean failed = FALSE; + int __nk = 0; double __nrho = 0; int __ninfo = 0; double *__nd = NULL; double *__nq = NULL; int *__nindxq = NULL; double *__nz = NULL; double *__ndlamda = NULL; double *__nw = NULL; double *__nq2 = NULL; int *__nindx = NULL; int *__nindxc = NULL; int *__nindxp = NULL; int *__ncoltyp = NULL; + __nk = (*env)->GetIntField(env, k, intW_val_fieldID); + __nrho = (*env)->GetDoubleField(env, rho, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nindxq = (*env)->GetPrimitiveArrayCritical(env, indxq, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__ndlamda = (*env)->GetPrimitiveArrayCritical(env, dlamda, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nq2 = (*env)->GetPrimitiveArrayCritical(env, q2, NULL))) goto fail; + if (!(__nindx = (*env)->GetPrimitiveArrayCritical(env, indx, NULL))) goto fail; + if (!(__nindxc = (*env)->GetPrimitiveArrayCritical(env, indxc, NULL))) goto fail; + if (!(__nindxp = (*env)->GetPrimitiveArrayCritical(env, indxp, NULL))) goto fail; + if (!(__ncoltyp = (*env)->GetPrimitiveArrayCritical(env, coltyp, NULL))) goto fail; + dlaed2_(&__nk, &n, &n1, __nd + offsetd, __nq + offsetq, &ldq, __nindxq + offsetindxq, &__nrho, __nz + offsetz, __ndlamda + offsetdlamda, __nw + offsetw, __nq2 + offsetq2, __nindx + offsetindx, __nindxc + offsetindxc, __nindxp + offsetindxp, __ncoltyp + offsetcoltyp, &__ninfo); +done: + if (__ncoltyp) (*env)->ReleasePrimitiveArrayCritical(env, coltyp, __ncoltyp, failed ? JNI_ABORT : 0); + if (__nindxp) (*env)->ReleasePrimitiveArrayCritical(env, indxp, __nindxp, failed ? JNI_ABORT : 0); + if (__nindxc) (*env)->ReleasePrimitiveArrayCritical(env, indxc, __nindxc, failed ? JNI_ABORT : 0); + if (__nindx) (*env)->ReleasePrimitiveArrayCritical(env, indx, __nindx, failed ? JNI_ABORT : 0); + if (__nq2) (*env)->ReleasePrimitiveArrayCritical(env, q2, __nq2, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__ndlamda) (*env)->ReleasePrimitiveArrayCritical(env, dlamda, __ndlamda, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nindxq) (*env)->ReleasePrimitiveArrayCritical(env, indxq, __nindxq, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, rho, doubleW_val_fieldID, __nrho); + if (!failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; +} -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dladivK(JNIEnv *env, UNUSED jobject obj, - jdouble a, jdouble b, jdouble c, jdouble d, jobject p, jobject q) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlaed3_)(int *k, int *n, int *n1, double *d, double *q, int *ldq, double *rho, double *dlamda, double *q2, int *indx, int *ctot, double *w, double *s, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed3K(JNIEnv *env, UNUSED jobject obj, jint k, jint n, jint n1, jdoubleArray d, jint offsetd, jdoubleArray q, jint offsetq, jint ldq, jdouble rho, jdoubleArray dlamda, jint offsetdlamda, jdoubleArray q2, jint offsetq2, jintArray indx, jint offsetindx, jintArray ctot, jint offsetctot, jdoubleArray w, jint offsetw, jdoubleArray s, jint offsets, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__nd = NULL; double *__nq = NULL; double *__ndlamda = NULL; double *__nq2 = NULL; int *__nindx = NULL; int *__nctot = NULL; double *__nw = NULL; double *__ns = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__ndlamda = (*env)->GetPrimitiveArrayCritical(env, dlamda, NULL))) goto fail; + if (!(__nq2 = (*env)->GetPrimitiveArrayCritical(env, q2, NULL))) goto fail; + if (!(__nindx = (*env)->GetPrimitiveArrayCritical(env, indx, NULL))) goto fail; + if (!(__nctot = (*env)->GetPrimitiveArrayCritical(env, ctot, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + dlaed3_(&k, &n, &n1, __nd + offsetd, __nq + offsetq, &ldq, &rho, __ndlamda + offsetdlamda, __nq2 + offsetq2, __nindx + offsetindx, __nctot + offsetctot, __nw + offsetw, __ns + offsets, &__ninfo); +done: + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nctot) (*env)->ReleasePrimitiveArrayCritical(env, ctot, __nctot, failed ? JNI_ABORT : 0); + if (__nindx) (*env)->ReleasePrimitiveArrayCritical(env, indx, __nindx, failed ? JNI_ABORT : 0); + if (__nq2) (*env)->ReleasePrimitiveArrayCritical(env, q2, __nq2, failed ? JNI_ABORT : 0); + if (__ndlamda) (*env)->ReleasePrimitiveArrayCritical(env, dlamda, __ndlamda, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlae2_)(double *a, double *b, double *c, /*FIXME*/void *rt1, /*FIXME*/void *rt2); +static void (*dlaed4_)(int *n, int *i, double *d, double *z, double *delta, double *rho, double *dlam, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlae2K(JNIEnv *env, UNUSED jobject obj, - jdouble a, jdouble b, jdouble c, jobject rt1, jobject rt2) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed4K(JNIEnv *env, UNUSED jobject obj, jint n, jint i, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdoubleArray delta, jint offsetdelta, jdouble rho, jobject dlam, jobject info) { + jboolean failed = FALSE; + double __ndlam = 0; int __ninfo = 0; double *__nd = NULL; double *__nz = NULL; double *__ndelta = NULL; + __ndlam = (*env)->GetDoubleField(env, dlam, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__ndelta = (*env)->GetPrimitiveArrayCritical(env, delta, NULL))) goto fail; + dlaed4_(&n, &i, __nd + offsetd, __nz + offsetz, __ndelta + offsetdelta, &rho, &__ndlam, &__ninfo); +done: + if (__ndelta) (*env)->ReleasePrimitiveArrayCritical(env, delta, __ndelta, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, dlam, doubleW_val_fieldID, __ndlam); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaebz_)(int *ijob, int *nitmax, int *n, int *mmax, int *minp, int *nbmin, double *abstol, double *reltol, double *pivmin, double *d, double *e, double *e22, int * nval, double *ab, double *c, /*FIXME*/void *mout, int * nab, double *work, int * iwork, /*FIXME*/void *info); +static void (*dlaed5_)(int *i, double *d, double *z, double *delta, double *rho, double *dlam); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaebzK(JNIEnv *env, UNUSED jobject obj, - jint ijob, jint nitmax, jint n, jint mmax, jint minp, jint nbmin, jdouble abstol, jdouble reltol, jdouble pivmin, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray e2, jint offsete2, jintArray nval, jint offsetnval, jdoubleArray ab, jint offsetab, jdoubleArray c, jint offsetc, jobject mout, jintArray nab, jint offsetnab, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed5K(JNIEnv *env, UNUSED jobject obj, jint i, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdoubleArray delta, jint offsetdelta, jdouble rho, jobject dlam) { + jboolean failed = FALSE; + double __ndlam = 0; double *__nd = NULL; double *__nz = NULL; double *__ndelta = NULL; + __ndlam = (*env)->GetDoubleField(env, dlam, doubleW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__ndelta = (*env)->GetPrimitiveArrayCritical(env, delta, NULL))) goto fail; + dlaed5_(&i, __nd + offsetd, __nz + offsetz, __ndelta + offsetdelta, &rho, &__ndlam); +done: + if (__ndelta) (*env)->ReleasePrimitiveArrayCritical(env, delta, __ndelta, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetDoubleField(env, dlam, doubleW_val_fieldID, __ndlam); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaed0_)(int *icompq, int *qsiz, int *n, double *d, double *e, double *q, int *ldq, double *qstore, int *ldqs, double *work, int * iwork, /*FIXME*/void *info); +static void (*dlaed6_)(int *kniter, int *orgati, double *rho, double *d, double *z, double *finit, double *tau, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed0K(JNIEnv *env, UNUSED jobject obj, - jint icompq, jint qsiz, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray qstore, jint offsetqstore, jint ldqs, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed6K(JNIEnv *env, UNUSED jobject obj, jint kniter, jboolean orgati, jdouble rho, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdouble finit, jobject tau, jobject info) { + jboolean failed = FALSE; + int __norgati; double __ntau = 0; int __ninfo = 0; double *__nd = NULL; double *__nz = NULL; + __norgati = orgati; + __ntau = (*env)->GetDoubleField(env, tau, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + dlaed6_(&kniter, &__norgati, &rho, __nd + offsetd, __nz + offsetz, &finit, &__ntau, &__ninfo); +done: + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, tau, doubleW_val_fieldID, __ntau); + if (!failed) orgati = __norgati; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaed1_)(int *n, double *d, double *q, int *ldq, int * indxq, /*FIXME*/void *rho, int *cutpnt, double *work, int * iwork, /*FIXME*/void *info); +static void (*dlaed7_)(int *icompq, int *n, int *qsiz, int *tlvls, int *curlvl, int *curpbm, double *d, double *q, int *ldq, int *indxq, double *rho, int *cutpnt, double *qstore, int *qptr, int *prmptr, int *perm, int *givptr, int *givcol, double *givnum, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed7K(JNIEnv *env, UNUSED jobject obj, jint icompq, jint n, jint qsiz, jint tlvls, jint curlvl, jint curpbm, jdoubleArray d, jint offsetd, jdoubleArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jint cutpnt, jdoubleArray qstore, jint offsetqstore, jintArray qptr, jint offsetqptr, jintArray prmptr, jint offsetprmptr, jintArray perm, jint offsetperm, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jdoubleArray givnum, jint offsetgivnum, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + double __nrho = 0; int __ninfo = 0; double *__nd = NULL; double *__nq = NULL; int *__nindxq = NULL; double *__nqstore = NULL; int *__nqptr = NULL; int *__nprmptr = NULL; int *__nperm = NULL; int *__ngivptr = NULL; int *__ngivcol = NULL; double *__ngivnum = NULL; double *__nwork = NULL; int *__niwork = NULL; + __nrho = (*env)->GetDoubleField(env, rho, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nindxq = (*env)->GetPrimitiveArrayCritical(env, indxq, NULL))) goto fail; + if (!(__nqstore = (*env)->GetPrimitiveArrayCritical(env, qstore, NULL))) goto fail; + if (!(__nqptr = (*env)->GetPrimitiveArrayCritical(env, qptr, NULL))) goto fail; + if (!(__nprmptr = (*env)->GetPrimitiveArrayCritical(env, prmptr, NULL))) goto fail; + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; + if (!(__ngivptr = (*env)->GetPrimitiveArrayCritical(env, givptr, NULL))) goto fail; + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dlaed7_(&icompq, &n, &qsiz, &tlvls, &curlvl, &curpbm, __nd + offsetd, __nq + offsetq, &ldq, __nindxq + offsetindxq, &__nrho, &cutpnt, __nqstore + offsetqstore, __nqptr + offsetqptr, __nprmptr + offsetprmptr, __nperm + offsetperm, __ngivptr + offsetgivptr, __ngivcol + offsetgivcol, __ngivnum + offsetgivnum, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); + if (__ngivptr) (*env)->ReleasePrimitiveArrayCritical(env, givptr, __ngivptr, failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); + if (__nprmptr) (*env)->ReleasePrimitiveArrayCritical(env, prmptr, __nprmptr, failed ? JNI_ABORT : 0); + if (__nqptr) (*env)->ReleasePrimitiveArrayCritical(env, qptr, __nqptr, failed ? JNI_ABORT : 0); + if (__nqstore) (*env)->ReleasePrimitiveArrayCritical(env, qstore, __nqstore, failed ? JNI_ABORT : 0); + if (__nindxq) (*env)->ReleasePrimitiveArrayCritical(env, indxq, __nindxq, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, rho, doubleW_val_fieldID, __nrho); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; +} -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed1K(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray d, jint offsetd, jdoubleArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jint cutpnt, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlaed8_)(int *icompq, int *k, int *n, int *qsiz, double *d, double *q, int *ldq, int *indxq, double *rho, int *cutpnt, double *z, double *dlamda, double *q2, int *ldq2, double *w, int *perm, int *givptr, int *givcol, double *givnum, int *indxp, int *indx, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed8K(JNIEnv *env, UNUSED jobject obj, jint icompq, jobject k, jint n, jint qsiz, jdoubleArray d, jint offsetd, jdoubleArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jint cutpnt, jdoubleArray z, jint offsetz, jdoubleArray dlamda, jint offsetdlamda, jdoubleArray q2, jint offsetq2, jint ldq2, jdoubleArray w, jint offsetw, jintArray perm, jint offsetperm, jobject givptr, jintArray givcol, jint offsetgivcol, jdoubleArray givnum, jint offsetgivnum, jintArray indxp, jint offsetindxp, jintArray indx, jint offsetindx, jobject info) { + jboolean failed = FALSE; + int __nk = 0; double __nrho = 0; int __ngivptr = 0; int __ninfo = 0; double *__nd = NULL; double *__nq = NULL; int *__nindxq = NULL; double *__nz = NULL; double *__ndlamda = NULL; double *__nq2 = NULL; double *__nw = NULL; int *__nperm = NULL; int *__ngivcol = NULL; double *__ngivnum = NULL; int *__nindxp = NULL; int *__nindx = NULL; + __nk = (*env)->GetIntField(env, k, intW_val_fieldID); + __nrho = (*env)->GetDoubleField(env, rho, doubleW_val_fieldID); + __ngivptr = (*env)->GetIntField(env, givptr, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nindxq = (*env)->GetPrimitiveArrayCritical(env, indxq, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__ndlamda = (*env)->GetPrimitiveArrayCritical(env, dlamda, NULL))) goto fail; + if (!(__nq2 = (*env)->GetPrimitiveArrayCritical(env, q2, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; + if (!(__nindxp = (*env)->GetPrimitiveArrayCritical(env, indxp, NULL))) goto fail; + if (!(__nindx = (*env)->GetPrimitiveArrayCritical(env, indx, NULL))) goto fail; + dlaed8_(&icompq, &__nk, &n, &qsiz, __nd + offsetd, __nq + offsetq, &ldq, __nindxq + offsetindxq, &__nrho, &cutpnt, __nz + offsetz, __ndlamda + offsetdlamda, __nq2 + offsetq2, &ldq2, __nw + offsetw, __nperm + offsetperm, &__ngivptr, __ngivcol + offsetgivcol, __ngivnum + offsetgivnum, __nindxp + offsetindxp, __nindx + offsetindx, &__ninfo); +done: + if (__nindx) (*env)->ReleasePrimitiveArrayCritical(env, indx, __nindx, failed ? JNI_ABORT : 0); + if (__nindxp) (*env)->ReleasePrimitiveArrayCritical(env, indxp, __nindxp, failed ? JNI_ABORT : 0); + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nq2) (*env)->ReleasePrimitiveArrayCritical(env, q2, __nq2, failed ? JNI_ABORT : 0); + if (__ndlamda) (*env)->ReleasePrimitiveArrayCritical(env, dlamda, __ndlamda, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nindxq) (*env)->ReleasePrimitiveArrayCritical(env, indxq, __nindxq, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, givptr, intW_val_fieldID, __ngivptr); + if (!failed) (*env)->SetDoubleField(env, rho, doubleW_val_fieldID, __nrho); + if (!failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaed2_)(/*FIXME*/void *k, int *n, int *n1, double *d, double *q, int *ldq, int * indxq, /*FIXME*/void *rho, double *z, double *dlamda, double *w, double *q22, int * indx, int * indxc, int * indxp, int * coltyp, /*FIXME*/void *info); +static void (*dlaed9_)(int *k, int *kstart, int *kstop, int *n, double *d, double *q, int *ldq, double *rho, double *dlamda, double *w, double *s, int *lds, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed2K(JNIEnv *env, UNUSED jobject obj, - jobject k, jint n, jint n1, jdoubleArray d, jint offsetd, jdoubleArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jdoubleArray z, jint offsetz, jdoubleArray dlamda, jint offsetdlamda, jdoubleArray w, jint offsetw, jdoubleArray q2, jint offsetq2, jintArray indx, jint offsetindx, jintArray indxc, jint offsetindxc, jintArray indxp, jint offsetindxp, jintArray coltyp, jint offsetcoltyp, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed9K(JNIEnv *env, UNUSED jobject obj, jint k, jint kstart, jint kstop, jint n, jdoubleArray d, jint offsetd, jdoubleArray q, jint offsetq, jint ldq, jdouble rho, jdoubleArray dlamda, jint offsetdlamda, jdoubleArray w, jint offsetw, jdoubleArray s, jint offsets, jint lds, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__nd = NULL; double *__nq = NULL; double *__ndlamda = NULL; double *__nw = NULL; double *__ns = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__ndlamda = (*env)->GetPrimitiveArrayCritical(env, dlamda, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + dlaed9_(&k, &kstart, &kstop, &n, __nd + offsetd, __nq + offsetq, &ldq, &rho, __ndlamda + offsetdlamda, __nw + offsetw, __ns + offsets, &lds, &__ninfo); +done: + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__ndlamda) (*env)->ReleasePrimitiveArrayCritical(env, dlamda, __ndlamda, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaed3_)(int *k, int *n, int *n1, double *d, double *q, int *ldq, double *rho, double *dlamda, double *q22, int * indx, int * ctot, double *w, double *s, /*FIXME*/void *info); +static void (*dlaeda_)(int *n, int *tlvls, int *curlvl, int *curpbm, int *prmptr, int *perm, int *givptr, int *givcol, double *givnum, double *q, int *qptr, double *z, double *ztemp, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaedaK(JNIEnv *env, UNUSED jobject obj, jint n, jint tlvls, jint curlvl, jint curpbm, jintArray prmptr, jint offsetprmptr, jintArray perm, jint offsetperm, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jdoubleArray givnum, jint offsetgivnum, jdoubleArray q, jint offsetq, jintArray qptr, jint offsetqptr, jdoubleArray z, jint offsetz, jdoubleArray ztemp, jint offsetztemp, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; int *__nprmptr = NULL; int *__nperm = NULL; int *__ngivptr = NULL; int *__ngivcol = NULL; double *__ngivnum = NULL; double *__nq = NULL; int *__nqptr = NULL; double *__nz = NULL; double *__nztemp = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nprmptr = (*env)->GetPrimitiveArrayCritical(env, prmptr, NULL))) goto fail; + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; + if (!(__ngivptr = (*env)->GetPrimitiveArrayCritical(env, givptr, NULL))) goto fail; + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nqptr = (*env)->GetPrimitiveArrayCritical(env, qptr, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nztemp = (*env)->GetPrimitiveArrayCritical(env, ztemp, NULL))) goto fail; + dlaeda_(&n, &tlvls, &curlvl, &curpbm, __nprmptr + offsetprmptr, __nperm + offsetperm, __ngivptr + offsetgivptr, __ngivcol + offsetgivcol, __ngivnum + offsetgivnum, __nq + offsetq, __nqptr + offsetqptr, __nz + offsetz, __nztemp + offsetztemp, &__ninfo); +done: + if (__nztemp) (*env)->ReleasePrimitiveArrayCritical(env, ztemp, __nztemp, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nqptr) (*env)->ReleasePrimitiveArrayCritical(env, qptr, __nqptr, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); + if (__ngivptr) (*env)->ReleasePrimitiveArrayCritical(env, givptr, __ngivptr, failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); + if (__nprmptr) (*env)->ReleasePrimitiveArrayCritical(env, prmptr, __nprmptr, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; +} -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed3K(JNIEnv *env, UNUSED jobject obj, - jint k, jint n, jint n1, jdoubleArray d, jint offsetd, jdoubleArray q, jint offsetq, jint ldq, jdouble rho, jdoubleArray dlamda, jint offsetdlamda, jdoubleArray q2, jint offsetq2, jintArray indx, jint offsetindx, jintArray ctot, jint offsetctot, jdoubleArray w, jint offsetw, jdoubleArray s, jint offsets, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlaein_)(int *rightv, int *noinit, int *n, double *h, int *ldh, double *wr, double *wi, double *vr, double *vi, double *b, int *ldb, double *work, double *eps3, double *smlnum, double *bignum, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaeinK(JNIEnv *env, UNUSED jobject obj, jboolean rightv, jboolean noinit, jint n, jdoubleArray h, jint offseth, jint ldh, jdouble wr, jdouble wi, jdoubleArray vr, jint offsetvr, jdoubleArray vi, jint offsetvi, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray work, jint offsetwork, jdouble eps3, jdouble smlnum, jdouble bignum, jobject info) { + jboolean failed = FALSE; + int __nrightv; int __nnoinit; int __ninfo = 0; double *__nh = NULL; double *__nvr = NULL; double *__nvi = NULL; double *__nb = NULL; double *__nwork = NULL; + __nrightv = rightv; + __nnoinit = noinit; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; + if (!(__nvi = (*env)->GetPrimitiveArrayCritical(env, vi, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dlaein_(&__nrightv, &__nnoinit, &n, __nh + offseth, &ldh, &wr, &wi, __nvr + offsetvr, __nvi + offsetvi, __nb + offsetb, &ldb, __nwork + offsetwork, &eps3, &smlnum, &bignum, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nvi) (*env)->ReleasePrimitiveArrayCritical(env, vi, __nvi, failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) noinit = __nnoinit; + if (!failed) rightv = __nrightv; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaed4_)(int *n, int *i, double *d, double *z, double *delta, double *rho, /*FIXME*/void *dlam, /*FIXME*/void *info); +static void (*dlaev2_)(double *a, double *b, double *c, double *rt1, double *rt2, double *cs1, double *sn1); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed4K(JNIEnv *env, UNUSED jobject obj, - jint n, jint i, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdoubleArray delta, jint offsetdelta, jdouble rho, jobject dlam, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaev2K(JNIEnv *env, UNUSED jobject obj, jdouble a, jdouble b, jdouble c, jobject rt1, jobject rt2, jobject cs1, jobject sn1) { + jboolean failed = FALSE; + double __nrt1 = 0; double __nrt2 = 0; double __ncs1 = 0; double __nsn1 = 0; + __nrt1 = (*env)->GetDoubleField(env, rt1, doubleW_val_fieldID); + __nrt2 = (*env)->GetDoubleField(env, rt2, doubleW_val_fieldID); + __ncs1 = (*env)->GetDoubleField(env, cs1, doubleW_val_fieldID); + __nsn1 = (*env)->GetDoubleField(env, sn1, doubleW_val_fieldID); + dlaev2_(&a, &b, &c, &__nrt1, &__nrt2, &__ncs1, &__nsn1); +done: + if (!failed) (*env)->SetDoubleField(env, sn1, doubleW_val_fieldID, __nsn1); + if (!failed) (*env)->SetDoubleField(env, cs1, doubleW_val_fieldID, __ncs1); + if (!failed) (*env)->SetDoubleField(env, rt2, doubleW_val_fieldID, __nrt2); + if (!failed) (*env)->SetDoubleField(env, rt1, doubleW_val_fieldID, __nrt1); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaed5_)(int *i, double *d, double *z, double *delta, double *rho, /*FIXME*/void *dlam); +static void (*dlaexc_)(int *wantq, int *n, double *t, int *ldt, double *q, int *ldq, int *j1, int *n1, int *n2, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed5K(JNIEnv *env, UNUSED jobject obj, - jint i, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdoubleArray delta, jint offsetdelta, jdouble rho, jobject dlam) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaexcK(JNIEnv *env, UNUSED jobject obj, jboolean wantq, jint n, jdoubleArray t, jint offsett, jint ldt, jdoubleArray q, jint offsetq, jint ldq, jint j1, jint n1, jint n2, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __nwantq; int __ninfo = 0; double *__nt = NULL; double *__nq = NULL; double *__nwork = NULL; + __nwantq = wantq; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dlaexc_(&__nwantq, &n, __nt + offsett, &ldt, __nq + offsetq, &ldq, &j1, &n1, &n2, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) wantq = __nwantq; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaed6_)(int *kniter, int *orgati, double *rho, double *d, double *z, double *finit, /*FIXME*/void *tau, /*FIXME*/void *info); +static void (*dlag2_)(double *a, int *lda, double *b, int *ldb, double *safmin, double *scale1, double *scale2, double *wr1, double *wr2, double *wi); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed6K(JNIEnv *env, UNUSED jobject obj, - jint kniter, jboolean orgati, jdouble rho, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdouble finit, jobject tau, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlag2K(JNIEnv *env, UNUSED jobject obj, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble safmin, jobject scale1, jobject scale2, jobject wr1, jobject wr2, jobject wi) { + jboolean failed = FALSE; + double __nscale1 = 0; double __nscale2 = 0; double __nwr1 = 0; double __nwr2 = 0; double __nwi = 0; double *__na = NULL; double *__nb = NULL; + __nscale1 = (*env)->GetDoubleField(env, scale1, doubleW_val_fieldID); + __nscale2 = (*env)->GetDoubleField(env, scale2, doubleW_val_fieldID); + __nwr1 = (*env)->GetDoubleField(env, wr1, doubleW_val_fieldID); + __nwr2 = (*env)->GetDoubleField(env, wr2, doubleW_val_fieldID); + __nwi = (*env)->GetDoubleField(env, wi, doubleW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + dlag2_(__na + offseta, &lda, __nb + offsetb, &ldb, &safmin, &__nscale1, &__nscale2, &__nwr1, &__nwr2, &__nwi); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetDoubleField(env, wi, doubleW_val_fieldID, __nwi); + if (!failed) (*env)->SetDoubleField(env, wr2, doubleW_val_fieldID, __nwr2); + if (!failed) (*env)->SetDoubleField(env, wr1, doubleW_val_fieldID, __nwr1); + if (!failed) (*env)->SetDoubleField(env, scale2, doubleW_val_fieldID, __nscale2); + if (!failed) (*env)->SetDoubleField(env, scale1, doubleW_val_fieldID, __nscale1); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaed7_)(int *icompq, int *n, int *qsiz, int *tlvls, int *curlvl, int *curpbm, double *d, double *q, int *ldq, int * indxq, /*FIXME*/void *rho, int *cutpnt, double *qstore, int * qptr, int * prmptr, int * perm, int * givptr, int * givcol, double *givnum, double *work, int * iwork, /*FIXME*/void *info); +static void (*dlag2s_)(int *m, int *n, double *a, int *lda, float *sa, int *ldsa, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed7K(JNIEnv *env, UNUSED jobject obj, - jint icompq, jint n, jint qsiz, jint tlvls, jint curlvl, jint curpbm, jdoubleArray d, jint offsetd, jdoubleArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jint cutpnt, jdoubleArray qstore, jint offsetqstore, jintArray qptr, jint offsetqptr, jintArray prmptr, jint offsetprmptr, jintArray perm, jint offsetperm, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jdoubleArray givnum, jint offsetgivnum, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlag2sK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jfloatArray sa, jint offsetsa, jint ldsa, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; float *__nsa = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nsa = (*env)->GetPrimitiveArrayCritical(env, sa, NULL))) goto fail; + dlag2s_(&m, &n, __na + offseta, &lda, __nsa + offsetsa, &ldsa, &__ninfo); +done: + if (__nsa) (*env)->ReleasePrimitiveArrayCritical(env, sa, __nsa, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaed8_)(int *icompq, /*FIXME*/void *k, int *n, int *qsiz, double *d, double *q, int *ldq, int * indxq, /*FIXME*/void *rho, int *cutpnt, double *z, double *dlamda, double *q22, int *ldq2, double *w, int * perm, /*FIXME*/void *givptr, int * givcol, double *givnum, int * indxp, int * indx, /*FIXME*/void *info); +static void (*dlags2_)(int *upper, double *a1, double *a2, double *a3, double *b1, double *b2, double *b3, double *csu, double *snu, double *csv, double *snv, double *csq, double *snq); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed8K(JNIEnv *env, UNUSED jobject obj, - jint icompq, jobject k, jint n, jint qsiz, jdoubleArray d, jint offsetd, jdoubleArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jint cutpnt, jdoubleArray z, jint offsetz, jdoubleArray dlamda, jint offsetdlamda, jdoubleArray q2, jint offsetq2, jint ldq2, jdoubleArray w, jint offsetw, jintArray perm, jint offsetperm, jobject givptr, jintArray givcol, jint offsetgivcol, jdoubleArray givnum, jint offsetgivnum, jintArray indxp, jint offsetindxp, jintArray indx, jint offsetindx, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlags2K(JNIEnv *env, UNUSED jobject obj, jboolean upper, jdouble a1, jdouble a2, jdouble a3, jdouble b1, jdouble b2, jdouble b3, jobject csu, jobject snu, jobject csv, jobject snv, jobject csq, jobject snq) { + jboolean failed = FALSE; + int __nupper; double __ncsu = 0; double __nsnu = 0; double __ncsv = 0; double __nsnv = 0; double __ncsq = 0; double __nsnq = 0; + __nupper = upper; + __ncsu = (*env)->GetDoubleField(env, csu, doubleW_val_fieldID); + __nsnu = (*env)->GetDoubleField(env, snu, doubleW_val_fieldID); + __ncsv = (*env)->GetDoubleField(env, csv, doubleW_val_fieldID); + __nsnv = (*env)->GetDoubleField(env, snv, doubleW_val_fieldID); + __ncsq = (*env)->GetDoubleField(env, csq, doubleW_val_fieldID); + __nsnq = (*env)->GetDoubleField(env, snq, doubleW_val_fieldID); + dlags2_(&__nupper, &a1, &a2, &a3, &b1, &b2, &b3, &__ncsu, &__nsnu, &__ncsv, &__nsnv, &__ncsq, &__nsnq); +done: + if (!failed) (*env)->SetDoubleField(env, snq, doubleW_val_fieldID, __nsnq); + if (!failed) (*env)->SetDoubleField(env, csq, doubleW_val_fieldID, __ncsq); + if (!failed) (*env)->SetDoubleField(env, snv, doubleW_val_fieldID, __nsnv); + if (!failed) (*env)->SetDoubleField(env, csv, doubleW_val_fieldID, __ncsv); + if (!failed) (*env)->SetDoubleField(env, snu, doubleW_val_fieldID, __nsnu); + if (!failed) (*env)->SetDoubleField(env, csu, doubleW_val_fieldID, __ncsu); + if (!failed) upper = __nupper; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaed9_)(int *k, int *kstart, int *kstop, int *n, double *d, double *q, int *ldq, double *rho, double *dlamda, double *w, double *s, int *lds, /*FIXME*/void *info); +static void (*dlagtf_)(int *n, double *a, double *lambda, double *b, double *c, double *tol, double *d, int *in, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed9K(JNIEnv *env, UNUSED jobject obj, - jint k, jint kstart, jint kstop, jint n, jdoubleArray d, jint offsetd, jdoubleArray q, jint offsetq, jint ldq, jdouble rho, jdoubleArray dlamda, jint offsetdlamda, jdoubleArray w, jint offsetw, jdoubleArray s, jint offsets, jint lds, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlagtfK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray a, jint offseta, jdouble lambda, jdoubleArray b, jint offsetb, jdoubleArray c, jint offsetc, jdouble tol, jdoubleArray d, jint offsetd, jintArray in, jint offsetin, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nc = NULL; double *__nd = NULL; int *__nin = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nin = (*env)->GetPrimitiveArrayCritical(env, in, NULL))) goto fail; + dlagtf_(&n, __na + offseta, &lambda, __nb + offsetb, __nc + offsetc, &tol, __nd + offsetd, __nin + offsetin, &__ninfo); +done: + if (__nin) (*env)->ReleasePrimitiveArrayCritical(env, in, __nin, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaeda_)(int *n, int *tlvls, int *curlvl, int *curpbm, int * prmptr, int * perm, int * givptr, int * givcol, double *givnum, double *q, int * qptr, double *z, double *ztemp, /*FIXME*/void *info); +static void (*dlagtm_)(const char *trans, int *n, int *nrhs, double *alpha, double *dl, double *d, double *du, double *x, int *ldx, double *beta, double *b, int *ldb); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaedaK(JNIEnv *env, UNUSED jobject obj, - jint n, jint tlvls, jint curlvl, jint curpbm, jintArray prmptr, jint offsetprmptr, jintArray perm, jint offsetperm, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jdoubleArray givnum, jint offsetgivnum, jdoubleArray q, jint offsetq, jintArray qptr, jint offsetqptr, jdoubleArray z, jint offsetz, jdoubleArray ztemp, jint offsetztemp, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlagtmK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint n, jint nrhs, jdouble alpha, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray x, jint offsetx, jint ldx, jdouble beta, jdoubleArray b, jint offsetb, jint ldb) { + jboolean failed = FALSE; + const char *__ntrans = NULL; double *__ndl = NULL; double *__nd = NULL; double *__ndu = NULL; double *__nx = NULL; double *__nb = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + dlagtm_(__ntrans, &n, &nrhs, &alpha, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __nx + offsetx, &ldx, &beta, __nb + offsetb, &ldb); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaein_)(int *rightv, int *noinit, int *n, double *h, int *ldh, double *wr, double *wi, double *vr, double *vi, double *b, int *ldb, double *work, double *eps3, double *smlnum, double *bignum, /*FIXME*/void *info); +static void (*dlagts_)(int *job, int *n, double *a, double *b, double *c, double *d, int *in, double *y, double *tol, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlagtsK(JNIEnv *env, UNUSED jobject obj, jint job, jint n, jdoubleArray a, jint offseta, jdoubleArray b, jint offsetb, jdoubleArray c, jint offsetc, jdoubleArray d, jint offsetd, jintArray in, jint offsetin, jdoubleArray y, jint offsety, jobject tol, jobject info) { + jboolean failed = FALSE; + double __ntol = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nc = NULL; double *__nd = NULL; int *__nin = NULL; double *__ny = NULL; + __ntol = (*env)->GetDoubleField(env, tol, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nin = (*env)->GetPrimitiveArrayCritical(env, in, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + dlagts_(&job, &n, __na + offseta, __nb + offsetb, __nc + offsetc, __nd + offsetd, __nin + offsetin, __ny + offsety, &__ntol, &__ninfo); +done: + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nin) (*env)->ReleasePrimitiveArrayCritical(env, in, __nin, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, tol, doubleW_val_fieldID, __ntol); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; +} -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaeinK(JNIEnv *env, UNUSED jobject obj, - jboolean rightv, jboolean noinit, jint n, jdoubleArray h, jint offseth, jint ldh, jdouble wr, jdouble wi, jdoubleArray vr, jint offsetvr, jdoubleArray vi, jint offsetvi, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray work, jint offsetwork, jdouble eps3, jdouble smlnum, jdouble bignum, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlagv2_)(double *a, int *lda, double *b, int *ldb, double *alphar, double *alphai, double *beta, double *csl, double *snl, double *csr, double *snr); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlagv2K(JNIEnv *env, UNUSED jobject obj, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jobject csl, jobject snl, jobject csr, jobject snr) { + jboolean failed = FALSE; + double __ncsl = 0; double __nsnl = 0; double __ncsr = 0; double __nsnr = 0; double *__na = NULL; double *__nb = NULL; double *__nalphar = NULL; double *__nalphai = NULL; double *__nbeta = NULL; + __ncsl = (*env)->GetDoubleField(env, csl, doubleW_val_fieldID); + __nsnl = (*env)->GetDoubleField(env, snl, doubleW_val_fieldID); + __ncsr = (*env)->GetDoubleField(env, csr, doubleW_val_fieldID); + __nsnr = (*env)->GetDoubleField(env, snr, doubleW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) goto fail; + if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) goto fail; + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; + dlagv2_(__na + offseta, &lda, __nb + offsetb, &ldb, __nalphar + offsetalphar, __nalphai + offsetalphai, __nbeta + offsetbeta, &__ncsl, &__nsnl, &__ncsr, &__nsnr); +done: + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); + if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, failed ? JNI_ABORT : 0); + if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetDoubleField(env, snr, doubleW_val_fieldID, __nsnr); + if (!failed) (*env)->SetDoubleField(env, csr, doubleW_val_fieldID, __ncsr); + if (!failed) (*env)->SetDoubleField(env, snl, doubleW_val_fieldID, __nsnl); + if (!failed) (*env)->SetDoubleField(env, csl, doubleW_val_fieldID, __ncsl); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaev2_)(double *a, double *b, double *c, /*FIXME*/void *rt1, /*FIXME*/void *rt2, /*FIXME*/void *cs1, /*FIXME*/void *sn1); +static void (*dlahqr_)(int *wantt, int *wantz, int *n, int *ilo, int *ihi, double *h, int *ldh, double *wr, double *wi, int *iloz, int *ihiz, double *z, int *ldz, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaev2K(JNIEnv *env, UNUSED jobject obj, - jdouble a, jdouble b, jdouble c, jobject rt1, jobject rt2, jobject cs1, jobject sn1) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlahqrK(JNIEnv *env, UNUSED jobject obj, jboolean wantt, jboolean wantz, jint n, jint ilo, jint ihi, jdoubleArray h, jint offseth, jint ldh, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jint iloz, jint ihiz, jdoubleArray z, jint offsetz, jint ldz, jobject info) { + jboolean failed = FALSE; + int __nwantt; int __nwantz; int __ninfo = 0; double *__nh = NULL; double *__nwr = NULL; double *__nwi = NULL; double *__nz = NULL; + __nwantt = wantt; + __nwantz = wantz; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + dlahqr_(&__nwantt, &__nwantz, &n, &ilo, &ihi, __nh + offseth, &ldh, __nwr + offsetwr, __nwi + offsetwi, &iloz, &ihiz, __nz + offsetz, &ldz, &__ninfo); +done: + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) wantz = __nwantz; + if (!failed) wantt = __nwantt; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaexc_)(int *wantq, int *n, double *t, int *ldt, double *q, int *ldq, int *j1, int *n1, int *n2, double *work, /*FIXME*/void *info); +static void (*dlahr2_)(int *n, int *k, int *nb, double *a, int *lda, double *tau, double *t, int *ldt, double *y, int *ldy); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaexcK(JNIEnv *env, UNUSED jobject obj, - jboolean wantq, jint n, jdoubleArray t, jint offsett, jint ldt, jdoubleArray q, jint offsetq, jint ldq, jint j1, jint n1, jint n2, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlahr2K(JNIEnv *env, UNUSED jobject obj, jint n, jint k, jint nb, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray t, jint offsett, jint ldt, jdoubleArray y, jint offsety, jint ldy) { + jboolean failed = FALSE; + double *__na = NULL; double *__ntau = NULL; double *__nt = NULL; double *__ny = NULL; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + dlahr2_(&n, &k, &nb, __na + offseta, &lda, __ntau + offsettau, __nt + offsett, &ldt, __ny + offsety, &ldy); +done: + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlag2_)(double *a, int *lda, double *b, int *ldb, double *safmin, /*FIXME*/void *scale1, /*FIXME*/void *scale2, /*FIXME*/void *wr1, /*FIXME*/void *wr2, /*FIXME*/void *wi); +static void (*dlahrd_)(int *n, int *k, int *nb, double *a, int *lda, double *tau, double *t, int *ldt, double *y, int *ldy); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlag2K(JNIEnv *env, UNUSED jobject obj, - jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble safmin, jobject scale1, jobject scale2, jobject wr1, jobject wr2, jobject wi) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlahrdK(JNIEnv *env, UNUSED jobject obj, jint n, jint k, jint nb, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray t, jint offsett, jint ldt, jdoubleArray y, jint offsety, jint ldy) { + jboolean failed = FALSE; + double *__na = NULL; double *__ntau = NULL; double *__nt = NULL; double *__ny = NULL; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + dlahrd_(&n, &k, &nb, __na + offseta, &lda, __ntau + offsettau, __nt + offsett, &ldt, __ny + offsety, &ldy); +done: + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlag2s_)(int *m, int *n, double *a, int *lda, float *sa, int *ldsa, /*FIXME*/void *info); +static void (*dlaic1_)(int *job, int *j, double *x, double *sest, double *w, double *gamma, double *sestpr, double *s, double *c); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlag2sK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jdoubleArray a, jint offseta, jint lda, jfloatArray sa, jint offsetsa, jint ldsa, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaic1K(JNIEnv *env, UNUSED jobject obj, jint job, jint j, jdoubleArray x, jint offsetx, jdouble sest, jdoubleArray w, jint offsetw, jdouble gamma, jobject sestpr, jobject s, jobject c) { + jboolean failed = FALSE; + double __nsestpr = 0; double __ns = 0; double __nc = 0; double *__nx = NULL; double *__nw = NULL; + __nsestpr = (*env)->GetDoubleField(env, sestpr, doubleW_val_fieldID); + __ns = (*env)->GetDoubleField(env, s, doubleW_val_fieldID); + __nc = (*env)->GetDoubleField(env, c, doubleW_val_fieldID); + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + dlaic1_(&job, &j, __nx + offsetx, &sest, __nw + offsetw, &gamma, &__nsestpr, &__ns, &__nc); +done: + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetDoubleField(env, c, doubleW_val_fieldID, __nc); + if (!failed) (*env)->SetDoubleField(env, s, doubleW_val_fieldID, __ns); + if (!failed) (*env)->SetDoubleField(env, sestpr, doubleW_val_fieldID, __nsestpr); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlags2_)(int *upper, double *a1, double *a2, double *a3, double *b1, double *b2, double *b3, /*FIXME*/void *csu, /*FIXME*/void *snu, /*FIXME*/void *csv, /*FIXME*/void *snv, /*FIXME*/void *csq, /*FIXME*/void *snq); +static int (*dlaisnan_)(double *din1, double *din2); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlags2K(JNIEnv *env, UNUSED jobject obj, - jboolean upper, jdouble a1, jdouble a2, jdouble a3, jdouble b1, jdouble b2, jdouble b3, jobject csu, jobject snu, jobject csv, jobject snv, jobject csq, jobject snq) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} +jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaisnanK(JNIEnv *env, UNUSED jobject obj, jdouble din1, jdouble din2) { + jboolean __ret; + jboolean failed = FALSE; + -static void (*dlagtf_)(int *n, double *a, double *lambda, double *b, double *c, double *tol, double *d, int * in, /*FIXME*/void *info); + __ret = dlaisnan_(&din1, &din2); +done: -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlagtfK(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray a, jint offseta, jdouble lambda, jdoubleArray b, jint offsetb, jdoubleArray c, jint offsetc, jdouble tol, jdoubleArray d, jint offsetd, jintArray in, jint offsetin, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*dlagtm_)(char *trans, int *n, int *nrhs, double *alpha, double *dl, double *d, double *du, double *x, int *ldx, double *beta, double *b, int *ldb); +static void (*dlaln2_)(int *ltrans, int *na, int *nw, double *smin, double *ca, double *a, int *lda, double *d1, double *d2, double *b, int *ldb, double *wr, double *wi, double *x, int *ldx, double *scale, double *xnorm, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlagtmK(JNIEnv *env, UNUSED jobject obj, - jstring trans, jint n, jint nrhs, jdouble alpha, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray x, jint offsetx, jint ldx, jdouble beta, jdoubleArray b, jint offsetb, jint ldb) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaln2K(JNIEnv *env, UNUSED jobject obj, jboolean ltrans, jint na, jint nw, jdouble smin, jdouble ca, jdoubleArray a, jint offseta, jint lda, jdouble d1, jdouble d2, jdoubleArray b, jint offsetb, jint ldb, jdouble wr, jdouble wi, jdoubleArray x, jint offsetx, jint ldx, jobject scale, jobject xnorm, jobject info) { + jboolean failed = FALSE; + int __nltrans; double __nscale = 0; double __nxnorm = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nx = NULL; + __nltrans = ltrans; + __nscale = (*env)->GetDoubleField(env, scale, doubleW_val_fieldID); + __nxnorm = (*env)->GetDoubleField(env, xnorm, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + dlaln2_(&__nltrans, &na, &nw, &smin, &ca, __na + offseta, &lda, &d1, &d2, __nb + offsetb, &ldb, &wr, &wi, __nx + offsetx, &ldx, &__nscale, &__nxnorm, &__ninfo); +done: + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, xnorm, doubleW_val_fieldID, __nxnorm); + if (!failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); + if (!failed) ltrans = __nltrans; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlagts_)(int *job, int *n, double *a, double *b, double *c, double *d, int * in, double *y, /*FIXME*/void *tol, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlagtsK(JNIEnv *env, UNUSED jobject obj, - jint job, jint n, jdoubleArray a, jint offseta, jdoubleArray b, jint offsetb, jdoubleArray c, jint offsetc, jdoubleArray d, jint offsetd, jintArray in, jint offsetin, jdoubleArray y, jint offsety, jobject tol, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlals0_)(int *icompq, int *nl, int *nr, int *sqre, int *nrhs, double *b, int *ldb, double *bx, int *ldbx, int *perm, int *givptr, int *givcol, int *ldgcol, double *givnum, int *ldgnum, double *poles, double *difl, double *difr, double *z, int *k, double *c, double *s, double *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlals0K(JNIEnv *env, UNUSED jobject obj, jint icompq, jint nl, jint nr, jint sqre, jint nrhs, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray bx, jint offsetbx, jint ldbx, jintArray perm, jint offsetperm, jint givptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jdoubleArray givnum, jint offsetgivnum, jint ldgnum, jdoubleArray poles, jint offsetpoles, jdoubleArray difl, jint offsetdifl, jdoubleArray difr, jint offsetdifr, jdoubleArray z, jint offsetz, jint k, jdouble c, jdouble s, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__nb = NULL; double *__nbx = NULL; int *__nperm = NULL; int *__ngivcol = NULL; double *__ngivnum = NULL; double *__npoles = NULL; double *__ndifl = NULL; double *__ndifr = NULL; double *__nz = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nbx = (*env)->GetPrimitiveArrayCritical(env, bx, NULL))) goto fail; + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; + if (!(__npoles = (*env)->GetPrimitiveArrayCritical(env, poles, NULL))) goto fail; + if (!(__ndifl = (*env)->GetPrimitiveArrayCritical(env, difl, NULL))) goto fail; + if (!(__ndifr = (*env)->GetPrimitiveArrayCritical(env, difr, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dlals0_(&icompq, &nl, &nr, &sqre, &nrhs, __nb + offsetb, &ldb, __nbx + offsetbx, &ldbx, __nperm + offsetperm, &givptr, __ngivcol + offsetgivcol, &ldgcol, __ngivnum + offsetgivnum, &ldgnum, __npoles + offsetpoles, __ndifl + offsetdifl, __ndifr + offsetdifr, __nz + offsetz, &k, &c, &s, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__ndifr) (*env)->ReleasePrimitiveArrayCritical(env, difr, __ndifr, failed ? JNI_ABORT : 0); + if (__ndifl) (*env)->ReleasePrimitiveArrayCritical(env, difl, __ndifl, failed ? JNI_ABORT : 0); + if (__npoles) (*env)->ReleasePrimitiveArrayCritical(env, poles, __npoles, failed ? JNI_ABORT : 0); + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); + if (__nbx) (*env)->ReleasePrimitiveArrayCritical(env, bx, __nbx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlagv2_)(double *a, int *lda, double *b, int *ldb, double *alphar, double *alphai, double *beta, /*FIXME*/void *csl, /*FIXME*/void *snl, /*FIXME*/void *csr, /*FIXME*/void *snr); +static void (*dlalsa_)(int *icompq, int *smlsiz, int *n, int *nrhs, double *b, int *ldb, double *bx, int *ldbx, double *u, int *ldu, double *vt, int *k, double *difl, double *difr, double *z, double *poles, int *givptr, int *givcol, int *ldgcol, int *perm, double *givnum, double *c, double *s, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlalsaK(JNIEnv *env, UNUSED jobject obj, jint icompq, jint smlsiz, jint n, jint nrhs, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray bx, jint offsetbx, jint ldbx, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jintArray k, jint offsetk, jdoubleArray difl, jint offsetdifl, jdoubleArray difr, jint offsetdifr, jdoubleArray z, jint offsetz, jdoubleArray poles, jint offsetpoles, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jintArray perm, jint offsetperm, jdoubleArray givnum, jint offsetgivnum, jdoubleArray c, jint offsetc, jdoubleArray s, jint offsets, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__nb = NULL; double *__nbx = NULL; double *__nu = NULL; double *__nvt = NULL; int *__nk = NULL; double *__ndifl = NULL; double *__ndifr = NULL; double *__nz = NULL; double *__npoles = NULL; int *__ngivptr = NULL; int *__ngivcol = NULL; int *__nperm = NULL; double *__ngivnum = NULL; double *__nc = NULL; double *__ns = NULL; double *__nwork = NULL; int *__niwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nbx = (*env)->GetPrimitiveArrayCritical(env, bx, NULL))) goto fail; + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; + if (!(__nk = (*env)->GetPrimitiveArrayCritical(env, k, NULL))) goto fail; + if (!(__ndifl = (*env)->GetPrimitiveArrayCritical(env, difl, NULL))) goto fail; + if (!(__ndifr = (*env)->GetPrimitiveArrayCritical(env, difr, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__npoles = (*env)->GetPrimitiveArrayCritical(env, poles, NULL))) goto fail; + if (!(__ngivptr = (*env)->GetPrimitiveArrayCritical(env, givptr, NULL))) goto fail; + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dlalsa_(&icompq, &smlsiz, &n, &nrhs, __nb + offsetb, &ldb, __nbx + offsetbx, &ldbx, __nu + offsetu, &ldu, __nvt + offsetvt, __nk + offsetk, __ndifl + offsetdifl, __ndifr + offsetdifr, __nz + offsetz, __npoles + offsetpoles, __ngivptr + offsetgivptr, __ngivcol + offsetgivcol, &ldgcol, __nperm + offsetperm, __ngivnum + offsetgivnum, __nc + offsetc, __ns + offsets, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); + if (__ngivptr) (*env)->ReleasePrimitiveArrayCritical(env, givptr, __ngivptr, failed ? JNI_ABORT : 0); + if (__npoles) (*env)->ReleasePrimitiveArrayCritical(env, poles, __npoles, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__ndifr) (*env)->ReleasePrimitiveArrayCritical(env, difr, __ndifr, failed ? JNI_ABORT : 0); + if (__ndifl) (*env)->ReleasePrimitiveArrayCritical(env, difl, __ndifl, failed ? JNI_ABORT : 0); + if (__nk) (*env)->ReleasePrimitiveArrayCritical(env, k, __nk, failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); + if (__nbx) (*env)->ReleasePrimitiveArrayCritical(env, bx, __nbx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; +} -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlagv2K(JNIEnv *env, UNUSED jobject obj, - jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jobject csl, jobject snl, jobject csr, jobject snr) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlalsd_)(const char *uplo, int *smlsiz, int *n, int *nrhs, double *d, double *e, double *b, int *ldb, double *rcond, int *rank, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlalsdK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint smlsiz, jint n, jint nrhs, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray b, jint offsetb, jint ldb, jdouble rcond, jobject rank, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __nrank = 0; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nb = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nrank = (*env)->GetIntField(env, rank, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dlalsd_(__nuplo, &smlsiz, &n, &nrhs, __nd + offsetd, __ne + offsete, __nb + offsetb, &ldb, &rcond, &__nrank, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, rank, intW_val_fieldID, __nrank); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlahqr_)(int *wantt, int *wantz, int *n, int *ilo, int *ihi, double *h, int *ldh, double *wr, double *wi, int *iloz, int *ihiz, double *z, int *ldz, /*FIXME*/void *info); +static void (*dlamrg_)(int *n1, int *n2, double *a, int *dtrd1, int *dtrd2, int *index); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlahqrK(JNIEnv *env, UNUSED jobject obj, - jboolean wantt, jboolean wantz, jint n, jint ilo, jint ihi, jdoubleArray h, jint offseth, jint ldh, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jint iloz, jint ihiz, jdoubleArray z, jint offsetz, jint ldz, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamrgK(JNIEnv *env, UNUSED jobject obj, jint n1, jint n2, jdoubleArray a, jint offseta, jint dtrd1, jint dtrd2, jintArray index, jint offsetindex) { + jboolean failed = FALSE; + double *__na = NULL; int *__nindex = NULL; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nindex = (*env)->GetPrimitiveArrayCritical(env, index, NULL))) goto fail; + dlamrg_(&n1, &n2, __na + offseta, &dtrd1, &dtrd2, __nindex + offsetindex); +done: + if (__nindex) (*env)->ReleasePrimitiveArrayCritical(env, index, __nindex, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlahr2_)(int *n, int *k, int *nb, double *a, int *lda, double *tau, double *t, int *ldt, double *y, int *ldy); +static int (*dlaneg_)(int *n, double *d, double *lld, double *sigma, double *pivmin, int *r); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlahr2K(JNIEnv *env, UNUSED jobject obj, - jint n, jint k, jint nb, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray t, jint offsett, jint ldt, jdoubleArray y, jint offsety, jint ldy) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +jint Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanegK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray d, jint offsetd, jdoubleArray lld, jint offsetlld, jdouble sigma, jdouble pivmin, jint r) { + jint __ret; + jboolean failed = FALSE; + double *__nd = NULL; double *__nlld = NULL; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nlld = (*env)->GetPrimitiveArrayCritical(env, lld, NULL))) goto fail; + __ret = dlaneg_(&n, __nd + offsetd, __nlld + offsetlld, &sigma, &pivmin, &r); +done: + if (__nlld) (*env)->ReleasePrimitiveArrayCritical(env, lld, __nlld, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*dlahrd_)(int *n, int *k, int *nb, double *a, int *lda, double *tau, double *t, int *ldt, double *y, int *ldy); +static double (*dlangb_)(const char *norm, int *n, int *kl, int *ku, double *ab, int *ldab, double *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlahrdK(JNIEnv *env, UNUSED jobject obj, - jint n, jint k, jint nb, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray t, jint offsett, jint ldt, jdoubleArray y, jint offsety, jint ldy) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlangbK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jint kl, jint ku, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray work, jint offsetwork) { + jdouble __ret; + jboolean failed = FALSE; + const char *__nnorm = NULL; double *__nab = NULL; double *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + __ret = dlangb_(__nnorm, &n, &kl, &ku, __nab + offsetab, &ldab, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*dlaic1_)(int *job, int *j, double *x, double *sest, double *w, double *gamma, /*FIXME*/void *sestpr, /*FIXME*/void *s, /*FIXME*/void *c); +static double (*dlange_)(const char *norm, int *m, int *n, double *a, int *lda, double *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaic1K(JNIEnv *env, UNUSED jobject obj, - jint job, jint j, jdoubleArray x, jint offsetx, jdouble sest, jdoubleArray w, jint offsetw, jdouble gamma, jobject sestpr, jobject s, jobject c) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlangeK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray work, jint offsetwork) { + jdouble __ret; + jboolean failed = FALSE; + const char *__nnorm = NULL; double *__na = NULL; double *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + __ret = dlange_(__nnorm, &m, &n, __na + offseta, &lda, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static int *(*dlaisnan_)(double *din1, double *din2); +static double (*dlangt_)(const char *norm, int *n, double *dl, double *d, double *du); -jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaisnanK(JNIEnv *env, UNUSED jobject obj, - jdouble din1, jdouble din2) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlangtK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu) { + jdouble __ret; + jboolean failed = FALSE; + const char *__nnorm = NULL; double *__ndl = NULL; double *__nd = NULL; double *__ndu = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; + __ret = dlangt_(__nnorm, &n, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu); +done: + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*dlaln2_)(int *ltrans, int *na, int *nw, double *smin, double *ca, double *a, int *lda, double *d1, double *d2, double *b, int *ldb, double *wr, double *wi, double *x, int *ldx, /*FIXME*/void *scale, /*FIXME*/void *xnorm, /*FIXME*/void *info); +static double (*dlanhs_)(const char *norm, int *n, double *a, int *lda, double *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaln2K(JNIEnv *env, UNUSED jobject obj, - jboolean ltrans, jint na, jint nw, jdouble smin, jdouble ca, jdoubleArray a, jint offseta, jint lda, jdouble d1, jdouble d2, jdoubleArray b, jint offsetb, jint ldb, jdouble wr, jdouble wi, jdoubleArray x, jint offsetx, jint ldx, jobject scale, jobject xnorm, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanhsK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray work, jint offsetwork) { + jdouble __ret; + jboolean failed = FALSE; + const char *__nnorm = NULL; double *__na = NULL; double *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + __ret = dlanhs_(__nnorm, &n, __na + offseta, &lda, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*dlals0_)(int *icompq, int *nl, int *nr, int *sqre, int *nrhs, double *b, int *ldb, double *bx, int *ldbx, int * perm, int *givptr, int * givcol, int *ldgcol, double *givnum, int *ldgnum, double *poles, double *difl, double *difr, double *z, int *k, double *c, double *s, double *work, /*FIXME*/void *info); +static double (*dlansb_)(const char *norm, const char *uplo, int *n, int *k, double *ab, int *ldab, double *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlals0K(JNIEnv *env, UNUSED jobject obj, - jint icompq, jint nl, jint nr, jint sqre, jint nrhs, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray bx, jint offsetbx, jint ldbx, jintArray perm, jint offsetperm, jint givptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jdoubleArray givnum, jint offsetgivnum, jint ldgnum, jdoubleArray poles, jint offsetpoles, jdoubleArray difl, jint offsetdifl, jdoubleArray difr, jint offsetdifr, jdoubleArray z, jint offsetz, jint k, jdouble c, jdouble s, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlansbK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jint n, jint k, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray work, jint offsetwork) { + jdouble __ret; + jboolean failed = FALSE; + const char *__nnorm = NULL; const char *__nuplo = NULL; double *__nab = NULL; double *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + __ret = dlansb_(__nnorm, __nuplo, &n, &k, __nab + offsetab, &ldab, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*dlalsa_)(int *icompq, int *smlsiz, int *n, int *nrhs, double *b, int *ldb, double *bx, int *ldbx, double *u, int *ldu, double *vt, int * k, double *difl, double *difr, double *z, double *poles, int * givptr, int * givcol, int *ldgcol, int * perm, double *givnum, double *c, double *s, double *work, int * iwork, /*FIXME*/void *info); +static double (*dlansp_)(const char *norm, const char *uplo, int *n, double *ap, double *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlalsaK(JNIEnv *env, UNUSED jobject obj, - jint icompq, jint smlsiz, jint n, jint nrhs, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray bx, jint offsetbx, jint ldbx, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jintArray k, jint offsetk, jdoubleArray difl, jint offsetdifl, jdoubleArray difr, jint offsetdifr, jdoubleArray z, jint offsetz, jdoubleArray poles, jint offsetpoles, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jintArray perm, jint offsetperm, jdoubleArray givnum, jint offsetgivnum, jdoubleArray c, jint offsetc, jdoubleArray s, jint offsets, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanspK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray work, jint offsetwork) { + jdouble __ret; + jboolean failed = FALSE; + const char *__nnorm = NULL; const char *__nuplo = NULL; double *__nap = NULL; double *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + __ret = dlansp_(__nnorm, __nuplo, &n, __nap + offsetap, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*dlalsd_)(const char *uplo, int *smlsiz, int *n, int *nrhs, double *d, double *e, double *b, int *ldb, double *rcond, /*FIXME*/void *rank, double *work, int * iwork, /*FIXME*/void *info); +static double (*dlanst_)(const char *norm, int *n, double *d, double *e); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlalsdK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint smlsiz, jint n, jint nrhs, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray b, jint offsetb, jint ldb, jdouble rcond, jobject rank, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanstK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete) { + jdouble __ret; + jboolean failed = FALSE; + const char *__nnorm = NULL; double *__nd = NULL; double *__ne = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + __ret = dlanst_(__nnorm, &n, __nd + offsetd, __ne + offsete); +done: + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*dlamrg_)(int *n1, int *n2, double *a, int *dtrd1, int *dtrd2, int * index); +static double (*dlansy_)(const char *norm, const char *uplo, int *n, double *a, int *lda, double *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamrgK(JNIEnv *env, UNUSED jobject obj, - jint n1, jint n2, jdoubleArray a, jint offseta, jint dtrd1, jint dtrd2, jintArray index, jint offsetindex) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlansyK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray work, jint offsetwork) { + jdouble __ret; + jboolean failed = FALSE; + const char *__nnorm = NULL; const char *__nuplo = NULL; double *__na = NULL; double *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + __ret = dlansy_(__nnorm, __nuplo, &n, __na + offseta, &lda, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static int (*dlaneg_)(int *n, double *d, int *offsetd, double *lld, int *offsetlld, double *sigma, double *pivmin, int *r); +static double (*dlantb_)(const char *norm, const char *uplo, const char *diag, int *n, int *k, double *ab, int *ldab, double *work); -jint Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanegK(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray d, jint offsetd, jdoubleArray lld, jint offsetlld, jdouble sigma, jdouble pivmin, jint r) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlantbK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jstring diag, jint n, jint k, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray work, jint offsetwork) { + jdouble __ret; + jboolean failed = FALSE; + const char *__nnorm = NULL; const char *__nuplo = NULL; const char *__ndiag = NULL; double *__nab = NULL; double *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + __ret = dlantb_(__nnorm, __nuplo, __ndiag, &n, &k, __nab + offsetab, &ldab, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static double (*dlangb_)(char *norm, int *n, int *kl, int *ku, double *ab, int *offsetab, int *ldab, double *work, int *offsetwork); +static double (*dlantp_)(const char *norm, const char *uplo, const char *diag, int *n, double *ap, double *work); -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlangbK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jint n, jint kl, jint ku, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlantpK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jstring diag, jint n, jdoubleArray ap, jint offsetap, jdoubleArray work, jint offsetwork) { + jdouble __ret; + jboolean failed = FALSE; + const char *__nnorm = NULL; const char *__nuplo = NULL; const char *__ndiag = NULL; double *__nap = NULL; double *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + __ret = dlantp_(__nnorm, __nuplo, __ndiag, &n, __nap + offsetap, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static double (*dlange_)(char *norm, int *m, int *n, double *a, int *offseta, int *lda, double *work, int *offsetwork); +static double (*dlantr_)(const char *norm, const char *uplo, const char *diag, int *m, int *n, double *a, int *lda, double *work); -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlangeK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlantrK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jstring diag, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray work, jint offsetwork) { + jdouble __ret; + jboolean failed = FALSE; + const char *__nnorm = NULL; const char *__nuplo = NULL; const char *__ndiag = NULL; double *__na = NULL; double *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + __ret = dlantr_(__nnorm, __nuplo, __ndiag, &m, &n, __na + offseta, &lda, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static double (*dlangt_)(char *norm, int *n, double *dl, int *offsetdl, double *d, int *offsetd, double *du, int *offsetdu); - -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlangtK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jint n, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +static void (*dlanv2_)(double *a, double *b, double *c, double *d, double *rt1r, double *rt1i, double *rt2r, double *rt2i, double *cs, double *sn); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanv2K(JNIEnv *env, UNUSED jobject obj, jobject a, jobject b, jobject c, jobject d, jobject rt1r, jobject rt1i, jobject rt2r, jobject rt2i, jobject cs, jobject sn) { + jboolean failed = FALSE; + double __na = 0; double __nb = 0; double __nc = 0; double __nd = 0; double __nrt1r = 0; double __nrt1i = 0; double __nrt2r = 0; double __nrt2i = 0; double __ncs = 0; double __nsn = 0; + __na = (*env)->GetDoubleField(env, a, doubleW_val_fieldID); + __nb = (*env)->GetDoubleField(env, b, doubleW_val_fieldID); + __nc = (*env)->GetDoubleField(env, c, doubleW_val_fieldID); + __nd = (*env)->GetDoubleField(env, d, doubleW_val_fieldID); + __nrt1r = (*env)->GetDoubleField(env, rt1r, doubleW_val_fieldID); + __nrt1i = (*env)->GetDoubleField(env, rt1i, doubleW_val_fieldID); + __nrt2r = (*env)->GetDoubleField(env, rt2r, doubleW_val_fieldID); + __nrt2i = (*env)->GetDoubleField(env, rt2i, doubleW_val_fieldID); + __ncs = (*env)->GetDoubleField(env, cs, doubleW_val_fieldID); + __nsn = (*env)->GetDoubleField(env, sn, doubleW_val_fieldID); + dlanv2_(&__na, &__nb, &__nc, &__nd, &__nrt1r, &__nrt1i, &__nrt2r, &__nrt2i, &__ncs, &__nsn); +done: + if (!failed) (*env)->SetDoubleField(env, sn, doubleW_val_fieldID, __nsn); + if (!failed) (*env)->SetDoubleField(env, cs, doubleW_val_fieldID, __ncs); + if (!failed) (*env)->SetDoubleField(env, rt2i, doubleW_val_fieldID, __nrt2i); + if (!failed) (*env)->SetDoubleField(env, rt2r, doubleW_val_fieldID, __nrt2r); + if (!failed) (*env)->SetDoubleField(env, rt1i, doubleW_val_fieldID, __nrt1i); + if (!failed) (*env)->SetDoubleField(env, rt1r, doubleW_val_fieldID, __nrt1r); + if (!failed) (*env)->SetDoubleField(env, d, doubleW_val_fieldID, __nd); + if (!failed) (*env)->SetDoubleField(env, c, doubleW_val_fieldID, __nc); + if (!failed) (*env)->SetDoubleField(env, b, doubleW_val_fieldID, __nb); + if (!failed) (*env)->SetDoubleField(env, a, doubleW_val_fieldID, __na); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static double (*dlanhs_)(char *norm, int *n, double *a, int *offseta, int *lda, double *work, int *offsetwork); +static void (*dlapll_)(int *n, double *x, int *incx, double *y, int *incy, double *ssmin); -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanhsK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlapllK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy, jobject ssmin) { + jboolean failed = FALSE; + double __nssmin = 0; double *__nx = NULL; double *__ny = NULL; + __nssmin = (*env)->GetDoubleField(env, ssmin, doubleW_val_fieldID); + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + dlapll_(&n, __nx + offsetx, &incx, __ny + offsety, &incy, &__nssmin); +done: + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetDoubleField(env, ssmin, doubleW_val_fieldID, __nssmin); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static double (*dlansb_)(char *norm, const char *uplo, int *n, int *k, double *ab, int *offsetab, int *ldab, double *work, int *offsetwork); +static void (*dlapmt_)(int *forwrd, int *m, int *n, double *x, int *ldx, int *k); -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlansbK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jstring uplo, jint n, jint k, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlapmtK(JNIEnv *env, UNUSED jobject obj, jboolean forwrd, jint m, jint n, jdoubleArray x, jint offsetx, jint ldx, jintArray k, jint offsetk) { + jboolean failed = FALSE; + int __nforwrd; double *__nx = NULL; int *__nk = NULL; + __nforwrd = forwrd; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nk = (*env)->GetPrimitiveArrayCritical(env, k, NULL))) goto fail; + dlapmt_(&__nforwrd, &m, &n, __nx + offsetx, &ldx, __nk + offsetk); +done: + if (__nk) (*env)->ReleasePrimitiveArrayCritical(env, k, __nk, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (!failed) forwrd = __nforwrd; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static double (*dlansp_)(char *norm, const char *uplo, int *n, double *ap, int *offsetap, double *work, int *offsetwork); +static double (*dlapy2_)(double *x, double *y); -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanspK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; -} +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlapy2K(JNIEnv *env, UNUSED jobject obj, jdouble x, jdouble y) { + jdouble __ret; + jboolean failed = FALSE; + -static double (*dlanst_)(char *norm, int *n, double *d, int *offsetd, double *e, int *offsete); + __ret = dlapy2_(&x, &y); +done: -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanstK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static double (*dlansy_)(char *norm, const char *uplo, int *n, double *a, int *offseta, int *lda, double *work, int *offsetwork); +static double (*dlapy3_)(double *x, double *y, double *z); -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlansyK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; -} +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlapy3K(JNIEnv *env, UNUSED jobject obj, jdouble x, jdouble y, jdouble z) { + jdouble __ret; + jboolean failed = FALSE; + -static double (*dlantb_)(char *norm, const char *uplo, char *diag, int *n, int *k, double *ab, int *offsetab, int *ldab, double *work, int *offsetwork); + __ret = dlapy3_(&x, &y, &z); +done: -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlantbK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jstring uplo, jstring diag, jint n, jint k, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static double (*dlantp_)(char *norm, const char *uplo, char *diag, int *n, double *ap, int *offsetap, double *work, int *offsetwork); +static void (*dlaqgb_)(int *m, int *n, int *kl, int *ku, double *ab, int *ldab, double *r, double *c, double *rowcnd, double *colcnd, double *amax, char *equed); -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlantpK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jstring uplo, jstring diag, jint n, jdoubleArray ap, jint offsetap, jdoubleArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqgbK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint kl, jint ku, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray r, jint offsetr, jdoubleArray c, jint offsetc, jdouble rowcnd, jdouble colcnd, jdouble amax, jobject equed) { + jboolean failed = FALSE; + char *__nequed = NULL; jstring __jequed = NULL;; double *__nab = NULL; double *__nr = NULL; double *__nc = NULL; + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + dlaqgb_(&m, &n, &kl, &ku, __nab + offsetab, &ldab, __nr + offsetr, __nc + offsetc, &rowcnd, &colcnd, &amax, __nequed); +done: + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static double (*dlantr_)(char *norm, const char *uplo, char *diag, int *m, int *n, double *a, int *offseta, int *lda, double *work, int *offsetwork); +static void (*dlaqge_)(int *m, int *n, double *a, int *lda, double *r, double *c, double *rowcnd, double *colcnd, double *amax, char *equed); -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlantrK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jstring uplo, jstring diag, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqgeK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray r, jint offsetr, jdoubleArray c, jint offsetc, jdouble rowcnd, jdouble colcnd, jdouble amax, jobject equed) { + jboolean failed = FALSE; + char *__nequed = NULL; jstring __jequed = NULL;; double *__na = NULL; double *__nr = NULL; double *__nc = NULL; + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + dlaqge_(&m, &n, __na + offseta, &lda, __nr + offsetr, __nc + offsetc, &rowcnd, &colcnd, &amax, __nequed); +done: + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlanv2_)(/*FIXME*/void *a, /*FIXME*/void *b, /*FIXME*/void *c, /*FIXME*/void *d, /*FIXME*/void *rt1r, /*FIXME*/void *rt1i, /*FIXME*/void *rt2r, /*FIXME*/void *rt2i, /*FIXME*/void *cs, /*FIXME*/void *sn); +static void (*dlaqp2_)(int *m, int *n, int *offset, double *a, int *lda, int *jpvt, double *tau, double *vn1, double *vn2, double *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanv2K(JNIEnv *env, UNUSED jobject obj, - jobject a, jobject b, jobject c, jobject d, jobject rt1r, jobject rt1i, jobject rt2r, jobject rt2i, jobject cs, jobject sn) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqp2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint offset, jdoubleArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jdoubleArray tau, jint offsettau, jdoubleArray vn1, jint offsetvn1, jdoubleArray vn2, jint offsetvn2, jdoubleArray work, jint offsetwork) { + jboolean failed = FALSE; + double *__na = NULL; int *__njpvt = NULL; double *__ntau = NULL; double *__nvn1 = NULL; double *__nvn2 = NULL; double *__nwork = NULL; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nvn1 = (*env)->GetPrimitiveArrayCritical(env, vn1, NULL))) goto fail; + if (!(__nvn2 = (*env)->GetPrimitiveArrayCritical(env, vn2, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dlaqp2_(&m, &n, &offset, __na + offseta, &lda, __njpvt + offsetjpvt, __ntau + offsettau, __nvn1 + offsetvn1, __nvn2 + offsetvn2, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nvn2) (*env)->ReleasePrimitiveArrayCritical(env, vn2, __nvn2, failed ? JNI_ABORT : 0); + if (__nvn1) (*env)->ReleasePrimitiveArrayCritical(env, vn1, __nvn1, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlapll_)(int *n, double *x, int *incx, double *y, int *incy, /*FIXME*/void *ssmin); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlapllK(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy, jobject ssmin) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlaqps_)(int *m, int *n, int *offset, int *nb, int *kb, double *a, int *lda, int *jpvt, double *tau, double *vn1, double *vn2, double *auxv, double *f, int *ldf); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqpsK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint offset, jint nb, jobject kb, jdoubleArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jdoubleArray tau, jint offsettau, jdoubleArray vn1, jint offsetvn1, jdoubleArray vn2, jint offsetvn2, jdoubleArray auxv, jint offsetauxv, jdoubleArray f, jint offsetf, jint ldf) { + jboolean failed = FALSE; + int __nkb = 0; double *__na = NULL; int *__njpvt = NULL; double *__ntau = NULL; double *__nvn1 = NULL; double *__nvn2 = NULL; double *__nauxv = NULL; double *__nf = NULL; + __nkb = (*env)->GetIntField(env, kb, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nvn1 = (*env)->GetPrimitiveArrayCritical(env, vn1, NULL))) goto fail; + if (!(__nvn2 = (*env)->GetPrimitiveArrayCritical(env, vn2, NULL))) goto fail; + if (!(__nauxv = (*env)->GetPrimitiveArrayCritical(env, auxv, NULL))) goto fail; + if (!(__nf = (*env)->GetPrimitiveArrayCritical(env, f, NULL))) goto fail; + dlaqps_(&m, &n, &offset, &nb, &__nkb, __na + offseta, &lda, __njpvt + offsetjpvt, __ntau + offsettau, __nvn1 + offsetvn1, __nvn2 + offsetvn2, __nauxv + offsetauxv, __nf + offsetf, &ldf); +done: + if (__nf) (*env)->ReleasePrimitiveArrayCritical(env, f, __nf, failed ? JNI_ABORT : 0); + if (__nauxv) (*env)->ReleasePrimitiveArrayCritical(env, auxv, __nauxv, failed ? JNI_ABORT : 0); + if (__nvn2) (*env)->ReleasePrimitiveArrayCritical(env, vn2, __nvn2, failed ? JNI_ABORT : 0); + if (__nvn1) (*env)->ReleasePrimitiveArrayCritical(env, vn1, __nvn1, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, kb, intW_val_fieldID, __nkb); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlapmt_)(int *forwrd, int *m, int *n, double *x, int *ldx, int * k); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlapmtK(JNIEnv *env, UNUSED jobject obj, - jboolean forwrd, jint m, jint n, jdoubleArray x, jint offsetx, jint ldx, jintArray k, jint offsetk) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlaqr0_)(int *wantt, int *wantz, int *n, int *ilo, int *ihi, double *h, int *ldh, double *wr, double *wi, int *iloz, int *ihiz, double *z, int *ldz, double *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr0K(JNIEnv *env, UNUSED jobject obj, jboolean wantt, jboolean wantz, jint n, jint ilo, jint ihi, jdoubleArray h, jint offseth, jint ldh, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jint iloz, jint ihiz, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __nwantt; int __nwantz; int __ninfo = 0; double *__nh = NULL; double *__nwr = NULL; double *__nwi = NULL; double *__nz = NULL; double *__nwork = NULL; + __nwantt = wantt; + __nwantz = wantz; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dlaqr0_(&__nwantt, &__nwantz, &n, &ilo, &ihi, __nh + offseth, &ldh, __nwr + offsetwr, __nwi + offsetwi, &iloz, &ihiz, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) wantz = __nwantz; + if (!failed) wantt = __nwantt; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static double (*dlapy2_)(double *x, double *y); +static void (*dlaqr1_)(int *n, double *h, int *ldh, double *sr1, double *si1, double *sr2, double *si2, double *v); -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlapy2K(JNIEnv *env, UNUSED jobject obj, - jdouble x, jdouble y) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr1K(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray h, jint offseth, jint ldh, jdouble sr1, jdouble si1, jdouble sr2, jdouble si2, jdoubleArray v, jint offsetv) { + jboolean failed = FALSE; + double *__nh = NULL; double *__nv = NULL; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + dlaqr1_(&n, __nh + offseth, &ldh, &sr1, &si1, &sr2, &si2, __nv + offsetv); +done: + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static double (*dlapy3_)(double *x, double *y, double *z); - -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlapy3K(JNIEnv *env, UNUSED jobject obj, - jdouble x, jdouble y, jdouble z) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +static void (*dlaqr2_)(int *wantt, int *wantz, int *n, int *ktop, int *kbot, int *nw, double *h, int *ldh, int *iloz, int *ihiz, double *z, int *ldz, int *ns, int *nd, double *sr, double *si, double *v, int *ldv, int *nh, double *t, int *ldt, int *nv, double *wv, int *ldwv, double *work, int *lwork); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr2K(JNIEnv *env, UNUSED jobject obj, jboolean wantt, jboolean wantz, jint n, jint ktop, jint kbot, jint nw, jdoubleArray h, jint offseth, jint ldh, jint iloz, jint ihiz, jdoubleArray z, jint offsetz, jint ldz, jobject ns, jobject nd, jdoubleArray sr, jint offsetsr, jdoubleArray si, jint offsetsi, jdoubleArray v, jint offsetv, jint ldv, jint nh, jdoubleArray t, jint offsett, jint ldt, jint nv, jdoubleArray wv, jint offsetwv, jint ldwv, jdoubleArray work, jint offsetwork, jint lwork) { + jboolean failed = FALSE; + int __nwantt; int __nwantz; int __nns = 0; int __nnd = 0; double *__nh = NULL; double *__nz = NULL; double *__nsr = NULL; double *__nsi = NULL; double *__nv = NULL; double *__nt = NULL; double *__nwv = NULL; double *__nwork = NULL; + __nwantt = wantt; + __nwantz = wantz; + __nns = (*env)->GetIntField(env, ns, intW_val_fieldID); + __nnd = (*env)->GetIntField(env, nd, intW_val_fieldID); + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nsr = (*env)->GetPrimitiveArrayCritical(env, sr, NULL))) goto fail; + if (!(__nsi = (*env)->GetPrimitiveArrayCritical(env, si, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + if (!(__nwv = (*env)->GetPrimitiveArrayCritical(env, wv, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dlaqr2_(&__nwantt, &__nwantz, &n, &ktop, &kbot, &nw, __nh + offseth, &ldh, &iloz, &ihiz, __nz + offsetz, &ldz, &__nns, &__nnd, __nsr + offsetsr, __nsi + offsetsi, __nv + offsetv, &ldv, &nh, __nt + offsett, &ldt, &nv, __nwv + offsetwv, &ldwv, __nwork + offsetwork, &lwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nwv) (*env)->ReleasePrimitiveArrayCritical(env, wv, __nwv, failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nsi) (*env)->ReleasePrimitiveArrayCritical(env, si, __nsi, failed ? JNI_ABORT : 0); + if (__nsr) (*env)->ReleasePrimitiveArrayCritical(env, sr, __nsr, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, nd, intW_val_fieldID, __nnd); + if (!failed) (*env)->SetIntField(env, ns, intW_val_fieldID, __nns); + if (!failed) wantz = __nwantz; + if (!failed) wantt = __nwantt; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaqgb_)(int *m, int *n, int *kl, int *ku, double *ab, int *ldab, double *r, double *c, double *rowcnd, double *colcnd, double *amax, jstring *equed); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqgbK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint kl, jint ku, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray r, jint offsetr, jdoubleArray c, jint offsetc, jdouble rowcnd, jdouble colcnd, jdouble amax, jobject equed) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlaqr3_)(int *wantt, int *wantz, int *n, int *ktop, int *kbot, int *nw, double *h, int *ldh, int *iloz, int *ihiz, double *z, int *ldz, int *ns, int *nd, double *sr, double *si, double *v, int *ldv, int *nh, double *t, int *ldt, int *nv, double *wv, int *ldwv, double *work, int *lwork); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr3K(JNIEnv *env, UNUSED jobject obj, jboolean wantt, jboolean wantz, jint n, jint ktop, jint kbot, jint nw, jdoubleArray h, jint offseth, jint ldh, jint iloz, jint ihiz, jdoubleArray z, jint offsetz, jint ldz, jobject ns, jobject nd, jdoubleArray sr, jint offsetsr, jdoubleArray si, jint offsetsi, jdoubleArray v, jint offsetv, jint ldv, jint nh, jdoubleArray t, jint offsett, jint ldt, jint nv, jdoubleArray wv, jint offsetwv, jint ldwv, jdoubleArray work, jint offsetwork, jint lwork) { + jboolean failed = FALSE; + int __nwantt; int __nwantz; int __nns = 0; int __nnd = 0; double *__nh = NULL; double *__nz = NULL; double *__nsr = NULL; double *__nsi = NULL; double *__nv = NULL; double *__nt = NULL; double *__nwv = NULL; double *__nwork = NULL; + __nwantt = wantt; + __nwantz = wantz; + __nns = (*env)->GetIntField(env, ns, intW_val_fieldID); + __nnd = (*env)->GetIntField(env, nd, intW_val_fieldID); + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nsr = (*env)->GetPrimitiveArrayCritical(env, sr, NULL))) goto fail; + if (!(__nsi = (*env)->GetPrimitiveArrayCritical(env, si, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + if (!(__nwv = (*env)->GetPrimitiveArrayCritical(env, wv, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dlaqr3_(&__nwantt, &__nwantz, &n, &ktop, &kbot, &nw, __nh + offseth, &ldh, &iloz, &ihiz, __nz + offsetz, &ldz, &__nns, &__nnd, __nsr + offsetsr, __nsi + offsetsi, __nv + offsetv, &ldv, &nh, __nt + offsett, &ldt, &nv, __nwv + offsetwv, &ldwv, __nwork + offsetwork, &lwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nwv) (*env)->ReleasePrimitiveArrayCritical(env, wv, __nwv, failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nsi) (*env)->ReleasePrimitiveArrayCritical(env, si, __nsi, failed ? JNI_ABORT : 0); + if (__nsr) (*env)->ReleasePrimitiveArrayCritical(env, sr, __nsr, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, nd, intW_val_fieldID, __nnd); + if (!failed) (*env)->SetIntField(env, ns, intW_val_fieldID, __nns); + if (!failed) wantz = __nwantz; + if (!failed) wantt = __nwantt; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaqge_)(int *m, int *n, double *a, int *lda, double *r, double *c, double *rowcnd, double *colcnd, double *amax, jstring *equed); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqgeK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray r, jint offsetr, jdoubleArray c, jint offsetc, jdouble rowcnd, jdouble colcnd, jdouble amax, jobject equed) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlaqr4_)(int *wantt, int *wantz, int *n, int *ilo, int *ihi, double *h, int *ldh, double *wr, double *wi, int *iloz, int *ihiz, double *z, int *ldz, double *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr4K(JNIEnv *env, UNUSED jobject obj, jboolean wantt, jboolean wantz, jint n, jint ilo, jint ihi, jdoubleArray h, jint offseth, jint ldh, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jint iloz, jint ihiz, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __nwantt; int __nwantz; int __ninfo = 0; double *__nh = NULL; double *__nwr = NULL; double *__nwi = NULL; double *__nz = NULL; double *__nwork = NULL; + __nwantt = wantt; + __nwantz = wantz; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dlaqr4_(&__nwantt, &__nwantz, &n, &ilo, &ihi, __nh + offseth, &ldh, __nwr + offsetwr, __nwi + offsetwi, &iloz, &ihiz, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) wantz = __nwantz; + if (!failed) wantt = __nwantt; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaqp2_)(int *m, int *n, int *offset, double *a, int *lda, int * jpvt, double *tau, double *vn11, double *vn22, double *work); +static void (*dlaqr5_)(int *wantt, int *wantz, int *kacc22, int *n, int *ktop, int *kbot, int *nshfts, double *sr, double *si, double *h, int *ldh, int *iloz, int *ihiz, double *z, int *ldz, double *v, int *ldv, double *u, int *ldu, int *nv, double *wv, int *ldwv, int *nh, double *wh, int *ldwh); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqp2K(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint offset, jdoubleArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jdoubleArray tau, jint offsettau, jdoubleArray vn1, jint offsetvn1, jdoubleArray vn2, jint offsetvn2, jdoubleArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr5K(JNIEnv *env, UNUSED jobject obj, jboolean wantt, jboolean wantz, jint kacc22, jint n, jint ktop, jint kbot, jint nshfts, jdoubleArray sr, jint offsetsr, jdoubleArray si, jint offsetsi, jdoubleArray h, jint offseth, jint ldh, jint iloz, jint ihiz, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray u, jint offsetu, jint ldu, jint nv, jdoubleArray wv, jint offsetwv, jint ldwv, jint nh, jdoubleArray wh, jint offsetwh, jint ldwh) { + jboolean failed = FALSE; + int __nwantt; int __nwantz; double *__nsr = NULL; double *__nsi = NULL; double *__nh = NULL; double *__nz = NULL; double *__nv = NULL; double *__nu = NULL; double *__nwv = NULL; double *__nwh = NULL; + __nwantt = wantt; + __nwantz = wantz; + if (!(__nsr = (*env)->GetPrimitiveArrayCritical(env, sr, NULL))) goto fail; + if (!(__nsi = (*env)->GetPrimitiveArrayCritical(env, si, NULL))) goto fail; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; + if (!(__nwv = (*env)->GetPrimitiveArrayCritical(env, wv, NULL))) goto fail; + if (!(__nwh = (*env)->GetPrimitiveArrayCritical(env, wh, NULL))) goto fail; + dlaqr5_(&__nwantt, &__nwantz, &kacc22, &n, &ktop, &kbot, &nshfts, __nsr + offsetsr, __nsi + offsetsi, __nh + offseth, &ldh, &iloz, &ihiz, __nz + offsetz, &ldz, __nv + offsetv, &ldv, __nu + offsetu, &ldu, &nv, __nwv + offsetwv, &ldwv, &nh, __nwh + offsetwh, &ldwh); +done: + if (__nwh) (*env)->ReleasePrimitiveArrayCritical(env, wh, __nwh, failed ? JNI_ABORT : 0); + if (__nwv) (*env)->ReleasePrimitiveArrayCritical(env, wv, __nwv, failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (__nsi) (*env)->ReleasePrimitiveArrayCritical(env, si, __nsi, failed ? JNI_ABORT : 0); + if (__nsr) (*env)->ReleasePrimitiveArrayCritical(env, sr, __nsr, failed ? JNI_ABORT : 0); + if (!failed) wantz = __nwantz; + if (!failed) wantt = __nwantt; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaqps_)(int *m, int *n, int *offset, int *nb, /*FIXME*/void *kb, double *a, int *lda, int * jpvt, double *tau, double *vn11, double *vn22, double *auxv, double *f, int *ldf); +static void (*dlaqsb_)(const char *uplo, int *n, int *kd, double *ab, int *ldab, double *s, double *scond, double *amax, char *equed); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqpsK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint offset, jint nb, jobject kb, jdoubleArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jdoubleArray tau, jint offsettau, jdoubleArray vn1, jint offsetvn1, jdoubleArray vn2, jint offsetvn2, jdoubleArray auxv, jint offsetauxv, jdoubleArray f, jint offsetf, jint ldf) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqsbK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray s, jint offsets, jdouble scond, jdouble amax, jobject equed) { + jboolean failed = FALSE; + const char *__nuplo = NULL; char *__nequed = NULL; jstring __jequed = NULL;; double *__nab = NULL; double *__ns = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + dlaqsb_(__nuplo, &n, &kd, __nab + offsetab, &ldab, __ns + offsets, &scond, &amax, __nequed); +done: + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaqr0_)(int *wantt, int *wantz, int *n, int *ilo, int *ihi, double *h, int *ldh, double *wr, double *wi, int *iloz, int *ihiz, double *z, int *ldz, double *work, int *lwork, /*FIXME*/void *info); +static void (*dlaqsp_)(const char *uplo, int *n, double *ap, double *s, double *scond, double *amax, char *equed); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr0K(JNIEnv *env, UNUSED jobject obj, - jboolean wantt, jboolean wantz, jint n, jint ilo, jint ihi, jdoubleArray h, jint offseth, jint ldh, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jint iloz, jint ihiz, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqspK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray s, jint offsets, jdouble scond, jdouble amax, jobject equed) { + jboolean failed = FALSE; + const char *__nuplo = NULL; char *__nequed = NULL; jstring __jequed = NULL;; double *__nap = NULL; double *__ns = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + dlaqsp_(__nuplo, &n, __nap + offsetap, __ns + offsets, &scond, &amax, __nequed); +done: + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaqr1_)(int *n, double *h, int *ldh, double *sr1, double *si1, double *sr2, double *si2, double *v); +static void (*dlaqsy_)(const char *uplo, int *n, double *a, int *lda, double *s, double *scond, double *amax, char *equed); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr1K(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray h, jint offseth, jint ldh, jdouble sr1, jdouble si1, jdouble sr2, jdouble si2, jdoubleArray v, jint offsetv) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqsyK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray s, jint offsets, jdouble scond, jdouble amax, jobject equed) { + jboolean failed = FALSE; + const char *__nuplo = NULL; char *__nequed = NULL; jstring __jequed = NULL;; double *__na = NULL; double *__ns = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + dlaqsy_(__nuplo, &n, __na + offseta, &lda, __ns + offsets, &scond, &amax, __nequed); +done: + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaqr2_)(int *wantt, int *wantz, int *n, int *ktop, int *kbot, int *nw, double *h, int *ldh, int *iloz, int *ihiz, double *z, int *ldz, /*FIXME*/void *ns, /*FIXME*/void *nd, double *sr, double *si, double *v, int *ldv, int *nh, double *t, int *ldt, int *nv, double *wv, int *ldwv, double *work, int *lwork); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr2K(JNIEnv *env, UNUSED jobject obj, - jboolean wantt, jboolean wantz, jint n, jint ktop, jint kbot, jint nw, jdoubleArray h, jint offseth, jint ldh, jint iloz, jint ihiz, jdoubleArray z, jint offsetz, jint ldz, jobject ns, jobject nd, jdoubleArray sr, jint offsetsr, jdoubleArray si, jint offsetsi, jdoubleArray v, jint offsetv, jint ldv, jint nh, jdoubleArray t, jint offsett, jint ldt, jint nv, jdoubleArray wv, jint offsetwv, jint ldwv, jdoubleArray work, jint offsetwork, jint lwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlaqtr_)(int *ltran, int *lreal, int *n, double *t, int *ldt, double *b, double *w, double *scale, double *x, double *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqtrK(JNIEnv *env, UNUSED jobject obj, jboolean ltran, jboolean lreal, jint n, jdoubleArray t, jint offsett, jint ldt, jdoubleArray b, jint offsetb, jdouble w, jobject scale, jdoubleArray x, jint offsetx, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __nltran; int __nlreal; double __nscale = 0; int __ninfo = 0; double *__nt = NULL; double *__nb = NULL; double *__nx = NULL; double *__nwork = NULL; + __nltran = ltran; + __nlreal = lreal; + __nscale = (*env)->GetDoubleField(env, scale, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dlaqtr_(&__nltran, &__nlreal, &n, __nt + offsett, &ldt, __nb + offsetb, &w, &__nscale, __nx + offsetx, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); + if (!failed) lreal = __nlreal; + if (!failed) ltran = __nltran; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaqr3_)(int *wantt, int *wantz, int *n, int *ktop, int *kbot, int *nw, double *h, int *ldh, int *iloz, int *ihiz, double *z, int *ldz, /*FIXME*/void *ns, /*FIXME*/void *nd, double *sr, double *si, double *v, int *ldv, int *nh, double *t, int *ldt, int *nv, double *wv, int *ldwv, double *work, int *lwork); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr3K(JNIEnv *env, UNUSED jobject obj, - jboolean wantt, jboolean wantz, jint n, jint ktop, jint kbot, jint nw, jdoubleArray h, jint offseth, jint ldh, jint iloz, jint ihiz, jdoubleArray z, jint offsetz, jint ldz, jobject ns, jobject nd, jdoubleArray sr, jint offsetsr, jdoubleArray si, jint offsetsi, jdoubleArray v, jint offsetv, jint ldv, jint nh, jdoubleArray t, jint offsett, jint ldt, jint nv, jdoubleArray wv, jint offsetwv, jint ldwv, jdoubleArray work, jint offsetwork, jint lwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlar1v_)(int *n, int *b1, int *bn, double *lambda, double *d, double *l, double *ld, double *lld, double *pivmin, double *gaptol, double *z, int *wantnc, int *negcnt, double *ztz, double *mingma, int *r, int *isuppz, double *nrminv, double *resid, double *rqcorr, double *work); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlar1vK(JNIEnv *env, UNUSED jobject obj, jint n, jint b1, jint bn, jdouble lambda, jdoubleArray d, jint offsetd, jdoubleArray l, jint offsetl, jdoubleArray ld, jint offsetld, jdoubleArray lld, jint offsetlld, jdouble pivmin, jdouble gaptol, jdoubleArray z, jint offsetz, jboolean wantnc, jobject negcnt, jobject ztz, jobject mingma, jobject r, jintArray isuppz, jint offsetisuppz, jobject nrminv, jobject resid, jobject rqcorr, jdoubleArray work, jint offsetwork) { + jboolean failed = FALSE; + int __nwantnc; int __nnegcnt = 0; double __nztz = 0; double __nmingma = 0; int __nr = 0; double __nnrminv = 0; double __nresid = 0; double __nrqcorr = 0; double *__nd = NULL; double *__nl = NULL; double *__nld = NULL; double *__nlld = NULL; double *__nz = NULL; int *__nisuppz = NULL; double *__nwork = NULL; + __nwantnc = wantnc; + __nnegcnt = (*env)->GetIntField(env, negcnt, intW_val_fieldID); + __nztz = (*env)->GetDoubleField(env, ztz, doubleW_val_fieldID); + __nmingma = (*env)->GetDoubleField(env, mingma, doubleW_val_fieldID); + __nr = (*env)->GetIntField(env, r, intW_val_fieldID); + __nnrminv = (*env)->GetDoubleField(env, nrminv, doubleW_val_fieldID); + __nresid = (*env)->GetDoubleField(env, resid, doubleW_val_fieldID); + __nrqcorr = (*env)->GetDoubleField(env, rqcorr, doubleW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nl = (*env)->GetPrimitiveArrayCritical(env, l, NULL))) goto fail; + if (!(__nld = (*env)->GetPrimitiveArrayCritical(env, ld, NULL))) goto fail; + if (!(__nlld = (*env)->GetPrimitiveArrayCritical(env, lld, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dlar1v_(&n, &b1, &bn, &lambda, __nd + offsetd, __nl + offsetl, __nld + offsetld, __nlld + offsetlld, &pivmin, &gaptol, __nz + offsetz, &__nwantnc, &__nnegcnt, &__nztz, &__nmingma, &__nr, __nisuppz + offsetisuppz, &__nnrminv, &__nresid, &__nrqcorr, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nlld) (*env)->ReleasePrimitiveArrayCritical(env, lld, __nlld, failed ? JNI_ABORT : 0); + if (__nld) (*env)->ReleasePrimitiveArrayCritical(env, ld, __nld, failed ? JNI_ABORT : 0); + if (__nl) (*env)->ReleasePrimitiveArrayCritical(env, l, __nl, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetDoubleField(env, rqcorr, doubleW_val_fieldID, __nrqcorr); + if (!failed) (*env)->SetDoubleField(env, resid, doubleW_val_fieldID, __nresid); + if (!failed) (*env)->SetDoubleField(env, nrminv, doubleW_val_fieldID, __nnrminv); + if (!failed) (*env)->SetIntField(env, r, intW_val_fieldID, __nr); + if (!failed) (*env)->SetDoubleField(env, mingma, doubleW_val_fieldID, __nmingma); + if (!failed) (*env)->SetDoubleField(env, ztz, doubleW_val_fieldID, __nztz); + if (!failed) (*env)->SetIntField(env, negcnt, intW_val_fieldID, __nnegcnt); + if (!failed) wantnc = __nwantnc; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaqr4_)(int *wantt, int *wantz, int *n, int *ilo, int *ihi, double *h, int *ldh, double *wr, double *wi, int *iloz, int *ihiz, double *z, int *ldz, double *work, int *lwork, /*FIXME*/void *info); +static void (*dlar2v_)(int *n, double *x, double *y, double *z, int *incx, double *c, double *s, int *incc); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr4K(JNIEnv *env, UNUSED jobject obj, - jboolean wantt, jboolean wantz, jint n, jint ilo, jint ihi, jdoubleArray h, jint offseth, jint ldh, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jint iloz, jint ihiz, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlar2vK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray x, jint offsetx, jdoubleArray y, jint offsety, jdoubleArray z, jint offsetz, jint incx, jdoubleArray c, jint offsetc, jdoubleArray s, jint offsets, jint incc) { + jboolean failed = FALSE; + double *__nx = NULL; double *__ny = NULL; double *__nz = NULL; double *__nc = NULL; double *__ns = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + dlar2v_(&n, __nx + offsetx, __ny + offsety, __nz + offsetz, &incx, __nc + offsetc, __ns + offsets, &incc); +done: + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaqr5_)(int *wantt, int *wantz, int *kacc22, int *n, int *ktop, int *kbot, int *nshfts, double *sr, double *si, double *h, int *ldh, int *iloz, int *ihiz, double *z, int *ldz, double *v, int *ldv, double *u, int *ldu, int *nv, double *wv, int *ldwv, int *nh, double *wh, int *ldwh); +static void (*dlarf_)(const char *side, int *m, int *n, double *v, int *incv, double *tau, double *c, int *Ldc, double *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr5K(JNIEnv *env, UNUSED jobject obj, - jboolean wantt, jboolean wantz, jint kacc22, jint n, jint ktop, jint kbot, jint nshfts, jdoubleArray sr, jint offsetsr, jdoubleArray si, jint offsetsi, jdoubleArray h, jint offseth, jint ldh, jint iloz, jint ihiz, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray u, jint offsetu, jint ldu, jint nv, jdoubleArray wv, jint offsetwv, jint ldwv, jint nh, jdoubleArray wh, jint offsetwh, jint ldwh) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarfK(JNIEnv *env, UNUSED jobject obj, jstring side, jint m, jint n, jdoubleArray v, jint offsetv, jint incv, jdouble tau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork) { + jboolean failed = FALSE; + const char *__nside = NULL; double *__nv = NULL; double *__nc = NULL; double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dlarf_(__nside, &m, &n, __nv + offsetv, &incv, &tau, __nc + offsetc, &Ldc, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaqsb_)(const char *uplo, int *n, int *kd, double *ab, int *ldab, double *s, double *scond, double *amax, jstring *equed); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqsbK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray s, jint offsets, jdouble scond, jdouble amax, jobject equed) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlarfb_)(const char *side, const char *trans, const char *direct, const char *storev, int *m, int *n, int *k, double *v, int *ldv, double *t, int *ldt, double *c, int *Ldc, double *work, int *ldwork); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarfbK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jstring direct, jstring storev, jint m, jint n, jint k, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray t, jint offsett, jint ldt, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint ldwork) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__ntrans = NULL; const char *__ndirect = NULL; const char *__nstorev = NULL; double *__nv = NULL; double *__nt = NULL; double *__nc = NULL; double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndirect = (*env)->GetStringUTFChars(env, direct, NULL))) goto fail; + if (!(__nstorev = (*env)->GetStringUTFChars(env, storev, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dlarfb_(__nside, __ntrans, __ndirect, __nstorev, &m, &n, &k, __nv + offsetv, &ldv, __nt + offsett, &ldt, __nc + offsetc, &Ldc, __nwork + offsetwork, &ldwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nstorev) (*env)->ReleaseStringUTFChars(env, storev, __nstorev); + if (__ndirect) (*env)->ReleaseStringUTFChars(env, direct, __ndirect); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaqsp_)(const char *uplo, int *n, double *ap, double *s, double *scond, double *amax, jstring *equed); +static void (*dlarfg_)(int *n, double *alpha, double *x, int *incx, double *tau); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqspK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray s, jint offsets, jdouble scond, jdouble amax, jobject equed) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarfgK(JNIEnv *env, UNUSED jobject obj, jint n, jobject alpha, jdoubleArray x, jint offsetx, jint incx, jobject tau) { + jboolean failed = FALSE; + double __nalpha = 0; double __ntau = 0; double *__nx = NULL; + __nalpha = (*env)->GetDoubleField(env, alpha, doubleW_val_fieldID); + __ntau = (*env)->GetDoubleField(env, tau, doubleW_val_fieldID); + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + dlarfg_(&n, &__nalpha, __nx + offsetx, &incx, &__ntau); +done: + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetDoubleField(env, tau, doubleW_val_fieldID, __ntau); + if (!failed) (*env)->SetDoubleField(env, alpha, doubleW_val_fieldID, __nalpha); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaqsy_)(const char *uplo, int *n, double *a, int *lda, double *s, double *scond, double *amax, jstring *equed); +static void (*dlarft_)(const char *direct, const char *storev, int *n, int *k, double *v, int *ldv, double *tau, double *t, int *ldt); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqsyK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray s, jint offsets, jdouble scond, jdouble amax, jobject equed) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarftK(JNIEnv *env, UNUSED jobject obj, jstring direct, jstring storev, jint n, jint k, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray tau, jint offsettau, jdoubleArray t, jint offsett, jint ldt) { + jboolean failed = FALSE; + const char *__ndirect = NULL; const char *__nstorev = NULL; double *__nv = NULL; double *__ntau = NULL; double *__nt = NULL; + if (!(__ndirect = (*env)->GetStringUTFChars(env, direct, NULL))) goto fail; + if (!(__nstorev = (*env)->GetStringUTFChars(env, storev, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + dlarft_(__ndirect, __nstorev, &n, &k, __nv + offsetv, &ldv, __ntau + offsettau, __nt + offsett, &ldt); +done: + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nstorev) (*env)->ReleaseStringUTFChars(env, storev, __nstorev); + if (__ndirect) (*env)->ReleaseStringUTFChars(env, direct, __ndirect); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaqtr_)(int *ltran, int *lreal, int *n, double *t, int *ldt, double *b, double *w, /*FIXME*/void *scale, double *x, double *work, /*FIXME*/void *info); +static void (*dlarfx_)(const char *side, int *m, int *n, double *v, double *tau, double *c, int *Ldc, double *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqtrK(JNIEnv *env, UNUSED jobject obj, - jboolean ltran, jboolean lreal, jint n, jdoubleArray t, jint offsett, jint ldt, jdoubleArray b, jint offsetb, jdouble w, jobject scale, jdoubleArray x, jint offsetx, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarfxK(JNIEnv *env, UNUSED jobject obj, jstring side, jint m, jint n, jdoubleArray v, jint offsetv, jdouble tau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork) { + jboolean failed = FALSE; + const char *__nside = NULL; double *__nv = NULL; double *__nc = NULL; double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dlarfx_(__nside, &m, &n, __nv + offsetv, &tau, __nc + offsetc, &Ldc, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlar1v_)(int *n, int *b1, int *bn, double *lambda, double *d, double *l, double *ld, double *lld, double *pivmin, double *gaptol, double *z, int *wantnc, /*FIXME*/void *negcnt, /*FIXME*/void *ztz, /*FIXME*/void *mingma, /*FIXME*/void *r, int * isuppz, /*FIXME*/void *nrminv, /*FIXME*/void *resid, /*FIXME*/void *rqcorr, double *work); +static void (*dlargv_)(int *n, double *x, int *incx, double *y, int *incy, double *c, int *incc); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlar1vK(JNIEnv *env, UNUSED jobject obj, - jint n, jint b1, jint bn, jdouble lambda, jdoubleArray d, jint offsetd, jdoubleArray l, jint offsetl, jdoubleArray ld, jint offsetld, jdoubleArray lld, jint offsetlld, jdouble pivmin, jdouble gaptol, jdoubleArray z, jint offsetz, jboolean wantnc, jobject negcnt, jobject ztz, jobject mingma, jobject r, jintArray isuppz, jint offsetisuppz, jobject nrminv, jobject resid, jobject rqcorr, jdoubleArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlargvK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy, jdoubleArray c, jint offsetc, jint incc) { + jboolean failed = FALSE; + double *__nx = NULL; double *__ny = NULL; double *__nc = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + dlargv_(&n, __nx + offsetx, &incx, __ny + offsety, &incy, __nc + offsetc, &incc); +done: + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlar2v_)(int *n, double *x, double *y, double *z, int *incx, double *c, double *s, int *incc); +static void (*dlarnv_)(int *idist, int *iseed, int *n, double *x); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlar2vK(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray x, jint offsetx, jdoubleArray y, jint offsety, jdoubleArray z, jint offsetz, jint incx, jdoubleArray c, jint offsetc, jdoubleArray s, jint offsets, jint incc) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarnvK(JNIEnv *env, UNUSED jobject obj, jint idist, jintArray iseed, jint offsetiseed, jint n, jdoubleArray x, jint offsetx) { + jboolean failed = FALSE; + int *__niseed = NULL; double *__nx = NULL; + if (!(__niseed = (*env)->GetPrimitiveArrayCritical(env, iseed, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + dlarnv_(&idist, __niseed + offsetiseed, &n, __nx + offsetx); +done: + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__niseed) (*env)->ReleasePrimitiveArrayCritical(env, iseed, __niseed, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlarf_)(char *side, int *m, int *n, double *v, int *incv, double *tau, double *c, int *Ldc, double *work); +static void (*dlarra_)(int *n, double *d, double *e, double *e2, double *spltol, double *tnrm, int *nsplit, int *isplit, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarfK(JNIEnv *env, UNUSED jobject obj, - jstring side, jint m, jint n, jdoubleArray v, jint offsetv, jint incv, jdouble tau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarraK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray e2, jint offsete2, jdouble spltol, jdouble tnrm, jobject nsplit, jintArray isplit, jint offsetisplit, jobject info) { + jboolean failed = FALSE; + int __nnsplit = 0; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__ne2 = NULL; int *__nisplit = NULL; + __nnsplit = (*env)->GetIntField(env, nsplit, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) goto fail; + if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) goto fail; + dlarra_(&n, __nd + offsetd, __ne + offsete, __ne2 + offsete2, &spltol, &tnrm, &__nnsplit, __nisplit + offsetisplit, &__ninfo); +done: + if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, failed ? JNI_ABORT : 0); + if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, nsplit, intW_val_fieldID, __nnsplit); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlarfb_)(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, double *v, int *ldv, double *t, int *ldt, double *c, int *Ldc, double *work, int *ldwork); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarfbK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring trans, jstring direct, jstring storev, jint m, jint n, jint k, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray t, jint offsett, jint ldt, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint ldwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlarrb_)(int *n, double *d, double *lld, int *ifirst, int *ilast, double *rtol1, double *rtol2, int *offset, double *w, double *wgap, double *werr, double *work, int *iwork, double *pivmin, double *spdiam, int *twist, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrbK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray d, jint offsetd, jdoubleArray lld, jint offsetlld, jint ifirst, jint ilast, jdouble rtol1, jdouble rtol2, jint offset, jdoubleArray w, jint offsetw, jdoubleArray wgap, jint offsetwgap, jdoubleArray werr, jint offsetwerr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jdouble pivmin, jdouble spdiam, jint twist, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__nd = NULL; double *__nlld = NULL; double *__nw = NULL; double *__nwgap = NULL; double *__nwerr = NULL; double *__nwork = NULL; int *__niwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nlld = (*env)->GetPrimitiveArrayCritical(env, lld, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nwgap = (*env)->GetPrimitiveArrayCritical(env, wgap, NULL))) goto fail; + if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dlarrb_(&n, __nd + offsetd, __nlld + offsetlld, &ifirst, &ilast, &rtol1, &rtol2, &offset, __nw + offsetw, __nwgap + offsetwgap, __nwerr + offsetwerr, __nwork + offsetwork, __niwork + offsetiwork, &pivmin, &spdiam, &twist, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, failed ? JNI_ABORT : 0); + if (__nwgap) (*env)->ReleasePrimitiveArrayCritical(env, wgap, __nwgap, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nlld) (*env)->ReleasePrimitiveArrayCritical(env, lld, __nlld, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlarfg_)(int *n, /*FIXME*/void *alpha, double *x, int *incx, /*FIXME*/void *tau); +static void (*dlarrc_)(const char *jobt, int *n, double *vl, double *vu, double *d, double *e, double *pivmin, int *eigcnt, int *lcnt, int *rcnt, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarfgK(JNIEnv *env, UNUSED jobject obj, - jint n, jobject alpha, jdoubleArray x, jint offsetx, jint incx, jobject tau) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrcK(JNIEnv *env, UNUSED jobject obj, jstring jobt, jint n, jdouble vl, jdouble vu, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdouble pivmin, jobject eigcnt, jobject lcnt, jobject rcnt, jobject info) { + jboolean failed = FALSE; + const char *__njobt = NULL; int __neigcnt = 0; int __nlcnt = 0; int __nrcnt = 0; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; + if (!(__njobt = (*env)->GetStringUTFChars(env, jobt, NULL))) goto fail; + __neigcnt = (*env)->GetIntField(env, eigcnt, intW_val_fieldID); + __nlcnt = (*env)->GetIntField(env, lcnt, intW_val_fieldID); + __nrcnt = (*env)->GetIntField(env, rcnt, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + dlarrc_(__njobt, &n, &vl, &vu, __nd + offsetd, __ne + offsete, &pivmin, &__neigcnt, &__nlcnt, &__nrcnt, &__ninfo); +done: + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, rcnt, intW_val_fieldID, __nrcnt); + if (!failed) (*env)->SetIntField(env, lcnt, intW_val_fieldID, __nlcnt); + if (!failed) (*env)->SetIntField(env, eigcnt, intW_val_fieldID, __neigcnt); + if (__njobt) (*env)->ReleaseStringUTFChars(env, jobt, __njobt); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlarft_)(char *direct, char *storev, int *n, int *k, double *v, int *ldv, double *tau, double *t, int *ldt); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarftK(JNIEnv *env, UNUSED jobject obj, - jstring direct, jstring storev, jint n, jint k, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray tau, jint offsettau, jdoubleArray t, jint offsett, jint ldt) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlarrd_)(const char *range, const char *order, int *n, double *vl, double *vu, int *il, int *iu, double *gers, double *reltol, double *d, double *e, double *e2, double *pivmin, int *nsplit, int *isplit, int *m, double *w, double *werr, double *wl, double *wu, int *iblock, int *indexw, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrdK(JNIEnv *env, UNUSED jobject obj, jstring range, jstring order, jint n, jdouble vl, jdouble vu, jint il, jint iu, jdoubleArray gers, jint offsetgers, jdouble reltol, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray e2, jint offsete2, jdouble pivmin, jint nsplit, jintArray isplit, jint offsetisplit, jobject m, jdoubleArray w, jint offsetw, jdoubleArray werr, jint offsetwerr, jobject wl, jobject wu, jintArray iblock, jint offsetiblock, jintArray indexw, jint offsetindexw, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nrange = NULL; const char *__norder = NULL; int __nm = 0; double __nwl = 0; double __nwu = 0; int __ninfo = 0; double *__ngers = NULL; double *__nd = NULL; double *__ne = NULL; double *__ne2 = NULL; int *__nisplit = NULL; double *__nw = NULL; double *__nwerr = NULL; int *__niblock = NULL; int *__nindexw = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + if (!(__norder = (*env)->GetStringUTFChars(env, order, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __nwl = (*env)->GetDoubleField(env, wl, doubleW_val_fieldID); + __nwu = (*env)->GetDoubleField(env, wu, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__ngers = (*env)->GetPrimitiveArrayCritical(env, gers, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) goto fail; + if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) goto fail; + if (!(__niblock = (*env)->GetPrimitiveArrayCritical(env, iblock, NULL))) goto fail; + if (!(__nindexw = (*env)->GetPrimitiveArrayCritical(env, indexw, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dlarrd_(__nrange, __norder, &n, &vl, &vu, &il, &iu, __ngers + offsetgers, &reltol, __nd + offsetd, __ne + offsete, __ne2 + offsete2, &pivmin, &nsplit, __nisplit + offsetisplit, &__nm, __nw + offsetw, __nwerr + offsetwerr, &__nwl, &__nwu, __niblock + offsetiblock, __nindexw + offsetindexw, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nindexw) (*env)->ReleasePrimitiveArrayCritical(env, indexw, __nindexw, failed ? JNI_ABORT : 0); + if (__niblock) (*env)->ReleasePrimitiveArrayCritical(env, iblock, __niblock, failed ? JNI_ABORT : 0); + if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, failed ? JNI_ABORT : 0); + if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__ngers) (*env)->ReleasePrimitiveArrayCritical(env, gers, __ngers, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, wu, doubleW_val_fieldID, __nwu); + if (!failed) (*env)->SetDoubleField(env, wl, doubleW_val_fieldID, __nwl); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__norder) (*env)->ReleaseStringUTFChars(env, order, __norder); + if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlarfx_)(char *side, int *m, int *n, double *v, double *tau, double *c, int *Ldc, double *work); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarfxK(JNIEnv *env, UNUSED jobject obj, - jstring side, jint m, jint n, jdoubleArray v, jint offsetv, jdouble tau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlarre_)(const char *range, int *n, double *vl, double *vu, int *il, int *iu, double *d, double *e, double *e2, double *rtol1, double *rtol2, double *spltol, int *nsplit, int *isplit, int *m, double *w, double *werr, double *wgap, int *iblock, int *indexw, double *gers, double *pivmin, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarreK(JNIEnv *env, UNUSED jobject obj, jstring range, jint n, jobject vl, jobject vu, jint il, jint iu, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray e2, jint offsete2, jdouble rtol1, jdouble rtol2, jdouble spltol, jobject nsplit, jintArray isplit, jint offsetisplit, jobject m, jdoubleArray w, jint offsetw, jdoubleArray werr, jint offsetwerr, jdoubleArray wgap, jint offsetwgap, jintArray iblock, jint offsetiblock, jintArray indexw, jint offsetindexw, jdoubleArray gers, jint offsetgers, jobject pivmin, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nrange = NULL; double __nvl = 0; double __nvu = 0; int __nnsplit = 0; int __nm = 0; double __npivmin = 0; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__ne2 = NULL; int *__nisplit = NULL; double *__nw = NULL; double *__nwerr = NULL; double *__nwgap = NULL; int *__niblock = NULL; int *__nindexw = NULL; double *__ngers = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + __nvl = (*env)->GetDoubleField(env, vl, doubleW_val_fieldID); + __nvu = (*env)->GetDoubleField(env, vu, doubleW_val_fieldID); + __nnsplit = (*env)->GetIntField(env, nsplit, intW_val_fieldID); + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __npivmin = (*env)->GetDoubleField(env, pivmin, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) goto fail; + if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) goto fail; + if (!(__nwgap = (*env)->GetPrimitiveArrayCritical(env, wgap, NULL))) goto fail; + if (!(__niblock = (*env)->GetPrimitiveArrayCritical(env, iblock, NULL))) goto fail; + if (!(__nindexw = (*env)->GetPrimitiveArrayCritical(env, indexw, NULL))) goto fail; + if (!(__ngers = (*env)->GetPrimitiveArrayCritical(env, gers, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dlarre_(__nrange, &n, &__nvl, &__nvu, &il, &iu, __nd + offsetd, __ne + offsete, __ne2 + offsete2, &rtol1, &rtol2, &spltol, &__nnsplit, __nisplit + offsetisplit, &__nm, __nw + offsetw, __nwerr + offsetwerr, __nwgap + offsetwgap, __niblock + offsetiblock, __nindexw + offsetindexw, __ngers + offsetgers, &__npivmin, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ngers) (*env)->ReleasePrimitiveArrayCritical(env, gers, __ngers, failed ? JNI_ABORT : 0); + if (__nindexw) (*env)->ReleasePrimitiveArrayCritical(env, indexw, __nindexw, failed ? JNI_ABORT : 0); + if (__niblock) (*env)->ReleasePrimitiveArrayCritical(env, iblock, __niblock, failed ? JNI_ABORT : 0); + if (__nwgap) (*env)->ReleasePrimitiveArrayCritical(env, wgap, __nwgap, failed ? JNI_ABORT : 0); + if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, failed ? JNI_ABORT : 0); + if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, pivmin, doubleW_val_fieldID, __npivmin); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (!failed) (*env)->SetIntField(env, nsplit, intW_val_fieldID, __nnsplit); + if (!failed) (*env)->SetDoubleField(env, vu, doubleW_val_fieldID, __nvu); + if (!failed) (*env)->SetDoubleField(env, vl, doubleW_val_fieldID, __nvl); + if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlargv_)(int *n, double *x, int *incx, double *y, int *incy, double *c, int *incc); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlargvK(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy, jdoubleArray c, jint offsetc, jint incc) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlarrf_)(int *n, double *d, double *l, double *ld, int *clstrt, int *clend, double *w, double *wgap, double *werr, double *spdiam, double *clgapl, double *clgapr, double *pivmin, double *sigma, double *dplus, double *lplus, double *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrfK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray d, jint offsetd, jdoubleArray l, jint offsetl, jdoubleArray ld, jint offsetld, jint clstrt, jint clend, jdoubleArray w, jint offsetw, jdoubleArray wgap, jint offsetwgap, jdoubleArray werr, jint offsetwerr, jdouble spdiam, jdouble clgapl, jdouble clgapr, jdouble pivmin, jobject sigma, jdoubleArray dplus, jint offsetdplus, jdoubleArray lplus, jint offsetlplus, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + double __nsigma = 0; int __ninfo = 0; double *__nd = NULL; double *__nl = NULL; double *__nld = NULL; double *__nw = NULL; double *__nwgap = NULL; double *__nwerr = NULL; double *__ndplus = NULL; double *__nlplus = NULL; double *__nwork = NULL; + __nsigma = (*env)->GetDoubleField(env, sigma, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nl = (*env)->GetPrimitiveArrayCritical(env, l, NULL))) goto fail; + if (!(__nld = (*env)->GetPrimitiveArrayCritical(env, ld, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nwgap = (*env)->GetPrimitiveArrayCritical(env, wgap, NULL))) goto fail; + if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) goto fail; + if (!(__ndplus = (*env)->GetPrimitiveArrayCritical(env, dplus, NULL))) goto fail; + if (!(__nlplus = (*env)->GetPrimitiveArrayCritical(env, lplus, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dlarrf_(&n, __nd + offsetd, __nl + offsetl, __nld + offsetld, &clstrt, &clend, __nw + offsetw, __nwgap + offsetwgap, __nwerr + offsetwerr, &spdiam, &clgapl, &clgapr, &pivmin, &__nsigma, __ndplus + offsetdplus, __nlplus + offsetlplus, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nlplus) (*env)->ReleasePrimitiveArrayCritical(env, lplus, __nlplus, failed ? JNI_ABORT : 0); + if (__ndplus) (*env)->ReleasePrimitiveArrayCritical(env, dplus, __ndplus, failed ? JNI_ABORT : 0); + if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, failed ? JNI_ABORT : 0); + if (__nwgap) (*env)->ReleasePrimitiveArrayCritical(env, wgap, __nwgap, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nld) (*env)->ReleasePrimitiveArrayCritical(env, ld, __nld, failed ? JNI_ABORT : 0); + if (__nl) (*env)->ReleasePrimitiveArrayCritical(env, l, __nl, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, sigma, doubleW_val_fieldID, __nsigma); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlarnv_)(int *idist, int * iseed, int *n, double *x); +static void (*dlarrj_)(int *n, double *d, double *e2, int *ifirst, int *ilast, double *rtol, int *offset, double *w, double *werr, double *work, int *iwork, double *pivmin, double *spdiam, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarnvK(JNIEnv *env, UNUSED jobject obj, - jint idist, jintArray iseed, jint offsetiseed, jint n, jdoubleArray x, jint offsetx) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrjK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray d, jint offsetd, jdoubleArray e2, jint offsete2, jint ifirst, jint ilast, jdouble rtol, jint offset, jdoubleArray w, jint offsetw, jdoubleArray werr, jint offsetwerr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jdouble pivmin, jdouble spdiam, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__nd = NULL; double *__ne2 = NULL; double *__nw = NULL; double *__nwerr = NULL; double *__nwork = NULL; int *__niwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dlarrj_(&n, __nd + offsetd, __ne2 + offsete2, &ifirst, &ilast, &rtol, &offset, __nw + offsetw, __nwerr + offsetwerr, __nwork + offsetwork, __niwork + offsetiwork, &pivmin, &spdiam, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlarra_)(int *n, double *d, double *e, double *e22, double *spltol, double *tnrm, /*FIXME*/void *nsplit, int * isplit, /*FIXME*/void *info); +static void (*dlarrk_)(int *n, int *iw, double *gl, double *gu, double *d, double *e2, double *pivmin, double *reltol, double *w, double *werr, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarraK(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray e2, jint offsete2, jdouble spltol, jdouble tnrm, jobject nsplit, jintArray isplit, jint offsetisplit, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrkK(JNIEnv *env, UNUSED jobject obj, jint n, jint iw, jdouble gl, jdouble gu, jdoubleArray d, jint offsetd, jdoubleArray e2, jint offsete2, jdouble pivmin, jdouble reltol, jobject w, jobject werr, jobject info) { + jboolean failed = FALSE; + double __nw = 0; double __nwerr = 0; int __ninfo = 0; double *__nd = NULL; double *__ne2 = NULL; + __nw = (*env)->GetDoubleField(env, w, doubleW_val_fieldID); + __nwerr = (*env)->GetDoubleField(env, werr, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) goto fail; + dlarrk_(&n, &iw, &gl, &gu, __nd + offsetd, __ne2 + offsete2, &pivmin, &reltol, &__nw, &__nwerr, &__ninfo); +done: + if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, werr, doubleW_val_fieldID, __nwerr); + if (!failed) (*env)->SetDoubleField(env, w, doubleW_val_fieldID, __nw); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlarrb_)(int *n, double *d, double *lld, int *ifirst, int *ilast, double *rtol1, double *rtol2, int *offset, double *w, double *wgap, double *werr, double *work, int * iwork, double *pivmin, double *spdiam, int *twist, /*FIXME*/void *info); +static void (*dlarrr_)(int *n, double *d, double *e, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrbK(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray d, jint offsetd, jdoubleArray lld, jint offsetlld, jint ifirst, jint ilast, jdouble rtol1, jdouble rtol2, jint offset, jdoubleArray w, jint offsetw, jdoubleArray wgap, jint offsetwgap, jdoubleArray werr, jint offsetwerr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jdouble pivmin, jdouble spdiam, jint twist, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrrK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + dlarrr_(&n, __nd + offsetd, __ne + offsete, &__ninfo); +done: + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlarrc_)(char *jobt, int *n, double *vl, double *vu, double *d, double *e, double *pivmin, /*FIXME*/void *eigcnt, /*FIXME*/void *lcnt, /*FIXME*/void *rcnt, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrcK(JNIEnv *env, UNUSED jobject obj, - jstring jobt, jint n, jdouble vl, jdouble vu, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdouble pivmin, jobject eigcnt, jobject lcnt, jobject rcnt, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlarrv_)(int *n, double *vl, double *vu, double *d, double *l, double *pivmin, int *isplit, int *m, int *dol, int *dou, double *minrgp, double *rtol1, double *rtol2, double *w, double *werr, double *wgap, int *iblock, int *indexw, double *gers, double *z, int *ldz, int *isuppz, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrvK(JNIEnv *env, UNUSED jobject obj, jint n, jdouble vl, jdouble vu, jdoubleArray d, jint offsetd, jdoubleArray l, jint offsetl, jdouble pivmin, jintArray isplit, jint offsetisplit, jint m, jint dol, jint dou, jdouble minrgp, jobject rtol1, jobject rtol2, jdoubleArray w, jint offsetw, jdoubleArray werr, jint offsetwerr, jdoubleArray wgap, jint offsetwgap, jintArray iblock, jint offsetiblock, jintArray indexw, jint offsetindexw, jdoubleArray gers, jint offsetgers, jdoubleArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + double __nrtol1 = 0; double __nrtol2 = 0; int __ninfo = 0; double *__nd = NULL; double *__nl = NULL; int *__nisplit = NULL; double *__nw = NULL; double *__nwerr = NULL; double *__nwgap = NULL; int *__niblock = NULL; int *__nindexw = NULL; double *__ngers = NULL; double *__nz = NULL; int *__nisuppz = NULL; double *__nwork = NULL; int *__niwork = NULL; + __nrtol1 = (*env)->GetDoubleField(env, rtol1, doubleW_val_fieldID); + __nrtol2 = (*env)->GetDoubleField(env, rtol2, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nl = (*env)->GetPrimitiveArrayCritical(env, l, NULL))) goto fail; + if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) goto fail; + if (!(__nwgap = (*env)->GetPrimitiveArrayCritical(env, wgap, NULL))) goto fail; + if (!(__niblock = (*env)->GetPrimitiveArrayCritical(env, iblock, NULL))) goto fail; + if (!(__nindexw = (*env)->GetPrimitiveArrayCritical(env, indexw, NULL))) goto fail; + if (!(__ngers = (*env)->GetPrimitiveArrayCritical(env, gers, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dlarrv_(&n, &vl, &vu, __nd + offsetd, __nl + offsetl, &pivmin, __nisplit + offsetisplit, &m, &dol, &dou, &minrgp, &__nrtol1, &__nrtol2, __nw + offsetw, __nwerr + offsetwerr, __nwgap + offsetwgap, __niblock + offsetiblock, __nindexw + offsetindexw, __ngers + offsetgers, __nz + offsetz, &ldz, __nisuppz + offsetisuppz, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__ngers) (*env)->ReleasePrimitiveArrayCritical(env, gers, __ngers, failed ? JNI_ABORT : 0); + if (__nindexw) (*env)->ReleasePrimitiveArrayCritical(env, indexw, __nindexw, failed ? JNI_ABORT : 0); + if (__niblock) (*env)->ReleasePrimitiveArrayCritical(env, iblock, __niblock, failed ? JNI_ABORT : 0); + if (__nwgap) (*env)->ReleasePrimitiveArrayCritical(env, wgap, __nwgap, failed ? JNI_ABORT : 0); + if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, failed ? JNI_ABORT : 0); + if (__nl) (*env)->ReleasePrimitiveArrayCritical(env, l, __nl, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, rtol2, doubleW_val_fieldID, __nrtol2); + if (!failed) (*env)->SetDoubleField(env, rtol1, doubleW_val_fieldID, __nrtol1); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlarrd_)(char *range, char *order, int *n, double *vl, double *vu, int *il, int *iu, double *gers, double *reltol, double *d, double *e, double *e22, double *pivmin, int *nsplit, int * isplit, /*FIXME*/void *m, double *w, double *werr, /*FIXME*/void *wl, /*FIXME*/void *wu, int * iblock, int * indexw, double *work, int * iwork, /*FIXME*/void *info); +static void (*dlartg_)(double *f, double *g, double *cs, double *sn, double *r); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrdK(JNIEnv *env, UNUSED jobject obj, - jstring range, jstring order, jint n, jdouble vl, jdouble vu, jint il, jint iu, jdoubleArray gers, jint offsetgers, jdouble reltol, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray e2, jint offsete2, jdouble pivmin, jint nsplit, jintArray isplit, jint offsetisplit, jobject m, jdoubleArray w, jint offsetw, jdoubleArray werr, jint offsetwerr, jobject wl, jobject wu, jintArray iblock, jint offsetiblock, jintArray indexw, jint offsetindexw, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlartgK(JNIEnv *env, UNUSED jobject obj, jdouble f, jdouble g, jobject cs, jobject sn, jobject r) { + jboolean failed = FALSE; + double __ncs = 0; double __nsn = 0; double __nr = 0; + __ncs = (*env)->GetDoubleField(env, cs, doubleW_val_fieldID); + __nsn = (*env)->GetDoubleField(env, sn, doubleW_val_fieldID); + __nr = (*env)->GetDoubleField(env, r, doubleW_val_fieldID); + dlartg_(&f, &g, &__ncs, &__nsn, &__nr); +done: + if (!failed) (*env)->SetDoubleField(env, r, doubleW_val_fieldID, __nr); + if (!failed) (*env)->SetDoubleField(env, sn, doubleW_val_fieldID, __nsn); + if (!failed) (*env)->SetDoubleField(env, cs, doubleW_val_fieldID, __ncs); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlarre_)(char *range, int *n, /*FIXME*/void *vl, /*FIXME*/void *vu, int *il, int *iu, double *d, double *e, double *e22, double *rtol1, double *rtol2, double *spltol, /*FIXME*/void *nsplit, int * isplit, /*FIXME*/void *m, double *w, double *werr, double *wgap, int * iblock, int * indexw, double *gers, /*FIXME*/void *pivmin, double *work, int * iwork, /*FIXME*/void *info); +static void (*dlartv_)(int *n, double *x, int *incx, double *y, int *incy, double *c, double *s, int *incc); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarreK(JNIEnv *env, UNUSED jobject obj, - jstring range, jint n, jobject vl, jobject vu, jint il, jint iu, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray e2, jint offsete2, jdouble rtol1, jdouble rtol2, jdouble spltol, jobject nsplit, jintArray isplit, jint offsetisplit, jobject m, jdoubleArray w, jint offsetw, jdoubleArray werr, jint offsetwerr, jdoubleArray wgap, jint offsetwgap, jintArray iblock, jint offsetiblock, jintArray indexw, jint offsetindexw, jdoubleArray gers, jint offsetgers, jobject pivmin, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlartvK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy, jdoubleArray c, jint offsetc, jdoubleArray s, jint offsets, jint incc) { + jboolean failed = FALSE; + double *__nx = NULL; double *__ny = NULL; double *__nc = NULL; double *__ns = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + dlartv_(&n, __nx + offsetx, &incx, __ny + offsety, &incy, __nc + offsetc, __ns + offsets, &incc); +done: + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlarrf_)(int *n, double *d, double *l, double *ld, int *clstrt, int *clend, double *w, double *wgap, double *werr, double *spdiam, double *clgapl, double *clgapr, double *pivmin, /*FIXME*/void *sigma, double *dplus, double *lplus, double *work, /*FIXME*/void *info); +static void (*dlaruv_)(int *iseed, int *n, double *x); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrfK(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray d, jint offsetd, jdoubleArray l, jint offsetl, jdoubleArray ld, jint offsetld, jint clstrt, jint clend, jdoubleArray w, jint offsetw, jdoubleArray wgap, jint offsetwgap, jdoubleArray werr, jint offsetwerr, jdouble spdiam, jdouble clgapl, jdouble clgapr, jdouble pivmin, jobject sigma, jdoubleArray dplus, jint offsetdplus, jdoubleArray lplus, jint offsetlplus, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaruvK(JNIEnv *env, UNUSED jobject obj, jintArray iseed, jint offsetiseed, jint n, jdoubleArray x, jint offsetx) { + jboolean failed = FALSE; + int *__niseed = NULL; double *__nx = NULL; + if (!(__niseed = (*env)->GetPrimitiveArrayCritical(env, iseed, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + dlaruv_(__niseed + offsetiseed, &n, __nx + offsetx); +done: + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__niseed) (*env)->ReleasePrimitiveArrayCritical(env, iseed, __niseed, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlarrj_)(int *n, double *d, double *e22, int *ifirst, int *ilast, double *rtol, int *offset, double *w, double *werr, double *work, int * iwork, double *pivmin, double *spdiam, int *info); +static void (*dlarz_)(const char *side, int *m, int *n, int *l, double *v, int *incv, double *tau, double *c, int *Ldc, double *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrjK(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray d, jint offsetd, jdoubleArray e2, jint offsete2, jint ifirst, jint ilast, jdouble rtol, jint offset, jdoubleArray w, jint offsetw, jdoubleArray werr, jint offsetwerr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jdouble pivmin, jdouble spdiam, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarzK(JNIEnv *env, UNUSED jobject obj, jstring side, jint m, jint n, jint l, jdoubleArray v, jint offsetv, jint incv, jdouble tau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork) { + jboolean failed = FALSE; + const char *__nside = NULL; double *__nv = NULL; double *__nc = NULL; double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dlarz_(__nside, &m, &n, &l, __nv + offsetv, &incv, &tau, __nc + offsetc, &Ldc, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlarrk_)(int *n, int *iw, double *gl, double *gu, double *d, double *e22, double *pivmin, double *reltol, /*FIXME*/void *w, /*FIXME*/void *werr, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrkK(JNIEnv *env, UNUSED jobject obj, - jint n, jint iw, jdouble gl, jdouble gu, jdoubleArray d, jint offsetd, jdoubleArray e2, jint offsete2, jdouble pivmin, jdouble reltol, jobject w, jobject werr, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlarzb_)(const char *side, const char *trans, const char *direct, const char *storev, int *m, int *n, int *k, int *l, double *v, int *ldv, double *t, int *ldt, double *c, int *Ldc, double *work, int *ldwork); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarzbK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jstring direct, jstring storev, jint m, jint n, jint k, jint l, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray t, jint offsett, jint ldt, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint ldwork) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__ntrans = NULL; const char *__ndirect = NULL; const char *__nstorev = NULL; double *__nv = NULL; double *__nt = NULL; double *__nc = NULL; double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndirect = (*env)->GetStringUTFChars(env, direct, NULL))) goto fail; + if (!(__nstorev = (*env)->GetStringUTFChars(env, storev, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dlarzb_(__nside, __ntrans, __ndirect, __nstorev, &m, &n, &k, &l, __nv + offsetv, &ldv, __nt + offsett, &ldt, __nc + offsetc, &Ldc, __nwork + offsetwork, &ldwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nstorev) (*env)->ReleaseStringUTFChars(env, storev, __nstorev); + if (__ndirect) (*env)->ReleaseStringUTFChars(env, direct, __ndirect); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlarrr_)(int *n, double *d, double *e, /*FIXME*/void *info); +static void (*dlarzt_)(const char *direct, const char *storev, int *n, int *k, double *v, int *ldv, double *tau, double *t, int *ldt); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrrK(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarztK(JNIEnv *env, UNUSED jobject obj, jstring direct, jstring storev, jint n, jint k, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray tau, jint offsettau, jdoubleArray t, jint offsett, jint ldt) { + jboolean failed = FALSE; + const char *__ndirect = NULL; const char *__nstorev = NULL; double *__nv = NULL; double *__ntau = NULL; double *__nt = NULL; + if (!(__ndirect = (*env)->GetStringUTFChars(env, direct, NULL))) goto fail; + if (!(__nstorev = (*env)->GetStringUTFChars(env, storev, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + dlarzt_(__ndirect, __nstorev, &n, &k, __nv + offsetv, &ldv, __ntau + offsettau, __nt + offsett, &ldt); +done: + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nstorev) (*env)->ReleaseStringUTFChars(env, storev, __nstorev); + if (__ndirect) (*env)->ReleaseStringUTFChars(env, direct, __ndirect); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlarrv_)(int *n, double *vl, double *vu, double *d, double *l, double *pivmin, int * isplit, int *m, int *dol, int *dou, double *minrgp, /*FIXME*/void *rtol1, /*FIXME*/void *rtol2, double *w, double *werr, double *wgap, int * iblock, int * indexw, double *gers, double *z, int *ldz, int * isuppz, double *work, int * iwork, /*FIXME*/void *info); +static void (*dlas2_)(double *f, double *g, double *h, double *ssmin, double *ssmax); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrvK(JNIEnv *env, UNUSED jobject obj, - jint n, jdouble vl, jdouble vu, jdoubleArray d, jint offsetd, jdoubleArray l, jint offsetl, jdouble pivmin, jintArray isplit, jint offsetisplit, jint m, jint dol, jint dou, jdouble minrgp, jobject rtol1, jobject rtol2, jdoubleArray w, jint offsetw, jdoubleArray werr, jint offsetwerr, jdoubleArray wgap, jint offsetwgap, jintArray iblock, jint offsetiblock, jintArray indexw, jint offsetindexw, jdoubleArray gers, jint offsetgers, jdoubleArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlas2K(JNIEnv *env, UNUSED jobject obj, jdouble f, jdouble g, jdouble h, jobject ssmin, jobject ssmax) { + jboolean failed = FALSE; + double __nssmin = 0; double __nssmax = 0; + __nssmin = (*env)->GetDoubleField(env, ssmin, doubleW_val_fieldID); + __nssmax = (*env)->GetDoubleField(env, ssmax, doubleW_val_fieldID); + dlas2_(&f, &g, &h, &__nssmin, &__nssmax); +done: + if (!failed) (*env)->SetDoubleField(env, ssmax, doubleW_val_fieldID, __nssmax); + if (!failed) (*env)->SetDoubleField(env, ssmin, doubleW_val_fieldID, __nssmin); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlartg_)(double *f, double *g, /*FIXME*/void *cs, /*FIXME*/void *sn, /*FIXME*/void *r); +static void (*dlascl_)(const char *type, int *kl, int *ku, double *cfrom, double *cto, int *m, int *n, double *a, int *lda, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlartgK(JNIEnv *env, UNUSED jobject obj, - jdouble f, jdouble g, jobject cs, jobject sn, jobject r) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasclK(JNIEnv *env, UNUSED jobject obj, jstring type, jint kl, jint ku, jdouble cfrom, jdouble cto, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { + jboolean failed = FALSE; + const char *__ntype = NULL; int __ninfo = 0; double *__na = NULL; + if (!(__ntype = (*env)->GetStringUTFChars(env, type, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + dlascl_(__ntype, &kl, &ku, &cfrom, &cto, &m, &n, __na + offseta, &lda, &__ninfo); +done: + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntype) (*env)->ReleaseStringUTFChars(env, type, __ntype); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlartv_)(int *n, double *x, int *incx, double *y, int *incy, double *c, double *s, int *incc); +static void (*dlasd0_)(int *n, int *sqre, double *d, double *e, double *u, int *ldu, double *vt, int *ldvt, int *smlsiz, int *iwork, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlartvK(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy, jdoubleArray c, jint offsetc, jdoubleArray s, jint offsets, jint incc) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd0K(JNIEnv *env, UNUSED jobject obj, jint n, jint sqre, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jint ldvt, jint smlsiz, jintArray iwork, jint offsetiwork, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nu = NULL; double *__nvt = NULL; int *__niwork = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dlasd0_(&n, &sqre, __nd + offsetd, __ne + offsete, __nu + offsetu, &ldu, __nvt + offsetvt, &ldvt, &smlsiz, __niwork + offsetiwork, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaruv_)(int * iseed, int *n, double *x); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaruvK(JNIEnv *env, UNUSED jobject obj, - jintArray iseed, jint offsetiseed, jint n, jdoubleArray x, jint offsetx) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlasd1_)(int *nl, int *nr, int *sqre, double *d, double *alpha, double *beta, double *u, int *ldu, double *vt, int *ldvt, int *idxq, int *iwork, double *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd1K(JNIEnv *env, UNUSED jobject obj, jint nl, jint nr, jint sqre, jdoubleArray d, jint offsetd, jobject alpha, jobject beta, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jint ldvt, jintArray idxq, jint offsetidxq, jintArray iwork, jint offsetiwork, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + double __nalpha = 0; double __nbeta = 0; int __ninfo = 0; double *__nd = NULL; double *__nu = NULL; double *__nvt = NULL; int *__nidxq = NULL; int *__niwork = NULL; double *__nwork = NULL; + __nalpha = (*env)->GetDoubleField(env, alpha, doubleW_val_fieldID); + __nbeta = (*env)->GetDoubleField(env, beta, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; + if (!(__nidxq = (*env)->GetPrimitiveArrayCritical(env, idxq, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dlasd1_(&nl, &nr, &sqre, __nd + offsetd, &__nalpha, &__nbeta, __nu + offsetu, &ldu, __nvt + offsetvt, &ldvt, __nidxq + offsetidxq, __niwork + offsetiwork, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nidxq) (*env)->ReleasePrimitiveArrayCritical(env, idxq, __nidxq, failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, beta, doubleW_val_fieldID, __nbeta); + if (!failed) (*env)->SetDoubleField(env, alpha, doubleW_val_fieldID, __nalpha); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlarz_)(char *side, int *m, int *n, int *l, double *v, int *incv, double *tau, double *c, int *Ldc, double *work); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarzK(JNIEnv *env, UNUSED jobject obj, - jstring side, jint m, jint n, jint l, jdoubleArray v, jint offsetv, jint incv, jdouble tau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlasd2_)(int *nl, int *nr, int *sqre, int *k, double *d, double *z, double *alpha, double *beta, double *u, int *ldu, double *vt, int *ldvt, double *dsigma, double *u2, int *ldu2, double *vt2, int *ldvt2, int *idxp, int *idx, int *idxc, int *idxq, int *coltyp, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd2K(JNIEnv *env, UNUSED jobject obj, jint nl, jint nr, jint sqre, jobject k, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdouble alpha, jdouble beta, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jint ldvt, jdoubleArray dsigma, jint offsetdsigma, jdoubleArray u2, jint offsetu2, jint ldu2, jdoubleArray vt2, jint offsetvt2, jint ldvt2, jintArray idxp, jint offsetidxp, jintArray idx, jint offsetidx, jintArray idxc, jint offsetidxc, jintArray idxq, jint offsetidxq, jintArray coltyp, jint offsetcoltyp, jobject info) { + jboolean failed = FALSE; + int __nk = 0; int __ninfo = 0; double *__nd = NULL; double *__nz = NULL; double *__nu = NULL; double *__nvt = NULL; double *__ndsigma = NULL; double *__nu2 = NULL; double *__nvt2 = NULL; int *__nidxp = NULL; int *__nidx = NULL; int *__nidxc = NULL; int *__nidxq = NULL; int *__ncoltyp = NULL; + __nk = (*env)->GetIntField(env, k, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; + if (!(__ndsigma = (*env)->GetPrimitiveArrayCritical(env, dsigma, NULL))) goto fail; + if (!(__nu2 = (*env)->GetPrimitiveArrayCritical(env, u2, NULL))) goto fail; + if (!(__nvt2 = (*env)->GetPrimitiveArrayCritical(env, vt2, NULL))) goto fail; + if (!(__nidxp = (*env)->GetPrimitiveArrayCritical(env, idxp, NULL))) goto fail; + if (!(__nidx = (*env)->GetPrimitiveArrayCritical(env, idx, NULL))) goto fail; + if (!(__nidxc = (*env)->GetPrimitiveArrayCritical(env, idxc, NULL))) goto fail; + if (!(__nidxq = (*env)->GetPrimitiveArrayCritical(env, idxq, NULL))) goto fail; + if (!(__ncoltyp = (*env)->GetPrimitiveArrayCritical(env, coltyp, NULL))) goto fail; + dlasd2_(&nl, &nr, &sqre, &__nk, __nd + offsetd, __nz + offsetz, &alpha, &beta, __nu + offsetu, &ldu, __nvt + offsetvt, &ldvt, __ndsigma + offsetdsigma, __nu2 + offsetu2, &ldu2, __nvt2 + offsetvt2, &ldvt2, __nidxp + offsetidxp, __nidx + offsetidx, __nidxc + offsetidxc, __nidxq + offsetidxq, __ncoltyp + offsetcoltyp, &__ninfo); +done: + if (__ncoltyp) (*env)->ReleasePrimitiveArrayCritical(env, coltyp, __ncoltyp, failed ? JNI_ABORT : 0); + if (__nidxq) (*env)->ReleasePrimitiveArrayCritical(env, idxq, __nidxq, failed ? JNI_ABORT : 0); + if (__nidxc) (*env)->ReleasePrimitiveArrayCritical(env, idxc, __nidxc, failed ? JNI_ABORT : 0); + if (__nidx) (*env)->ReleasePrimitiveArrayCritical(env, idx, __nidx, failed ? JNI_ABORT : 0); + if (__nidxp) (*env)->ReleasePrimitiveArrayCritical(env, idxp, __nidxp, failed ? JNI_ABORT : 0); + if (__nvt2) (*env)->ReleasePrimitiveArrayCritical(env, vt2, __nvt2, failed ? JNI_ABORT : 0); + if (__nu2) (*env)->ReleasePrimitiveArrayCritical(env, u2, __nu2, failed ? JNI_ABORT : 0); + if (__ndsigma) (*env)->ReleasePrimitiveArrayCritical(env, dsigma, __ndsigma, failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlarzb_)(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, int *l, double *v, int *ldv, double *t, int *ldt, double *c, int *Ldc, double *work, int *ldwork); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarzbK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring trans, jstring direct, jstring storev, jint m, jint n, jint k, jint l, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray t, jint offsett, jint ldt, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint ldwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlasd3_)(int *nl, int *nr, int *sqre, int *k, double *d, double *q, int *ldq, double *dsigma, double *u, int *ldu, double *u2, int *ldu2, double *vt, int *ldvt, double *vt2, int *ldvt2, int *idxc, int *ctot, double *z, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd3K(JNIEnv *env, UNUSED jobject obj, jint nl, jint nr, jint sqre, jint k, jdoubleArray d, jint offsetd, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray dsigma, jint offsetdsigma, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray u2, jint offsetu2, jint ldu2, jdoubleArray vt, jint offsetvt, jint ldvt, jdoubleArray vt2, jint offsetvt2, jint ldvt2, jintArray idxc, jint offsetidxc, jintArray ctot, jint offsetctot, jdoubleArray z, jint offsetz, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__nd = NULL; double *__nq = NULL; double *__ndsigma = NULL; double *__nu = NULL; double *__nu2 = NULL; double *__nvt = NULL; double *__nvt2 = NULL; int *__nidxc = NULL; int *__nctot = NULL; double *__nz = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__ndsigma = (*env)->GetPrimitiveArrayCritical(env, dsigma, NULL))) goto fail; + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; + if (!(__nu2 = (*env)->GetPrimitiveArrayCritical(env, u2, NULL))) goto fail; + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; + if (!(__nvt2 = (*env)->GetPrimitiveArrayCritical(env, vt2, NULL))) goto fail; + if (!(__nidxc = (*env)->GetPrimitiveArrayCritical(env, idxc, NULL))) goto fail; + if (!(__nctot = (*env)->GetPrimitiveArrayCritical(env, ctot, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + dlasd3_(&nl, &nr, &sqre, &k, __nd + offsetd, __nq + offsetq, &ldq, __ndsigma + offsetdsigma, __nu + offsetu, &ldu, __nu2 + offsetu2, &ldu2, __nvt + offsetvt, &ldvt, __nvt2 + offsetvt2, &ldvt2, __nidxc + offsetidxc, __nctot + offsetctot, __nz + offsetz, &__ninfo); +done: + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nctot) (*env)->ReleasePrimitiveArrayCritical(env, ctot, __nctot, failed ? JNI_ABORT : 0); + if (__nidxc) (*env)->ReleasePrimitiveArrayCritical(env, idxc, __nidxc, failed ? JNI_ABORT : 0); + if (__nvt2) (*env)->ReleasePrimitiveArrayCritical(env, vt2, __nvt2, failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); + if (__nu2) (*env)->ReleasePrimitiveArrayCritical(env, u2, __nu2, failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); + if (__ndsigma) (*env)->ReleasePrimitiveArrayCritical(env, dsigma, __ndsigma, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlarzt_)(char *direct, char *storev, int *n, int *k, double *v, int *ldv, double *tau, double *t, int *ldt); +static void (*dlasd4_)(int *n, int *i, double *d, double *z, double *delta, double *rho, double *sigma, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarztK(JNIEnv *env, UNUSED jobject obj, - jstring direct, jstring storev, jint n, jint k, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray tau, jint offsettau, jdoubleArray t, jint offsett, jint ldt) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd4K(JNIEnv *env, UNUSED jobject obj, jint n, jint i, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdoubleArray delta, jint offsetdelta, jdouble rho, jobject sigma, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + double __nsigma = 0; int __ninfo = 0; double *__nd = NULL; double *__nz = NULL; double *__ndelta = NULL; double *__nwork = NULL; + __nsigma = (*env)->GetDoubleField(env, sigma, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__ndelta = (*env)->GetPrimitiveArrayCritical(env, delta, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dlasd4_(&n, &i, __nd + offsetd, __nz + offsetz, __ndelta + offsetdelta, &rho, &__nsigma, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ndelta) (*env)->ReleasePrimitiveArrayCritical(env, delta, __ndelta, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, sigma, doubleW_val_fieldID, __nsigma); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlas2_)(double *f, double *g, double *h, /*FIXME*/void *ssmin, /*FIXME*/void *ssmax); +static void (*dlasd5_)(int *i, double *d, double *z, double *delta, double *rho, double *dsigma, double *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlas2K(JNIEnv *env, UNUSED jobject obj, - jdouble f, jdouble g, jdouble h, jobject ssmin, jobject ssmax) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd5K(JNIEnv *env, UNUSED jobject obj, jint i, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdoubleArray delta, jint offsetdelta, jdouble rho, jobject dsigma, jdoubleArray work, jint offsetwork) { + jboolean failed = FALSE; + double __ndsigma = 0; double *__nd = NULL; double *__nz = NULL; double *__ndelta = NULL; double *__nwork = NULL; + __ndsigma = (*env)->GetDoubleField(env, dsigma, doubleW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__ndelta = (*env)->GetPrimitiveArrayCritical(env, delta, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dlasd5_(&i, __nd + offsetd, __nz + offsetz, __ndelta + offsetdelta, &rho, &__ndsigma, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ndelta) (*env)->ReleasePrimitiveArrayCritical(env, delta, __ndelta, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetDoubleField(env, dsigma, doubleW_val_fieldID, __ndsigma); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlascl_)(char *type, int *kl, int *ku, double *cfrom, double *cto, int *m, int *n, double *a, int *lda, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasclK(JNIEnv *env, UNUSED jobject obj, - jstring type, jint kl, jint ku, jdouble cfrom, jdouble cto, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlasd6_)(int *icompq, int *nl, int *nr, int *sqre, double *d, double *vf, double *vl, double *alpha, double *beta, int *idxq, int *perm, int *givptr, int *givcol, int *ldgcol, double *givnum, int *ldgnum, double *poles, double *difl, double *difr, double *z, int *k, double *c, double *s, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd6K(JNIEnv *env, UNUSED jobject obj, jint icompq, jint nl, jint nr, jint sqre, jdoubleArray d, jint offsetd, jdoubleArray vf, jint offsetvf, jdoubleArray vl, jint offsetvl, jobject alpha, jobject beta, jintArray idxq, jint offsetidxq, jintArray perm, jint offsetperm, jobject givptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jdoubleArray givnum, jint offsetgivnum, jint ldgnum, jdoubleArray poles, jint offsetpoles, jdoubleArray difl, jint offsetdifl, jdoubleArray difr, jint offsetdifr, jdoubleArray z, jint offsetz, jobject k, jobject c, jobject s, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + double __nalpha = 0; double __nbeta = 0; int __ngivptr = 0; int __nk = 0; double __nc = 0; double __ns = 0; int __ninfo = 0; double *__nd = NULL; double *__nvf = NULL; double *__nvl = NULL; int *__nidxq = NULL; int *__nperm = NULL; int *__ngivcol = NULL; double *__ngivnum = NULL; double *__npoles = NULL; double *__ndifl = NULL; double *__ndifr = NULL; double *__nz = NULL; double *__nwork = NULL; int *__niwork = NULL; + __nalpha = (*env)->GetDoubleField(env, alpha, doubleW_val_fieldID); + __nbeta = (*env)->GetDoubleField(env, beta, doubleW_val_fieldID); + __ngivptr = (*env)->GetIntField(env, givptr, intW_val_fieldID); + __nk = (*env)->GetIntField(env, k, intW_val_fieldID); + __nc = (*env)->GetDoubleField(env, c, doubleW_val_fieldID); + __ns = (*env)->GetDoubleField(env, s, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nvf = (*env)->GetPrimitiveArrayCritical(env, vf, NULL))) goto fail; + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; + if (!(__nidxq = (*env)->GetPrimitiveArrayCritical(env, idxq, NULL))) goto fail; + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; + if (!(__npoles = (*env)->GetPrimitiveArrayCritical(env, poles, NULL))) goto fail; + if (!(__ndifl = (*env)->GetPrimitiveArrayCritical(env, difl, NULL))) goto fail; + if (!(__ndifr = (*env)->GetPrimitiveArrayCritical(env, difr, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dlasd6_(&icompq, &nl, &nr, &sqre, __nd + offsetd, __nvf + offsetvf, __nvl + offsetvl, &__nalpha, &__nbeta, __nidxq + offsetidxq, __nperm + offsetperm, &__ngivptr, __ngivcol + offsetgivcol, &ldgcol, __ngivnum + offsetgivnum, &ldgnum, __npoles + offsetpoles, __ndifl + offsetdifl, __ndifr + offsetdifr, __nz + offsetz, &__nk, &__nc, &__ns, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__ndifr) (*env)->ReleasePrimitiveArrayCritical(env, difr, __ndifr, failed ? JNI_ABORT : 0); + if (__ndifl) (*env)->ReleasePrimitiveArrayCritical(env, difl, __ndifl, failed ? JNI_ABORT : 0); + if (__npoles) (*env)->ReleasePrimitiveArrayCritical(env, poles, __npoles, failed ? JNI_ABORT : 0); + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); + if (__nidxq) (*env)->ReleasePrimitiveArrayCritical(env, idxq, __nidxq, failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); + if (__nvf) (*env)->ReleasePrimitiveArrayCritical(env, vf, __nvf, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, s, doubleW_val_fieldID, __ns); + if (!failed) (*env)->SetDoubleField(env, c, doubleW_val_fieldID, __nc); + if (!failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); + if (!failed) (*env)->SetIntField(env, givptr, intW_val_fieldID, __ngivptr); + if (!failed) (*env)->SetDoubleField(env, beta, doubleW_val_fieldID, __nbeta); + if (!failed) (*env)->SetDoubleField(env, alpha, doubleW_val_fieldID, __nalpha); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlasd0_)(int *n, int *sqre, double *d, double *e, double *u, int *ldu, double *vt, int *ldvt, int *smlsiz, int * iwork, double *work, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd0K(JNIEnv *env, UNUSED jobject obj, - jint n, jint sqre, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jint ldvt, jint smlsiz, jintArray iwork, jint offsetiwork, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlasd7_)(int *icompq, int *nl, int *nr, int *sqre, int *k, double *d, double *z, double *zw, double *vf, double *vfw, double *vl, double *vlw, double *alpha, double *beta, double *dsigma, int *idx, int *idxp, int *idxq, int *perm, int *givptr, int *givcol, int *ldgcol, double *givnum, int *ldgnum, double *c, double *s, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd7K(JNIEnv *env, UNUSED jobject obj, jint icompq, jint nl, jint nr, jint sqre, jobject k, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdoubleArray zw, jint offsetzw, jdoubleArray vf, jint offsetvf, jdoubleArray vfw, jint offsetvfw, jdoubleArray vl, jint offsetvl, jdoubleArray vlw, jint offsetvlw, jdouble alpha, jdouble beta, jdoubleArray dsigma, jint offsetdsigma, jintArray idx, jint offsetidx, jintArray idxp, jint offsetidxp, jintArray idxq, jint offsetidxq, jintArray perm, jint offsetperm, jobject givptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jdoubleArray givnum, jint offsetgivnum, jint ldgnum, jobject c, jobject s, jobject info) { + jboolean failed = FALSE; + int __nk = 0; int __ngivptr = 0; double __nc = 0; double __ns = 0; int __ninfo = 0; double *__nd = NULL; double *__nz = NULL; double *__nzw = NULL; double *__nvf = NULL; double *__nvfw = NULL; double *__nvl = NULL; double *__nvlw = NULL; double *__ndsigma = NULL; int *__nidx = NULL; int *__nidxp = NULL; int *__nidxq = NULL; int *__nperm = NULL; int *__ngivcol = NULL; double *__ngivnum = NULL; + __nk = (*env)->GetIntField(env, k, intW_val_fieldID); + __ngivptr = (*env)->GetIntField(env, givptr, intW_val_fieldID); + __nc = (*env)->GetDoubleField(env, c, doubleW_val_fieldID); + __ns = (*env)->GetDoubleField(env, s, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nzw = (*env)->GetPrimitiveArrayCritical(env, zw, NULL))) goto fail; + if (!(__nvf = (*env)->GetPrimitiveArrayCritical(env, vf, NULL))) goto fail; + if (!(__nvfw = (*env)->GetPrimitiveArrayCritical(env, vfw, NULL))) goto fail; + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; + if (!(__nvlw = (*env)->GetPrimitiveArrayCritical(env, vlw, NULL))) goto fail; + if (!(__ndsigma = (*env)->GetPrimitiveArrayCritical(env, dsigma, NULL))) goto fail; + if (!(__nidx = (*env)->GetPrimitiveArrayCritical(env, idx, NULL))) goto fail; + if (!(__nidxp = (*env)->GetPrimitiveArrayCritical(env, idxp, NULL))) goto fail; + if (!(__nidxq = (*env)->GetPrimitiveArrayCritical(env, idxq, NULL))) goto fail; + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; + dlasd7_(&icompq, &nl, &nr, &sqre, &__nk, __nd + offsetd, __nz + offsetz, __nzw + offsetzw, __nvf + offsetvf, __nvfw + offsetvfw, __nvl + offsetvl, __nvlw + offsetvlw, &alpha, &beta, __ndsigma + offsetdsigma, __nidx + offsetidx, __nidxp + offsetidxp, __nidxq + offsetidxq, __nperm + offsetperm, &__ngivptr, __ngivcol + offsetgivcol, &ldgcol, __ngivnum + offsetgivnum, &ldgnum, &__nc, &__ns, &__ninfo); +done: + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); + if (__nidxq) (*env)->ReleasePrimitiveArrayCritical(env, idxq, __nidxq, failed ? JNI_ABORT : 0); + if (__nidxp) (*env)->ReleasePrimitiveArrayCritical(env, idxp, __nidxp, failed ? JNI_ABORT : 0); + if (__nidx) (*env)->ReleasePrimitiveArrayCritical(env, idx, __nidx, failed ? JNI_ABORT : 0); + if (__ndsigma) (*env)->ReleasePrimitiveArrayCritical(env, dsigma, __ndsigma, failed ? JNI_ABORT : 0); + if (__nvlw) (*env)->ReleasePrimitiveArrayCritical(env, vlw, __nvlw, failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); + if (__nvfw) (*env)->ReleasePrimitiveArrayCritical(env, vfw, __nvfw, failed ? JNI_ABORT : 0); + if (__nvf) (*env)->ReleasePrimitiveArrayCritical(env, vf, __nvf, failed ? JNI_ABORT : 0); + if (__nzw) (*env)->ReleasePrimitiveArrayCritical(env, zw, __nzw, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, s, doubleW_val_fieldID, __ns); + if (!failed) (*env)->SetDoubleField(env, c, doubleW_val_fieldID, __nc); + if (!failed) (*env)->SetIntField(env, givptr, intW_val_fieldID, __ngivptr); + if (!failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlasd1_)(int *nl, int *nr, int *sqre, double *d, /*FIXME*/void *alpha, /*FIXME*/void *beta, double *u, int *ldu, double *vt, int *ldvt, int * idxq, int * iwork, double *work, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd1K(JNIEnv *env, UNUSED jobject obj, - jint nl, jint nr, jint sqre, jdoubleArray d, jint offsetd, jobject alpha, jobject beta, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jint ldvt, jintArray idxq, jint offsetidxq, jintArray iwork, jint offsetiwork, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlasd8_)(int *icompq, int *k, double *d, double *z, double *vf, double *vl, double *difl, double *difr, int *lddifr, double *dsigma, double *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd8K(JNIEnv *env, UNUSED jobject obj, jint icompq, jint k, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdoubleArray vf, jint offsetvf, jdoubleArray vl, jint offsetvl, jdoubleArray difl, jint offsetdifl, jdoubleArray difr, jint offsetdifr, jint lddifr, jdoubleArray dsigma, jint offsetdsigma, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__nd = NULL; double *__nz = NULL; double *__nvf = NULL; double *__nvl = NULL; double *__ndifl = NULL; double *__ndifr = NULL; double *__ndsigma = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nvf = (*env)->GetPrimitiveArrayCritical(env, vf, NULL))) goto fail; + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; + if (!(__ndifl = (*env)->GetPrimitiveArrayCritical(env, difl, NULL))) goto fail; + if (!(__ndifr = (*env)->GetPrimitiveArrayCritical(env, difr, NULL))) goto fail; + if (!(__ndsigma = (*env)->GetPrimitiveArrayCritical(env, dsigma, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dlasd8_(&icompq, &k, __nd + offsetd, __nz + offsetz, __nvf + offsetvf, __nvl + offsetvl, __ndifl + offsetdifl, __ndifr + offsetdifr, &lddifr, __ndsigma + offsetdsigma, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ndsigma) (*env)->ReleasePrimitiveArrayCritical(env, dsigma, __ndsigma, failed ? JNI_ABORT : 0); + if (__ndifr) (*env)->ReleasePrimitiveArrayCritical(env, difr, __ndifr, failed ? JNI_ABORT : 0); + if (__ndifl) (*env)->ReleasePrimitiveArrayCritical(env, difl, __ndifl, failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); + if (__nvf) (*env)->ReleasePrimitiveArrayCritical(env, vf, __nvf, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlasd2_)(int *nl, int *nr, int *sqre, /*FIXME*/void *k, double *d, double *z, double *alpha, double *beta, double *u, int *ldu, double *vt, int *ldvt, double *dsigma, double *u22, int *ldu2, double *vt22, int *ldvt2, int * idxp, int * idx, int * idxc, int * idxq, int * coltyp, /*FIXME*/void *info); +static void (*dlasda_)(int *icompq, int *smlsiz, int *n, int *sqre, double *d, double *e, double *u, int *ldu, double *vt, int *k, double *difl, double *difr, double *z, double *poles, int *givptr, int *givcol, int *ldgcol, int *perm, double *givnum, double *c, double *s, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasdaK(JNIEnv *env, UNUSED jobject obj, jint icompq, jint smlsiz, jint n, jint sqre, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jintArray k, jint offsetk, jdoubleArray difl, jint offsetdifl, jdoubleArray difr, jint offsetdifr, jdoubleArray z, jint offsetz, jdoubleArray poles, jint offsetpoles, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jintArray perm, jint offsetperm, jdoubleArray givnum, jint offsetgivnum, jdoubleArray c, jint offsetc, jdoubleArray s, jint offsets, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nu = NULL; double *__nvt = NULL; int *__nk = NULL; double *__ndifl = NULL; double *__ndifr = NULL; double *__nz = NULL; double *__npoles = NULL; int *__ngivptr = NULL; int *__ngivcol = NULL; int *__nperm = NULL; double *__ngivnum = NULL; double *__nc = NULL; double *__ns = NULL; double *__nwork = NULL; int *__niwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; + if (!(__nk = (*env)->GetPrimitiveArrayCritical(env, k, NULL))) goto fail; + if (!(__ndifl = (*env)->GetPrimitiveArrayCritical(env, difl, NULL))) goto fail; + if (!(__ndifr = (*env)->GetPrimitiveArrayCritical(env, difr, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__npoles = (*env)->GetPrimitiveArrayCritical(env, poles, NULL))) goto fail; + if (!(__ngivptr = (*env)->GetPrimitiveArrayCritical(env, givptr, NULL))) goto fail; + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dlasda_(&icompq, &smlsiz, &n, &sqre, __nd + offsetd, __ne + offsete, __nu + offsetu, &ldu, __nvt + offsetvt, __nk + offsetk, __ndifl + offsetdifl, __ndifr + offsetdifr, __nz + offsetz, __npoles + offsetpoles, __ngivptr + offsetgivptr, __ngivcol + offsetgivcol, &ldgcol, __nperm + offsetperm, __ngivnum + offsetgivnum, __nc + offsetc, __ns + offsets, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); + if (__ngivptr) (*env)->ReleasePrimitiveArrayCritical(env, givptr, __ngivptr, failed ? JNI_ABORT : 0); + if (__npoles) (*env)->ReleasePrimitiveArrayCritical(env, poles, __npoles, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__ndifr) (*env)->ReleasePrimitiveArrayCritical(env, difr, __ndifr, failed ? JNI_ABORT : 0); + if (__ndifl) (*env)->ReleasePrimitiveArrayCritical(env, difl, __ndifl, failed ? JNI_ABORT : 0); + if (__nk) (*env)->ReleasePrimitiveArrayCritical(env, k, __nk, failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; +} -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd2K(JNIEnv *env, UNUSED jobject obj, - jint nl, jint nr, jint sqre, jobject k, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdouble alpha, jdouble beta, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jint ldvt, jdoubleArray dsigma, jint offsetdsigma, jdoubleArray u2, jint offsetu2, jint ldu2, jdoubleArray vt2, jint offsetvt2, jint ldvt2, jintArray idxp, jint offsetidxp, jintArray idx, jint offsetidx, jintArray idxc, jint offsetidxc, jintArray idxq, jint offsetidxq, jintArray coltyp, jint offsetcoltyp, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlasdq_)(const char *uplo, int *sqre, int *n, int *ncvt, int *nru, int *ncc, double *d, double *e, double *vt, int *ldvt, double *u, int *ldu, double *c, int *Ldc, double *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasdqK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint sqre, jint n, jint ncvt, jint nru, jint ncc, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray vt, jint offsetvt, jint ldvt, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nvt = NULL; double *__nu = NULL; double *__nc = NULL; double *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dlasdq_(__nuplo, &sqre, &n, &ncvt, &nru, &ncc, __nd + offsetd, __ne + offsete, __nvt + offsetvt, &ldvt, __nu + offsetu, &ldu, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlasd3_)(int *nl, int *nr, int *sqre, int *k, double *d, double *q, int *ldq, double *dsigma, double *u, int *ldu, double *u22, int *ldu2, double *vt, int *ldvt, double *vt22, int *ldvt2, int * idxc, int * ctot, double *z, /*FIXME*/void *info); +static void (*dlasdt_)(int *n, int *lvl, int *nd, int *inode, int *ndiml, int *ndimr, int *msub); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd3K(JNIEnv *env, UNUSED jobject obj, - jint nl, jint nr, jint sqre, jint k, jdoubleArray d, jint offsetd, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray dsigma, jint offsetdsigma, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray u2, jint offsetu2, jint ldu2, jdoubleArray vt, jint offsetvt, jint ldvt, jdoubleArray vt2, jint offsetvt2, jint ldvt2, jintArray idxc, jint offsetidxc, jintArray ctot, jint offsetctot, jdoubleArray z, jint offsetz, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasdtK(JNIEnv *env, UNUSED jobject obj, jint n, jobject lvl, jobject nd, jintArray inode, jint offsetinode, jintArray ndiml, jint offsetndiml, jintArray ndimr, jint offsetndimr, jint msub) { + jboolean failed = FALSE; + int __nlvl = 0; int __nnd = 0; int *__ninode = NULL; int *__nndiml = NULL; int *__nndimr = NULL; + __nlvl = (*env)->GetIntField(env, lvl, intW_val_fieldID); + __nnd = (*env)->GetIntField(env, nd, intW_val_fieldID); + if (!(__ninode = (*env)->GetPrimitiveArrayCritical(env, inode, NULL))) goto fail; + if (!(__nndiml = (*env)->GetPrimitiveArrayCritical(env, ndiml, NULL))) goto fail; + if (!(__nndimr = (*env)->GetPrimitiveArrayCritical(env, ndimr, NULL))) goto fail; + dlasdt_(&n, &__nlvl, &__nnd, __ninode + offsetinode, __nndiml + offsetndiml, __nndimr + offsetndimr, &msub); +done: + if (__nndimr) (*env)->ReleasePrimitiveArrayCritical(env, ndimr, __nndimr, failed ? JNI_ABORT : 0); + if (__nndiml) (*env)->ReleasePrimitiveArrayCritical(env, ndiml, __nndiml, failed ? JNI_ABORT : 0); + if (__ninode) (*env)->ReleasePrimitiveArrayCritical(env, inode, __ninode, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, nd, intW_val_fieldID, __nnd); + if (!failed) (*env)->SetIntField(env, lvl, intW_val_fieldID, __nlvl); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlasd4_)(int *n, int *i, double *d, double *z, double *delta, double *rho, /*FIXME*/void *sigma, double *work, /*FIXME*/void *info); +static void (*dlaset_)(const char *uplo, int *m, int *n, double *alpha, double *beta, double *a, int *lda); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd4K(JNIEnv *env, UNUSED jobject obj, - jint n, jint i, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdoubleArray delta, jint offsetdelta, jdouble rho, jobject sigma, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasetK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint m, jint n, jdouble alpha, jdouble beta, jdoubleArray a, jint offseta, jint lda) { + jboolean failed = FALSE; + const char *__nuplo = NULL; double *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + dlaset_(__nuplo, &m, &n, &alpha, &beta, __na + offseta, &lda); +done: + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlasd5_)(int *i, double *d, double *z, double *delta, double *rho, /*FIXME*/void *dsigma, double *work); +static void (*dlasq1_)(int *n, double *d, double *e, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd5K(JNIEnv *env, UNUSED jobject obj, - jint i, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdoubleArray delta, jint offsetdelta, jdouble rho, jobject dsigma, jdoubleArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq1K(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dlasq1_(&n, __nd + offsetd, __ne + offsete, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlasd6_)(int *icompq, int *nl, int *nr, int *sqre, double *d, double *vf, double *vl, /*FIXME*/void *alpha, /*FIXME*/void *beta, int * idxq, int * perm, /*FIXME*/void *givptr, int * givcol, int *ldgcol, double *givnum, int *ldgnum, double *poles, double *difl, double *difr, double *z, /*FIXME*/void *k, /*FIXME*/void *c, /*FIXME*/void *s, double *work, int * iwork, /*FIXME*/void *info); +static void (*dlasq2_)(int *n, double *z, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd6K(JNIEnv *env, UNUSED jobject obj, - jint icompq, jint nl, jint nr, jint sqre, jdoubleArray d, jint offsetd, jdoubleArray vf, jint offsetvf, jdoubleArray vl, jint offsetvl, jobject alpha, jobject beta, jintArray idxq, jint offsetidxq, jintArray perm, jint offsetperm, jobject givptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jdoubleArray givnum, jint offsetgivnum, jint ldgnum, jdoubleArray poles, jint offsetpoles, jdoubleArray difl, jint offsetdifl, jdoubleArray difr, jint offsetdifr, jdoubleArray z, jint offsetz, jobject k, jobject c, jobject s, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq2K(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray z, jint offsetz, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__nz = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + dlasq2_(&n, __nz + offsetz, &__ninfo); +done: + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlasd7_)(int *icompq, int *nl, int *nr, int *sqre, /*FIXME*/void *k, double *d, double *z, double *zw, double *vf, double *vfw, double *vl, double *vlw, double *alpha, double *beta, double *dsigma, int * idx, int * idxp, int * idxq, int * perm, /*FIXME*/void *givptr, int * givcol, int *ldgcol, double *givnum, int *ldgnum, /*FIXME*/void *c, /*FIXME*/void *s, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd7K(JNIEnv *env, UNUSED jobject obj, - jint icompq, jint nl, jint nr, jint sqre, jobject k, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdoubleArray zw, jint offsetzw, jdoubleArray vf, jint offsetvf, jdoubleArray vfw, jint offsetvfw, jdoubleArray vl, jint offsetvl, jdoubleArray vlw, jint offsetvlw, jdouble alpha, jdouble beta, jdoubleArray dsigma, jint offsetdsigma, jintArray idx, jint offsetidx, jintArray idxp, jint offsetidxp, jintArray idxq, jint offsetidxq, jintArray perm, jint offsetperm, jobject givptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jdoubleArray givnum, jint offsetgivnum, jint ldgnum, jobject c, jobject s, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlasq3_)(int *i0, int *n0, double *z, int *pp, double *dmin, double *sigma, double *desig, double *qmax, int *nfail, int *iter, int *ndiv, int *ieee); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq3K(JNIEnv *env, UNUSED jobject obj, jint i0, jobject n0, jdoubleArray z, jint offsetz, jint pp, jobject dmin, jobject sigma, jobject desig, jobject qmax, jobject nfail, jobject iter, jobject ndiv, jboolean ieee) { + jboolean failed = FALSE; + int __nn0 = 0; double __ndmin = 0; double __nsigma = 0; double __ndesig = 0; double __nqmax = 0; int __nnfail = 0; int __niter = 0; int __nndiv = 0; int __nieee; double *__nz = NULL; + __nn0 = (*env)->GetIntField(env, n0, intW_val_fieldID); + __ndmin = (*env)->GetDoubleField(env, dmin, doubleW_val_fieldID); + __nsigma = (*env)->GetDoubleField(env, sigma, doubleW_val_fieldID); + __ndesig = (*env)->GetDoubleField(env, desig, doubleW_val_fieldID); + __nqmax = (*env)->GetDoubleField(env, qmax, doubleW_val_fieldID); + __nnfail = (*env)->GetIntField(env, nfail, intW_val_fieldID); + __niter = (*env)->GetIntField(env, iter, intW_val_fieldID); + __nndiv = (*env)->GetIntField(env, ndiv, intW_val_fieldID); + __nieee = ieee; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + dlasq3_(&i0, &__nn0, __nz + offsetz, &pp, &__ndmin, &__nsigma, &__ndesig, &__nqmax, &__nnfail, &__niter, &__nndiv, &__nieee); +done: + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (!failed) ieee = __nieee; + if (!failed) (*env)->SetIntField(env, ndiv, intW_val_fieldID, __nndiv); + if (!failed) (*env)->SetIntField(env, iter, intW_val_fieldID, __niter); + if (!failed) (*env)->SetIntField(env, nfail, intW_val_fieldID, __nnfail); + if (!failed) (*env)->SetDoubleField(env, qmax, doubleW_val_fieldID, __nqmax); + if (!failed) (*env)->SetDoubleField(env, desig, doubleW_val_fieldID, __ndesig); + if (!failed) (*env)->SetDoubleField(env, sigma, doubleW_val_fieldID, __nsigma); + if (!failed) (*env)->SetDoubleField(env, dmin, doubleW_val_fieldID, __ndmin); + if (!failed) (*env)->SetIntField(env, n0, intW_val_fieldID, __nn0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlasd8_)(int *icompq, int *k, double *d, double *z, double *vf, double *vl, double *difl, double *difr, int *lddifr, double *dsigma, double *work, /*FIXME*/void *info); +static void (*dlasq4_)(int *i0, int *n0, double *z, int *pp, int *n0in, double *dmin, double *dmin1, double *dmin2, double *dn, double *dn1, double *dn2, double *tau, int *ttype); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd8K(JNIEnv *env, UNUSED jobject obj, - jint icompq, jint k, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdoubleArray vf, jint offsetvf, jdoubleArray vl, jint offsetvl, jdoubleArray difl, jint offsetdifl, jdoubleArray difr, jint offsetdifr, jint lddifr, jdoubleArray dsigma, jint offsetdsigma, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq4K(JNIEnv *env, UNUSED jobject obj, jint i0, jint n0, jdoubleArray z, jint offsetz, jint pp, jint n0in, jdouble dmin, jdouble dmin1, jdouble dmin2, jdouble dn, jdouble dn1, jdouble dn2, jobject tau, jobject ttype) { + jboolean failed = FALSE; + double __ntau = 0; int __nttype = 0; double *__nz = NULL; + __ntau = (*env)->GetDoubleField(env, tau, doubleW_val_fieldID); + __nttype = (*env)->GetIntField(env, ttype, intW_val_fieldID); + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + dlasq4_(&i0, &n0, __nz + offsetz, &pp, &n0in, &dmin, &dmin1, &dmin2, &dn, &dn1, &dn2, &__ntau, &__nttype); +done: + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, ttype, intW_val_fieldID, __nttype); + if (!failed) (*env)->SetDoubleField(env, tau, doubleW_val_fieldID, __ntau); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlasda_)(int *icompq, int *smlsiz, int *n, int *sqre, double *d, double *e, double *u, int *ldu, double *vt, int * k, double *difl, double *difr, double *z, double *poles, int * givptr, int * givcol, int *ldgcol, int * perm, double *givnum, double *c, double *s, double *work, int * iwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasdaK(JNIEnv *env, UNUSED jobject obj, - jint icompq, jint smlsiz, jint n, jint sqre, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jintArray k, jint offsetk, jdoubleArray difl, jint offsetdifl, jdoubleArray difr, jint offsetdifr, jdoubleArray z, jint offsetz, jdoubleArray poles, jint offsetpoles, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jintArray perm, jint offsetperm, jdoubleArray givnum, jint offsetgivnum, jdoubleArray c, jint offsetc, jdoubleArray s, jint offsets, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlasq5_)(int *i0, int *n0, double *z, int *pp, double *tau, double *dmin, double *dmin1, double *dmin2, double *dn, double *dnm1, double *dnm2, int *ieee); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq5K(JNIEnv *env, UNUSED jobject obj, jint i0, jint n0, jdoubleArray z, jint offsetz, jint pp, jdouble tau, jobject dmin, jobject dmin1, jobject dmin2, jobject dn, jobject dnm1, jobject dnm2, jboolean ieee) { + jboolean failed = FALSE; + double __ndmin = 0; double __ndmin1 = 0; double __ndmin2 = 0; double __ndn = 0; double __ndnm1 = 0; double __ndnm2 = 0; int __nieee; double *__nz = NULL; + __ndmin = (*env)->GetDoubleField(env, dmin, doubleW_val_fieldID); + __ndmin1 = (*env)->GetDoubleField(env, dmin1, doubleW_val_fieldID); + __ndmin2 = (*env)->GetDoubleField(env, dmin2, doubleW_val_fieldID); + __ndn = (*env)->GetDoubleField(env, dn, doubleW_val_fieldID); + __ndnm1 = (*env)->GetDoubleField(env, dnm1, doubleW_val_fieldID); + __ndnm2 = (*env)->GetDoubleField(env, dnm2, doubleW_val_fieldID); + __nieee = ieee; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + dlasq5_(&i0, &n0, __nz + offsetz, &pp, &tau, &__ndmin, &__ndmin1, &__ndmin2, &__ndn, &__ndnm1, &__ndnm2, &__nieee); +done: + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (!failed) ieee = __nieee; + if (!failed) (*env)->SetDoubleField(env, dnm2, doubleW_val_fieldID, __ndnm2); + if (!failed) (*env)->SetDoubleField(env, dnm1, doubleW_val_fieldID, __ndnm1); + if (!failed) (*env)->SetDoubleField(env, dn, doubleW_val_fieldID, __ndn); + if (!failed) (*env)->SetDoubleField(env, dmin2, doubleW_val_fieldID, __ndmin2); + if (!failed) (*env)->SetDoubleField(env, dmin1, doubleW_val_fieldID, __ndmin1); + if (!failed) (*env)->SetDoubleField(env, dmin, doubleW_val_fieldID, __ndmin); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlasdq_)(const char *uplo, int *sqre, int *n, int *ncvt, int *nru, int *ncc, double *d, double *e, double *vt, int *ldvt, double *u, int *ldu, double *c, int *Ldc, double *work, /*FIXME*/void *info); +static void (*dlasq6_)(int *i0, int *n0, double *z, int *pp, double *dmin, double *dmin1, double *dmin2, double *dn, double *dnm1, double *dnm2); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasdqK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint sqre, jint n, jint ncvt, jint nru, jint ncc, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray vt, jint offsetvt, jint ldvt, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq6K(JNIEnv *env, UNUSED jobject obj, jint i0, jint n0, jdoubleArray z, jint offsetz, jint pp, jobject dmin, jobject dmin1, jobject dmin2, jobject dn, jobject dnm1, jobject dnm2) { + jboolean failed = FALSE; + double __ndmin = 0; double __ndmin1 = 0; double __ndmin2 = 0; double __ndn = 0; double __ndnm1 = 0; double __ndnm2 = 0; double *__nz = NULL; + __ndmin = (*env)->GetDoubleField(env, dmin, doubleW_val_fieldID); + __ndmin1 = (*env)->GetDoubleField(env, dmin1, doubleW_val_fieldID); + __ndmin2 = (*env)->GetDoubleField(env, dmin2, doubleW_val_fieldID); + __ndn = (*env)->GetDoubleField(env, dn, doubleW_val_fieldID); + __ndnm1 = (*env)->GetDoubleField(env, dnm1, doubleW_val_fieldID); + __ndnm2 = (*env)->GetDoubleField(env, dnm2, doubleW_val_fieldID); + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + dlasq6_(&i0, &n0, __nz + offsetz, &pp, &__ndmin, &__ndmin1, &__ndmin2, &__ndn, &__ndnm1, &__ndnm2); +done: + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetDoubleField(env, dnm2, doubleW_val_fieldID, __ndnm2); + if (!failed) (*env)->SetDoubleField(env, dnm1, doubleW_val_fieldID, __ndnm1); + if (!failed) (*env)->SetDoubleField(env, dn, doubleW_val_fieldID, __ndn); + if (!failed) (*env)->SetDoubleField(env, dmin2, doubleW_val_fieldID, __ndmin2); + if (!failed) (*env)->SetDoubleField(env, dmin1, doubleW_val_fieldID, __ndmin1); + if (!failed) (*env)->SetDoubleField(env, dmin, doubleW_val_fieldID, __ndmin); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlasdt_)(int *n, /*FIXME*/void *lvl, /*FIXME*/void *nd, int * inode, int * ndiml, int * ndimr, int *msub); +static void (*dlasr_)(const char *side, const char *pivot, const char *direct, int *m, int *n, double *c, double *s, double *a, int *lda); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasdtK(JNIEnv *env, UNUSED jobject obj, - jint n, jobject lvl, jobject nd, jintArray inode, jint offsetinode, jintArray ndiml, jint offsetndiml, jintArray ndimr, jint offsetndimr, jint msub) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasrK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring pivot, jstring direct, jint m, jint n, jdoubleArray c, jint offsetc, jdoubleArray s, jint offsets, jdoubleArray a, jint offseta, jint lda) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__npivot = NULL; const char *__ndirect = NULL; double *__nc = NULL; double *__ns = NULL; double *__na = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__npivot = (*env)->GetStringUTFChars(env, pivot, NULL))) goto fail; + if (!(__ndirect = (*env)->GetStringUTFChars(env, direct, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + dlasr_(__nside, __npivot, __ndirect, &m, &n, __nc + offsetc, __ns + offsets, __na + offseta, &lda); +done: + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ndirect) (*env)->ReleaseStringUTFChars(env, direct, __ndirect); + if (__npivot) (*env)->ReleaseStringUTFChars(env, pivot, __npivot); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaset_)(const char *uplo, int *m, int *n, double *alpha, double *beta, double *a, int *lda); +static void (*dlasrt_)(const char *id, int *n, double *d, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasetK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint m, jint n, jdouble alpha, jdouble beta, jdoubleArray a, jint offseta, jint lda) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasrtK(JNIEnv *env, UNUSED jobject obj, jstring id, jint n, jdoubleArray d, jint offsetd, jobject info) { + jboolean failed = FALSE; + const char *__nid = NULL; int __ninfo = 0; double *__nd = NULL; + if (!(__nid = (*env)->GetStringUTFChars(env, id, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + dlasrt_(__nid, &n, __nd + offsetd, &__ninfo); +done: + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nid) (*env)->ReleaseStringUTFChars(env, id, __nid); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlasq1_)(int *n, double *d, double *e, double *work, /*FIXME*/void *info); +static void (*dlassq_)(int *n, double *x, int *incx, double *scale, double *sumsq); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq1K(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlassqK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray x, jint offsetx, jint incx, jobject scale, jobject sumsq) { + jboolean failed = FALSE; + double __nscale = 0; double __nsumsq = 0; double *__nx = NULL; + __nscale = (*env)->GetDoubleField(env, scale, doubleW_val_fieldID); + __nsumsq = (*env)->GetDoubleField(env, sumsq, doubleW_val_fieldID); + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + dlassq_(&n, __nx + offsetx, &incx, &__nscale, &__nsumsq); +done: + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetDoubleField(env, sumsq, doubleW_val_fieldID, __nsumsq); + if (!failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlasq2_)(int *n, double *z, /*FIXME*/void *info); +static void (*dlasv2_)(double *f, double *g, double *h, double *ssmin, double *ssmax, double *snr, double *csr, double *snl, double *csl); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq2K(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray z, jint offsetz, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasv2K(JNIEnv *env, UNUSED jobject obj, jdouble f, jdouble g, jdouble h, jobject ssmin, jobject ssmax, jobject snr, jobject csr, jobject snl, jobject csl) { + jboolean failed = FALSE; + double __nssmin = 0; double __nssmax = 0; double __nsnr = 0; double __ncsr = 0; double __nsnl = 0; double __ncsl = 0; + __nssmin = (*env)->GetDoubleField(env, ssmin, doubleW_val_fieldID); + __nssmax = (*env)->GetDoubleField(env, ssmax, doubleW_val_fieldID); + __nsnr = (*env)->GetDoubleField(env, snr, doubleW_val_fieldID); + __ncsr = (*env)->GetDoubleField(env, csr, doubleW_val_fieldID); + __nsnl = (*env)->GetDoubleField(env, snl, doubleW_val_fieldID); + __ncsl = (*env)->GetDoubleField(env, csl, doubleW_val_fieldID); + dlasv2_(&f, &g, &h, &__nssmin, &__nssmax, &__nsnr, &__ncsr, &__nsnl, &__ncsl); +done: + if (!failed) (*env)->SetDoubleField(env, csl, doubleW_val_fieldID, __ncsl); + if (!failed) (*env)->SetDoubleField(env, snl, doubleW_val_fieldID, __nsnl); + if (!failed) (*env)->SetDoubleField(env, csr, doubleW_val_fieldID, __ncsr); + if (!failed) (*env)->SetDoubleField(env, snr, doubleW_val_fieldID, __nsnr); + if (!failed) (*env)->SetDoubleField(env, ssmax, doubleW_val_fieldID, __nssmax); + if (!failed) (*env)->SetDoubleField(env, ssmin, doubleW_val_fieldID, __nssmin); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlasq3_)(int *i0, /*FIXME*/void *n0, double *z, int *pp, /*FIXME*/void *dmin, /*FIXME*/void *sigma, /*FIXME*/void *desig, /*FIXME*/void *qmax, /*FIXME*/void *nfail, /*FIXME*/void *iter, /*FIXME*/void *ndiv, int *ieee); +static void (*dlaswp_)(int *n, double *a, int *lda, int *k1, int *k2, int *ipiv, int *incx); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq3K(JNIEnv *env, UNUSED jobject obj, - jint i0, jobject n0, jdoubleArray z, jint offsetz, jint pp, jobject dmin, jobject sigma, jobject desig, jobject qmax, jobject nfail, jobject iter, jobject ndiv, jboolean ieee) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaswpK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray a, jint offseta, jint lda, jint k1, jint k2, jintArray ipiv, jint offsetipiv, jint incx) { + jboolean failed = FALSE; + double *__na = NULL; int *__nipiv = NULL; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + dlaswp_(&n, __na + offseta, &lda, &k1, &k2, __nipiv + offsetipiv, &incx); +done: + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlasq4_)(int *i0, int *n0, double *z, int *pp, int *n0in, double *dmin, double *dmin1, double *dmin2, double *dn, double *dn1, double *dn2, /*FIXME*/void *tau, /*FIXME*/void *ttype); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq4K(JNIEnv *env, UNUSED jobject obj, - jint i0, jint n0, jdoubleArray z, jint offsetz, jint pp, jint n0in, jdouble dmin, jdouble dmin1, jdouble dmin2, jdouble dn, jdouble dn1, jdouble dn2, jobject tau, jobject ttype) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlasy2_)(int *ltranl, int *ltranr, int *isgn, int *n1, int *n2, double *tl, int *ldtl, double *tr, int *ldtr, double *b, int *ldb, double *scale, double *x, int *ldx, double *xnorm, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasy2K(JNIEnv *env, UNUSED jobject obj, jboolean ltranl, jboolean ltranr, jint isgn, jint n1, jint n2, jdoubleArray tl, jint offsettl, jint ldtl, jdoubleArray tr, jint offsettr, jint ldtr, jdoubleArray b, jint offsetb, jint ldb, jobject scale, jdoubleArray x, jint offsetx, jint ldx, jobject xnorm, jobject info) { + jboolean failed = FALSE; + int __nltranl; int __nltranr; double __nscale = 0; double __nxnorm = 0; int __ninfo = 0; double *__ntl = NULL; double *__ntr = NULL; double *__nb = NULL; double *__nx = NULL; + __nltranl = ltranl; + __nltranr = ltranr; + __nscale = (*env)->GetDoubleField(env, scale, doubleW_val_fieldID); + __nxnorm = (*env)->GetDoubleField(env, xnorm, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__ntl = (*env)->GetPrimitiveArrayCritical(env, tl, NULL))) goto fail; + if (!(__ntr = (*env)->GetPrimitiveArrayCritical(env, tr, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + dlasy2_(&__nltranl, &__nltranr, &isgn, &n1, &n2, __ntl + offsettl, &ldtl, __ntr + offsettr, &ldtr, __nb + offsetb, &ldb, &__nscale, __nx + offsetx, &ldx, &__nxnorm, &__ninfo); +done: + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__ntr) (*env)->ReleasePrimitiveArrayCritical(env, tr, __ntr, failed ? JNI_ABORT : 0); + if (__ntl) (*env)->ReleasePrimitiveArrayCritical(env, tl, __ntl, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, xnorm, doubleW_val_fieldID, __nxnorm); + if (!failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); + if (!failed) ltranr = __nltranr; + if (!failed) ltranl = __nltranl; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlasq5_)(int *i0, int *n0, double *z, int *pp, double *tau, /*FIXME*/void *dmin, /*FIXME*/void *dmin1, /*FIXME*/void *dmin2, /*FIXME*/void *dn, /*FIXME*/void *dnm1, /*FIXME*/void *dnm2, int *ieee); +static void (*dlasyf_)(const char *uplo, int *n, int *nb, int *kb, double *a, int *lda, int *ipiv, double *w, int *ldw, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq5K(JNIEnv *env, UNUSED jobject obj, - jint i0, jint n0, jdoubleArray z, jint offsetz, jint pp, jdouble tau, jobject dmin, jobject dmin1, jobject dmin2, jobject dn, jobject dnm1, jobject dnm2, jboolean ieee) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasyfK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nb, jobject kb, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray w, jint offsetw, jint ldw, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __nkb = 0; int __ninfo = 0; double *__na = NULL; int *__nipiv = NULL; double *__nw = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nkb = (*env)->GetIntField(env, kb, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + dlasyf_(__nuplo, &n, &nb, &__nkb, __na + offseta, &lda, __nipiv + offsetipiv, __nw + offsetw, &ldw, &__ninfo); +done: + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, kb, intW_val_fieldID, __nkb); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlasq6_)(int *i0, int *n0, double *z, int *pp, /*FIXME*/void *dmin, /*FIXME*/void *dmin1, /*FIXME*/void *dmin2, /*FIXME*/void *dn, /*FIXME*/void *dnm1, /*FIXME*/void *dnm2); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq6K(JNIEnv *env, UNUSED jobject obj, - jint i0, jint n0, jdoubleArray z, jint offsetz, jint pp, jobject dmin, jobject dmin1, jobject dmin2, jobject dn, jobject dnm1, jobject dnm2) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlatbs_)(const char *uplo, const char *trans, const char *diag, const char *normin, int *n, int *kd, double *ab, int *ldab, double *x, double *scale, double *cnorm, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatbsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jstring normin, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray x, jint offsetx, jobject scale, jdoubleArray cnorm, jint offsetcnorm, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; const char *__nnormin = NULL; double __nscale = 0; int __ninfo = 0; double *__nab = NULL; double *__nx = NULL; double *__ncnorm = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(__nnormin = (*env)->GetStringUTFChars(env, normin, NULL))) goto fail; + __nscale = (*env)->GetDoubleField(env, scale, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ncnorm = (*env)->GetPrimitiveArrayCritical(env, cnorm, NULL))) goto fail; + dlatbs_(__nuplo, __ntrans, __ndiag, __nnormin, &n, &kd, __nab + offsetab, &ldab, __nx + offsetx, &__nscale, __ncnorm + offsetcnorm, &__ninfo); +done: + if (__ncnorm) (*env)->ReleasePrimitiveArrayCritical(env, cnorm, __ncnorm, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); + if (__nnormin) (*env)->ReleaseStringUTFChars(env, normin, __nnormin); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlasr_)(char *side, char *pivot, char *direct, int *m, int *n, double *c, double *s, double *a, int *lda); +static void (*dlatdf_)(int *ijob, int *n, double *z, int *ldz, double *rhs, double *rdsum, double *rdscal, int *ipiv, int *jpiv); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasrK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring pivot, jstring direct, jint m, jint n, jdoubleArray c, jint offsetc, jdoubleArray s, jint offsets, jdoubleArray a, jint offseta, jint lda) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatdfK(JNIEnv *env, UNUSED jobject obj, jint ijob, jint n, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray rhs, jint offsetrhs, jobject rdsum, jobject rdscal, jintArray ipiv, jint offsetipiv, jintArray jpiv, jint offsetjpiv) { + jboolean failed = FALSE; + double __nrdsum = 0; double __nrdscal = 0; double *__nz = NULL; double *__nrhs = NULL; int *__nipiv = NULL; int *__njpiv = NULL; + __nrdsum = (*env)->GetDoubleField(env, rdsum, doubleW_val_fieldID); + __nrdscal = (*env)->GetDoubleField(env, rdscal, doubleW_val_fieldID); + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nrhs = (*env)->GetPrimitiveArrayCritical(env, rhs, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__njpiv = (*env)->GetPrimitiveArrayCritical(env, jpiv, NULL))) goto fail; + dlatdf_(&ijob, &n, __nz + offsetz, &ldz, __nrhs + offsetrhs, &__nrdsum, &__nrdscal, __nipiv + offsetipiv, __njpiv + offsetjpiv); +done: + if (__njpiv) (*env)->ReleasePrimitiveArrayCritical(env, jpiv, __njpiv, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nrhs) (*env)->ReleasePrimitiveArrayCritical(env, rhs, __nrhs, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetDoubleField(env, rdscal, doubleW_val_fieldID, __nrdscal); + if (!failed) (*env)->SetDoubleField(env, rdsum, doubleW_val_fieldID, __nrdsum); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlasrt_)(char *id, int *n, double *d, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasrtK(JNIEnv *env, UNUSED jobject obj, - jstring id, jint n, jdoubleArray d, jint offsetd, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlatps_)(const char *uplo, const char *trans, const char *diag, const char *normin, int *n, double *ap, double *x, double *scale, double *cnorm, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatpsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jstring normin, jint n, jdoubleArray ap, jint offsetap, jdoubleArray x, jint offsetx, jobject scale, jdoubleArray cnorm, jint offsetcnorm, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; const char *__nnormin = NULL; double __nscale = 0; int __ninfo = 0; double *__nap = NULL; double *__nx = NULL; double *__ncnorm = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(__nnormin = (*env)->GetStringUTFChars(env, normin, NULL))) goto fail; + __nscale = (*env)->GetDoubleField(env, scale, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ncnorm = (*env)->GetPrimitiveArrayCritical(env, cnorm, NULL))) goto fail; + dlatps_(__nuplo, __ntrans, __ndiag, __nnormin, &n, __nap + offsetap, __nx + offsetx, &__nscale, __ncnorm + offsetcnorm, &__ninfo); +done: + if (__ncnorm) (*env)->ReleasePrimitiveArrayCritical(env, cnorm, __ncnorm, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); + if (__nnormin) (*env)->ReleaseStringUTFChars(env, normin, __nnormin); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlassq_)(int *n, double *x, int *incx, /*FIXME*/void *scale, /*FIXME*/void *sumsq); +static void (*dlatrd_)(const char *uplo, int *n, int *nb, double *a, int *lda, double *e, double *tau, double *w, int *ldw); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlassqK(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray x, jint offsetx, jint incx, jobject scale, jobject sumsq) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatrdK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nb, jdoubleArray a, jint offseta, jint lda, jdoubleArray e, jint offsete, jdoubleArray tau, jint offsettau, jdoubleArray w, jint offsetw, jint ldw) { + jboolean failed = FALSE; + const char *__nuplo = NULL; double *__na = NULL; double *__ne = NULL; double *__ntau = NULL; double *__nw = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + dlatrd_(__nuplo, &n, &nb, __na + offseta, &lda, __ne + offsete, __ntau + offsettau, __nw + offsetw, &ldw); +done: + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlasv2_)(double *f, double *g, double *h, double *ssmin, /*FIXME*/void *ssmax, /*FIXME*/void *snr, double *csr, double *snl, double *csl); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasv2K(JNIEnv *env, UNUSED jobject obj, - jdouble f, jdouble g, jdouble h, jobject ssmin, jobject ssmax, jobject snr, jobject csr, jobject snl, jobject csl) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dlatrs_)(const char *uplo, const char *trans, const char *diag, const char *normin, int *n, double *a, int *lda, double *x, double *scale, double *cnorm, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jstring normin, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jobject scale, jdoubleArray cnorm, jint offsetcnorm, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; const char *__nnormin = NULL; double __nscale = 0; int __ninfo = 0; double *__na = NULL; double *__nx = NULL; double *__ncnorm = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(__nnormin = (*env)->GetStringUTFChars(env, normin, NULL))) goto fail; + __nscale = (*env)->GetDoubleField(env, scale, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ncnorm = (*env)->GetPrimitiveArrayCritical(env, cnorm, NULL))) goto fail; + dlatrs_(__nuplo, __ntrans, __ndiag, __nnormin, &n, __na + offseta, &lda, __nx + offsetx, &__nscale, __ncnorm + offsetcnorm, &__ninfo); +done: + if (__ncnorm) (*env)->ReleasePrimitiveArrayCritical(env, cnorm, __ncnorm, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); + if (__nnormin) (*env)->ReleaseStringUTFChars(env, normin, __nnormin); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlaswp_)(int *n, double *a, int *lda, int *k1, int *k2, int * ipiv, int *incx); +static void (*dlatrz_)(int *m, int *n, int *l, double *a, int *lda, double *tau, double *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaswpK(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray a, jint offseta, jint lda, jint k1, jint k2, jintArray ipiv, jint offsetipiv, jint incx) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatrzK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint l, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork) { + jboolean failed = FALSE; + double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dlatrz_(&m, &n, &l, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlasy2_)(int *ltranl, int *ltranr, int *isgn, int *n1, int *n2, double *tl, int *ldtl, double *tr, int *ldtr, double *b, int *ldb, /*FIXME*/void *scale, double *x, int *ldx, /*FIXME*/void *xnorm, /*FIXME*/void *info); +static void (*dlatzm_)(const char *side, int *m, int *n, double *v, int *incv, double *tau, double *c1, double *c2, int *Ldc, double *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasy2K(JNIEnv *env, UNUSED jobject obj, - jboolean ltranl, jboolean ltranr, jint isgn, jint n1, jint n2, jdoubleArray tl, jint offsettl, jint ldtl, jdoubleArray tr, jint offsettr, jint ldtr, jdoubleArray b, jint offsetb, jint ldb, jobject scale, jdoubleArray x, jint offsetx, jint ldx, jobject xnorm, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatzmK(JNIEnv *env, UNUSED jobject obj, jstring side, jint m, jint n, jdoubleArray v, jint offsetv, jint incv, jdouble tau, jdoubleArray c1, jint offsetc1, jdoubleArray c2, jint offsetc2, jint Ldc, jdoubleArray work, jint offsetwork) { + jboolean failed = FALSE; + const char *__nside = NULL; double *__nv = NULL; double *__nc1 = NULL; double *__nc2 = NULL; double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nc1 = (*env)->GetPrimitiveArrayCritical(env, c1, NULL))) goto fail; + if (!(__nc2 = (*env)->GetPrimitiveArrayCritical(env, c2, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dlatzm_(__nside, &m, &n, __nv + offsetv, &incv, &tau, __nc1 + offsetc1, __nc2 + offsetc2, &Ldc, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc2) (*env)->ReleasePrimitiveArrayCritical(env, c2, __nc2, failed ? JNI_ABORT : 0); + if (__nc1) (*env)->ReleasePrimitiveArrayCritical(env, c1, __nc1, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlasyf_)(const char *uplo, int *n, int *nb, /*FIXME*/void *kb, double *a, int *lda, int * ipiv, double *w, int *ldw, /*FIXME*/void *info); +static void (*dlauu2_)(const char *uplo, int *n, double *a, int *lda, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasyfK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint nb, jobject kb, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray w, jint offsetw, jint ldw, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlauu2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + dlauu2_(__nuplo, &n, __na + offseta, &lda, &__ninfo); +done: + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlatbs_)(const char *uplo, char *trans, char *diag, char *normin, int *n, int *kd, double *ab, int *ldab, double *x, /*FIXME*/void *scale, double *cnorm, /*FIXME*/void *info); +static void (*dlauum_)(const char *uplo, int *n, double *a, int *lda, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatbsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring trans, jstring diag, jstring normin, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray x, jint offsetx, jobject scale, jdoubleArray cnorm, jint offsetcnorm, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlauumK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + dlauum_(__nuplo, &n, __na + offseta, &lda, &__ninfo); +done: + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlatdf_)(int *ijob, int *n, double *z, int *ldz, double *rhs, /*FIXME*/void *rdsum, /*FIXME*/void *rdscal, int * ipiv, int * jpiv); +static void (*dopgtr_)(const char *uplo, int *n, double *ap, double *tau, double *q, int *ldq, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatdfK(JNIEnv *env, UNUSED jobject obj, - jint ijob, jint n, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray rhs, jint offsetrhs, jobject rdsum, jobject rdscal, jintArray ipiv, jint offsetipiv, jintArray jpiv, jint offsetjpiv) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dopgtrK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray tau, jint offsettau, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; double *__ntau = NULL; double *__nq = NULL; double *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dopgtr_(__nuplo, &n, __nap + offsetap, __ntau + offsettau, __nq + offsetq, &ldq, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlatps_)(const char *uplo, char *trans, char *diag, char *normin, int *n, double *ap, double *x, /*FIXME*/void *scale, double *cnorm, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatpsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring trans, jstring diag, jstring normin, jint n, jdoubleArray ap, jint offsetap, jdoubleArray x, jint offsetx, jobject scale, jdoubleArray cnorm, jint offsetcnorm, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dopmtr_)(const char *side, const char *uplo, const char *trans, int *m, int *n, double *ap, double *tau, double *c, int *Ldc, double *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dopmtrK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring uplo, jstring trans, jint m, jint n, jdoubleArray ap, jint offsetap, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__nuplo = NULL; const char *__ntrans = NULL; int __ninfo = 0; double *__nap = NULL; double *__ntau = NULL; double *__nc = NULL; double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dopmtr_(__nside, __nuplo, __ntrans, &m, &n, __nap + offsetap, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlatrd_)(const char *uplo, int *n, int *nb, double *a, int *lda, double *e, double *tau, double *w, int *ldw); +static void (*dorg2l_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatrdK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint nb, jdoubleArray a, jint offseta, jint lda, jdoubleArray e, jint offsete, jdoubleArray tau, jint offsettau, jdoubleArray w, jint offsetw, jint ldw) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorg2lK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dorg2l_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlatrs_)(const char *uplo, char *trans, char *diag, char *normin, int *n, double *a, int *lda, double *x, /*FIXME*/void *scale, double *cnorm, /*FIXME*/void *info); +static void (*dorg2r_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatrsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring trans, jstring diag, jstring normin, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jobject scale, jdoubleArray cnorm, jint offsetcnorm, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorg2rK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dorg2r_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlatrz_)(int *m, int *n, int *l, double *a, int *lda, double *tau, double *work); +static void (*dorgbr_)(const char *vect, int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatrzK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint l, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgbrK(JNIEnv *env, UNUSED jobject obj, jstring vect, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__nvect = NULL; int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; + if (!(__nvect = (*env)->GetStringUTFChars(env, vect, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dorgbr_(__nvect, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nvect) (*env)->ReleaseStringUTFChars(env, vect, __nvect); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlatzm_)(char *side, int *m, int *n, double *v, int *incv, double *tau, double *c11, double *c22, int *Ldc, double *work); +static void (*dorghr_)(int *n, int *ilo, int *ihi, double *a, int *lda, double *tau, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatzmK(JNIEnv *env, UNUSED jobject obj, - jstring side, jint m, jint n, jdoubleArray v, jint offsetv, jint incv, jdouble tau, jdoubleArray c1, jint offsetc1, jdoubleArray c2, jint offsetc2, jint Ldc, jdoubleArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorghrK(JNIEnv *env, UNUSED jobject obj, jint n, jint ilo, jint ihi, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dorghr_(&n, &ilo, &ihi, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlauu2_)(const char *uplo, int *n, double *a, int *lda, /*FIXME*/void *info); +static void (*dorgl2_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlauu2K(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgl2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dorgl2_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dlauum_)(const char *uplo, int *n, double *a, int *lda, /*FIXME*/void *info); +static void (*dorglq_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlauumK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorglqK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dorglq_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -// static void (*dlazq3_)(int *i0, /*FIXME*/void *n0, double *z, int *pp, /*FIXME*/void *dmin, /*FIXME*/void *sigma, /*FIXME*/void *desig, /*FIXME*/void *qmax, /*FIXME*/void *nfail, /*FIXME*/void *iter, /*FIXME*/void *ndiv, int *ieee, /*FIXME*/void *ttype, /*FIXME*/void *dmin1, /*FIXME*/void *dmin2, /*FIXME*/void *dn, /*FIXME*/void *dn1, /*FIXME*/void *dn2, /*FIXME*/void *tau); +static void (*dorgql_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlazq3K(JNIEnv *env, UNUSED jobject obj, - jint i0, jobject n0, jdoubleArray z, jint offsetz, jint pp, jobject dmin, jobject sigma, jobject desig, jobject qmax, jobject nfail, jobject iter, jobject ndiv, jboolean ieee, jobject ttype, jobject dmin1, jobject dmin2, jobject dn, jobject dn1, jobject dn2, jobject tau) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgqlK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dorgql_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -// static void (*dlazq4_)(int *i0, int *n0, double *z, int *pp, int *n0in, double *dmin, double *dmin1, double *dmin2, double *dn, double *dn1, double *dn2, /*FIXME*/void *tau, /*FIXME*/void *ttype, /*FIXME*/void *g); +static void (*dorgqr_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlazq4K(JNIEnv *env, UNUSED jobject obj, - jint i0, jint n0, jdoubleArray z, jint offsetz, jint pp, jint n0in, jdouble dmin, jdouble dmin1, jdouble dmin2, jdouble dn, jdouble dn1, jdouble dn2, jobject tau, jobject ttype, jobject g) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgqrK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dorgqr_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dopgtr_)(const char *uplo, int *n, double *ap, double *tau, double *q, int *ldq, double *work, /*FIXME*/void *info); +static void (*dorgr2_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dopgtrK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray tau, jint offsettau, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgr2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dorgr2_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dopmtr_)(char *side, const char *uplo, char *trans, int *m, int *n, double *ap, double *tau, double *c, int *Ldc, double *work, /*FIXME*/void *info); +static void (*dorgrq_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dopmtrK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring uplo, jstring trans, jint m, jint n, jdoubleArray ap, jint offsetap, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgrqK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dorgrq_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dorg2l_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, /*FIXME*/void *info); +static void (*dorgtr_)(const char *uplo, int *n, double *a, int *lda, double *tau, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorg2lK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgtrK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dorgtr_(__nuplo, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dorg2r_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, /*FIXME*/void *info); +static void (*dorm2l_)(const char *side, const char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorg2rK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorm2lK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nc = NULL; double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dorm2l_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dorgbr_)(char *vect, int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, int *lwork, /*FIXME*/void *info); +static void (*dorm2r_)(const char *side, const char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgbrK(JNIEnv *env, UNUSED jobject obj, - jstring vect, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorm2rK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nc = NULL; double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dorm2r_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dorghr_)(int *n, int *ilo, int *ihi, double *a, int *lda, double *tau, double *work, int *lwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorghrK(JNIEnv *env, UNUSED jobject obj, - jint n, jint ilo, jint ihi, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dormbr_)(const char *vect, const char *side, const char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormbrK(JNIEnv *env, UNUSED jobject obj, jstring vect, jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__nvect = NULL; const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nc = NULL; double *__nwork = NULL; + if (!(__nvect = (*env)->GetStringUTFChars(env, vect, NULL))) goto fail; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dormbr_(__nvect, __nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (__nvect) (*env)->ReleaseStringUTFChars(env, vect, __nvect); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dorgl2_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, /*FIXME*/void *info); +static void (*dormhr_)(const char *side, const char *trans, int *m, int *n, int *ilo, int *ihi, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgl2K(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormhrK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint ilo, jint ihi, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nc = NULL; double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dormhr_(__nside, __ntrans, &m, &n, &ilo, &ihi, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dorglq_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, int *lwork, /*FIXME*/void *info); +static void (*dorml2_)(const char *side, const char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorglqK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorml2K(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nc = NULL; double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dorml2_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dorgql_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, int *lwork, /*FIXME*/void *info); +static void (*dormlq_)(const char *side, const char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgqlK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormlqK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nc = NULL; double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dormlq_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dorgqr_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, int *lwork, /*FIXME*/void *info); +static void (*dormql_)(const char *side, const char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgqrK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormqlK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nc = NULL; double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dormql_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dorgr2_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, /*FIXME*/void *info); +static void (*dormqr_)(const char *side, const char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgr2K(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormqrK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nc = NULL; double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dormqr_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dorgrq_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, int *lwork, /*FIXME*/void *info); +static void (*dormr2_)(const char *side, const char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgrqK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormr2K(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nc = NULL; double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dormr2_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dorgtr_)(const char *uplo, int *n, double *a, int *lda, double *tau, double *work, int *lwork, /*FIXME*/void *info); +static void (*dormr3_)(const char *side, const char *trans, int *m, int *n, int *k, int *l, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgtrK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormr3K(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jint l, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nc = NULL; double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dormr3_(__nside, __ntrans, &m, &n, &k, &l, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dorm2l_)(char *side, char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, /*FIXME*/void *info); +static void (*dormrq_)(const char *side, const char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorm2lK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormrqK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nc = NULL; double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dormrq_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dorm2r_)(char *side, char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, /*FIXME*/void *info); +static void (*dormrz_)(const char *side, const char *trans, int *m, int *n, int *k, int *l, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorm2rK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormrzK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jint l, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nc = NULL; double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dormrz_(__nside, __ntrans, &m, &n, &k, &l, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dormbr_)(char *vect, char *side, char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormbrK(JNIEnv *env, UNUSED jobject obj, - jstring vect, jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dormtr_)(const char *side, const char *uplo, const char *trans, int *m, int *n, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormtrK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring uplo, jstring trans, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__nuplo = NULL; const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nc = NULL; double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dormtr_(__nside, __nuplo, __ntrans, &m, &n, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dormhr_)(char *side, char *trans, int *m, int *n, int *ilo, int *ihi, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, /*FIXME*/void *info); +static void (*dpbcon_)(const char *uplo, int *n, int *kd, double *ab, int *ldab, double *anorm, double *rcond, double *work, int *iwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormhrK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring trans, jint m, jint n, jint ilo, jint ihi, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbconK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; double __nrcond = 0; int __ninfo = 0; double *__nab = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dpbcon_(__nuplo, &n, &kd, __nab + offsetab, &ldab, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dorml2_)(char *side, char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, /*FIXME*/void *info); +static void (*dpbequ_)(const char *uplo, int *n, int *kd, double *ab, int *ldab, double *s, double *scond, double *amax, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorml2K(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbequK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray s, jint offsets, jobject scond, jobject amax, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; double __nscond = 0; double __namax = 0; int __ninfo = 0; double *__nab = NULL; double *__ns = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nscond = (*env)->GetDoubleField(env, scond, doubleW_val_fieldID); + __namax = (*env)->GetDoubleField(env, amax, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + dpbequ_(__nuplo, &n, &kd, __nab + offsetab, &ldab, __ns + offsets, &__nscond, &__namax, &__ninfo); +done: + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, amax, doubleW_val_fieldID, __namax); + if (!failed) (*env)->SetDoubleField(env, scond, doubleW_val_fieldID, __nscond); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dormlq_)(char *side, char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormlqK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dpbrfs_)(const char *uplo, int *n, int *kd, int *nrhs, double *ab, int *ldab, double *afb, int *ldafb, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbrfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray afb, jint offsetafb, jint ldafb, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__nab = NULL; double *__nafb = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nafb = (*env)->GetPrimitiveArrayCritical(env, afb, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dpbrfs_(__nuplo, &n, &kd, &nrhs, __nab + offsetab, &ldab, __nafb + offsetafb, &ldafb, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nafb) (*env)->ReleasePrimitiveArrayCritical(env, afb, __nafb, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dormql_)(char *side, char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, /*FIXME*/void *info); +static void (*dpbstf_)(const char *uplo, int *n, int *kd, double *ab, int *ldab, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormqlK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbstfK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__nab = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + dpbstf_(__nuplo, &n, &kd, __nab + offsetab, &ldab, &__ninfo); +done: + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dormqr_)(char *side, char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, /*FIXME*/void *info); +static void (*dpbsv_)(const char *uplo, int *n, int *kd, int *nrhs, double *ab, int *ldab, double *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormqrK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbsvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__nab = NULL; double *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + dpbsv_(__nuplo, &n, &kd, &nrhs, __nab + offsetab, &ldab, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dormr2_)(char *side, char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormr2K(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dpbsvx_)(const char *fact, const char *uplo, int *n, int *kd, int *nrhs, double *ab, int *ldab, double *afb, int *ldafb, char *equed, double *s, double *b, int *ldb, double *x, int *ldx, double *rcond, double *ferr, double *berr, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbsvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring uplo, jint n, jint kd, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray afb, jint offsetafb, jint ldafb, jobject equed, jdoubleArray s, jint offsets, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nfact = NULL; const char *__nuplo = NULL; char *__nequed = NULL; jstring __jequed = NULL;; double __nrcond = 0; int __ninfo = 0; double *__nab = NULL; double *__nafb = NULL; double *__ns = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; + __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nafb = (*env)->GetPrimitiveArrayCritical(env, afb, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dpbsvx_(__nfact, __nuplo, &n, &kd, &nrhs, __nab + offsetab, &ldab, __nafb + offsetafb, &ldafb, __nequed, __ns + offsets, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nafb) (*env)->ReleasePrimitiveArrayCritical(env, afb, __nafb, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dormr3_)(char *side, char *trans, int *m, int *n, int *k, int *l, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, /*FIXME*/void *info); +static void (*dpbtf2_)(const char *uplo, int *n, int *kd, double *ab, int *ldab, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormr3K(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring trans, jint m, jint n, jint k, jint l, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbtf2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__nab = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + dpbtf2_(__nuplo, &n, &kd, __nab + offsetab, &ldab, &__ninfo); +done: + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dormrq_)(char *side, char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, /*FIXME*/void *info); +static void (*dpbtrf_)(const char *uplo, int *n, int *kd, double *ab, int *ldab, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormrqK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbtrfK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__nab = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + dpbtrf_(__nuplo, &n, &kd, __nab + offsetab, &ldab, &__ninfo); +done: + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dormrz_)(char *side, char *trans, int *m, int *n, int *k, int *l, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, /*FIXME*/void *info); +static void (*dpbtrs_)(const char *uplo, int *n, int *kd, int *nrhs, double *ab, int *ldab, double *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormrzK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring trans, jint m, jint n, jint k, jint l, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbtrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__nab = NULL; double *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + dpbtrs_(__nuplo, &n, &kd, &nrhs, __nab + offsetab, &ldab, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dormtr_)(char *side, const char *uplo, char *trans, int *m, int *n, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, /*FIXME*/void *info); +static void (*dpocon_)(const char *uplo, int *n, double *a, int *lda, double *anorm, double *rcond, double *work, int *iwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormtrK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring uplo, jstring trans, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpoconK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; double __nrcond = 0; int __ninfo = 0; double *__na = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dpocon_(__nuplo, &n, __na + offseta, &lda, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dpbcon_)(const char *uplo, int *n, int *kd, double *ab, int *ldab, double *anorm, /*FIXME*/void *rcond, double *work, int * iwork, /*FIXME*/void *info); +static void (*dpoequ_)(int *n, double *a, int *lda, double *s, double *scond, double *amax, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbconK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpoequK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray s, jint offsets, jobject scond, jobject amax, jobject info) { + jboolean failed = FALSE; + double __nscond = 0; double __namax = 0; int __ninfo = 0; double *__na = NULL; double *__ns = NULL; + __nscond = (*env)->GetDoubleField(env, scond, doubleW_val_fieldID); + __namax = (*env)->GetDoubleField(env, amax, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + dpoequ_(&n, __na + offseta, &lda, __ns + offsets, &__nscond, &__namax, &__ninfo); +done: + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, amax, doubleW_val_fieldID, __namax); + if (!failed) (*env)->SetDoubleField(env, scond, doubleW_val_fieldID, __nscond); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dpbequ_)(const char *uplo, int *n, int *kd, double *ab, int *ldab, double *s, /*FIXME*/void *scond, /*FIXME*/void *amax, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbequK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray s, jint offsets, jobject scond, jobject amax, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dporfs_)(const char *uplo, int *n, int *nrhs, double *a, int *lda, double *af, int *ldaf, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dporfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray af, jint offsetaf, jint ldaf, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; double *__naf = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dporfs_(__nuplo, &n, &nrhs, __na + offseta, &lda, __naf + offsetaf, &ldaf, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dpbrfs_)(const char *uplo, int *n, int *kd, int *nrhs, double *ab, int *ldab, double *afb, int *ldafb, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); +static void (*dposv_)(const char *uplo, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbrfsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint kd, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray afb, jint offsetafb, jint ldafb, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dposvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + dposv_(__nuplo, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dpbstf_)(const char *uplo, int *n, int *kd, double *ab, int *ldab, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbstfK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dposvx_)(const char *fact, const char *uplo, int *n, int *nrhs, double *a, int *lda, double *af, int *ldaf, char *equed, double *s, double *b, int *ldb, double *x, int *ldx, double *rcond, double *ferr, double *berr, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dposvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray af, jint offsetaf, jint ldaf, jobject equed, jdoubleArray s, jint offsets, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nfact = NULL; const char *__nuplo = NULL; char *__nequed = NULL; jstring __jequed = NULL;; double __nrcond = 0; int __ninfo = 0; double *__na = NULL; double *__naf = NULL; double *__ns = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; + __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dposvx_(__nfact, __nuplo, &n, &nrhs, __na + offseta, &lda, __naf + offsetaf, &ldaf, __nequed, __ns + offsets, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dpbsv_)(const char *uplo, int *n, int *kd, int *nrhs, double *ab, int *ldab, double *b, int *ldb, /*FIXME*/void *info); +static void (*dpotf2_)(const char *uplo, int *n, double *a, int *lda, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbsvK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint kd, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpotf2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + dpotf2_(__nuplo, &n, __na + offseta, &lda, &__ninfo); +done: + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dpbsvx_)(char *fact, const char *uplo, int *n, int *kd, int *nrhs, double *ab, int *ldab, double *afb, int *ldafb, jstring *equed, double *s, double *b, int *ldb, double *x, int *ldx, /*FIXME*/void *rcond, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); +static void (*dpotrf_)(const char *uplo, int *n, double *a, int *lda, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbsvxK(JNIEnv *env, UNUSED jobject obj, - jstring fact, jstring uplo, jint n, jint kd, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray afb, jint offsetafb, jint ldafb, jobject equed, jdoubleArray s, jint offsets, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpotrfK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + dpotrf_(__nuplo, &n, __na + offseta, &lda, &__ninfo); +done: + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dpbtf2_)(const char *uplo, int *n, int *kd, double *ab, int *ldab, /*FIXME*/void *info); +static void (*dpotri_)(const char *uplo, int *n, double *a, int *lda, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbtf2K(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpotriK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + dpotri_(__nuplo, &n, __na + offseta, &lda, &__ninfo); +done: + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dpbtrf_)(const char *uplo, int *n, int *kd, double *ab, int *ldab, /*FIXME*/void *info); +static void (*dpotrs_)(const char *uplo, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbtrfK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpotrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + dpotrs_(__nuplo, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dpbtrs_)(const char *uplo, int *n, int *kd, int *nrhs, double *ab, int *ldab, double *b, int *ldb, /*FIXME*/void *info); +static void (*dppcon_)(const char *uplo, int *n, double *ap, double *anorm, double *rcond, double *work, int *iwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbtrsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint kd, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dppconK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; double __nrcond = 0; int __ninfo = 0; double *__nap = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dppcon_(__nuplo, &n, __nap + offsetap, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dpocon_)(const char *uplo, int *n, double *a, int *lda, double *anorm, /*FIXME*/void *rcond, double *work, int * iwork, /*FIXME*/void *info); +static void (*dppequ_)(const char *uplo, int *n, double *ap, double *s, double *scond, double *amax, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpoconK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dppequK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray s, jint offsets, jobject scond, jobject amax, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; double __nscond = 0; double __namax = 0; int __ninfo = 0; double *__nap = NULL; double *__ns = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nscond = (*env)->GetDoubleField(env, scond, doubleW_val_fieldID); + __namax = (*env)->GetDoubleField(env, amax, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + dppequ_(__nuplo, &n, __nap + offsetap, __ns + offsets, &__nscond, &__namax, &__ninfo); +done: + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, amax, doubleW_val_fieldID, __namax); + if (!failed) (*env)->SetDoubleField(env, scond, doubleW_val_fieldID, __nscond); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dpoequ_)(int *n, double *a, int *lda, double *s, /*FIXME*/void *scond, /*FIXME*/void *amax, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpoequK(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray s, jint offsets, jobject scond, jobject amax, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dpprfs_)(const char *uplo, int *n, int *nrhs, double *ap, double *afp, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpprfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray afp, jint offsetafp, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; double *__nafp = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nafp = (*env)->GetPrimitiveArrayCritical(env, afp, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dpprfs_(__nuplo, &n, &nrhs, __nap + offsetap, __nafp + offsetafp, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nafp) (*env)->ReleasePrimitiveArrayCritical(env, afp, __nafp, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dporfs_)(const char *uplo, int *n, int *nrhs, double *a, int *lda, double *af, int *ldaf, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); +static void (*dppsv_)(const char *uplo, int *n, int *nrhs, double *ap, double *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dporfsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray af, jint offsetaf, jint ldaf, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dppsvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; double *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + dppsv_(__nuplo, &n, &nrhs, __nap + offsetap, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dposv_)(const char *uplo, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dposvK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dppsvx_)(const char *fact, const char *uplo, int *n, int *nrhs, double *ap, double *afp, char *equed, double *s, double *b, int *ldb, double *x, int *ldx, double *rcond, double *ferr, double *berr, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dppsvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray afp, jint offsetafp, jobject equed, jdoubleArray s, jint offsets, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nfact = NULL; const char *__nuplo = NULL; char *__nequed = NULL; jstring __jequed = NULL;; double __nrcond = 0; int __ninfo = 0; double *__nap = NULL; double *__nafp = NULL; double *__ns = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; + __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nafp = (*env)->GetPrimitiveArrayCritical(env, afp, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dppsvx_(__nfact, __nuplo, &n, &nrhs, __nap + offsetap, __nafp + offsetafp, __nequed, __ns + offsets, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nafp) (*env)->ReleasePrimitiveArrayCritical(env, afp, __nafp, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dposvx_)(char *fact, const char *uplo, int *n, int *nrhs, double *a, int *lda, double *af, int *ldaf, jstring *equed, double *s, double *b, int *ldb, double *x, int *ldx, /*FIXME*/void *rcond, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); +static void (*dpptrf_)(const char *uplo, int *n, double *ap, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dposvxK(JNIEnv *env, UNUSED jobject obj, - jstring fact, jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray af, jint offsetaf, jint ldaf, jobject equed, jdoubleArray s, jint offsets, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpptrfK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + dpptrf_(__nuplo, &n, __nap + offsetap, &__ninfo); +done: + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dpotf2_)(const char *uplo, int *n, double *a, int *lda, int *info); +static void (*dpptri_)(const char *uplo, int *n, double *ap, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpotf2K(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpptriK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + dpptri_(__nuplo, &n, __nap + offsetap, &__ninfo); +done: + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dpotrf_)(const char *uplo, int *n, double *a, int *lda, /*FIXME*/void *info); +static void (*dpptrs_)(const char *uplo, int *n, int *nrhs, double *ap, double *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpotrfK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpptrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; double *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + dpptrs_(__nuplo, &n, &nrhs, __nap + offsetap, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dpotri_)(const char *uplo, int *n, double *a, int *lda, /*FIXME*/void *info); +static void (*dptcon_)(int *n, double *d, double *e, double *anorm, double *rcond, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpotriK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dptconK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + double __nrcond = 0; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nwork = NULL; + __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dptcon_(&n, __nd + offsetd, __ne + offsete, &anorm, &__nrcond, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dpotrs_)(const char *uplo, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, int *info); +static void (*dpteqr_)(const char *compz, int *n, double *d, double *e, double *z, int *ldz, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpotrsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpteqrK(JNIEnv *env, UNUSED jobject obj, jstring compz, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__ncompz = NULL; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nz = NULL; double *__nwork = NULL; + if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dpteqr_(__ncompz, &n, __nd + offsetd, __ne + offsete, __nz + offsetz, &ldz, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ncompz) (*env)->ReleaseStringUTFChars(env, compz, __ncompz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dppcon_)(const char *uplo, int *n, double *ap, double *anorm, /*FIXME*/void *rcond, double *work, int * iwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dppconK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dptrfs_)(int *n, int *nrhs, double *d, double *e, double *df, double *ef, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dptrfsK(JNIEnv *env, UNUSED jobject obj, jint n, jint nrhs, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray df, jint offsetdf, jdoubleArray ef, jint offsetef, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__ndf = NULL; double *__nef = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__ndf = (*env)->GetPrimitiveArrayCritical(env, df, NULL))) goto fail; + if (!(__nef = (*env)->GetPrimitiveArrayCritical(env, ef, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dptrfs_(&n, &nrhs, __nd + offsetd, __ne + offsete, __ndf + offsetdf, __nef + offsetef, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nef) (*env)->ReleasePrimitiveArrayCritical(env, ef, __nef, failed ? JNI_ABORT : 0); + if (__ndf) (*env)->ReleasePrimitiveArrayCritical(env, df, __ndf, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dppequ_)(const char *uplo, int *n, double *ap, double *s, /*FIXME*/void *scond, /*FIXME*/void *amax, /*FIXME*/void *info); +static void (*dptsv_)(int *n, int *nrhs, double *d, double *e, double *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dppequK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray s, jint offsets, jobject scond, jobject amax, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dptsvK(JNIEnv *env, UNUSED jobject obj, jint n, jint nrhs, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nb = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + dptsv_(&n, &nrhs, __nd + offsetd, __ne + offsete, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dpprfs_)(const char *uplo, int *n, int *nrhs, double *ap, double *afp, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpprfsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray afp, jint offsetafp, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dptsvx_)(const char *fact, int *n, int *nrhs, double *d, double *e, double *df, double *ef, double *b, int *ldb, double *x, int *ldx, double *rcond, double *ferr, double *berr, double *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dptsvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jint n, jint nrhs, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray df, jint offsetdf, jdoubleArray ef, jint offsetef, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nfact = NULL; double __nrcond = 0; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__ndf = NULL; double *__nef = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; + __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__ndf = (*env)->GetPrimitiveArrayCritical(env, df, NULL))) goto fail; + if (!(__nef = (*env)->GetPrimitiveArrayCritical(env, ef, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dptsvx_(__nfact, &n, &nrhs, __nd + offsetd, __ne + offsete, __ndf + offsetdf, __nef + offsetef, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nef) (*env)->ReleasePrimitiveArrayCritical(env, ef, __nef, failed ? JNI_ABORT : 0); + if (__ndf) (*env)->ReleasePrimitiveArrayCritical(env, df, __ndf, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dppsv_)(const char *uplo, int *n, int *nrhs, double *ap, double *b, int *ldb, int *info); +static void (*dpttrf_)(int *n, double *d, double *e, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dppsvK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - jboolean failedOOM = FALSE; - const char *nuplo = NULL; double *nap = NULL, *nb = NULL; int ninfo = 0; - ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; - if (!(nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto failOOM; - if (!(nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto failOOM; - dppsv_(nuplo, &n, &nrhs, nap + offsetap, nb + offsetb, &ldb, &ninfo); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpttrfK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + dpttrf_(&n, __nd + offsetd, __ne + offsete, &__ninfo); done: - if (nb) (*env)->ReleasePrimitiveArrayCritical(env, b, nb, failedOOM ? JNI_ABORT : 0); - if (nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, nap, failedOOM ? JNI_ABORT : 0); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); - (*env)->SetIntField(env, info, intW_val_fieldID, ninfo); - if (failedOOM) throwOOM(env); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } -static void (*dppsvx_)(char *fact, const char *uplo, int *n, int *nrhs, double *ap, double *afp, jstring *equed, double *s, double *b, int *ldb, double *x, int *ldx, /*FIXME*/void *rcond, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); +static void (*dpttrs_)(int *n, int *nrhs, double *d, double *e, double *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dppsvxK(JNIEnv *env, UNUSED jobject obj, - jstring fact, jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray afp, jint offsetafp, jobject equed, jdoubleArray s, jint offsets, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpttrsK(JNIEnv *env, UNUSED jobject obj, jint n, jint nrhs, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nb = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + dpttrs_(&n, &nrhs, __nd + offsetd, __ne + offsete, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dpptrf_)(const char *uplo, int *n, double *ap, /*FIXME*/void *info); +static void (*dptts2_)(int *n, int *nrhs, double *d, double *e, double *b, int *ldb); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpptrfK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jdoubleArray ap, jint offsetap, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dptts2K(JNIEnv *env, UNUSED jobject obj, jint n, jint nrhs, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray b, jint offsetb, jint ldb) { + jboolean failed = FALSE; + double *__nd = NULL; double *__ne = NULL; double *__nb = NULL; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + dptts2_(&n, &nrhs, __nd + offsetd, __ne + offsete, __nb + offsetb, &ldb); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dpptri_)(const char *uplo, int *n, double *ap, int *info); +static void (*drscl_)(int *n, double *sa, double *sx, int *incx); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpptriK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jdoubleArray ap, jint offsetap, jobject info) { - jboolean failedOOM = FALSE; - const char *nuplo = NULL; double *nap = NULL; int ninfo = 0; - ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto failOOM; - if (!(nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto failOOM; - dpptri_(nuplo, &n, nap + offsetap, &ninfo); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_drsclK(JNIEnv *env, UNUSED jobject obj, jint n, jdouble sa, jdoubleArray sx, jint offsetsx, jint incx) { + jboolean failed = FALSE; + double *__nsx = NULL; + if (!(__nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto fail; + drscl_(&n, &sa, __nsx + offsetsx, &incx); done: - if (nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, nap, failedOOM ? JNI_ABORT : 0); - if (nuplo) (*env)->ReleaseStringUTFChars(env, uplo, nuplo); - (*env)->SetIntField(env, info, intW_val_fieldID, ninfo); - if (failedOOM) throwOOM(env); + if (__nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, __nsx, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); return; -failOOM: - failedOOM = TRUE; +fail: + failed = TRUE; goto done; } -static void (*dpptrs_)(const char *uplo, int *n, int *nrhs, double *ap, double *b, int *ldb, /*FIXME*/void *info); +static void (*dsbev_)(const char *jobz, const char *uplo, int *n, int *kd, double *ab, int *ldab, double *w, double *z, int *ldz, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpptrsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbevK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; double *__nab = NULL; double *__nw = NULL; double *__nz = NULL; double *__nwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dsbev_(__njobz, __nuplo, &n, &kd, __nab + offsetab, &ldab, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dptcon_)(int *n, double *d, double *e, double *anorm, /*FIXME*/void *rcond, double *work, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dptconK(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dsbevd_)(const char *jobz, const char *uplo, int *n, int *kd, double *ab, int *ldab, double *w, double *z, int *ldz, double *work, int *lwork, int *iwork, int *liwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbevdK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; double *__nab = NULL; double *__nw = NULL; double *__nz = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dsbevd_(__njobz, __nuplo, &n, &kd, __nab + offsetab, &ldab, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dpteqr_)(char *compz, int *n, double *d, double *e, double *z, int *ldz, double *work, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpteqrK(JNIEnv *env, UNUSED jobject obj, - jstring compz, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dsbevx_)(const char *jobz, const char *range, const char *uplo, int *n, int *kd, double *ab, int *ldab, double *q, int *ldq, double *vl, double *vu, int *il, int *iu, double *abstol, int *m, double *w, double *z, int *ldz, double *work, int *iwork, int *ifail, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbevxK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray q, jint offsetq, jint ldq, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nrange = NULL; const char *__nuplo = NULL; int __nm = 0; int __ninfo = 0; double *__nab = NULL; double *__nq = NULL; double *__nw = NULL; double *__nz = NULL; double *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + dsbevx_(__njobz, __nrange, __nuplo, &n, &kd, __nab + offsetab, &ldab, __nq + offsetq, &ldq, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); +done: + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dptrfs_)(int *n, int *nrhs, double *d, double *e, double *df, double *ef, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, /*FIXME*/void *info); +static void (*dsbgst_)(const char *vect, const char *uplo, int *n, int *ka, int *kb, double *ab, int *ldab, double *bb, int *ldbb, double *x, int *ldx, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dptrfsK(JNIEnv *env, UNUSED jobject obj, - jint n, jint nrhs, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray df, jint offsetdf, jdoubleArray ef, jint offsetef, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbgstK(JNIEnv *env, UNUSED jobject obj, jstring vect, jstring uplo, jint n, jint ka, jint kb, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray bb, jint offsetbb, jint ldbb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nvect = NULL; const char *__nuplo = NULL; int __ninfo = 0; double *__nab = NULL; double *__nbb = NULL; double *__nx = NULL; double *__nwork = NULL; + if (!(__nvect = (*env)->GetStringUTFChars(env, vect, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nbb = (*env)->GetPrimitiveArrayCritical(env, bb, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dsbgst_(__nvect, __nuplo, &n, &ka, &kb, __nab + offsetab, &ldab, __nbb + offsetbb, &ldbb, __nx + offsetx, &ldx, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nbb) (*env)->ReleasePrimitiveArrayCritical(env, bb, __nbb, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nvect) (*env)->ReleaseStringUTFChars(env, vect, __nvect); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dptsv_)(int *n, int *nrhs, double *d, double *e, double *b, int *ldb, int *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dptsvK(JNIEnv *env, UNUSED jobject obj, - jint n, jint nrhs, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dsbgv_)(const char *jobz, const char *uplo, int *n, int *ka, int *kb, double *ab, int *ldab, double *bb, int *ldbb, double *w, double *z, int *ldz, double *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbgvK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jint ka, jint kb, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray bb, jint offsetbb, jint ldbb, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; double *__nab = NULL; double *__nbb = NULL; double *__nw = NULL; double *__nz = NULL; double *__nwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nbb = (*env)->GetPrimitiveArrayCritical(env, bb, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dsbgv_(__njobz, __nuplo, &n, &ka, &kb, __nab + offsetab, &ldab, __nbb + offsetbb, &ldbb, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nbb) (*env)->ReleasePrimitiveArrayCritical(env, bb, __nbb, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dptsvx_)(char *fact, int *n, int *nrhs, double *d, double *e, double *df, double *ef, double *b, int *ldb, double *x, int *ldx, /*FIXME*/void *rcond, double *ferr, double *berr, double *work, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dptsvxK(JNIEnv *env, UNUSED jobject obj, - jstring fact, jint n, jint nrhs, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray df, jint offsetdf, jdoubleArray ef, jint offsetef, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dsbgvd_)(const char *jobz, const char *uplo, int *n, int *ka, int *kb, double *ab, int *ldab, double *bb, int *ldbb, double *w, double *z, int *ldz, double *work, int *lwork, int *iwork, int *liwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbgvdK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jint ka, jint kb, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray bb, jint offsetbb, jint ldbb, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; double *__nab = NULL; double *__nbb = NULL; double *__nw = NULL; double *__nz = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nbb = (*env)->GetPrimitiveArrayCritical(env, bb, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dsbgvd_(__njobz, __nuplo, &n, &ka, &kb, __nab + offsetab, &ldab, __nbb + offsetbb, &ldbb, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nbb) (*env)->ReleasePrimitiveArrayCritical(env, bb, __nbb, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dpttrf_)(int *n, double *d, double *e, int *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpttrfK(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dsbgvx_)(const char *jobz, const char *range, const char *uplo, int *n, int *ka, int *kb, double *ab, int *ldab, double *bb, int *ldbb, double *q, int *ldq, double *vl, double *vu, int *il, int *iu, double *abstol, int *m, double *w, double *z, int *ldz, double *work, int *iwork, int *ifail, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbgvxK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jstring uplo, jint n, jint ka, jint kb, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray bb, jint offsetbb, jint ldbb, jdoubleArray q, jint offsetq, jint ldq, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nrange = NULL; const char *__nuplo = NULL; int __nm = 0; int __ninfo = 0; double *__nab = NULL; double *__nbb = NULL; double *__nq = NULL; double *__nw = NULL; double *__nz = NULL; double *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nbb = (*env)->GetPrimitiveArrayCritical(env, bb, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + dsbgvx_(__njobz, __nrange, __nuplo, &n, &ka, &kb, __nab + offsetab, &ldab, __nbb + offsetbb, &ldbb, __nq + offsetq, &ldq, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); +done: + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nbb) (*env)->ReleasePrimitiveArrayCritical(env, bb, __nbb, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dpttrs_)(int *n, int *nrhs, double *d, double *e, double *b, int *ldb, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpttrsK(JNIEnv *env, UNUSED jobject obj, - jint n, jint nrhs, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dsbtrd_)(const char *vect, const char *uplo, int *n, int *kd, double *ab, int *ldab, double *d, double *e, double *q, int *ldq, double *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbtrdK(JNIEnv *env, UNUSED jobject obj, jstring vect, jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nvect = NULL; const char *__nuplo = NULL; int __ninfo = 0; double *__nab = NULL; double *__nd = NULL; double *__ne = NULL; double *__nq = NULL; double *__nwork = NULL; + if (!(__nvect = (*env)->GetStringUTFChars(env, vect, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dsbtrd_(__nvect, __nuplo, &n, &kd, __nab + offsetab, &ldab, __nd + offsetd, __ne + offsete, __nq + offsetq, &ldq, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nvect) (*env)->ReleaseStringUTFChars(env, vect, __nvect); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dptts2_)(int *n, int *nrhs, double *d, double *e, double *b, int *ldb); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dptts2K(JNIEnv *env, UNUSED jobject obj, - jint n, jint nrhs, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray b, jint offsetb, jint ldb) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dsgesv_)(int *n, int *nrhs, double *a, int *lda, int *ipiv, double *b, int *ldb, double *x, int *ldx, double *work, float *swork, int *iter, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsgesvK(JNIEnv *env, UNUSED jobject obj, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray work, jint offsetwork, jfloatArray swork, jint offsetswork, jobject iter, jobject info) { + jboolean failed = FALSE; + int __niter = 0; int __ninfo = 0; double *__na = NULL; int *__nipiv = NULL; double *__nb = NULL; double *__nx = NULL; double *__nwork = NULL; float *__nswork = NULL; + __niter = (*env)->GetIntField(env, iter, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nswork = (*env)->GetPrimitiveArrayCritical(env, swork, NULL))) goto fail; + dsgesv_(&n, &nrhs, __na + offseta, &lda, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nwork + offsetwork, __nswork + offsetswork, &__niter, &__ninfo); +done: + if (__nswork) (*env)->ReleasePrimitiveArrayCritical(env, swork, __nswork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, iter, intW_val_fieldID, __niter); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*drscl_)(int *n, double *sa, double *sx, int *incx); +static void (*dspcon_)(const char *uplo, int *n, double *ap, int *ipiv, double *anorm, double *rcond, double *work, int *iwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_drsclK(JNIEnv *env, UNUSED jobject obj, - jint n, jdouble sa, jdoubleArray sx, jint offsetsx, jint incx) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspconK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; double __nrcond = 0; int __ninfo = 0; double *__nap = NULL; int *__nipiv = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dspcon_(__nuplo, &n, __nap + offsetap, __nipiv + offsetipiv, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsbev_)(char *jobz, const char *uplo, int *n, int *kd, double *ab, int *ldab, double *w, double *z, int *ldz, double *work, /*FIXME*/void *info); +static void (*dspev_)(const char *jobz, const char *uplo, int *n, double *ap, double *w, double *z, int *ldz, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbevK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspevK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; double *__nw = NULL; double *__nz = NULL; double *__nwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dspev_(__njobz, __nuplo, &n, __nap + offsetap, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsbevd_)(char *jobz, const char *uplo, int *n, int *kd, double *ab, int *ldab, double *w, double *z, int *ldz, double *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbevdK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dspevd_)(const char *jobz, const char *uplo, int *n, double *ap, double *w, double *z, int *ldz, double *work, int *lwork, int *iwork, int *liwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspevdK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; double *__nw = NULL; double *__nz = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dspevd_(__njobz, __nuplo, &n, __nap + offsetap, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsbevx_)(char *jobz, char *range, const char *uplo, int *n, int *kd, double *ab, int *ldab, double *q, int *ldq, double *vl, double *vu, int *il, int *iu, double *abstol, /*FIXME*/void *m, double *w, double *z, int *ldz, double *work, int * iwork, int * ifail, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbevxK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring range, jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray q, jint offsetq, jint ldq, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dspevx_)(const char *jobz, const char *range, const char *uplo, int *n, double *ap, double *vl, double *vu, int *il, int *iu, double *abstol, int *m, double *w, double *z, int *ldz, double *work, int *iwork, int *ifail, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspevxK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nrange = NULL; const char *__nuplo = NULL; int __nm = 0; int __ninfo = 0; double *__nap = NULL; double *__nw = NULL; double *__nz = NULL; double *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + dspevx_(__njobz, __nrange, __nuplo, &n, __nap + offsetap, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); +done: + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsbgst_)(char *vect, const char *uplo, int *n, int *ka, int *kb, double *ab, int *ldab, double *bb, int *ldbb, double *x, int *ldx, double *work, /*FIXME*/void *info); +static void (*dspgst_)(int *itype, const char *uplo, int *n, double *ap, double *bp, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbgstK(JNIEnv *env, UNUSED jobject obj, - jstring vect, jstring uplo, jint n, jint ka, jint kb, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray bb, jint offsetbb, jint ldbb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspgstK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray bp, jint offsetbp, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; double *__nbp = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nbp = (*env)->GetPrimitiveArrayCritical(env, bp, NULL))) goto fail; + dspgst_(&itype, __nuplo, &n, __nap + offsetap, __nbp + offsetbp, &__ninfo); +done: + if (__nbp) (*env)->ReleasePrimitiveArrayCritical(env, bp, __nbp, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsbgv_)(char *jobz, const char *uplo, int *n, int *ka, int *kb, double *ab, int *ldab, double *bb, int *ldbb, double *w, double *z, int *ldz, double *work, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbgvK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring uplo, jint n, jint ka, jint kb, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray bb, jint offsetbb, jint ldbb, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dspgv_)(int *itype, const char *jobz, const char *uplo, int *n, double *ap, double *bp, double *w, double *z, int *ldz, double *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspgvK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring jobz, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray bp, jint offsetbp, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; double *__nbp = NULL; double *__nw = NULL; double *__nz = NULL; double *__nwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nbp = (*env)->GetPrimitiveArrayCritical(env, bp, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dspgv_(&itype, __njobz, __nuplo, &n, __nap + offsetap, __nbp + offsetbp, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nbp) (*env)->ReleasePrimitiveArrayCritical(env, bp, __nbp, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsbgvd_)(char *jobz, const char *uplo, int *n, int *ka, int *kb, double *ab, int *ldab, double *bb, int *ldbb, double *w, double *z, int *ldz, double *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbgvdK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring uplo, jint n, jint ka, jint kb, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray bb, jint offsetbb, jint ldbb, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dspgvd_)(int *itype, const char *jobz, const char *uplo, int *n, double *ap, double *bp, double *w, double *z, int *ldz, double *work, int *lwork, int *iwork, int *liwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspgvdK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring jobz, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray bp, jint offsetbp, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; double *__nbp = NULL; double *__nw = NULL; double *__nz = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nbp = (*env)->GetPrimitiveArrayCritical(env, bp, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dspgvd_(&itype, __njobz, __nuplo, &n, __nap + offsetap, __nbp + offsetbp, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nbp) (*env)->ReleasePrimitiveArrayCritical(env, bp, __nbp, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsbgvx_)(char *jobz, char *range, const char *uplo, int *n, int *ka, int *kb, double *ab, int *ldab, double *bb, int *ldbb, double *q, int *ldq, double *vl, double *vu, int *il, int *iu, double *abstol, /*FIXME*/void *m, double *w, double *z, int *ldz, double *work, int * iwork, int * ifail, /*FIXME*/void *info); +static void (*dspgvx_)(int *itype, const char *jobz, const char *range, const char *uplo, int *n, double *ap, double *bp, double *vl, double *vu, int *il, int *iu, double *abstol, int *m, double *w, double *z, int *ldz, double *work, int *iwork, int *ifail, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspgvxK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring jobz, jstring range, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray bp, jint offsetbp, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nrange = NULL; const char *__nuplo = NULL; int __nm = 0; int __ninfo = 0; double *__nap = NULL; double *__nbp = NULL; double *__nw = NULL; double *__nz = NULL; double *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nbp = (*env)->GetPrimitiveArrayCritical(env, bp, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + dspgvx_(&itype, __njobz, __nrange, __nuplo, &n, __nap + offsetap, __nbp + offsetbp, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); +done: + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nbp) (*env)->ReleasePrimitiveArrayCritical(env, bp, __nbp, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; +} -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbgvxK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring range, jstring uplo, jint n, jint ka, jint kb, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray bb, jint offsetbb, jint ldbb, jdoubleArray q, jint offsetq, jint ldq, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dsprfs_)(const char *uplo, int *n, int *nrhs, double *ap, double *afp, int *ipiv, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsprfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray afp, jint offsetafp, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; double *__nafp = NULL; int *__nipiv = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nafp = (*env)->GetPrimitiveArrayCritical(env, afp, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dsprfs_(__nuplo, &n, &nrhs, __nap + offsetap, __nafp + offsetafp, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nafp) (*env)->ReleasePrimitiveArrayCritical(env, afp, __nafp, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsbtrd_)(char *vect, const char *uplo, int *n, int *kd, double *ab, int *ldab, double *d, double *e, double *q, int *ldq, double *work, /*FIXME*/void *info); +static void (*dspsv_)(const char *uplo, int *n, int *nrhs, double *ap, int *ipiv, double *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbtrdK(JNIEnv *env, UNUSED jobject obj, - jstring vect, jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspsvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; int *__nipiv = NULL; double *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + dspsv_(__nuplo, &n, &nrhs, __nap + offsetap, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsgesv_)(int *n, int *nrhs, double *a, int *lda, int * ipiv, double *b, int *ldb, double *x, int *ldx, double *work, float *swork, /*FIXME*/void *iter, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsgesvK(JNIEnv *env, UNUSED jobject obj, - jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray work, jint offsetwork, jfloatArray swork, jint offsetswork, jobject iter, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dspsvx_)(const char *fact, const char *uplo, int *n, int *nrhs, double *ap, double *afp, int *ipiv, double *b, int *ldb, double *x, int *ldx, double *rcond, double *ferr, double *berr, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspsvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray afp, jint offsetafp, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nfact = NULL; const char *__nuplo = NULL; double __nrcond = 0; int __ninfo = 0; double *__nap = NULL; double *__nafp = NULL; int *__nipiv = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nafp = (*env)->GetPrimitiveArrayCritical(env, afp, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dspsvx_(__nfact, __nuplo, &n, &nrhs, __nap + offsetap, __nafp + offsetafp, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nafp) (*env)->ReleasePrimitiveArrayCritical(env, afp, __nafp, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dspcon_)(const char *uplo, int *n, double *ap, int * ipiv, double *anorm, /*FIXME*/void *rcond, double *work, int * iwork, /*FIXME*/void *info); +static void (*dsptrd_)(const char *uplo, int *n, double *ap, double *d, double *e, double *tau, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspconK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jdoubleArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsptrdK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray tau, jint offsettau, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; double *__nd = NULL; double *__ne = NULL; double *__ntau = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + dsptrd_(__nuplo, &n, __nap + offsetap, __nd + offsetd, __ne + offsete, __ntau + offsettau, &__ninfo); +done: + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dspev_)(char *jobz, const char *uplo, int *n, double *ap, double *w, double *z, int *ldz, double *work, /*FIXME*/void *info); +static void (*dsptrf_)(const char *uplo, int *n, double *ap, int *ipiv, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspevK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsptrfK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; int *__nipiv = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + dsptrf_(__nuplo, &n, __nap + offsetap, __nipiv + offsetipiv, &__ninfo); +done: + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dspevd_)(char *jobz, const char *uplo, int *n, double *ap, double *w, double *z, int *ldz, double *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); +static void (*dsptri_)(const char *uplo, int *n, double *ap, int *ipiv, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspevdK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsptriK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; int *__nipiv = NULL; double *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dsptri_(__nuplo, &n, __nap + offsetap, __nipiv + offsetipiv, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dspevx_)(char *jobz, char *range, const char *uplo, int *n, double *ap, double *vl, double *vu, int *il, int *iu, double *abstol, /*FIXME*/void *m, double *w, double *z, int *ldz, double *work, int * iwork, int * ifail, int *info); +static void (*dsptrs_)(const char *uplo, int *n, int *nrhs, double *ap, int *ipiv, double *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspevxK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring range, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsptrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; int *__nipiv = NULL; double *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + dsptrs_(__nuplo, &n, &nrhs, __nap + offsetap, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dspgst_)(int *itype, const char *uplo, int *n, double *ap, double *bp, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspgstK(JNIEnv *env, UNUSED jobject obj, - jint itype, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray bp, jint offsetbp, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dstebz_)(const char *range, const char *order, int *n, double *vl, double *vu, int *il, int *iu, double *abstol, double *d, double *e, int *m, int *nsplit, double *w, int *iblock, int *isplit, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstebzK(JNIEnv *env, UNUSED jobject obj, jstring range, jstring order, jint n, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jobject m, jobject nsplit, jdoubleArray w, jint offsetw, jintArray iblock, jint offsetiblock, jintArray isplit, jint offsetisplit, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nrange = NULL; const char *__norder = NULL; int __nm = 0; int __nnsplit = 0; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nw = NULL; int *__niblock = NULL; int *__nisplit = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + if (!(__norder = (*env)->GetStringUTFChars(env, order, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __nnsplit = (*env)->GetIntField(env, nsplit, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__niblock = (*env)->GetPrimitiveArrayCritical(env, iblock, NULL))) goto fail; + if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dstebz_(__nrange, __norder, &n, &vl, &vu, &il, &iu, &abstol, __nd + offsetd, __ne + offsete, &__nm, &__nnsplit, __nw + offsetw, __niblock + offsetiblock, __nisplit + offsetisplit, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, failed ? JNI_ABORT : 0); + if (__niblock) (*env)->ReleasePrimitiveArrayCritical(env, iblock, __niblock, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, nsplit, intW_val_fieldID, __nnsplit); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__norder) (*env)->ReleaseStringUTFChars(env, order, __norder); + if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dspgv_)(int *itype, char *jobz, const char *uplo, int *n, double *ap, double *bp, double *w, double *z, int *ldz, double *work, /*FIXME*/void *info); +static void (*dstedc_)(const char *compz, int *n, double *d, double *e, double *z, int *ldz, double *work, int *lwork, int *iwork, int *liwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspgvK(JNIEnv *env, UNUSED jobject obj, - jint itype, jstring jobz, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray bp, jint offsetbp, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstedcK(JNIEnv *env, UNUSED jobject obj, jstring compz, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + jboolean failed = FALSE; + const char *__ncompz = NULL; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nz = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dstedc_(__ncompz, &n, __nd + offsetd, __ne + offsete, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ncompz) (*env)->ReleaseStringUTFChars(env, compz, __ncompz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dspgvd_)(int *itype, char *jobz, const char *uplo, int *n, double *ap, double *bp, double *w, double *z, int *ldz, double *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspgvdK(JNIEnv *env, UNUSED jobject obj, - jint itype, jstring jobz, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray bp, jint offsetbp, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dstegr_)(const char *jobz, const char *range, int *n, double *d, double *e, double *vl, double *vu, int *il, int *iu, double *abstol, int *m, double *w, double *z, int *ldz, int *isuppz, double *work, int *lwork, int *iwork, int *liwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstegrK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nrange = NULL; int __nm = 0; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nw = NULL; double *__nz = NULL; int *__nisuppz = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dstegr_(__njobz, __nrange, &n, __nd + offsetd, __ne + offsete, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nisuppz + offsetisuppz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dspgvx_)(int *itype, char *jobz, char *range, const char *uplo, int *n, double *ap, double *bp, double *vl, double *vu, int *il, int *iu, double *abstol, /*FIXME*/void *m, double *w, double *z, int *ldz, double *work, int * iwork, int * ifail, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspgvxK(JNIEnv *env, UNUSED jobject obj, - jint itype, jstring jobz, jstring range, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray bp, jint offsetbp, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dstein_)(int *n, double *d, double *e, int *m, double *w, int *iblock, int *isplit, double *z, int *ldz, double *work, int *iwork, int *ifail, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsteinK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jint m, jdoubleArray w, jint offsetw, jintArray iblock, jint offsetiblock, jintArray isplit, jint offsetisplit, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nw = NULL; int *__niblock = NULL; int *__nisplit = NULL; double *__nz = NULL; double *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__niblock = (*env)->GetPrimitiveArrayCritical(env, iblock, NULL))) goto fail; + if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + dstein_(&n, __nd + offsetd, __ne + offsete, &m, __nw + offsetw, __niblock + offsetiblock, __nisplit + offsetisplit, __nz + offsetz, &ldz, __nwork + offsetwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); +done: + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, failed ? JNI_ABORT : 0); + if (__niblock) (*env)->ReleasePrimitiveArrayCritical(env, iblock, __niblock, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsprfs_)(const char *uplo, int *n, int *nrhs, double *ap, double *afp, int * ipiv, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsprfsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray afp, jint offsetafp, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dstemr_)(const char *jobz, const char *range, int *n, double *d, double *e, double *vl, double *vu, int *il, int *iu, int *m, double *w, double *z, int *ldz, int *nzc, int *isuppz, int *tryrac, double *work, int *lwork, int *iwork, int *liwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstemrK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdouble vl, jdouble vu, jint il, jint iu, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jint nzc, jintArray isuppz, jint offsetisuppz, jobject tryrac, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nrange = NULL; int __nm = 0; int __ntryrac = 0; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nw = NULL; double *__nz = NULL; int *__nisuppz = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ntryrac = (*env)->GetBooleanField(env, tryrac, booleanW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dstemr_(__njobz, __nrange, &n, __nd + offsetd, __ne + offsete, &vl, &vu, &il, &iu, &__nm, __nw + offsetw, __nz + offsetz, &ldz, &nzc, __nisuppz + offsetisuppz, &__ntryrac, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetBooleanField(env, tryrac, booleanW_val_fieldID, __ntryrac); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dspsv_)(const char *uplo, int *n, int *nrhs, double *ap, int * ipiv, double *b, int *ldb, /*FIXME*/void *info); +static void (*dsteqr_)(const char *compz, int *n, double *d, double *e, double *z, int *ldz, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspsvK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsteqrK(JNIEnv *env, UNUSED jobject obj, jstring compz, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__ncompz = NULL; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nz = NULL; double *__nwork = NULL; + if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dsteqr_(__ncompz, &n, __nd + offsetd, __ne + offsete, __nz + offsetz, &ldz, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ncompz) (*env)->ReleaseStringUTFChars(env, compz, __ncompz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dspsvx_)(char *fact, const char *uplo, int *n, int *nrhs, double *ap, double *afp, int * ipiv, double *b, int *ldb, double *x, int *ldx, /*FIXME*/void *rcond, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); +static void (*dsterf_)(int *n, double *d, double *e, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspsvxK(JNIEnv *env, UNUSED jobject obj, - jstring fact, jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray afp, jint offsetafp, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsterfK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + dsterf_(&n, __nd + offsetd, __ne + offsete, &__ninfo); +done: + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsptrd_)(const char *uplo, int *n, double *ap, double *d, double *e, double *tau, /*FIXME*/void *info); +static void (*dstev_)(const char *jobz, int *n, double *d, double *e, double *z, int *ldz, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsptrdK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray tau, jint offsettau, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstevK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nz = NULL; double *__nwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dstev_(__njobz, &n, __nd + offsetd, __ne + offsete, __nz + offsetz, &ldz, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsptrf_)(const char *uplo, int *n, double *ap, int * ipiv, /*FIXME*/void *info); +static void (*dstevd_)(const char *jobz, int *n, double *d, double *e, double *z, int *ldz, double *work, int *lwork, int *iwork, int *liwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsptrfK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jdoubleArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstevdK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nz = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dstevd_(__njobz, &n, __nd + offsetd, __ne + offsete, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsptri_)(const char *uplo, int *n, double *ap, int * ipiv, double *work, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsptriK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jdoubleArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dstevr_)(const char *jobz, const char *range, int *n, double *d, double *e, double *vl, double *vu, int *il, int *iu, double *abstol, int *m, double *w, double *z, int *ldz, int *isuppz, double *work, int *lwork, int *iwork, int *liwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstevrK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nrange = NULL; int __nm = 0; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nw = NULL; double *__nz = NULL; int *__nisuppz = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dstevr_(__njobz, __nrange, &n, __nd + offsetd, __ne + offsete, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nisuppz + offsetisuppz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsptrs_)(const char *uplo, int *n, int *nrhs, double *ap, int * ipiv, double *b, int *ldb, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsptrsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dstevx_)(const char *jobz, const char *range, int *n, double *d, double *e, double *vl, double *vu, int *il, int *iu, double *abstol, int *m, double *w, double *z, int *ldz, double *work, int *iwork, int *ifail, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstevxK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nrange = NULL; int __nm = 0; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nw = NULL; double *__nz = NULL; double *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + dstevx_(__njobz, __nrange, &n, __nd + offsetd, __ne + offsete, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); +done: + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dstebz_)(char *range, char *order, int *n, double *vl, double *vu, int *il, int *iu, double *abstol, double *d, double *e, /*FIXME*/void *m, /*FIXME*/void *nsplit, double *w, int * iblock, int * isplit, double *work, int * iwork, /*FIXME*/void *info); +static void (*dsycon_)(const char *uplo, int *n, double *a, int *lda, int *ipiv, double *anorm, double *rcond, double *work, int *iwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstebzK(JNIEnv *env, UNUSED jobject obj, - jstring range, jstring order, jint n, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jobject m, jobject nsplit, jdoubleArray w, jint offsetw, jintArray iblock, jint offsetiblock, jintArray isplit, jint offsetisplit, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyconK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; double __nrcond = 0; int __ninfo = 0; double *__na = NULL; int *__nipiv = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dsycon_(__nuplo, &n, __na + offseta, &lda, __nipiv + offsetipiv, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dstedc_)(char *compz, int *n, double *d, double *e, double *z, int *ldz, double *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); +static void (*dsyev_)(const char *jobz, const char *uplo, int *n, double *a, int *lda, double *w, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstedcK(JNIEnv *env, UNUSED jobject obj, - jstring compz, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyevK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray w, jint offsetw, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; double *__nw = NULL; double *__nwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dsyev_(__njobz, __nuplo, &n, __na + offseta, &lda, __nw + offsetw, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dstegr_)(char *jobz, char *range, int *n, double *d, double *e, double *vl, double *vu, int *il, int *iu, double *abstol, /*FIXME*/void *m, double *w, double *z, int *ldz, int * isuppz, double *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); +static void (*dsyevd_)(const char *jobz, const char *uplo, int *n, double *a, int *lda, double *w, double *work, int *lwork, int *iwork, int *liwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstegrK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring range, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyevdK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray w, jint offsetw, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; double *__nw = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dsyevd_(__njobz, __nuplo, &n, __na + offseta, &lda, __nw + offsetw, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dstein_)(int *n, double *d, double *e, int *m, double *w, int * iblock, int * isplit, double *z, int *ldz, double *work, int * iwork, int * ifail, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsteinK(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jint m, jdoubleArray w, jint offsetw, jintArray iblock, jint offsetiblock, jintArray isplit, jint offsetisplit, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dsyevr_)(const char *jobz, const char *range, const char *uplo, int *n, double *a, int *lda, double *vl, double *vu, int *il, int *iu, double *abstol, int *m, double *w, double *z, int *ldz, int *isuppz, double *work, int *lwork, int *iwork, int *liwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyevrK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nrange = NULL; const char *__nuplo = NULL; int __nm = 0; int __ninfo = 0; double *__na = NULL; double *__nw = NULL; double *__nz = NULL; int *__nisuppz = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dsyevr_(__njobz, __nrange, __nuplo, &n, __na + offseta, &lda, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nisuppz + offsetisuppz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dstemr_)(char *jobz, char *range, int *n, double *d, double *e, double *vl, double *vu, int *il, int *iu, /*FIXME*/void *m, double *w, double *z, int *ldz, int *nzc, int * isuppz, /*FIXME*/void *tryrac, double *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstemrK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring range, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdouble vl, jdouble vu, jint il, jint iu, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jint nzc, jintArray isuppz, jint offsetisuppz, jobject tryrac, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dsyevx_)(const char *jobz, const char *range, const char *uplo, int *n, double *a, int *lda, double *vl, double *vu, int *il, int *iu, double *abstol, int *m, double *w, double *z, int *ldz, double *work, int *lwork, int *iwork, int *ifail, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyevxK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nrange = NULL; const char *__nuplo = NULL; int __nm = 0; int __ninfo = 0; double *__na = NULL; double *__nw = NULL; double *__nz = NULL; double *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + dsyevx_(__njobz, __nrange, __nuplo, &n, __na + offseta, &lda, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); +done: + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsteqr_)(char *compz, int *n, double *d, double *e, double *z, int *ldz, double *work, /*FIXME*/void *info); +static void (*dsygs2_)(int *itype, const char *uplo, int *n, double *a, int *lda, double *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsteqrK(JNIEnv *env, UNUSED jobject obj, - jstring compz, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsygs2K(JNIEnv *env, UNUSED jobject obj, jint itype, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + dsygs2_(&itype, __nuplo, &n, __na + offseta, &lda, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsterf_)(int *n, double *d, double *e, /*FIXME*/void *info); +static void (*dsygst_)(int *itype, const char *uplo, int *n, double *a, int *lda, double *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsterfK(JNIEnv *env, UNUSED jobject obj, - jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsygstK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + dsygst_(&itype, __nuplo, &n, __na + offseta, &lda, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dstev_)(char *jobz, int *n, double *d, double *e, double *z, int *ldz, double *work, /*FIXME*/void *info); +static void (*dsygv_)(int *itype, const char *jobz, const char *uplo, int *n, double *a, int *lda, double *b, int *ldb, double *w, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstevK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsygvK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring jobz, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray w, jint offsetw, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nw = NULL; double *__nwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dsygv_(&itype, __njobz, __nuplo, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nw + offsetw, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dstevd_)(char *jobz, int *n, double *d, double *e, double *z, int *ldz, double *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstevdK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dsygvd_)(int *itype, const char *jobz, const char *uplo, int *n, double *a, int *lda, double *b, int *ldb, double *w, double *work, int *lwork, int *iwork, int *liwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsygvdK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring jobz, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray w, jint offsetw, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nw = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dsygvd_(&itype, __njobz, __nuplo, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nw + offsetw, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dstevr_)(char *jobz, char *range, int *n, double *d, double *e, double *vl, double *vu, int *il, int *iu, double *abstol, /*FIXME*/void *m, double *w, double *z, int *ldz, int * isuppz, double *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstevrK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring range, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dsygvx_)(int *itype, const char *jobz, const char *range, const char *uplo, int *n, double *a, int *lda, double *b, int *ldb, double *vl, double *vu, int *il, int *iu, double *abstol, int *m, double *w, double *z, int *ldz, double *work, int *lwork, int *iwork, int *ifail, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsygvxK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring jobz, jstring range, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nrange = NULL; const char *__nuplo = NULL; int __nm = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nw = NULL; double *__nz = NULL; double *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + dsygvx_(&itype, __njobz, __nrange, __nuplo, &n, __na + offseta, &lda, __nb + offsetb, &ldb, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); +done: + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dstevx_)(char *jobz, char *range, int *n, double *d, double *e, double *vl, double *vu, int *il, int *iu, double *abstol, /*FIXME*/void *m, double *w, double *z, int *ldz, double *work, int * iwork, int * ifail, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstevxK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring range, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dsyrfs_)(const char *uplo, int *n, int *nrhs, double *a, int *lda, double *af, int *ldaf, int *ipiv, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyrfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; double *__naf = NULL; int *__nipiv = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dsyrfs_(__nuplo, &n, &nrhs, __na + offseta, &lda, __naf + offsetaf, &ldaf, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsycon_)(const char *uplo, int *n, double *a, int *lda, int * ipiv, double *anorm, /*FIXME*/void *rcond, double *work, int * iwork, /*FIXME*/void *info); +static void (*dsysv_)(const char *uplo, int *n, int *nrhs, double *a, int *lda, int *ipiv, double *b, int *ldb, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyconK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsysvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; int *__nipiv = NULL; double *__nb = NULL; double *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dsysv_(__nuplo, &n, &nrhs, __na + offseta, &lda, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsyev_)(char *jobz, const char *uplo, int *n, double *a, int *lda, double *w, double *work, int *lwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyevK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray w, jint offsetw, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dsysvx_)(const char *fact, const char *uplo, int *n, int *nrhs, double *a, int *lda, double *af, int *ldaf, int *ipiv, double *b, int *ldb, double *x, int *ldx, double *rcond, double *ferr, double *berr, double *work, int *lwork, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsysvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nfact = NULL; const char *__nuplo = NULL; double __nrcond = 0; int __ninfo = 0; double *__na = NULL; double *__naf = NULL; int *__nipiv = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dsysvx_(__nfact, __nuplo, &n, &nrhs, __na + offseta, &lda, __naf + offsetaf, &ldaf, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsyevd_)(char *jobz, const char *uplo, int *n, double *a, int *lda, double *w, double *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); +static void (*dsytd2_)(const char *uplo, int *n, double *a, int *lda, double *d, double *e, double *tau, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyevdK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray w, jint offsetw, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytd2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray tau, jint offsettau, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; double *__nd = NULL; double *__ne = NULL; double *__ntau = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + dsytd2_(__nuplo, &n, __na + offseta, &lda, __nd + offsetd, __ne + offsete, __ntau + offsettau, &__ninfo); +done: + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsyevr_)(char *jobz, char *range, const char *uplo, int *n, double *a, int *lda, double *vl, double *vu, int *il, int *iu, double *abstol, /*FIXME*/void *m, double *w, double *z, int *ldz, int * isuppz, double *work, int *lwork, int *iwork, int *liwork, int *info); +static void (*dsytf2_)(const char *uplo, int *n, double *a, int *lda, int *ipiv, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyevrK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring range, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytf2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; int *__nipiv = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + dsytf2_(__nuplo, &n, __na + offseta, &lda, __nipiv + offsetipiv, &__ninfo); +done: + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsyevx_)(char *jobz, char *range, const char *uplo, int *n, double *a, int *lda, double *vl, double *vu, int *il, int *iu, double *abstol, /*FIXME*/void *m, double *w, double *z, int *ldz, double *work, int *lwork, int * iwork, int * ifail, /*FIXME*/void *info); +static void (*dsytrd_)(const char *uplo, int *n, double *a, int *lda, double *d, double *e, double *tau, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyevxK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring range, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytrdK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; double *__nd = NULL; double *__ne = NULL; double *__ntau = NULL; double *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dsytrd_(__nuplo, &n, __na + offseta, &lda, __nd + offsetd, __ne + offsete, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsygs2_)(int *itype, const char *uplo, int *n, double *a, int *lda, double *b, int *ldb, /*FIXME*/void *info); +static void (*dsytrf_)(const char *uplo, int *n, double *a, int *lda, int *ipiv, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsygs2K(JNIEnv *env, UNUSED jobject obj, - jint itype, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytrfK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; int *__nipiv = NULL; double *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dsytrf_(__nuplo, &n, __na + offseta, &lda, __nipiv + offsetipiv, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsygst_)(int *itype, const char *uplo, int *n, double *a, int *lda, double *b, int *ldb, /*FIXME*/void *info); +static void (*dsytri_)(const char *uplo, int *n, double *a, int *lda, int *ipiv, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsygstK(JNIEnv *env, UNUSED jobject obj, - jint itype, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytriK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; int *__nipiv = NULL; double *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dsytri_(__nuplo, &n, __na + offseta, &lda, __nipiv + offsetipiv, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsygv_)(int *itype, char *jobz, const char *uplo, int *n, double *a, int *lda, double *b, int *ldb, double *w, double *work, int *lwork, /*FIXME*/void *info); +static void (*dsytrs_)(const char *uplo, int *n, int *nrhs, double *a, int *lda, int *ipiv, double *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsygvK(JNIEnv *env, UNUSED jobject obj, - jint itype, jstring jobz, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray w, jint offsetw, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; int *__nipiv = NULL; double *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + dsytrs_(__nuplo, &n, &nrhs, __na + offseta, &lda, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsygvd_)(int *itype, char *jobz, const char *uplo, int *n, double *a, int *lda, double *b, int *ldb, double *w, double *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsygvdK(JNIEnv *env, UNUSED jobject obj, - jint itype, jstring jobz, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray w, jint offsetw, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dtbcon_)(const char *norm, const char *uplo, const char *diag, int *n, int *kd, double *ab, int *ldab, double *rcond, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtbconK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jstring diag, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nnorm = NULL; const char *__nuplo = NULL; const char *__ndiag = NULL; double __nrcond = 0; int __ninfo = 0; double *__nab = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dtbcon_(__nnorm, __nuplo, __ndiag, &n, &kd, __nab + offsetab, &ldab, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsygvx_)(int *itype, char *jobz, char *range, const char *uplo, int *n, double *a, int *lda, double *b, int *ldb, double *vl, double *vu, int *il, int *iu, double *abstol, /*FIXME*/void *m, double *w, double *z, int *ldz, double *work, int *lwork, int * iwork, int * ifail, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsygvxK(JNIEnv *env, UNUSED jobject obj, - jint itype, jstring jobz, jstring range, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dtbrfs_)(const char *uplo, const char *trans, const char *diag, int *n, int *kd, int *nrhs, double *ab, int *ldab, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtbrfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint kd, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; int __ninfo = 0; double *__nab = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dtbrfs_(__nuplo, __ntrans, __ndiag, &n, &kd, &nrhs, __nab + offsetab, &ldab, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsyrfs_)(const char *uplo, int *n, int *nrhs, double *a, int *lda, double *af, int *ldaf, int * ipiv, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); +static void (*dtbtrs_)(const char *uplo, const char *trans, const char *diag, int *n, int *kd, int *nrhs, double *ab, int *ldab, double *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyrfsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtbtrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint kd, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; int __ninfo = 0; double *__nab = NULL; double *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + dtbtrs_(__nuplo, __ntrans, __ndiag, &n, &kd, &nrhs, __nab + offsetab, &ldab, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsysv_)(const char *uplo, int *n, int *nrhs, double *a, int *lda, int * ipiv, double *b, int *ldb, double *work, int *lwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsysvK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dtgevc_)(const char *side, const char *howmny, int *select, int *n, double *s, int *lds, double *p, int *ldp, double *vl, int *ldvl, double *vr, int *ldvr, int *mm, int *m, double *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgevcK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jdoubleArray s, jint offsets, jint lds, jdoubleArray p, jint offsetp, jint ldp, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jint mm, jobject m, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__nhowmny = NULL; int __nm = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; double *__ns = NULL; double *__np = NULL; double *__nvl = NULL; double *__nvr = NULL; double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__np = (*env)->GetPrimitiveArrayCritical(env, p, NULL))) goto fail; + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dtgevc_(__nside, __nhowmny, __nselect + offsetselect, &n, __ns + offsets, &lds, __np + offsetp, &ldp, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, &mm, &__nm, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); + if (__np) (*env)->ReleasePrimitiveArrayCritical(env, p, __np, failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nhowmny) (*env)->ReleaseStringUTFChars(env, howmny, __nhowmny); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsysvx_)(char *fact, const char *uplo, int *n, int *nrhs, double *a, int *lda, double *af, int *ldaf, int * ipiv, double *b, int *ldb, double *x, int *ldx, /*FIXME*/void *rcond, double *ferr, double *berr, double *work, int *lwork, int * iwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsysvxK(JNIEnv *env, UNUSED jobject obj, - jstring fact, jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dtgex2_)(int *wantq, int *wantz, int *n, double *a, int *lda, double *b, int *ldb, double *q, int *ldq, double *z, int *ldz, int *j1, int *n1, int *n2, double *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgex2K(JNIEnv *env, UNUSED jobject obj, jboolean wantq, jboolean wantz, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray z, jint offsetz, jint ldz, jint j1, jint n1, jint n2, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __nwantq; int __nwantz; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nq = NULL; double *__nz = NULL; double *__nwork = NULL; + __nwantq = wantq; + __nwantz = wantz; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dtgex2_(&__nwantq, &__nwantz, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nq + offsetq, &ldq, __nz + offsetz, &ldz, &j1, &n1, &n2, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) wantz = __nwantz; + if (!failed) wantq = __nwantq; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsytd2_)(const char *uplo, int *n, double *a, int *lda, double *d, double *e, double *tau, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytd2K(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray tau, jint offsettau, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dtgexc_)(int *wantq, int *wantz, int *n, double *a, int *lda, double *b, int *ldb, double *q, int *ldq, double *z, int *ldz, int *ifst, int *ilst, double *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgexcK(JNIEnv *env, UNUSED jobject obj, jboolean wantq, jboolean wantz, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray z, jint offsetz, jint ldz, jobject ifst, jobject ilst, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __nwantq; int __nwantz; int __nifst = 0; int __nilst = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nq = NULL; double *__nz = NULL; double *__nwork = NULL; + __nwantq = wantq; + __nwantz = wantz; + __nifst = (*env)->GetIntField(env, ifst, intW_val_fieldID); + __nilst = (*env)->GetIntField(env, ilst, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dtgexc_(&__nwantq, &__nwantz, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nq + offsetq, &ldq, __nz + offsetz, &ldz, &__nifst, &__nilst, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, ilst, intW_val_fieldID, __nilst); + if (!failed) (*env)->SetIntField(env, ifst, intW_val_fieldID, __nifst); + if (!failed) wantz = __nwantz; + if (!failed) wantq = __nwantq; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsytf2_)(const char *uplo, int *n, double *a, int *lda, int * ipiv, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytf2K(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dtgsen_)(int *ijob, int *wantq, int *wantz, int *select, int *n, double *a, int *lda, double *b, int *ldb, double *alphar, double *alphai, double *beta, double *q, int *ldq, double *z, int *ldz, int *m, double *pl, double *pr, double *dif, double *work, int *lwork, int *iwork, int *liwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgsenK(JNIEnv *env, UNUSED jobject obj, jint ijob, jboolean wantq, jboolean wantz, jbooleanArray select, jint offsetselect, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray z, jint offsetz, jint ldz, jobject m, jobject pl, jobject pr, jdoubleArray dif, jint offsetdif, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + jboolean failed = FALSE; + int __nwantq; int __nwantz; int __nm = 0; double __npl = 0; double __npr = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; double *__na = NULL; double *__nb = NULL; double *__nalphar = NULL; double *__nalphai = NULL; double *__nbeta = NULL; double *__nq = NULL; double *__nz = NULL; double *__ndif = NULL; double *__nwork = NULL; int *__niwork = NULL; + __nwantq = wantq; + __nwantz = wantz; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __npl = (*env)->GetDoubleField(env, pl, doubleW_val_fieldID); + __npr = (*env)->GetDoubleField(env, pr, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) goto fail; + if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) goto fail; + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__ndif = (*env)->GetPrimitiveArrayCritical(env, dif, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dtgsen_(&ijob, &__nwantq, &__nwantz, __nselect + offsetselect, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nalphar + offsetalphar, __nalphai + offsetalphai, __nbeta + offsetbeta, __nq + offsetq, &ldq, __nz + offsetz, &ldz, &__nm, &__npl, &__npr, __ndif + offsetdif, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ndif) (*env)->ReleasePrimitiveArrayCritical(env, dif, __ndif, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); + if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, failed ? JNI_ABORT : 0); + if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, pr, doubleW_val_fieldID, __npr); + if (!failed) (*env)->SetDoubleField(env, pl, doubleW_val_fieldID, __npl); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (!failed) wantz = __nwantz; + if (!failed) wantq = __nwantq; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsytrd_)(const char *uplo, int *n, double *a, int *lda, double *d, double *e, double *tau, double *work, int *lwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytrdK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dtgsja_)(const char *jobu, const char *jobv, const char *jobq, int *m, int *p, int *n, int *k, int *l, double *a, int *lda, double *b, int *ldb, double *tola, double *tolb, double *alpha, double *beta, double *u, int *ldu, double *v, int *ldv, double *q, int *ldq, double *work, int *ncycle, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgsjaK(JNIEnv *env, UNUSED jobject obj, jstring jobu, jstring jobv, jstring jobq, jint m, jint p, jint n, jint k, jint l, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble tola, jdouble tolb, jdoubleArray alpha, jint offsetalpha, jdoubleArray beta, jint offsetbeta, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray work, jint offsetwork, jobject ncycle, jobject info) { + jboolean failed = FALSE; + const char *__njobu = NULL; const char *__njobv = NULL; const char *__njobq = NULL; int __nncycle = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nalpha = NULL; double *__nbeta = NULL; double *__nu = NULL; double *__nv = NULL; double *__nq = NULL; double *__nwork = NULL; + if (!(__njobu = (*env)->GetStringUTFChars(env, jobu, NULL))) goto fail; + if (!(__njobv = (*env)->GetStringUTFChars(env, jobv, NULL))) goto fail; + if (!(__njobq = (*env)->GetStringUTFChars(env, jobq, NULL))) goto fail; + __nncycle = (*env)->GetIntField(env, ncycle, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nalpha = (*env)->GetPrimitiveArrayCritical(env, alpha, NULL))) goto fail; + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dtgsja_(__njobu, __njobv, __njobq, &m, &p, &n, &k, &l, __na + offseta, &lda, __nb + offsetb, &ldb, &tola, &tolb, __nalpha + offsetalpha, __nbeta + offsetbeta, __nu + offsetu, &ldu, __nv + offsetv, &ldv, __nq + offsetq, &ldq, __nwork + offsetwork, &__nncycle, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); + if (__nalpha) (*env)->ReleasePrimitiveArrayCritical(env, alpha, __nalpha, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, ncycle, intW_val_fieldID, __nncycle); + if (__njobq) (*env)->ReleaseStringUTFChars(env, jobq, __njobq); + if (__njobv) (*env)->ReleaseStringUTFChars(env, jobv, __njobv); + if (__njobu) (*env)->ReleaseStringUTFChars(env, jobu, __njobu); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsytrf_)(const char *uplo, int *n, double *a, int *lda, int * ipiv, double *work, int *lwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytrfK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dtgsna_)(const char *job, const char *howmny, int *select, int *n, double *a, int *lda, double *b, int *ldb, double *vl, int *ldvl, double *vr, int *ldvr, double *s, double *dif, int *mm, int *m, double *work, int *lwork, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgsnaK(JNIEnv *env, UNUSED jobject obj, jstring job, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jdoubleArray s, jint offsets, jdoubleArray dif, jint offsetdif, jint mm, jobject m, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__njob = NULL; const char *__nhowmny = NULL; int __nm = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; double *__na = NULL; double *__nb = NULL; double *__nvl = NULL; double *__nvr = NULL; double *__ns = NULL; double *__ndif = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; + if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__ndif = (*env)->GetPrimitiveArrayCritical(env, dif, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dtgsna_(__njob, __nhowmny, __nselect + offsetselect, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, __ns + offsets, __ndif + offsetdif, &mm, &__nm, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ndif) (*env)->ReleasePrimitiveArrayCritical(env, dif, __ndif, failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nhowmny) (*env)->ReleaseStringUTFChars(env, howmny, __nhowmny); + if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsytri_)(const char *uplo, int *n, double *a, int *lda, int * ipiv, double *work, /*FIXME*/void *info); +static void (*dtgsy2_)(const char *trans, int *ijob, int *m, int *n, double *a, int *lda, double *b, int *ldb, double *c, int *Ldc, double *d, int *ldd, double *e, int *lde, double *f, int *ldf, double *scale, double *rdsum, double *rdscal, int *iwork, int *pq, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgsy2K(JNIEnv *env, UNUSED jobject obj, jstring trans, jint ijob, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray d, jint offsetd, jint ldd, jdoubleArray e, jint offsete, jint lde, jdoubleArray f, jint offsetf, jint ldf, jobject scale, jobject rdsum, jobject rdscal, jintArray iwork, jint offsetiwork, jobject pq, jobject info) { + jboolean failed = FALSE; + const char *__ntrans = NULL; double __nscale = 0; double __nrdsum = 0; double __nrdscal = 0; int __npq = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nc = NULL; double *__nd = NULL; double *__ne = NULL; double *__nf = NULL; int *__niwork = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __nscale = (*env)->GetDoubleField(env, scale, doubleW_val_fieldID); + __nrdsum = (*env)->GetDoubleField(env, rdsum, doubleW_val_fieldID); + __nrdscal = (*env)->GetDoubleField(env, rdscal, doubleW_val_fieldID); + __npq = (*env)->GetIntField(env, pq, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nf = (*env)->GetPrimitiveArrayCritical(env, f, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dtgsy2_(__ntrans, &ijob, &m, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nc + offsetc, &Ldc, __nd + offsetd, &ldd, __ne + offsete, &lde, __nf + offsetf, &ldf, &__nscale, &__nrdsum, &__nrdscal, __niwork + offsetiwork, &__npq, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nf) (*env)->ReleasePrimitiveArrayCritical(env, f, __nf, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, pq, intW_val_fieldID, __npq); + if (!failed) (*env)->SetDoubleField(env, rdscal, doubleW_val_fieldID, __nrdscal); + if (!failed) (*env)->SetDoubleField(env, rdsum, doubleW_val_fieldID, __nrdsum); + if (!failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; +} -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytriK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dtgsyl_)(const char *trans, int *ijob, int *m, int *n, double *a, int *lda, double *b, int *ldb, double *c, int *Ldc, double *d, int *ldd, double *e, int *lde, double *f, int *ldf, double *scale, double *dif, double *work, int *lwork, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgsylK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint ijob, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray d, jint offsetd, jint ldd, jdoubleArray e, jint offsete, jint lde, jdoubleArray f, jint offsetf, jint ldf, jobject scale, jobject dif, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__ntrans = NULL; double __nscale = 0; double __ndif = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nc = NULL; double *__nd = NULL; double *__ne = NULL; double *__nf = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __nscale = (*env)->GetDoubleField(env, scale, doubleW_val_fieldID); + __ndif = (*env)->GetDoubleField(env, dif, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nf = (*env)->GetPrimitiveArrayCritical(env, f, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dtgsyl_(__ntrans, &ijob, &m, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nc + offsetc, &Ldc, __nd + offsetd, &ldd, __ne + offsete, &lde, __nf + offsetf, &ldf, &__nscale, &__ndif, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nf) (*env)->ReleasePrimitiveArrayCritical(env, f, __nf, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, dif, doubleW_val_fieldID, __ndif); + if (!failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dsytrs_)(const char *uplo, int *n, int *nrhs, double *a, int *lda, int * ipiv, double *b, int *ldb, /*FIXME*/void *info); +static void (*dtpcon_)(const char *norm, const char *uplo, const char *diag, int *n, double *ap, double *rcond, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtpconK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jstring diag, jint n, jdoubleArray ap, jint offsetap, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nnorm = NULL; const char *__nuplo = NULL; const char *__ndiag = NULL; double __nrcond = 0; int __ninfo = 0; double *__nap = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dtpcon_(__nnorm, __nuplo, __ndiag, &n, __nap + offsetap, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; +} -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytrsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dtprfs_)(const char *uplo, const char *trans, const char *diag, int *n, int *nrhs, double *ap, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtprfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; int __ninfo = 0; double *__nap = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dtprfs_(__nuplo, __ntrans, __ndiag, &n, &nrhs, __nap + offsetap, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dtbcon_)(char *norm, const char *uplo, char *diag, int *n, int *kd, double *ab, int *ldab, /*FIXME*/void *rcond, double *work, int * iwork, /*FIXME*/void *info); +static void (*dtptri_)(const char *uplo, const char *diag, int *n, double *ap, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtbconK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jstring uplo, jstring diag, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtptriK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring diag, jint n, jdoubleArray ap, jint offsetap, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; const char *__ndiag = NULL; int __ninfo = 0; double *__nap = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + dtptri_(__nuplo, __ndiag, &n, __nap + offsetap, &__ninfo); +done: + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dtbrfs_)(const char *uplo, char *trans, char *diag, int *n, int *kd, int *nrhs, double *ab, int *ldab, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); +static void (*dtptrs_)(const char *uplo, const char *trans, const char *diag, int *n, int *nrhs, double *ap, double *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtbrfsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring trans, jstring diag, jint n, jint kd, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtptrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; int __ninfo = 0; double *__nap = NULL; double *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + dtptrs_(__nuplo, __ntrans, __ndiag, &n, &nrhs, __nap + offsetap, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dtbtrs_)(const char *uplo, char *trans, char *diag, int *n, int *kd, int *nrhs, double *ab, int *ldab, double *b, int *ldb, /*FIXME*/void *info); +static void (*dtrcon_)(const char *norm, const char *uplo, const char *diag, int *n, double *a, int *lda, double *rcond, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrconK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jstring diag, jint n, jdoubleArray a, jint offseta, jint lda, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nnorm = NULL; const char *__nuplo = NULL; const char *__ndiag = NULL; double __nrcond = 0; int __ninfo = 0; double *__na = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dtrcon_(__nnorm, __nuplo, __ndiag, &n, __na + offseta, &lda, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; +} -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtbtrsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring trans, jstring diag, jint n, jint kd, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dtrevc_)(const char *side, const char *howmny, int *select, int *n, double *t, int *ldt, double *vl, int *ldvl, double *vr, int *ldvr, int *mm, int *m, double *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrevcK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jdoubleArray t, jint offsett, jint ldt, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jint mm, jobject m, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__nhowmny = NULL; int __nm = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; double *__nt = NULL; double *__nvl = NULL; double *__nvr = NULL; double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dtrevc_(__nside, __nhowmny, __nselect + offsetselect, &n, __nt + offsett, &ldt, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, &mm, &__nm, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nhowmny) (*env)->ReleaseStringUTFChars(env, howmny, __nhowmny); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dtgevc_)(char *side, char *howmny, int *select, int *n, double *s, int *lds, double *p, int *ldp, double *vl, int *ldvl, double *vr, int *ldvr, int *mm, /*FIXME*/void *m, double *work, /*FIXME*/void *info); +static void (*dtrexc_)(const char *compq, int *n, double *t, int *ldt, double *q, int *ldq, int *ifst, int *ilst, double *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgevcK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jdoubleArray s, jint offsets, jint lds, jdoubleArray p, jint offsetp, jint ldp, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jint mm, jobject m, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrexcK(JNIEnv *env, UNUSED jobject obj, jstring compq, jint n, jdoubleArray t, jint offsett, jint ldt, jdoubleArray q, jint offsetq, jint ldq, jobject ifst, jobject ilst, jdoubleArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__ncompq = NULL; int __nifst = 0; int __nilst = 0; int __ninfo = 0; double *__nt = NULL; double *__nq = NULL; double *__nwork = NULL; + if (!(__ncompq = (*env)->GetStringUTFChars(env, compq, NULL))) goto fail; + __nifst = (*env)->GetIntField(env, ifst, intW_val_fieldID); + __nilst = (*env)->GetIntField(env, ilst, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dtrexc_(__ncompq, &n, __nt + offsett, &ldt, __nq + offsetq, &ldq, &__nifst, &__nilst, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, ilst, intW_val_fieldID, __nilst); + if (!failed) (*env)->SetIntField(env, ifst, intW_val_fieldID, __nifst); + if (__ncompq) (*env)->ReleaseStringUTFChars(env, compq, __ncompq); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dtgex2_)(int *wantq, int *wantz, int *n, double *a, int *lda, double *b, int *ldb, double *q, int *ldq, double *z, int *ldz, int *j1, int *n1, int *n2, double *work, int *lwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgex2K(JNIEnv *env, UNUSED jobject obj, - jboolean wantq, jboolean wantz, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray z, jint offsetz, jint ldz, jint j1, jint n1, jint n2, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dtrrfs_)(const char *uplo, const char *trans, const char *diag, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrrfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dtrrfs_(__nuplo, __ntrans, __ndiag, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dtgexc_)(int *wantq, int *wantz, int *n, double *a, int *lda, double *b, int *ldb, double *q, int *ldq, double *z, int *ldz, /*FIXME*/void *ifst, /*FIXME*/void *ilst, double *work, int *lwork, /*FIXME*/void *info); +static void (*dtrsen_)(const char *job, const char *compq, int *select, int *n, double *t, int *ldt, double *q, int *ldq, double *wr, double *wi, int *m, double *s, double *sep, double *work, int *lwork, int *iwork, int *liwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrsenK(JNIEnv *env, UNUSED jobject obj, jstring job, jstring compq, jbooleanArray select, jint offsetselect, jint n, jdoubleArray t, jint offsett, jint ldt, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jobject m, jobject s, jobject sep, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + jboolean failed = FALSE; + const char *__njob = NULL; const char *__ncompq = NULL; int __nm = 0; double __ns = 0; double __nsep = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; double *__nt = NULL; double *__nq = NULL; double *__nwr = NULL; double *__nwi = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; + if (!(__ncompq = (*env)->GetStringUTFChars(env, compq, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ns = (*env)->GetDoubleField(env, s, doubleW_val_fieldID); + __nsep = (*env)->GetDoubleField(env, sep, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dtrsen_(__njob, __ncompq, __nselect + offsetselect, &n, __nt + offsett, &ldt, __nq + offsetq, &ldq, __nwr + offsetwr, __nwi + offsetwi, &__nm, &__ns, &__nsep, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, sep, doubleW_val_fieldID, __nsep); + if (!failed) (*env)->SetDoubleField(env, s, doubleW_val_fieldID, __ns); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__ncompq) (*env)->ReleaseStringUTFChars(env, compq, __ncompq); + if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; +} -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgexcK(JNIEnv *env, UNUSED jobject obj, - jboolean wantq, jboolean wantz, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray z, jint offsetz, jint ldz, jobject ifst, jobject ilst, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*dtrsna_)(const char *job, const char *howmny, int *select, int *n, double *t, int *ldt, double *vl, int *ldvl, double *vr, int *ldvr, double *s, double *sep, int *mm, int *m, double *work, int *ldwork, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrsnaK(JNIEnv *env, UNUSED jobject obj, jstring job, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jdoubleArray t, jint offsett, jint ldt, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jdoubleArray s, jint offsets, jdoubleArray sep, jint offsetsep, jint mm, jobject m, jdoubleArray work, jint offsetwork, jint ldwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__njob = NULL; const char *__nhowmny = NULL; int __nm = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; double *__nt = NULL; double *__nvl = NULL; double *__nvr = NULL; double *__ns = NULL; double *__nsep = NULL; double *__nwork = NULL; int *__niwork = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; + if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__nsep = (*env)->GetPrimitiveArrayCritical(env, sep, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + dtrsna_(__njob, __nhowmny, __nselect + offsetselect, &n, __nt + offsett, &ldt, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, __ns + offsets, __nsep + offsetsep, &mm, &__nm, __nwork + offsetwork, &ldwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nsep) (*env)->ReleasePrimitiveArrayCritical(env, sep, __nsep, failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nhowmny) (*env)->ReleaseStringUTFChars(env, howmny, __nhowmny); + if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dtgsen_)(int *ijob, int *wantq, int *wantz, int *select, int *n, double *a, int *lda, double *b, int *ldb, double *alphar, double *alphai, double *beta, double *q, int *ldq, double *z, int *ldz, /*FIXME*/void *m, /*FIXME*/void *pl, /*FIXME*/void *pr, double *dif, double *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); +static void (*dtrsyl_)(const char *trana, const char *tranb, int *isgn, int *m, int *n, double *a, int *lda, double *b, int *ldb, double *c, int *Ldc, double *scale, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgsenK(JNIEnv *env, UNUSED jobject obj, - jint ijob, jboolean wantq, jboolean wantz, jbooleanArray select, jint offsetselect, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray z, jint offsetz, jint ldz, jobject m, jobject pl, jobject pr, jdoubleArray dif, jint offsetdif, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrsylK(JNIEnv *env, UNUSED jobject obj, jstring trana, jstring tranb, jint isgn, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray c, jint offsetc, jint Ldc, jobject scale, jobject info) { + jboolean failed = FALSE; + const char *__ntrana = NULL; const char *__ntranb = NULL; double __nscale = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nc = NULL; + if (!(__ntrana = (*env)->GetStringUTFChars(env, trana, NULL))) goto fail; + if (!(__ntranb = (*env)->GetStringUTFChars(env, tranb, NULL))) goto fail; + __nscale = (*env)->GetDoubleField(env, scale, doubleW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + dtrsyl_(__ntrana, __ntranb, &isgn, &m, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nc + offsetc, &Ldc, &__nscale, &__ninfo); +done: + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); + if (__ntranb) (*env)->ReleaseStringUTFChars(env, tranb, __ntranb); + if (__ntrana) (*env)->ReleaseStringUTFChars(env, trana, __ntrana); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dtgsja_)(char *jobu, char *jobv, char *jobq, int *m, int *p, int *n, int *k, int *l, double *a, int *lda, double *b, int *ldb, double *tola, double *tolb, double *alpha, double *beta, double *u, int *ldu, double *v, int *ldv, double *q, int *ldq, double *work, /*FIXME*/void *ncycle, /*FIXME*/void *info); +static void (*dtrti2_)(const char *uplo, const char *diag, int *n, double *a, int *lda, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgsjaK(JNIEnv *env, UNUSED jobject obj, - jstring jobu, jstring jobv, jstring jobq, jint m, jint p, jint n, jint k, jint l, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble tola, jdouble tolb, jdoubleArray alpha, jint offsetalpha, jdoubleArray beta, jint offsetbeta, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray work, jint offsetwork, jobject ncycle, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrti2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring diag, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; const char *__ndiag = NULL; int __ninfo = 0; double *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + dtrti2_(__nuplo, __ndiag, &n, __na + offseta, &lda, &__ninfo); +done: + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dtgsna_)(char *job, char *howmny, int *select, int *n, double *a, int *lda, double *b, int *ldb, double *vl, int *ldvl, double *vr, int *ldvr, double *s, double *dif, int *mm, /*FIXME*/void *m, double *work, int *lwork, int * iwork, /*FIXME*/void *info); +static void (*dtrtri_)(const char *uplo, const char *diag, int *n, double *a, int *lda, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgsnaK(JNIEnv *env, UNUSED jobject obj, - jstring job, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jdoubleArray s, jint offsets, jdoubleArray dif, jint offsetdif, jint mm, jobject m, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrtriK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring diag, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; const char *__ndiag = NULL; int __ninfo = 0; double *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + dtrtri_(__nuplo, __ndiag, &n, __na + offseta, &lda, &__ninfo); +done: + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dtgsy2_)(char *trans, int *ijob, int *m, int *n, double *a, int *lda, double *b, int *ldb, double *c, int *Ldc, double *d, int *ldd, double *e, int *lde, double *f, int *ldf, /*FIXME*/void *scale, /*FIXME*/void *rdsum, /*FIXME*/void *rdscal, int * iwork, /*FIXME*/void *pq, /*FIXME*/void *info); +static void (*dtrtrs_)(const char *uplo, const char *trans, const char *diag, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgsy2K(JNIEnv *env, UNUSED jobject obj, - jstring trans, jint ijob, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray d, jint offsetd, jint ldd, jdoubleArray e, jint offsete, jint lde, jdoubleArray f, jint offsetf, jint ldf, jobject scale, jobject rdsum, jobject rdscal, jintArray iwork, jint offsetiwork, jobject pq, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrtrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + dtrtrs_(__nuplo, __ntrans, __ndiag, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dtgsyl_)(char *trans, int *ijob, int *m, int *n, double *a, int *lda, double *b, int *ldb, double *c, int *Ldc, double *d, int *ldd, double *e, int *lde, double *f, int *ldf, double *scale, /*FIXME*/void *dif, double *work, int *lwork, int *iwork, int *info); +static void (*dtzrqf_)(int *m, int *n, double *a, int *lda, double *tau, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgsylK(JNIEnv *env, UNUSED jobject obj, - jstring trans, jint ijob, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray d, jint offsetd, jint ldd, jdoubleArray e, jint offsete, jint lde, jdoubleArray f, jint offsetf, jint ldf, jobject scale, jobject dif, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtzrqfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + dtzrqf_(&m, &n, __na + offseta, &lda, __ntau + offsettau, &__ninfo); +done: + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dtpcon_)(char *norm, const char *uplo, char *diag, int *n, double *ap, /*FIXME*/void *rcond, double *work, int * iwork, /*FIXME*/void *info); +static void (*dtzrzf_)(int *m, int *n, double *a, int *lda, double *tau, double *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtpconK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jstring uplo, jstring diag, jint n, jdoubleArray ap, jint offsetap, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtzrzfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + dtzrzf_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dtprfs_)(const char *uplo, char *trans, char *diag, int *n, int *nrhs, double *ap, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); +static int (*ieeeck_)(int *ispec, float *zero, float *one); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtprfsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} +jint Java_dev_ludovic_netlib_lapack_JNILAPACK_ieeeckK(JNIEnv *env, UNUSED jobject obj, jint ispec, jfloat zero, jfloat one) { + jint __ret; + jboolean failed = FALSE; + -static void (*dtptri_)(const char *uplo, char *diag, int *n, double *ap, /*FIXME*/void *info); + __ret = ieeeck_(&ispec, &zero, &one); +done: -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtptriK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring diag, jint n, jdoubleArray ap, jint offsetap, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*dtptrs_)(const char *uplo, char *trans, char *diag, int *n, int *nrhs, double *ap, double *b, int *ldb, /*FIXME*/void *info); +static int (*ilaenv_)(int *ispec, const char *name, const char *opts, int *n1, int *n2, int *n3, int *n4); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtptrsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +jint Java_dev_ludovic_netlib_lapack_JNILAPACK_ilaenvK(JNIEnv *env, UNUSED jobject obj, jint ispec, jstring name, jstring opts, jint n1, jint n2, jint n3, jint n4) { + jint __ret; + jboolean failed = FALSE; + const char *__nname = NULL; const char *__nopts = NULL; + if (!(__nname = (*env)->GetStringUTFChars(env, name, NULL))) goto fail; + if (!(__nopts = (*env)->GetStringUTFChars(env, opts, NULL))) goto fail; + __ret = ilaenv_(&ispec, __nname, __nopts, &n1, &n2, &n3, &n4); +done: + if (__nopts) (*env)->ReleaseStringUTFChars(env, opts, __nopts); + if (__nname) (*env)->ReleaseStringUTFChars(env, name, __nname); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*dtrcon_)(char *norm, const char *uplo, char *diag, int *n, double *a, int *lda, /*FIXME*/void *rcond, double *work, int * iwork, /*FIXME*/void *info); +static void (*ilaver_)(int *vers_major, int *vers_minor, int *vers_patch); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrconK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jstring uplo, jstring diag, jint n, jdoubleArray a, jint offseta, jint lda, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ilaverK(JNIEnv *env, UNUSED jobject obj, jobject vers_major, jobject vers_minor, jobject vers_patch) { + jboolean failed = FALSE; + int __nvers_major = 0; int __nvers_minor = 0; int __nvers_patch = 0; + __nvers_major = (*env)->GetIntField(env, vers_major, intW_val_fieldID); + __nvers_minor = (*env)->GetIntField(env, vers_minor, intW_val_fieldID); + __nvers_patch = (*env)->GetIntField(env, vers_patch, intW_val_fieldID); + ilaver_(&__nvers_major, &__nvers_minor, &__nvers_patch); +done: + if (!failed) (*env)->SetIntField(env, vers_patch, intW_val_fieldID, __nvers_patch); + if (!failed) (*env)->SetIntField(env, vers_minor, intW_val_fieldID, __nvers_minor); + if (!failed) (*env)->SetIntField(env, vers_major, intW_val_fieldID, __nvers_major); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dtrevc_)(char *side, char *howmny, int *select, int *n, double *t, int *ldt, double *vl, int *ldvl, double *vr, int *ldvr, int *mm, /*FIXME*/void *m, double *work, /*FIXME*/void *info); +static int (*iparmq_)(int *ispec, const char *name, const char *opts, int *n, int *ilo, int *ihi, int *lwork); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrevcK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jdoubleArray t, jint offsett, jint ldt, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jint mm, jobject m, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +jint Java_dev_ludovic_netlib_lapack_JNILAPACK_iparmqK(JNIEnv *env, UNUSED jobject obj, jint ispec, jstring name, jstring opts, jint n, jint ilo, jint ihi, jint lwork) { + jint __ret; + jboolean failed = FALSE; + const char *__nname = NULL; const char *__nopts = NULL; + if (!(__nname = (*env)->GetStringUTFChars(env, name, NULL))) goto fail; + if (!(__nopts = (*env)->GetStringUTFChars(env, opts, NULL))) goto fail; + __ret = iparmq_(&ispec, __nname, __nopts, &n, &ilo, &ihi, &lwork); +done: + if (__nopts) (*env)->ReleaseStringUTFChars(env, opts, __nopts); + if (__nname) (*env)->ReleaseStringUTFChars(env, name, __nname); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*dtrexc_)(char *compq, int *n, double *t, int *ldt, double *q, int *ldq, /*FIXME*/void *ifst, /*FIXME*/void *ilst, double *work, /*FIXME*/void *info); +static int (*lsamen_)(int *n, const char *ca, const char *cb); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrexcK(JNIEnv *env, UNUSED jobject obj, - jstring compq, jint n, jdoubleArray t, jint offsett, jint ldt, jdoubleArray q, jint offsetq, jint ldq, jobject ifst, jobject ilst, jdoubleArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_lsamenK(JNIEnv *env, UNUSED jobject obj, jint n, jstring ca, jstring cb) { + jboolean __ret; + jboolean failed = FALSE; + const char *__nca = NULL; const char *__ncb = NULL; + if (!(__nca = (*env)->GetStringUTFChars(env, ca, NULL))) goto fail; + if (!(__ncb = (*env)->GetStringUTFChars(env, cb, NULL))) goto fail; + __ret = lsamen_(&n, __nca, __ncb); +done: + if (__ncb) (*env)->ReleaseStringUTFChars(env, cb, __ncb); + if (__nca) (*env)->ReleaseStringUTFChars(env, ca, __nca); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*dtrrfs_)(const char *uplo, char *trans, char *diag, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int * iwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrrfsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sbdsdc_)(const char *uplo, const char *compq, int *n, float *d, float *e, float *u, int *ldu, float *vt, int *ldvt, float *q, int *iq, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sbdsdcK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring compq, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jint ldvt, jfloatArray q, jint offsetq, jintArray iq, jint offsetiq, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; const char *__ncompq = NULL; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nu = NULL; float *__nvt = NULL; float *__nq = NULL; int *__niq = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ncompq = (*env)->GetStringUTFChars(env, compq, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__niq = (*env)->GetPrimitiveArrayCritical(env, iq, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + sbdsdc_(__nuplo, __ncompq, &n, __nd + offsetd, __ne + offsete, __nu + offsetu, &ldu, __nvt + offsetvt, &ldvt, __nq + offsetq, __niq + offsetiq, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__niq) (*env)->ReleasePrimitiveArrayCritical(env, iq, __niq, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ncompq) (*env)->ReleaseStringUTFChars(env, compq, __ncompq); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dtrsen_)(char *job, char *compq, int *select, int *n, double *t, int *ldt, double *q, int *ldq, double *wr, double *wi, /*FIXME*/void *m, /*FIXME*/void *s, /*FIXME*/void *sep, double *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrsenK(JNIEnv *env, UNUSED jobject obj, - jstring job, jstring compq, jbooleanArray select, jint offsetselect, jint n, jdoubleArray t, jint offsett, jint ldt, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jobject m, jobject s, jobject sep, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sbdsqr_)(const char *uplo, int *n, int *ncvt, int *nru, int *ncc, float *d, float *e, float *vt, int *ldvt, float *u, int *ldu, float *c, int *Ldc, float *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sbdsqrK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint ncvt, jint nru, jint ncc, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray vt, jint offsetvt, jint ldvt, jfloatArray u, jint offsetu, jint ldu, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nvt = NULL; float *__nu = NULL; float *__nc = NULL; float *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sbdsqr_(__nuplo, &n, &ncvt, &nru, &ncc, __nd + offsetd, __ne + offsete, __nvt + offsetvt, &ldvt, __nu + offsetu, &ldu, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dtrsna_)(char *job, char *howmny, int *select, int *n, double *t, int *ldt, double *vl, int *ldvl, double *vr, int *ldvr, double *s, double *sep, int *mm, /*FIXME*/void *m, double *work, int *ldwork, int * iwork, /*FIXME*/void *info); +static void (*sdisna_)(const char *job, int *m, int *n, float *d, float *sep, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrsnaK(JNIEnv *env, UNUSED jobject obj, - jstring job, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jdoubleArray t, jint offsett, jint ldt, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jdoubleArray s, jint offsets, jdoubleArray sep, jint offsetsep, jint mm, jobject m, jdoubleArray work, jint offsetwork, jint ldwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sdisnaK(JNIEnv *env, UNUSED jobject obj, jstring job, jint m, jint n, jfloatArray d, jint offsetd, jfloatArray sep, jint offsetsep, jobject info) { + jboolean failed = FALSE; + const char *__njob = NULL; int __ninfo = 0; float *__nd = NULL; float *__nsep = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nsep = (*env)->GetPrimitiveArrayCritical(env, sep, NULL))) goto fail; + sdisna_(__njob, &m, &n, __nd + offsetd, __nsep + offsetsep, &__ninfo); +done: + if (__nsep) (*env)->ReleasePrimitiveArrayCritical(env, sep, __nsep, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dtrsyl_)(char *trana, char *tranb, int *isgn, int *m, int *n, double *a, int *lda, double *b, int *ldb, double *c, int *Ldc, /*FIXME*/void *scale, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrsylK(JNIEnv *env, UNUSED jobject obj, - jstring trana, jstring tranb, jint isgn, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray c, jint offsetc, jint Ldc, jobject scale, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sgbbrd_)(const char *vect, int *m, int *n, int *ncc, int *kl, int *ku, float *ab, int *ldab, float *d, float *e, float *q, int *ldq, float *pt, int *ldpt, float *c, int *Ldc, float *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbbrdK(JNIEnv *env, UNUSED jobject obj, jstring vect, jint m, jint n, jint ncc, jint kl, jint ku, jfloatArray ab, jint offsetab, jint ldab, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray q, jint offsetq, jint ldq, jfloatArray pt, jint offsetpt, jint ldpt, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nvect = NULL; int __ninfo = 0; float *__nab = NULL; float *__nd = NULL; float *__ne = NULL; float *__nq = NULL; float *__npt = NULL; float *__nc = NULL; float *__nwork = NULL; + if (!(__nvect = (*env)->GetStringUTFChars(env, vect, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__npt = (*env)->GetPrimitiveArrayCritical(env, pt, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sgbbrd_(__nvect, &m, &n, &ncc, &kl, &ku, __nab + offsetab, &ldab, __nd + offsetd, __ne + offsete, __nq + offsetq, &ldq, __npt + offsetpt, &ldpt, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__npt) (*env)->ReleasePrimitiveArrayCritical(env, pt, __npt, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nvect) (*env)->ReleaseStringUTFChars(env, vect, __nvect); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dtrti2_)(const char *uplo, char *diag, int *n, double *a, int *lda, /*FIXME*/void *info); +static void (*sgbcon_)(const char *norm, int *n, int *kl, int *ku, float *ab, int *ldab, int *ipiv, float *anorm, float *rcond, float *work, int *iwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrti2K(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring diag, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbconK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jint kl, jint ku, jfloatArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nnorm = NULL; float __nrcond = 0; int __ninfo = 0; float *__nab = NULL; int *__nipiv = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + sgbcon_(__nnorm, &n, &kl, &ku, __nab + offsetab, &ldab, __nipiv + offsetipiv, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dtrtri_)(const char *uplo, char *diag, int *n, double *a, int *lda, /*FIXME*/void *info); +static void (*sgbequ_)(int *m, int *n, int *kl, int *ku, float *ab, int *ldab, float *r, float *c, float *rowcnd, float *colcnd, float *amax, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrtriK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring diag, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbequK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint kl, jint ku, jfloatArray ab, jint offsetab, jint ldab, jfloatArray r, jint offsetr, jfloatArray c, jint offsetc, jobject rowcnd, jobject colcnd, jobject amax, jobject info) { + jboolean failed = FALSE; + float __nrowcnd = 0; float __ncolcnd = 0; float __namax = 0; int __ninfo = 0; float *__nab = NULL; float *__nr = NULL; float *__nc = NULL; + __nrowcnd = (*env)->GetFloatField(env, rowcnd, floatW_val_fieldID); + __ncolcnd = (*env)->GetFloatField(env, colcnd, floatW_val_fieldID); + __namax = (*env)->GetFloatField(env, amax, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + sgbequ_(&m, &n, &kl, &ku, __nab + offsetab, &ldab, __nr + offsetr, __nc + offsetc, &__nrowcnd, &__ncolcnd, &__namax, &__ninfo); +done: + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, amax, floatW_val_fieldID, __namax); + if (!failed) (*env)->SetFloatField(env, colcnd, floatW_val_fieldID, __ncolcnd); + if (!failed) (*env)->SetFloatField(env, rowcnd, floatW_val_fieldID, __nrowcnd); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dtrtrs_)(const char *uplo, char *trans, char *diag, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrtrsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sgbrfs_)(const char *trans, int *n, int *kl, int *ku, int *nrhs, float *ab, int *ldab, float *afb, int *ldafb, int *ipiv, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbrfsK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint n, jint kl, jint ku, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray afb, jint offsetafb, jint ldafb, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__ntrans = NULL; int __ninfo = 0; float *__nab = NULL; float *__nafb = NULL; int *__nipiv = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nafb = (*env)->GetPrimitiveArrayCritical(env, afb, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + sgbrfs_(__ntrans, &n, &kl, &ku, &nrhs, __nab + offsetab, &ldab, __nafb + offsetafb, &ldafb, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nafb) (*env)->ReleasePrimitiveArrayCritical(env, afb, __nafb, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dtzrqf_)(int *m, int *n, double *a, int *lda, double *tau, /*FIXME*/void *info); +static void (*sgbsv_)(int *n, int *kl, int *ku, int *nrhs, float *ab, int *ldab, int *ipiv, float *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtzrqfK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbsvK(JNIEnv *env, UNUSED jobject obj, jint n, jint kl, jint ku, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__nab = NULL; int *__nipiv = NULL; float *__nb = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + sgbsv_(&n, &kl, &ku, &nrhs, __nab + offsetab, &ldab, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*dtzrzf_)(int *m, int *n, double *a, int *lda, double *tau, double *work, int *lwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtzrzfK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sgbsvx_)(const char *fact, const char *trans, int *n, int *kl, int *ku, int *nrhs, float *ab, int *ldab, float *afb, int *ldafb, int *ipiv, char *equed, float *r, float *c, float *b, int *ldb, float *x, int *ldx, float *rcond, float *ferr, float *berr, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbsvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring trans, jint n, jint kl, jint ku, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray afb, jint offsetafb, jint ldafb, jintArray ipiv, jint offsetipiv, jobject equed, jfloatArray r, jint offsetr, jfloatArray c, jint offsetc, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nfact = NULL; const char *__ntrans = NULL; char *__nequed = NULL; jstring __jequed = NULL;; float __nrcond = 0; int __ninfo = 0; float *__nab = NULL; float *__nafb = NULL; int *__nipiv = NULL; float *__nr = NULL; float *__nc = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; + __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nafb = (*env)->GetPrimitiveArrayCritical(env, afb, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + sgbsvx_(__nfact, __ntrans, &n, &kl, &ku, &nrhs, __nab + offsetab, &ldab, __nafb + offsetafb, &ldafb, __nipiv + offsetipiv, __nequed, __nr + offsetr, __nc + offsetc, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nafb) (*env)->ReleasePrimitiveArrayCritical(env, afb, __nafb, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static int (*ieeeck_)(int *ispec, float *zero, float *one); +static void (*sgbtf2_)(int *m, int *n, int *kl, int *ku, float *ab, int *ldab, int *ipiv, int *info); -jint Java_dev_ludovic_netlib_lapack_JNILAPACK_ieeeckK(JNIEnv *env, UNUSED jobject obj, - jint ispec, jfloat zero, jfloat one) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbtf2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint kl, jint ku, jfloatArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__nab = NULL; int *__nipiv = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + sgbtf2_(&m, &n, &kl, &ku, __nab + offsetab, &ldab, __nipiv + offsetipiv, &__ninfo); +done: + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static int (*ilaenv_)(int *ispec, char *name, char *opts, int *n1, int *n2, int *n3, int *n4); +static void (*sgbtrf_)(int *m, int *n, int *kl, int *ku, float *ab, int *ldab, int *ipiv, int *info); -jint Java_dev_ludovic_netlib_lapack_JNILAPACK_ilaenvK(JNIEnv *env, UNUSED jobject obj, - jint ispec, jstring name, jstring opts, jint n1, jint n2, jint n3, jint n4) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbtrfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint kl, jint ku, jfloatArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__nab = NULL; int *__nipiv = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + sgbtrf_(&m, &n, &kl, &ku, __nab + offsetab, &ldab, __nipiv + offsetipiv, &__ninfo); +done: + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ilaver_)(/*FIXME*/void *vers_major, /*FIXME*/void *vers_minor, /*FIXME*/void *vers_patch); +static void (*sgbtrs_)(const char *trans, int *n, int *kl, int *ku, int *nrhs, float *ab, int *ldab, int *ipiv, float *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ilaverK(JNIEnv *env, UNUSED jobject obj, - jobject vers_major, jobject vers_minor, jobject vers_patch) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbtrsK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint n, jint kl, jint ku, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__ntrans = NULL; int __ninfo = 0; float *__nab = NULL; int *__nipiv = NULL; float *__nb = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + sgbtrs_(__ntrans, &n, &kl, &ku, &nrhs, __nab + offsetab, &ldab, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static int (*iparmq_)(int *ispec, char *name, char *opts, int *n, int *ilo, int *ihi, int *lwork); +static void (*sgebak_)(const char *job, const char *side, int *n, int *ilo, int *ihi, float *scale, int *m, float *v, int *ldv, int *info); -jint Java_dev_ludovic_netlib_lapack_JNILAPACK_iparmqK(JNIEnv *env, UNUSED jobject obj, - jint ispec, jstring name, jstring opts, jint n, jint ilo, jint ihi, jint lwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgebakK(JNIEnv *env, UNUSED jobject obj, jstring job, jstring side, jint n, jint ilo, jint ihi, jfloatArray scale, jint offsetscale, jint m, jfloatArray v, jint offsetv, jint ldv, jobject info) { + jboolean failed = FALSE; + const char *__njob = NULL; const char *__nside = NULL; int __ninfo = 0; float *__nscale = NULL; float *__nv = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nscale = (*env)->GetPrimitiveArrayCritical(env, scale, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + sgebak_(__njob, __nside, &n, &ilo, &ihi, __nscale + offsetscale, &m, __nv + offsetv, &ldv, &__ninfo); +done: + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nscale) (*env)->ReleasePrimitiveArrayCritical(env, scale, __nscale, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static int *(*lsamen_)(int *n, char *ca, char *cb); +static void (*sgebal_)(const char *job, int *n, float *a, int *lda, int *ilo, int *ihi, float *scale, int *info); -jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_lsamenK(JNIEnv *env, UNUSED jobject obj, - jint n, jstring ca, jstring cb) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgebalK(JNIEnv *env, UNUSED jobject obj, jstring job, jint n, jfloatArray a, jint offseta, jint lda, jobject ilo, jobject ihi, jfloatArray scale, jint offsetscale, jobject info) { + jboolean failed = FALSE; + const char *__njob = NULL; int __nilo = 0; int __nihi = 0; int __ninfo = 0; float *__na = NULL; float *__nscale = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; + __nilo = (*env)->GetIntField(env, ilo, intW_val_fieldID); + __nihi = (*env)->GetIntField(env, ihi, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nscale = (*env)->GetPrimitiveArrayCritical(env, scale, NULL))) goto fail; + sgebal_(__njob, &n, __na + offseta, &lda, &__nilo, &__nihi, __nscale + offsetscale, &__ninfo); +done: + if (__nscale) (*env)->ReleasePrimitiveArrayCritical(env, scale, __nscale, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, ihi, intW_val_fieldID, __nihi); + if (!failed) (*env)->SetIntField(env, ilo, intW_val_fieldID, __nilo); + if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sbdsdc_)(const char *uplo, char *compq, int *n, float *d, float *e, float *u, int *ldu, float *vt, int *ldvt, float *q, int * iq, float *work, int *iwork, int *info); +static void (*sgebd2_)(int *m, int *n, float *a, int *lda, float *d, float *e, float *tauq, float *taup, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sbdsdcK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring compq, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jint ldvt, jfloatArray q, jint offsetq, jintArray iq, jint offsetiq, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgebd2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray tauq, jint offsettauq, jfloatArray taup, jint offsettaup, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; float *__nd = NULL; float *__ne = NULL; float *__ntauq = NULL; float *__ntaup = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__ntauq = (*env)->GetPrimitiveArrayCritical(env, tauq, NULL))) goto fail; + if (!(__ntaup = (*env)->GetPrimitiveArrayCritical(env, taup, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sgebd2_(&m, &n, __na + offseta, &lda, __nd + offsetd, __ne + offsete, __ntauq + offsettauq, __ntaup + offsettaup, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntaup) (*env)->ReleasePrimitiveArrayCritical(env, taup, __ntaup, failed ? JNI_ABORT : 0); + if (__ntauq) (*env)->ReleasePrimitiveArrayCritical(env, tauq, __ntauq, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sbdsqr_)(const char *uplo, int *n, int *ncvt, int *nru, int *ncc, float *d, float *e, float *vt, int *ldvt, float *u, int *ldu, float *c, int *Ldc, float *work, /*FIXME*/void *info); +static void (*sgebrd_)(int *m, int *n, float *a, int *lda, float *d, float *e, float *tauq, float *taup, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sbdsqrK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint ncvt, jint nru, jint ncc, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray vt, jint offsetvt, jint ldvt, jfloatArray u, jint offsetu, jint ldu, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgebrdK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray tauq, jint offsettauq, jfloatArray taup, jint offsettaup, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; float *__nd = NULL; float *__ne = NULL; float *__ntauq = NULL; float *__ntaup = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__ntauq = (*env)->GetPrimitiveArrayCritical(env, tauq, NULL))) goto fail; + if (!(__ntaup = (*env)->GetPrimitiveArrayCritical(env, taup, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sgebrd_(&m, &n, __na + offseta, &lda, __nd + offsetd, __ne + offsete, __ntauq + offsettauq, __ntaup + offsettaup, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntaup) (*env)->ReleasePrimitiveArrayCritical(env, taup, __ntaup, failed ? JNI_ABORT : 0); + if (__ntauq) (*env)->ReleasePrimitiveArrayCritical(env, tauq, __ntauq, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sdisna_)(char *job, int *m, int *n, float *d, float *sep, /*FIXME*/void *info); +static void (*sgecon_)(const char *norm, int *n, float *a, int *lda, float *anorm, float *rcond, float *work, int *iwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sdisnaK(JNIEnv *env, UNUSED jobject obj, - jstring job, jint m, jint n, jfloatArray d, jint offsetd, jfloatArray sep, jint offsetsep, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeconK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jfloatArray a, jint offseta, jint lda, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nnorm = NULL; float __nrcond = 0; int __ninfo = 0; float *__na = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + sgecon_(__nnorm, &n, __na + offseta, &lda, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgbbrd_)(char *vect, int *m, int *n, int *ncc, int *kl, int *ku, float *ab, int *ldab, float *d, float *e, float *q, int *ldq, float *pt, int *ldpt, float *c, int *Ldc, float *work, /*FIXME*/void *info); +static void (*sgeequ_)(int *m, int *n, float *a, int *lda, float *r, float *c, float *rowcnd, float *colcnd, float *amax, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbbrdK(JNIEnv *env, UNUSED jobject obj, - jstring vect, jint m, jint n, jint ncc, jint kl, jint ku, jfloatArray ab, jint offsetab, jint ldab, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray q, jint offsetq, jint ldq, jfloatArray pt, jint offsetpt, jint ldpt, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeequK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray r, jint offsetr, jfloatArray c, jint offsetc, jobject rowcnd, jobject colcnd, jobject amax, jobject info) { + jboolean failed = FALSE; + float __nrowcnd = 0; float __ncolcnd = 0; float __namax = 0; int __ninfo = 0; float *__na = NULL; float *__nr = NULL; float *__nc = NULL; + __nrowcnd = (*env)->GetFloatField(env, rowcnd, floatW_val_fieldID); + __ncolcnd = (*env)->GetFloatField(env, colcnd, floatW_val_fieldID); + __namax = (*env)->GetFloatField(env, amax, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + sgeequ_(&m, &n, __na + offseta, &lda, __nr + offsetr, __nc + offsetc, &__nrowcnd, &__ncolcnd, &__namax, &__ninfo); +done: + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, amax, floatW_val_fieldID, __namax); + if (!failed) (*env)->SetFloatField(env, colcnd, floatW_val_fieldID, __ncolcnd); + if (!failed) (*env)->SetFloatField(env, rowcnd, floatW_val_fieldID, __nrowcnd); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgbcon_)(char *norm, int *n, int *kl, int *ku, float *ab, int *ldab, int * ipiv, float *anorm, /*FIXME*/void *rcond, float *work, int * iwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbconK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jint n, jint kl, jint ku, jfloatArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sgeev_)(const char *jobvl, const char *jobvr, int *n, float *a, int *lda, float *wr, float *wi, float *vl, int *ldvl, float *vr, int *ldvr, float *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeevK(JNIEnv *env, UNUSED jobject obj, jstring jobvl, jstring jobvr, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__njobvl = NULL; const char *__njobvr = NULL; int __ninfo = 0; float *__na = NULL; float *__nwr = NULL; float *__nwi = NULL; float *__nvl = NULL; float *__nvr = NULL; float *__nwork = NULL; + if (!(__njobvl = (*env)->GetStringUTFChars(env, jobvl, NULL))) goto fail; + if (!(__njobvr = (*env)->GetStringUTFChars(env, jobvr, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sgeev_(__njobvl, __njobvr, &n, __na + offseta, &lda, __nwr + offsetwr, __nwi + offsetwi, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__njobvr) (*env)->ReleaseStringUTFChars(env, jobvr, __njobvr); + if (__njobvl) (*env)->ReleaseStringUTFChars(env, jobvl, __njobvl); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgbequ_)(int *m, int *n, int *kl, int *ku, float *ab, int *ldab, float *r, float *c, /*FIXME*/void *rowcnd, /*FIXME*/void *colcnd, /*FIXME*/void *amax, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbequK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint kl, jint ku, jfloatArray ab, jint offsetab, jint ldab, jfloatArray r, jint offsetr, jfloatArray c, jint offsetc, jobject rowcnd, jobject colcnd, jobject amax, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sgeevx_)(const char *balanc, const char *jobvl, const char *jobvr, const char *sense, int *n, float *a, int *lda, float *wr, float *wi, float *vl, int *ldvl, float *vr, int *ldvr, int *ilo, int *ihi, float *scale, float *abnrm, float *rconde, float *rcondv, float *work, int *lwork, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeevxK(JNIEnv *env, UNUSED jobject obj, jstring balanc, jstring jobvl, jstring jobvr, jstring sense, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jobject ilo, jobject ihi, jfloatArray scale, jint offsetscale, jobject abnrm, jfloatArray rconde, jint offsetrconde, jfloatArray rcondv, jint offsetrcondv, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nbalanc = NULL; const char *__njobvl = NULL; const char *__njobvr = NULL; const char *__nsense = NULL; int __nilo = 0; int __nihi = 0; float __nabnrm = 0; int __ninfo = 0; float *__na = NULL; float *__nwr = NULL; float *__nwi = NULL; float *__nvl = NULL; float *__nvr = NULL; float *__nscale = NULL; float *__nrconde = NULL; float *__nrcondv = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nbalanc = (*env)->GetStringUTFChars(env, balanc, NULL))) goto fail; + if (!(__njobvl = (*env)->GetStringUTFChars(env, jobvl, NULL))) goto fail; + if (!(__njobvr = (*env)->GetStringUTFChars(env, jobvr, NULL))) goto fail; + if (!(__nsense = (*env)->GetStringUTFChars(env, sense, NULL))) goto fail; + __nilo = (*env)->GetIntField(env, ilo, intW_val_fieldID); + __nihi = (*env)->GetIntField(env, ihi, intW_val_fieldID); + __nabnrm = (*env)->GetFloatField(env, abnrm, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; + if (!(__nscale = (*env)->GetPrimitiveArrayCritical(env, scale, NULL))) goto fail; + if (!(__nrconde = (*env)->GetPrimitiveArrayCritical(env, rconde, NULL))) goto fail; + if (!(__nrcondv = (*env)->GetPrimitiveArrayCritical(env, rcondv, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + sgeevx_(__nbalanc, __njobvl, __njobvr, __nsense, &n, __na + offseta, &lda, __nwr + offsetwr, __nwi + offsetwi, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, &__nilo, &__nihi, __nscale + offsetscale, &__nabnrm, __nrconde + offsetrconde, __nrcondv + offsetrcondv, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nrcondv) (*env)->ReleasePrimitiveArrayCritical(env, rcondv, __nrcondv, failed ? JNI_ABORT : 0); + if (__nrconde) (*env)->ReleasePrimitiveArrayCritical(env, rconde, __nrconde, failed ? JNI_ABORT : 0); + if (__nscale) (*env)->ReleasePrimitiveArrayCritical(env, scale, __nscale, failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, abnrm, floatW_val_fieldID, __nabnrm); + if (!failed) (*env)->SetIntField(env, ihi, intW_val_fieldID, __nihi); + if (!failed) (*env)->SetIntField(env, ilo, intW_val_fieldID, __nilo); + if (__nsense) (*env)->ReleaseStringUTFChars(env, sense, __nsense); + if (__njobvr) (*env)->ReleaseStringUTFChars(env, jobvr, __njobvr); + if (__njobvl) (*env)->ReleaseStringUTFChars(env, jobvl, __njobvl); + if (__nbalanc) (*env)->ReleaseStringUTFChars(env, balanc, __nbalanc); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgbrfs_)(char *trans, int *n, int *kl, int *ku, int *nrhs, float *ab, int *ldab, float *afb, int *ldafb, int * ipiv, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int * iwork, /*FIXME*/void *info); +static void (*sgegs_)(const char *jobvsl, const char *jobvsr, int *n, float *a, int *lda, float *b, int *ldb, float *alphar, float *alphai, float *beta, float *vsl, int *ldvsl, float *vsr, int *ldvsr, float *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgegsK(JNIEnv *env, UNUSED jobject obj, jstring jobvsl, jstring jobvsr, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray vsl, jint offsetvsl, jint ldvsl, jfloatArray vsr, jint offsetvsr, jint ldvsr, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__njobvsl = NULL; const char *__njobvsr = NULL; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nalphar = NULL; float *__nalphai = NULL; float *__nbeta = NULL; float *__nvsl = NULL; float *__nvsr = NULL; float *__nwork = NULL; + if (!(__njobvsl = (*env)->GetStringUTFChars(env, jobvsl, NULL))) goto fail; + if (!(__njobvsr = (*env)->GetStringUTFChars(env, jobvsr, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) goto fail; + if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) goto fail; + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; + if (!(__nvsl = (*env)->GetPrimitiveArrayCritical(env, vsl, NULL))) goto fail; + if (!(__nvsr = (*env)->GetPrimitiveArrayCritical(env, vsr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sgegs_(__njobvsl, __njobvsr, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nalphar + offsetalphar, __nalphai + offsetalphai, __nbeta + offsetbeta, __nvsl + offsetvsl, &ldvsl, __nvsr + offsetvsr, &ldvsr, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nvsr) (*env)->ReleasePrimitiveArrayCritical(env, vsr, __nvsr, failed ? JNI_ABORT : 0); + if (__nvsl) (*env)->ReleasePrimitiveArrayCritical(env, vsl, __nvsl, failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); + if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, failed ? JNI_ABORT : 0); + if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__njobvsr) (*env)->ReleaseStringUTFChars(env, jobvsr, __njobvsr); + if (__njobvsl) (*env)->ReleaseStringUTFChars(env, jobvsl, __njobvsl); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; +} -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbrfsK(JNIEnv *env, UNUSED jobject obj, - jstring trans, jint n, jint kl, jint ku, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray afb, jint offsetafb, jint ldafb, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sgegv_)(const char *jobvl, const char *jobvr, int *n, float *a, int *lda, float *b, int *ldb, float *alphar, float *alphai, float *beta, float *vl, int *ldvl, float *vr, int *ldvr, float *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgegvK(JNIEnv *env, UNUSED jobject obj, jstring jobvl, jstring jobvr, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__njobvl = NULL; const char *__njobvr = NULL; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nalphar = NULL; float *__nalphai = NULL; float *__nbeta = NULL; float *__nvl = NULL; float *__nvr = NULL; float *__nwork = NULL; + if (!(__njobvl = (*env)->GetStringUTFChars(env, jobvl, NULL))) goto fail; + if (!(__njobvr = (*env)->GetStringUTFChars(env, jobvr, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) goto fail; + if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) goto fail; + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sgegv_(__njobvl, __njobvr, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nalphar + offsetalphar, __nalphai + offsetalphai, __nbeta + offsetbeta, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); + if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, failed ? JNI_ABORT : 0); + if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__njobvr) (*env)->ReleaseStringUTFChars(env, jobvr, __njobvr); + if (__njobvl) (*env)->ReleaseStringUTFChars(env, jobvl, __njobvl); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgbsv_)(int *n, int *kl, int *ku, int *nrhs, float *ab, int *ldab, int *ipiv, float *b, int *ldb, int *info); +static void (*sgehd2_)(int *n, int *ilo, int *ihi, float *a, int *lda, float *tau, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbsvK(JNIEnv *env, UNUSED jobject obj, - jint n, jint kl, jint ku, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgehd2K(JNIEnv *env, UNUSED jobject obj, jint n, jint ilo, jint ihi, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sgehd2_(&n, &ilo, &ihi, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgbsvx_)(char *fact, char *trans, int *n, int *kl, int *ku, int *nrhs, float *ab, int *ldab, float *afb, int *ldafb, int * ipiv, jstring *equed, float *r, float *c, float *b, int *ldb, float *x, int *ldx, /*FIXME*/void *rcond, float *ferr, float *berr, float *work, int * iwork, /*FIXME*/void *info); +static void (*sgehrd_)(int *n, int *ilo, int *ihi, float *a, int *lda, float *tau, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbsvxK(JNIEnv *env, UNUSED jobject obj, - jstring fact, jstring trans, jint n, jint kl, jint ku, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray afb, jint offsetafb, jint ldafb, jintArray ipiv, jint offsetipiv, jobject equed, jfloatArray r, jint offsetr, jfloatArray c, jint offsetc, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgehrdK(JNIEnv *env, UNUSED jobject obj, jint n, jint ilo, jint ihi, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sgehrd_(&n, &ilo, &ihi, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgbtf2_)(int *m, int *n, int *kl, int *ku, float *ab, int *ldab, int * ipiv, /*FIXME*/void *info); +static void (*sgelq2_)(int *m, int *n, float *a, int *lda, float *tau, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbtf2K(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint kl, jint ku, jfloatArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelq2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sgelq2_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgbtrf_)(int *m, int *n, int *kl, int *ku, float *ab, int *ldab, int * ipiv, /*FIXME*/void *info); +static void (*sgelqf_)(int *m, int *n, float *a, int *lda, float *tau, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbtrfK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint kl, jint ku, jfloatArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelqfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sgelqf_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgbtrs_)(char *trans, int *n, int *kl, int *ku, int *nrhs, float *ab, int *ldab, int * ipiv, float *b, int *ldb, /*FIXME*/void *info); +static void (*sgels_)(const char *trans, int *m, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbtrsK(JNIEnv *env, UNUSED jobject obj, - jstring trans, jint n, jint kl, jint ku, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelsK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint m, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nwork = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sgels_(__ntrans, &m, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgebak_)(char *job, char *side, int *n, int *ilo, int *ihi, float *scale, int *m, float *v, int *ldv, /*FIXME*/void *info); +static void (*sgelsd_)(int *m, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, float *s, float *rcond, int *rank, float *work, int *lwork, int *iwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgebakK(JNIEnv *env, UNUSED jobject obj, - jstring job, jstring side, jint n, jint ilo, jint ihi, jfloatArray scale, jint offsetscale, jint m, jfloatArray v, jint offsetv, jint ldv, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelsdK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray s, jint offsets, jfloat rcond, jobject rank, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + int __nrank = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__ns = NULL; float *__nwork = NULL; int *__niwork = NULL; + __nrank = (*env)->GetIntField(env, rank, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + sgelsd_(&m, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, __ns + offsets, &rcond, &__nrank, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, rank, intW_val_fieldID, __nrank); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgebal_)(char *job, int *n, float *a, int *lda, /*FIXME*/void *ilo, /*FIXME*/void *ihi, float *scale, /*FIXME*/void *info); +static void (*sgelss_)(int *m, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, float *s, float *rcond, int *rank, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgebalK(JNIEnv *env, UNUSED jobject obj, - jstring job, jint n, jfloatArray a, jint offseta, jint lda, jobject ilo, jobject ihi, jfloatArray scale, jint offsetscale, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelssK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray s, jint offsets, jfloat rcond, jobject rank, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __nrank = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__ns = NULL; float *__nwork = NULL; + __nrank = (*env)->GetIntField(env, rank, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sgelss_(&m, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, __ns + offsets, &rcond, &__nrank, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, rank, intW_val_fieldID, __nrank); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgebd2_)(int *m, int *n, float *a, int *lda, float *d, float *e, float *tauq, float *taup, float *work, /*FIXME*/void *info); +static void (*sgelsx_)(int *m, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, int *jpvt, float *rcond, int *rank, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgebd2K(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray tauq, jint offsettauq, jfloatArray taup, jint offsettaup, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelsxK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jintArray jpvt, jint offsetjpvt, jfloat rcond, jobject rank, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __nrank = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; int *__njpvt = NULL; float *__nwork = NULL; + __nrank = (*env)->GetIntField(env, rank, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sgelsx_(&m, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, __njpvt + offsetjpvt, &rcond, &__nrank, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, rank, intW_val_fieldID, __nrank); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgebrd_)(int *m, int *n, float *a, int *lda, float *d, float *e, float *tauq, float *taup, float *work, int *lwork, /*FIXME*/void *info); +static void (*sgelsy_)(int *m, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, int *jpvt, float *rcond, int *rank, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgebrdK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray tauq, jint offsettauq, jfloatArray taup, jint offsettaup, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelsyK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jintArray jpvt, jint offsetjpvt, jfloat rcond, jobject rank, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __nrank = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; int *__njpvt = NULL; float *__nwork = NULL; + __nrank = (*env)->GetIntField(env, rank, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sgelsy_(&m, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, __njpvt + offsetjpvt, &rcond, &__nrank, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, rank, intW_val_fieldID, __nrank); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgecon_)(char *norm, int *n, float *a, int *lda, float *anorm, /*FIXME*/void *rcond, float *work, int * iwork, /*FIXME*/void *info); +static void (*sgeql2_)(int *m, int *n, float *a, int *lda, float *tau, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeconK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jint n, jfloatArray a, jint offseta, jint lda, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeql2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sgeql2_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgeequ_)(int *m, int *n, float *a, int *lda, float *r, float *c, /*FIXME*/void *rowcnd, /*FIXME*/void *colcnd, /*FIXME*/void *amax, /*FIXME*/void *info); +static void (*sgeqlf_)(int *m, int *n, float *a, int *lda, float *tau, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeequK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray r, jint offsetr, jfloatArray c, jint offsetc, jobject rowcnd, jobject colcnd, jobject amax, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeqlfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sgeqlf_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgees_)(char *jobvs, char *sort, /*FIXME*/void *select, int *n, float *a, int *lda, /*FIXME*/void *sdim, float *wr, float *wi, float *vs, int *ldvs, float *work, int *lwork, int *bwork, int *info); +static void (*sgeqp3_)(int *m, int *n, float *a, int *lda, int *jpvt, float *tau, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeesK(JNIEnv *env, UNUSED jobject obj, - jstring jobvs, jstring sort, jobject select, jint n, jfloatArray a, jint offseta, jint lda, jobject sdim, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jfloatArray vs, jint offsetvs, jint ldvs, jfloatArray work, jint offsetwork, jint lwork, jbooleanArray bwork, jint offsetbwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeqp3K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; int *__njpvt = NULL; float *__ntau = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sgeqp3_(&m, &n, __na + offseta, &lda, __njpvt + offsetjpvt, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgeesx_)(char *jobvs, char *sort, /*FIXME*/void *select, char *sense, int *n, float *a, int *lda, /*FIXME*/void *sdim, float *wr, float *wi, float *vs, int *ldvs, /*FIXME*/void *rconde, /*FIXME*/void *rcondv, float *work, int *lwork, int * iwork, int *liwork, int *bwork, /*FIXME*/void *info); +static void (*sgeqpf_)(int *m, int *n, float *a, int *lda, int *jpvt, float *tau, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeesxK(JNIEnv *env, UNUSED jobject obj, - jstring jobvs, jstring sort, jobject select, jstring sense, jint n, jfloatArray a, jint offseta, jint lda, jobject sdim, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jfloatArray vs, jint offsetvs, jint ldvs, jobject rconde, jobject rcondv, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jbooleanArray bwork, jint offsetbwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeqpfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; int *__njpvt = NULL; float *__ntau = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sgeqpf_(&m, &n, __na + offseta, &lda, __njpvt + offsetjpvt, __ntau + offsettau, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgeev_)(char *jobvl, char *jobvr, int *n, float *a, int *lda, float *wr, float *wi, float *vl, int *ldvl, float *vr, int *ldvr, float *work, int *lwork, int *info); +static void (*sgeqr2_)(int *m, int *n, float *a, int *lda, float *tau, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeevK(JNIEnv *env, UNUSED jobject obj, - jstring jobvl, jstring jobvr, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeqr2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sgeqr2_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgeevx_)(char *balanc, char *jobvl, char *jobvr, char *sense, int *n, float *a, int *lda, float *wr, float *wi, float *vl, int *ldvl, float *vr, int *ldvr, /*FIXME*/void *ilo, /*FIXME*/void *ihi, float *scale, /*FIXME*/void *abnrm, float *rconde, float *rcondv, float *work, int *lwork, int * iwork, /*FIXME*/void *info); +static void (*sgeqrf_)(int *m, int *n, float *a, int *lda, float *tau, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeevxK(JNIEnv *env, UNUSED jobject obj, - jstring balanc, jstring jobvl, jstring jobvr, jstring sense, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jobject ilo, jobject ihi, jfloatArray scale, jint offsetscale, jobject abnrm, jfloatArray rconde, jint offsetrconde, jfloatArray rcondv, jint offsetrcondv, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeqrfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sgeqrf_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgegs_)(char *jobvsl, char *jobvsr, int *n, float *a, int *lda, float *b, int *ldb, float *alphar, float *alphai, float *beta, float *vsl, int *ldvsl, float *vsr, int *ldvsr, float *work, int *lwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgegsK(JNIEnv *env, UNUSED jobject obj, - jstring jobvsl, jstring jobvsr, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray vsl, jint offsetvsl, jint ldvsl, jfloatArray vsr, jint offsetvsr, jint ldvsr, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sgerfs_)(const char *trans, int *n, int *nrhs, float *a, int *lda, float *af, int *ldaf, int *ipiv, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgerfsK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; float *__naf = NULL; int *__nipiv = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + sgerfs_(__ntrans, &n, &nrhs, __na + offseta, &lda, __naf + offsetaf, &ldaf, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgegv_)(char *jobvl, char *jobvr, int *n, float *a, int *lda, float *b, int *ldb, float *alphar, float *alphai, float *beta, float *vl, int *ldvl, float *vr, int *ldvr, float *work, int *lwork, /*FIXME*/void *info); +static void (*sgerq2_)(int *m, int *n, float *a, int *lda, float *tau, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgegvK(JNIEnv *env, UNUSED jobject obj, - jstring jobvl, jstring jobvr, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgerq2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sgerq2_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgehd2_)(int *n, int *ilo, int *ihi, float *a, int *lda, float *tau, float *work, /*FIXME*/void *info); +static void (*sgerqf_)(int *m, int *n, float *a, int *lda, float *tau, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgehd2K(JNIEnv *env, UNUSED jobject obj, - jint n, jint ilo, jint ihi, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgerqfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sgerqf_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgehrd_)(int *n, int *ilo, int *ihi, float *a, int *lda, float *tau, float *work, int *lwork, int *info); +static void (*sgesc2_)(int *n, float *a, int *lda, float *rhs, int *ipiv, int *jpiv, float *scale); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgehrdK(JNIEnv *env, UNUSED jobject obj, - jint n, jint ilo, jint ihi, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgesc2K(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray rhs, jint offsetrhs, jintArray ipiv, jint offsetipiv, jintArray jpiv, jint offsetjpiv, jobject scale) { + jboolean failed = FALSE; + float __nscale = 0; float *__na = NULL; float *__nrhs = NULL; int *__nipiv = NULL; int *__njpiv = NULL; + __nscale = (*env)->GetFloatField(env, scale, floatW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nrhs = (*env)->GetPrimitiveArrayCritical(env, rhs, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__njpiv = (*env)->GetPrimitiveArrayCritical(env, jpiv, NULL))) goto fail; + sgesc2_(&n, __na + offseta, &lda, __nrhs + offsetrhs, __nipiv + offsetipiv, __njpiv + offsetjpiv, &__nscale); +done: + if (__njpiv) (*env)->ReleasePrimitiveArrayCritical(env, jpiv, __njpiv, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nrhs) (*env)->ReleasePrimitiveArrayCritical(env, rhs, __nrhs, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgelq2_)(int *m, int *n, float *a, int *lda, float *tau, float *work, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelq2K(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sgesdd_)(const char *jobz, int *m, int *n, float *a, int *lda, float *s, float *u, int *ldu, float *vt, int *ldvt, float *work, int *lwork, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgesddK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray s, jint offsets, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jint ldvt, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; int __ninfo = 0; float *__na = NULL; float *__ns = NULL; float *__nu = NULL; float *__nvt = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + sgesdd_(__njobz, &m, &n, __na + offseta, &lda, __ns + offsets, __nu + offsetu, &ldu, __nvt + offsetvt, &ldvt, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgelqf_)(int *m, int *n, float *a, int *lda, float *tau, float *work, int *lwork, /*FIXME*/void *info); +static void (*sgesv_)(int *n, int *nrhs, float *a, int *lda, int *ipiv, float *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelqfK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgesvK(JNIEnv *env, UNUSED jobject obj, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; int *__nipiv = NULL; float *__nb = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + sgesv_(&n, &nrhs, __na + offseta, &lda, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgels_)(char *trans, int *m, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, float *work, int *lwork, /*FIXME*/void *info); +static void (*sgesvd_)(const char *jobu, const char *jobvt, int *m, int *n, float *a, int *lda, float *s, float *u, int *ldu, float *vt, int *ldvt, float *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgesvdK(JNIEnv *env, UNUSED jobject obj, jstring jobu, jstring jobvt, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray s, jint offsets, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jint ldvt, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__njobu = NULL; const char *__njobvt = NULL; int __ninfo = 0; float *__na = NULL; float *__ns = NULL; float *__nu = NULL; float *__nvt = NULL; float *__nwork = NULL; + if (!(__njobu = (*env)->GetStringUTFChars(env, jobu, NULL))) goto fail; + if (!(__njobvt = (*env)->GetStringUTFChars(env, jobvt, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sgesvd_(__njobu, __njobvt, &m, &n, __na + offseta, &lda, __ns + offsets, __nu + offsetu, &ldu, __nvt + offsetvt, &ldvt, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__njobvt) (*env)->ReleaseStringUTFChars(env, jobvt, __njobvt); + if (__njobu) (*env)->ReleaseStringUTFChars(env, jobu, __njobu); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; +} -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelsK(JNIEnv *env, UNUSED jobject obj, - jstring trans, jint m, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sgesvx_)(const char *fact, const char *trans, int *n, int *nrhs, float *a, int *lda, float *af, int *ldaf, int *ipiv, char *equed, float *r, float *c, float *b, int *ldb, float *x, int *ldx, float *rcond, float *ferr, float *berr, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgesvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring trans, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jobject equed, jfloatArray r, jint offsetr, jfloatArray c, jint offsetc, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nfact = NULL; const char *__ntrans = NULL; char *__nequed = NULL; jstring __jequed = NULL;; float __nrcond = 0; int __ninfo = 0; float *__na = NULL; float *__naf = NULL; int *__nipiv = NULL; float *__nr = NULL; float *__nc = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; + __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + sgesvx_(__nfact, __ntrans, &n, &nrhs, __na + offseta, &lda, __naf + offsetaf, &ldaf, __nipiv + offsetipiv, __nequed, __nr + offsetr, __nc + offsetc, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgelsd_)(int *m, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, float *s, float *rcond, /*FIXME*/void *rank, float *work, int *lwork, int * iwork, /*FIXME*/void *info); +static void (*sgetc2_)(int *n, float *a, int *lda, int *ipiv, int *jpiv, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelsdK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray s, jint offsets, jfloat rcond, jobject rank, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgetc2K(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jintArray jpiv, jint offsetjpiv, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; int *__nipiv = NULL; int *__njpiv = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__njpiv = (*env)->GetPrimitiveArrayCritical(env, jpiv, NULL))) goto fail; + sgetc2_(&n, __na + offseta, &lda, __nipiv + offsetipiv, __njpiv + offsetjpiv, &__ninfo); +done: + if (__njpiv) (*env)->ReleasePrimitiveArrayCritical(env, jpiv, __njpiv, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgelss_)(int *m, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, float *s, float *rcond, /*FIXME*/void *rank, float *work, int *lwork, /*FIXME*/void *info); +static void (*sgetf2_)(int *m, int *n, float *a, int *lda, int *ipiv, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelssK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray s, jint offsets, jfloat rcond, jobject rank, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgetf2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; int *__nipiv = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + sgetf2_(&m, &n, __na + offseta, &lda, __nipiv + offsetipiv, &__ninfo); +done: + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgelsx_)(int *m, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, int * jpvt, float *rcond, /*FIXME*/void *rank, float *work, /*FIXME*/void *info); +static void (*sgetrf_)(int *m, int *n, float *a, int *lda, int *ipiv, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelsxK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jintArray jpvt, jint offsetjpvt, jfloat rcond, jobject rank, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgetrfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; int *__nipiv = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + sgetrf_(&m, &n, __na + offseta, &lda, __nipiv + offsetipiv, &__ninfo); +done: + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgelsy_)(int *m, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, int * jpvt, float *rcond, /*FIXME*/void *rank, float *work, int *lwork, /*FIXME*/void *info); +static void (*sgetri_)(int *n, float *a, int *lda, int *ipiv, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelsyK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jintArray jpvt, jint offsetjpvt, jfloat rcond, jobject rank, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgetriK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; int *__nipiv = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sgetri_(&n, __na + offseta, &lda, __nipiv + offsetipiv, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgeql2_)(int *m, int *n, float *a, int *lda, float *tau, float *work, /*FIXME*/void *info); +static void (*sgetrs_)(const char *trans, int *n, int *nrhs, float *a, int *lda, int *ipiv, float *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeql2K(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgetrsK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; int *__nipiv = NULL; float *__nb = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + sgetrs_(__ntrans, &n, &nrhs, __na + offseta, &lda, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgeqlf_)(int *m, int *n, float *a, int *lda, float *tau, float *work, int *lwork, /*FIXME*/void *info); +static void (*sggbak_)(const char *job, const char *side, int *n, int *ilo, int *ihi, float *lscale, float *rscale, int *m, float *v, int *ldv, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeqlfK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggbakK(JNIEnv *env, UNUSED jobject obj, jstring job, jstring side, jint n, jint ilo, jint ihi, jfloatArray lscale, jint offsetlscale, jfloatArray rscale, jint offsetrscale, jint m, jfloatArray v, jint offsetv, jint ldv, jobject info) { + jboolean failed = FALSE; + const char *__njob = NULL; const char *__nside = NULL; int __ninfo = 0; float *__nlscale = NULL; float *__nrscale = NULL; float *__nv = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nlscale = (*env)->GetPrimitiveArrayCritical(env, lscale, NULL))) goto fail; + if (!(__nrscale = (*env)->GetPrimitiveArrayCritical(env, rscale, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + sggbak_(__njob, __nside, &n, &ilo, &ihi, __nlscale + offsetlscale, __nrscale + offsetrscale, &m, __nv + offsetv, &ldv, &__ninfo); +done: + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nrscale) (*env)->ReleasePrimitiveArrayCritical(env, rscale, __nrscale, failed ? JNI_ABORT : 0); + if (__nlscale) (*env)->ReleasePrimitiveArrayCritical(env, lscale, __nlscale, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgeqp3_)(int *m, int *n, float *a, int *lda, int * jpvt, float *tau, float *work, int *lwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeqp3K(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jfloatArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sggbal_)(const char *job, int *n, float *a, int *lda, float *b, int *ldb, int *ilo, int *ihi, float *lscale, float *rscale, float *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggbalK(JNIEnv *env, UNUSED jobject obj, jstring job, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject ilo, jobject ihi, jfloatArray lscale, jint offsetlscale, jfloatArray rscale, jint offsetrscale, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__njob = NULL; int __nilo = 0; int __nihi = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nlscale = NULL; float *__nrscale = NULL; float *__nwork = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; + __nilo = (*env)->GetIntField(env, ilo, intW_val_fieldID); + __nihi = (*env)->GetIntField(env, ihi, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nlscale = (*env)->GetPrimitiveArrayCritical(env, lscale, NULL))) goto fail; + if (!(__nrscale = (*env)->GetPrimitiveArrayCritical(env, rscale, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sggbal_(__njob, &n, __na + offseta, &lda, __nb + offsetb, &ldb, &__nilo, &__nihi, __nlscale + offsetlscale, __nrscale + offsetrscale, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nrscale) (*env)->ReleasePrimitiveArrayCritical(env, rscale, __nrscale, failed ? JNI_ABORT : 0); + if (__nlscale) (*env)->ReleasePrimitiveArrayCritical(env, lscale, __nlscale, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, ihi, intW_val_fieldID, __nihi); + if (!failed) (*env)->SetIntField(env, ilo, intW_val_fieldID, __nilo); + if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgeqpf_)(int *m, int *n, float *a, int *lda, int * jpvt, float *tau, float *work, /*FIXME*/void *info); +static void (*sggev_)(const char *jobvl, const char *jobvr, int *n, float *a, int *lda, float *b, int *ldb, float *alphar, float *alphai, float *beta, float *vl, int *ldvl, float *vr, int *ldvr, float *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggevK(JNIEnv *env, UNUSED jobject obj, jstring jobvl, jstring jobvr, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__njobvl = NULL; const char *__njobvr = NULL; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nalphar = NULL; float *__nalphai = NULL; float *__nbeta = NULL; float *__nvl = NULL; float *__nvr = NULL; float *__nwork = NULL; + if (!(__njobvl = (*env)->GetStringUTFChars(env, jobvl, NULL))) goto fail; + if (!(__njobvr = (*env)->GetStringUTFChars(env, jobvr, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) goto fail; + if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) goto fail; + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sggev_(__njobvl, __njobvr, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nalphar + offsetalphar, __nalphai + offsetalphai, __nbeta + offsetbeta, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); + if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, failed ? JNI_ABORT : 0); + if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__njobvr) (*env)->ReleaseStringUTFChars(env, jobvr, __njobvr); + if (__njobvl) (*env)->ReleaseStringUTFChars(env, jobvl, __njobvl); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; +} -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeqpfK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jfloatArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sggevx_)(const char *balanc, const char *jobvl, const char *jobvr, const char *sense, int *n, float *a, int *lda, float *b, int *ldb, float *alphar, float *alphai, float *beta, float *vl, int *ldvl, float *vr, int *ldvr, int *ilo, int *ihi, float *lscale, float *rscale, float *abnrm, float *bbnrm, float *rconde, float *rcondv, float *work, int *lwork, int *iwork, int *bwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggevxK(JNIEnv *env, UNUSED jobject obj, jstring balanc, jstring jobvl, jstring jobvr, jstring sense, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jobject ilo, jobject ihi, jfloatArray lscale, jint offsetlscale, jfloatArray rscale, jint offsetrscale, jobject abnrm, jobject bbnrm, jfloatArray rconde, jint offsetrconde, jfloatArray rcondv, jint offsetrcondv, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jbooleanArray bwork, jint offsetbwork, jobject info) { + jboolean failed = FALSE; + const char *__nbalanc = NULL; const char *__njobvl = NULL; const char *__njobvr = NULL; const char *__nsense = NULL; int __nilo = 0; int __nihi = 0; float __nabnrm = 0; float __nbbnrm = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nalphar = NULL; float *__nalphai = NULL; float *__nbeta = NULL; float *__nvl = NULL; float *__nvr = NULL; float *__nlscale = NULL; float *__nrscale = NULL; float *__nrconde = NULL; float *__nrcondv = NULL; float *__nwork = NULL; int *__niwork = NULL; jboolean *__jbwork = NULL; int *__nbwork = NULL; + if (!(__nbalanc = (*env)->GetStringUTFChars(env, balanc, NULL))) goto fail; + if (!(__njobvl = (*env)->GetStringUTFChars(env, jobvl, NULL))) goto fail; + if (!(__njobvr = (*env)->GetStringUTFChars(env, jobvr, NULL))) goto fail; + if (!(__nsense = (*env)->GetStringUTFChars(env, sense, NULL))) goto fail; + __nilo = (*env)->GetIntField(env, ilo, intW_val_fieldID); + __nihi = (*env)->GetIntField(env, ihi, intW_val_fieldID); + __nabnrm = (*env)->GetFloatField(env, abnrm, floatW_val_fieldID); + __nbbnrm = (*env)->GetFloatField(env, bbnrm, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) goto fail; + if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) goto fail; + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; + if (!(__nlscale = (*env)->GetPrimitiveArrayCritical(env, lscale, NULL))) goto fail; + if (!(__nrscale = (*env)->GetPrimitiveArrayCritical(env, rscale, NULL))) goto fail; + if (!(__nrconde = (*env)->GetPrimitiveArrayCritical(env, rconde, NULL))) goto fail; + if (!(__nrcondv = (*env)->GetPrimitiveArrayCritical(env, rcondv, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__jbwork = (*env)->GetPrimitiveArrayCritical(env, bwork, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, bwork); if (length <= 0) goto fail; if (!(__nbwork = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nbwork[i] = __jbwork[i]; } } while(0); + sggevx_(__nbalanc, __njobvl, __njobvr, __nsense, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nalphar + offsetalphar, __nalphai + offsetalphai, __nbeta + offsetbeta, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, &__nilo, &__nihi, __nlscale + offsetlscale, __nrscale + offsetrscale, &__nabnrm, &__nbbnrm, __nrconde + offsetrconde, __nrcondv + offsetrcondv, __nwork + offsetwork, &lwork, __niwork + offsetiwork, __nbwork + offsetbwork, &__ninfo); +done: + if (__nbwork) { free(__nbwork); } if (__jbwork) (*env)->ReleasePrimitiveArrayCritical(env, bwork, __nbwork, JNI_ABORT); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nrcondv) (*env)->ReleasePrimitiveArrayCritical(env, rcondv, __nrcondv, failed ? JNI_ABORT : 0); + if (__nrconde) (*env)->ReleasePrimitiveArrayCritical(env, rconde, __nrconde, failed ? JNI_ABORT : 0); + if (__nrscale) (*env)->ReleasePrimitiveArrayCritical(env, rscale, __nrscale, failed ? JNI_ABORT : 0); + if (__nlscale) (*env)->ReleasePrimitiveArrayCritical(env, lscale, __nlscale, failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); + if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, failed ? JNI_ABORT : 0); + if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, bbnrm, floatW_val_fieldID, __nbbnrm); + if (!failed) (*env)->SetFloatField(env, abnrm, floatW_val_fieldID, __nabnrm); + if (!failed) (*env)->SetIntField(env, ihi, intW_val_fieldID, __nihi); + if (!failed) (*env)->SetIntField(env, ilo, intW_val_fieldID, __nilo); + if (__nsense) (*env)->ReleaseStringUTFChars(env, sense, __nsense); + if (__njobvr) (*env)->ReleaseStringUTFChars(env, jobvr, __njobvr); + if (__njobvl) (*env)->ReleaseStringUTFChars(env, jobvl, __njobvl); + if (__nbalanc) (*env)->ReleaseStringUTFChars(env, balanc, __nbalanc); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgeqr2_)(int *m, int *n, float *a, int *lda, float *tau, float *work, /*FIXME*/void *info); +static void (*sggglm_)(int *n, int *m, int *p, float *a, int *lda, float *b, int *ldb, float *d, float *x, float *y, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeqr2K(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggglmK(JNIEnv *env, UNUSED jobject obj, jint n, jint m, jint p, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray d, jint offsetd, jfloatArray x, jint offsetx, jfloatArray y, jint offsety, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nd = NULL; float *__nx = NULL; float *__ny = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sggglm_(&n, &m, &p, __na + offseta, &lda, __nb + offsetb, &ldb, __nd + offsetd, __nx + offsetx, __ny + offsety, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgeqrf_)(int *m, int *n, float *a, int *lda, float *tau, float *work, int *lwork, int *info); +static void (*sgghrd_)(const char *compq, const char *compz, int *n, int *ilo, int *ihi, float *a, int *lda, float *b, int *ldb, float *q, int *ldq, float *z, int *ldz, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeqrfK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgghrdK(JNIEnv *env, UNUSED jobject obj, jstring compq, jstring compz, jint n, jint ilo, jint ihi, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray q, jint offsetq, jint ldq, jfloatArray z, jint offsetz, jint ldz, jobject info) { + jboolean failed = FALSE; + const char *__ncompq = NULL; const char *__ncompz = NULL; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nq = NULL; float *__nz = NULL; + if (!(__ncompq = (*env)->GetStringUTFChars(env, compq, NULL))) goto fail; + if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + sgghrd_(__ncompq, __ncompz, &n, &ilo, &ihi, __na + offseta, &lda, __nb + offsetb, &ldb, __nq + offsetq, &ldq, __nz + offsetz, &ldz, &__ninfo); +done: + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ncompz) (*env)->ReleaseStringUTFChars(env, compz, __ncompz); + if (__ncompq) (*env)->ReleaseStringUTFChars(env, compq, __ncompq); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgerfs_)(char *trans, int *n, int *nrhs, float *a, int *lda, float *af, int *ldaf, int * ipiv, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int * iwork, /*FIXME*/void *info); +static void (*sgglse_)(int *m, int *n, int *p, float *a, int *lda, float *b, int *ldb, float *c, float *d, float *x, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgerfsK(JNIEnv *env, UNUSED jobject obj, - jstring trans, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgglseK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint p, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray c, jint offsetc, jfloatArray d, jint offsetd, jfloatArray x, jint offsetx, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nc = NULL; float *__nd = NULL; float *__nx = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sgglse_(&m, &n, &p, __na + offseta, &lda, __nb + offsetb, &ldb, __nc + offsetc, __nd + offsetd, __nx + offsetx, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgerq2_)(int *m, int *n, float *a, int *lda, float *tau, float *work, /*FIXME*/void *info); +static void (*sggqrf_)(int *n, int *m, int *p, float *a, int *lda, float *taua, float *b, int *ldb, float *taub, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgerq2K(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggqrfK(JNIEnv *env, UNUSED jobject obj, jint n, jint m, jint p, jfloatArray a, jint offseta, jint lda, jfloatArray taua, jint offsettaua, jfloatArray b, jint offsetb, jint ldb, jfloatArray taub, jint offsettaub, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; float *__ntaua = NULL; float *__nb = NULL; float *__ntaub = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntaua = (*env)->GetPrimitiveArrayCritical(env, taua, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__ntaub = (*env)->GetPrimitiveArrayCritical(env, taub, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sggqrf_(&n, &m, &p, __na + offseta, &lda, __ntaua + offsettaua, __nb + offsetb, &ldb, __ntaub + offsettaub, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntaub) (*env)->ReleasePrimitiveArrayCritical(env, taub, __ntaub, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__ntaua) (*env)->ReleasePrimitiveArrayCritical(env, taua, __ntaua, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgerqf_)(int *m, int *n, float *a, int *lda, float *tau, float *work, int *lwork, /*FIXME*/void *info); +static void (*sggrqf_)(int *m, int *p, int *n, float *a, int *lda, float *taua, float *b, int *ldb, float *taub, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgerqfK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggrqfK(JNIEnv *env, UNUSED jobject obj, jint m, jint p, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray taua, jint offsettaua, jfloatArray b, jint offsetb, jint ldb, jfloatArray taub, jint offsettaub, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; float *__ntaua = NULL; float *__nb = NULL; float *__ntaub = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntaua = (*env)->GetPrimitiveArrayCritical(env, taua, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__ntaub = (*env)->GetPrimitiveArrayCritical(env, taub, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sggrqf_(&m, &p, &n, __na + offseta, &lda, __ntaua + offsettaua, __nb + offsetb, &ldb, __ntaub + offsettaub, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntaub) (*env)->ReleasePrimitiveArrayCritical(env, taub, __ntaub, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__ntaua) (*env)->ReleasePrimitiveArrayCritical(env, taua, __ntaua, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgesc2_)(int *n, float *a, int *lda, float *rhs, int *ipiv, int *jpiv, /*FIXME*/void *scale); +static void (*sggsvd_)(const char *jobu, const char *jobv, const char *jobq, int *m, int *n, int *p, int *k, int *l, float *a, int *lda, float *b, int *ldb, float *alpha, float *beta, float *u, int *ldu, float *v, int *ldv, float *q, int *ldq, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggsvdK(JNIEnv *env, UNUSED jobject obj, jstring jobu, jstring jobv, jstring jobq, jint m, jint n, jint p, jobject k, jobject l, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray alpha, jint offsetalpha, jfloatArray beta, jint offsetbeta, jfloatArray u, jint offsetu, jint ldu, jfloatArray v, jint offsetv, jint ldv, jfloatArray q, jint offsetq, jint ldq, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__njobu = NULL; const char *__njobv = NULL; const char *__njobq = NULL; int __nk = 0; int __nl = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nalpha = NULL; float *__nbeta = NULL; float *__nu = NULL; float *__nv = NULL; float *__nq = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__njobu = (*env)->GetStringUTFChars(env, jobu, NULL))) goto fail; + if (!(__njobv = (*env)->GetStringUTFChars(env, jobv, NULL))) goto fail; + if (!(__njobq = (*env)->GetStringUTFChars(env, jobq, NULL))) goto fail; + __nk = (*env)->GetIntField(env, k, intW_val_fieldID); + __nl = (*env)->GetIntField(env, l, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nalpha = (*env)->GetPrimitiveArrayCritical(env, alpha, NULL))) goto fail; + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + sggsvd_(__njobu, __njobv, __njobq, &m, &n, &p, &__nk, &__nl, __na + offseta, &lda, __nb + offsetb, &ldb, __nalpha + offsetalpha, __nbeta + offsetbeta, __nu + offsetu, &ldu, __nv + offsetv, &ldv, __nq + offsetq, &ldq, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); + if (__nalpha) (*env)->ReleasePrimitiveArrayCritical(env, alpha, __nalpha, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, l, intW_val_fieldID, __nl); + if (!failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); + if (__njobq) (*env)->ReleaseStringUTFChars(env, jobq, __njobq); + if (__njobv) (*env)->ReleaseStringUTFChars(env, jobv, __njobv); + if (__njobu) (*env)->ReleaseStringUTFChars(env, jobu, __njobu); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; +} -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgesc2K(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray a, jint offseta, jint lda, jfloatArray rhs, jint offsetrhs, jintArray ipiv, jint offsetipiv, jintArray jpiv, jint offsetjpiv, jobject scale) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sggsvp_)(const char *jobu, const char *jobv, const char *jobq, int *m, int *p, int *n, float *a, int *lda, float *b, int *ldb, float *tola, float *tolb, int *k, int *l, float *u, int *ldu, float *v, int *ldv, float *q, int *ldq, int *iwork, float *tau, float *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggsvpK(JNIEnv *env, UNUSED jobject obj, jstring jobu, jstring jobv, jstring jobq, jint m, jint p, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat tola, jfloat tolb, jobject k, jobject l, jfloatArray u, jint offsetu, jint ldu, jfloatArray v, jint offsetv, jint ldv, jfloatArray q, jint offsetq, jint ldq, jintArray iwork, jint offsetiwork, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__njobu = NULL; const char *__njobv = NULL; const char *__njobq = NULL; int __nk = 0; int __nl = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nu = NULL; float *__nv = NULL; float *__nq = NULL; int *__niwork = NULL; float *__ntau = NULL; float *__nwork = NULL; + if (!(__njobu = (*env)->GetStringUTFChars(env, jobu, NULL))) goto fail; + if (!(__njobv = (*env)->GetStringUTFChars(env, jobv, NULL))) goto fail; + if (!(__njobq = (*env)->GetStringUTFChars(env, jobq, NULL))) goto fail; + __nk = (*env)->GetIntField(env, k, intW_val_fieldID); + __nl = (*env)->GetIntField(env, l, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sggsvp_(__njobu, __njobv, __njobq, &m, &p, &n, __na + offseta, &lda, __nb + offsetb, &ldb, &tola, &tolb, &__nk, &__nl, __nu + offsetu, &ldu, __nv + offsetv, &ldv, __nq + offsetq, &ldq, __niwork + offsetiwork, __ntau + offsettau, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, l, intW_val_fieldID, __nl); + if (!failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); + if (__njobq) (*env)->ReleaseStringUTFChars(env, jobq, __njobq); + if (__njobv) (*env)->ReleaseStringUTFChars(env, jobv, __njobv); + if (__njobu) (*env)->ReleaseStringUTFChars(env, jobu, __njobu); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgesdd_)(char *jobz, int *m, int *n, float *a, int *lda, float *s, float *u, int *ldu, float *vt, int *ldvt, float *work, int *lwork, int * iwork, /*FIXME*/void *info); +static void (*sgtcon_)(const char *norm, int *n, float *dl, float *d, float *du, float *du2, int *ipiv, float *anorm, float *rcond, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgtconK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nnorm = NULL; float __nrcond = 0; int __ninfo = 0; float *__ndl = NULL; float *__nd = NULL; float *__ndu = NULL; float *__ndu2 = NULL; int *__nipiv = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; + if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + sgtcon_(__nnorm, &n, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __ndu2 + offsetdu2, __nipiv + offsetipiv, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; +} -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgesddK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray s, jint offsets, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jint ldvt, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sgtrfs_)(const char *trans, int *n, int *nrhs, float *dl, float *d, float *du, float *dlf, float *df, float *duf, float *du2, int *ipiv, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgtrfsK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint n, jint nrhs, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray dlf, jint offsetdlf, jfloatArray df, jint offsetdf, jfloatArray duf, jint offsetduf, jfloatArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__ntrans = NULL; int __ninfo = 0; float *__ndl = NULL; float *__nd = NULL; float *__ndu = NULL; float *__ndlf = NULL; float *__ndf = NULL; float *__nduf = NULL; float *__ndu2 = NULL; int *__nipiv = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; + if (!(__ndlf = (*env)->GetPrimitiveArrayCritical(env, dlf, NULL))) goto fail; + if (!(__ndf = (*env)->GetPrimitiveArrayCritical(env, df, NULL))) goto fail; + if (!(__nduf = (*env)->GetPrimitiveArrayCritical(env, duf, NULL))) goto fail; + if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + sgtrfs_(__ntrans, &n, &nrhs, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __ndlf + offsetdlf, __ndf + offsetdf, __nduf + offsetduf, __ndu2 + offsetdu2, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, failed ? JNI_ABORT : 0); + if (__nduf) (*env)->ReleasePrimitiveArrayCritical(env, duf, __nduf, failed ? JNI_ABORT : 0); + if (__ndf) (*env)->ReleasePrimitiveArrayCritical(env, df, __ndf, failed ? JNI_ABORT : 0); + if (__ndlf) (*env)->ReleasePrimitiveArrayCritical(env, dlf, __ndlf, failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgesv_)(int *n, int *nrhs, float *a, int *lda, int * ipiv, float *b, int *ldb, /*FIXME*/void *info); +static void (*sgtsv_)(int *n, int *nrhs, float *dl, float *d, float *du, float *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgesvK(JNIEnv *env, UNUSED jobject obj, - jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgtsvK(JNIEnv *env, UNUSED jobject obj, jint n, jint nrhs, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__ndl = NULL; float *__nd = NULL; float *__ndu = NULL; float *__nb = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + sgtsv_(&n, &nrhs, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgesvd_)(char *jobu, char *jobvt, int *m, int *n, float *a, int *lda, float *s, float *u, int *ldu, float *vt, int *ldvt, float *work, int *lwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgesvdK(JNIEnv *env, UNUSED jobject obj, - jstring jobu, jstring jobvt, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray s, jint offsets, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jint ldvt, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sgtsvx_)(const char *fact, const char *trans, int *n, int *nrhs, float *dl, float *d, float *du, float *dlf, float *df, float *duf, float *du2, int *ipiv, float *b, int *ldb, float *x, int *ldx, float *rcond, float *ferr, float *berr, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgtsvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring trans, jint n, jint nrhs, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray dlf, jint offsetdlf, jfloatArray df, jint offsetdf, jfloatArray duf, jint offsetduf, jfloatArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nfact = NULL; const char *__ntrans = NULL; float __nrcond = 0; int __ninfo = 0; float *__ndl = NULL; float *__nd = NULL; float *__ndu = NULL; float *__ndlf = NULL; float *__ndf = NULL; float *__nduf = NULL; float *__ndu2 = NULL; int *__nipiv = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; + if (!(__ndlf = (*env)->GetPrimitiveArrayCritical(env, dlf, NULL))) goto fail; + if (!(__ndf = (*env)->GetPrimitiveArrayCritical(env, df, NULL))) goto fail; + if (!(__nduf = (*env)->GetPrimitiveArrayCritical(env, duf, NULL))) goto fail; + if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + sgtsvx_(__nfact, __ntrans, &n, &nrhs, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __ndlf + offsetdlf, __ndf + offsetdf, __nduf + offsetduf, __ndu2 + offsetdu2, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, failed ? JNI_ABORT : 0); + if (__nduf) (*env)->ReleasePrimitiveArrayCritical(env, duf, __nduf, failed ? JNI_ABORT : 0); + if (__ndf) (*env)->ReleasePrimitiveArrayCritical(env, df, __ndf, failed ? JNI_ABORT : 0); + if (__ndlf) (*env)->ReleasePrimitiveArrayCritical(env, dlf, __ndlf, failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgesvx_)(char *fact, char *trans, int *n, int *nrhs, float *a, int *lda, float *af, int *ldaf, int * ipiv, jstring *equed, float *r, float *c, float *b, int *ldb, float *x, int *ldx, /*FIXME*/void *rcond, float *ferr, float *berr, float *work, int * iwork, /*FIXME*/void *info); +static void (*sgttrf_)(int *n, float *dl, float *d, float *du, float *du2, int *ipiv, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgesvxK(JNIEnv *env, UNUSED jobject obj, - jstring fact, jstring trans, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jobject equed, jfloatArray r, jint offsetr, jfloatArray c, jint offsetc, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgttrfK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__ndl = NULL; float *__nd = NULL; float *__ndu = NULL; float *__ndu2 = NULL; int *__nipiv = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; + if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + sgttrf_(&n, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __ndu2 + offsetdu2, __nipiv + offsetipiv, &__ninfo); +done: + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgetc2_)(int *n, float *a, int *lda, int * ipiv, int * jpiv, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgetc2K(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jintArray jpiv, jint offsetjpiv, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sgttrs_)(const char *trans, int *n, int *nrhs, float *dl, float *d, float *du, float *du2, int *ipiv, float *b, int *ldb, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgttrsK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint n, jint nrhs, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__ntrans = NULL; int __ninfo = 0; float *__ndl = NULL; float *__nd = NULL; float *__ndu = NULL; float *__ndu2 = NULL; int *__nipiv = NULL; float *__nb = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; + if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + sgttrs_(__ntrans, &n, &nrhs, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __ndu2 + offsetdu2, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgetf2_)(int *m, int *n, float *a, int *lda, int * ipiv, /*FIXME*/void *info); +static void (*sgtts2_)(int *itrans, int *n, int *nrhs, float *dl, float *d, float *du, float *du2, int *ipiv, float *b, int *ldb); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgetf2K(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgtts2K(JNIEnv *env, UNUSED jobject obj, jint itrans, jint n, jint nrhs, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb) { + jboolean failed = FALSE; + float *__ndl = NULL; float *__nd = NULL; float *__ndu = NULL; float *__ndu2 = NULL; int *__nipiv = NULL; float *__nb = NULL; + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; + if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + sgtts2_(&itrans, &n, &nrhs, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __ndu2 + offsetdu2, __nipiv + offsetipiv, __nb + offsetb, &ldb); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgetrf_)(int *m, int *n, float *a, int *lda, int * ipiv, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgetrfK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*shgeqz_)(const char *job, const char *compq, const char *compz, int *n, int *ilo, int *ihi, float *h, int *ldh, float *t, int *ldt, float *alphar, float *alphai, float *beta, float *q, int *ldq, float *z, int *ldz, float *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_shgeqzK(JNIEnv *env, UNUSED jobject obj, jstring job, jstring compq, jstring compz, jint n, jint ilo, jint ihi, jfloatArray h, jint offseth, jint ldh, jfloatArray t, jint offsett, jint ldt, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray q, jint offsetq, jint ldq, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__njob = NULL; const char *__ncompq = NULL; const char *__ncompz = NULL; int __ninfo = 0; float *__nh = NULL; float *__nt = NULL; float *__nalphar = NULL; float *__nalphai = NULL; float *__nbeta = NULL; float *__nq = NULL; float *__nz = NULL; float *__nwork = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; + if (!(__ncompq = (*env)->GetStringUTFChars(env, compq, NULL))) goto fail; + if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) goto fail; + if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) goto fail; + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + shgeqz_(__njob, __ncompq, __ncompz, &n, &ilo, &ihi, __nh + offseth, &ldh, __nt + offsett, &ldt, __nalphar + offsetalphar, __nalphai + offsetalphai, __nbeta + offsetbeta, __nq + offsetq, &ldq, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); + if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, failed ? JNI_ABORT : 0); + if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ncompz) (*env)->ReleaseStringUTFChars(env, compz, __ncompz); + if (__ncompq) (*env)->ReleaseStringUTFChars(env, compq, __ncompq); + if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgetri_)(int *n, float *a, int *lda, int * ipiv, float *work, int *lwork, /*FIXME*/void *info); +static void (*shsein_)(const char *side, const char *eigsrc, const char *initv, int *select, int *n, float *h, int *ldh, float *wr, float *wi, float *vl, int *ldvl, float *vr, int *ldvr, int *mm, int *m, float *work, int *ifaill, int *ifailr, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_shseinK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring eigsrc, jstring initv, jbooleanArray select, jint offsetselect, jint n, jfloatArray h, jint offseth, jint ldh, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jint mm, jobject m, jfloatArray work, jint offsetwork, jintArray ifaill, jint offsetifaill, jintArray ifailr, jint offsetifailr, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__neigsrc = NULL; const char *__ninitv = NULL; int __nm = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; float *__nh = NULL; float *__nwr = NULL; float *__nwi = NULL; float *__nvl = NULL; float *__nvr = NULL; float *__nwork = NULL; int *__nifaill = NULL; int *__nifailr = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__neigsrc = (*env)->GetStringUTFChars(env, eigsrc, NULL))) goto fail; + if (!(__ninitv = (*env)->GetStringUTFChars(env, initv, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nifaill = (*env)->GetPrimitiveArrayCritical(env, ifaill, NULL))) goto fail; + if (!(__nifailr = (*env)->GetPrimitiveArrayCritical(env, ifailr, NULL))) goto fail; + shsein_(__nside, __neigsrc, __ninitv, __nselect + offsetselect, &n, __nh + offseth, &ldh, __nwr + offsetwr, __nwi + offsetwi, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, &mm, &__nm, __nwork + offsetwork, __nifaill + offsetifaill, __nifailr + offsetifailr, &__ninfo); +done: + if (__nifailr) (*env)->ReleasePrimitiveArrayCritical(env, ifailr, __nifailr, failed ? JNI_ABORT : 0); + if (__nifaill) (*env)->ReleasePrimitiveArrayCritical(env, ifaill, __nifaill, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__ninitv) (*env)->ReleaseStringUTFChars(env, initv, __ninitv); + if (__neigsrc) (*env)->ReleaseStringUTFChars(env, eigsrc, __neigsrc); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; +} -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgetriK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*shseqr_)(const char *job, const char *compz, int *n, int *ilo, int *ihi, float *h, int *ldh, float *wr, float *wi, float *z, int *ldz, float *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_shseqrK(JNIEnv *env, UNUSED jobject obj, jstring job, jstring compz, jint n, jint ilo, jint ihi, jfloatArray h, jint offseth, jint ldh, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__njob = NULL; const char *__ncompz = NULL; int __ninfo = 0; float *__nh = NULL; float *__nwr = NULL; float *__nwi = NULL; float *__nz = NULL; float *__nwork = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; + if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + shseqr_(__njob, __ncompz, &n, &ilo, &ihi, __nh + offseth, &ldh, __nwr + offsetwr, __nwi + offsetwi, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ncompz) (*env)->ReleaseStringUTFChars(env, compz, __ncompz); + if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgetrs_)(char *trans, int *n, int *nrhs, float *a, int *lda, int * ipiv, float *b, int *ldb, /*FIXME*/void *info); +static int (*sisnan_)(float *sin); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgetrsK(JNIEnv *env, UNUSED jobject obj, - jstring trans, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} +jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_sisnanK(JNIEnv *env, UNUSED jobject obj, jfloat sin) { + jboolean __ret; + jboolean failed = FALSE; + -static void (*sggbak_)(char *job, char *side, int *n, int *ilo, int *ihi, float *lscale, float *rscale, int *m, float *v, int *ldv, /*FIXME*/void *info); + __ret = sisnan_(&sin); +done: -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggbakK(JNIEnv *env, UNUSED jobject obj, - jstring job, jstring side, jint n, jint ilo, jint ihi, jfloatArray lscale, jint offsetlscale, jfloatArray rscale, jint offsetrscale, jint m, jfloatArray v, jint offsetv, jint ldv, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*sggbal_)(char *job, int *n, float *a, int *lda, float *b, int *ldb, /*FIXME*/void *ilo, /*FIXME*/void *ihi, float *lscale, float *rscale, float *work, /*FIXME*/void *info); +static void (*slabad_)(float *small, float *large); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggbalK(JNIEnv *env, UNUSED jobject obj, - jstring job, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject ilo, jobject ihi, jfloatArray lscale, jint offsetlscale, jfloatArray rscale, jint offsetrscale, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slabadK(JNIEnv *env, UNUSED jobject obj, jobject small, jobject large) { + jboolean failed = FALSE; + float __nsmall = 0; float __nlarge = 0; + __nsmall = (*env)->GetFloatField(env, small, floatW_val_fieldID); + __nlarge = (*env)->GetFloatField(env, large, floatW_val_fieldID); + slabad_(&__nsmall, &__nlarge); +done: + if (!failed) (*env)->SetFloatField(env, large, floatW_val_fieldID, __nlarge); + if (!failed) (*env)->SetFloatField(env, small, floatW_val_fieldID, __nsmall); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgges_)(char *jobvsl, char *jobvsr, char *sort, /*FIXME*/void *selctg, int *n, float *a, int *lda, float *b, int *ldb, /*FIXME*/void *sdim, float *alphar, float *alphai, float *beta, float *vsl, int *ldvsl, float *vsr, int *ldvsr, float *work, int *lwork, int *bwork, /*FIXME*/void *info); +static void (*slabrd_)(int *m, int *n, int *nb, float *a, int *lda, float *d, float *e, float *tauq, float *taup, float *x, int *ldx, float *y, int *ldy); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggesK(JNIEnv *env, UNUSED jobject obj, - jstring jobvsl, jstring jobvsr, jstring sort, jobject selctg, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject sdim, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray vsl, jint offsetvsl, jint ldvsl, jfloatArray vsr, jint offsetvsr, jint ldvsr, jfloatArray work, jint offsetwork, jint lwork, jbooleanArray bwork, jint offsetbwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slabrdK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint nb, jfloatArray a, jint offseta, jint lda, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray tauq, jint offsettauq, jfloatArray taup, jint offsettaup, jfloatArray x, jint offsetx, jint ldx, jfloatArray y, jint offsety, jint ldy) { + jboolean failed = FALSE; + float *__na = NULL; float *__nd = NULL; float *__ne = NULL; float *__ntauq = NULL; float *__ntaup = NULL; float *__nx = NULL; float *__ny = NULL; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__ntauq = (*env)->GetPrimitiveArrayCritical(env, tauq, NULL))) goto fail; + if (!(__ntaup = (*env)->GetPrimitiveArrayCritical(env, taup, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + slabrd_(&m, &n, &nb, __na + offseta, &lda, __nd + offsetd, __ne + offsete, __ntauq + offsettauq, __ntaup + offsettaup, __nx + offsetx, &ldx, __ny + offsety, &ldy); +done: + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__ntaup) (*env)->ReleasePrimitiveArrayCritical(env, taup, __ntaup, failed ? JNI_ABORT : 0); + if (__ntauq) (*env)->ReleasePrimitiveArrayCritical(env, tauq, __ntauq, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sggesx_)(char *jobvsl, char *jobvsr, char *sort, /*FIXME*/void *selctg, char *sense, int *n, float *a, int *lda, float *b, int *ldb, /*FIXME*/void *sdim, float *alphar, float *alphai, float *beta, float *vsl, int *ldvsl, float *vsr, int *ldvsr, float *rconde, float *rcondv, float *work, int *lwork, int * iwork, int *liwork, int *bwork, /*FIXME*/void *info); +static void (*slacn2_)(int *n, float *v, float *x, int *isgn, float *est, int *kase, int *isave); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggesxK(JNIEnv *env, UNUSED jobject obj, - jstring jobvsl, jstring jobvsr, jstring sort, jobject selctg, jstring sense, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject sdim, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray vsl, jint offsetvsl, jint ldvsl, jfloatArray vsr, jint offsetvsr, jint ldvsr, jfloatArray rconde, jint offsetrconde, jfloatArray rcondv, jint offsetrcondv, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jbooleanArray bwork, jint offsetbwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slacn2K(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray v, jint offsetv, jfloatArray x, jint offsetx, jintArray isgn, jint offsetisgn, jobject est, jobject kase, jintArray isave, jint offsetisave) { + jboolean failed = FALSE; + float __nest = 0; int __nkase = 0; float *__nv = NULL; float *__nx = NULL; int *__nisgn = NULL; int *__nisave = NULL; + __nest = (*env)->GetFloatField(env, est, floatW_val_fieldID); + __nkase = (*env)->GetIntField(env, kase, intW_val_fieldID); + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nisgn = (*env)->GetPrimitiveArrayCritical(env, isgn, NULL))) goto fail; + if (!(__nisave = (*env)->GetPrimitiveArrayCritical(env, isave, NULL))) goto fail; + slacn2_(&n, __nv + offsetv, __nx + offsetx, __nisgn + offsetisgn, &__nest, &__nkase, __nisave + offsetisave); +done: + if (__nisave) (*env)->ReleasePrimitiveArrayCritical(env, isave, __nisave, failed ? JNI_ABORT : 0); + if (__nisgn) (*env)->ReleasePrimitiveArrayCritical(env, isgn, __nisgn, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, kase, intW_val_fieldID, __nkase); + if (!failed) (*env)->SetFloatField(env, est, floatW_val_fieldID, __nest); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sggev_)(char *jobvl, char *jobvr, int *n, float *a, int *lda, float *b, int *ldb, float *alphar, float *alphai, float *beta, float *vl, int *ldvl, float *vr, int *ldvr, float *work, int *lwork, /*FIXME*/void *info); +static void (*slacon_)(int *n, float *v, float *x, int *isgn, float *est, int *kase); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggevK(JNIEnv *env, UNUSED jobject obj, - jstring jobvl, jstring jobvr, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaconK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray v, jint offsetv, jfloatArray x, jint offsetx, jintArray isgn, jint offsetisgn, jobject est, jobject kase) { + jboolean failed = FALSE; + float __nest = 0; int __nkase = 0; float *__nv = NULL; float *__nx = NULL; int *__nisgn = NULL; + __nest = (*env)->GetFloatField(env, est, floatW_val_fieldID); + __nkase = (*env)->GetIntField(env, kase, intW_val_fieldID); + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nisgn = (*env)->GetPrimitiveArrayCritical(env, isgn, NULL))) goto fail; + slacon_(&n, __nv + offsetv, __nx + offsetx, __nisgn + offsetisgn, &__nest, &__nkase); +done: + if (__nisgn) (*env)->ReleasePrimitiveArrayCritical(env, isgn, __nisgn, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, kase, intW_val_fieldID, __nkase); + if (!failed) (*env)->SetFloatField(env, est, floatW_val_fieldID, __nest); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sggevx_)(char *balanc, char *jobvl, char *jobvr, char *sense, int *n, float *a, int *lda, float *b, int *ldb, float *alphar, float *alphai, float *beta, float *vl, int *ldvl, float *vr, int *ldvr, /*FIXME*/void *ilo, /*FIXME*/void *ihi, float *lscale, float *rscale, /*FIXME*/void *abnrm, /*FIXME*/void *bbnrm, float *rconde, float *rcondv, float *work, int *lwork, int * iwork, int *bwork, /*FIXME*/void *info); +static void (*slacpy_)(const char *uplo, int *m, int *n, float *a, int *lda, float *b, int *ldb); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggevxK(JNIEnv *env, UNUSED jobject obj, - jstring balanc, jstring jobvl, jstring jobvr, jstring sense, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jobject ilo, jobject ihi, jfloatArray lscale, jint offsetlscale, jfloatArray rscale, jint offsetrscale, jobject abnrm, jobject bbnrm, jfloatArray rconde, jint offsetrconde, jfloatArray rcondv, jint offsetrcondv, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jbooleanArray bwork, jint offsetbwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slacpyK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb) { + jboolean failed = FALSE; + const char *__nuplo = NULL; float *__na = NULL; float *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + slacpy_(__nuplo, &m, &n, __na + offseta, &lda, __nb + offsetb, &ldb); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sggglm_)(int *n, int *m, int *p, float *a, int *lda, float *b, int *ldb, float *d, float *x, float *y, float *work, int *lwork, /*FIXME*/void *info); +static void (*sladiv_)(float *a, float *b, float *c, float *d, float *p, float *q); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggglmK(JNIEnv *env, UNUSED jobject obj, - jint n, jint m, jint p, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray d, jint offsetd, jfloatArray x, jint offsetx, jfloatArray y, jint offsety, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sladivK(JNIEnv *env, UNUSED jobject obj, jfloat a, jfloat b, jfloat c, jfloat d, jobject p, jobject q) { + jboolean failed = FALSE; + float __np = 0; float __nq = 0; + __np = (*env)->GetFloatField(env, p, floatW_val_fieldID); + __nq = (*env)->GetFloatField(env, q, floatW_val_fieldID); + sladiv_(&a, &b, &c, &d, &__np, &__nq); +done: + if (!failed) (*env)->SetFloatField(env, q, floatW_val_fieldID, __nq); + if (!failed) (*env)->SetFloatField(env, p, floatW_val_fieldID, __np); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgghrd_)(char *compq, char *compz, int *n, int *ilo, int *ihi, float *a, int *lda, float *b, int *ldb, float *q, int *ldq, float *z, int *ldz, /*FIXME*/void *info); +static void (*slae2_)(float *a, float *b, float *c, float *rt1, float *rt2); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgghrdK(JNIEnv *env, UNUSED jobject obj, - jstring compq, jstring compz, jint n, jint ilo, jint ihi, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray q, jint offsetq, jint ldq, jfloatArray z, jint offsetz, jint ldz, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slae2K(JNIEnv *env, UNUSED jobject obj, jfloat a, jfloat b, jfloat c, jobject rt1, jobject rt2) { + jboolean failed = FALSE; + float __nrt1 = 0; float __nrt2 = 0; + __nrt1 = (*env)->GetFloatField(env, rt1, floatW_val_fieldID); + __nrt2 = (*env)->GetFloatField(env, rt2, floatW_val_fieldID); + slae2_(&a, &b, &c, &__nrt1, &__nrt2); +done: + if (!failed) (*env)->SetFloatField(env, rt2, floatW_val_fieldID, __nrt2); + if (!failed) (*env)->SetFloatField(env, rt1, floatW_val_fieldID, __nrt1); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgglse_)(int *m, int *n, int *p, float *a, int *lda, float *b, int *ldb, float *c, float *d, float *x, float *work, int *lwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgglseK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint p, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray c, jint offsetc, jfloatArray d, jint offsetd, jfloatArray x, jint offsetx, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*slaebz_)(int *ijob, int *nitmax, int *n, int *mmax, int *minp, int *nbmin, float *abstol, float *reltol, float *pivmin, float *d, float *e, float *e2, int *nval, float *ab, float *c, int *mout, int *nab, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaebzK(JNIEnv *env, UNUSED jobject obj, jint ijob, jint nitmax, jint n, jint mmax, jint minp, jint nbmin, jfloat abstol, jfloat reltol, jfloat pivmin, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray e2, jint offsete2, jintArray nval, jint offsetnval, jfloatArray ab, jint offsetab, jfloatArray c, jint offsetc, jobject mout, jintArray nab, jint offsetnab, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + int __nmout = 0; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__ne2 = NULL; int *__nnval = NULL; float *__nab = NULL; float *__nc = NULL; int *__nnab = NULL; float *__nwork = NULL; int *__niwork = NULL; + __nmout = (*env)->GetIntField(env, mout, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) goto fail; + if (!(__nnval = (*env)->GetPrimitiveArrayCritical(env, nval, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nnab = (*env)->GetPrimitiveArrayCritical(env, nab, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + slaebz_(&ijob, &nitmax, &n, &mmax, &minp, &nbmin, &abstol, &reltol, &pivmin, __nd + offsetd, __ne + offsete, __ne2 + offsete2, __nnval + offsetnval, __nab + offsetab, __nc + offsetc, &__nmout, __nnab + offsetnab, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nnab) (*env)->ReleasePrimitiveArrayCritical(env, nab, __nnab, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (__nnval) (*env)->ReleasePrimitiveArrayCritical(env, nval, __nnval, failed ? JNI_ABORT : 0); + if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, mout, intW_val_fieldID, __nmout); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sggqrf_)(int *n, int *m, int *p, float *a, int *lda, float *taua, float *b, int *ldb, float *taub, float *work, int *lwork, /*FIXME*/void *info); +static void (*slaed0_)(int *icompq, int *qsiz, int *n, float *d, float *e, float *q, int *ldq, float *qstore, int *ldqs, float *work, int *iwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggqrfK(JNIEnv *env, UNUSED jobject obj, - jint n, jint m, jint p, jfloatArray a, jint offseta, jint lda, jfloatArray taua, jint offsettaua, jfloatArray b, jint offsetb, jint ldb, jfloatArray taub, jint offsettaub, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed0K(JNIEnv *env, UNUSED jobject obj, jint icompq, jint qsiz, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray q, jint offsetq, jint ldq, jfloatArray qstore, jint offsetqstore, jint ldqs, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nq = NULL; float *__nqstore = NULL; float *__nwork = NULL; int *__niwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nqstore = (*env)->GetPrimitiveArrayCritical(env, qstore, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + slaed0_(&icompq, &qsiz, &n, __nd + offsetd, __ne + offsete, __nq + offsetq, &ldq, __nqstore + offsetqstore, &ldqs, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nqstore) (*env)->ReleasePrimitiveArrayCritical(env, qstore, __nqstore, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sggrqf_)(int *m, int *p, int *n, float *a, int *lda, float *taua, float *b, int *ldb, float *taub, float *work, int *lwork, /*FIXME*/void *info); +static void (*slaed1_)(int *n, float *d, float *q, int *ldq, int *indxq, float *rho, int *cutpnt, float *work, int *iwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggrqfK(JNIEnv *env, UNUSED jobject obj, - jint m, jint p, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray taua, jint offsettaua, jfloatArray b, jint offsetb, jint ldb, jfloatArray taub, jint offsettaub, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed1K(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray d, jint offsetd, jfloatArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jint cutpnt, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + float __nrho = 0; int __ninfo = 0; float *__nd = NULL; float *__nq = NULL; int *__nindxq = NULL; float *__nwork = NULL; int *__niwork = NULL; + __nrho = (*env)->GetFloatField(env, rho, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nindxq = (*env)->GetPrimitiveArrayCritical(env, indxq, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + slaed1_(&n, __nd + offsetd, __nq + offsetq, &ldq, __nindxq + offsetindxq, &__nrho, &cutpnt, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nindxq) (*env)->ReleasePrimitiveArrayCritical(env, indxq, __nindxq, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, rho, floatW_val_fieldID, __nrho); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sggsvd_)(char *jobu, char *jobv, char *jobq, int *m, int *n, int *p, /*FIXME*/void *k, /*FIXME*/void *l, float *a, int *lda, float *b, int *ldb, float *alpha, float *beta, float *u, int *ldu, float *v, int *ldv, float *q, int *ldq, float *work, int * iwork, /*FIXME*/void *info); +static void (*slaed2_)(int *k, int *n, int *n1, float *d, float *q, int *ldq, int *indxq, float *rho, float *z, float *dlamda, float *w, float *q2, int *indx, int *indxc, int *indxp, int *coltyp, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed2K(JNIEnv *env, UNUSED jobject obj, jobject k, jint n, jint n1, jfloatArray d, jint offsetd, jfloatArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jfloatArray z, jint offsetz, jfloatArray dlamda, jint offsetdlamda, jfloatArray w, jint offsetw, jfloatArray q2, jint offsetq2, jintArray indx, jint offsetindx, jintArray indxc, jint offsetindxc, jintArray indxp, jint offsetindxp, jintArray coltyp, jint offsetcoltyp, jobject info) { + jboolean failed = FALSE; + int __nk = 0; float __nrho = 0; int __ninfo = 0; float *__nd = NULL; float *__nq = NULL; int *__nindxq = NULL; float *__nz = NULL; float *__ndlamda = NULL; float *__nw = NULL; float *__nq2 = NULL; int *__nindx = NULL; int *__nindxc = NULL; int *__nindxp = NULL; int *__ncoltyp = NULL; + __nk = (*env)->GetIntField(env, k, intW_val_fieldID); + __nrho = (*env)->GetFloatField(env, rho, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nindxq = (*env)->GetPrimitiveArrayCritical(env, indxq, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__ndlamda = (*env)->GetPrimitiveArrayCritical(env, dlamda, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nq2 = (*env)->GetPrimitiveArrayCritical(env, q2, NULL))) goto fail; + if (!(__nindx = (*env)->GetPrimitiveArrayCritical(env, indx, NULL))) goto fail; + if (!(__nindxc = (*env)->GetPrimitiveArrayCritical(env, indxc, NULL))) goto fail; + if (!(__nindxp = (*env)->GetPrimitiveArrayCritical(env, indxp, NULL))) goto fail; + if (!(__ncoltyp = (*env)->GetPrimitiveArrayCritical(env, coltyp, NULL))) goto fail; + slaed2_(&__nk, &n, &n1, __nd + offsetd, __nq + offsetq, &ldq, __nindxq + offsetindxq, &__nrho, __nz + offsetz, __ndlamda + offsetdlamda, __nw + offsetw, __nq2 + offsetq2, __nindx + offsetindx, __nindxc + offsetindxc, __nindxp + offsetindxp, __ncoltyp + offsetcoltyp, &__ninfo); +done: + if (__ncoltyp) (*env)->ReleasePrimitiveArrayCritical(env, coltyp, __ncoltyp, failed ? JNI_ABORT : 0); + if (__nindxp) (*env)->ReleasePrimitiveArrayCritical(env, indxp, __nindxp, failed ? JNI_ABORT : 0); + if (__nindxc) (*env)->ReleasePrimitiveArrayCritical(env, indxc, __nindxc, failed ? JNI_ABORT : 0); + if (__nindx) (*env)->ReleasePrimitiveArrayCritical(env, indx, __nindx, failed ? JNI_ABORT : 0); + if (__nq2) (*env)->ReleasePrimitiveArrayCritical(env, q2, __nq2, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__ndlamda) (*env)->ReleasePrimitiveArrayCritical(env, dlamda, __ndlamda, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nindxq) (*env)->ReleasePrimitiveArrayCritical(env, indxq, __nindxq, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, rho, floatW_val_fieldID, __nrho); + if (!failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; +} -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggsvdK(JNIEnv *env, UNUSED jobject obj, - jstring jobu, jstring jobv, jstring jobq, jint m, jint n, jint p, jobject k, jobject l, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray alpha, jint offsetalpha, jfloatArray beta, jint offsetbeta, jfloatArray u, jint offsetu, jint ldu, jfloatArray v, jint offsetv, jint ldv, jfloatArray q, jint offsetq, jint ldq, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*slaed3_)(int *k, int *n, int *n1, float *d, float *q, int *ldq, float *rho, float *dlamda, float *q2, int *indx, int *ctot, float *w, float *s, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed3K(JNIEnv *env, UNUSED jobject obj, jint k, jint n, jint n1, jfloatArray d, jint offsetd, jfloatArray q, jint offsetq, jint ldq, jfloat rho, jfloatArray dlamda, jint offsetdlamda, jfloatArray q2, jint offsetq2, jintArray indx, jint offsetindx, jintArray ctot, jint offsetctot, jfloatArray w, jint offsetw, jfloatArray s, jint offsets, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__nd = NULL; float *__nq = NULL; float *__ndlamda = NULL; float *__nq2 = NULL; int *__nindx = NULL; int *__nctot = NULL; float *__nw = NULL; float *__ns = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__ndlamda = (*env)->GetPrimitiveArrayCritical(env, dlamda, NULL))) goto fail; + if (!(__nq2 = (*env)->GetPrimitiveArrayCritical(env, q2, NULL))) goto fail; + if (!(__nindx = (*env)->GetPrimitiveArrayCritical(env, indx, NULL))) goto fail; + if (!(__nctot = (*env)->GetPrimitiveArrayCritical(env, ctot, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + slaed3_(&k, &n, &n1, __nd + offsetd, __nq + offsetq, &ldq, &rho, __ndlamda + offsetdlamda, __nq2 + offsetq2, __nindx + offsetindx, __nctot + offsetctot, __nw + offsetw, __ns + offsets, &__ninfo); +done: + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nctot) (*env)->ReleasePrimitiveArrayCritical(env, ctot, __nctot, failed ? JNI_ABORT : 0); + if (__nindx) (*env)->ReleasePrimitiveArrayCritical(env, indx, __nindx, failed ? JNI_ABORT : 0); + if (__nq2) (*env)->ReleasePrimitiveArrayCritical(env, q2, __nq2, failed ? JNI_ABORT : 0); + if (__ndlamda) (*env)->ReleasePrimitiveArrayCritical(env, dlamda, __ndlamda, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sggsvp_)(char *jobu, char *jobv, char *jobq, int *m, int *p, int *n, float *a, int *lda, float *b, int *ldb, float *tola, float *tolb, /*FIXME*/void *k, /*FIXME*/void *l, float *u, int *ldu, float *v, int *ldv, float *q, int *ldq, int * iwork, float *tau, float *work, /*FIXME*/void *info); +static void (*slaed4_)(int *n, int *i, float *d, float *z, float *delta, float *rho, float *dlam, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggsvpK(JNIEnv *env, UNUSED jobject obj, - jstring jobu, jstring jobv, jstring jobq, jint m, jint p, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat tola, jfloat tolb, jobject k, jobject l, jfloatArray u, jint offsetu, jint ldu, jfloatArray v, jint offsetv, jint ldv, jfloatArray q, jint offsetq, jint ldq, jintArray iwork, jint offsetiwork, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed4K(JNIEnv *env, UNUSED jobject obj, jint n, jint i, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloatArray delta, jint offsetdelta, jfloat rho, jobject dlam, jobject info) { + jboolean failed = FALSE; + float __ndlam = 0; int __ninfo = 0; float *__nd = NULL; float *__nz = NULL; float *__ndelta = NULL; + __ndlam = (*env)->GetFloatField(env, dlam, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__ndelta = (*env)->GetPrimitiveArrayCritical(env, delta, NULL))) goto fail; + slaed4_(&n, &i, __nd + offsetd, __nz + offsetz, __ndelta + offsetdelta, &rho, &__ndlam, &__ninfo); +done: + if (__ndelta) (*env)->ReleasePrimitiveArrayCritical(env, delta, __ndelta, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, dlam, floatW_val_fieldID, __ndlam); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgtcon_)(char *norm, int *n, float *dl, float *d, float *du, float *du22, int * ipiv, float *anorm, /*FIXME*/void *rcond, float *work, int * iwork, /*FIXME*/void *info); +static void (*slaed5_)(int *i, float *d, float *z, float *delta, float *rho, float *dlam); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgtconK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jint n, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed5K(JNIEnv *env, UNUSED jobject obj, jint i, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloatArray delta, jint offsetdelta, jfloat rho, jobject dlam) { + jboolean failed = FALSE; + float __ndlam = 0; float *__nd = NULL; float *__nz = NULL; float *__ndelta = NULL; + __ndlam = (*env)->GetFloatField(env, dlam, floatW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__ndelta = (*env)->GetPrimitiveArrayCritical(env, delta, NULL))) goto fail; + slaed5_(&i, __nd + offsetd, __nz + offsetz, __ndelta + offsetdelta, &rho, &__ndlam); +done: + if (__ndelta) (*env)->ReleasePrimitiveArrayCritical(env, delta, __ndelta, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetFloatField(env, dlam, floatW_val_fieldID, __ndlam); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgtrfs_)(char *trans, int *n, int *nrhs, float *dl, float *d, float *du, float *dlf, float *df, float *duf, float *du22, int * ipiv, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int * iwork, /*FIXME*/void *info); +static void (*slaed6_)(int *kniter, int *orgati, float *rho, float *d, float *z, float *finit, float *tau, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgtrfsK(JNIEnv *env, UNUSED jobject obj, - jstring trans, jint n, jint nrhs, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray dlf, jint offsetdlf, jfloatArray df, jint offsetdf, jfloatArray duf, jint offsetduf, jfloatArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed6K(JNIEnv *env, UNUSED jobject obj, jint kniter, jboolean orgati, jfloat rho, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloat finit, jobject tau, jobject info) { + jboolean failed = FALSE; + int __norgati; float __ntau = 0; int __ninfo = 0; float *__nd = NULL; float *__nz = NULL; + __norgati = orgati; + __ntau = (*env)->GetFloatField(env, tau, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + slaed6_(&kniter, &__norgati, &rho, __nd + offsetd, __nz + offsetz, &finit, &__ntau, &__ninfo); +done: + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, tau, floatW_val_fieldID, __ntau); + if (!failed) orgati = __norgati; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgtsv_)(int *n, int *nrhs, float *dl, float *d, float *du, float *b, int *ldb, /*FIXME*/void *info); +static void (*slaed7_)(int *icompq, int *n, int *qsiz, int *tlvls, int *curlvl, int *curpbm, float *d, float *q, int *ldq, int *indxq, float *rho, int *cutpnt, float *qstore, int *qptr, int *prmptr, int *perm, int *givptr, int *givcol, float *givnum, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed7K(JNIEnv *env, UNUSED jobject obj, jint icompq, jint n, jint qsiz, jint tlvls, jint curlvl, jint curpbm, jfloatArray d, jint offsetd, jfloatArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jint cutpnt, jfloatArray qstore, jint offsetqstore, jintArray qptr, jint offsetqptr, jintArray prmptr, jint offsetprmptr, jintArray perm, jint offsetperm, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jfloatArray givnum, jint offsetgivnum, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + float __nrho = 0; int __ninfo = 0; float *__nd = NULL; float *__nq = NULL; int *__nindxq = NULL; float *__nqstore = NULL; int *__nqptr = NULL; int *__nprmptr = NULL; int *__nperm = NULL; int *__ngivptr = NULL; int *__ngivcol = NULL; float *__ngivnum = NULL; float *__nwork = NULL; int *__niwork = NULL; + __nrho = (*env)->GetFloatField(env, rho, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nindxq = (*env)->GetPrimitiveArrayCritical(env, indxq, NULL))) goto fail; + if (!(__nqstore = (*env)->GetPrimitiveArrayCritical(env, qstore, NULL))) goto fail; + if (!(__nqptr = (*env)->GetPrimitiveArrayCritical(env, qptr, NULL))) goto fail; + if (!(__nprmptr = (*env)->GetPrimitiveArrayCritical(env, prmptr, NULL))) goto fail; + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; + if (!(__ngivptr = (*env)->GetPrimitiveArrayCritical(env, givptr, NULL))) goto fail; + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + slaed7_(&icompq, &n, &qsiz, &tlvls, &curlvl, &curpbm, __nd + offsetd, __nq + offsetq, &ldq, __nindxq + offsetindxq, &__nrho, &cutpnt, __nqstore + offsetqstore, __nqptr + offsetqptr, __nprmptr + offsetprmptr, __nperm + offsetperm, __ngivptr + offsetgivptr, __ngivcol + offsetgivcol, __ngivnum + offsetgivnum, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); + if (__ngivptr) (*env)->ReleasePrimitiveArrayCritical(env, givptr, __ngivptr, failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); + if (__nprmptr) (*env)->ReleasePrimitiveArrayCritical(env, prmptr, __nprmptr, failed ? JNI_ABORT : 0); + if (__nqptr) (*env)->ReleasePrimitiveArrayCritical(env, qptr, __nqptr, failed ? JNI_ABORT : 0); + if (__nqstore) (*env)->ReleasePrimitiveArrayCritical(env, qstore, __nqstore, failed ? JNI_ABORT : 0); + if (__nindxq) (*env)->ReleasePrimitiveArrayCritical(env, indxq, __nindxq, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, rho, floatW_val_fieldID, __nrho); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; +} -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgtsvK(JNIEnv *env, UNUSED jobject obj, - jint n, jint nrhs, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*slaed8_)(int *icompq, int *k, int *n, int *qsiz, float *d, float *q, int *ldq, int *indxq, float *rho, int *cutpnt, float *z, float *dlamda, float *q2, int *ldq2, float *w, int *perm, int *givptr, int *givcol, float *givnum, int *indxp, int *indx, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed8K(JNIEnv *env, UNUSED jobject obj, jint icompq, jobject k, jint n, jint qsiz, jfloatArray d, jint offsetd, jfloatArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jint cutpnt, jfloatArray z, jint offsetz, jfloatArray dlamda, jint offsetdlamda, jfloatArray q2, jint offsetq2, jint ldq2, jfloatArray w, jint offsetw, jintArray perm, jint offsetperm, jobject givptr, jintArray givcol, jint offsetgivcol, jfloatArray givnum, jint offsetgivnum, jintArray indxp, jint offsetindxp, jintArray indx, jint offsetindx, jobject info) { + jboolean failed = FALSE; + int __nk = 0; float __nrho = 0; int __ngivptr = 0; int __ninfo = 0; float *__nd = NULL; float *__nq = NULL; int *__nindxq = NULL; float *__nz = NULL; float *__ndlamda = NULL; float *__nq2 = NULL; float *__nw = NULL; int *__nperm = NULL; int *__ngivcol = NULL; float *__ngivnum = NULL; int *__nindxp = NULL; int *__nindx = NULL; + __nk = (*env)->GetIntField(env, k, intW_val_fieldID); + __nrho = (*env)->GetFloatField(env, rho, floatW_val_fieldID); + __ngivptr = (*env)->GetIntField(env, givptr, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nindxq = (*env)->GetPrimitiveArrayCritical(env, indxq, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__ndlamda = (*env)->GetPrimitiveArrayCritical(env, dlamda, NULL))) goto fail; + if (!(__nq2 = (*env)->GetPrimitiveArrayCritical(env, q2, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; + if (!(__nindxp = (*env)->GetPrimitiveArrayCritical(env, indxp, NULL))) goto fail; + if (!(__nindx = (*env)->GetPrimitiveArrayCritical(env, indx, NULL))) goto fail; + slaed8_(&icompq, &__nk, &n, &qsiz, __nd + offsetd, __nq + offsetq, &ldq, __nindxq + offsetindxq, &__nrho, &cutpnt, __nz + offsetz, __ndlamda + offsetdlamda, __nq2 + offsetq2, &ldq2, __nw + offsetw, __nperm + offsetperm, &__ngivptr, __ngivcol + offsetgivcol, __ngivnum + offsetgivnum, __nindxp + offsetindxp, __nindx + offsetindx, &__ninfo); +done: + if (__nindx) (*env)->ReleasePrimitiveArrayCritical(env, indx, __nindx, failed ? JNI_ABORT : 0); + if (__nindxp) (*env)->ReleasePrimitiveArrayCritical(env, indxp, __nindxp, failed ? JNI_ABORT : 0); + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nq2) (*env)->ReleasePrimitiveArrayCritical(env, q2, __nq2, failed ? JNI_ABORT : 0); + if (__ndlamda) (*env)->ReleasePrimitiveArrayCritical(env, dlamda, __ndlamda, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nindxq) (*env)->ReleasePrimitiveArrayCritical(env, indxq, __nindxq, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, givptr, intW_val_fieldID, __ngivptr); + if (!failed) (*env)->SetFloatField(env, rho, floatW_val_fieldID, __nrho); + if (!failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgtsvx_)(char *fact, char *trans, int *n, int *nrhs, float *dl, float *d, float *du, float *dlf, float *df, float *duf, float *du22, int * ipiv, float *b, int *ldb, float *x, int *ldx, /*FIXME*/void *rcond, float *ferr, float *berr, float *work, int * iwork, /*FIXME*/void *info); +static void (*slaed9_)(int *k, int *kstart, int *kstop, int *n, float *d, float *q, int *ldq, float *rho, float *dlamda, float *w, float *s, int *lds, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgtsvxK(JNIEnv *env, UNUSED jobject obj, - jstring fact, jstring trans, jint n, jint nrhs, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray dlf, jint offsetdlf, jfloatArray df, jint offsetdf, jfloatArray duf, jint offsetduf, jfloatArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed9K(JNIEnv *env, UNUSED jobject obj, jint k, jint kstart, jint kstop, jint n, jfloatArray d, jint offsetd, jfloatArray q, jint offsetq, jint ldq, jfloat rho, jfloatArray dlamda, jint offsetdlamda, jfloatArray w, jint offsetw, jfloatArray s, jint offsets, jint lds, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__nd = NULL; float *__nq = NULL; float *__ndlamda = NULL; float *__nw = NULL; float *__ns = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__ndlamda = (*env)->GetPrimitiveArrayCritical(env, dlamda, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + slaed9_(&k, &kstart, &kstop, &n, __nd + offsetd, __nq + offsetq, &ldq, &rho, __ndlamda + offsetdlamda, __nw + offsetw, __ns + offsets, &lds, &__ninfo); +done: + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__ndlamda) (*env)->ReleasePrimitiveArrayCritical(env, dlamda, __ndlamda, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgttrf_)(int *n, float *dl, float *d, float *du, float *du22, int * ipiv, /*FIXME*/void *info); +static void (*slaeda_)(int *n, int *tlvls, int *curlvl, int *curpbm, int *prmptr, int *perm, int *givptr, int *givcol, float *givnum, float *q, int *qptr, float *z, float *ztemp, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaedaK(JNIEnv *env, UNUSED jobject obj, jint n, jint tlvls, jint curlvl, jint curpbm, jintArray prmptr, jint offsetprmptr, jintArray perm, jint offsetperm, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jfloatArray givnum, jint offsetgivnum, jfloatArray q, jint offsetq, jintArray qptr, jint offsetqptr, jfloatArray z, jint offsetz, jfloatArray ztemp, jint offsetztemp, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; int *__nprmptr = NULL; int *__nperm = NULL; int *__ngivptr = NULL; int *__ngivcol = NULL; float *__ngivnum = NULL; float *__nq = NULL; int *__nqptr = NULL; float *__nz = NULL; float *__nztemp = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nprmptr = (*env)->GetPrimitiveArrayCritical(env, prmptr, NULL))) goto fail; + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; + if (!(__ngivptr = (*env)->GetPrimitiveArrayCritical(env, givptr, NULL))) goto fail; + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nqptr = (*env)->GetPrimitiveArrayCritical(env, qptr, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nztemp = (*env)->GetPrimitiveArrayCritical(env, ztemp, NULL))) goto fail; + slaeda_(&n, &tlvls, &curlvl, &curpbm, __nprmptr + offsetprmptr, __nperm + offsetperm, __ngivptr + offsetgivptr, __ngivcol + offsetgivcol, __ngivnum + offsetgivnum, __nq + offsetq, __nqptr + offsetqptr, __nz + offsetz, __nztemp + offsetztemp, &__ninfo); +done: + if (__nztemp) (*env)->ReleasePrimitiveArrayCritical(env, ztemp, __nztemp, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nqptr) (*env)->ReleasePrimitiveArrayCritical(env, qptr, __nqptr, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); + if (__ngivptr) (*env)->ReleasePrimitiveArrayCritical(env, givptr, __ngivptr, failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); + if (__nprmptr) (*env)->ReleasePrimitiveArrayCritical(env, prmptr, __nprmptr, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; +} -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgttrfK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*slaein_)(int *rightv, int *noinit, int *n, float *h, int *ldh, float *wr, float *wi, float *vr, float *vi, float *b, int *ldb, float *work, float *eps3, float *smlnum, float *bignum, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaeinK(JNIEnv *env, UNUSED jobject obj, jboolean rightv, jboolean noinit, jint n, jfloatArray h, jint offseth, jint ldh, jfloat wr, jfloat wi, jfloatArray vr, jint offsetvr, jfloatArray vi, jint offsetvi, jfloatArray b, jint offsetb, jint ldb, jfloatArray work, jint offsetwork, jfloat eps3, jfloat smlnum, jfloat bignum, jobject info) { + jboolean failed = FALSE; + int __nrightv; int __nnoinit; int __ninfo = 0; float *__nh = NULL; float *__nvr = NULL; float *__nvi = NULL; float *__nb = NULL; float *__nwork = NULL; + __nrightv = rightv; + __nnoinit = noinit; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; + if (!(__nvi = (*env)->GetPrimitiveArrayCritical(env, vi, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + slaein_(&__nrightv, &__nnoinit, &n, __nh + offseth, &ldh, &wr, &wi, __nvr + offsetvr, __nvi + offsetvi, __nb + offsetb, &ldb, __nwork + offsetwork, &eps3, &smlnum, &bignum, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nvi) (*env)->ReleasePrimitiveArrayCritical(env, vi, __nvi, failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) noinit = __nnoinit; + if (!failed) rightv = __nrightv; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgttrs_)(char *trans, int *n, int *nrhs, float *dl, float *d, float *du, float *du22, int * ipiv, float *b, int *ldb, /*FIXME*/void *info); +static void (*slaev2_)(float *a, float *b, float *c, float *rt1, float *rt2, float *cs1, float *sn1); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgttrsK(JNIEnv *env, UNUSED jobject obj, - jstring trans, jint n, jint nrhs, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaev2K(JNIEnv *env, UNUSED jobject obj, jfloat a, jfloat b, jfloat c, jobject rt1, jobject rt2, jobject cs1, jobject sn1) { + jboolean failed = FALSE; + float __nrt1 = 0; float __nrt2 = 0; float __ncs1 = 0; float __nsn1 = 0; + __nrt1 = (*env)->GetFloatField(env, rt1, floatW_val_fieldID); + __nrt2 = (*env)->GetFloatField(env, rt2, floatW_val_fieldID); + __ncs1 = (*env)->GetFloatField(env, cs1, floatW_val_fieldID); + __nsn1 = (*env)->GetFloatField(env, sn1, floatW_val_fieldID); + slaev2_(&a, &b, &c, &__nrt1, &__nrt2, &__ncs1, &__nsn1); +done: + if (!failed) (*env)->SetFloatField(env, sn1, floatW_val_fieldID, __nsn1); + if (!failed) (*env)->SetFloatField(env, cs1, floatW_val_fieldID, __ncs1); + if (!failed) (*env)->SetFloatField(env, rt2, floatW_val_fieldID, __nrt2); + if (!failed) (*env)->SetFloatField(env, rt1, floatW_val_fieldID, __nrt1); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sgtts2_)(int *itrans, int *n, int *nrhs, float *dl, float *d, float *du, float *du22, int * ipiv, float *b, int *ldb); +static void (*slaexc_)(int *wantq, int *n, float *t, int *ldt, float *q, int *ldq, int *j1, int *n1, int *n2, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgtts2K(JNIEnv *env, UNUSED jobject obj, - jint itrans, jint n, jint nrhs, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaexcK(JNIEnv *env, UNUSED jobject obj, jboolean wantq, jint n, jfloatArray t, jint offsett, jint ldt, jfloatArray q, jint offsetq, jint ldq, jint j1, jint n1, jint n2, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __nwantq; int __ninfo = 0; float *__nt = NULL; float *__nq = NULL; float *__nwork = NULL; + __nwantq = wantq; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + slaexc_(&__nwantq, &n, __nt + offsett, &ldt, __nq + offsetq, &ldq, &j1, &n1, &n2, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) wantq = __nwantq; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*shgeqz_)(char *job, char *compq, char *compz, int *n, int *ilo, int *ihi, float *h, int *ldh, float *t, int *ldt, float *alphar, float *alphai, float *beta, float *q, int *ldq, float *z, int *ldz, float *work, int *lwork, /*FIXME*/void *info); +static void (*slag2_)(float *a, int *lda, float *b, int *ldb, float *safmin, float *scale1, float *scale2, float *wr1, float *wr2, float *wi); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_shgeqzK(JNIEnv *env, UNUSED jobject obj, - jstring job, jstring compq, jstring compz, jint n, jint ilo, jint ihi, jfloatArray h, jint offseth, jint ldh, jfloatArray t, jint offsett, jint ldt, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray q, jint offsetq, jint ldq, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slag2K(JNIEnv *env, UNUSED jobject obj, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat safmin, jobject scale1, jobject scale2, jobject wr1, jobject wr2, jobject wi) { + jboolean failed = FALSE; + float __nscale1 = 0; float __nscale2 = 0; float __nwr1 = 0; float __nwr2 = 0; float __nwi = 0; float *__na = NULL; float *__nb = NULL; + __nscale1 = (*env)->GetFloatField(env, scale1, floatW_val_fieldID); + __nscale2 = (*env)->GetFloatField(env, scale2, floatW_val_fieldID); + __nwr1 = (*env)->GetFloatField(env, wr1, floatW_val_fieldID); + __nwr2 = (*env)->GetFloatField(env, wr2, floatW_val_fieldID); + __nwi = (*env)->GetFloatField(env, wi, floatW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + slag2_(__na + offseta, &lda, __nb + offsetb, &ldb, &safmin, &__nscale1, &__nscale2, &__nwr1, &__nwr2, &__nwi); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetFloatField(env, wi, floatW_val_fieldID, __nwi); + if (!failed) (*env)->SetFloatField(env, wr2, floatW_val_fieldID, __nwr2); + if (!failed) (*env)->SetFloatField(env, wr1, floatW_val_fieldID, __nwr1); + if (!failed) (*env)->SetFloatField(env, scale2, floatW_val_fieldID, __nscale2); + if (!failed) (*env)->SetFloatField(env, scale1, floatW_val_fieldID, __nscale1); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*shsein_)(char *side, char *eigsrc, char *initv, int *select, int *n, float *h, int *ldh, float *wr, float *wi, float *vl, int *ldvl, float *vr, int *ldvr, int *mm, /*FIXME*/void *m, float *work, int * ifaill, int * ifailr, /*FIXME*/void *info); +static void (*slag2d_)(int *m, int *n, float *sa, int *ldsa, double *a, int *lda, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_shseinK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring eigsrc, jstring initv, jbooleanArray select, jint offsetselect, jint n, jfloatArray h, jint offseth, jint ldh, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jint mm, jobject m, jfloatArray work, jint offsetwork, jintArray ifaill, jint offsetifaill, jintArray ifailr, jint offsetifailr, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slag2dK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray sa, jint offsetsa, jint ldsa, jdoubleArray a, jint offseta, jint lda, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__nsa = NULL; double *__na = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nsa = (*env)->GetPrimitiveArrayCritical(env, sa, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + slag2d_(&m, &n, __nsa + offsetsa, &ldsa, __na + offseta, &lda, &__ninfo); +done: + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nsa) (*env)->ReleasePrimitiveArrayCritical(env, sa, __nsa, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*shseqr_)(char *job, char *compz, int *n, int *ilo, int *ihi, float *h, int *ldh, float *wr, float *wi, float *z, int *ldz, float *work, int *lwork, /*FIXME*/void *info); +static void (*slags2_)(int *upper, float *a1, float *a2, float *a3, float *b1, float *b2, float *b3, float *csu, float *snu, float *csv, float *snv, float *csq, float *snq); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_shseqrK(JNIEnv *env, UNUSED jobject obj, - jstring job, jstring compz, jint n, jint ilo, jint ihi, jfloatArray h, jint offseth, jint ldh, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slags2K(JNIEnv *env, UNUSED jobject obj, jboolean upper, jfloat a1, jfloat a2, jfloat a3, jfloat b1, jfloat b2, jfloat b3, jobject csu, jobject snu, jobject csv, jobject snv, jobject csq, jobject snq) { + jboolean failed = FALSE; + int __nupper; float __ncsu = 0; float __nsnu = 0; float __ncsv = 0; float __nsnv = 0; float __ncsq = 0; float __nsnq = 0; + __nupper = upper; + __ncsu = (*env)->GetFloatField(env, csu, floatW_val_fieldID); + __nsnu = (*env)->GetFloatField(env, snu, floatW_val_fieldID); + __ncsv = (*env)->GetFloatField(env, csv, floatW_val_fieldID); + __nsnv = (*env)->GetFloatField(env, snv, floatW_val_fieldID); + __ncsq = (*env)->GetFloatField(env, csq, floatW_val_fieldID); + __nsnq = (*env)->GetFloatField(env, snq, floatW_val_fieldID); + slags2_(&__nupper, &a1, &a2, &a3, &b1, &b2, &b3, &__ncsu, &__nsnu, &__ncsv, &__nsnv, &__ncsq, &__nsnq); +done: + if (!failed) (*env)->SetFloatField(env, snq, floatW_val_fieldID, __nsnq); + if (!failed) (*env)->SetFloatField(env, csq, floatW_val_fieldID, __ncsq); + if (!failed) (*env)->SetFloatField(env, snv, floatW_val_fieldID, __nsnv); + if (!failed) (*env)->SetFloatField(env, csv, floatW_val_fieldID, __ncsv); + if (!failed) (*env)->SetFloatField(env, snu, floatW_val_fieldID, __nsnu); + if (!failed) (*env)->SetFloatField(env, csu, floatW_val_fieldID, __ncsu); + if (!failed) upper = __nupper; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static int *(*sisnan_)(float *sin); +static void (*slagtf_)(int *n, float *a, float *lambda, float *b, float *c, float *tol, float *d, int *in, int *info); -jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_sisnanK(JNIEnv *env, UNUSED jobject obj, - jfloat sin) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slagtfK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray a, jint offseta, jfloat lambda, jfloatArray b, jint offsetb, jfloatArray c, jint offsetc, jfloat tol, jfloatArray d, jint offsetd, jintArray in, jint offsetin, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nc = NULL; float *__nd = NULL; int *__nin = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nin = (*env)->GetPrimitiveArrayCritical(env, in, NULL))) goto fail; + slagtf_(&n, __na + offseta, &lambda, __nb + offsetb, __nc + offsetc, &tol, __nd + offsetd, __nin + offsetin, &__ninfo); +done: + if (__nin) (*env)->ReleasePrimitiveArrayCritical(env, in, __nin, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slabad_)(/*FIXME*/void *small, /*FIXME*/void *large); +static void (*slagtm_)(const char *trans, int *n, int *nrhs, float *alpha, float *dl, float *d, float *du, float *x, int *ldx, float *beta, float *b, int *ldb); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slabadK(JNIEnv *env, UNUSED jobject obj, - jobject small, jobject large) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slagtmK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint n, jint nrhs, jfloat alpha, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray x, jint offsetx, jint ldx, jfloat beta, jfloatArray b, jint offsetb, jint ldb) { + jboolean failed = FALSE; + const char *__ntrans = NULL; float *__ndl = NULL; float *__nd = NULL; float *__ndu = NULL; float *__nx = NULL; float *__nb = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + slagtm_(__ntrans, &n, &nrhs, &alpha, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __nx + offsetx, &ldx, &beta, __nb + offsetb, &ldb); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slabrd_)(int *m, int *n, int *nb, float *a, int *lda, float *d, float *e, float *tauq, float *taup, float *x, int *ldx, float *y, int *ldy); +static void (*slagts_)(int *job, int *n, float *a, float *b, float *c, float *d, int *in, float *y, float *tol, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slagtsK(JNIEnv *env, UNUSED jobject obj, jint job, jint n, jfloatArray a, jint offseta, jfloatArray b, jint offsetb, jfloatArray c, jint offsetc, jfloatArray d, jint offsetd, jintArray in, jint offsetin, jfloatArray y, jint offsety, jobject tol, jobject info) { + jboolean failed = FALSE; + float __ntol = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nc = NULL; float *__nd = NULL; int *__nin = NULL; float *__ny = NULL; + __ntol = (*env)->GetFloatField(env, tol, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nin = (*env)->GetPrimitiveArrayCritical(env, in, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + slagts_(&job, &n, __na + offseta, __nb + offsetb, __nc + offsetc, __nd + offsetd, __nin + offsetin, __ny + offsety, &__ntol, &__ninfo); +done: + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nin) (*env)->ReleasePrimitiveArrayCritical(env, in, __nin, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, tol, floatW_val_fieldID, __ntol); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; +} -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slabrdK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint nb, jfloatArray a, jint offseta, jint lda, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray tauq, jint offsettauq, jfloatArray taup, jint offsettaup, jfloatArray x, jint offsetx, jint ldx, jfloatArray y, jint offsety, jint ldy) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*slagv2_)(float *a, int *lda, float *b, int *ldb, float *alphar, float *alphai, float *beta, float *csl, float *snl, float *csr, float *snr); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slagv2K(JNIEnv *env, UNUSED jobject obj, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jobject csl, jobject snl, jobject csr, jobject snr) { + jboolean failed = FALSE; + float __ncsl = 0; float __nsnl = 0; float __ncsr = 0; float __nsnr = 0; float *__na = NULL; float *__nb = NULL; float *__nalphar = NULL; float *__nalphai = NULL; float *__nbeta = NULL; + __ncsl = (*env)->GetFloatField(env, csl, floatW_val_fieldID); + __nsnl = (*env)->GetFloatField(env, snl, floatW_val_fieldID); + __ncsr = (*env)->GetFloatField(env, csr, floatW_val_fieldID); + __nsnr = (*env)->GetFloatField(env, snr, floatW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) goto fail; + if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) goto fail; + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; + slagv2_(__na + offseta, &lda, __nb + offsetb, &ldb, __nalphar + offsetalphar, __nalphai + offsetalphai, __nbeta + offsetbeta, &__ncsl, &__nsnl, &__ncsr, &__nsnr); +done: + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); + if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, failed ? JNI_ABORT : 0); + if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetFloatField(env, snr, floatW_val_fieldID, __nsnr); + if (!failed) (*env)->SetFloatField(env, csr, floatW_val_fieldID, __ncsr); + if (!failed) (*env)->SetFloatField(env, snl, floatW_val_fieldID, __nsnl); + if (!failed) (*env)->SetFloatField(env, csl, floatW_val_fieldID, __ncsl); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slacn2_)(int *n, float *v, float *x, int * isgn, /*FIXME*/void *est, /*FIXME*/void *kase, int * isave); +static void (*slahqr_)(int *wantt, int *wantz, int *n, int *ilo, int *ihi, float *h, int *ldh, float *wr, float *wi, int *iloz, int *ihiz, float *z, int *ldz, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slacn2K(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray v, jint offsetv, jfloatArray x, jint offsetx, jintArray isgn, jint offsetisgn, jobject est, jobject kase, jintArray isave, jint offsetisave) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slahqrK(JNIEnv *env, UNUSED jobject obj, jboolean wantt, jboolean wantz, jint n, jint ilo, jint ihi, jfloatArray h, jint offseth, jint ldh, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jint iloz, jint ihiz, jfloatArray z, jint offsetz, jint ldz, jobject info) { + jboolean failed = FALSE; + int __nwantt; int __nwantz; int __ninfo = 0; float *__nh = NULL; float *__nwr = NULL; float *__nwi = NULL; float *__nz = NULL; + __nwantt = wantt; + __nwantz = wantz; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + slahqr_(&__nwantt, &__nwantz, &n, &ilo, &ihi, __nh + offseth, &ldh, __nwr + offsetwr, __nwi + offsetwi, &iloz, &ihiz, __nz + offsetz, &ldz, &__ninfo); +done: + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) wantz = __nwantz; + if (!failed) wantt = __nwantt; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slacon_)(int *n, float *v, float *x, int * isgn, /*FIXME*/void *est, /*FIXME*/void *kase); +static void (*slahr2_)(int *n, int *k, int *nb, float *a, int *lda, float *tau, float *t, int *ldt, float *y, int *ldy); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaconK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray v, jint offsetv, jfloatArray x, jint offsetx, jintArray isgn, jint offsetisgn, jobject est, jobject kase) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slahr2K(JNIEnv *env, UNUSED jobject obj, jint n, jint k, jint nb, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray t, jint offsett, jint ldt, jfloatArray y, jint offsety, jint ldy) { + jboolean failed = FALSE; + float *__na = NULL; float *__ntau = NULL; float *__nt = NULL; float *__ny = NULL; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + slahr2_(&n, &k, &nb, __na + offseta, &lda, __ntau + offsettau, __nt + offsett, &ldt, __ny + offsety, &ldy); +done: + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slacpy_)(const char *uplo, int *m, int *n, float *a, int *lda, float *b, int *ldb); +static void (*slahrd_)(int *n, int *k, int *nb, float *a, int *lda, float *tau, float *t, int *ldt, float *y, int *ldy); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slacpyK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slahrdK(JNIEnv *env, UNUSED jobject obj, jint n, jint k, jint nb, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray t, jint offsett, jint ldt, jfloatArray y, jint offsety, jint ldy) { + jboolean failed = FALSE; + float *__na = NULL; float *__ntau = NULL; float *__nt = NULL; float *__ny = NULL; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + slahrd_(&n, &k, &nb, __na + offseta, &lda, __ntau + offsettau, __nt + offsett, &ldt, __ny + offsety, &ldy); +done: + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sladiv_)(float *a, float *b, float *c, float *d, /*FIXME*/void *p, /*FIXME*/void *q); +static void (*slaic1_)(int *job, int *j, float *x, float *sest, float *w, float *gamma, float *sestpr, float *s, float *c); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sladivK(JNIEnv *env, UNUSED jobject obj, - jfloat a, jfloat b, jfloat c, jfloat d, jobject p, jobject q) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaic1K(JNIEnv *env, UNUSED jobject obj, jint job, jint j, jfloatArray x, jint offsetx, jfloat sest, jfloatArray w, jint offsetw, jfloat gamma, jobject sestpr, jobject s, jobject c) { + jboolean failed = FALSE; + float __nsestpr = 0; float __ns = 0; float __nc = 0; float *__nx = NULL; float *__nw = NULL; + __nsestpr = (*env)->GetFloatField(env, sestpr, floatW_val_fieldID); + __ns = (*env)->GetFloatField(env, s, floatW_val_fieldID); + __nc = (*env)->GetFloatField(env, c, floatW_val_fieldID); + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + slaic1_(&job, &j, __nx + offsetx, &sest, __nw + offsetw, &gamma, &__nsestpr, &__ns, &__nc); +done: + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetFloatField(env, c, floatW_val_fieldID, __nc); + if (!failed) (*env)->SetFloatField(env, s, floatW_val_fieldID, __ns); + if (!failed) (*env)->SetFloatField(env, sestpr, floatW_val_fieldID, __nsestpr); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slae2_)(float *a, float *b, float *c, /*FIXME*/void *rt1, /*FIXME*/void *rt2); +static int (*slaisnan_)(float *sin1, float *sin2); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slae2K(JNIEnv *env, UNUSED jobject obj, - jfloat a, jfloat b, jfloat c, jobject rt1, jobject rt2) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} +jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_slaisnanK(JNIEnv *env, UNUSED jobject obj, jfloat sin1, jfloat sin2) { + jboolean __ret; + jboolean failed = FALSE; + -static void (*slaebz_)(int *ijob, int *nitmax, int *n, int *mmax, int *minp, int *nbmin, float *abstol, float *reltol, float *pivmin, float *d, float *e, float *e22, int * nval, float *ab, float *c, /*FIXME*/void *mout, int * nab, float *work, int * iwork, /*FIXME*/void *info); + __ret = slaisnan_(&sin1, &sin2); +done: -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaebzK(JNIEnv *env, UNUSED jobject obj, - jint ijob, jint nitmax, jint n, jint mmax, jint minp, jint nbmin, jfloat abstol, jfloat reltol, jfloat pivmin, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray e2, jint offsete2, jintArray nval, jint offsetnval, jfloatArray ab, jint offsetab, jfloatArray c, jint offsetc, jobject mout, jintArray nab, jint offsetnab, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*slaed0_)(int *icompq, int *qsiz, int *n, float *d, float *e, float *q, int *ldq, float *qstore, int *ldqs, float *work, int * iwork, /*FIXME*/void *info); +static void (*slaln2_)(int *ltrans, int *na, int *nw, float *smin, float *ca, float *a, int *lda, float *d1, float *d2, float *b, int *ldb, float *wr, float *wi, float *x, int *ldx, float *scale, float *xnorm, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed0K(JNIEnv *env, UNUSED jobject obj, - jint icompq, jint qsiz, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray q, jint offsetq, jint ldq, jfloatArray qstore, jint offsetqstore, jint ldqs, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaln2K(JNIEnv *env, UNUSED jobject obj, jboolean ltrans, jint na, jint nw, jfloat smin, jfloat ca, jfloatArray a, jint offseta, jint lda, jfloat d1, jfloat d2, jfloatArray b, jint offsetb, jint ldb, jfloat wr, jfloat wi, jfloatArray x, jint offsetx, jint ldx, jobject scale, jobject xnorm, jobject info) { + jboolean failed = FALSE; + int __nltrans; float __nscale = 0; float __nxnorm = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nx = NULL; + __nltrans = ltrans; + __nscale = (*env)->GetFloatField(env, scale, floatW_val_fieldID); + __nxnorm = (*env)->GetFloatField(env, xnorm, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + slaln2_(&__nltrans, &na, &nw, &smin, &ca, __na + offseta, &lda, &d1, &d2, __nb + offsetb, &ldb, &wr, &wi, __nx + offsetx, &ldx, &__nscale, &__nxnorm, &__ninfo); +done: + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, xnorm, floatW_val_fieldID, __nxnorm); + if (!failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); + if (!failed) ltrans = __nltrans; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slaed1_)(int *n, float *d, float *q, int *ldq, int * indxq, /*FIXME*/void *rho, int *cutpnt, float *work, int * iwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed1K(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray d, jint offsetd, jfloatArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jint cutpnt, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*slals0_)(int *icompq, int *nl, int *nr, int *sqre, int *nrhs, float *b, int *ldb, float *bx, int *ldbx, int *perm, int *givptr, int *givcol, int *ldgcol, float *givnum, int *ldgnum, float *poles, float *difl, float *difr, float *z, int *k, float *c, float *s, float *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slals0K(JNIEnv *env, UNUSED jobject obj, jint icompq, jint nl, jint nr, jint sqre, jint nrhs, jfloatArray b, jint offsetb, jint ldb, jfloatArray bx, jint offsetbx, jint ldbx, jintArray perm, jint offsetperm, jint givptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jfloatArray givnum, jint offsetgivnum, jint ldgnum, jfloatArray poles, jint offsetpoles, jfloatArray difl, jint offsetdifl, jfloatArray difr, jint offsetdifr, jfloatArray z, jint offsetz, jint k, jfloat c, jfloat s, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__nb = NULL; float *__nbx = NULL; int *__nperm = NULL; int *__ngivcol = NULL; float *__ngivnum = NULL; float *__npoles = NULL; float *__ndifl = NULL; float *__ndifr = NULL; float *__nz = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nbx = (*env)->GetPrimitiveArrayCritical(env, bx, NULL))) goto fail; + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; + if (!(__npoles = (*env)->GetPrimitiveArrayCritical(env, poles, NULL))) goto fail; + if (!(__ndifl = (*env)->GetPrimitiveArrayCritical(env, difl, NULL))) goto fail; + if (!(__ndifr = (*env)->GetPrimitiveArrayCritical(env, difr, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + slals0_(&icompq, &nl, &nr, &sqre, &nrhs, __nb + offsetb, &ldb, __nbx + offsetbx, &ldbx, __nperm + offsetperm, &givptr, __ngivcol + offsetgivcol, &ldgcol, __ngivnum + offsetgivnum, &ldgnum, __npoles + offsetpoles, __ndifl + offsetdifl, __ndifr + offsetdifr, __nz + offsetz, &k, &c, &s, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__ndifr) (*env)->ReleasePrimitiveArrayCritical(env, difr, __ndifr, failed ? JNI_ABORT : 0); + if (__ndifl) (*env)->ReleasePrimitiveArrayCritical(env, difl, __ndifl, failed ? JNI_ABORT : 0); + if (__npoles) (*env)->ReleasePrimitiveArrayCritical(env, poles, __npoles, failed ? JNI_ABORT : 0); + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); + if (__nbx) (*env)->ReleasePrimitiveArrayCritical(env, bx, __nbx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slaed2_)(/*FIXME*/void *k, int *n, int *n1, float *d, float *q, int *ldq, int * indxq, /*FIXME*/void *rho, float *z, float *dlamda, float *w, float *q22, int * indx, int * indxc, int * indxp, int * coltyp, /*FIXME*/void *info); +static void (*slalsa_)(int *icompq, int *smlsiz, int *n, int *nrhs, float *b, int *ldb, float *bx, int *ldbx, float *u, int *ldu, float *vt, int *k, float *difl, float *difr, float *z, float *poles, int *givptr, int *givcol, int *ldgcol, int *perm, float *givnum, float *c, float *s, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slalsaK(JNIEnv *env, UNUSED jobject obj, jint icompq, jint smlsiz, jint n, jint nrhs, jfloatArray b, jint offsetb, jint ldb, jfloatArray bx, jint offsetbx, jint ldbx, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jintArray k, jint offsetk, jfloatArray difl, jint offsetdifl, jfloatArray difr, jint offsetdifr, jfloatArray z, jint offsetz, jfloatArray poles, jint offsetpoles, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jintArray perm, jint offsetperm, jfloatArray givnum, jint offsetgivnum, jfloatArray c, jint offsetc, jfloatArray s, jint offsets, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__nb = NULL; float *__nbx = NULL; float *__nu = NULL; float *__nvt = NULL; int *__nk = NULL; float *__ndifl = NULL; float *__ndifr = NULL; float *__nz = NULL; float *__npoles = NULL; int *__ngivptr = NULL; int *__ngivcol = NULL; int *__nperm = NULL; float *__ngivnum = NULL; float *__nc = NULL; float *__ns = NULL; float *__nwork = NULL; int *__niwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nbx = (*env)->GetPrimitiveArrayCritical(env, bx, NULL))) goto fail; + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; + if (!(__nk = (*env)->GetPrimitiveArrayCritical(env, k, NULL))) goto fail; + if (!(__ndifl = (*env)->GetPrimitiveArrayCritical(env, difl, NULL))) goto fail; + if (!(__ndifr = (*env)->GetPrimitiveArrayCritical(env, difr, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__npoles = (*env)->GetPrimitiveArrayCritical(env, poles, NULL))) goto fail; + if (!(__ngivptr = (*env)->GetPrimitiveArrayCritical(env, givptr, NULL))) goto fail; + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + slalsa_(&icompq, &smlsiz, &n, &nrhs, __nb + offsetb, &ldb, __nbx + offsetbx, &ldbx, __nu + offsetu, &ldu, __nvt + offsetvt, __nk + offsetk, __ndifl + offsetdifl, __ndifr + offsetdifr, __nz + offsetz, __npoles + offsetpoles, __ngivptr + offsetgivptr, __ngivcol + offsetgivcol, &ldgcol, __nperm + offsetperm, __ngivnum + offsetgivnum, __nc + offsetc, __ns + offsets, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); + if (__ngivptr) (*env)->ReleasePrimitiveArrayCritical(env, givptr, __ngivptr, failed ? JNI_ABORT : 0); + if (__npoles) (*env)->ReleasePrimitiveArrayCritical(env, poles, __npoles, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__ndifr) (*env)->ReleasePrimitiveArrayCritical(env, difr, __ndifr, failed ? JNI_ABORT : 0); + if (__ndifl) (*env)->ReleasePrimitiveArrayCritical(env, difl, __ndifl, failed ? JNI_ABORT : 0); + if (__nk) (*env)->ReleasePrimitiveArrayCritical(env, k, __nk, failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); + if (__nbx) (*env)->ReleasePrimitiveArrayCritical(env, bx, __nbx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; +} -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed2K(JNIEnv *env, UNUSED jobject obj, - jobject k, jint n, jint n1, jfloatArray d, jint offsetd, jfloatArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jfloatArray z, jint offsetz, jfloatArray dlamda, jint offsetdlamda, jfloatArray w, jint offsetw, jfloatArray q2, jint offsetq2, jintArray indx, jint offsetindx, jintArray indxc, jint offsetindxc, jintArray indxp, jint offsetindxp, jintArray coltyp, jint offsetcoltyp, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*slalsd_)(const char *uplo, int *smlsiz, int *n, int *nrhs, float *d, float *e, float *b, int *ldb, float *rcond, int *rank, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slalsdK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint smlsiz, jint n, jint nrhs, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray b, jint offsetb, jint ldb, jfloat rcond, jobject rank, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __nrank = 0; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nb = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nrank = (*env)->GetIntField(env, rank, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + slalsd_(__nuplo, &smlsiz, &n, &nrhs, __nd + offsetd, __ne + offsete, __nb + offsetb, &ldb, &rcond, &__nrank, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, rank, intW_val_fieldID, __nrank); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slaed3_)(int *k, int *n, int *n1, float *d, float *q, int *ldq, float *rho, float *dlamda, float *q22, int * indx, int * ctot, float *w, float *s, /*FIXME*/void *info); +static void (*slamrg_)(int *n1, int *n2, float *a, int *strd1, int *strd2, int *index); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed3K(JNIEnv *env, UNUSED jobject obj, - jint k, jint n, jint n1, jfloatArray d, jint offsetd, jfloatArray q, jint offsetq, jint ldq, jfloat rho, jfloatArray dlamda, jint offsetdlamda, jfloatArray q2, jint offsetq2, jintArray indx, jint offsetindx, jintArray ctot, jint offsetctot, jfloatArray w, jint offsetw, jfloatArray s, jint offsets, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slamrgK(JNIEnv *env, UNUSED jobject obj, jint n1, jint n2, jfloatArray a, jint offseta, jint strd1, jint strd2, jintArray index, jint offsetindex) { + jboolean failed = FALSE; + float *__na = NULL; int *__nindex = NULL; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nindex = (*env)->GetPrimitiveArrayCritical(env, index, NULL))) goto fail; + slamrg_(&n1, &n2, __na + offseta, &strd1, &strd2, __nindex + offsetindex); +done: + if (__nindex) (*env)->ReleasePrimitiveArrayCritical(env, index, __nindex, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slaed4_)(int *n, int *i, float *d, float *z, float *delta, float *rho, /*FIXME*/void *dlam, /*FIXME*/void *info); +static int (*slaneg_)(int *n, float *d, float *lld, float *sigma, float *pivmin, int *r); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed4K(JNIEnv *env, UNUSED jobject obj, - jint n, jint i, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloatArray delta, jint offsetdelta, jfloat rho, jobject dlam, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +jint Java_dev_ludovic_netlib_lapack_JNILAPACK_slanegK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray d, jint offsetd, jfloatArray lld, jint offsetlld, jfloat sigma, jfloat pivmin, jint r) { + jint __ret; + jboolean failed = FALSE; + float *__nd = NULL; float *__nlld = NULL; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nlld = (*env)->GetPrimitiveArrayCritical(env, lld, NULL))) goto fail; + __ret = slaneg_(&n, __nd + offsetd, __nlld + offsetlld, &sigma, &pivmin, &r); +done: + if (__nlld) (*env)->ReleasePrimitiveArrayCritical(env, lld, __nlld, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*slaed5_)(int *i, float *d, float *z, float *delta, float *rho, /*FIXME*/void *dlam); +static float (*slangb_)(const char *norm, int *n, int *kl, int *ku, float *ab, int *ldab, float *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed5K(JNIEnv *env, UNUSED jobject obj, - jint i, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloatArray delta, jint offsetdelta, jfloat rho, jobject dlam) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slangbK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jint kl, jint ku, jfloatArray ab, jint offsetab, jint ldab, jfloatArray work, jint offsetwork) { + jfloat __ret; + jboolean failed = FALSE; + const char *__nnorm = NULL; float *__nab = NULL; float *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + __ret = slangb_(__nnorm, &n, &kl, &ku, __nab + offsetab, &ldab, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*slaed6_)(int *kniter, int *orgati, float *rho, float *d, float *z, float *finit, /*FIXME*/void *tau, /*FIXME*/void *info); +static float (*slange_)(const char *norm, int *m, int *n, float *a, int *lda, float *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed6K(JNIEnv *env, UNUSED jobject obj, - jint kniter, jboolean orgati, jfloat rho, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloat finit, jobject tau, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slangeK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray work, jint offsetwork) { + jfloat __ret; + jboolean failed = FALSE; + const char *__nnorm = NULL; float *__na = NULL; float *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + __ret = slange_(__nnorm, &m, &n, __na + offseta, &lda, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*slaed7_)(int *icompq, int *n, int *qsiz, int *tlvls, int *curlvl, int *curpbm, float *d, float *q, int *ldq, int * indxq, /*FIXME*/void *rho, int *cutpnt, float *qstore, int * qptr, int * prmptr, int * perm, int * givptr, int * givcol, float *givnum, float *work, int * iwork, /*FIXME*/void *info); +static float (*slangt_)(const char *norm, int *n, float *dl, float *d, float *du); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed7K(JNIEnv *env, UNUSED jobject obj, - jint icompq, jint n, jint qsiz, jint tlvls, jint curlvl, jint curpbm, jfloatArray d, jint offsetd, jfloatArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jint cutpnt, jfloatArray qstore, jint offsetqstore, jintArray qptr, jint offsetqptr, jintArray prmptr, jint offsetprmptr, jintArray perm, jint offsetperm, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jfloatArray givnum, jint offsetgivnum, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slangtK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu) { + jfloat __ret; + jboolean failed = FALSE; + const char *__nnorm = NULL; float *__ndl = NULL; float *__nd = NULL; float *__ndu = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; + __ret = slangt_(__nnorm, &n, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu); +done: + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*slaed8_)(int *icompq, /*FIXME*/void *k, int *n, int *qsiz, float *d, float *q, int *ldq, int * indxq, /*FIXME*/void *rho, int *cutpnt, float *z, float *dlamda, float *q22, int *ldq2, float *w, int * perm, /*FIXME*/void *givptr, int * givcol, float *givnum, int * indxp, int * indx, /*FIXME*/void *info); +static float (*slanhs_)(const char *norm, int *n, float *a, int *lda, float *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed8K(JNIEnv *env, UNUSED jobject obj, - jint icompq, jobject k, jint n, jint qsiz, jfloatArray d, jint offsetd, jfloatArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jint cutpnt, jfloatArray z, jint offsetz, jfloatArray dlamda, jint offsetdlamda, jfloatArray q2, jint offsetq2, jint ldq2, jfloatArray w, jint offsetw, jintArray perm, jint offsetperm, jobject givptr, jintArray givcol, jint offsetgivcol, jfloatArray givnum, jint offsetgivnum, jintArray indxp, jint offsetindxp, jintArray indx, jint offsetindx, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slanhsK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray work, jint offsetwork) { + jfloat __ret; + jboolean failed = FALSE; + const char *__nnorm = NULL; float *__na = NULL; float *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + __ret = slanhs_(__nnorm, &n, __na + offseta, &lda, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*slaed9_)(int *k, int *kstart, int *kstop, int *n, float *d, float *q, int *ldq, float *rho, float *dlamda, float *w, float *s, int *lds, /*FIXME*/void *info); +static float (*slansb_)(const char *norm, const char *uplo, int *n, int *k, float *ab, int *ldab, float *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed9K(JNIEnv *env, UNUSED jobject obj, - jint k, jint kstart, jint kstop, jint n, jfloatArray d, jint offsetd, jfloatArray q, jint offsetq, jint ldq, jfloat rho, jfloatArray dlamda, jint offsetdlamda, jfloatArray w, jint offsetw, jfloatArray s, jint offsets, jint lds, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slansbK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jint n, jint k, jfloatArray ab, jint offsetab, jint ldab, jfloatArray work, jint offsetwork) { + jfloat __ret; + jboolean failed = FALSE; + const char *__nnorm = NULL; const char *__nuplo = NULL; float *__nab = NULL; float *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + __ret = slansb_(__nnorm, __nuplo, &n, &k, __nab + offsetab, &ldab, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*slaeda_)(int *n, int *tlvls, int *curlvl, int *curpbm, int * prmptr, int * perm, int * givptr, int * givcol, float *givnum, float *q, int * qptr, float *z, float *ztemp, /*FIXME*/void *info); +static float (*slansp_)(const char *norm, const char *uplo, int *n, float *ap, float *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaedaK(JNIEnv *env, UNUSED jobject obj, - jint n, jint tlvls, jint curlvl, jint curpbm, jintArray prmptr, jint offsetprmptr, jintArray perm, jint offsetperm, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jfloatArray givnum, jint offsetgivnum, jfloatArray q, jint offsetq, jintArray qptr, jint offsetqptr, jfloatArray z, jint offsetz, jfloatArray ztemp, jint offsetztemp, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slanspK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray work, jint offsetwork) { + jfloat __ret; + jboolean failed = FALSE; + const char *__nnorm = NULL; const char *__nuplo = NULL; float *__nap = NULL; float *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + __ret = slansp_(__nnorm, __nuplo, &n, __nap + offsetap, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*slaein_)(int *rightv, int *noinit, int *n, float *h, int *ldh, float *wr, float *wi, float *vr, float *vi, float *b, int *ldb, float *work, float *eps3, float *smlnum, float *bignum, /*FIXME*/void *info); +static float (*slanst_)(const char *norm, int *n, float *d, float *e); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaeinK(JNIEnv *env, UNUSED jobject obj, - jboolean rightv, jboolean noinit, jint n, jfloatArray h, jint offseth, jint ldh, jfloat wr, jfloat wi, jfloatArray vr, jint offsetvr, jfloatArray vi, jint offsetvi, jfloatArray b, jint offsetb, jint ldb, jfloatArray work, jint offsetwork, jfloat eps3, jfloat smlnum, jfloat bignum, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slanstK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete) { + jfloat __ret; + jboolean failed = FALSE; + const char *__nnorm = NULL; float *__nd = NULL; float *__ne = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + __ret = slanst_(__nnorm, &n, __nd + offsetd, __ne + offsete); +done: + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*slaev2_)(float *a, float *b, float *c, /*FIXME*/void *rt1, /*FIXME*/void *rt2, /*FIXME*/void *cs1, /*FIXME*/void *sn1); +static float (*slansy_)(const char *norm, const char *uplo, int *n, float *a, int *lda, float *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaev2K(JNIEnv *env, UNUSED jobject obj, - jfloat a, jfloat b, jfloat c, jobject rt1, jobject rt2, jobject cs1, jobject sn1) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slansyK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray work, jint offsetwork) { + jfloat __ret; + jboolean failed = FALSE; + const char *__nnorm = NULL; const char *__nuplo = NULL; float *__na = NULL; float *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + __ret = slansy_(__nnorm, __nuplo, &n, __na + offseta, &lda, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*slaexc_)(int *wantq, int *n, float *t, int *ldt, float *q, int *ldq, int *j1, int *n1, int *n2, float *work, /*FIXME*/void *info); +static float (*slantb_)(const char *norm, const char *uplo, const char *diag, int *n, int *k, float *ab, int *ldab, float *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaexcK(JNIEnv *env, UNUSED jobject obj, - jboolean wantq, jint n, jfloatArray t, jint offsett, jint ldt, jfloatArray q, jint offsetq, jint ldq, jint j1, jint n1, jint n2, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slantbK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jstring diag, jint n, jint k, jfloatArray ab, jint offsetab, jint ldab, jfloatArray work, jint offsetwork) { + jfloat __ret; + jboolean failed = FALSE; + const char *__nnorm = NULL; const char *__nuplo = NULL; const char *__ndiag = NULL; float *__nab = NULL; float *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + __ret = slantb_(__nnorm, __nuplo, __ndiag, &n, &k, __nab + offsetab, &ldab, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*slag2_)(float *a, int *lda, float *b, int *ldb, float *safmin, /*FIXME*/void *scale1, /*FIXME*/void *scale2, /*FIXME*/void *wr1, /*FIXME*/void *wr2, /*FIXME*/void *wi); +static float (*slantp_)(const char *norm, const char *uplo, const char *diag, int *n, float *ap, float *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slag2K(JNIEnv *env, UNUSED jobject obj, - jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat safmin, jobject scale1, jobject scale2, jobject wr1, jobject wr2, jobject wi) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slantpK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jstring diag, jint n, jfloatArray ap, jint offsetap, jfloatArray work, jint offsetwork) { + jfloat __ret; + jboolean failed = FALSE; + const char *__nnorm = NULL; const char *__nuplo = NULL; const char *__ndiag = NULL; float *__nap = NULL; float *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + __ret = slantp_(__nnorm, __nuplo, __ndiag, &n, __nap + offsetap, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*slag2d_)(int *m, int *n, float *sa, int *ldsa, double *a, int *lda, /*FIXME*/void *info); +static float (*slantr_)(const char *norm, const char *uplo, const char *diag, int *m, int *n, float *a, int *lda, float *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slag2dK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jfloatArray sa, jint offsetsa, jint ldsa, jdoubleArray a, jint offseta, jint lda, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slantrK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jstring diag, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray work, jint offsetwork) { + jfloat __ret; + jboolean failed = FALSE; + const char *__nnorm = NULL; const char *__nuplo = NULL; const char *__ndiag = NULL; float *__na = NULL; float *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + __ret = slantr_(__nnorm, __nuplo, __ndiag, &m, &n, __na + offseta, &lda, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*slags2_)(int *upper, float *a1, float *a2, float *a3, float *b1, float *b2, float *b3, /*FIXME*/void *csu, /*FIXME*/void *snu, /*FIXME*/void *csv, /*FIXME*/void *snv, /*FIXME*/void *csq, /*FIXME*/void *snq); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slags2K(JNIEnv *env, UNUSED jobject obj, - jboolean upper, jfloat a1, jfloat a2, jfloat a3, jfloat b1, jfloat b2, jfloat b3, jobject csu, jobject snu, jobject csv, jobject snv, jobject csq, jobject snq) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*slanv2_)(float *a, float *b, float *c, float *d, float *rt1r, float *rt1i, float *rt2r, float *rt2i, float *cs, float *sn); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slanv2K(JNIEnv *env, UNUSED jobject obj, jobject a, jobject b, jobject c, jobject d, jobject rt1r, jobject rt1i, jobject rt2r, jobject rt2i, jobject cs, jobject sn) { + jboolean failed = FALSE; + float __na = 0; float __nb = 0; float __nc = 0; float __nd = 0; float __nrt1r = 0; float __nrt1i = 0; float __nrt2r = 0; float __nrt2i = 0; float __ncs = 0; float __nsn = 0; + __na = (*env)->GetFloatField(env, a, floatW_val_fieldID); + __nb = (*env)->GetFloatField(env, b, floatW_val_fieldID); + __nc = (*env)->GetFloatField(env, c, floatW_val_fieldID); + __nd = (*env)->GetFloatField(env, d, floatW_val_fieldID); + __nrt1r = (*env)->GetFloatField(env, rt1r, floatW_val_fieldID); + __nrt1i = (*env)->GetFloatField(env, rt1i, floatW_val_fieldID); + __nrt2r = (*env)->GetFloatField(env, rt2r, floatW_val_fieldID); + __nrt2i = (*env)->GetFloatField(env, rt2i, floatW_val_fieldID); + __ncs = (*env)->GetFloatField(env, cs, floatW_val_fieldID); + __nsn = (*env)->GetFloatField(env, sn, floatW_val_fieldID); + slanv2_(&__na, &__nb, &__nc, &__nd, &__nrt1r, &__nrt1i, &__nrt2r, &__nrt2i, &__ncs, &__nsn); +done: + if (!failed) (*env)->SetFloatField(env, sn, floatW_val_fieldID, __nsn); + if (!failed) (*env)->SetFloatField(env, cs, floatW_val_fieldID, __ncs); + if (!failed) (*env)->SetFloatField(env, rt2i, floatW_val_fieldID, __nrt2i); + if (!failed) (*env)->SetFloatField(env, rt2r, floatW_val_fieldID, __nrt2r); + if (!failed) (*env)->SetFloatField(env, rt1i, floatW_val_fieldID, __nrt1i); + if (!failed) (*env)->SetFloatField(env, rt1r, floatW_val_fieldID, __nrt1r); + if (!failed) (*env)->SetFloatField(env, d, floatW_val_fieldID, __nd); + if (!failed) (*env)->SetFloatField(env, c, floatW_val_fieldID, __nc); + if (!failed) (*env)->SetFloatField(env, b, floatW_val_fieldID, __nb); + if (!failed) (*env)->SetFloatField(env, a, floatW_val_fieldID, __na); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slagtf_)(int *n, float *a, float *lambda, float *b, float *c, float *tol, float *d, int * in, /*FIXME*/void *info); +static void (*slapll_)(int *n, float *x, int *incx, float *y, int *incy, float *ssmin); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slagtfK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray a, jint offseta, jfloat lambda, jfloatArray b, jint offsetb, jfloatArray c, jint offsetc, jfloat tol, jfloatArray d, jint offsetd, jintArray in, jint offsetin, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slapllK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy, jobject ssmin) { + jboolean failed = FALSE; + float __nssmin = 0; float *__nx = NULL; float *__ny = NULL; + __nssmin = (*env)->GetFloatField(env, ssmin, floatW_val_fieldID); + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + slapll_(&n, __nx + offsetx, &incx, __ny + offsety, &incy, &__nssmin); +done: + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetFloatField(env, ssmin, floatW_val_fieldID, __nssmin); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slagtm_)(char *trans, int *n, int *nrhs, float *alpha, float *dl, float *d, float *du, float *x, int *ldx, float *beta, float *b, int *ldb); +static void (*slapmt_)(int *forwrd, int *m, int *n, float *x, int *ldx, int *k); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slagtmK(JNIEnv *env, UNUSED jobject obj, - jstring trans, jint n, jint nrhs, jfloat alpha, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray x, jint offsetx, jint ldx, jfloat beta, jfloatArray b, jint offsetb, jint ldb) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slapmtK(JNIEnv *env, UNUSED jobject obj, jboolean forwrd, jint m, jint n, jfloatArray x, jint offsetx, jint ldx, jintArray k, jint offsetk) { + jboolean failed = FALSE; + int __nforwrd; float *__nx = NULL; int *__nk = NULL; + __nforwrd = forwrd; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nk = (*env)->GetPrimitiveArrayCritical(env, k, NULL))) goto fail; + slapmt_(&__nforwrd, &m, &n, __nx + offsetx, &ldx, __nk + offsetk); +done: + if (__nk) (*env)->ReleasePrimitiveArrayCritical(env, k, __nk, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (!failed) forwrd = __nforwrd; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slagts_)(int *job, int *n, float *a, float *b, float *c, float *d, int * in, float *y, /*FIXME*/void *tol, /*FIXME*/void *info); +static float (*slapy2_)(float *x, float *y); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slagtsK(JNIEnv *env, UNUSED jobject obj, - jint job, jint n, jfloatArray a, jint offseta, jfloatArray b, jint offsetb, jfloatArray c, jint offsetc, jfloatArray d, jint offsetd, jintArray in, jint offsetin, jfloatArray y, jint offsety, jobject tol, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slapy2K(JNIEnv *env, UNUSED jobject obj, jfloat x, jfloat y) { + jfloat __ret; + jboolean failed = FALSE; + -static void (*slagv2_)(float *a, int *lda, float *b, int *ldb, float *alphar, float *alphai, float *beta, /*FIXME*/void *csl, /*FIXME*/void *snl, /*FIXME*/void *csr, /*FIXME*/void *snr); + __ret = slapy2_(&x, &y); +done: -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slagv2K(JNIEnv *env, UNUSED jobject obj, - jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jobject csl, jobject snl, jobject csr, jobject snr) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*slahqr_)(int *wantt, int *wantz, int *n, int *ilo, int *ihi, float *h, int *ldh, float *wr, float *wi, int *iloz, int *ihiz, float *z, int *ldz, /*FIXME*/void *info); +static float (*slapy3_)(float *x, float *y, float *z); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slahqrK(JNIEnv *env, UNUSED jobject obj, - jboolean wantt, jboolean wantz, jint n, jint ilo, jint ihi, jfloatArray h, jint offseth, jint ldh, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jint iloz, jint ihiz, jfloatArray z, jint offsetz, jint ldz, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slapy3K(JNIEnv *env, UNUSED jobject obj, jfloat x, jfloat y, jfloat z) { + jfloat __ret; + jboolean failed = FALSE; + -static void (*slahr2_)(int *n, int *k, int *nb, float *a, int *lda, float *tau, float *t, int *ldt, float *y, int *ldy); + __ret = slapy3_(&x, &y, &z); +done: -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slahr2K(JNIEnv *env, UNUSED jobject obj, - jint n, jint k, jint nb, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray t, jint offsett, jint ldt, jfloatArray y, jint offsety, jint ldy) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*slahrd_)(int *n, int *k, int *nb, float *a, int *lda, float *tau, float *t, int *ldt, float *y, int *ldy); +static void (*slaqgb_)(int *m, int *n, int *kl, int *ku, float *ab, int *ldab, float *r, float *c, float *rowcnd, float *colcnd, float *amax, char *equed); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slahrdK(JNIEnv *env, UNUSED jobject obj, - jint n, jint k, jint nb, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray t, jint offsett, jint ldt, jfloatArray y, jint offsety, jint ldy) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqgbK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint kl, jint ku, jfloatArray ab, jint offsetab, jint ldab, jfloatArray r, jint offsetr, jfloatArray c, jint offsetc, jfloat rowcnd, jfloat colcnd, jfloat amax, jobject equed) { + jboolean failed = FALSE; + char *__nequed = NULL; jstring __jequed = NULL;; float *__nab = NULL; float *__nr = NULL; float *__nc = NULL; + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + slaqgb_(&m, &n, &kl, &ku, __nab + offsetab, &ldab, __nr + offsetr, __nc + offsetc, &rowcnd, &colcnd, &amax, __nequed); +done: + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slaic1_)(int *job, int *j, float *x, float *sest, float *w, float *gamma, /*FIXME*/void *sestpr, /*FIXME*/void *s, /*FIXME*/void *c); +static void (*slaqge_)(int *m, int *n, float *a, int *lda, float *r, float *c, float *rowcnd, float *colcnd, float *amax, char *equed); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaic1K(JNIEnv *env, UNUSED jobject obj, - jint job, jint j, jfloatArray x, jint offsetx, jfloat sest, jfloatArray w, jint offsetw, jfloat gamma, jobject sestpr, jobject s, jobject c) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqgeK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray r, jint offsetr, jfloatArray c, jint offsetc, jfloat rowcnd, jfloat colcnd, jfloat amax, jobject equed) { + jboolean failed = FALSE; + char *__nequed = NULL; jstring __jequed = NULL;; float *__na = NULL; float *__nr = NULL; float *__nc = NULL; + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + slaqge_(&m, &n, __na + offseta, &lda, __nr + offsetr, __nc + offsetc, &rowcnd, &colcnd, &amax, __nequed); +done: + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static int *(*slaisnan_)(float *sin1, float *sin2); +static void (*slaqp2_)(int *m, int *n, int *offset, float *a, int *lda, int *jpvt, float *tau, float *vn1, float *vn2, float *work); -jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_slaisnanK(JNIEnv *env, UNUSED jobject obj, - jfloat sin1, jfloat sin2) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqp2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint offset, jfloatArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jfloatArray tau, jint offsettau, jfloatArray vn1, jint offsetvn1, jfloatArray vn2, jint offsetvn2, jfloatArray work, jint offsetwork) { + jboolean failed = FALSE; + float *__na = NULL; int *__njpvt = NULL; float *__ntau = NULL; float *__nvn1 = NULL; float *__nvn2 = NULL; float *__nwork = NULL; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nvn1 = (*env)->GetPrimitiveArrayCritical(env, vn1, NULL))) goto fail; + if (!(__nvn2 = (*env)->GetPrimitiveArrayCritical(env, vn2, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + slaqp2_(&m, &n, &offset, __na + offseta, &lda, __njpvt + offsetjpvt, __ntau + offsettau, __nvn1 + offsetvn1, __nvn2 + offsetvn2, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nvn2) (*env)->ReleasePrimitiveArrayCritical(env, vn2, __nvn2, failed ? JNI_ABORT : 0); + if (__nvn1) (*env)->ReleasePrimitiveArrayCritical(env, vn1, __nvn1, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slaln2_)(int *ltrans, int *na, int *nw, float *smin, float *ca, float *a, int *lda, float *d1, float *d2, float *b, int *ldb, float *wr, float *wi, float *x, int *ldx, /*FIXME*/void *scale, /*FIXME*/void *xnorm, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaln2K(JNIEnv *env, UNUSED jobject obj, - jboolean ltrans, jint na, jint nw, jfloat smin, jfloat ca, jfloatArray a, jint offseta, jint lda, jfloat d1, jfloat d2, jfloatArray b, jint offsetb, jint ldb, jfloat wr, jfloat wi, jfloatArray x, jint offsetx, jint ldx, jobject scale, jobject xnorm, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*slaqps_)(int *m, int *n, int *offset, int *nb, int *kb, float *a, int *lda, int *jpvt, float *tau, float *vn1, float *vn2, float *auxv, float *f, int *ldf); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqpsK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint offset, jint nb, jobject kb, jfloatArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jfloatArray tau, jint offsettau, jfloatArray vn1, jint offsetvn1, jfloatArray vn2, jint offsetvn2, jfloatArray auxv, jint offsetauxv, jfloatArray f, jint offsetf, jint ldf) { + jboolean failed = FALSE; + int __nkb = 0; float *__na = NULL; int *__njpvt = NULL; float *__ntau = NULL; float *__nvn1 = NULL; float *__nvn2 = NULL; float *__nauxv = NULL; float *__nf = NULL; + __nkb = (*env)->GetIntField(env, kb, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nvn1 = (*env)->GetPrimitiveArrayCritical(env, vn1, NULL))) goto fail; + if (!(__nvn2 = (*env)->GetPrimitiveArrayCritical(env, vn2, NULL))) goto fail; + if (!(__nauxv = (*env)->GetPrimitiveArrayCritical(env, auxv, NULL))) goto fail; + if (!(__nf = (*env)->GetPrimitiveArrayCritical(env, f, NULL))) goto fail; + slaqps_(&m, &n, &offset, &nb, &__nkb, __na + offseta, &lda, __njpvt + offsetjpvt, __ntau + offsettau, __nvn1 + offsetvn1, __nvn2 + offsetvn2, __nauxv + offsetauxv, __nf + offsetf, &ldf); +done: + if (__nf) (*env)->ReleasePrimitiveArrayCritical(env, f, __nf, failed ? JNI_ABORT : 0); + if (__nauxv) (*env)->ReleasePrimitiveArrayCritical(env, auxv, __nauxv, failed ? JNI_ABORT : 0); + if (__nvn2) (*env)->ReleasePrimitiveArrayCritical(env, vn2, __nvn2, failed ? JNI_ABORT : 0); + if (__nvn1) (*env)->ReleasePrimitiveArrayCritical(env, vn1, __nvn1, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, kb, intW_val_fieldID, __nkb); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slals0_)(int *icompq, int *nl, int *nr, int *sqre, int *nrhs, float *b, int *ldb, float *bx, int *ldbx, int *perm, int *givptr, int * givcol, int *ldgcol, float *givnum, int *ldgnum, float *poles, float *difl, float *difr, float *z, int *k, float *c, float *s, float *work, int *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slals0K(JNIEnv *env, UNUSED jobject obj, - jint icompq, jint nl, jint nr, jint sqre, jint nrhs, jfloatArray b, jint offsetb, jint ldb, jfloatArray bx, jint offsetbx, jint ldbx, jintArray perm, jint offsetperm, jint givptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jfloatArray givnum, jint offsetgivnum, jint ldgnum, jfloatArray poles, jint offsetpoles, jfloatArray difl, jint offsetdifl, jfloatArray difr, jint offsetdifr, jfloatArray z, jint offsetz, jint k, jfloat c, jfloat s, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*slaqr0_)(int *wantt, int *wantz, int *n, int *ilo, int *ihi, float *h, int *ldh, float *wr, float *wi, int *iloz, int *ihiz, float *z, int *ldz, float *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr0K(JNIEnv *env, UNUSED jobject obj, jboolean wantt, jboolean wantz, jint n, jint ilo, jint ihi, jfloatArray h, jint offseth, jint ldh, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jint iloz, jint ihiz, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __nwantt; int __nwantz; int __ninfo = 0; float *__nh = NULL; float *__nwr = NULL; float *__nwi = NULL; float *__nz = NULL; float *__nwork = NULL; + __nwantt = wantt; + __nwantz = wantz; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + slaqr0_(&__nwantt, &__nwantz, &n, &ilo, &ihi, __nh + offseth, &ldh, __nwr + offsetwr, __nwi + offsetwi, &iloz, &ihiz, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) wantz = __nwantz; + if (!failed) wantt = __nwantt; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slalsa_)(int *icompq, int *smlsiz, int *n, int *nrhs, float *b, int *ldb, float *bx, int *ldbx, float *u, int *ldu, float *vt, int * k, float *difl, float *difr, float *z, float *poles, int * givptr, int * givcol, int *ldgcol, int * perm, float *givnum, float *c, float *s, float *work, int * iwork, /*FIXME*/void *info); +static void (*slaqr1_)(int *n, float *h, int *ldh, float *sr1, float *si1, float *sr2, float *si2, float *v); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slalsaK(JNIEnv *env, UNUSED jobject obj, - jint icompq, jint smlsiz, jint n, jint nrhs, jfloatArray b, jint offsetb, jint ldb, jfloatArray bx, jint offsetbx, jint ldbx, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jintArray k, jint offsetk, jfloatArray difl, jint offsetdifl, jfloatArray difr, jint offsetdifr, jfloatArray z, jint offsetz, jfloatArray poles, jint offsetpoles, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jintArray perm, jint offsetperm, jfloatArray givnum, jint offsetgivnum, jfloatArray c, jint offsetc, jfloatArray s, jint offsets, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr1K(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray h, jint offseth, jint ldh, jfloat sr1, jfloat si1, jfloat sr2, jfloat si2, jfloatArray v, jint offsetv) { + jboolean failed = FALSE; + float *__nh = NULL; float *__nv = NULL; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + slaqr1_(&n, __nh + offseth, &ldh, &sr1, &si1, &sr2, &si2, __nv + offsetv); +done: + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slalsd_)(const char *uplo, int *smlsiz, int *n, int *nrhs, float *d, float *e, float *b, int *ldb, float *rcond, /*FIXME*/void *rank, float *work, int * iwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slalsdK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint smlsiz, jint n, jint nrhs, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray b, jint offsetb, jint ldb, jfloat rcond, jobject rank, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*slaqr2_)(int *wantt, int *wantz, int *n, int *ktop, int *kbot, int *nw, float *h, int *ldh, int *iloz, int *ihiz, float *z, int *ldz, int *ns, int *nd, float *sr, float *si, float *v, int *ldv, int *nh, float *t, int *ldt, int *nv, float *wv, int *ldwv, float *work, int *lwork); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr2K(JNIEnv *env, UNUSED jobject obj, jboolean wantt, jboolean wantz, jint n, jint ktop, jint kbot, jint nw, jfloatArray h, jint offseth, jint ldh, jint iloz, jint ihiz, jfloatArray z, jint offsetz, jint ldz, jobject ns, jobject nd, jfloatArray sr, jint offsetsr, jfloatArray si, jint offsetsi, jfloatArray v, jint offsetv, jint ldv, jint nh, jfloatArray t, jint offsett, jint ldt, jint nv, jfloatArray wv, jint offsetwv, jint ldwv, jfloatArray work, jint offsetwork, jint lwork) { + jboolean failed = FALSE; + int __nwantt; int __nwantz; int __nns = 0; int __nnd = 0; float *__nh = NULL; float *__nz = NULL; float *__nsr = NULL; float *__nsi = NULL; float *__nv = NULL; float *__nt = NULL; float *__nwv = NULL; float *__nwork = NULL; + __nwantt = wantt; + __nwantz = wantz; + __nns = (*env)->GetIntField(env, ns, intW_val_fieldID); + __nnd = (*env)->GetIntField(env, nd, intW_val_fieldID); + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nsr = (*env)->GetPrimitiveArrayCritical(env, sr, NULL))) goto fail; + if (!(__nsi = (*env)->GetPrimitiveArrayCritical(env, si, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + if (!(__nwv = (*env)->GetPrimitiveArrayCritical(env, wv, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + slaqr2_(&__nwantt, &__nwantz, &n, &ktop, &kbot, &nw, __nh + offseth, &ldh, &iloz, &ihiz, __nz + offsetz, &ldz, &__nns, &__nnd, __nsr + offsetsr, __nsi + offsetsi, __nv + offsetv, &ldv, &nh, __nt + offsett, &ldt, &nv, __nwv + offsetwv, &ldwv, __nwork + offsetwork, &lwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nwv) (*env)->ReleasePrimitiveArrayCritical(env, wv, __nwv, failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nsi) (*env)->ReleasePrimitiveArrayCritical(env, si, __nsi, failed ? JNI_ABORT : 0); + if (__nsr) (*env)->ReleasePrimitiveArrayCritical(env, sr, __nsr, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, nd, intW_val_fieldID, __nnd); + if (!failed) (*env)->SetIntField(env, ns, intW_val_fieldID, __nns); + if (!failed) wantz = __nwantz; + if (!failed) wantt = __nwantt; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slamrg_)(int *n1, int *n2, float *a, int *strd1, int *strd2, int * index); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slamrgK(JNIEnv *env, UNUSED jobject obj, - jint n1, jint n2, jfloatArray a, jint offseta, jint strd1, jint strd2, jintArray index, jint offsetindex) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*slaqr3_)(int *wantt, int *wantz, int *n, int *ktop, int *kbot, int *nw, float *h, int *ldh, int *iloz, int *ihiz, float *z, int *ldz, int *ns, int *nd, float *sr, float *si, float *v, int *ldv, int *nh, float *t, int *ldt, int *nv, float *wv, int *ldwv, float *work, int *lwork); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr3K(JNIEnv *env, UNUSED jobject obj, jboolean wantt, jboolean wantz, jint n, jint ktop, jint kbot, jint nw, jfloatArray h, jint offseth, jint ldh, jint iloz, jint ihiz, jfloatArray z, jint offsetz, jint ldz, jobject ns, jobject nd, jfloatArray sr, jint offsetsr, jfloatArray si, jint offsetsi, jfloatArray v, jint offsetv, jint ldv, jint nh, jfloatArray t, jint offsett, jint ldt, jint nv, jfloatArray wv, jint offsetwv, jint ldwv, jfloatArray work, jint offsetwork, jint lwork) { + jboolean failed = FALSE; + int __nwantt; int __nwantz; int __nns = 0; int __nnd = 0; float *__nh = NULL; float *__nz = NULL; float *__nsr = NULL; float *__nsi = NULL; float *__nv = NULL; float *__nt = NULL; float *__nwv = NULL; float *__nwork = NULL; + __nwantt = wantt; + __nwantz = wantz; + __nns = (*env)->GetIntField(env, ns, intW_val_fieldID); + __nnd = (*env)->GetIntField(env, nd, intW_val_fieldID); + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nsr = (*env)->GetPrimitiveArrayCritical(env, sr, NULL))) goto fail; + if (!(__nsi = (*env)->GetPrimitiveArrayCritical(env, si, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + if (!(__nwv = (*env)->GetPrimitiveArrayCritical(env, wv, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + slaqr3_(&__nwantt, &__nwantz, &n, &ktop, &kbot, &nw, __nh + offseth, &ldh, &iloz, &ihiz, __nz + offsetz, &ldz, &__nns, &__nnd, __nsr + offsetsr, __nsi + offsetsi, __nv + offsetv, &ldv, &nh, __nt + offsett, &ldt, &nv, __nwv + offsetwv, &ldwv, __nwork + offsetwork, &lwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nwv) (*env)->ReleasePrimitiveArrayCritical(env, wv, __nwv, failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nsi) (*env)->ReleasePrimitiveArrayCritical(env, si, __nsi, failed ? JNI_ABORT : 0); + if (__nsr) (*env)->ReleasePrimitiveArrayCritical(env, sr, __nsr, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, nd, intW_val_fieldID, __nnd); + if (!failed) (*env)->SetIntField(env, ns, intW_val_fieldID, __nns); + if (!failed) wantz = __nwantz; + if (!failed) wantt = __nwantt; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static int (*slaneg_)(int *n, float *d, int *offsetd, float *lld, int *offsetlld, float *sigma, float *pivmin, int *r); +static void (*slaqr4_)(int *wantt, int *wantz, int *n, int *ilo, int *ihi, float *h, int *ldh, float *wr, float *wi, int *iloz, int *ihiz, float *z, int *ldz, float *work, int *lwork, int *info); -jint Java_dev_ludovic_netlib_lapack_JNILAPACK_slanegK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray d, jint offsetd, jfloatArray lld, jint offsetlld, jfloat sigma, jfloat pivmin, jint r) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr4K(JNIEnv *env, UNUSED jobject obj, jboolean wantt, jboolean wantz, jint n, jint ilo, jint ihi, jfloatArray h, jint offseth, jint ldh, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jint iloz, jint ihiz, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __nwantt; int __nwantz; int __ninfo = 0; float *__nh = NULL; float *__nwr = NULL; float *__nwi = NULL; float *__nz = NULL; float *__nwork = NULL; + __nwantt = wantt; + __nwantz = wantz; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + slaqr4_(&__nwantt, &__nwantz, &n, &ilo, &ihi, __nh + offseth, &ldh, __nwr + offsetwr, __nwi + offsetwi, &iloz, &ihiz, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) wantz = __nwantz; + if (!failed) wantt = __nwantt; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static float (*slangb_)(char *norm, int *n, int *kl, int *ku, float *ab, int *offsetab, int *ldab, float *work, int *offsetwork); +static void (*slaqr5_)(int *wantt, int *wantz, int *kacc22, int *n, int *ktop, int *kbot, int *nshfts, float *sr, float *si, float *h, int *ldh, int *iloz, int *ihiz, float *z, int *ldz, float *v, int *ldv, float *u, int *ldu, int *nv, float *wv, int *ldwv, int *nh, float *wh, int *ldwh); -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slangbK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jint n, jint kl, jint ku, jfloatArray ab, jint offsetab, jint ldab, jfloatArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr5K(JNIEnv *env, UNUSED jobject obj, jboolean wantt, jboolean wantz, jint kacc22, jint n, jint ktop, jint kbot, jint nshfts, jfloatArray sr, jint offsetsr, jfloatArray si, jint offsetsi, jfloatArray h, jint offseth, jint ldh, jint iloz, jint ihiz, jfloatArray z, jint offsetz, jint ldz, jfloatArray v, jint offsetv, jint ldv, jfloatArray u, jint offsetu, jint ldu, jint nv, jfloatArray wv, jint offsetwv, jint ldwv, jint nh, jfloatArray wh, jint offsetwh, jint ldwh) { + jboolean failed = FALSE; + int __nwantt; int __nwantz; float *__nsr = NULL; float *__nsi = NULL; float *__nh = NULL; float *__nz = NULL; float *__nv = NULL; float *__nu = NULL; float *__nwv = NULL; float *__nwh = NULL; + __nwantt = wantt; + __nwantz = wantz; + if (!(__nsr = (*env)->GetPrimitiveArrayCritical(env, sr, NULL))) goto fail; + if (!(__nsi = (*env)->GetPrimitiveArrayCritical(env, si, NULL))) goto fail; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; + if (!(__nwv = (*env)->GetPrimitiveArrayCritical(env, wv, NULL))) goto fail; + if (!(__nwh = (*env)->GetPrimitiveArrayCritical(env, wh, NULL))) goto fail; + slaqr5_(&__nwantt, &__nwantz, &kacc22, &n, &ktop, &kbot, &nshfts, __nsr + offsetsr, __nsi + offsetsi, __nh + offseth, &ldh, &iloz, &ihiz, __nz + offsetz, &ldz, __nv + offsetv, &ldv, __nu + offsetu, &ldu, &nv, __nwv + offsetwv, &ldwv, &nh, __nwh + offsetwh, &ldwh); +done: + if (__nwh) (*env)->ReleasePrimitiveArrayCritical(env, wh, __nwh, failed ? JNI_ABORT : 0); + if (__nwv) (*env)->ReleasePrimitiveArrayCritical(env, wv, __nwv, failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (__nsi) (*env)->ReleasePrimitiveArrayCritical(env, si, __nsi, failed ? JNI_ABORT : 0); + if (__nsr) (*env)->ReleasePrimitiveArrayCritical(env, sr, __nsr, failed ? JNI_ABORT : 0); + if (!failed) wantz = __nwantz; + if (!failed) wantt = __nwantt; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static float (*slange_)(char *norm, int *m, int *n, float *a, int *offseta, int *lda, float *work, int *offsetwork); +static void (*slaqsb_)(const char *uplo, int *n, int *kd, float *ab, int *ldab, float *s, float *scond, float *amax, char *equed); -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slangeK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqsbK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloatArray s, jint offsets, jfloat scond, jfloat amax, jobject equed) { + jboolean failed = FALSE; + const char *__nuplo = NULL; char *__nequed = NULL; jstring __jequed = NULL;; float *__nab = NULL; float *__ns = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + slaqsb_(__nuplo, &n, &kd, __nab + offsetab, &ldab, __ns + offsets, &scond, &amax, __nequed); +done: + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static float (*slangt_)(char *norm, int *n, float *dl, int *offsetdl, float *d, int *offsetd, float *du, int *offsetdu); +static void (*slaqsp_)(const char *uplo, int *n, float *ap, float *s, float *scond, float *amax, char *equed); -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slangtK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jint n, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqspK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray s, jint offsets, jfloat scond, jfloat amax, jobject equed) { + jboolean failed = FALSE; + const char *__nuplo = NULL; char *__nequed = NULL; jstring __jequed = NULL;; float *__nap = NULL; float *__ns = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + slaqsp_(__nuplo, &n, __nap + offsetap, __ns + offsets, &scond, &amax, __nequed); +done: + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static float (*slanhs_)(char *norm, int *n, float *a, int *offseta, int *lda, float *work, int *offsetwork); +static void (*slaqsy_)(const char *uplo, int *n, float *a, int *lda, float *s, float *scond, float *amax, char *equed); -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slanhsK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqsyK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray s, jint offsets, jfloat scond, jfloat amax, jobject equed) { + jboolean failed = FALSE; + const char *__nuplo = NULL; char *__nequed = NULL; jstring __jequed = NULL;; float *__na = NULL; float *__ns = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + slaqsy_(__nuplo, &n, __na + offseta, &lda, __ns + offsets, &scond, &amax, __nequed); +done: + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static float (*slansb_)(char *norm, const char *uplo, int *n, int *k, float *ab, int *offsetab, int *ldab, float *work, int *offsetwork); - -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slansbK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jstring uplo, jint n, jint k, jfloatArray ab, jint offsetab, jint ldab, jfloatArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +static void (*slaqtr_)(int *ltran, int *lreal, int *n, float *t, int *ldt, float *b, float *w, float *scale, float *x, float *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqtrK(JNIEnv *env, UNUSED jobject obj, jboolean ltran, jboolean lreal, jint n, jfloatArray t, jint offsett, jint ldt, jfloatArray b, jint offsetb, jfloat w, jobject scale, jfloatArray x, jint offsetx, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __nltran; int __nlreal; float __nscale = 0; int __ninfo = 0; float *__nt = NULL; float *__nb = NULL; float *__nx = NULL; float *__nwork = NULL; + __nltran = ltran; + __nlreal = lreal; + __nscale = (*env)->GetFloatField(env, scale, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + slaqtr_(&__nltran, &__nlreal, &n, __nt + offsett, &ldt, __nb + offsetb, &w, &__nscale, __nx + offsetx, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); + if (!failed) lreal = __nlreal; + if (!failed) ltran = __nltran; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static float (*slansp_)(char *norm, const char *uplo, int *n, float *ap, int *offsetap, float *work, int *offsetwork); - -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slanspK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +static void (*slar1v_)(int *n, int *b1, int *bn, float *lambda, float *d, float *l, float *ld, float *lld, float *pivmin, float *gaptol, float *z, int *wantnc, int *negcnt, float *ztz, float *mingma, int *r, int *isuppz, float *nrminv, float *resid, float *rqcorr, float *work); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slar1vK(JNIEnv *env, UNUSED jobject obj, jint n, jint b1, jint bn, jfloat lambda, jfloatArray d, jint offsetd, jfloatArray l, jint offsetl, jfloatArray ld, jint offsetld, jfloatArray lld, jint offsetlld, jfloat pivmin, jfloat gaptol, jfloatArray z, jint offsetz, jboolean wantnc, jobject negcnt, jobject ztz, jobject mingma, jobject r, jintArray isuppz, jint offsetisuppz, jobject nrminv, jobject resid, jobject rqcorr, jfloatArray work, jint offsetwork) { + jboolean failed = FALSE; + int __nwantnc; int __nnegcnt = 0; float __nztz = 0; float __nmingma = 0; int __nr = 0; float __nnrminv = 0; float __nresid = 0; float __nrqcorr = 0; float *__nd = NULL; float *__nl = NULL; float *__nld = NULL; float *__nlld = NULL; float *__nz = NULL; int *__nisuppz = NULL; float *__nwork = NULL; + __nwantnc = wantnc; + __nnegcnt = (*env)->GetIntField(env, negcnt, intW_val_fieldID); + __nztz = (*env)->GetFloatField(env, ztz, floatW_val_fieldID); + __nmingma = (*env)->GetFloatField(env, mingma, floatW_val_fieldID); + __nr = (*env)->GetIntField(env, r, intW_val_fieldID); + __nnrminv = (*env)->GetFloatField(env, nrminv, floatW_val_fieldID); + __nresid = (*env)->GetFloatField(env, resid, floatW_val_fieldID); + __nrqcorr = (*env)->GetFloatField(env, rqcorr, floatW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nl = (*env)->GetPrimitiveArrayCritical(env, l, NULL))) goto fail; + if (!(__nld = (*env)->GetPrimitiveArrayCritical(env, ld, NULL))) goto fail; + if (!(__nlld = (*env)->GetPrimitiveArrayCritical(env, lld, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + slar1v_(&n, &b1, &bn, &lambda, __nd + offsetd, __nl + offsetl, __nld + offsetld, __nlld + offsetlld, &pivmin, &gaptol, __nz + offsetz, &__nwantnc, &__nnegcnt, &__nztz, &__nmingma, &__nr, __nisuppz + offsetisuppz, &__nnrminv, &__nresid, &__nrqcorr, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nlld) (*env)->ReleasePrimitiveArrayCritical(env, lld, __nlld, failed ? JNI_ABORT : 0); + if (__nld) (*env)->ReleasePrimitiveArrayCritical(env, ld, __nld, failed ? JNI_ABORT : 0); + if (__nl) (*env)->ReleasePrimitiveArrayCritical(env, l, __nl, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetFloatField(env, rqcorr, floatW_val_fieldID, __nrqcorr); + if (!failed) (*env)->SetFloatField(env, resid, floatW_val_fieldID, __nresid); + if (!failed) (*env)->SetFloatField(env, nrminv, floatW_val_fieldID, __nnrminv); + if (!failed) (*env)->SetIntField(env, r, intW_val_fieldID, __nr); + if (!failed) (*env)->SetFloatField(env, mingma, floatW_val_fieldID, __nmingma); + if (!failed) (*env)->SetFloatField(env, ztz, floatW_val_fieldID, __nztz); + if (!failed) (*env)->SetIntField(env, negcnt, intW_val_fieldID, __nnegcnt); + if (!failed) wantnc = __nwantnc; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static float (*slanst_)(char *norm, int *n, float *d, int *offsetd, float *e, int *offsete); +static void (*slar2v_)(int *n, float *x, float *y, float *z, int *incx, float *c, float *s, int *incc); -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slanstK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slar2vK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray x, jint offsetx, jfloatArray y, jint offsety, jfloatArray z, jint offsetz, jint incx, jfloatArray c, jint offsetc, jfloatArray s, jint offsets, jint incc) { + jboolean failed = FALSE; + float *__nx = NULL; float *__ny = NULL; float *__nz = NULL; float *__nc = NULL; float *__ns = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + slar2v_(&n, __nx + offsetx, __ny + offsety, __nz + offsetz, &incx, __nc + offsetc, __ns + offsets, &incc); +done: + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static float (*slansy_)(char *norm, const char *uplo, int *n, float *a, int *offseta, int *lda, float *work, int *offsetwork); +static void (*slarf_)(const char *side, int *m, int *n, float *v, int *incv, float *tau, float *c, int *Ldc, float *work); -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slansyK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarfK(JNIEnv *env, UNUSED jobject obj, jstring side, jint m, jint n, jfloatArray v, jint offsetv, jint incv, jfloat tau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork) { + jboolean failed = FALSE; + const char *__nside = NULL; float *__nv = NULL; float *__nc = NULL; float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + slarf_(__nside, &m, &n, __nv + offsetv, &incv, &tau, __nc + offsetc, &Ldc, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static float (*slantb_)(char *norm, const char *uplo, char *diag, int *n, int *k, float *ab, int *offsetab, int *ldab, float *work, int *offsetwork); - -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slantbK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jstring uplo, jstring diag, jint n, jint k, jfloatArray ab, jint offsetab, jint ldab, jfloatArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +static void (*slarfb_)(const char *side, const char *trans, const char *direct, const char *storev, int *m, int *n, int *k, float *v, int *ldv, float *t, int *ldt, float *c, int *Ldc, float *work, int *ldwork); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarfbK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jstring direct, jstring storev, jint m, jint n, jint k, jfloatArray v, jint offsetv, jint ldv, jfloatArray t, jint offsett, jint ldt, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint ldwork) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__ntrans = NULL; const char *__ndirect = NULL; const char *__nstorev = NULL; float *__nv = NULL; float *__nt = NULL; float *__nc = NULL; float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndirect = (*env)->GetStringUTFChars(env, direct, NULL))) goto fail; + if (!(__nstorev = (*env)->GetStringUTFChars(env, storev, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + slarfb_(__nside, __ntrans, __ndirect, __nstorev, &m, &n, &k, __nv + offsetv, &ldv, __nt + offsett, &ldt, __nc + offsetc, &Ldc, __nwork + offsetwork, &ldwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nstorev) (*env)->ReleaseStringUTFChars(env, storev, __nstorev); + if (__ndirect) (*env)->ReleaseStringUTFChars(env, direct, __ndirect); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static float (*slantp_)(char *norm, const char *uplo, char *diag, int *n, float *ap, int *offsetap, float *work, int *offsetwork); +static void (*slarfg_)(int *n, float *alpha, float *x, int *incx, float *tau); -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slantpK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jstring uplo, jstring diag, jint n, jfloatArray ap, jint offsetap, jfloatArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarfgK(JNIEnv *env, UNUSED jobject obj, jint n, jobject alpha, jfloatArray x, jint offsetx, jint incx, jobject tau) { + jboolean failed = FALSE; + float __nalpha = 0; float __ntau = 0; float *__nx = NULL; + __nalpha = (*env)->GetFloatField(env, alpha, floatW_val_fieldID); + __ntau = (*env)->GetFloatField(env, tau, floatW_val_fieldID); + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + slarfg_(&n, &__nalpha, __nx + offsetx, &incx, &__ntau); +done: + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetFloatField(env, tau, floatW_val_fieldID, __ntau); + if (!failed) (*env)->SetFloatField(env, alpha, floatW_val_fieldID, __nalpha); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static float (*slantr_)(char *norm, const char *uplo, char *diag, int *m, int *n, float *a, int *offseta, int *lda, float *work, int *offsetwork); +static void (*slarft_)(const char *direct, const char *storev, int *n, int *k, float *v, int *ldv, float *tau, float *t, int *ldt); -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slantrK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jstring uplo, jstring diag, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarftK(JNIEnv *env, UNUSED jobject obj, jstring direct, jstring storev, jint n, jint k, jfloatArray v, jint offsetv, jint ldv, jfloatArray tau, jint offsettau, jfloatArray t, jint offsett, jint ldt) { + jboolean failed = FALSE; + const char *__ndirect = NULL; const char *__nstorev = NULL; float *__nv = NULL; float *__ntau = NULL; float *__nt = NULL; + if (!(__ndirect = (*env)->GetStringUTFChars(env, direct, NULL))) goto fail; + if (!(__nstorev = (*env)->GetStringUTFChars(env, storev, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + slarft_(__ndirect, __nstorev, &n, &k, __nv + offsetv, &ldv, __ntau + offsettau, __nt + offsett, &ldt); +done: + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nstorev) (*env)->ReleaseStringUTFChars(env, storev, __nstorev); + if (__ndirect) (*env)->ReleaseStringUTFChars(env, direct, __ndirect); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slanv2_)(/*FIXME*/void *a, /*FIXME*/void *b, /*FIXME*/void *c, /*FIXME*/void *d, /*FIXME*/void *rt1r, /*FIXME*/void *rt1i, /*FIXME*/void *rt2r, /*FIXME*/void *rt2i, /*FIXME*/void *cs, /*FIXME*/void *sn); +static void (*slarfx_)(const char *side, int *m, int *n, float *v, float *tau, float *c, int *Ldc, float *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slanv2K(JNIEnv *env, UNUSED jobject obj, - jobject a, jobject b, jobject c, jobject d, jobject rt1r, jobject rt1i, jobject rt2r, jobject rt2i, jobject cs, jobject sn) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarfxK(JNIEnv *env, UNUSED jobject obj, jstring side, jint m, jint n, jfloatArray v, jint offsetv, jfloat tau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork) { + jboolean failed = FALSE; + const char *__nside = NULL; float *__nv = NULL; float *__nc = NULL; float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + slarfx_(__nside, &m, &n, __nv + offsetv, &tau, __nc + offsetc, &Ldc, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slapll_)(int *n, float *x, int *incx, float *y, int *incy, /*FIXME*/void *ssmin); +static void (*slargv_)(int *n, float *x, int *incx, float *y, int *incy, float *c, int *incc); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slapllK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy, jobject ssmin) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slargvK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy, jfloatArray c, jint offsetc, jint incc) { + jboolean failed = FALSE; + float *__nx = NULL; float *__ny = NULL; float *__nc = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + slargv_(&n, __nx + offsetx, &incx, __ny + offsety, &incy, __nc + offsetc, &incc); +done: + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slapmt_)(int *forwrd, int *m, int *n, float *x, int *ldx, int *k); +static void (*slarnv_)(int *idist, int *iseed, int *n, float *x); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slapmtK(JNIEnv *env, UNUSED jobject obj, - jboolean forwrd, jint m, jint n, jfloatArray x, jint offsetx, jint ldx, jintArray k, jint offsetk) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarnvK(JNIEnv *env, UNUSED jobject obj, jint idist, jintArray iseed, jint offsetiseed, jint n, jfloatArray x, jint offsetx) { + jboolean failed = FALSE; + int *__niseed = NULL; float *__nx = NULL; + if (!(__niseed = (*env)->GetPrimitiveArrayCritical(env, iseed, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + slarnv_(&idist, __niseed + offsetiseed, &n, __nx + offsetx); +done: + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__niseed) (*env)->ReleasePrimitiveArrayCritical(env, iseed, __niseed, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static float (*slapy2_)(float *x, float *y); +static void (*slarra_)(int *n, float *d, float *e, float *e2, float *spltol, float *tnrm, int *nsplit, int *isplit, int *info); -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slapy2K(JNIEnv *env, UNUSED jobject obj, - jfloat x, jfloat y) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarraK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray e2, jint offsete2, jfloat spltol, jfloat tnrm, jobject nsplit, jintArray isplit, jint offsetisplit, jobject info) { + jboolean failed = FALSE; + int __nnsplit = 0; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__ne2 = NULL; int *__nisplit = NULL; + __nnsplit = (*env)->GetIntField(env, nsplit, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) goto fail; + if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) goto fail; + slarra_(&n, __nd + offsetd, __ne + offsete, __ne2 + offsete2, &spltol, &tnrm, &__nnsplit, __nisplit + offsetisplit, &__ninfo); +done: + if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, failed ? JNI_ABORT : 0); + if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, nsplit, intW_val_fieldID, __nnsplit); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static float (*slapy3_)(float *x, float *y, float *z); - -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slapy3K(JNIEnv *env, UNUSED jobject obj, - jfloat x, jfloat y, jfloat z) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; +static void (*slarrb_)(int *n, float *d, float *lld, int *ifirst, int *ilast, float *rtol1, float *rtol2, int *offset, float *w, float *wgap, float *werr, float *work, int *iwork, float *pivmin, float *spdiam, int *twist, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrbK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray d, jint offsetd, jfloatArray lld, jint offsetlld, jint ifirst, jint ilast, jfloat rtol1, jfloat rtol2, jint offset, jfloatArray w, jint offsetw, jfloatArray wgap, jint offsetwgap, jfloatArray werr, jint offsetwerr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jfloat pivmin, jfloat spdiam, jint twist, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__nd = NULL; float *__nlld = NULL; float *__nw = NULL; float *__nwgap = NULL; float *__nwerr = NULL; float *__nwork = NULL; int *__niwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nlld = (*env)->GetPrimitiveArrayCritical(env, lld, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nwgap = (*env)->GetPrimitiveArrayCritical(env, wgap, NULL))) goto fail; + if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + slarrb_(&n, __nd + offsetd, __nlld + offsetlld, &ifirst, &ilast, &rtol1, &rtol2, &offset, __nw + offsetw, __nwgap + offsetwgap, __nwerr + offsetwerr, __nwork + offsetwork, __niwork + offsetiwork, &pivmin, &spdiam, &twist, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, failed ? JNI_ABORT : 0); + if (__nwgap) (*env)->ReleasePrimitiveArrayCritical(env, wgap, __nwgap, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nlld) (*env)->ReleasePrimitiveArrayCritical(env, lld, __nlld, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slaqgb_)(int *m, int *n, int *kl, int *ku, float *ab, int *ldab, float *r, float *c, float *rowcnd, float *colcnd, float *amax, jstring *equed); +static void (*slarrc_)(const char *jobt, int *n, float *vl, float *vu, float *d, float *e, float *pivmin, int *eigcnt, int *lcnt, int *rcnt, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqgbK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint kl, jint ku, jfloatArray ab, jint offsetab, jint ldab, jfloatArray r, jint offsetr, jfloatArray c, jint offsetc, jfloat rowcnd, jfloat colcnd, jfloat amax, jobject equed) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrcK(JNIEnv *env, UNUSED jobject obj, jstring jobt, jint n, jfloat vl, jfloat vu, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloat pivmin, jobject eigcnt, jobject lcnt, jobject rcnt, jobject info) { + jboolean failed = FALSE; + const char *__njobt = NULL; int __neigcnt = 0; int __nlcnt = 0; int __nrcnt = 0; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; + if (!(__njobt = (*env)->GetStringUTFChars(env, jobt, NULL))) goto fail; + __neigcnt = (*env)->GetIntField(env, eigcnt, intW_val_fieldID); + __nlcnt = (*env)->GetIntField(env, lcnt, intW_val_fieldID); + __nrcnt = (*env)->GetIntField(env, rcnt, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + slarrc_(__njobt, &n, &vl, &vu, __nd + offsetd, __ne + offsete, &pivmin, &__neigcnt, &__nlcnt, &__nrcnt, &__ninfo); +done: + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, rcnt, intW_val_fieldID, __nrcnt); + if (!failed) (*env)->SetIntField(env, lcnt, intW_val_fieldID, __nlcnt); + if (!failed) (*env)->SetIntField(env, eigcnt, intW_val_fieldID, __neigcnt); + if (__njobt) (*env)->ReleaseStringUTFChars(env, jobt, __njobt); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slaqge_)(int *m, int *n, float *a, int *lda, float *r, float *c, float *rowcnd, float *colcnd, float *amax, jstring *equed); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqgeK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray r, jint offsetr, jfloatArray c, jint offsetc, jfloat rowcnd, jfloat colcnd, jfloat amax, jobject equed) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*slarrd_)(const char *range, const char *order, int *n, float *vl, float *vu, int *il, int *iu, float *gers, float *reltol, float *d, float *e, float *e2, float *pivmin, int *nsplit, int *isplit, int *m, float *w, float *werr, float *wl, float *wu, int *iblock, int *indexw, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrdK(JNIEnv *env, UNUSED jobject obj, jstring range, jstring order, jint n, jfloat vl, jfloat vu, jint il, jint iu, jfloatArray gers, jint offsetgers, jfloat reltol, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray e2, jint offsete2, jfloat pivmin, jint nsplit, jintArray isplit, jint offsetisplit, jobject m, jfloatArray w, jint offsetw, jfloatArray werr, jint offsetwerr, jobject wl, jobject wu, jintArray iblock, jint offsetiblock, jintArray indexw, jint offsetindexw, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nrange = NULL; const char *__norder = NULL; int __nm = 0; float __nwl = 0; float __nwu = 0; int __ninfo = 0; float *__ngers = NULL; float *__nd = NULL; float *__ne = NULL; float *__ne2 = NULL; int *__nisplit = NULL; float *__nw = NULL; float *__nwerr = NULL; int *__niblock = NULL; int *__nindexw = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + if (!(__norder = (*env)->GetStringUTFChars(env, order, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __nwl = (*env)->GetFloatField(env, wl, floatW_val_fieldID); + __nwu = (*env)->GetFloatField(env, wu, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__ngers = (*env)->GetPrimitiveArrayCritical(env, gers, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) goto fail; + if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) goto fail; + if (!(__niblock = (*env)->GetPrimitiveArrayCritical(env, iblock, NULL))) goto fail; + if (!(__nindexw = (*env)->GetPrimitiveArrayCritical(env, indexw, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + slarrd_(__nrange, __norder, &n, &vl, &vu, &il, &iu, __ngers + offsetgers, &reltol, __nd + offsetd, __ne + offsete, __ne2 + offsete2, &pivmin, &nsplit, __nisplit + offsetisplit, &__nm, __nw + offsetw, __nwerr + offsetwerr, &__nwl, &__nwu, __niblock + offsetiblock, __nindexw + offsetindexw, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nindexw) (*env)->ReleasePrimitiveArrayCritical(env, indexw, __nindexw, failed ? JNI_ABORT : 0); + if (__niblock) (*env)->ReleasePrimitiveArrayCritical(env, iblock, __niblock, failed ? JNI_ABORT : 0); + if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, failed ? JNI_ABORT : 0); + if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__ngers) (*env)->ReleasePrimitiveArrayCritical(env, gers, __ngers, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, wu, floatW_val_fieldID, __nwu); + if (!failed) (*env)->SetFloatField(env, wl, floatW_val_fieldID, __nwl); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__norder) (*env)->ReleaseStringUTFChars(env, order, __norder); + if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slaqp2_)(int *m, int *n, int *offset, float *a, int *lda, int * jpvt, float *tau, float *vn11, float *vn22, float *work); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqp2K(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint offset, jfloatArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jfloatArray tau, jint offsettau, jfloatArray vn1, jint offsetvn1, jfloatArray vn2, jint offsetvn2, jfloatArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*slarre_)(const char *range, int *n, float *vl, float *vu, int *il, int *iu, float *d, float *e, float *e2, float *rtol1, float *rtol2, float *spltol, int *nsplit, int *isplit, int *m, float *w, float *werr, float *wgap, int *iblock, int *indexw, float *gers, float *pivmin, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarreK(JNIEnv *env, UNUSED jobject obj, jstring range, jint n, jobject vl, jobject vu, jint il, jint iu, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray e2, jint offsete2, jfloat rtol1, jfloat rtol2, jfloat spltol, jobject nsplit, jintArray isplit, jint offsetisplit, jobject m, jfloatArray w, jint offsetw, jfloatArray werr, jint offsetwerr, jfloatArray wgap, jint offsetwgap, jintArray iblock, jint offsetiblock, jintArray indexw, jint offsetindexw, jfloatArray gers, jint offsetgers, jobject pivmin, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nrange = NULL; float __nvl = 0; float __nvu = 0; int __nnsplit = 0; int __nm = 0; float __npivmin = 0; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__ne2 = NULL; int *__nisplit = NULL; float *__nw = NULL; float *__nwerr = NULL; float *__nwgap = NULL; int *__niblock = NULL; int *__nindexw = NULL; float *__ngers = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + __nvl = (*env)->GetFloatField(env, vl, floatW_val_fieldID); + __nvu = (*env)->GetFloatField(env, vu, floatW_val_fieldID); + __nnsplit = (*env)->GetIntField(env, nsplit, intW_val_fieldID); + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __npivmin = (*env)->GetFloatField(env, pivmin, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) goto fail; + if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) goto fail; + if (!(__nwgap = (*env)->GetPrimitiveArrayCritical(env, wgap, NULL))) goto fail; + if (!(__niblock = (*env)->GetPrimitiveArrayCritical(env, iblock, NULL))) goto fail; + if (!(__nindexw = (*env)->GetPrimitiveArrayCritical(env, indexw, NULL))) goto fail; + if (!(__ngers = (*env)->GetPrimitiveArrayCritical(env, gers, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + slarre_(__nrange, &n, &__nvl, &__nvu, &il, &iu, __nd + offsetd, __ne + offsete, __ne2 + offsete2, &rtol1, &rtol2, &spltol, &__nnsplit, __nisplit + offsetisplit, &__nm, __nw + offsetw, __nwerr + offsetwerr, __nwgap + offsetwgap, __niblock + offsetiblock, __nindexw + offsetindexw, __ngers + offsetgers, &__npivmin, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ngers) (*env)->ReleasePrimitiveArrayCritical(env, gers, __ngers, failed ? JNI_ABORT : 0); + if (__nindexw) (*env)->ReleasePrimitiveArrayCritical(env, indexw, __nindexw, failed ? JNI_ABORT : 0); + if (__niblock) (*env)->ReleasePrimitiveArrayCritical(env, iblock, __niblock, failed ? JNI_ABORT : 0); + if (__nwgap) (*env)->ReleasePrimitiveArrayCritical(env, wgap, __nwgap, failed ? JNI_ABORT : 0); + if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, failed ? JNI_ABORT : 0); + if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, pivmin, floatW_val_fieldID, __npivmin); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (!failed) (*env)->SetIntField(env, nsplit, intW_val_fieldID, __nnsplit); + if (!failed) (*env)->SetFloatField(env, vu, floatW_val_fieldID, __nvu); + if (!failed) (*env)->SetFloatField(env, vl, floatW_val_fieldID, __nvl); + if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slaqps_)(int *m, int *n, int *offset, int *nb, int *kb, float *a, int *lda, int * jpvt, float *tau, float *vn11, float *vn22, float *auxv, float *f, int *ldf); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqpsK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint offset, jint nb, jobject kb, jfloatArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jfloatArray tau, jint offsettau, jfloatArray vn1, jint offsetvn1, jfloatArray vn2, jint offsetvn2, jfloatArray auxv, jint offsetauxv, jfloatArray f, jint offsetf, jint ldf) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*slarrf_)(int *n, float *d, float *l, float *ld, int *clstrt, int *clend, float *w, float *wgap, float *werr, float *spdiam, float *clgapl, float *clgapr, float *pivmin, float *sigma, float *dplus, float *lplus, float *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrfK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray d, jint offsetd, jfloatArray l, jint offsetl, jfloatArray ld, jint offsetld, jint clstrt, jint clend, jfloatArray w, jint offsetw, jfloatArray wgap, jint offsetwgap, jfloatArray werr, jint offsetwerr, jfloat spdiam, jfloat clgapl, jfloat clgapr, jfloat pivmin, jobject sigma, jfloatArray dplus, jint offsetdplus, jfloatArray lplus, jint offsetlplus, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + float __nsigma = 0; int __ninfo = 0; float *__nd = NULL; float *__nl = NULL; float *__nld = NULL; float *__nw = NULL; float *__nwgap = NULL; float *__nwerr = NULL; float *__ndplus = NULL; float *__nlplus = NULL; float *__nwork = NULL; + __nsigma = (*env)->GetFloatField(env, sigma, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nl = (*env)->GetPrimitiveArrayCritical(env, l, NULL))) goto fail; + if (!(__nld = (*env)->GetPrimitiveArrayCritical(env, ld, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nwgap = (*env)->GetPrimitiveArrayCritical(env, wgap, NULL))) goto fail; + if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) goto fail; + if (!(__ndplus = (*env)->GetPrimitiveArrayCritical(env, dplus, NULL))) goto fail; + if (!(__nlplus = (*env)->GetPrimitiveArrayCritical(env, lplus, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + slarrf_(&n, __nd + offsetd, __nl + offsetl, __nld + offsetld, &clstrt, &clend, __nw + offsetw, __nwgap + offsetwgap, __nwerr + offsetwerr, &spdiam, &clgapl, &clgapr, &pivmin, &__nsigma, __ndplus + offsetdplus, __nlplus + offsetlplus, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nlplus) (*env)->ReleasePrimitiveArrayCritical(env, lplus, __nlplus, failed ? JNI_ABORT : 0); + if (__ndplus) (*env)->ReleasePrimitiveArrayCritical(env, dplus, __ndplus, failed ? JNI_ABORT : 0); + if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, failed ? JNI_ABORT : 0); + if (__nwgap) (*env)->ReleasePrimitiveArrayCritical(env, wgap, __nwgap, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nld) (*env)->ReleasePrimitiveArrayCritical(env, ld, __nld, failed ? JNI_ABORT : 0); + if (__nl) (*env)->ReleasePrimitiveArrayCritical(env, l, __nl, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, sigma, floatW_val_fieldID, __nsigma); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slaqr0_)(int *wantt, int *wantz, int *n, int *ilo, int *ihi, float *h, int *ldh, float *wr, float *wi, int *iloz, int *ihiz, float *z, int *ldz, float *work, int *lwork, /*FIXME*/void *info); +static void (*slarrj_)(int *n, float *d, float *e2, int *ifirst, int *ilast, float *rtol, int *offset, float *w, float *werr, float *work, int *iwork, float *pivmin, float *spdiam, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr0K(JNIEnv *env, UNUSED jobject obj, - jboolean wantt, jboolean wantz, jint n, jint ilo, jint ihi, jfloatArray h, jint offseth, jint ldh, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jint iloz, jint ihiz, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrjK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray d, jint offsetd, jfloatArray e2, jint offsete2, jint ifirst, jint ilast, jfloat rtol, jint offset, jfloatArray w, jint offsetw, jfloatArray werr, jint offsetwerr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jfloat pivmin, jfloat spdiam, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__nd = NULL; float *__ne2 = NULL; float *__nw = NULL; float *__nwerr = NULL; float *__nwork = NULL; int *__niwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + slarrj_(&n, __nd + offsetd, __ne2 + offsete2, &ifirst, &ilast, &rtol, &offset, __nw + offsetw, __nwerr + offsetwerr, __nwork + offsetwork, __niwork + offsetiwork, &pivmin, &spdiam, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slaqr1_)(int *n, float *h, int *ldh, float *sr1, float *si1, float *sr2, float *si2, float *v); +static void (*slarrk_)(int *n, int *iw, float *gl, float *gu, float *d, float *e2, float *pivmin, float *reltol, float *w, float *werr, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr1K(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray h, jint offseth, jint ldh, jfloat sr1, jfloat si1, jfloat sr2, jfloat si2, jfloatArray v, jint offsetv) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrkK(JNIEnv *env, UNUSED jobject obj, jint n, jint iw, jfloat gl, jfloat gu, jfloatArray d, jint offsetd, jfloatArray e2, jint offsete2, jfloat pivmin, jfloat reltol, jobject w, jobject werr, jobject info) { + jboolean failed = FALSE; + float __nw = 0; float __nwerr = 0; int __ninfo = 0; float *__nd = NULL; float *__ne2 = NULL; + __nw = (*env)->GetFloatField(env, w, floatW_val_fieldID); + __nwerr = (*env)->GetFloatField(env, werr, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) goto fail; + slarrk_(&n, &iw, &gl, &gu, __nd + offsetd, __ne2 + offsete2, &pivmin, &reltol, &__nw, &__nwerr, &__ninfo); +done: + if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, werr, floatW_val_fieldID, __nwerr); + if (!failed) (*env)->SetFloatField(env, w, floatW_val_fieldID, __nw); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slaqr2_)(int *wantt, int *wantz, int *n, int *ktop, int *kbot, int *nw, float *h, int *ldh, int *iloz, int *ihiz, float *z, int *ldz, /*FIXME*/void *ns, /*FIXME*/void *nd, float *sr, float *si, float *v, int *ldv, int *nh, float *t, int *ldt, int *nv, float *wv, int *ldwv, float *work, int *lwork); +static void (*slarrr_)(int *n, float *d, float *e, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr2K(JNIEnv *env, UNUSED jobject obj, - jboolean wantt, jboolean wantz, jint n, jint ktop, jint kbot, jint nw, jfloatArray h, jint offseth, jint ldh, jint iloz, jint ihiz, jfloatArray z, jint offsetz, jint ldz, jobject ns, jobject nd, jfloatArray sr, jint offsetsr, jfloatArray si, jint offsetsi, jfloatArray v, jint offsetv, jint ldv, jint nh, jfloatArray t, jint offsett, jint ldt, jint nv, jfloatArray wv, jint offsetwv, jint ldwv, jfloatArray work, jint offsetwork, jint lwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrrK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + slarrr_(&n, __nd + offsetd, __ne + offsete, &__ninfo); +done: + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slaqr3_)(int *wantt, int *wantz, int *n, int *ktop, int *kbot, int *nw, float *h, int *ldh, int *iloz, int *ihiz, float *z, int *ldz, /*FIXME*/void *ns, /*FIXME*/void *nd, float *sr, float *si, float *v, int *ldv, int *nh, float *t, int *ldt, int *nv, float *wv, int *ldwv, float *work, int *lwork); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr3K(JNIEnv *env, UNUSED jobject obj, - jboolean wantt, jboolean wantz, jint n, jint ktop, jint kbot, jint nw, jfloatArray h, jint offseth, jint ldh, jint iloz, jint ihiz, jfloatArray z, jint offsetz, jint ldz, jobject ns, jobject nd, jfloatArray sr, jint offsetsr, jfloatArray si, jint offsetsi, jfloatArray v, jint offsetv, jint ldv, jint nh, jfloatArray t, jint offsett, jint ldt, jint nv, jfloatArray wv, jint offsetwv, jint ldwv, jfloatArray work, jint offsetwork, jint lwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*slarrv_)(int *n, float *vl, float *vu, float *d, float *l, float *pivmin, int *isplit, int *m, int *dol, int *dou, float *minrgp, float *rtol1, float *rtol2, float *w, float *werr, float *wgap, int *iblock, int *indexw, float *gers, float *z, int *ldz, int *isuppz, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrvK(JNIEnv *env, UNUSED jobject obj, jint n, jfloat vl, jfloat vu, jfloatArray d, jint offsetd, jfloatArray l, jint offsetl, jfloat pivmin, jintArray isplit, jint offsetisplit, jint m, jint dol, jint dou, jfloat minrgp, jobject rtol1, jobject rtol2, jfloatArray w, jint offsetw, jfloatArray werr, jint offsetwerr, jfloatArray wgap, jint offsetwgap, jintArray iblock, jint offsetiblock, jintArray indexw, jint offsetindexw, jfloatArray gers, jint offsetgers, jfloatArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + float __nrtol1 = 0; float __nrtol2 = 0; int __ninfo = 0; float *__nd = NULL; float *__nl = NULL; int *__nisplit = NULL; float *__nw = NULL; float *__nwerr = NULL; float *__nwgap = NULL; int *__niblock = NULL; int *__nindexw = NULL; float *__ngers = NULL; float *__nz = NULL; int *__nisuppz = NULL; float *__nwork = NULL; int *__niwork = NULL; + __nrtol1 = (*env)->GetFloatField(env, rtol1, floatW_val_fieldID); + __nrtol2 = (*env)->GetFloatField(env, rtol2, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nl = (*env)->GetPrimitiveArrayCritical(env, l, NULL))) goto fail; + if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) goto fail; + if (!(__nwgap = (*env)->GetPrimitiveArrayCritical(env, wgap, NULL))) goto fail; + if (!(__niblock = (*env)->GetPrimitiveArrayCritical(env, iblock, NULL))) goto fail; + if (!(__nindexw = (*env)->GetPrimitiveArrayCritical(env, indexw, NULL))) goto fail; + if (!(__ngers = (*env)->GetPrimitiveArrayCritical(env, gers, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + slarrv_(&n, &vl, &vu, __nd + offsetd, __nl + offsetl, &pivmin, __nisplit + offsetisplit, &m, &dol, &dou, &minrgp, &__nrtol1, &__nrtol2, __nw + offsetw, __nwerr + offsetwerr, __nwgap + offsetwgap, __niblock + offsetiblock, __nindexw + offsetindexw, __ngers + offsetgers, __nz + offsetz, &ldz, __nisuppz + offsetisuppz, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__ngers) (*env)->ReleasePrimitiveArrayCritical(env, gers, __ngers, failed ? JNI_ABORT : 0); + if (__nindexw) (*env)->ReleasePrimitiveArrayCritical(env, indexw, __nindexw, failed ? JNI_ABORT : 0); + if (__niblock) (*env)->ReleasePrimitiveArrayCritical(env, iblock, __niblock, failed ? JNI_ABORT : 0); + if (__nwgap) (*env)->ReleasePrimitiveArrayCritical(env, wgap, __nwgap, failed ? JNI_ABORT : 0); + if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, failed ? JNI_ABORT : 0); + if (__nl) (*env)->ReleasePrimitiveArrayCritical(env, l, __nl, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, rtol2, floatW_val_fieldID, __nrtol2); + if (!failed) (*env)->SetFloatField(env, rtol1, floatW_val_fieldID, __nrtol1); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slaqr4_)(int *wantt, int *wantz, int *n, int *ilo, int *ihi, float *h, int *ldh, float *wr, float *wi, int *iloz, int *ihiz, float *z, int *ldz, float *work, int *lwork, int *info); +static void (*slartg_)(float *f, float *g, float *cs, float *sn, float *r); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr4K(JNIEnv *env, UNUSED jobject obj, - jboolean wantt, jboolean wantz, jint n, jint ilo, jint ihi, jfloatArray h, jint offseth, jint ldh, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jint iloz, jint ihiz, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slartgK(JNIEnv *env, UNUSED jobject obj, jfloat f, jfloat g, jobject cs, jobject sn, jobject r) { + jboolean failed = FALSE; + float __ncs = 0; float __nsn = 0; float __nr = 0; + __ncs = (*env)->GetFloatField(env, cs, floatW_val_fieldID); + __nsn = (*env)->GetFloatField(env, sn, floatW_val_fieldID); + __nr = (*env)->GetFloatField(env, r, floatW_val_fieldID); + slartg_(&f, &g, &__ncs, &__nsn, &__nr); +done: + if (!failed) (*env)->SetFloatField(env, r, floatW_val_fieldID, __nr); + if (!failed) (*env)->SetFloatField(env, sn, floatW_val_fieldID, __nsn); + if (!failed) (*env)->SetFloatField(env, cs, floatW_val_fieldID, __ncs); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slaqr5_)(int *wantt, int *wantz, int *kacc22, int *n, int *ktop, int *kbot, int *nshfts, float *sr, float *si, float *h, int *ldh, int *iloz, int *ihiz, float *z, int *ldz, float *v, int *ldv, float *u, int *ldu, int *nv, float *wv, int *ldwv, int *nh, float *wh, int *ldwh); +static void (*slartv_)(int *n, float *x, int *incx, float *y, int *incy, float *c, float *s, int *incc); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr5K(JNIEnv *env, UNUSED jobject obj, - jboolean wantt, jboolean wantz, jint kacc22, jint n, jint ktop, jint kbot, jint nshfts, jfloatArray sr, jint offsetsr, jfloatArray si, jint offsetsi, jfloatArray h, jint offseth, jint ldh, jint iloz, jint ihiz, jfloatArray z, jint offsetz, jint ldz, jfloatArray v, jint offsetv, jint ldv, jfloatArray u, jint offsetu, jint ldu, jint nv, jfloatArray wv, jint offsetwv, jint ldwv, jint nh, jfloatArray wh, jint offsetwh, jint ldwh) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slartvK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy, jfloatArray c, jint offsetc, jfloatArray s, jint offsets, jint incc) { + jboolean failed = FALSE; + float *__nx = NULL; float *__ny = NULL; float *__nc = NULL; float *__ns = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + slartv_(&n, __nx + offsetx, &incx, __ny + offsety, &incy, __nc + offsetc, __ns + offsets, &incc); +done: + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slaqsb_)(const char *uplo, int *n, int *kd, float *ab, int *ldab, float *s, float *scond, float *amax, jstring *equed); +static void (*slaruv_)(int *iseed, int *n, float *x); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqsbK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloatArray s, jint offsets, jfloat scond, jfloat amax, jobject equed) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaruvK(JNIEnv *env, UNUSED jobject obj, jintArray iseed, jint offsetiseed, jint n, jfloatArray x, jint offsetx) { + jboolean failed = FALSE; + int *__niseed = NULL; float *__nx = NULL; + if (!(__niseed = (*env)->GetPrimitiveArrayCritical(env, iseed, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + slaruv_(__niseed + offsetiseed, &n, __nx + offsetx); +done: + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__niseed) (*env)->ReleasePrimitiveArrayCritical(env, iseed, __niseed, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slaqsp_)(const char *uplo, int *n, float *ap, float *s, float *scond, float *amax, jstring *equed); +static void (*slarz_)(const char *side, int *m, int *n, int *l, float *v, int *incv, float *tau, float *c, int *Ldc, float *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqspK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray s, jint offsets, jfloat scond, jfloat amax, jobject equed) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarzK(JNIEnv *env, UNUSED jobject obj, jstring side, jint m, jint n, jint l, jfloatArray v, jint offsetv, jint incv, jfloat tau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork) { + jboolean failed = FALSE; + const char *__nside = NULL; float *__nv = NULL; float *__nc = NULL; float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + slarz_(__nside, &m, &n, &l, __nv + offsetv, &incv, &tau, __nc + offsetc, &Ldc, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slaqsy_)(const char *uplo, int *n, float *a, int *lda, float *s, float *scond, float *amax, jstring *equed); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqsyK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray s, jint offsets, jfloat scond, jfloat amax, jobject equed) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*slarzb_)(const char *side, const char *trans, const char *direct, const char *storev, int *m, int *n, int *k, int *l, float *v, int *ldv, float *t, int *ldt, float *c, int *Ldc, float *work, int *ldwork); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarzbK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jstring direct, jstring storev, jint m, jint n, jint k, jint l, jfloatArray v, jint offsetv, jint ldv, jfloatArray t, jint offsett, jint ldt, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint ldwork) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__ntrans = NULL; const char *__ndirect = NULL; const char *__nstorev = NULL; float *__nv = NULL; float *__nt = NULL; float *__nc = NULL; float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndirect = (*env)->GetStringUTFChars(env, direct, NULL))) goto fail; + if (!(__nstorev = (*env)->GetStringUTFChars(env, storev, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + slarzb_(__nside, __ntrans, __ndirect, __nstorev, &m, &n, &k, &l, __nv + offsetv, &ldv, __nt + offsett, &ldt, __nc + offsetc, &Ldc, __nwork + offsetwork, &ldwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nstorev) (*env)->ReleaseStringUTFChars(env, storev, __nstorev); + if (__ndirect) (*env)->ReleaseStringUTFChars(env, direct, __ndirect); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slaqtr_)(int *ltran, int *lreal, int *n, float *t, int *ldt, float *b, float *w, /*FIXME*/void *scale, float *x, float *work, int *info); +static void (*slarzt_)(const char *direct, const char *storev, int *n, int *k, float *v, int *ldv, float *tau, float *t, int *ldt); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqtrK(JNIEnv *env, UNUSED jobject obj, - jboolean ltran, jboolean lreal, jint n, jfloatArray t, jint offsett, jint ldt, jfloatArray b, jint offsetb, jfloat w, jobject scale, jfloatArray x, jint offsetx, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarztK(JNIEnv *env, UNUSED jobject obj, jstring direct, jstring storev, jint n, jint k, jfloatArray v, jint offsetv, jint ldv, jfloatArray tau, jint offsettau, jfloatArray t, jint offsett, jint ldt) { + jboolean failed = FALSE; + const char *__ndirect = NULL; const char *__nstorev = NULL; float *__nv = NULL; float *__ntau = NULL; float *__nt = NULL; + if (!(__ndirect = (*env)->GetStringUTFChars(env, direct, NULL))) goto fail; + if (!(__nstorev = (*env)->GetStringUTFChars(env, storev, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + slarzt_(__ndirect, __nstorev, &n, &k, __nv + offsetv, &ldv, __ntau + offsettau, __nt + offsett, &ldt); +done: + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nstorev) (*env)->ReleaseStringUTFChars(env, storev, __nstorev); + if (__ndirect) (*env)->ReleaseStringUTFChars(env, direct, __ndirect); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slar1v_)(int *n, int *b1, int *bn, float *lambda, float *d, float *l, float *ld, float *lld, float *pivmin, float *gaptol, float *z, int *wantnc, /*FIXME*/void *negcnt, /*FIXME*/void *ztz, /*FIXME*/void *mingma, /*FIXME*/void *r, int * isuppz, /*FIXME*/void *nrminv, /*FIXME*/void *resid, /*FIXME*/void *rqcorr, float *work); +static void (*slas2_)(float *f, float *g, float *h, float *ssmin, float *ssmax); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slar1vK(JNIEnv *env, UNUSED jobject obj, - jint n, jint b1, jint bn, jfloat lambda, jfloatArray d, jint offsetd, jfloatArray l, jint offsetl, jfloatArray ld, jint offsetld, jfloatArray lld, jint offsetlld, jfloat pivmin, jfloat gaptol, jfloatArray z, jint offsetz, jboolean wantnc, jobject negcnt, jobject ztz, jobject mingma, jobject r, jintArray isuppz, jint offsetisuppz, jobject nrminv, jobject resid, jobject rqcorr, jfloatArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slas2K(JNIEnv *env, UNUSED jobject obj, jfloat f, jfloat g, jfloat h, jobject ssmin, jobject ssmax) { + jboolean failed = FALSE; + float __nssmin = 0; float __nssmax = 0; + __nssmin = (*env)->GetFloatField(env, ssmin, floatW_val_fieldID); + __nssmax = (*env)->GetFloatField(env, ssmax, floatW_val_fieldID); + slas2_(&f, &g, &h, &__nssmin, &__nssmax); +done: + if (!failed) (*env)->SetFloatField(env, ssmax, floatW_val_fieldID, __nssmax); + if (!failed) (*env)->SetFloatField(env, ssmin, floatW_val_fieldID, __nssmin); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slar2v_)(int *n, float *x, float *y, float *z, int *incx, float *c, float *s, int *incc); +static void (*slascl_)(const char *type, int *kl, int *ku, float *cfrom, float *cto, int *m, int *n, float *a, int *lda, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slar2vK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray x, jint offsetx, jfloatArray y, jint offsety, jfloatArray z, jint offsetz, jint incx, jfloatArray c, jint offsetc, jfloatArray s, jint offsets, jint incc) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasclK(JNIEnv *env, UNUSED jobject obj, jstring type, jint kl, jint ku, jfloat cfrom, jfloat cto, jint m, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { + jboolean failed = FALSE; + const char *__ntype = NULL; int __ninfo = 0; float *__na = NULL; + if (!(__ntype = (*env)->GetStringUTFChars(env, type, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + slascl_(__ntype, &kl, &ku, &cfrom, &cto, &m, &n, __na + offseta, &lda, &__ninfo); +done: + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntype) (*env)->ReleaseStringUTFChars(env, type, __ntype); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slarf_)(char *side, int *m, int *n, float *v, int *incv, float *tau, float *c, int *Ldc, float *work); +static void (*slasd0_)(int *n, int *sqre, float *d, float *e, float *u, int *ldu, float *vt, int *ldvt, int *smlsiz, int *iwork, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarfK(JNIEnv *env, UNUSED jobject obj, - jstring side, jint m, jint n, jfloatArray v, jint offsetv, jint incv, jfloat tau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd0K(JNIEnv *env, UNUSED jobject obj, jint n, jint sqre, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jint ldvt, jint smlsiz, jintArray iwork, jint offsetiwork, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nu = NULL; float *__nvt = NULL; int *__niwork = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + slasd0_(&n, &sqre, __nd + offsetd, __ne + offsete, __nu + offsetu, &ldu, __nvt + offsetvt, &ldvt, &smlsiz, __niwork + offsetiwork, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slarfb_)(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, float *v, int *ldv, float *t, int *ldt, float *c, int *Ldc, float *work, int *ldwork); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarfbK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring trans, jstring direct, jstring storev, jint m, jint n, jint k, jfloatArray v, jint offsetv, jint ldv, jfloatArray t, jint offsett, jint ldt, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint ldwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*slasd1_)(int *nl, int *nr, int *sqre, float *d, float *alpha, float *beta, float *u, int *ldu, float *vt, int *ldvt, int *idxq, int *iwork, float *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd1K(JNIEnv *env, UNUSED jobject obj, jint nl, jint nr, jint sqre, jfloatArray d, jint offsetd, jobject alpha, jobject beta, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jint ldvt, jintArray idxq, jint offsetidxq, jintArray iwork, jint offsetiwork, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + float __nalpha = 0; float __nbeta = 0; int __ninfo = 0; float *__nd = NULL; float *__nu = NULL; float *__nvt = NULL; int *__nidxq = NULL; int *__niwork = NULL; float *__nwork = NULL; + __nalpha = (*env)->GetFloatField(env, alpha, floatW_val_fieldID); + __nbeta = (*env)->GetFloatField(env, beta, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; + if (!(__nidxq = (*env)->GetPrimitiveArrayCritical(env, idxq, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + slasd1_(&nl, &nr, &sqre, __nd + offsetd, &__nalpha, &__nbeta, __nu + offsetu, &ldu, __nvt + offsetvt, &ldvt, __nidxq + offsetidxq, __niwork + offsetiwork, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nidxq) (*env)->ReleasePrimitiveArrayCritical(env, idxq, __nidxq, failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, beta, floatW_val_fieldID, __nbeta); + if (!failed) (*env)->SetFloatField(env, alpha, floatW_val_fieldID, __nalpha); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slarfg_)(int *n, /*FIXME*/void *alpha, float *x, int *incx, /*FIXME*/void *tau); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarfgK(JNIEnv *env, UNUSED jobject obj, - jint n, jobject alpha, jfloatArray x, jint offsetx, jint incx, jobject tau) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*slasd2_)(int *nl, int *nr, int *sqre, int *k, float *d, float *z, float *alpha, float *beta, float *u, int *ldu, float *vt, int *ldvt, float *dsigma, float *u2, int *ldu2, float *vt2, int *ldvt2, int *idxp, int *idx, int *idxc, int *idxq, int *coltyp, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd2K(JNIEnv *env, UNUSED jobject obj, jint nl, jint nr, jint sqre, jobject k, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloat alpha, jfloat beta, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jint ldvt, jfloatArray dsigma, jint offsetdsigma, jfloatArray u2, jint offsetu2, jint ldu2, jfloatArray vt2, jint offsetvt2, jint ldvt2, jintArray idxp, jint offsetidxp, jintArray idx, jint offsetidx, jintArray idxc, jint offsetidxc, jintArray idxq, jint offsetidxq, jintArray coltyp, jint offsetcoltyp, jobject info) { + jboolean failed = FALSE; + int __nk = 0; int __ninfo = 0; float *__nd = NULL; float *__nz = NULL; float *__nu = NULL; float *__nvt = NULL; float *__ndsigma = NULL; float *__nu2 = NULL; float *__nvt2 = NULL; int *__nidxp = NULL; int *__nidx = NULL; int *__nidxc = NULL; int *__nidxq = NULL; int *__ncoltyp = NULL; + __nk = (*env)->GetIntField(env, k, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; + if (!(__ndsigma = (*env)->GetPrimitiveArrayCritical(env, dsigma, NULL))) goto fail; + if (!(__nu2 = (*env)->GetPrimitiveArrayCritical(env, u2, NULL))) goto fail; + if (!(__nvt2 = (*env)->GetPrimitiveArrayCritical(env, vt2, NULL))) goto fail; + if (!(__nidxp = (*env)->GetPrimitiveArrayCritical(env, idxp, NULL))) goto fail; + if (!(__nidx = (*env)->GetPrimitiveArrayCritical(env, idx, NULL))) goto fail; + if (!(__nidxc = (*env)->GetPrimitiveArrayCritical(env, idxc, NULL))) goto fail; + if (!(__nidxq = (*env)->GetPrimitiveArrayCritical(env, idxq, NULL))) goto fail; + if (!(__ncoltyp = (*env)->GetPrimitiveArrayCritical(env, coltyp, NULL))) goto fail; + slasd2_(&nl, &nr, &sqre, &__nk, __nd + offsetd, __nz + offsetz, &alpha, &beta, __nu + offsetu, &ldu, __nvt + offsetvt, &ldvt, __ndsigma + offsetdsigma, __nu2 + offsetu2, &ldu2, __nvt2 + offsetvt2, &ldvt2, __nidxp + offsetidxp, __nidx + offsetidx, __nidxc + offsetidxc, __nidxq + offsetidxq, __ncoltyp + offsetcoltyp, &__ninfo); +done: + if (__ncoltyp) (*env)->ReleasePrimitiveArrayCritical(env, coltyp, __ncoltyp, failed ? JNI_ABORT : 0); + if (__nidxq) (*env)->ReleasePrimitiveArrayCritical(env, idxq, __nidxq, failed ? JNI_ABORT : 0); + if (__nidxc) (*env)->ReleasePrimitiveArrayCritical(env, idxc, __nidxc, failed ? JNI_ABORT : 0); + if (__nidx) (*env)->ReleasePrimitiveArrayCritical(env, idx, __nidx, failed ? JNI_ABORT : 0); + if (__nidxp) (*env)->ReleasePrimitiveArrayCritical(env, idxp, __nidxp, failed ? JNI_ABORT : 0); + if (__nvt2) (*env)->ReleasePrimitiveArrayCritical(env, vt2, __nvt2, failed ? JNI_ABORT : 0); + if (__nu2) (*env)->ReleasePrimitiveArrayCritical(env, u2, __nu2, failed ? JNI_ABORT : 0); + if (__ndsigma) (*env)->ReleasePrimitiveArrayCritical(env, dsigma, __ndsigma, failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slarft_)(char *direct, char *storev, int *n, int *k, float *v, int *ldv, float *tau, float *t, int *ldt); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarftK(JNIEnv *env, UNUSED jobject obj, - jstring direct, jstring storev, jint n, jint k, jfloatArray v, jint offsetv, jint ldv, jfloatArray tau, jint offsettau, jfloatArray t, jint offsett, jint ldt) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*slasd3_)(int *nl, int *nr, int *sqre, int *k, float *d, float *q, int *ldq, float *dsigma, float *u, int *ldu, float *u2, int *ldu2, float *vt, int *ldvt, float *vt2, int *ldvt2, int *idxc, int *ctot, float *z, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd3K(JNIEnv *env, UNUSED jobject obj, jint nl, jint nr, jint sqre, jint k, jfloatArray d, jint offsetd, jfloatArray q, jint offsetq, jint ldq, jfloatArray dsigma, jint offsetdsigma, jfloatArray u, jint offsetu, jint ldu, jfloatArray u2, jint offsetu2, jint ldu2, jfloatArray vt, jint offsetvt, jint ldvt, jfloatArray vt2, jint offsetvt2, jint ldvt2, jintArray idxc, jint offsetidxc, jintArray ctot, jint offsetctot, jfloatArray z, jint offsetz, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__nd = NULL; float *__nq = NULL; float *__ndsigma = NULL; float *__nu = NULL; float *__nu2 = NULL; float *__nvt = NULL; float *__nvt2 = NULL; int *__nidxc = NULL; int *__nctot = NULL; float *__nz = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__ndsigma = (*env)->GetPrimitiveArrayCritical(env, dsigma, NULL))) goto fail; + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; + if (!(__nu2 = (*env)->GetPrimitiveArrayCritical(env, u2, NULL))) goto fail; + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; + if (!(__nvt2 = (*env)->GetPrimitiveArrayCritical(env, vt2, NULL))) goto fail; + if (!(__nidxc = (*env)->GetPrimitiveArrayCritical(env, idxc, NULL))) goto fail; + if (!(__nctot = (*env)->GetPrimitiveArrayCritical(env, ctot, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + slasd3_(&nl, &nr, &sqre, &k, __nd + offsetd, __nq + offsetq, &ldq, __ndsigma + offsetdsigma, __nu + offsetu, &ldu, __nu2 + offsetu2, &ldu2, __nvt + offsetvt, &ldvt, __nvt2 + offsetvt2, &ldvt2, __nidxc + offsetidxc, __nctot + offsetctot, __nz + offsetz, &__ninfo); +done: + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nctot) (*env)->ReleasePrimitiveArrayCritical(env, ctot, __nctot, failed ? JNI_ABORT : 0); + if (__nidxc) (*env)->ReleasePrimitiveArrayCritical(env, idxc, __nidxc, failed ? JNI_ABORT : 0); + if (__nvt2) (*env)->ReleasePrimitiveArrayCritical(env, vt2, __nvt2, failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); + if (__nu2) (*env)->ReleasePrimitiveArrayCritical(env, u2, __nu2, failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); + if (__ndsigma) (*env)->ReleasePrimitiveArrayCritical(env, dsigma, __ndsigma, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slarfx_)(char *side, int *m, int *n, float *v, float *tau, float *c, int *Ldc, float *work); +static void (*slasd4_)(int *n, int *i, float *d, float *z, float *delta, float *rho, float *sigma, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarfxK(JNIEnv *env, UNUSED jobject obj, - jstring side, jint m, jint n, jfloatArray v, jint offsetv, jfloat tau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd4K(JNIEnv *env, UNUSED jobject obj, jint n, jint i, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloatArray delta, jint offsetdelta, jfloat rho, jobject sigma, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + float __nsigma = 0; int __ninfo = 0; float *__nd = NULL; float *__nz = NULL; float *__ndelta = NULL; float *__nwork = NULL; + __nsigma = (*env)->GetFloatField(env, sigma, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__ndelta = (*env)->GetPrimitiveArrayCritical(env, delta, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + slasd4_(&n, &i, __nd + offsetd, __nz + offsetz, __ndelta + offsetdelta, &rho, &__nsigma, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ndelta) (*env)->ReleasePrimitiveArrayCritical(env, delta, __ndelta, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, sigma, floatW_val_fieldID, __nsigma); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slargv_)(int *n, float *x, int *incx, float *y, int *incy, float *c, int *incc); +static void (*slasd5_)(int *i, float *d, float *z, float *delta, float *rho, float *dsigma, float *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slargvK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy, jfloatArray c, jint offsetc, jint incc) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd5K(JNIEnv *env, UNUSED jobject obj, jint i, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloatArray delta, jint offsetdelta, jfloat rho, jobject dsigma, jfloatArray work, jint offsetwork) { + jboolean failed = FALSE; + float __ndsigma = 0; float *__nd = NULL; float *__nz = NULL; float *__ndelta = NULL; float *__nwork = NULL; + __ndsigma = (*env)->GetFloatField(env, dsigma, floatW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__ndelta = (*env)->GetPrimitiveArrayCritical(env, delta, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + slasd5_(&i, __nd + offsetd, __nz + offsetz, __ndelta + offsetdelta, &rho, &__ndsigma, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ndelta) (*env)->ReleasePrimitiveArrayCritical(env, delta, __ndelta, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetFloatField(env, dsigma, floatW_val_fieldID, __ndsigma); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slarnv_)(int *idist, int * iseed, int *n, float *x); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarnvK(JNIEnv *env, UNUSED jobject obj, - jint idist, jintArray iseed, jint offsetiseed, jint n, jfloatArray x, jint offsetx) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*slasd6_)(int *icompq, int *nl, int *nr, int *sqre, float *d, float *vf, float *vl, float *alpha, float *beta, int *idxq, int *perm, int *givptr, int *givcol, int *ldgcol, float *givnum, int *ldgnum, float *poles, float *difl, float *difr, float *z, int *k, float *c, float *s, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd6K(JNIEnv *env, UNUSED jobject obj, jint icompq, jint nl, jint nr, jint sqre, jfloatArray d, jint offsetd, jfloatArray vf, jint offsetvf, jfloatArray vl, jint offsetvl, jobject alpha, jobject beta, jintArray idxq, jint offsetidxq, jintArray perm, jint offsetperm, jobject givptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jfloatArray givnum, jint offsetgivnum, jint ldgnum, jfloatArray poles, jint offsetpoles, jfloatArray difl, jint offsetdifl, jfloatArray difr, jint offsetdifr, jfloatArray z, jint offsetz, jobject k, jobject c, jobject s, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + float __nalpha = 0; float __nbeta = 0; int __ngivptr = 0; int __nk = 0; float __nc = 0; float __ns = 0; int __ninfo = 0; float *__nd = NULL; float *__nvf = NULL; float *__nvl = NULL; int *__nidxq = NULL; int *__nperm = NULL; int *__ngivcol = NULL; float *__ngivnum = NULL; float *__npoles = NULL; float *__ndifl = NULL; float *__ndifr = NULL; float *__nz = NULL; float *__nwork = NULL; int *__niwork = NULL; + __nalpha = (*env)->GetFloatField(env, alpha, floatW_val_fieldID); + __nbeta = (*env)->GetFloatField(env, beta, floatW_val_fieldID); + __ngivptr = (*env)->GetIntField(env, givptr, intW_val_fieldID); + __nk = (*env)->GetIntField(env, k, intW_val_fieldID); + __nc = (*env)->GetFloatField(env, c, floatW_val_fieldID); + __ns = (*env)->GetFloatField(env, s, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nvf = (*env)->GetPrimitiveArrayCritical(env, vf, NULL))) goto fail; + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; + if (!(__nidxq = (*env)->GetPrimitiveArrayCritical(env, idxq, NULL))) goto fail; + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; + if (!(__npoles = (*env)->GetPrimitiveArrayCritical(env, poles, NULL))) goto fail; + if (!(__ndifl = (*env)->GetPrimitiveArrayCritical(env, difl, NULL))) goto fail; + if (!(__ndifr = (*env)->GetPrimitiveArrayCritical(env, difr, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + slasd6_(&icompq, &nl, &nr, &sqre, __nd + offsetd, __nvf + offsetvf, __nvl + offsetvl, &__nalpha, &__nbeta, __nidxq + offsetidxq, __nperm + offsetperm, &__ngivptr, __ngivcol + offsetgivcol, &ldgcol, __ngivnum + offsetgivnum, &ldgnum, __npoles + offsetpoles, __ndifl + offsetdifl, __ndifr + offsetdifr, __nz + offsetz, &__nk, &__nc, &__ns, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__ndifr) (*env)->ReleasePrimitiveArrayCritical(env, difr, __ndifr, failed ? JNI_ABORT : 0); + if (__ndifl) (*env)->ReleasePrimitiveArrayCritical(env, difl, __ndifl, failed ? JNI_ABORT : 0); + if (__npoles) (*env)->ReleasePrimitiveArrayCritical(env, poles, __npoles, failed ? JNI_ABORT : 0); + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); + if (__nidxq) (*env)->ReleasePrimitiveArrayCritical(env, idxq, __nidxq, failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); + if (__nvf) (*env)->ReleasePrimitiveArrayCritical(env, vf, __nvf, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, s, floatW_val_fieldID, __ns); + if (!failed) (*env)->SetFloatField(env, c, floatW_val_fieldID, __nc); + if (!failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); + if (!failed) (*env)->SetIntField(env, givptr, intW_val_fieldID, __ngivptr); + if (!failed) (*env)->SetFloatField(env, beta, floatW_val_fieldID, __nbeta); + if (!failed) (*env)->SetFloatField(env, alpha, floatW_val_fieldID, __nalpha); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slarra_)(int *n, float *d, float *e, float *e22, float *spltol, float *tnrm, /*FIXME*/void *nsplit, int * isplit, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarraK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray e2, jint offsete2, jfloat spltol, jfloat tnrm, jobject nsplit, jintArray isplit, jint offsetisplit, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*slasd7_)(int *icompq, int *nl, int *nr, int *sqre, int *k, float *d, float *z, float *zw, float *vf, float *vfw, float *vl, float *vlw, float *alpha, float *beta, float *dsigma, int *idx, int *idxp, int *idxq, int *perm, int *givptr, int *givcol, int *ldgcol, float *givnum, int *ldgnum, float *c, float *s, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd7K(JNIEnv *env, UNUSED jobject obj, jint icompq, jint nl, jint nr, jint sqre, jobject k, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloatArray zw, jint offsetzw, jfloatArray vf, jint offsetvf, jfloatArray vfw, jint offsetvfw, jfloatArray vl, jint offsetvl, jfloatArray vlw, jint offsetvlw, jfloat alpha, jfloat beta, jfloatArray dsigma, jint offsetdsigma, jintArray idx, jint offsetidx, jintArray idxp, jint offsetidxp, jintArray idxq, jint offsetidxq, jintArray perm, jint offsetperm, jobject givptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jfloatArray givnum, jint offsetgivnum, jint ldgnum, jobject c, jobject s, jobject info) { + jboolean failed = FALSE; + int __nk = 0; int __ngivptr = 0; float __nc = 0; float __ns = 0; int __ninfo = 0; float *__nd = NULL; float *__nz = NULL; float *__nzw = NULL; float *__nvf = NULL; float *__nvfw = NULL; float *__nvl = NULL; float *__nvlw = NULL; float *__ndsigma = NULL; int *__nidx = NULL; int *__nidxp = NULL; int *__nidxq = NULL; int *__nperm = NULL; int *__ngivcol = NULL; float *__ngivnum = NULL; + __nk = (*env)->GetIntField(env, k, intW_val_fieldID); + __ngivptr = (*env)->GetIntField(env, givptr, intW_val_fieldID); + __nc = (*env)->GetFloatField(env, c, floatW_val_fieldID); + __ns = (*env)->GetFloatField(env, s, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nzw = (*env)->GetPrimitiveArrayCritical(env, zw, NULL))) goto fail; + if (!(__nvf = (*env)->GetPrimitiveArrayCritical(env, vf, NULL))) goto fail; + if (!(__nvfw = (*env)->GetPrimitiveArrayCritical(env, vfw, NULL))) goto fail; + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; + if (!(__nvlw = (*env)->GetPrimitiveArrayCritical(env, vlw, NULL))) goto fail; + if (!(__ndsigma = (*env)->GetPrimitiveArrayCritical(env, dsigma, NULL))) goto fail; + if (!(__nidx = (*env)->GetPrimitiveArrayCritical(env, idx, NULL))) goto fail; + if (!(__nidxp = (*env)->GetPrimitiveArrayCritical(env, idxp, NULL))) goto fail; + if (!(__nidxq = (*env)->GetPrimitiveArrayCritical(env, idxq, NULL))) goto fail; + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; + slasd7_(&icompq, &nl, &nr, &sqre, &__nk, __nd + offsetd, __nz + offsetz, __nzw + offsetzw, __nvf + offsetvf, __nvfw + offsetvfw, __nvl + offsetvl, __nvlw + offsetvlw, &alpha, &beta, __ndsigma + offsetdsigma, __nidx + offsetidx, __nidxp + offsetidxp, __nidxq + offsetidxq, __nperm + offsetperm, &__ngivptr, __ngivcol + offsetgivcol, &ldgcol, __ngivnum + offsetgivnum, &ldgnum, &__nc, &__ns, &__ninfo); +done: + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); + if (__nidxq) (*env)->ReleasePrimitiveArrayCritical(env, idxq, __nidxq, failed ? JNI_ABORT : 0); + if (__nidxp) (*env)->ReleasePrimitiveArrayCritical(env, idxp, __nidxp, failed ? JNI_ABORT : 0); + if (__nidx) (*env)->ReleasePrimitiveArrayCritical(env, idx, __nidx, failed ? JNI_ABORT : 0); + if (__ndsigma) (*env)->ReleasePrimitiveArrayCritical(env, dsigma, __ndsigma, failed ? JNI_ABORT : 0); + if (__nvlw) (*env)->ReleasePrimitiveArrayCritical(env, vlw, __nvlw, failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); + if (__nvfw) (*env)->ReleasePrimitiveArrayCritical(env, vfw, __nvfw, failed ? JNI_ABORT : 0); + if (__nvf) (*env)->ReleasePrimitiveArrayCritical(env, vf, __nvf, failed ? JNI_ABORT : 0); + if (__nzw) (*env)->ReleasePrimitiveArrayCritical(env, zw, __nzw, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, s, floatW_val_fieldID, __ns); + if (!failed) (*env)->SetFloatField(env, c, floatW_val_fieldID, __nc); + if (!failed) (*env)->SetIntField(env, givptr, intW_val_fieldID, __ngivptr); + if (!failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slarrb_)(int *n, float *d, float *lld, int *ifirst, int *ilast, float *rtol1, float *rtol2, int *offset, float *w, float *wgap, float *werr, float *work, int * iwork, float *pivmin, float *spdiam, int *twist, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrbK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray d, jint offsetd, jfloatArray lld, jint offsetlld, jint ifirst, jint ilast, jfloat rtol1, jfloat rtol2, jint offset, jfloatArray w, jint offsetw, jfloatArray wgap, jint offsetwgap, jfloatArray werr, jint offsetwerr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jfloat pivmin, jfloat spdiam, jint twist, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*slasd8_)(int *icompq, int *k, float *d, float *z, float *vf, float *vl, float *difl, float *difr, int *lddifr, float *dsigma, float *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd8K(JNIEnv *env, UNUSED jobject obj, jint icompq, jint k, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloatArray vf, jint offsetvf, jfloatArray vl, jint offsetvl, jfloatArray difl, jint offsetdifl, jfloatArray difr, jint offsetdifr, jint lddifr, jfloatArray dsigma, jint offsetdsigma, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__nd = NULL; float *__nz = NULL; float *__nvf = NULL; float *__nvl = NULL; float *__ndifl = NULL; float *__ndifr = NULL; float *__ndsigma = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nvf = (*env)->GetPrimitiveArrayCritical(env, vf, NULL))) goto fail; + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; + if (!(__ndifl = (*env)->GetPrimitiveArrayCritical(env, difl, NULL))) goto fail; + if (!(__ndifr = (*env)->GetPrimitiveArrayCritical(env, difr, NULL))) goto fail; + if (!(__ndsigma = (*env)->GetPrimitiveArrayCritical(env, dsigma, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + slasd8_(&icompq, &k, __nd + offsetd, __nz + offsetz, __nvf + offsetvf, __nvl + offsetvl, __ndifl + offsetdifl, __ndifr + offsetdifr, &lddifr, __ndsigma + offsetdsigma, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ndsigma) (*env)->ReleasePrimitiveArrayCritical(env, dsigma, __ndsigma, failed ? JNI_ABORT : 0); + if (__ndifr) (*env)->ReleasePrimitiveArrayCritical(env, difr, __ndifr, failed ? JNI_ABORT : 0); + if (__ndifl) (*env)->ReleasePrimitiveArrayCritical(env, difl, __ndifl, failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); + if (__nvf) (*env)->ReleasePrimitiveArrayCritical(env, vf, __nvf, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slarrc_)(char *jobt, int *n, float *vl, float *vu, float *d, float *e, float *pivmin, /*FIXME*/void *eigcnt, /*FIXME*/void *lcnt, /*FIXME*/void *rcnt, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrcK(JNIEnv *env, UNUSED jobject obj, - jstring jobt, jint n, jfloat vl, jfloat vu, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloat pivmin, jobject eigcnt, jobject lcnt, jobject rcnt, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*slasda_)(int *icompq, int *smlsiz, int *n, int *sqre, float *d, float *e, float *u, int *ldu, float *vt, int *k, float *difl, float *difr, float *z, float *poles, int *givptr, int *givcol, int *ldgcol, int *perm, float *givnum, float *c, float *s, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasdaK(JNIEnv *env, UNUSED jobject obj, jint icompq, jint smlsiz, jint n, jint sqre, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jintArray k, jint offsetk, jfloatArray difl, jint offsetdifl, jfloatArray difr, jint offsetdifr, jfloatArray z, jint offsetz, jfloatArray poles, jint offsetpoles, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jintArray perm, jint offsetperm, jfloatArray givnum, jint offsetgivnum, jfloatArray c, jint offsetc, jfloatArray s, jint offsets, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nu = NULL; float *__nvt = NULL; int *__nk = NULL; float *__ndifl = NULL; float *__ndifr = NULL; float *__nz = NULL; float *__npoles = NULL; int *__ngivptr = NULL; int *__ngivcol = NULL; int *__nperm = NULL; float *__ngivnum = NULL; float *__nc = NULL; float *__ns = NULL; float *__nwork = NULL; int *__niwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; + if (!(__nk = (*env)->GetPrimitiveArrayCritical(env, k, NULL))) goto fail; + if (!(__ndifl = (*env)->GetPrimitiveArrayCritical(env, difl, NULL))) goto fail; + if (!(__ndifr = (*env)->GetPrimitiveArrayCritical(env, difr, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__npoles = (*env)->GetPrimitiveArrayCritical(env, poles, NULL))) goto fail; + if (!(__ngivptr = (*env)->GetPrimitiveArrayCritical(env, givptr, NULL))) goto fail; + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + slasda_(&icompq, &smlsiz, &n, &sqre, __nd + offsetd, __ne + offsete, __nu + offsetu, &ldu, __nvt + offsetvt, __nk + offsetk, __ndifl + offsetdifl, __ndifr + offsetdifr, __nz + offsetz, __npoles + offsetpoles, __ngivptr + offsetgivptr, __ngivcol + offsetgivcol, &ldgcol, __nperm + offsetperm, __ngivnum + offsetgivnum, __nc + offsetc, __ns + offsets, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); + if (__ngivptr) (*env)->ReleasePrimitiveArrayCritical(env, givptr, __ngivptr, failed ? JNI_ABORT : 0); + if (__npoles) (*env)->ReleasePrimitiveArrayCritical(env, poles, __npoles, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__ndifr) (*env)->ReleasePrimitiveArrayCritical(env, difr, __ndifr, failed ? JNI_ABORT : 0); + if (__ndifl) (*env)->ReleasePrimitiveArrayCritical(env, difl, __ndifl, failed ? JNI_ABORT : 0); + if (__nk) (*env)->ReleasePrimitiveArrayCritical(env, k, __nk, failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slarrd_)(char *range, char *order, int *n, float *vl, float *vu, int *il, int *iu, float *gers, float *reltol, float *d, float *e, float *e22, float *pivmin, int *nsplit, int * isplit, int *m, float *w, float *werr, /*FIXME*/void *wl, /*FIXME*/void *wu, int *iblock, int * indexw, float *work, int * iwork, int *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrdK(JNIEnv *env, UNUSED jobject obj, - jstring range, jstring order, jint n, jfloat vl, jfloat vu, jint il, jint iu, jfloatArray gers, jint offsetgers, jfloat reltol, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray e2, jint offsete2, jfloat pivmin, jint nsplit, jintArray isplit, jint offsetisplit, jobject m, jfloatArray w, jint offsetw, jfloatArray werr, jint offsetwerr, jobject wl, jobject wu, jintArray iblock, jint offsetiblock, jintArray indexw, jint offsetindexw, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*slasdq_)(const char *uplo, int *sqre, int *n, int *ncvt, int *nru, int *ncc, float *d, float *e, float *vt, int *ldvt, float *u, int *ldu, float *c, int *Ldc, float *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasdqK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint sqre, jint n, jint ncvt, jint nru, jint ncc, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray vt, jint offsetvt, jint ldvt, jfloatArray u, jint offsetu, jint ldu, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nvt = NULL; float *__nu = NULL; float *__nc = NULL; float *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + slasdq_(__nuplo, &sqre, &n, &ncvt, &nru, &ncc, __nd + offsetd, __ne + offsete, __nvt + offsetvt, &ldvt, __nu + offsetu, &ldu, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slarre_)(char *range, int *n, /*FIXME*/void *vl, /*FIXME*/void *vu, int *il, int *iu, float *d, float *e, float *e22, float *rtol1, float *rtol2, float *spltol, /*FIXME*/void *nsplit, int * isplit, /*FIXME*/void *m, float *w, float *werr, float *wgap, int * iblock, int * indexw, float *gers, /*FIXME*/void *pivmin, float *work, int * iwork, /*FIXME*/void *info); +static void (*slasdt_)(int *n, int *lvl, int *nd, int *inode, int *ndiml, int *ndimr, int *msub); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarreK(JNIEnv *env, UNUSED jobject obj, - jstring range, jint n, jobject vl, jobject vu, jint il, jint iu, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray e2, jint offsete2, jfloat rtol1, jfloat rtol2, jfloat spltol, jobject nsplit, jintArray isplit, jint offsetisplit, jobject m, jfloatArray w, jint offsetw, jfloatArray werr, jint offsetwerr, jfloatArray wgap, jint offsetwgap, jintArray iblock, jint offsetiblock, jintArray indexw, jint offsetindexw, jfloatArray gers, jint offsetgers, jobject pivmin, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasdtK(JNIEnv *env, UNUSED jobject obj, jint n, jobject lvl, jobject nd, jintArray inode, jint offsetinode, jintArray ndiml, jint offsetndiml, jintArray ndimr, jint offsetndimr, jint msub) { + jboolean failed = FALSE; + int __nlvl = 0; int __nnd = 0; int *__ninode = NULL; int *__nndiml = NULL; int *__nndimr = NULL; + __nlvl = (*env)->GetIntField(env, lvl, intW_val_fieldID); + __nnd = (*env)->GetIntField(env, nd, intW_val_fieldID); + if (!(__ninode = (*env)->GetPrimitiveArrayCritical(env, inode, NULL))) goto fail; + if (!(__nndiml = (*env)->GetPrimitiveArrayCritical(env, ndiml, NULL))) goto fail; + if (!(__nndimr = (*env)->GetPrimitiveArrayCritical(env, ndimr, NULL))) goto fail; + slasdt_(&n, &__nlvl, &__nnd, __ninode + offsetinode, __nndiml + offsetndiml, __nndimr + offsetndimr, &msub); +done: + if (__nndimr) (*env)->ReleasePrimitiveArrayCritical(env, ndimr, __nndimr, failed ? JNI_ABORT : 0); + if (__nndiml) (*env)->ReleasePrimitiveArrayCritical(env, ndiml, __nndiml, failed ? JNI_ABORT : 0); + if (__ninode) (*env)->ReleasePrimitiveArrayCritical(env, inode, __ninode, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, nd, intW_val_fieldID, __nnd); + if (!failed) (*env)->SetIntField(env, lvl, intW_val_fieldID, __nlvl); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slarrf_)(int *n, float *d, float *l, float *ld, int *clstrt, int *clend, float *w, float *wgap, float *werr, float *spdiam, float *clgapl, float *clgapr, float *pivmin, /*FIXME*/void *sigma, float *dplus, float *lplus, float *work, /*FIXME*/void *info); +static void (*slaset_)(const char *uplo, int *m, int *n, float *alpha, float *beta, float *a, int *lda); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrfK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray d, jint offsetd, jfloatArray l, jint offsetl, jfloatArray ld, jint offsetld, jint clstrt, jint clend, jfloatArray w, jint offsetw, jfloatArray wgap, jint offsetwgap, jfloatArray werr, jint offsetwerr, jfloat spdiam, jfloat clgapl, jfloat clgapr, jfloat pivmin, jobject sigma, jfloatArray dplus, jint offsetdplus, jfloatArray lplus, jint offsetlplus, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasetK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint m, jint n, jfloat alpha, jfloat beta, jfloatArray a, jint offseta, jint lda) { + jboolean failed = FALSE; + const char *__nuplo = NULL; float *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + slaset_(__nuplo, &m, &n, &alpha, &beta, __na + offseta, &lda); +done: + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slarrj_)(int *n, float *d, float *e22, int *ifirst, int *ilast, float *rtol, int *offset, float *w, float *werr, float *work, int * iwork, float *pivmin, float *spdiam, /*FIXME*/void *info); +static void (*slasq1_)(int *n, float *d, float *e, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrjK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray d, jint offsetd, jfloatArray e2, jint offsete2, jint ifirst, jint ilast, jfloat rtol, jint offset, jfloatArray w, jint offsetw, jfloatArray werr, jint offsetwerr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jfloat pivmin, jfloat spdiam, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq1K(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + slasq1_(&n, __nd + offsetd, __ne + offsete, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slarrk_)(int *n, int *iw, float *gl, float *gu, float *d, float *e22, float *pivmin, float *reltol, /*FIXME*/void *w, /*FIXME*/void *werr, /*FIXME*/void *info); +static void (*slasq2_)(int *n, float *z, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrkK(JNIEnv *env, UNUSED jobject obj, - jint n, jint iw, jfloat gl, jfloat gu, jfloatArray d, jint offsetd, jfloatArray e2, jint offsete2, jfloat pivmin, jfloat reltol, jobject w, jobject werr, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq2K(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray z, jint offsetz, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__nz = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + slasq2_(&n, __nz + offsetz, &__ninfo); +done: + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slarrr_)(int *n, float *d, float *e, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrrK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*slasq3_)(int *i0, int *n0, float *z, int *pp, float *dmin, float *sigma, float *desig, float *qmax, int *nfail, int *iter, int *ndiv, int *ieee); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq3K(JNIEnv *env, UNUSED jobject obj, jint i0, jobject n0, jfloatArray z, jint offsetz, jint pp, jobject dmin, jobject sigma, jobject desig, jobject qmax, jobject nfail, jobject iter, jobject ndiv, jboolean ieee) { + jboolean failed = FALSE; + int __nn0 = 0; float __ndmin = 0; float __nsigma = 0; float __ndesig = 0; float __nqmax = 0; int __nnfail = 0; int __niter = 0; int __nndiv = 0; int __nieee; float *__nz = NULL; + __nn0 = (*env)->GetIntField(env, n0, intW_val_fieldID); + __ndmin = (*env)->GetFloatField(env, dmin, floatW_val_fieldID); + __nsigma = (*env)->GetFloatField(env, sigma, floatW_val_fieldID); + __ndesig = (*env)->GetFloatField(env, desig, floatW_val_fieldID); + __nqmax = (*env)->GetFloatField(env, qmax, floatW_val_fieldID); + __nnfail = (*env)->GetIntField(env, nfail, intW_val_fieldID); + __niter = (*env)->GetIntField(env, iter, intW_val_fieldID); + __nndiv = (*env)->GetIntField(env, ndiv, intW_val_fieldID); + __nieee = ieee; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + slasq3_(&i0, &__nn0, __nz + offsetz, &pp, &__ndmin, &__nsigma, &__ndesig, &__nqmax, &__nnfail, &__niter, &__nndiv, &__nieee); +done: + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (!failed) ieee = __nieee; + if (!failed) (*env)->SetIntField(env, ndiv, intW_val_fieldID, __nndiv); + if (!failed) (*env)->SetIntField(env, iter, intW_val_fieldID, __niter); + if (!failed) (*env)->SetIntField(env, nfail, intW_val_fieldID, __nnfail); + if (!failed) (*env)->SetFloatField(env, qmax, floatW_val_fieldID, __nqmax); + if (!failed) (*env)->SetFloatField(env, desig, floatW_val_fieldID, __ndesig); + if (!failed) (*env)->SetFloatField(env, sigma, floatW_val_fieldID, __nsigma); + if (!failed) (*env)->SetFloatField(env, dmin, floatW_val_fieldID, __ndmin); + if (!failed) (*env)->SetIntField(env, n0, intW_val_fieldID, __nn0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slarrv_)(int *n, float *vl, float *vu, float *d, float *l, float *pivmin, int * isplit, int *m, int *dol, int *dou, float *minrgp, /*FIXME*/void *rtol1, /*FIXME*/void *rtol2, float *w, float *werr, float *wgap, int * iblock, int * indexw, float *gers, float *z, int *ldz, int * isuppz, float *work, int * iwork, /*FIXME*/void *info); +static void (*slasq4_)(int *i0, int *n0, float *z, int *pp, int *n0in, float *dmin, float *dmin1, float *dmin2, float *dn, float *dn1, float *dn2, float *tau, int *ttype); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrvK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloat vl, jfloat vu, jfloatArray d, jint offsetd, jfloatArray l, jint offsetl, jfloat pivmin, jintArray isplit, jint offsetisplit, jint m, jint dol, jint dou, jfloat minrgp, jobject rtol1, jobject rtol2, jfloatArray w, jint offsetw, jfloatArray werr, jint offsetwerr, jfloatArray wgap, jint offsetwgap, jintArray iblock, jint offsetiblock, jintArray indexw, jint offsetindexw, jfloatArray gers, jint offsetgers, jfloatArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq4K(JNIEnv *env, UNUSED jobject obj, jint i0, jint n0, jfloatArray z, jint offsetz, jint pp, jint n0in, jfloat dmin, jfloat dmin1, jfloat dmin2, jfloat dn, jfloat dn1, jfloat dn2, jobject tau, jobject ttype) { + jboolean failed = FALSE; + float __ntau = 0; int __nttype = 0; float *__nz = NULL; + __ntau = (*env)->GetFloatField(env, tau, floatW_val_fieldID); + __nttype = (*env)->GetIntField(env, ttype, intW_val_fieldID); + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + slasq4_(&i0, &n0, __nz + offsetz, &pp, &n0in, &dmin, &dmin1, &dmin2, &dn, &dn1, &dn2, &__ntau, &__nttype); +done: + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, ttype, intW_val_fieldID, __nttype); + if (!failed) (*env)->SetFloatField(env, tau, floatW_val_fieldID, __ntau); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slartg_)(float *f, float *g, /*FIXME*/void *cs, /*FIXME*/void *sn, /*FIXME*/void *r); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slartgK(JNIEnv *env, UNUSED jobject obj, - jfloat f, jfloat g, jobject cs, jobject sn, jobject r) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*slasq5_)(int *i0, int *n0, float *z, int *pp, float *tau, float *dmin, float *dmin1, float *dmin2, float *dn, float *dnm1, float *dnm2, int *ieee); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq5K(JNIEnv *env, UNUSED jobject obj, jint i0, jint n0, jfloatArray z, jint offsetz, jint pp, jfloat tau, jobject dmin, jobject dmin1, jobject dmin2, jobject dn, jobject dnm1, jobject dnm2, jboolean ieee) { + jboolean failed = FALSE; + float __ndmin = 0; float __ndmin1 = 0; float __ndmin2 = 0; float __ndn = 0; float __ndnm1 = 0; float __ndnm2 = 0; int __nieee; float *__nz = NULL; + __ndmin = (*env)->GetFloatField(env, dmin, floatW_val_fieldID); + __ndmin1 = (*env)->GetFloatField(env, dmin1, floatW_val_fieldID); + __ndmin2 = (*env)->GetFloatField(env, dmin2, floatW_val_fieldID); + __ndn = (*env)->GetFloatField(env, dn, floatW_val_fieldID); + __ndnm1 = (*env)->GetFloatField(env, dnm1, floatW_val_fieldID); + __ndnm2 = (*env)->GetFloatField(env, dnm2, floatW_val_fieldID); + __nieee = ieee; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + slasq5_(&i0, &n0, __nz + offsetz, &pp, &tau, &__ndmin, &__ndmin1, &__ndmin2, &__ndn, &__ndnm1, &__ndnm2, &__nieee); +done: + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (!failed) ieee = __nieee; + if (!failed) (*env)->SetFloatField(env, dnm2, floatW_val_fieldID, __ndnm2); + if (!failed) (*env)->SetFloatField(env, dnm1, floatW_val_fieldID, __ndnm1); + if (!failed) (*env)->SetFloatField(env, dn, floatW_val_fieldID, __ndn); + if (!failed) (*env)->SetFloatField(env, dmin2, floatW_val_fieldID, __ndmin2); + if (!failed) (*env)->SetFloatField(env, dmin1, floatW_val_fieldID, __ndmin1); + if (!failed) (*env)->SetFloatField(env, dmin, floatW_val_fieldID, __ndmin); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slartv_)(int *n, float *x, int *incx, float *y, int *incy, float *c, float *s, int *incc); +static void (*slasq6_)(int *i0, int *n0, float *z, int *pp, float *dmin, float *dmin1, float *dmin2, float *dn, float *dnm1, float *dnm2); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slartvK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy, jfloatArray c, jint offsetc, jfloatArray s, jint offsets, jint incc) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq6K(JNIEnv *env, UNUSED jobject obj, jint i0, jint n0, jfloatArray z, jint offsetz, jint pp, jobject dmin, jobject dmin1, jobject dmin2, jobject dn, jobject dnm1, jobject dnm2) { + jboolean failed = FALSE; + float __ndmin = 0; float __ndmin1 = 0; float __ndmin2 = 0; float __ndn = 0; float __ndnm1 = 0; float __ndnm2 = 0; float *__nz = NULL; + __ndmin = (*env)->GetFloatField(env, dmin, floatW_val_fieldID); + __ndmin1 = (*env)->GetFloatField(env, dmin1, floatW_val_fieldID); + __ndmin2 = (*env)->GetFloatField(env, dmin2, floatW_val_fieldID); + __ndn = (*env)->GetFloatField(env, dn, floatW_val_fieldID); + __ndnm1 = (*env)->GetFloatField(env, dnm1, floatW_val_fieldID); + __ndnm2 = (*env)->GetFloatField(env, dnm2, floatW_val_fieldID); + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + slasq6_(&i0, &n0, __nz + offsetz, &pp, &__ndmin, &__ndmin1, &__ndmin2, &__ndn, &__ndnm1, &__ndnm2); +done: + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetFloatField(env, dnm2, floatW_val_fieldID, __ndnm2); + if (!failed) (*env)->SetFloatField(env, dnm1, floatW_val_fieldID, __ndnm1); + if (!failed) (*env)->SetFloatField(env, dn, floatW_val_fieldID, __ndn); + if (!failed) (*env)->SetFloatField(env, dmin2, floatW_val_fieldID, __ndmin2); + if (!failed) (*env)->SetFloatField(env, dmin1, floatW_val_fieldID, __ndmin1); + if (!failed) (*env)->SetFloatField(env, dmin, floatW_val_fieldID, __ndmin); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slaruv_)(int *iseed, int *n, float *x); +static void (*slasr_)(const char *side, const char *pivot, const char *direct, int *m, int *n, float *c, float *s, float *a, int *lda); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaruvK(JNIEnv *env, UNUSED jobject obj, - jintArray iseed, jint offsetiseed, jint n, jfloatArray x, jint offsetx) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasrK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring pivot, jstring direct, jint m, jint n, jfloatArray c, jint offsetc, jfloatArray s, jint offsets, jfloatArray a, jint offseta, jint lda) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__npivot = NULL; const char *__ndirect = NULL; float *__nc = NULL; float *__ns = NULL; float *__na = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__npivot = (*env)->GetStringUTFChars(env, pivot, NULL))) goto fail; + if (!(__ndirect = (*env)->GetStringUTFChars(env, direct, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + slasr_(__nside, __npivot, __ndirect, &m, &n, __nc + offsetc, __ns + offsets, __na + offseta, &lda); +done: + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ndirect) (*env)->ReleaseStringUTFChars(env, direct, __ndirect); + if (__npivot) (*env)->ReleaseStringUTFChars(env, pivot, __npivot); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slarz_)(char *side, int *m, int *n, int *l, float *v, int *incv, float *tau, float *c, int *Ldc, float *work); +static void (*slasrt_)(const char *id, int *n, float *d, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarzK(JNIEnv *env, UNUSED jobject obj, - jstring side, jint m, jint n, jint l, jfloatArray v, jint offsetv, jint incv, jfloat tau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasrtK(JNIEnv *env, UNUSED jobject obj, jstring id, jint n, jfloatArray d, jint offsetd, jobject info) { + jboolean failed = FALSE; + const char *__nid = NULL; int __ninfo = 0; float *__nd = NULL; + if (!(__nid = (*env)->GetStringUTFChars(env, id, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + slasrt_(__nid, &n, __nd + offsetd, &__ninfo); +done: + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nid) (*env)->ReleaseStringUTFChars(env, id, __nid); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slarzb_)(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, int *l, float *v, int *ldv, float *t, int *ldt, float *c, int *Ldc, float *work, int *ldwork); +static void (*slassq_)(int *n, float *x, int *incx, float *scale, float *sumsq); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarzbK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring trans, jstring direct, jstring storev, jint m, jint n, jint k, jint l, jfloatArray v, jint offsetv, jint ldv, jfloatArray t, jint offsett, jint ldt, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint ldwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slassqK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray x, jint offsetx, jint incx, jobject scale, jobject sumsq) { + jboolean failed = FALSE; + float __nscale = 0; float __nsumsq = 0; float *__nx = NULL; + __nscale = (*env)->GetFloatField(env, scale, floatW_val_fieldID); + __nsumsq = (*env)->GetFloatField(env, sumsq, floatW_val_fieldID); + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + slassq_(&n, __nx + offsetx, &incx, &__nscale, &__nsumsq); +done: + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetFloatField(env, sumsq, floatW_val_fieldID, __nsumsq); + if (!failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slarzt_)(char *direct, char *storev, int *n, int *k, float *v, int *ldv, float *tau, float *t, int *ldt); +static void (*slasv2_)(float *f, float *g, float *h, float *ssmin, float *ssmax, float *snr, float *csr, float *snl, float *csl); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarztK(JNIEnv *env, UNUSED jobject obj, - jstring direct, jstring storev, jint n, jint k, jfloatArray v, jint offsetv, jint ldv, jfloatArray tau, jint offsettau, jfloatArray t, jint offsett, jint ldt) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasv2K(JNIEnv *env, UNUSED jobject obj, jfloat f, jfloat g, jfloat h, jobject ssmin, jobject ssmax, jobject snr, jobject csr, jobject snl, jobject csl) { + jboolean failed = FALSE; + float __nssmin = 0; float __nssmax = 0; float __nsnr = 0; float __ncsr = 0; float __nsnl = 0; float __ncsl = 0; + __nssmin = (*env)->GetFloatField(env, ssmin, floatW_val_fieldID); + __nssmax = (*env)->GetFloatField(env, ssmax, floatW_val_fieldID); + __nsnr = (*env)->GetFloatField(env, snr, floatW_val_fieldID); + __ncsr = (*env)->GetFloatField(env, csr, floatW_val_fieldID); + __nsnl = (*env)->GetFloatField(env, snl, floatW_val_fieldID); + __ncsl = (*env)->GetFloatField(env, csl, floatW_val_fieldID); + slasv2_(&f, &g, &h, &__nssmin, &__nssmax, &__nsnr, &__ncsr, &__nsnl, &__ncsl); +done: + if (!failed) (*env)->SetFloatField(env, csl, floatW_val_fieldID, __ncsl); + if (!failed) (*env)->SetFloatField(env, snl, floatW_val_fieldID, __nsnl); + if (!failed) (*env)->SetFloatField(env, csr, floatW_val_fieldID, __ncsr); + if (!failed) (*env)->SetFloatField(env, snr, floatW_val_fieldID, __nsnr); + if (!failed) (*env)->SetFloatField(env, ssmax, floatW_val_fieldID, __nssmax); + if (!failed) (*env)->SetFloatField(env, ssmin, floatW_val_fieldID, __nssmin); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slas2_)(float *f, float *g, float *h, /*FIXME*/void *ssmin, /*FIXME*/void *ssmax); +static void (*slaswp_)(int *n, float *a, int *lda, int *k1, int *k2, int *ipiv, int *incx); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slas2K(JNIEnv *env, UNUSED jobject obj, - jfloat f, jfloat g, jfloat h, jobject ssmin, jobject ssmax) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaswpK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray a, jint offseta, jint lda, jint k1, jint k2, jintArray ipiv, jint offsetipiv, jint incx) { + jboolean failed = FALSE; + float *__na = NULL; int *__nipiv = NULL; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + slaswp_(&n, __na + offseta, &lda, &k1, &k2, __nipiv + offsetipiv, &incx); +done: + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slascl_)(char *type, int *kl, int *ku, float *cfrom, float *cto, int *m, int *n, float *a, int *lda, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasclK(JNIEnv *env, UNUSED jobject obj, - jstring type, jint kl, jint ku, jfloat cfrom, jfloat cto, jint m, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*slasy2_)(int *ltranl, int *ltranr, int *isgn, int *n1, int *n2, float *tl, int *ldtl, float *tr, int *ldtr, float *b, int *ldb, float *scale, float *x, int *ldx, float *xnorm, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasy2K(JNIEnv *env, UNUSED jobject obj, jboolean ltranl, jboolean ltranr, jint isgn, jint n1, jint n2, jfloatArray tl, jint offsettl, jint ldtl, jfloatArray tr, jint offsettr, jint ldtr, jfloatArray b, jint offsetb, jint ldb, jobject scale, jfloatArray x, jint offsetx, jint ldx, jobject xnorm, jobject info) { + jboolean failed = FALSE; + int __nltranl; int __nltranr; float __nscale = 0; float __nxnorm = 0; int __ninfo = 0; float *__ntl = NULL; float *__ntr = NULL; float *__nb = NULL; float *__nx = NULL; + __nltranl = ltranl; + __nltranr = ltranr; + __nscale = (*env)->GetFloatField(env, scale, floatW_val_fieldID); + __nxnorm = (*env)->GetFloatField(env, xnorm, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__ntl = (*env)->GetPrimitiveArrayCritical(env, tl, NULL))) goto fail; + if (!(__ntr = (*env)->GetPrimitiveArrayCritical(env, tr, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + slasy2_(&__nltranl, &__nltranr, &isgn, &n1, &n2, __ntl + offsettl, &ldtl, __ntr + offsettr, &ldtr, __nb + offsetb, &ldb, &__nscale, __nx + offsetx, &ldx, &__nxnorm, &__ninfo); +done: + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__ntr) (*env)->ReleasePrimitiveArrayCritical(env, tr, __ntr, failed ? JNI_ABORT : 0); + if (__ntl) (*env)->ReleasePrimitiveArrayCritical(env, tl, __ntl, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, xnorm, floatW_val_fieldID, __nxnorm); + if (!failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); + if (!failed) ltranr = __nltranr; + if (!failed) ltranl = __nltranl; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slasd0_)(int *n, int *sqre, float *d, float *e, float *u, int *ldu, float *vt, int *ldvt, int *smlsiz, int * iwork, float *work, /*FIXME*/void *info); +static void (*slasyf_)(const char *uplo, int *n, int *nb, int *kb, float *a, int *lda, int *ipiv, float *w, int *ldw, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd0K(JNIEnv *env, UNUSED jobject obj, - jint n, jint sqre, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jint ldvt, jint smlsiz, jintArray iwork, jint offsetiwork, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasyfK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nb, jobject kb, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray w, jint offsetw, jint ldw, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __nkb = 0; int __ninfo = 0; float *__na = NULL; int *__nipiv = NULL; float *__nw = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nkb = (*env)->GetIntField(env, kb, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + slasyf_(__nuplo, &n, &nb, &__nkb, __na + offseta, &lda, __nipiv + offsetipiv, __nw + offsetw, &ldw, &__ninfo); +done: + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, kb, intW_val_fieldID, __nkb); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slasd1_)(int *nl, int *nr, int *sqre, float *d, /*FIXME*/void *alpha, /*FIXME*/void *beta, float *u, int *ldu, float *vt, int *ldvt, int * idxq, int * iwork, float *work, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd1K(JNIEnv *env, UNUSED jobject obj, - jint nl, jint nr, jint sqre, jfloatArray d, jint offsetd, jobject alpha, jobject beta, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jint ldvt, jintArray idxq, jint offsetidxq, jintArray iwork, jint offsetiwork, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*slatbs_)(const char *uplo, const char *trans, const char *diag, const char *normin, int *n, int *kd, float *ab, int *ldab, float *x, float *scale, float *cnorm, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatbsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jstring normin, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloatArray x, jint offsetx, jobject scale, jfloatArray cnorm, jint offsetcnorm, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; const char *__nnormin = NULL; float __nscale = 0; int __ninfo = 0; float *__nab = NULL; float *__nx = NULL; float *__ncnorm = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(__nnormin = (*env)->GetStringUTFChars(env, normin, NULL))) goto fail; + __nscale = (*env)->GetFloatField(env, scale, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ncnorm = (*env)->GetPrimitiveArrayCritical(env, cnorm, NULL))) goto fail; + slatbs_(__nuplo, __ntrans, __ndiag, __nnormin, &n, &kd, __nab + offsetab, &ldab, __nx + offsetx, &__nscale, __ncnorm + offsetcnorm, &__ninfo); +done: + if (__ncnorm) (*env)->ReleasePrimitiveArrayCritical(env, cnorm, __ncnorm, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); + if (__nnormin) (*env)->ReleaseStringUTFChars(env, normin, __nnormin); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slasd2_)(int *nl, int *nr, int *sqre, /*FIXME*/void *k, float *d, float *z, float *alpha, float *beta, float *u, int *ldu, float *vt, int *ldvt, float *dsigma, float *u22, int *ldu2, float *vt22, int *ldvt2, int * idxp, int * idx, int * idxc, int * idxq, int * coltyp, /*FIXME*/void *info); +static void (*slatdf_)(int *ijob, int *n, float *z, int *ldz, float *rhs, float *rdsum, float *rdscal, int *ipiv, int *jpiv); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd2K(JNIEnv *env, UNUSED jobject obj, - jint nl, jint nr, jint sqre, jobject k, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloat alpha, jfloat beta, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jint ldvt, jfloatArray dsigma, jint offsetdsigma, jfloatArray u2, jint offsetu2, jint ldu2, jfloatArray vt2, jint offsetvt2, jint ldvt2, jintArray idxp, jint offsetidxp, jintArray idx, jint offsetidx, jintArray idxc, jint offsetidxc, jintArray idxq, jint offsetidxq, jintArray coltyp, jint offsetcoltyp, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatdfK(JNIEnv *env, UNUSED jobject obj, jint ijob, jint n, jfloatArray z, jint offsetz, jint ldz, jfloatArray rhs, jint offsetrhs, jobject rdsum, jobject rdscal, jintArray ipiv, jint offsetipiv, jintArray jpiv, jint offsetjpiv) { + jboolean failed = FALSE; + float __nrdsum = 0; float __nrdscal = 0; float *__nz = NULL; float *__nrhs = NULL; int *__nipiv = NULL; int *__njpiv = NULL; + __nrdsum = (*env)->GetFloatField(env, rdsum, floatW_val_fieldID); + __nrdscal = (*env)->GetFloatField(env, rdscal, floatW_val_fieldID); + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nrhs = (*env)->GetPrimitiveArrayCritical(env, rhs, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__njpiv = (*env)->GetPrimitiveArrayCritical(env, jpiv, NULL))) goto fail; + slatdf_(&ijob, &n, __nz + offsetz, &ldz, __nrhs + offsetrhs, &__nrdsum, &__nrdscal, __nipiv + offsetipiv, __njpiv + offsetjpiv); +done: + if (__njpiv) (*env)->ReleasePrimitiveArrayCritical(env, jpiv, __njpiv, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nrhs) (*env)->ReleasePrimitiveArrayCritical(env, rhs, __nrhs, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetFloatField(env, rdscal, floatW_val_fieldID, __nrdscal); + if (!failed) (*env)->SetFloatField(env, rdsum, floatW_val_fieldID, __nrdsum); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slasd3_)(int *nl, int *nr, int *sqre, int *k, float *d, float *q, int *ldq, float *dsigma, float *u, int *ldu, float *u22, int *ldu2, float *vt, int *ldvt, float *vt22, int *ldvt2, int * idxc, int * ctot, float *z, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd3K(JNIEnv *env, UNUSED jobject obj, - jint nl, jint nr, jint sqre, jint k, jfloatArray d, jint offsetd, jfloatArray q, jint offsetq, jint ldq, jfloatArray dsigma, jint offsetdsigma, jfloatArray u, jint offsetu, jint ldu, jfloatArray u2, jint offsetu2, jint ldu2, jfloatArray vt, jint offsetvt, jint ldvt, jfloatArray vt2, jint offsetvt2, jint ldvt2, jintArray idxc, jint offsetidxc, jintArray ctot, jint offsetctot, jfloatArray z, jint offsetz, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*slatps_)(const char *uplo, const char *trans, const char *diag, const char *normin, int *n, float *ap, float *x, float *scale, float *cnorm, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatpsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jstring normin, jint n, jfloatArray ap, jint offsetap, jfloatArray x, jint offsetx, jobject scale, jfloatArray cnorm, jint offsetcnorm, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; const char *__nnormin = NULL; float __nscale = 0; int __ninfo = 0; float *__nap = NULL; float *__nx = NULL; float *__ncnorm = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(__nnormin = (*env)->GetStringUTFChars(env, normin, NULL))) goto fail; + __nscale = (*env)->GetFloatField(env, scale, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ncnorm = (*env)->GetPrimitiveArrayCritical(env, cnorm, NULL))) goto fail; + slatps_(__nuplo, __ntrans, __ndiag, __nnormin, &n, __nap + offsetap, __nx + offsetx, &__nscale, __ncnorm + offsetcnorm, &__ninfo); +done: + if (__ncnorm) (*env)->ReleasePrimitiveArrayCritical(env, cnorm, __ncnorm, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); + if (__nnormin) (*env)->ReleaseStringUTFChars(env, normin, __nnormin); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slasd4_)(int *n, int *i, float *d, float *z, float *delta, float *rho, /*FIXME*/void *sigma, float *work, /*FIXME*/void *info); +static void (*slatrd_)(const char *uplo, int *n, int *nb, float *a, int *lda, float *e, float *tau, float *w, int *ldw); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd4K(JNIEnv *env, UNUSED jobject obj, - jint n, jint i, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloatArray delta, jint offsetdelta, jfloat rho, jobject sigma, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatrdK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nb, jfloatArray a, jint offseta, jint lda, jfloatArray e, jint offsete, jfloatArray tau, jint offsettau, jfloatArray w, jint offsetw, jint ldw) { + jboolean failed = FALSE; + const char *__nuplo = NULL; float *__na = NULL; float *__ne = NULL; float *__ntau = NULL; float *__nw = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + slatrd_(__nuplo, &n, &nb, __na + offseta, &lda, __ne + offsete, __ntau + offsettau, __nw + offsetw, &ldw); +done: + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slasd5_)(int *i, float *d, float *z, float *delta, float *rho, /*FIXME*/void *dsigma, float *work); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd5K(JNIEnv *env, UNUSED jobject obj, - jint i, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloatArray delta, jint offsetdelta, jfloat rho, jobject dsigma, jfloatArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*slatrs_)(const char *uplo, const char *trans, const char *diag, const char *normin, int *n, float *a, int *lda, float *x, float *scale, float *cnorm, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jstring normin, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jobject scale, jfloatArray cnorm, jint offsetcnorm, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; const char *__nnormin = NULL; float __nscale = 0; int __ninfo = 0; float *__na = NULL; float *__nx = NULL; float *__ncnorm = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + if (!(__nnormin = (*env)->GetStringUTFChars(env, normin, NULL))) goto fail; + __nscale = (*env)->GetFloatField(env, scale, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ncnorm = (*env)->GetPrimitiveArrayCritical(env, cnorm, NULL))) goto fail; + slatrs_(__nuplo, __ntrans, __ndiag, __nnormin, &n, __na + offseta, &lda, __nx + offsetx, &__nscale, __ncnorm + offsetcnorm, &__ninfo); +done: + if (__ncnorm) (*env)->ReleasePrimitiveArrayCritical(env, cnorm, __ncnorm, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); + if (__nnormin) (*env)->ReleaseStringUTFChars(env, normin, __nnormin); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slasd6_)(int *icompq, int *nl, int *nr, int *sqre, float *d, float *vf, float *vl, /*FIXME*/void *alpha, /*FIXME*/void *beta, int * idxq, int * perm, /*FIXME*/void *givptr, int * givcol, int *ldgcol, float *givnum, int *ldgnum, float *poles, float *difl, float *difr, float *z, /*FIXME*/void *k, /*FIXME*/void *c, /*FIXME*/void *s, float *work, int * iwork, /*FIXME*/void *info); +static void (*slatrz_)(int *m, int *n, int *l, float *a, int *lda, float *tau, float *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd6K(JNIEnv *env, UNUSED jobject obj, - jint icompq, jint nl, jint nr, jint sqre, jfloatArray d, jint offsetd, jfloatArray vf, jint offsetvf, jfloatArray vl, jint offsetvl, jobject alpha, jobject beta, jintArray idxq, jint offsetidxq, jintArray perm, jint offsetperm, jobject givptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jfloatArray givnum, jint offsetgivnum, jint ldgnum, jfloatArray poles, jint offsetpoles, jfloatArray difl, jint offsetdifl, jfloatArray difr, jint offsetdifr, jfloatArray z, jint offsetz, jobject k, jobject c, jobject s, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatrzK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint l, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork) { + jboolean failed = FALSE; + float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + slatrz_(&m, &n, &l, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slasd7_)(int *icompq, int *nl, int *nr, int *sqre, /*FIXME*/void *k, float *d, float *z, float *zw, float *vf, float *vfw, float *vl, float *vlw, float *alpha, float *beta, float *dsigma, int * idx, int * idxp, int * idxq, int * perm, /*FIXME*/void *givptr, int * givcol, int *ldgcol, float *givnum, int *ldgnum, /*FIXME*/void *c, /*FIXME*/void *s, /*FIXME*/void *info); +static void (*slatzm_)(const char *side, int *m, int *n, float *v, int *incv, float *tau, float *c1, float *c2, int *Ldc, float *work); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd7K(JNIEnv *env, UNUSED jobject obj, - jint icompq, jint nl, jint nr, jint sqre, jobject k, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloatArray zw, jint offsetzw, jfloatArray vf, jint offsetvf, jfloatArray vfw, jint offsetvfw, jfloatArray vl, jint offsetvl, jfloatArray vlw, jint offsetvlw, jfloat alpha, jfloat beta, jfloatArray dsigma, jint offsetdsigma, jintArray idx, jint offsetidx, jintArray idxp, jint offsetidxp, jintArray idxq, jint offsetidxq, jintArray perm, jint offsetperm, jobject givptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jfloatArray givnum, jint offsetgivnum, jint ldgnum, jobject c, jobject s, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatzmK(JNIEnv *env, UNUSED jobject obj, jstring side, jint m, jint n, jfloatArray v, jint offsetv, jint incv, jfloat tau, jfloatArray c1, jint offsetc1, jfloatArray c2, jint offsetc2, jint Ldc, jfloatArray work, jint offsetwork) { + jboolean failed = FALSE; + const char *__nside = NULL; float *__nv = NULL; float *__nc1 = NULL; float *__nc2 = NULL; float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nc1 = (*env)->GetPrimitiveArrayCritical(env, c1, NULL))) goto fail; + if (!(__nc2 = (*env)->GetPrimitiveArrayCritical(env, c2, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + slatzm_(__nside, &m, &n, __nv + offsetv, &incv, &tau, __nc1 + offsetc1, __nc2 + offsetc2, &Ldc, __nwork + offsetwork); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc2) (*env)->ReleasePrimitiveArrayCritical(env, c2, __nc2, failed ? JNI_ABORT : 0); + if (__nc1) (*env)->ReleasePrimitiveArrayCritical(env, c1, __nc1, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slasd8_)(int *icompq, int *k, float *d, float *z, float *vf, float *vl, float *difl, float *difr, int *lddifr, float *dsigma, float *work, /*FIXME*/void *info); +static void (*slauu2_)(const char *uplo, int *n, float *a, int *lda, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd8K(JNIEnv *env, UNUSED jobject obj, - jint icompq, jint k, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloatArray vf, jint offsetvf, jfloatArray vl, jint offsetvl, jfloatArray difl, jint offsetdifl, jfloatArray difr, jint offsetdifr, jint lddifr, jfloatArray dsigma, jint offsetdsigma, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slauu2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + slauu2_(__nuplo, &n, __na + offseta, &lda, &__ninfo); +done: + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slasda_)(int *icompq, int *smlsiz, int *n, int *sqre, float *d, float *e, float *u, int *ldu, float *vt, int * k, float *difl, float *difr, float *z, float *poles, int * givptr, int * givcol, int *ldgcol, int * perm, float *givnum, float *c, float *s, float *work, int * iwork, /*FIXME*/void *info); +static void (*slauum_)(const char *uplo, int *n, float *a, int *lda, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasdaK(JNIEnv *env, UNUSED jobject obj, - jint icompq, jint smlsiz, jint n, jint sqre, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jintArray k, jint offsetk, jfloatArray difl, jint offsetdifl, jfloatArray difr, jint offsetdifr, jfloatArray z, jint offsetz, jfloatArray poles, jint offsetpoles, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jintArray perm, jint offsetperm, jfloatArray givnum, jint offsetgivnum, jfloatArray c, jint offsetc, jfloatArray s, jint offsets, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slauumK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + slauum_(__nuplo, &n, __na + offseta, &lda, &__ninfo); +done: + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slasdq_)(const char *uplo, int *sqre, int *n, int *ncvt, int *nru, int *ncc, float *d, float *e, float *vt, int *ldvt, float *u, int *ldu, float *c, int *Ldc, float *work, /*FIXME*/void *info); +static void (*sopgtr_)(const char *uplo, int *n, float *ap, float *tau, float *q, int *ldq, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasdqK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint sqre, jint n, jint ncvt, jint nru, jint ncc, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray vt, jint offsetvt, jint ldvt, jfloatArray u, jint offsetu, jint ldu, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sopgtrK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray tau, jint offsettau, jfloatArray q, jint offsetq, jint ldq, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; float *__ntau = NULL; float *__nq = NULL; float *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sopgtr_(__nuplo, &n, __nap + offsetap, __ntau + offsettau, __nq + offsetq, &ldq, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slasdt_)(int *n, /*FIXME*/void *lvl, /*FIXME*/void *nd, int * inode, int * ndiml, int * ndimr, int *msub); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasdtK(JNIEnv *env, UNUSED jobject obj, - jint n, jobject lvl, jobject nd, jintArray inode, jint offsetinode, jintArray ndiml, jint offsetndiml, jintArray ndimr, jint offsetndimr, jint msub) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sopmtr_)(const char *side, const char *uplo, const char *trans, int *m, int *n, float *ap, float *tau, float *c, int *Ldc, float *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sopmtrK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring uplo, jstring trans, jint m, jint n, jfloatArray ap, jint offsetap, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__nuplo = NULL; const char *__ntrans = NULL; int __ninfo = 0; float *__nap = NULL; float *__ntau = NULL; float *__nc = NULL; float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sopmtr_(__nside, __nuplo, __ntrans, &m, &n, __nap + offsetap, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slaset_)(const char *uplo, int *m, int *n, float *alpha, float *beta, float *a, int *lda); +static void (*sorg2l_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasetK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint m, jint n, jfloat alpha, jfloat beta, jfloatArray a, jint offseta, jint lda) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorg2lK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sorg2l_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slasq1_)(int *n, float *d, float *e, float *work, /*FIXME*/void *info); +static void (*sorg2r_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq1K(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorg2rK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sorg2r_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slasq2_)(int *n, float *z, /*FIXME*/void *info); +static void (*sorgbr_)(const char *vect, int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq2K(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray z, jint offsetz, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgbrK(JNIEnv *env, UNUSED jobject obj, jstring vect, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__nvect = NULL; int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; + if (!(__nvect = (*env)->GetStringUTFChars(env, vect, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sorgbr_(__nvect, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nvect) (*env)->ReleaseStringUTFChars(env, vect, __nvect); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slasq3_)(int *i0, /*FIXME*/void *n0, float *z, int *pp, /*FIXME*/void *dmin, /*FIXME*/void *sigma, /*FIXME*/void *desig, /*FIXME*/void *qmax, /*FIXME*/void *nfail, /*FIXME*/void *iter, /*FIXME*/void *ndiv, int *ieee); +static void (*sorghr_)(int *n, int *ilo, int *ihi, float *a, int *lda, float *tau, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq3K(JNIEnv *env, UNUSED jobject obj, - jint i0, jobject n0, jfloatArray z, jint offsetz, jint pp, jobject dmin, jobject sigma, jobject desig, jobject qmax, jobject nfail, jobject iter, jobject ndiv, jboolean ieee) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorghrK(JNIEnv *env, UNUSED jobject obj, jint n, jint ilo, jint ihi, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sorghr_(&n, &ilo, &ihi, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slasq4_)(int *i0, int *n0, float *z, int *pp, int *n0in, float *dmin, float *dmin1, float *dmin2, float *dn, float *dn1, float *dn2, /*FIXME*/void *tau, /*FIXME*/void *ttype); +static void (*sorgl2_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq4K(JNIEnv *env, UNUSED jobject obj, - jint i0, jint n0, jfloatArray z, jint offsetz, jint pp, jint n0in, jfloat dmin, jfloat dmin1, jfloat dmin2, jfloat dn, jfloat dn1, jfloat dn2, jobject tau, jobject ttype) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgl2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sorgl2_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slasq5_)(int *i0, int *n0, float *z, int *pp, float *tau, /*FIXME*/void *dmin, /*FIXME*/void *dmin1, /*FIXME*/void *dmin2, /*FIXME*/void *dn, /*FIXME*/void *dnm1, /*FIXME*/void *dnm2, int *ieee); +static void (*sorglq_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq5K(JNIEnv *env, UNUSED jobject obj, - jint i0, jint n0, jfloatArray z, jint offsetz, jint pp, jfloat tau, jobject dmin, jobject dmin1, jobject dmin2, jobject dn, jobject dnm1, jobject dnm2, jboolean ieee) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorglqK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sorglq_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slasq6_)(int *i0, int *n0, float *z, int *pp, /*FIXME*/void *dmin, /*FIXME*/void *dmin1, /*FIXME*/void *dmin2, /*FIXME*/void *dn, /*FIXME*/void *dnm1, /*FIXME*/void *dnm2); +static void (*sorgql_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq6K(JNIEnv *env, UNUSED jobject obj, - jint i0, jint n0, jfloatArray z, jint offsetz, jint pp, jobject dmin, jobject dmin1, jobject dmin2, jobject dn, jobject dnm1, jobject dnm2) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgqlK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sorgql_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slasr_)(char *side, char *pivot, char *direct, int *m, int *n, float *c, float *s, float *a, int *lda); +static void (*sorgqr_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasrK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring pivot, jstring direct, jint m, jint n, jfloatArray c, jint offsetc, jfloatArray s, jint offsets, jfloatArray a, jint offseta, jint lda) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgqrK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sorgqr_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slasrt_)(char *id, int *n, float *d, int *info); +static void (*sorgr2_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasrtK(JNIEnv *env, UNUSED jobject obj, - jstring id, jint n, jfloatArray d, jint offsetd, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgr2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sorgr2_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slassq_)(int *n, float *x, int *incx, /*FIXME*/void *scale, /*FIXME*/void *sumsq); +static void (*sorgrq_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slassqK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray x, jint offsetx, jint incx, jobject scale, jobject sumsq) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgrqK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sorgrq_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slasv2_)(float *f, float *g, float *h, /*FIXME*/void *ssmin, /*FIXME*/void *ssmax, /*FIXME*/void *snr, /*FIXME*/void *csr, /*FIXME*/void *snl, /*FIXME*/void *csl); +static void (*sorgtr_)(const char *uplo, int *n, float *a, int *lda, float *tau, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasv2K(JNIEnv *env, UNUSED jobject obj, - jfloat f, jfloat g, jfloat h, jobject ssmin, jobject ssmax, jobject snr, jobject csr, jobject snl, jobject csl) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgtrK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sorgtr_(__nuplo, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slaswp_)(int *n, float *a, int *lda, int *k1, int *k2, int * ipiv, int *incx); +static void (*sorm2l_)(const char *side, const char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaswpK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray a, jint offseta, jint lda, jint k1, jint k2, jintArray ipiv, jint offsetipiv, jint incx) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorm2lK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nc = NULL; float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sorm2l_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slasy2_)(int *ltranl, int *ltranr, int *isgn, int *n1, int *n2, float *tl, int *ldtl, float *tr, int *ldtr, float *b, int *ldb, /*FIXME*/void *scale, float *x, int *ldx, /*FIXME*/void *xnorm, /*FIXME*/void *info); +static void (*sorm2r_)(const char *side, const char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasy2K(JNIEnv *env, UNUSED jobject obj, - jboolean ltranl, jboolean ltranr, jint isgn, jint n1, jint n2, jfloatArray tl, jint offsettl, jint ldtl, jfloatArray tr, jint offsettr, jint ldtr, jfloatArray b, jint offsetb, jint ldb, jobject scale, jfloatArray x, jint offsetx, jint ldx, jobject xnorm, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorm2rK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nc = NULL; float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sorm2r_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slasyf_)(const char *uplo, int *n, int *nb, /*FIXME*/void *kb, float *a, int *lda, int * ipiv, float *w, int *ldw, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasyfK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint nb, jobject kb, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray w, jint offsetw, jint ldw, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sormbr_)(const char *vect, const char *side, const char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormbrK(JNIEnv *env, UNUSED jobject obj, jstring vect, jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__nvect = NULL; const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nc = NULL; float *__nwork = NULL; + if (!(__nvect = (*env)->GetStringUTFChars(env, vect, NULL))) goto fail; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sormbr_(__nvect, __nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (__nvect) (*env)->ReleaseStringUTFChars(env, vect, __nvect); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slatbs_)(const char *uplo, char *trans, char *diag, char *normin, int *n, int *kd, float *ab, int *ldab, float *x, /*FIXME*/void *scale, float *cnorm, int *info); +static void (*sormhr_)(const char *side, const char *trans, int *m, int *n, int *ilo, int *ihi, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatbsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring trans, jstring diag, jstring normin, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloatArray x, jint offsetx, jobject scale, jfloatArray cnorm, jint offsetcnorm, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormhrK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint ilo, jint ihi, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nc = NULL; float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sormhr_(__nside, __ntrans, &m, &n, &ilo, &ihi, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slatdf_)(int *ijob, int *n, float *z, int *ldz, float *rhs, /*FIXME*/void *rdsum, /*FIXME*/void *rdscal, int * ipiv, int * jpiv); +static void (*sorml2_)(const char *side, const char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatdfK(JNIEnv *env, UNUSED jobject obj, - jint ijob, jint n, jfloatArray z, jint offsetz, jint ldz, jfloatArray rhs, jint offsetrhs, jobject rdsum, jobject rdscal, jintArray ipiv, jint offsetipiv, jintArray jpiv, jint offsetjpiv) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorml2K(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nc = NULL; float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sorml2_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slatps_)(const char *uplo, char *trans, char *diag, char *normin, int *n, float *ap, float *x, /*FIXME*/void *scale, float *cnorm, /*FIXME*/void *info); +static void (*sormlq_)(const char *side, const char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatpsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring trans, jstring diag, jstring normin, jint n, jfloatArray ap, jint offsetap, jfloatArray x, jint offsetx, jobject scale, jfloatArray cnorm, jint offsetcnorm, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormlqK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nc = NULL; float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sormlq_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slatrd_)(const char *uplo, int *n, int *nb, float *a, int *lda, float *e, float *tau, float *w, int *ldw); +static void (*sormql_)(const char *side, const char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatrdK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint nb, jfloatArray a, jint offseta, jint lda, jfloatArray e, jint offsete, jfloatArray tau, jint offsettau, jfloatArray w, jint offsetw, jint ldw) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormqlK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nc = NULL; float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sormql_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slatrs_)(const char *uplo, char *trans, char *diag, char *normin, int *n, float *a, int *lda, float *x, /*FIXME*/void *scale, float *cnorm, /*FIXME*/void *info); +static void (*sormqr_)(const char *side, const char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatrsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring trans, jstring diag, jstring normin, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jobject scale, jfloatArray cnorm, jint offsetcnorm, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormqrK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nc = NULL; float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sormqr_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slatrz_)(int *m, int *n, int *l, float *a, int *lda, float *tau, float *work); +static void (*sormr2_)(const char *side, const char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatrzK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint l, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormr2K(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nc = NULL; float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sormr2_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slatzm_)(char *side, int *m, int *n, float *v, int *incv, float *tau, float *c11, float *c22, int *Ldc, float *work); +static void (*sormr3_)(const char *side, const char *trans, int *m, int *n, int *k, int *l, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatzmK(JNIEnv *env, UNUSED jobject obj, - jstring side, jint m, jint n, jfloatArray v, jint offsetv, jint incv, jfloat tau, jfloatArray c1, jint offsetc1, jfloatArray c2, jint offsetc2, jint Ldc, jfloatArray work, jint offsetwork) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormr3K(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jint l, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nc = NULL; float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sormr3_(__nside, __ntrans, &m, &n, &k, &l, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slauu2_)(const char *uplo, int *n, float *a, int *lda, /*FIXME*/void *info); +static void (*sormrq_)(const char *side, const char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slauu2K(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormrqK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nc = NULL; float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sormrq_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*slauum_)(const char *uplo, int *n, float *a, int *lda, int *info); +static void (*sormrz_)(const char *side, const char *trans, int *m, int *n, int *k, int *l, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slauumK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormrzK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jint l, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nc = NULL; float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sormrz_(__nside, __ntrans, &m, &n, &k, &l, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -// static void (*slazq3_)(int *i0, /*FIXME*/void *n0, float *z, int *pp, /*FIXME*/void *dmin, /*FIXME*/void *sigma, /*FIXME*/void *desig, /*FIXME*/void *qmax, /*FIXME*/void *nfail, /*FIXME*/void *iter, /*FIXME*/void *ndiv, int *ieee, /*FIXME*/void *ttype, /*FIXME*/void *dmin1, /*FIXME*/void *dmin2, /*FIXME*/void *dn, /*FIXME*/void *dn1, /*FIXME*/void *dn2, /*FIXME*/void *tau); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slazq3K(JNIEnv *env, UNUSED jobject obj, - jint i0, jobject n0, jfloatArray z, jint offsetz, jint pp, jobject dmin, jobject sigma, jobject desig, jobject qmax, jobject nfail, jobject iter, jobject ndiv, jboolean ieee, jobject ttype, jobject dmin1, jobject dmin2, jobject dn, jobject dn1, jobject dn2, jobject tau) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sormtr_)(const char *side, const char *uplo, const char *trans, int *m, int *n, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormtrK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring uplo, jstring trans, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__nuplo = NULL; const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nc = NULL; float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sormtr_(__nside, __nuplo, __ntrans, &m, &n, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -// static void (*slazq4_)(int *i0, int *n0, float *z, int *pp, int *n0in, float *dmin, float *dmin1, float *dmin2, float *dn, float *dn1, float *dn2, /*FIXME*/void *tau, /*FIXME*/void *ttype, /*FIXME*/void *g); +static void (*spbcon_)(const char *uplo, int *n, int *kd, float *ab, int *ldab, float *anorm, float *rcond, float *work, int *iwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slazq4K(JNIEnv *env, UNUSED jobject obj, - jint i0, jint n0, jfloatArray z, jint offsetz, jint pp, jint n0in, jfloat dmin, jfloat dmin1, jfloat dmin2, jfloat dn, jfloat dn1, jfloat dn2, jobject tau, jobject ttype, jobject g) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbconK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; float __nrcond = 0; int __ninfo = 0; float *__nab = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + spbcon_(__nuplo, &n, &kd, __nab + offsetab, &ldab, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sopgtr_)(const char *uplo, int *n, float *ap, float *tau, float *q, int *ldq, float *work, /*FIXME*/void *info); +static void (*spbequ_)(const char *uplo, int *n, int *kd, float *ab, int *ldab, float *s, float *scond, float *amax, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sopgtrK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray tau, jint offsettau, jfloatArray q, jint offsetq, jint ldq, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} - -static void (*sopmtr_)(char *side, const char *uplo, char *trans, int *m, int *n, float *ap, float *tau, float *c, int *Ldc, float *work, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sopmtrK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring uplo, jstring trans, jint m, jint n, jfloatArray ap, jint offsetap, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} - -static void (*sorg2l_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorg2lK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} - -static void (*sorg2r_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorg2rK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} - -static void (*sorgbr_)(char *vect, int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, int *lwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgbrK(JNIEnv *env, UNUSED jobject obj, - jstring vect, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} - -static void (*sorghr_)(int *n, int *ilo, int *ihi, float *a, int *lda, float *tau, float *work, int *lwork, int *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorghrK(JNIEnv *env, UNUSED jobject obj, - jint n, jint ilo, jint ihi, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} - -static void (*sorgl2_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgl2K(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbequK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloatArray s, jint offsets, jobject scond, jobject amax, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; float __nscond = 0; float __namax = 0; int __ninfo = 0; float *__nab = NULL; float *__ns = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nscond = (*env)->GetFloatField(env, scond, floatW_val_fieldID); + __namax = (*env)->GetFloatField(env, amax, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + spbequ_(__nuplo, &n, &kd, __nab + offsetab, &ldab, __ns + offsets, &__nscond, &__namax, &__ninfo); +done: + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, amax, floatW_val_fieldID, __namax); + if (!failed) (*env)->SetFloatField(env, scond, floatW_val_fieldID, __nscond); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sorglq_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, int *lwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorglqK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*spbrfs_)(const char *uplo, int *n, int *kd, int *nrhs, float *ab, int *ldab, float *afb, int *ldafb, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbrfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray afb, jint offsetafb, jint ldafb, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__nab = NULL; float *__nafb = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nafb = (*env)->GetPrimitiveArrayCritical(env, afb, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + spbrfs_(__nuplo, &n, &kd, &nrhs, __nab + offsetab, &ldab, __nafb + offsetafb, &ldafb, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nafb) (*env)->ReleasePrimitiveArrayCritical(env, afb, __nafb, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sorgql_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, int *lwork, /*FIXME*/void *info); +static void (*spbstf_)(const char *uplo, int *n, int *kd, float *ab, int *ldab, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgqlK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbstfK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__nab = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + spbstf_(__nuplo, &n, &kd, __nab + offsetab, &ldab, &__ninfo); +done: + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sorgqr_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, int *lwork, /*FIXME*/void *info); +static void (*spbsv_)(const char *uplo, int *n, int *kd, int *nrhs, float *ab, int *ldab, float *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgqrK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbsvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__nab = NULL; float *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + spbsv_(__nuplo, &n, &kd, &nrhs, __nab + offsetab, &ldab, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sorgr2_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgr2K(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*spbsvx_)(const char *fact, const char *uplo, int *n, int *kd, int *nrhs, float *ab, int *ldab, float *afb, int *ldafb, char *equed, float *s, float *b, int *ldb, float *x, int *ldx, float *rcond, float *ferr, float *berr, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbsvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring uplo, jint n, jint kd, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray afb, jint offsetafb, jint ldafb, jobject equed, jfloatArray s, jint offsets, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nfact = NULL; const char *__nuplo = NULL; char *__nequed = NULL; jstring __jequed = NULL;; float __nrcond = 0; int __ninfo = 0; float *__nab = NULL; float *__nafb = NULL; float *__ns = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; + __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nafb = (*env)->GetPrimitiveArrayCritical(env, afb, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + spbsvx_(__nfact, __nuplo, &n, &kd, &nrhs, __nab + offsetab, &ldab, __nafb + offsetafb, &ldafb, __nequed, __ns + offsets, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nafb) (*env)->ReleasePrimitiveArrayCritical(env, afb, __nafb, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sorgrq_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, int *lwork, /*FIXME*/void *info); +static void (*spbtf2_)(const char *uplo, int *n, int *kd, float *ab, int *ldab, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgrqK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbtf2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__nab = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + spbtf2_(__nuplo, &n, &kd, __nab + offsetab, &ldab, &__ninfo); +done: + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sorgtr_)(const char *uplo, int *n, float *a, int *lda, float *tau, float *work, int *lwork, /*FIXME*/void *info); +static void (*spbtrf_)(const char *uplo, int *n, int *kd, float *ab, int *ldab, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgtrK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbtrfK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__nab = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + spbtrf_(__nuplo, &n, &kd, __nab + offsetab, &ldab, &__ninfo); +done: + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sorm2l_)(char *side, char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, /*FIXME*/void *info); +static void (*spbtrs_)(const char *uplo, int *n, int *kd, int *nrhs, float *ab, int *ldab, float *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorm2lK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbtrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__nab = NULL; float *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + spbtrs_(__nuplo, &n, &kd, &nrhs, __nab + offsetab, &ldab, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sorm2r_)(char *side, char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, /*FIXME*/void *info); +static void (*spocon_)(const char *uplo, int *n, float *a, int *lda, float *anorm, float *rcond, float *work, int *iwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorm2rK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spoconK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; float __nrcond = 0; int __ninfo = 0; float *__na = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + spocon_(__nuplo, &n, __na + offseta, &lda, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sormbr_)(char *vect, char *side, char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, /*FIXME*/void *info); +static void (*spoequ_)(int *n, float *a, int *lda, float *s, float *scond, float *amax, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormbrK(JNIEnv *env, UNUSED jobject obj, - jstring vect, jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spoequK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray s, jint offsets, jobject scond, jobject amax, jobject info) { + jboolean failed = FALSE; + float __nscond = 0; float __namax = 0; int __ninfo = 0; float *__na = NULL; float *__ns = NULL; + __nscond = (*env)->GetFloatField(env, scond, floatW_val_fieldID); + __namax = (*env)->GetFloatField(env, amax, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + spoequ_(&n, __na + offseta, &lda, __ns + offsets, &__nscond, &__namax, &__ninfo); +done: + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, amax, floatW_val_fieldID, __namax); + if (!failed) (*env)->SetFloatField(env, scond, floatW_val_fieldID, __nscond); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sormhr_)(char *side, char *trans, int *m, int *n, int *ilo, int *ihi, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormhrK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring trans, jint m, jint n, jint ilo, jint ihi, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sporfs_)(const char *uplo, int *n, int *nrhs, float *a, int *lda, float *af, int *ldaf, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sporfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray af, jint offsetaf, jint ldaf, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; float *__naf = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + sporfs_(__nuplo, &n, &nrhs, __na + offseta, &lda, __naf + offsetaf, &ldaf, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sorml2_)(char *side, char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, /*FIXME*/void *info); +static void (*sposv_)(const char *uplo, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorml2K(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sposvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + sposv_(__nuplo, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sormlq_)(char *side, char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormlqK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sposvx_)(const char *fact, const char *uplo, int *n, int *nrhs, float *a, int *lda, float *af, int *ldaf, char *equed, float *s, float *b, int *ldb, float *x, int *ldx, float *rcond, float *ferr, float *berr, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sposvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray af, jint offsetaf, jint ldaf, jobject equed, jfloatArray s, jint offsets, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nfact = NULL; const char *__nuplo = NULL; char *__nequed = NULL; jstring __jequed = NULL;; float __nrcond = 0; int __ninfo = 0; float *__na = NULL; float *__naf = NULL; float *__ns = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; + __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + sposvx_(__nfact, __nuplo, &n, &nrhs, __na + offseta, &lda, __naf + offsetaf, &ldaf, __nequed, __ns + offsets, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sormql_)(char *side, char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, /*FIXME*/void *info); +static void (*spotf2_)(const char *uplo, int *n, float *a, int *lda, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormqlK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spotf2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + spotf2_(__nuplo, &n, __na + offseta, &lda, &__ninfo); +done: + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sormqr_)(char *side, char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, /*FIXME*/void *info); +static void (*spotrf_)(const char *uplo, int *n, float *a, int *lda, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormqrK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spotrfK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + spotrf_(__nuplo, &n, __na + offseta, &lda, &__ninfo); +done: + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sormr2_)(char *side, char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, /*FIXME*/void *info); +static void (*spotri_)(const char *uplo, int *n, float *a, int *lda, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormr2K(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spotriK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + spotri_(__nuplo, &n, __na + offseta, &lda, &__ninfo); +done: + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sormr3_)(char *side, char *trans, int *m, int *n, int *k, int *l, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *info); +static void (*spotrs_)(const char *uplo, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormr3K(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring trans, jint m, jint n, jint k, jint l, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spotrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + spotrs_(__nuplo, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sormrq_)(char *side, char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, /*FIXME*/void *info); +static void (*sppcon_)(const char *uplo, int *n, float *ap, float *anorm, float *rcond, float *work, int *iwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormrqK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sppconK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; float __nrcond = 0; int __ninfo = 0; float *__nap = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + sppcon_(__nuplo, &n, __nap + offsetap, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sormrz_)(char *side, char *trans, int *m, int *n, int *k, int *l, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, /*FIXME*/void *info); +static void (*sppequ_)(const char *uplo, int *n, float *ap, float *s, float *scond, float *amax, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormrzK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring trans, jint m, jint n, jint k, jint l, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sppequK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray s, jint offsets, jobject scond, jobject amax, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; float __nscond = 0; float __namax = 0; int __ninfo = 0; float *__nap = NULL; float *__ns = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nscond = (*env)->GetFloatField(env, scond, floatW_val_fieldID); + __namax = (*env)->GetFloatField(env, amax, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + sppequ_(__nuplo, &n, __nap + offsetap, __ns + offsets, &__nscond, &__namax, &__ninfo); +done: + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, amax, floatW_val_fieldID, __namax); + if (!failed) (*env)->SetFloatField(env, scond, floatW_val_fieldID, __nscond); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sormtr_)(char *side, const char *uplo, char *trans, int *m, int *n, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormtrK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring uplo, jstring trans, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*spprfs_)(const char *uplo, int *n, int *nrhs, float *ap, float *afp, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spprfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray afp, jint offsetafp, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; float *__nafp = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nafp = (*env)->GetPrimitiveArrayCritical(env, afp, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + spprfs_(__nuplo, &n, &nrhs, __nap + offsetap, __nafp + offsetafp, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nafp) (*env)->ReleasePrimitiveArrayCritical(env, afp, __nafp, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*spbcon_)(const char *uplo, int *n, int *kd, float *ab, int *ldab, float *anorm, /*FIXME*/void *rcond, float *work, int * iwork, /*FIXME*/void *info); +static void (*sppsv_)(const char *uplo, int *n, int *nrhs, float *ap, float *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbconK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sppsvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; float *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + sppsv_(__nuplo, &n, &nrhs, __nap + offsetap, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*spbequ_)(const char *uplo, int *n, int *kd, float *ab, int *ldab, float *s, /*FIXME*/void *scond, /*FIXME*/void *amax, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbequK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloatArray s, jint offsets, jobject scond, jobject amax, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sppsvx_)(const char *fact, const char *uplo, int *n, int *nrhs, float *ap, float *afp, char *equed, float *s, float *b, int *ldb, float *x, int *ldx, float *rcond, float *ferr, float *berr, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sppsvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray afp, jint offsetafp, jobject equed, jfloatArray s, jint offsets, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nfact = NULL; const char *__nuplo = NULL; char *__nequed = NULL; jstring __jequed = NULL;; float __nrcond = 0; int __ninfo = 0; float *__nap = NULL; float *__nafp = NULL; float *__ns = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; + __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nafp = (*env)->GetPrimitiveArrayCritical(env, afp, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + sppsvx_(__nfact, __nuplo, &n, &nrhs, __nap + offsetap, __nafp + offsetafp, __nequed, __ns + offsets, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nafp) (*env)->ReleasePrimitiveArrayCritical(env, afp, __nafp, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*spbrfs_)(const char *uplo, int *n, int *kd, int *nrhs, float *ab, int *ldab, float *afb, int *ldafb, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int * iwork, int *info); +static void (*spptrf_)(const char *uplo, int *n, float *ap, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbrfsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint kd, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray afb, jint offsetafb, jint ldafb, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spptrfK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray ap, jint offsetap, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + spptrf_(__nuplo, &n, __nap + offsetap, &__ninfo); +done: + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*spbstf_)(const char *uplo, int *n, int *kd, float *ab, int *ldab, int *info); +static void (*spptri_)(const char *uplo, int *n, float *ap, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbstfK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spptriK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray ap, jint offsetap, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + spptri_(__nuplo, &n, __nap + offsetap, &__ninfo); +done: + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*spbsv_)(const char *uplo, int *n, int *kd, int *nrhs, float *ab, int *ldab, float *b, int *ldb, /*FIXME*/void *info); +static void (*spptrs_)(const char *uplo, int *n, int *nrhs, float *ap, float *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbsvK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint kd, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spptrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; float *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + spptrs_(__nuplo, &n, &nrhs, __nap + offsetap, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*spbsvx_)(char *fact, const char *uplo, int *n, int *kd, int *nrhs, float *ab, int *ldab, float *afb, int *ldafb, jstring *equed, float *s, float *b, int *ldb, float *x, int *ldx, /*FIXME*/void *rcond, float *ferr, float *berr, float *work, int * iwork, /*FIXME*/void *info); +static void (*sptcon_)(int *n, float *d, float *e, float *anorm, float *rcond, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbsvxK(JNIEnv *env, UNUSED jobject obj, - jstring fact, jstring uplo, jint n, jint kd, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray afb, jint offsetafb, jint ldafb, jobject equed, jfloatArray s, jint offsets, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sptconK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + float __nrcond = 0; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nwork = NULL; + __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sptcon_(&n, __nd + offsetd, __ne + offsete, &anorm, &__nrcond, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*spbtf2_)(const char *uplo, int *n, int *kd, float *ab, int *ldab, /*FIXME*/void *info); +static void (*spteqr_)(const char *compz, int *n, float *d, float *e, float *z, int *ldz, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbtf2K(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spteqrK(JNIEnv *env, UNUSED jobject obj, jstring compz, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__ncompz = NULL; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nz = NULL; float *__nwork = NULL; + if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + spteqr_(__ncompz, &n, __nd + offsetd, __ne + offsete, __nz + offsetz, &ldz, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ncompz) (*env)->ReleaseStringUTFChars(env, compz, __ncompz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*spbtrf_)(const char *uplo, int *n, int *kd, float *ab, int *ldab, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbtrfK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sptrfs_)(int *n, int *nrhs, float *d, float *e, float *df, float *ef, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sptrfsK(JNIEnv *env, UNUSED jobject obj, jint n, jint nrhs, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray df, jint offsetdf, jfloatArray ef, jint offsetef, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__ndf = NULL; float *__nef = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__ndf = (*env)->GetPrimitiveArrayCritical(env, df, NULL))) goto fail; + if (!(__nef = (*env)->GetPrimitiveArrayCritical(env, ef, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sptrfs_(&n, &nrhs, __nd + offsetd, __ne + offsete, __ndf + offsetdf, __nef + offsetef, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nef) (*env)->ReleasePrimitiveArrayCritical(env, ef, __nef, failed ? JNI_ABORT : 0); + if (__ndf) (*env)->ReleasePrimitiveArrayCritical(env, df, __ndf, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*spbtrs_)(const char *uplo, int *n, int *kd, int *nrhs, float *ab, int *ldab, float *b, int *ldb, /*FIXME*/void *info); +static void (*sptsv_)(int *n, int *nrhs, float *d, float *e, float *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbtrsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint kd, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sptsvK(JNIEnv *env, UNUSED jobject obj, jint n, jint nrhs, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nb = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + sptsv_(&n, &nrhs, __nd + offsetd, __ne + offsete, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*spocon_)(const char *uplo, int *n, float *a, int *lda, float *anorm, /*FIXME*/void *rcond, float *work, int *iwork, int *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spoconK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sptsvx_)(const char *fact, int *n, int *nrhs, float *d, float *e, float *df, float *ef, float *b, int *ldb, float *x, int *ldx, float *rcond, float *ferr, float *berr, float *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sptsvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jint n, jint nrhs, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray df, jint offsetdf, jfloatArray ef, jint offsetef, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nfact = NULL; float __nrcond = 0; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__ndf = NULL; float *__nef = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; + __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__ndf = (*env)->GetPrimitiveArrayCritical(env, df, NULL))) goto fail; + if (!(__nef = (*env)->GetPrimitiveArrayCritical(env, ef, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sptsvx_(__nfact, &n, &nrhs, __nd + offsetd, __ne + offsete, __ndf + offsetdf, __nef + offsetef, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nef) (*env)->ReleasePrimitiveArrayCritical(env, ef, __nef, failed ? JNI_ABORT : 0); + if (__ndf) (*env)->ReleasePrimitiveArrayCritical(env, df, __ndf, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*spoequ_)(int *n, float *a, int *lda, float *s, /*FIXME*/void *scond, /*FIXME*/void *amax, int *info); +static void (*spttrf_)(int *n, float *d, float *e, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spoequK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray a, jint offseta, jint lda, jfloatArray s, jint offsets, jobject scond, jobject amax, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spttrfK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + spttrf_(&n, __nd + offsetd, __ne + offsete, &__ninfo); +done: + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sporfs_)(const char *uplo, int *n, int *nrhs, float *a, int *lda, float *af, int *ldaf, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int * iwork, /*FIXME*/void *info); +static void (*spttrs_)(int *n, int *nrhs, float *d, float *e, float *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sporfsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray af, jint offsetaf, jint ldaf, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_spttrsK(JNIEnv *env, UNUSED jobject obj, jint n, jint nrhs, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nb = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + spttrs_(&n, &nrhs, __nd + offsetd, __ne + offsete, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sposv_)(const char *uplo, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, /*FIXME*/void *info); +static void (*sptts2_)(int *n, int *nrhs, float *d, float *e, float *b, int *ldb); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sposvK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sptts2K(JNIEnv *env, UNUSED jobject obj, jint n, jint nrhs, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray b, jint offsetb, jint ldb) { + jboolean failed = FALSE; + float *__nd = NULL; float *__ne = NULL; float *__nb = NULL; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + sptts2_(&n, &nrhs, __nd + offsetd, __ne + offsete, __nb + offsetb, &ldb); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sposvx_)(char *fact, const char *uplo, int *n, int *nrhs, float *a, int *lda, float *af, int *ldaf, jstring *equed, float *s, float *b, int *ldb, float *x, int *ldx, /*FIXME*/void *rcond, float *ferr, float *berr, float *work, int *iwork, int *info); +static void (*srscl_)(int *n, float *sa, float *sx, int *incx); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sposvxK(JNIEnv *env, UNUSED jobject obj, - jstring fact, jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray af, jint offsetaf, jint ldaf, jobject equed, jfloatArray s, jint offsets, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_srsclK(JNIEnv *env, UNUSED jobject obj, jint n, jfloat sa, jfloatArray sx, jint offsetsx, jint incx) { + jboolean failed = FALSE; + float *__nsx = NULL; + if (!(__nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto fail; + srscl_(&n, &sa, __nsx + offsetsx, &incx); +done: + if (__nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, __nsx, failed ? JNI_ABORT : 0); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*spotf2_)(const char *uplo, int *n, float *a, int *lda, int *info); +static void (*ssbev_)(const char *jobz, const char *uplo, int *n, int *kd, float *ab, int *ldab, float *w, float *z, int *ldz, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spotf2K(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbevK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; float *__nab = NULL; float *__nw = NULL; float *__nz = NULL; float *__nwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + ssbev_(__njobz, __nuplo, &n, &kd, __nab + offsetab, &ldab, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*spotrf_)(const char *uplo, int *n, float *a, int *lda, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spotrfK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*ssbevd_)(const char *jobz, const char *uplo, int *n, int *kd, float *ab, int *ldab, float *w, float *z, int *ldz, float *work, int *lwork, int *iwork, int *liwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbevdK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; float *__nab = NULL; float *__nw = NULL; float *__nz = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + ssbevd_(__njobz, __nuplo, &n, &kd, __nab + offsetab, &ldab, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*spotri_)(const char *uplo, int *n, float *a, int *lda, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spotriK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*ssbevx_)(const char *jobz, const char *range, const char *uplo, int *n, int *kd, float *ab, int *ldab, float *q, int *ldq, float *vl, float *vu, int *il, int *iu, float *abstol, int *m, float *w, float *z, int *ldz, float *work, int *iwork, int *ifail, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbevxK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloatArray q, jint offsetq, jint ldq, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nrange = NULL; const char *__nuplo = NULL; int __nm = 0; int __ninfo = 0; float *__nab = NULL; float *__nq = NULL; float *__nw = NULL; float *__nz = NULL; float *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + ssbevx_(__njobz, __nrange, __nuplo, &n, &kd, __nab + offsetab, &ldab, __nq + offsetq, &ldq, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); +done: + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*spotrs_)(const char *uplo, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, /*FIXME*/void *info); +static void (*ssbgst_)(const char *vect, const char *uplo, int *n, int *ka, int *kb, float *ab, int *ldab, float *bb, int *ldbb, float *x, int *ldx, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spotrsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbgstK(JNIEnv *env, UNUSED jobject obj, jstring vect, jstring uplo, jint n, jint ka, jint kb, jfloatArray ab, jint offsetab, jint ldab, jfloatArray bb, jint offsetbb, jint ldbb, jfloatArray x, jint offsetx, jint ldx, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nvect = NULL; const char *__nuplo = NULL; int __ninfo = 0; float *__nab = NULL; float *__nbb = NULL; float *__nx = NULL; float *__nwork = NULL; + if (!(__nvect = (*env)->GetStringUTFChars(env, vect, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nbb = (*env)->GetPrimitiveArrayCritical(env, bb, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + ssbgst_(__nvect, __nuplo, &n, &ka, &kb, __nab + offsetab, &ldab, __nbb + offsetbb, &ldbb, __nx + offsetx, &ldx, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nbb) (*env)->ReleasePrimitiveArrayCritical(env, bb, __nbb, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nvect) (*env)->ReleaseStringUTFChars(env, vect, __nvect); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sppcon_)(const char *uplo, int *n, float *ap, float *anorm, /*FIXME*/void *rcond, float *work, int * iwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sppconK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*ssbgv_)(const char *jobz, const char *uplo, int *n, int *ka, int *kb, float *ab, int *ldab, float *bb, int *ldbb, float *w, float *z, int *ldz, float *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbgvK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jint ka, jint kb, jfloatArray ab, jint offsetab, jint ldab, jfloatArray bb, jint offsetbb, jint ldbb, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; float *__nab = NULL; float *__nbb = NULL; float *__nw = NULL; float *__nz = NULL; float *__nwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nbb = (*env)->GetPrimitiveArrayCritical(env, bb, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + ssbgv_(__njobz, __nuplo, &n, &ka, &kb, __nab + offsetab, &ldab, __nbb + offsetbb, &ldbb, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nbb) (*env)->ReleasePrimitiveArrayCritical(env, bb, __nbb, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sppequ_)(const char *uplo, int *n, float *ap, float *s, /*FIXME*/void *scond, /*FIXME*/void *amax, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sppequK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray s, jint offsets, jobject scond, jobject amax, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*ssbgvd_)(const char *jobz, const char *uplo, int *n, int *ka, int *kb, float *ab, int *ldab, float *bb, int *ldbb, float *w, float *z, int *ldz, float *work, int *lwork, int *iwork, int *liwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbgvdK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jint ka, jint kb, jfloatArray ab, jint offsetab, jint ldab, jfloatArray bb, jint offsetbb, jint ldbb, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; float *__nab = NULL; float *__nbb = NULL; float *__nw = NULL; float *__nz = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nbb = (*env)->GetPrimitiveArrayCritical(env, bb, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + ssbgvd_(__njobz, __nuplo, &n, &ka, &kb, __nab + offsetab, &ldab, __nbb + offsetbb, &ldbb, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nbb) (*env)->ReleasePrimitiveArrayCritical(env, bb, __nbb, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*spprfs_)(const char *uplo, int *n, int *nrhs, float *ap, float *afp, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int * iwork, int *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spprfsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray afp, jint offsetafp, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*ssbgvx_)(const char *jobz, const char *range, const char *uplo, int *n, int *ka, int *kb, float *ab, int *ldab, float *bb, int *ldbb, float *q, int *ldq, float *vl, float *vu, int *il, int *iu, float *abstol, int *m, float *w, float *z, int *ldz, float *work, int *iwork, int *ifail, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbgvxK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jstring uplo, jint n, jint ka, jint kb, jfloatArray ab, jint offsetab, jint ldab, jfloatArray bb, jint offsetbb, jint ldbb, jfloatArray q, jint offsetq, jint ldq, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nrange = NULL; const char *__nuplo = NULL; int __nm = 0; int __ninfo = 0; float *__nab = NULL; float *__nbb = NULL; float *__nq = NULL; float *__nw = NULL; float *__nz = NULL; float *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nbb = (*env)->GetPrimitiveArrayCritical(env, bb, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + ssbgvx_(__njobz, __nrange, __nuplo, &n, &ka, &kb, __nab + offsetab, &ldab, __nbb + offsetbb, &ldbb, __nq + offsetq, &ldq, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); +done: + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nbb) (*env)->ReleasePrimitiveArrayCritical(env, bb, __nbb, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sppsv_)(const char *uplo, int *n, int *nrhs, float *ap, float *b, int *ldb, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sppsvK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*ssbtrd_)(const char *vect, const char *uplo, int *n, int *kd, float *ab, int *ldab, float *d, float *e, float *q, int *ldq, float *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbtrdK(JNIEnv *env, UNUSED jobject obj, jstring vect, jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray q, jint offsetq, jint ldq, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nvect = NULL; const char *__nuplo = NULL; int __ninfo = 0; float *__nab = NULL; float *__nd = NULL; float *__ne = NULL; float *__nq = NULL; float *__nwork = NULL; + if (!(__nvect = (*env)->GetStringUTFChars(env, vect, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + ssbtrd_(__nvect, __nuplo, &n, &kd, __nab + offsetab, &ldab, __nd + offsetd, __ne + offsete, __nq + offsetq, &ldq, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nvect) (*env)->ReleaseStringUTFChars(env, vect, __nvect); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sppsvx_)(char *fact, const char *uplo, int *n, int *nrhs, float *ap, float *afp, jstring *equed, float *s, float *b, int *ldb, float *x, int *ldx, /*FIXME*/void *rcond, float *ferr, float *berr, float *work, int * iwork, /*FIXME*/void *info); +static void (*sspcon_)(const char *uplo, int *n, float *ap, int *ipiv, float *anorm, float *rcond, float *work, int *iwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sppsvxK(JNIEnv *env, UNUSED jobject obj, - jstring fact, jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray afp, jint offsetafp, jobject equed, jfloatArray s, jint offsets, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspconK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; float __nrcond = 0; int __ninfo = 0; float *__nap = NULL; int *__nipiv = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + sspcon_(__nuplo, &n, __nap + offsetap, __nipiv + offsetipiv, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*spptrf_)(const char *uplo, int *n, float *ap, int *info); +static void (*sspev_)(const char *jobz, const char *uplo, int *n, float *ap, float *w, float *z, int *ldz, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spptrfK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jfloatArray ap, jint offsetap, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspevK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; float *__nw = NULL; float *__nz = NULL; float *__nwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sspev_(__njobz, __nuplo, &n, __nap + offsetap, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*spptri_)(const char *uplo, int *n, float *ap, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spptriK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jfloatArray ap, jint offsetap, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sspevd_)(const char *jobz, const char *uplo, int *n, float *ap, float *w, float *z, int *ldz, float *work, int *lwork, int *iwork, int *liwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspevdK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; float *__nw = NULL; float *__nz = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + sspevd_(__njobz, __nuplo, &n, __nap + offsetap, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*spptrs_)(const char *uplo, int *n, int *nrhs, float *ap, float *b, int *ldb, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spptrsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sspevx_)(const char *jobz, const char *range, const char *uplo, int *n, float *ap, float *vl, float *vu, int *il, int *iu, float *abstol, int *m, float *w, float *z, int *ldz, float *work, int *iwork, int *ifail, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspevxK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nrange = NULL; const char *__nuplo = NULL; int __nm = 0; int __ninfo = 0; float *__nap = NULL; float *__nw = NULL; float *__nz = NULL; float *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + sspevx_(__njobz, __nrange, __nuplo, &n, __nap + offsetap, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); +done: + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sptcon_)(int *n, float *d, float *e, float *anorm, /*FIXME*/void *rcond, float *work, /*FIXME*/void *info); +static void (*sspgst_)(int *itype, const char *uplo, int *n, float *ap, float *bp, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sptconK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspgstK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray bp, jint offsetbp, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; float *__nbp = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nbp = (*env)->GetPrimitiveArrayCritical(env, bp, NULL))) goto fail; + sspgst_(&itype, __nuplo, &n, __nap + offsetap, __nbp + offsetbp, &__ninfo); +done: + if (__nbp) (*env)->ReleasePrimitiveArrayCritical(env, bp, __nbp, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*spteqr_)(char *compz, int *n, float *d, float *e, float *z, int *ldz, float *work, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spteqrK(JNIEnv *env, UNUSED jobject obj, - jstring compz, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sspgv_)(int *itype, const char *jobz, const char *uplo, int *n, float *ap, float *bp, float *w, float *z, int *ldz, float *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspgvK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring jobz, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray bp, jint offsetbp, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; float *__nbp = NULL; float *__nw = NULL; float *__nz = NULL; float *__nwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nbp = (*env)->GetPrimitiveArrayCritical(env, bp, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sspgv_(&itype, __njobz, __nuplo, &n, __nap + offsetap, __nbp + offsetbp, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nbp) (*env)->ReleasePrimitiveArrayCritical(env, bp, __nbp, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sptrfs_)(int *n, int *nrhs, float *d, float *e, float *df, float *ef, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sptrfsK(JNIEnv *env, UNUSED jobject obj, - jint n, jint nrhs, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray df, jint offsetdf, jfloatArray ef, jint offsetef, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sspgvd_)(int *itype, const char *jobz, const char *uplo, int *n, float *ap, float *bp, float *w, float *z, int *ldz, float *work, int *lwork, int *iwork, int *liwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspgvdK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring jobz, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray bp, jint offsetbp, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; float *__nbp = NULL; float *__nw = NULL; float *__nz = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nbp = (*env)->GetPrimitiveArrayCritical(env, bp, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + sspgvd_(&itype, __njobz, __nuplo, &n, __nap + offsetap, __nbp + offsetbp, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nbp) (*env)->ReleasePrimitiveArrayCritical(env, bp, __nbp, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sptsv_)(int *n, int *nrhs, float *d, float *e, float *b, int *ldb, int *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sptsvK(JNIEnv *env, UNUSED jobject obj, - jint n, jint nrhs, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sspgvx_)(int *itype, const char *jobz, const char *range, const char *uplo, int *n, float *ap, float *bp, float *vl, float *vu, int *il, int *iu, float *abstol, int *m, float *w, float *z, int *ldz, float *work, int *iwork, int *ifail, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspgvxK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring jobz, jstring range, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray bp, jint offsetbp, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nrange = NULL; const char *__nuplo = NULL; int __nm = 0; int __ninfo = 0; float *__nap = NULL; float *__nbp = NULL; float *__nw = NULL; float *__nz = NULL; float *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nbp = (*env)->GetPrimitiveArrayCritical(env, bp, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + sspgvx_(&itype, __njobz, __nrange, __nuplo, &n, __nap + offsetap, __nbp + offsetbp, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); +done: + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nbp) (*env)->ReleasePrimitiveArrayCritical(env, bp, __nbp, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sptsvx_)(char *fact, int *n, int *nrhs, float *d, float *e, float *df, float *ef, float *b, int *ldb, float *x, int *ldx, /*FIXME*/void *rcond, float *ferr, float *berr, float *work, int *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sptsvxK(JNIEnv *env, UNUSED jobject obj, - jstring fact, jint n, jint nrhs, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray df, jint offsetdf, jfloatArray ef, jint offsetef, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*ssprfs_)(const char *uplo, int *n, int *nrhs, float *ap, float *afp, int *ipiv, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssprfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray afp, jint offsetafp, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; float *__nafp = NULL; int *__nipiv = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nafp = (*env)->GetPrimitiveArrayCritical(env, afp, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + ssprfs_(__nuplo, &n, &nrhs, __nap + offsetap, __nafp + offsetafp, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nafp) (*env)->ReleasePrimitiveArrayCritical(env, afp, __nafp, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*spttrf_)(int *n, float *d, float *e, /*FIXME*/void *info); +static void (*sspsv_)(const char *uplo, int *n, int *nrhs, float *ap, int *ipiv, float *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spttrfK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspsvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; int *__nipiv = NULL; float *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + sspsv_(__nuplo, &n, &nrhs, __nap + offsetap, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*spttrs_)(int *n, int *nrhs, float *d, float *e, float *b, int *ldb, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_spttrsK(JNIEnv *env, UNUSED jobject obj, - jint n, jint nrhs, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sspsvx_)(const char *fact, const char *uplo, int *n, int *nrhs, float *ap, float *afp, int *ipiv, float *b, int *ldb, float *x, int *ldx, float *rcond, float *ferr, float *berr, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspsvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray afp, jint offsetafp, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nfact = NULL; const char *__nuplo = NULL; float __nrcond = 0; int __ninfo = 0; float *__nap = NULL; float *__nafp = NULL; int *__nipiv = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nafp = (*env)->GetPrimitiveArrayCritical(env, afp, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + sspsvx_(__nfact, __nuplo, &n, &nrhs, __nap + offsetap, __nafp + offsetafp, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nafp) (*env)->ReleasePrimitiveArrayCritical(env, afp, __nafp, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sptts2_)(int *n, int *nrhs, float *d, float *e, float *b, int *ldb); +static void (*ssptrd_)(const char *uplo, int *n, float *ap, float *d, float *e, float *tau, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sptts2K(JNIEnv *env, UNUSED jobject obj, - jint n, jint nrhs, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray b, jint offsetb, jint ldb) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssptrdK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray tau, jint offsettau, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; float *__nd = NULL; float *__ne = NULL; float *__ntau = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + ssptrd_(__nuplo, &n, __nap + offsetap, __nd + offsetd, __ne + offsete, __ntau + offsettau, &__ninfo); +done: + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*srscl_)(int *n, float *sa, float *sx, int *incx); +static void (*ssptrf_)(const char *uplo, int *n, float *ap, int *ipiv, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_srsclK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloat sa, jfloatArray sx, jint offsetsx, jint incx) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssptrfK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; int *__nipiv = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + ssptrf_(__nuplo, &n, __nap + offsetap, __nipiv + offsetipiv, &__ninfo); +done: + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssbev_)(char *jobz, const char *uplo, int *n, int *kd, float *ab, int *ldab, float *w, float *z, int *ldz, float *work, /*FIXME*/void *info); +static void (*ssptri_)(const char *uplo, int *n, float *ap, int *ipiv, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbevK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssptriK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; int *__nipiv = NULL; float *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + ssptri_(__nuplo, &n, __nap + offsetap, __nipiv + offsetipiv, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssbevd_)(char *jobz, const char *uplo, int *n, int *kd, float *ab, int *ldab, float *w, float *z, int *ldz, float *work, int *lwork, int *iwork, int *liwork, int *info); +static void (*ssptrs_)(const char *uplo, int *n, int *nrhs, float *ap, int *ipiv, float *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbevdK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssptrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; int *__nipiv = NULL; float *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + ssptrs_(__nuplo, &n, &nrhs, __nap + offsetap, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssbevx_)(char *jobz, char *range, const char *uplo, int *n, int *kd, float *ab, int *ldab, float *q, int *ldq, float *vl, float *vu, int *il, int *iu, float *abstol, /*FIXME*/void *m, float *w, float *z, int *ldz, float *work, int *iwork, int *ifail, int *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbevxK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring range, jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloatArray q, jint offsetq, jint ldq, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sstebz_)(const char *range, const char *order, int *n, float *vl, float *vu, int *il, int *iu, float *abstol, float *d, float *e, int *m, int *nsplit, float *w, int *iblock, int *isplit, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstebzK(JNIEnv *env, UNUSED jobject obj, jstring range, jstring order, jint n, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jobject m, jobject nsplit, jfloatArray w, jint offsetw, jintArray iblock, jint offsetiblock, jintArray isplit, jint offsetisplit, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nrange = NULL; const char *__norder = NULL; int __nm = 0; int __nnsplit = 0; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nw = NULL; int *__niblock = NULL; int *__nisplit = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + if (!(__norder = (*env)->GetStringUTFChars(env, order, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __nnsplit = (*env)->GetIntField(env, nsplit, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__niblock = (*env)->GetPrimitiveArrayCritical(env, iblock, NULL))) goto fail; + if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + sstebz_(__nrange, __norder, &n, &vl, &vu, &il, &iu, &abstol, __nd + offsetd, __ne + offsete, &__nm, &__nnsplit, __nw + offsetw, __niblock + offsetiblock, __nisplit + offsetisplit, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, failed ? JNI_ABORT : 0); + if (__niblock) (*env)->ReleasePrimitiveArrayCritical(env, iblock, __niblock, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, nsplit, intW_val_fieldID, __nnsplit); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__norder) (*env)->ReleaseStringUTFChars(env, order, __norder); + if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssbgst_)(char *vect, const char *uplo, int *n, int *ka, int *kb, float *ab, int *ldab, float *bb, int *ldbb, float *x, int *ldx, float *work, /*FIXME*/void *info); +static void (*sstedc_)(const char *compz, int *n, float *d, float *e, float *z, int *ldz, float *work, int *lwork, int *iwork, int *liwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbgstK(JNIEnv *env, UNUSED jobject obj, - jstring vect, jstring uplo, jint n, jint ka, jint kb, jfloatArray ab, jint offsetab, jint ldab, jfloatArray bb, jint offsetbb, jint ldbb, jfloatArray x, jint offsetx, jint ldx, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstedcK(JNIEnv *env, UNUSED jobject obj, jstring compz, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + jboolean failed = FALSE; + const char *__ncompz = NULL; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nz = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + sstedc_(__ncompz, &n, __nd + offsetd, __ne + offsete, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ncompz) (*env)->ReleaseStringUTFChars(env, compz, __ncompz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssbgv_)(char *jobz, const char *uplo, int *n, int *ka, int *kb, float *ab, int *ldab, float *bb, int *ldbb, float *w, float *z, int *ldz, float *work, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbgvK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring uplo, jint n, jint ka, jint kb, jfloatArray ab, jint offsetab, jint ldab, jfloatArray bb, jint offsetbb, jint ldbb, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sstegr_)(const char *jobz, const char *range, int *n, float *d, float *e, float *vl, float *vu, int *il, int *iu, float *abstol, int *m, float *w, float *z, int *ldz, int *isuppz, float *work, int *lwork, int *iwork, int *liwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstegrK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nrange = NULL; int __nm = 0; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nw = NULL; float *__nz = NULL; int *__nisuppz = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + sstegr_(__njobz, __nrange, &n, __nd + offsetd, __ne + offsete, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nisuppz + offsetisuppz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssbgvd_)(char *jobz, const char *uplo, int *n, int *ka, int *kb, float *ab, int *ldab, float *bb, int *ldbb, float *w, float *z, int *ldz, float *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbgvdK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring uplo, jint n, jint ka, jint kb, jfloatArray ab, jint offsetab, jint ldab, jfloatArray bb, jint offsetbb, jint ldbb, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sstein_)(int *n, float *d, float *e, int *m, float *w, int *iblock, int *isplit, float *z, int *ldz, float *work, int *iwork, int *ifail, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssteinK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jint m, jfloatArray w, jint offsetw, jintArray iblock, jint offsetiblock, jintArray isplit, jint offsetisplit, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nw = NULL; int *__niblock = NULL; int *__nisplit = NULL; float *__nz = NULL; float *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__niblock = (*env)->GetPrimitiveArrayCritical(env, iblock, NULL))) goto fail; + if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + sstein_(&n, __nd + offsetd, __ne + offsete, &m, __nw + offsetw, __niblock + offsetiblock, __nisplit + offsetisplit, __nz + offsetz, &ldz, __nwork + offsetwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); +done: + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, failed ? JNI_ABORT : 0); + if (__niblock) (*env)->ReleasePrimitiveArrayCritical(env, iblock, __niblock, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssbgvx_)(char *jobz, char *range, const char *uplo, int *n, int *ka, int *kb, float *ab, int *ldab, float *bb, int *ldbb, float *q, int *ldq, float *vl, float *vu, int *il, int *iu, float *abstol, /*FIXME*/void *m, float *w, float *z, int *ldz, float *work, int * iwork, int * ifail, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbgvxK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring range, jstring uplo, jint n, jint ka, jint kb, jfloatArray ab, jint offsetab, jint ldab, jfloatArray bb, jint offsetbb, jint ldbb, jfloatArray q, jint offsetq, jint ldq, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sstemr_)(const char *jobz, const char *range, int *n, float *d, float *e, float *vl, float *vu, int *il, int *iu, int *m, float *w, float *z, int *ldz, int *nzc, int *isuppz, int *tryrac, float *work, int *lwork, int *iwork, int *liwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstemrK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloat vl, jfloat vu, jint il, jint iu, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jint nzc, jintArray isuppz, jint offsetisuppz, jobject tryrac, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nrange = NULL; int __nm = 0; int __ntryrac = 0; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nw = NULL; float *__nz = NULL; int *__nisuppz = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ntryrac = (*env)->GetBooleanField(env, tryrac, booleanW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + sstemr_(__njobz, __nrange, &n, __nd + offsetd, __ne + offsete, &vl, &vu, &il, &iu, &__nm, __nw + offsetw, __nz + offsetz, &ldz, &nzc, __nisuppz + offsetisuppz, &__ntryrac, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetBooleanField(env, tryrac, booleanW_val_fieldID, __ntryrac); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssbtrd_)(char *vect, const char *uplo, int *n, int *kd, float *ab, int *ldab, float *d, float *e, float *q, int *ldq, float *work, int *info); +static void (*ssteqr_)(const char *compz, int *n, float *d, float *e, float *z, int *ldz, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbtrdK(JNIEnv *env, UNUSED jobject obj, - jstring vect, jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray q, jint offsetq, jint ldq, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssteqrK(JNIEnv *env, UNUSED jobject obj, jstring compz, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__ncompz = NULL; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nz = NULL; float *__nwork = NULL; + if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + ssteqr_(__ncompz, &n, __nd + offsetd, __ne + offsete, __nz + offsetz, &ldz, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ncompz) (*env)->ReleaseStringUTFChars(env, compz, __ncompz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sspcon_)(const char *uplo, int *n, float *ap, int * ipiv, float *anorm, /*FIXME*/void *rcond, float *work, int * iwork, /*FIXME*/void *info); +static void (*ssterf_)(int *n, float *d, float *e, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspconK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jfloatArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssterfK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + ssterf_(&n, __nd + offsetd, __ne + offsete, &__ninfo); +done: + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sspev_)(char *jobz, const char *uplo, int *n, float *ap, float *w, float *z, int *ldz, float *work, int *info); +static void (*sstev_)(const char *jobz, int *n, float *d, float *e, float *z, int *ldz, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspevK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstevK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nz = NULL; float *__nwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + sstev_(__njobz, &n, __nd + offsetd, __ne + offsete, __nz + offsetz, &ldz, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sspevd_)(char *jobz, const char *uplo, int *n, float *ap, float *w, float *z, int *ldz, float *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); +static void (*sstevd_)(const char *jobz, int *n, float *d, float *e, float *z, int *ldz, float *work, int *lwork, int *iwork, int *liwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspevdK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstevdK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nz = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + sstevd_(__njobz, &n, __nd + offsetd, __ne + offsete, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sspevx_)(char *jobz, char *range, const char *uplo, int *n, float *ap, float *vl, float *vu, int *il, int *iu, float *abstol, /*FIXME*/void *m, float *w, float *z, int *ldz, float *work, int * iwork, int * ifail, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspevxK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring range, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sstevr_)(const char *jobz, const char *range, int *n, float *d, float *e, float *vl, float *vu, int *il, int *iu, float *abstol, int *m, float *w, float *z, int *ldz, int *isuppz, float *work, int *lwork, int *iwork, int *liwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstevrK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nrange = NULL; int __nm = 0; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nw = NULL; float *__nz = NULL; int *__nisuppz = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + sstevr_(__njobz, __nrange, &n, __nd + offsetd, __ne + offsete, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nisuppz + offsetisuppz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sspgst_)(int *itype, const char *uplo, int *n, float *ap, float *bp, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspgstK(JNIEnv *env, UNUSED jobject obj, - jint itype, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray bp, jint offsetbp, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*sstevx_)(const char *jobz, const char *range, int *n, float *d, float *e, float *vl, float *vu, int *il, int *iu, float *abstol, int *m, float *w, float *z, int *ldz, float *work, int *iwork, int *ifail, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstevxK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nrange = NULL; int __nm = 0; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nw = NULL; float *__nz = NULL; float *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + sstevx_(__njobz, __nrange, &n, __nd + offsetd, __ne + offsete, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); +done: + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sspgv_)(int *itype, char *jobz, const char *uplo, int *n, float *ap, float *bp, float *w, float *z, int *ldz, float *work, /*FIXME*/void *info); +static void (*ssycon_)(const char *uplo, int *n, float *a, int *lda, int *ipiv, float *anorm, float *rcond, float *work, int *iwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspgvK(JNIEnv *env, UNUSED jobject obj, - jint itype, jstring jobz, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray bp, jint offsetbp, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyconK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; float __nrcond = 0; int __ninfo = 0; float *__na = NULL; int *__nipiv = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + ssycon_(__nuplo, &n, __na + offseta, &lda, __nipiv + offsetipiv, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sspgvd_)(int *itype, char *jobz, const char *uplo, int *n, float *ap, float *bp, float *w, float *z, int *ldz, float *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); +static void (*ssyev_)(const char *jobz, const char *uplo, int *n, float *a, int *lda, float *w, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspgvdK(JNIEnv *env, UNUSED jobject obj, - jint itype, jstring jobz, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray bp, jint offsetbp, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyevK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray w, jint offsetw, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; float *__nw = NULL; float *__nwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + ssyev_(__njobz, __nuplo, &n, __na + offseta, &lda, __nw + offsetw, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sspgvx_)(int *itype, char *jobz, char *range, const char *uplo, int *n, float *ap, float *bp, float *vl, float *vu, int *il, int *iu, float *abstol, /*FIXME*/void *m, float *w, float *z, int *ldz, float *work, int * iwork, int * ifail, /*FIXME*/void *info); +static void (*ssyevd_)(const char *jobz, const char *uplo, int *n, float *a, int *lda, float *w, float *work, int *lwork, int *iwork, int *liwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspgvxK(JNIEnv *env, UNUSED jobject obj, - jint itype, jstring jobz, jstring range, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray bp, jint offsetbp, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyevdK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray w, jint offsetw, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; float *__nw = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + ssyevd_(__njobz, __nuplo, &n, __na + offseta, &lda, __nw + offsetw, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssprfs_)(const char *uplo, int *n, int *nrhs, float *ap, float *afp, int * ipiv, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int * iwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssprfsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray afp, jint offsetafp, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*ssyevr_)(const char *jobz, const char *range, const char *uplo, int *n, float *a, int *lda, float *vl, float *vu, int *il, int *iu, float *abstol, int *m, float *w, float *z, int *ldz, int *isuppz, float *work, int *lwork, int *iwork, int *liwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyevrK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nrange = NULL; const char *__nuplo = NULL; int __nm = 0; int __ninfo = 0; float *__na = NULL; float *__nw = NULL; float *__nz = NULL; int *__nisuppz = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + ssyevr_(__njobz, __nrange, __nuplo, &n, __na + offseta, &lda, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nisuppz + offsetisuppz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sspsv_)(const char *uplo, int *n, int *nrhs, float *ap, int * ipiv, float *b, int *ldb, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspsvK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*ssyevx_)(const char *jobz, const char *range, const char *uplo, int *n, float *a, int *lda, float *vl, float *vu, int *il, int *iu, float *abstol, int *m, float *w, float *z, int *ldz, float *work, int *lwork, int *iwork, int *ifail, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyevxK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nrange = NULL; const char *__nuplo = NULL; int __nm = 0; int __ninfo = 0; float *__na = NULL; float *__nw = NULL; float *__nz = NULL; float *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + ssyevx_(__njobz, __nrange, __nuplo, &n, __na + offseta, &lda, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); +done: + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sspsvx_)(char *fact, const char *uplo, int *n, int *nrhs, float *ap, float *afp, int * ipiv, float *b, int *ldb, float *x, int *ldx, /*FIXME*/void *rcond, float *ferr, float *berr, float *work, int * iwork, /*FIXME*/void *info); +static void (*ssygs2_)(int *itype, const char *uplo, int *n, float *a, int *lda, float *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspsvxK(JNIEnv *env, UNUSED jobject obj, - jstring fact, jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray afp, jint offsetafp, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssygs2K(JNIEnv *env, UNUSED jobject obj, jint itype, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + ssygs2_(&itype, __nuplo, &n, __na + offseta, &lda, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssptrd_)(const char *uplo, int *n, float *ap, float *d, float *e, float *tau, /*FIXME*/void *info); +static void (*ssygst_)(int *itype, const char *uplo, int *n, float *a, int *lda, float *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssptrdK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray tau, jint offsettau, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssygstK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + ssygst_(&itype, __nuplo, &n, __na + offseta, &lda, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssptrf_)(const char *uplo, int *n, float *ap, int *ipiv, int *info); +static void (*ssygv_)(int *itype, const char *jobz, const char *uplo, int *n, float *a, int *lda, float *b, int *ldb, float *w, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssptrfK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jfloatArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssygvK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring jobz, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray w, jint offsetw, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nw = NULL; float *__nwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + ssygv_(&itype, __njobz, __nuplo, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nw + offsetw, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssptri_)(const char *uplo, int *n, float *ap, int * ipiv, float *work, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssptriK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jfloatArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*ssygvd_)(int *itype, const char *jobz, const char *uplo, int *n, float *a, int *lda, float *b, int *ldb, float *w, float *work, int *lwork, int *iwork, int *liwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssygvdK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring jobz, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray w, jint offsetw, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nw = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + ssygvd_(&itype, __njobz, __nuplo, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nw + offsetw, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssptrs_)(const char *uplo, int *n, int *nrhs, float *ap, int * ipiv, float *b, int *ldb, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssptrsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*ssygvx_)(int *itype, const char *jobz, const char *range, const char *uplo, int *n, float *a, int *lda, float *b, int *ldb, float *vl, float *vu, int *il, int *iu, float *abstol, int *m, float *w, float *z, int *ldz, float *work, int *lwork, int *iwork, int *ifail, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssygvxK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring jobz, jstring range, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { + jboolean failed = FALSE; + const char *__njobz = NULL; const char *__nrange = NULL; const char *__nuplo = NULL; int __nm = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nw = NULL; float *__nz = NULL; float *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + ssygvx_(&itype, __njobz, __nrange, __nuplo, &n, __na + offseta, &lda, __nb + offsetb, &ldb, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); +done: + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); + if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sstebz_)(char *range, char *order, int *n, float *vl, float *vu, int *il, int *iu, float *abstol, float *d, float *e, /*FIXME*/void *m, /*FIXME*/void *nsplit, float *w, int * iblock, int *isplit, float *work, int *iwork, int *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstebzK(JNIEnv *env, UNUSED jobject obj, - jstring range, jstring order, jint n, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jobject m, jobject nsplit, jfloatArray w, jint offsetw, jintArray iblock, jint offsetiblock, jintArray isplit, jint offsetisplit, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*ssyrfs_)(const char *uplo, int *n, int *nrhs, float *a, int *lda, float *af, int *ldaf, int *ipiv, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyrfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; float *__naf = NULL; int *__nipiv = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + ssyrfs_(__nuplo, &n, &nrhs, __na + offseta, &lda, __naf + offsetaf, &ldaf, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sstedc_)(char *compz, int *n, float *d, float *e, float *z, int *ldz, float *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); +static void (*ssysv_)(const char *uplo, int *n, int *nrhs, float *a, int *lda, int *ipiv, float *b, int *ldb, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstedcK(JNIEnv *env, UNUSED jobject obj, - jstring compz, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssysvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; int *__nipiv = NULL; float *__nb = NULL; float *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + ssysv_(__nuplo, &n, &nrhs, __na + offseta, &lda, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sstegr_)(char *jobz, char *range, int *n, float *d, float *e, float *vl, float *vu, int *il, int *iu, float *abstol, /*FIXME*/void *m, float *w, float *z, int *ldz, int * isuppz, float *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstegrK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring range, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*ssysvx_)(const char *fact, const char *uplo, int *n, int *nrhs, float *a, int *lda, float *af, int *ldaf, int *ipiv, float *b, int *ldb, float *x, int *ldx, float *rcond, float *ferr, float *berr, float *work, int *lwork, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssysvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nfact = NULL; const char *__nuplo = NULL; float __nrcond = 0; int __ninfo = 0; float *__na = NULL; float *__naf = NULL; int *__nipiv = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + ssysvx_(__nfact, __nuplo, &n, &nrhs, __na + offseta, &lda, __naf + offsetaf, &ldaf, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sstein_)(int *n, float *d, float *e, int *m, float *w, int * iblock, int * isplit, float *z, int *ldz, float *work, int * iwork, int * ifail, /*FIXME*/void *info); +static void (*ssytd2_)(const char *uplo, int *n, float *a, int *lda, float *d, float *e, float *tau, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssteinK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jint m, jfloatArray w, jint offsetw, jintArray iblock, jint offsetiblock, jintArray isplit, jint offsetisplit, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytd2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray tau, jint offsettau, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; float *__nd = NULL; float *__ne = NULL; float *__ntau = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + ssytd2_(__nuplo, &n, __na + offseta, &lda, __nd + offsetd, __ne + offsete, __ntau + offsettau, &__ninfo); +done: + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sstemr_)(char *jobz, char *range, int *n, float *d, float *e, float *vl, float *vu, int *il, int *iu, /*FIXME*/void *m, float *w, float *z, int *ldz, int *nzc, int * isuppz, /*FIXME*/void *tryrac, float *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); +static void (*ssytf2_)(const char *uplo, int *n, float *a, int *lda, int *ipiv, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstemrK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring range, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloat vl, jfloat vu, jint il, jint iu, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jint nzc, jintArray isuppz, jint offsetisuppz, jobject tryrac, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytf2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; int *__nipiv = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + ssytf2_(__nuplo, &n, __na + offseta, &lda, __nipiv + offsetipiv, &__ninfo); +done: + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssteqr_)(char *compz, int *n, float *d, float *e, float *z, int *ldz, float *work, /*FIXME*/void *info); +static void (*ssytrd_)(const char *uplo, int *n, float *a, int *lda, float *d, float *e, float *tau, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssteqrK(JNIEnv *env, UNUSED jobject obj, - jstring compz, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytrdK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; float *__nd = NULL; float *__ne = NULL; float *__ntau = NULL; float *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + ssytrd_(__nuplo, &n, __na + offseta, &lda, __nd + offsetd, __ne + offsete, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssterf_)(int *n, float *d, float *e, /*FIXME*/void *info); +static void (*ssytrf_)(const char *uplo, int *n, float *a, int *lda, int *ipiv, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssterfK(JNIEnv *env, UNUSED jobject obj, - jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytrfK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; int *__nipiv = NULL; float *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + ssytrf_(__nuplo, &n, __na + offseta, &lda, __nipiv + offsetipiv, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sstev_)(char *jobz, int *n, float *d, float *e, float *z, int *ldz, float *work, /*FIXME*/void *info); +static void (*ssytri_)(const char *uplo, int *n, float *a, int *lda, int *ipiv, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstevK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytriK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; int *__nipiv = NULL; float *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + ssytri_(__nuplo, &n, __na + offseta, &lda, __nipiv + offsetipiv, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sstevd_)(char *jobz, int *n, float *d, float *e, float *z, int *ldz, float *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); +static void (*ssytrs_)(const char *uplo, int *n, int *nrhs, float *a, int *lda, int *ipiv, float *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstevdK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; int *__nipiv = NULL; float *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + ssytrs_(__nuplo, &n, &nrhs, __na + offseta, &lda, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sstevr_)(char *jobz, char *range, int *n, float *d, float *e, float *vl, float *vu, int *il, int *iu, float *abstol, /*FIXME*/void *m, float *w, float *z, int *ldz, int * isuppz, float *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstevrK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring range, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*stbcon_)(const char *norm, const char *uplo, const char *diag, int *n, int *kd, float *ab, int *ldab, float *rcond, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stbconK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jstring diag, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nnorm = NULL; const char *__nuplo = NULL; const char *__ndiag = NULL; float __nrcond = 0; int __ninfo = 0; float *__nab = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + stbcon_(__nnorm, __nuplo, __ndiag, &n, &kd, __nab + offsetab, &ldab, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*sstevx_)(char *jobz, char *range, int *n, float *d, float *e, float *vl, float *vu, int *il, int *iu, float *abstol, /*FIXME*/void *m, float *w, float *z, int *ldz, float *work, int * iwork, int * ifail, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstevxK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring range, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*stbrfs_)(const char *uplo, const char *trans, const char *diag, int *n, int *kd, int *nrhs, float *ab, int *ldab, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stbrfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint kd, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; int __ninfo = 0; float *__nab = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + stbrfs_(__nuplo, __ntrans, __ndiag, &n, &kd, &nrhs, __nab + offsetab, &ldab, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssycon_)(const char *uplo, int *n, float *a, int *lda, int * ipiv, float *anorm, /*FIXME*/void *rcond, float *work, int * iwork, /*FIXME*/void *info); +static void (*stbtrs_)(const char *uplo, const char *trans, const char *diag, int *n, int *kd, int *nrhs, float *ab, int *ldab, float *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyconK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stbtrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint kd, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; int __ninfo = 0; float *__nab = NULL; float *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + stbtrs_(__nuplo, __ntrans, __ndiag, &n, &kd, &nrhs, __nab + offsetab, &ldab, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssyev_)(char *jobz, const char *uplo, int *n, float *a, int *lda, float *w, float *work, int *lwork, int *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyevK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray w, jint offsetw, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*stgevc_)(const char *side, const char *howmny, int *select, int *n, float *s, int *lds, float *p, int *ldp, float *vl, int *ldvl, float *vr, int *ldvr, int *mm, int *m, float *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgevcK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jfloatArray s, jint offsets, jint lds, jfloatArray p, jint offsetp, jint ldp, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jint mm, jobject m, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__nhowmny = NULL; int __nm = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; float *__ns = NULL; float *__np = NULL; float *__nvl = NULL; float *__nvr = NULL; float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__np = (*env)->GetPrimitiveArrayCritical(env, p, NULL))) goto fail; + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + stgevc_(__nside, __nhowmny, __nselect + offsetselect, &n, __ns + offsets, &lds, __np + offsetp, &ldp, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, &mm, &__nm, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); + if (__np) (*env)->ReleasePrimitiveArrayCritical(env, p, __np, failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nhowmny) (*env)->ReleaseStringUTFChars(env, howmny, __nhowmny); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssyevd_)(char *jobz, const char *uplo, int *n, float *a, int *lda, float *w, float *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); +static void (*stgex2_)(int *wantq, int *wantz, int *n, float *a, int *lda, float *b, int *ldb, float *q, int *ldq, float *z, int *ldz, int *j1, int *n1, int *n2, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyevdK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray w, jint offsetw, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgex2K(JNIEnv *env, UNUSED jobject obj, jboolean wantq, jboolean wantz, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray q, jint offsetq, jint ldq, jfloatArray z, jint offsetz, jint ldz, jint j1, jint n1, jint n2, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __nwantq; int __nwantz; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nq = NULL; float *__nz = NULL; float *__nwork = NULL; + __nwantq = wantq; + __nwantz = wantz; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + stgex2_(&__nwantq, &__nwantz, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nq + offsetq, &ldq, __nz + offsetz, &ldz, &j1, &n1, &n2, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) wantz = __nwantz; + if (!failed) wantq = __nwantq; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssyevr_)(char *jobz, char *range, const char *uplo, int *n, float *a, int *lda, float *vl, float *vu, int *il, int *iu, float *abstol, /*FIXME*/void *m, float *w, float *z, int *ldz, int * isuppz, float *work, int *lwork, int *iwork, int *liwork, int *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyevrK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring range, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*stgexc_)(int *wantq, int *wantz, int *n, float *a, int *lda, float *b, int *ldb, float *q, int *ldq, float *z, int *ldz, int *ifst, int *ilst, float *work, int *lwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgexcK(JNIEnv *env, UNUSED jobject obj, jboolean wantq, jboolean wantz, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray q, jint offsetq, jint ldq, jfloatArray z, jint offsetz, jint ldz, jobject ifst, jobject ilst, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __nwantq; int __nwantz; int __nifst = 0; int __nilst = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nq = NULL; float *__nz = NULL; float *__nwork = NULL; + __nwantq = wantq; + __nwantz = wantz; + __nifst = (*env)->GetIntField(env, ifst, intW_val_fieldID); + __nilst = (*env)->GetIntField(env, ilst, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + stgexc_(&__nwantq, &__nwantz, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nq + offsetq, &ldq, __nz + offsetz, &ldz, &__nifst, &__nilst, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, ilst, intW_val_fieldID, __nilst); + if (!failed) (*env)->SetIntField(env, ifst, intW_val_fieldID, __nifst); + if (!failed) wantz = __nwantz; + if (!failed) wantq = __nwantq; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssyevx_)(char *jobz, char *range, const char *uplo, int *n, float *a, int *lda, float *vl, float *vu, int *il, int *iu, float *abstol, int *m, float *w, float *z, int *ldz, float *work, int *lwork, int * iwork, int *ifail, int *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyevxK(JNIEnv *env, UNUSED jobject obj, - jstring jobz, jstring range, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*stgsen_)(int *ijob, int *wantq, int *wantz, int *select, int *n, float *a, int *lda, float *b, int *ldb, float *alphar, float *alphai, float *beta, float *q, int *ldq, float *z, int *ldz, int *m, float *pl, float *pr, float *dif, float *work, int *lwork, int *iwork, int *liwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgsenK(JNIEnv *env, UNUSED jobject obj, jint ijob, jboolean wantq, jboolean wantz, jbooleanArray select, jint offsetselect, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray q, jint offsetq, jint ldq, jfloatArray z, jint offsetz, jint ldz, jobject m, jobject pl, jobject pr, jfloatArray dif, jint offsetdif, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + jboolean failed = FALSE; + int __nwantq; int __nwantz; int __nm = 0; float __npl = 0; float __npr = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; float *__na = NULL; float *__nb = NULL; float *__nalphar = NULL; float *__nalphai = NULL; float *__nbeta = NULL; float *__nq = NULL; float *__nz = NULL; float *__ndif = NULL; float *__nwork = NULL; int *__niwork = NULL; + __nwantq = wantq; + __nwantz = wantz; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __npl = (*env)->GetFloatField(env, pl, floatW_val_fieldID); + __npr = (*env)->GetFloatField(env, pr, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) goto fail; + if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) goto fail; + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__ndif = (*env)->GetPrimitiveArrayCritical(env, dif, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + stgsen_(&ijob, &__nwantq, &__nwantz, __nselect + offsetselect, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nalphar + offsetalphar, __nalphai + offsetalphai, __nbeta + offsetbeta, __nq + offsetq, &ldq, __nz + offsetz, &ldz, &__nm, &__npl, &__npr, __ndif + offsetdif, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ndif) (*env)->ReleasePrimitiveArrayCritical(env, dif, __ndif, failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); + if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, failed ? JNI_ABORT : 0); + if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, pr, floatW_val_fieldID, __npr); + if (!failed) (*env)->SetFloatField(env, pl, floatW_val_fieldID, __npl); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (!failed) wantz = __nwantz; + if (!failed) wantq = __nwantq; + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssygs2_)(int *itype, const char *uplo, int *n, float *a, int *lda, float *b, int *ldb, int *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssygs2K(JNIEnv *env, UNUSED jobject obj, - jint itype, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*stgsja_)(const char *jobu, const char *jobv, const char *jobq, int *m, int *p, int *n, int *k, int *l, float *a, int *lda, float *b, int *ldb, float *tola, float *tolb, float *alpha, float *beta, float *u, int *ldu, float *v, int *ldv, float *q, int *ldq, float *work, int *ncycle, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgsjaK(JNIEnv *env, UNUSED jobject obj, jstring jobu, jstring jobv, jstring jobq, jint m, jint p, jint n, jint k, jint l, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat tola, jfloat tolb, jfloatArray alpha, jint offsetalpha, jfloatArray beta, jint offsetbeta, jfloatArray u, jint offsetu, jint ldu, jfloatArray v, jint offsetv, jint ldv, jfloatArray q, jint offsetq, jint ldq, jfloatArray work, jint offsetwork, jobject ncycle, jobject info) { + jboolean failed = FALSE; + const char *__njobu = NULL; const char *__njobv = NULL; const char *__njobq = NULL; int __nncycle = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nalpha = NULL; float *__nbeta = NULL; float *__nu = NULL; float *__nv = NULL; float *__nq = NULL; float *__nwork = NULL; + if (!(__njobu = (*env)->GetStringUTFChars(env, jobu, NULL))) goto fail; + if (!(__njobv = (*env)->GetStringUTFChars(env, jobv, NULL))) goto fail; + if (!(__njobq = (*env)->GetStringUTFChars(env, jobq, NULL))) goto fail; + __nncycle = (*env)->GetIntField(env, ncycle, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nalpha = (*env)->GetPrimitiveArrayCritical(env, alpha, NULL))) goto fail; + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + stgsja_(__njobu, __njobv, __njobq, &m, &p, &n, &k, &l, __na + offseta, &lda, __nb + offsetb, &ldb, &tola, &tolb, __nalpha + offsetalpha, __nbeta + offsetbeta, __nu + offsetu, &ldu, __nv + offsetv, &ldv, __nq + offsetq, &ldq, __nwork + offsetwork, &__nncycle, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); + if (__nalpha) (*env)->ReleasePrimitiveArrayCritical(env, alpha, __nalpha, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, ncycle, intW_val_fieldID, __nncycle); + if (__njobq) (*env)->ReleaseStringUTFChars(env, jobq, __njobq); + if (__njobv) (*env)->ReleaseStringUTFChars(env, jobv, __njobv); + if (__njobu) (*env)->ReleaseStringUTFChars(env, jobu, __njobu); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssygst_)(int *itype, const char *uplo, int *n, float *a, int *lda, float *b, int *ldb, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssygstK(JNIEnv *env, UNUSED jobject obj, - jint itype, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*stgsna_)(const char *job, const char *howmny, int *select, int *n, float *a, int *lda, float *b, int *ldb, float *vl, int *ldvl, float *vr, int *ldvr, float *s, float *dif, int *mm, int *m, float *work, int *lwork, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgsnaK(JNIEnv *env, UNUSED jobject obj, jstring job, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jfloatArray s, jint offsets, jfloatArray dif, jint offsetdif, jint mm, jobject m, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__njob = NULL; const char *__nhowmny = NULL; int __nm = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; float *__na = NULL; float *__nb = NULL; float *__nvl = NULL; float *__nvr = NULL; float *__ns = NULL; float *__ndif = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; + if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__ndif = (*env)->GetPrimitiveArrayCritical(env, dif, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + stgsna_(__njob, __nhowmny, __nselect + offsetselect, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, __ns + offsets, __ndif + offsetdif, &mm, &__nm, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ndif) (*env)->ReleasePrimitiveArrayCritical(env, dif, __ndif, failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nhowmny) (*env)->ReleaseStringUTFChars(env, howmny, __nhowmny); + if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssygv_)(int *itype, char *jobz, const char *uplo, int *n, float *a, int *lda, float *b, int *ldb, float *w, float *work, int *lwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssygvK(JNIEnv *env, UNUSED jobject obj, - jint itype, jstring jobz, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray w, jint offsetw, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*stgsy2_)(const char *trans, int *ijob, int *m, int *n, float *a, int *lda, float *b, int *ldb, float *c, int *Ldc, float *d, int *ldd, float *e, int *lde, float *f, int *ldf, float *scale, float *rdsum, float *rdscal, int *iwork, int *pq, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgsy2K(JNIEnv *env, UNUSED jobject obj, jstring trans, jint ijob, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray c, jint offsetc, jint Ldc, jfloatArray d, jint offsetd, jint ldd, jfloatArray e, jint offsete, jint lde, jfloatArray f, jint offsetf, jint ldf, jobject scale, jobject rdsum, jobject rdscal, jintArray iwork, jint offsetiwork, jobject pq, jobject info) { + jboolean failed = FALSE; + const char *__ntrans = NULL; float __nscale = 0; float __nrdsum = 0; float __nrdscal = 0; int __npq = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nc = NULL; float *__nd = NULL; float *__ne = NULL; float *__nf = NULL; int *__niwork = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __nscale = (*env)->GetFloatField(env, scale, floatW_val_fieldID); + __nrdsum = (*env)->GetFloatField(env, rdsum, floatW_val_fieldID); + __nrdscal = (*env)->GetFloatField(env, rdscal, floatW_val_fieldID); + __npq = (*env)->GetIntField(env, pq, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nf = (*env)->GetPrimitiveArrayCritical(env, f, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + stgsy2_(__ntrans, &ijob, &m, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nc + offsetc, &Ldc, __nd + offsetd, &ldd, __ne + offsete, &lde, __nf + offsetf, &ldf, &__nscale, &__nrdsum, &__nrdscal, __niwork + offsetiwork, &__npq, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nf) (*env)->ReleasePrimitiveArrayCritical(env, f, __nf, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, pq, intW_val_fieldID, __npq); + if (!failed) (*env)->SetFloatField(env, rdscal, floatW_val_fieldID, __nrdscal); + if (!failed) (*env)->SetFloatField(env, rdsum, floatW_val_fieldID, __nrdsum); + if (!failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssygvd_)(int *itype, char *jobz, const char *uplo, int *n, float *a, int *lda, float *b, int *ldb, float *w, float *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssygvdK(JNIEnv *env, UNUSED jobject obj, - jint itype, jstring jobz, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray w, jint offsetw, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*stgsyl_)(const char *trans, int *ijob, int *m, int *n, float *a, int *lda, float *b, int *ldb, float *c, int *Ldc, float *d, int *ldd, float *e, int *lde, float *f, int *ldf, float *scale, float *dif, float *work, int *lwork, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgsylK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint ijob, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray c, jint offsetc, jint Ldc, jfloatArray d, jint offsetd, jint ldd, jfloatArray e, jint offsete, jint lde, jfloatArray f, jint offsetf, jint ldf, jobject scale, jobject dif, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__ntrans = NULL; float __nscale = 0; float __ndif = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nc = NULL; float *__nd = NULL; float *__ne = NULL; float *__nf = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + __nscale = (*env)->GetFloatField(env, scale, floatW_val_fieldID); + __ndif = (*env)->GetFloatField(env, dif, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nf = (*env)->GetPrimitiveArrayCritical(env, f, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + stgsyl_(__ntrans, &ijob, &m, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nc + offsetc, &Ldc, __nd + offsetd, &ldd, __ne + offsete, &lde, __nf + offsetf, &ldf, &__nscale, &__ndif, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nf) (*env)->ReleasePrimitiveArrayCritical(env, f, __nf, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, dif, floatW_val_fieldID, __ndif); + if (!failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssygvx_)(int *itype, char *jobz, char *range, const char *uplo, int *n, float *a, int *lda, float *b, int *ldb, float *vl, float *vu, int *il, int *iu, float *abstol, /*FIXME*/void *m, float *w, float *z, int *ldz, float *work, int *lwork, int * iwork, int * ifail, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssygvxK(JNIEnv *env, UNUSED jobject obj, - jint itype, jstring jobz, jstring range, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*stpcon_)(const char *norm, const char *uplo, const char *diag, int *n, float *ap, float *rcond, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stpconK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jstring diag, jint n, jfloatArray ap, jint offsetap, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nnorm = NULL; const char *__nuplo = NULL; const char *__ndiag = NULL; float __nrcond = 0; int __ninfo = 0; float *__nap = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + stpcon_(__nnorm, __nuplo, __ndiag, &n, __nap + offsetap, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssyrfs_)(const char *uplo, int *n, int *nrhs, float *a, int *lda, float *af, int *ldaf, int * ipiv, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int * iwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyrfsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*stprfs_)(const char *uplo, const char *trans, const char *diag, int *n, int *nrhs, float *ap, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stprfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; int __ninfo = 0; float *__nap = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + stprfs_(__nuplo, __ntrans, __ndiag, &n, &nrhs, __nap + offsetap, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssysv_)(const char *uplo, int *n, int *nrhs, float *a, int *lda, int *ipiv, float *b, int *ldb, float *work, int *lwork, int *info); +static void (*stptri_)(const char *uplo, const char *diag, int *n, float *ap, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssysvK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stptriK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring diag, jint n, jfloatArray ap, jint offsetap, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; const char *__ndiag = NULL; int __ninfo = 0; float *__nap = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + stptri_(__nuplo, __ndiag, &n, __nap + offsetap, &__ninfo); +done: + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssysvx_)(char *fact, const char *uplo, int *n, int *nrhs, float *a, int *lda, float *af, int *ldaf, int * ipiv, float *b, int *ldb, float *x, int *ldx, /*FIXME*/void *rcond, float *ferr, float *berr, float *work, int *lwork, int * iwork, /*FIXME*/void *info); +static void (*stptrs_)(const char *uplo, const char *trans, const char *diag, int *n, int *nrhs, float *ap, float *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssysvxK(JNIEnv *env, UNUSED jobject obj, - jstring fact, jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stptrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; int __ninfo = 0; float *__nap = NULL; float *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + stptrs_(__nuplo, __ntrans, __ndiag, &n, &nrhs, __nap + offsetap, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssytd2_)(const char *uplo, int *n, float *a, int *lda, float *d, float *e, float *tau, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytd2K(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray tau, jint offsettau, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*strcon_)(const char *norm, const char *uplo, const char *diag, int *n, float *a, int *lda, float *rcond, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_strconK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jstring diag, jint n, jfloatArray a, jint offseta, jint lda, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nnorm = NULL; const char *__nuplo = NULL; const char *__ndiag = NULL; float __nrcond = 0; int __ninfo = 0; float *__na = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + strcon_(__nnorm, __nuplo, __ndiag, &n, __na + offseta, &lda, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssytf2_)(const char *uplo, int *n, float *a, int *lda, int * ipiv, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytf2K(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*strevc_)(const char *side, const char *howmny, int *select, int *n, float *t, int *ldt, float *vl, int *ldvl, float *vr, int *ldvr, int *mm, int *m, float *work, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_strevcK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jfloatArray t, jint offsett, jint ldt, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jint mm, jobject m, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__nside = NULL; const char *__nhowmny = NULL; int __nm = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; float *__nt = NULL; float *__nvl = NULL; float *__nvr = NULL; float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; + if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + strevc_(__nside, __nhowmny, __nselect + offsetselect, &n, __nt + offsett, &ldt, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, &mm, &__nm, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nhowmny) (*env)->ReleaseStringUTFChars(env, howmny, __nhowmny); + if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssytrd_)(const char *uplo, int *n, float *a, int *lda, float *d, float *e, float *tau, float *work, int *lwork, /*FIXME*/void *info); +static void (*strexc_)(const char *compq, int *n, float *t, int *ldt, float *q, int *ldq, int *ifst, int *ilst, float *work, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytrdK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_strexcK(JNIEnv *env, UNUSED jobject obj, jstring compq, jint n, jfloatArray t, jint offsett, jint ldt, jfloatArray q, jint offsetq, jint ldq, jobject ifst, jobject ilst, jfloatArray work, jint offsetwork, jobject info) { + jboolean failed = FALSE; + const char *__ncompq = NULL; int __nifst = 0; int __nilst = 0; int __ninfo = 0; float *__nt = NULL; float *__nq = NULL; float *__nwork = NULL; + if (!(__ncompq = (*env)->GetStringUTFChars(env, compq, NULL))) goto fail; + __nifst = (*env)->GetIntField(env, ifst, intW_val_fieldID); + __nilst = (*env)->GetIntField(env, ilst, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + strexc_(__ncompq, &n, __nt + offsett, &ldt, __nq + offsetq, &ldq, &__nifst, &__nilst, __nwork + offsetwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, ilst, intW_val_fieldID, __nilst); + if (!failed) (*env)->SetIntField(env, ifst, intW_val_fieldID, __nifst); + if (__ncompq) (*env)->ReleaseStringUTFChars(env, compq, __ncompq); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssytrf_)(const char *uplo, int *n, float *a, int *lda, int * ipiv, float *work, int *lwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytrfK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*strrfs_)(const char *uplo, const char *trans, const char *diag, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_strrfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + strrfs_(__nuplo, __ntrans, __ndiag, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssytri_)(const char *uplo, int *n, float *a, int *lda, int * ipiv, float *work, /*FIXME*/void *info); +static void (*strsen_)(const char *job, const char *compq, int *select, int *n, float *t, int *ldt, float *q, int *ldq, float *wr, float *wi, int *m, float *s, float *sep, float *work, int *lwork, int *iwork, int *liwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_strsenK(JNIEnv *env, UNUSED jobject obj, jstring job, jstring compq, jbooleanArray select, jint offsetselect, jint n, jfloatArray t, jint offsett, jint ldt, jfloatArray q, jint offsetq, jint ldq, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jobject m, jobject s, jobject sep, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { + jboolean failed = FALSE; + const char *__njob = NULL; const char *__ncompq = NULL; int __nm = 0; float __ns = 0; float __nsep = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; float *__nt = NULL; float *__nq = NULL; float *__nwr = NULL; float *__nwi = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; + if (!(__ncompq = (*env)->GetStringUTFChars(env, compq, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ns = (*env)->GetFloatField(env, s, floatW_val_fieldID); + __nsep = (*env)->GetFloatField(env, sep, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + strsen_(__njob, __ncompq, __nselect + offsetselect, &n, __nt + offsett, &ldt, __nq + offsetq, &ldq, __nwr + offsetwr, __nwi + offsetwi, &__nm, &__ns, &__nsep, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, sep, floatW_val_fieldID, __nsep); + if (!failed) (*env)->SetFloatField(env, s, floatW_val_fieldID, __ns); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__ncompq) (*env)->ReleaseStringUTFChars(env, compq, __ncompq); + if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; +} -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytriK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +static void (*strsna_)(const char *job, const char *howmny, int *select, int *n, float *t, int *ldt, float *vl, int *ldvl, float *vr, int *ldvr, float *s, float *sep, int *mm, int *m, float *work, int *ldwork, int *iwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_strsnaK(JNIEnv *env, UNUSED jobject obj, jstring job, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jfloatArray t, jint offsett, jint ldt, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jfloatArray s, jint offsets, jfloatArray sep, jint offsetsep, jint mm, jobject m, jfloatArray work, jint offsetwork, jint ldwork, jintArray iwork, jint offsetiwork, jobject info) { + jboolean failed = FALSE; + const char *__njob = NULL; const char *__nhowmny = NULL; int __nm = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; float *__nt = NULL; float *__nvl = NULL; float *__nvr = NULL; float *__ns = NULL; float *__nsep = NULL; float *__nwork = NULL; int *__niwork = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; + if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) goto fail; + __nm = (*env)->GetIntField(env, m, intW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__nsep = (*env)->GetPrimitiveArrayCritical(env, sep, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + strsna_(__njob, __nhowmny, __nselect + offsetselect, &n, __nt + offsett, &ldt, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, __ns + offsets, __nsep + offsetsep, &mm, &__nm, __nwork + offsetwork, &ldwork, __niwork + offsetiwork, &__ninfo); +done: + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__nsep) (*env)->ReleasePrimitiveArrayCritical(env, sep, __nsep, failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nhowmny) (*env)->ReleaseStringUTFChars(env, howmny, __nhowmny); + if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*ssytrs_)(const char *uplo, int *n, int *nrhs, float *a, int *lda, int * ipiv, float *b, int *ldb, /*FIXME*/void *info); +static void (*strsyl_)(const char *trana, const char *tranb, int *isgn, int *m, int *n, float *a, int *lda, float *b, int *ldb, float *c, int *Ldc, float *scale, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytrsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_strsylK(JNIEnv *env, UNUSED jobject obj, jstring trana, jstring tranb, jint isgn, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray c, jint offsetc, jint Ldc, jobject scale, jobject info) { + jboolean failed = FALSE; + const char *__ntrana = NULL; const char *__ntranb = NULL; float __nscale = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nc = NULL; + if (!(__ntrana = (*env)->GetStringUTFChars(env, trana, NULL))) goto fail; + if (!(__ntranb = (*env)->GetStringUTFChars(env, tranb, NULL))) goto fail; + __nscale = (*env)->GetFloatField(env, scale, floatW_val_fieldID); + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + strsyl_(__ntrana, __ntranb, &isgn, &m, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nc + offsetc, &Ldc, &__nscale, &__ninfo); +done: + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); + if (__ntranb) (*env)->ReleaseStringUTFChars(env, tranb, __ntranb); + if (__ntrana) (*env)->ReleaseStringUTFChars(env, trana, __ntrana); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*stbcon_)(char *norm, const char *uplo, char *diag, int *n, int *kd, float *ab, int *ldab, /*FIXME*/void *rcond, float *work, int * iwork, /*FIXME*/void *info); +static void (*strti2_)(const char *uplo, const char *diag, int *n, float *a, int *lda, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stbconK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jstring uplo, jstring diag, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_strti2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring diag, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; const char *__ndiag = NULL; int __ninfo = 0; float *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + strti2_(__nuplo, __ndiag, &n, __na + offseta, &lda, &__ninfo); +done: + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*stbrfs_)(const char *uplo, char *trans, char *diag, int *n, int *kd, int *nrhs, float *ab, int *ldab, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int * iwork, /*FIXME*/void *info); +static void (*strtri_)(const char *uplo, const char *diag, int *n, float *a, int *lda, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stbrfsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring trans, jstring diag, jint n, jint kd, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_strtriK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring diag, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; const char *__ndiag = NULL; int __ninfo = 0; float *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + strtri_(__nuplo, __ndiag, &n, __na + offseta, &lda, &__ninfo); +done: + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*stbtrs_)(const char *uplo, char *trans, char *diag, int *n, int *kd, int *nrhs, float *ab, int *ldab, float *b, int *ldb, /*FIXME*/void *info); +static void (*strtrs_)(const char *uplo, const char *trans, const char *diag, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stbtrsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring trans, jstring diag, jint n, jint kd, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_strtrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject info) { + jboolean failed = FALSE; + const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + strtrs_(__nuplo, __ntrans, __ndiag, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, &__ninfo); +done: + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); + if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); + if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*stgevc_)(char *side, char *howmny, int *select, int *n, float *s, int *lds, float *p, int *ldp, float *vl, int *ldvl, float *vr, int *ldvr, int *mm, /*FIXME*/void *m, float *work, /*FIXME*/void *info); +static void (*stzrqf_)(int *m, int *n, float *a, int *lda, float *tau, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgevcK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jfloatArray s, jint offsets, jint lds, jfloatArray p, jint offsetp, jint ldp, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jint mm, jobject m, jfloatArray work, jint offsetwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stzrqfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + stzrqf_(&m, &n, __na + offseta, &lda, __ntau + offsettau, &__ninfo); +done: + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*stgex2_)(int *wantq, int *wantz, int *n, float *a, int *lda, float *b, int *ldb, float *q, int *ldq, float *z, int *ldz, int *j1, int *n1, int *n2, float *work, int *lwork, int *info); +static void (*stzrzf_)(int *m, int *n, float *a, int *lda, float *tau, float *work, int *lwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgex2K(JNIEnv *env, UNUSED jobject obj, - jboolean wantq, jboolean wantz, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray q, jint offsetq, jint ldq, jfloatArray z, jint offsetz, jint ldz, jint j1, jint n1, jint n2, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +void Java_dev_ludovic_netlib_lapack_JNILAPACK_stzrzfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { + jboolean failed = FALSE; + int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + stzrzf_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); +done: + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (failed) throwOOM(env); + return; +fail: + failed = TRUE; + goto done; } -static void (*stgexc_)(int *wantq, int *wantz, int *n, float *a, int *lda, float *b, int *ldb, float *q, int *ldq, float *z, int *ldz, /*FIXME*/void *ifst, /*FIXME*/void *ilst, float *work, int *lwork, /*FIXME*/void *info); +static double (*dlamch_)(const char *cmach); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgexcK(JNIEnv *env, UNUSED jobject obj, - jboolean wantq, jboolean wantz, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray q, jint offsetq, jint ldq, jfloatArray z, jint offsetz, jint ldz, jobject ifst, jobject ilst, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamchK(JNIEnv *env, UNUSED jobject obj, jstring cmach) { + jdouble __ret; + jboolean failed = FALSE; + const char *__ncmach = NULL; + if (!(__ncmach = (*env)->GetStringUTFChars(env, cmach, NULL))) goto fail; + __ret = dlamch_(__ncmach); +done: + if (__ncmach) (*env)->ReleaseStringUTFChars(env, cmach, __ncmach); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*stgsen_)(int *ijob, int *wantq, int *wantz, int *select, int *n, float *a, int *lda, float *b, int *ldb, float *alphar, float *alphai, float *beta, float *q, int *ldq, float *z, int *ldz, /*FIXME*/void *m, /*FIXME*/void *pl, /*FIXME*/void *pr, float *dif, float *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); +static double (*dlamc3_)(double *a, double *b); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgsenK(JNIEnv *env, UNUSED jobject obj, - jint ijob, jboolean wantq, jboolean wantz, jbooleanArray select, jint offsetselect, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray q, jint offsetq, jint ldq, jfloatArray z, jint offsetz, jint ldz, jobject m, jobject pl, jobject pr, jfloatArray dif, jint offsetdif, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc3K(JNIEnv *env, UNUSED jobject obj, jdouble a, jdouble b) { + jdouble __ret; + jboolean failed = FALSE; + -static void (*stgsja_)(char *jobu, char *jobv, char *jobq, int *m, int *p, int *n, int *k, int *l, float *a, int *lda, float *b, int *ldb, float *tola, float *tolb, float *alpha, float *beta, float *u, int *ldu, float *v, int *ldv, float *q, int *ldq, float *work, /*FIXME*/void *ncycle, /*FIXME*/void *info); + __ret = dlamc3_(&a, &b); +done: -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgsjaK(JNIEnv *env, UNUSED jobject obj, - jstring jobu, jstring jobv, jstring jobq, jint m, jint p, jint n, jint k, jint l, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat tola, jfloat tolb, jfloatArray alpha, jint offsetalpha, jfloatArray beta, jint offsetbeta, jfloatArray u, jint offsetu, jint ldu, jfloatArray v, jint offsetv, jint ldv, jfloatArray q, jint offsetq, jint ldq, jfloatArray work, jint offsetwork, jobject ncycle, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*stgsna_)(char *job, char *howmny, int *select, int *n, float *a, int *lda, float *b, int *ldb, float *vl, int *ldvl, float *vr, int *ldvr, float *s, float *dif, int *mm, /*FIXME*/void *m, float *work, int *lwork, int * iwork, /*FIXME*/void *info); +static double (*dsecnd_)(); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgsnaK(JNIEnv *env, UNUSED jobject obj, - jstring job, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jfloatArray s, jint offsets, jfloatArray dif, jint offsetdif, jint mm, jobject m, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} +jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dsecndK(JNIEnv *env, UNUSED jobject obj) { + jdouble __ret; + jboolean failed = FALSE; -static void (*stgsy2_)(char *trans, int *ijob, int *m, int *n, float *a, int *lda, float *b, int *ldb, float *c, int *Ldc, float *d, int *ldd, float *e, int *lde, float *f, int *ldf, /*FIXME*/void *scale, /*FIXME*/void *rdsum, /*FIXME*/void *rdscal, int *iwork, int *pq, int *info); + __ret = dsecnd_(); +done: -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgsy2K(JNIEnv *env, UNUSED jobject obj, - jstring trans, jint ijob, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray c, jint offsetc, jint Ldc, jfloatArray d, jint offsetd, jint ldd, jfloatArray e, jint offsete, jint lde, jfloatArray f, jint offsetf, jint ldf, jobject scale, jobject rdsum, jobject rdscal, jintArray iwork, jint offsetiwork, jobject pq, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*stgsyl_)(char *trans, int *ijob, int *m, int *n, float *a, int *lda, float *b, int *ldb, float *c, int *Ldc, float *d, int *ldd, float *e, int *lde, float *f, int *ldf, /*FIXME*/void *scale, /*FIXME*/void *dif, float *work, int *lwork, int * iwork, /*FIXME*/void *info); +static int (*lsame_)(const char *ca, const char *cb); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgsylK(JNIEnv *env, UNUSED jobject obj, - jstring trans, jint ijob, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray c, jint offsetc, jint Ldc, jfloatArray d, jint offsetd, jint ldd, jfloatArray e, jint offsete, jint lde, jfloatArray f, jint offsetf, jint ldf, jobject scale, jobject dif, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_lsameK(JNIEnv *env, UNUSED jobject obj, jstring ca, jstring cb) { + jboolean __ret; + jboolean failed = FALSE; + const char *__nca = NULL; const char *__ncb = NULL; + if (!(__nca = (*env)->GetStringUTFChars(env, ca, NULL))) goto fail; + if (!(__ncb = (*env)->GetStringUTFChars(env, cb, NULL))) goto fail; + __ret = lsame_(__nca, __ncb); +done: + if (__ncb) (*env)->ReleaseStringUTFChars(env, cb, __ncb); + if (__nca) (*env)->ReleaseStringUTFChars(env, ca, __nca); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*stpcon_)(char *norm, const char *uplo, char *diag, int *n, float *ap, /*FIXME*/void *rcond, float *work, int * iwork, /*FIXME*/void *info); +static float (*second_)(); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stpconK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jstring uplo, jstring diag, jint n, jfloatArray ap, jint offsetap, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_secondK(JNIEnv *env, UNUSED jobject obj) { + jfloat __ret; + jboolean failed = FALSE; -static void (*stprfs_)(const char *uplo, char *trans, char *diag, int *n, int *nrhs, float *ap, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int * iwork, int *info); + __ret = second_(); +done: -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stprfsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*stptri_)(const char *uplo, char *diag, int *n, float *ap, /*FIXME*/void *info); +static float (*slamch_)(const char *cmach); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stptriK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring diag, jint n, jfloatArray ap, jint offsetap, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slamchK(JNIEnv *env, UNUSED jobject obj, jstring cmach) { + jfloat __ret; + jboolean failed = FALSE; + const char *__ncmach = NULL; + if (!(__ncmach = (*env)->GetStringUTFChars(env, cmach, NULL))) goto fail; + __ret = slamch_(__ncmach); +done: + if (__ncmach) (*env)->ReleaseStringUTFChars(env, cmach, __ncmach); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*stptrs_)(const char *uplo, char *trans, char *diag, int *n, int *nrhs, float *ap, float *b, int *ldb, int *info); +static float (*slamc3_)(float *a, float *b); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stptrsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray b, jint offsetb, jint ldb, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc3K(JNIEnv *env, UNUSED jobject obj, jfloat a, jfloat b) { + jfloat __ret; + jboolean failed = FALSE; + -static void (*strcon_)(char *norm, const char *uplo, char *diag, int *n, float *a, int *lda, /*FIXME*/void *rcond, float *work, int * iwork, /*FIXME*/void *info); + __ret = slamc3_(&a, &b); +done: -void Java_dev_ludovic_netlib_lapack_JNILAPACK_strconK(JNIEnv *env, UNUSED jobject obj, - jstring norm, jstring uplo, jstring diag, jint n, jfloatArray a, jint offseta, jint lda, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + if (failed) throwOOM(env); + return __ret; +fail: + failed = TRUE; + goto done; } -static void (*strevc_)(char *side, char *howmny, int *select, int *n, float *t, int *ldt, float *vl, int *ldvl, float *vr, int *ldvr, int *mm, /*FIXME*/void *m, float *work, /*FIXME*/void *info); +// static void (*dgges_)(char *jobvsl, char *jobvsr, char *sort, /*FIXME*/void *selctg, int *n, double *a, int *lda, double *b, int *ldb, /*FIXME*/void *sdim, double *alphar, double *alphai, double *beta, double *vsl, int *ldvsl, double *vsr, int *ldvsr, double *work, int *lwork, int *bwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_strevcK(JNIEnv *env, UNUSED jobject obj, - jstring side, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jfloatArray t, jint offsett, jint ldt, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jint mm, jobject m, jfloatArray work, jint offsetwork, jobject info) { +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggesK(JNIEnv *env, UNUSED jobject obj, + jstring jobvsl, jstring jobvsr, jstring sort, jobject selctg, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject sdim, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray vsl, jint offsetvsl, jint ldvsl, jdoubleArray vsr, jint offsetvsr, jint ldvsr, jdoubleArray work, jint offsetwork, jint lwork, jbooleanArray bwork, jint offsetbwork, jobject info) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static void (*strexc_)(char *compq, int *n, float *t, int *ldt, float *q, int *ldq, /*FIXME*/void *ifst, /*FIXME*/void *ilst, float *work, /*FIXME*/void *info); +// static void (*dggesx_)(char *jobvsl, char *jobvsr, char *sort, /*FIXME*/void *selctg, char *sense, int *n, double *a, int *lda, double *b, int *ldb, /*FIXME*/void *sdim, double *alphar, double *alphai, double *beta, double *vsl, int *ldvsl, double *vsr, int *ldvsr, double *rconde, double *rcondv, double *work, int *lwork, int * iwork, int *liwork, int *bwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_strexcK(JNIEnv *env, UNUSED jobject obj, - jstring compq, jint n, jfloatArray t, jint offsett, jint ldt, jfloatArray q, jint offsetq, jint ldq, jobject ifst, jobject ilst, jfloatArray work, jint offsetwork, jobject info) { +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggesxK(JNIEnv *env, UNUSED jobject obj, + jstring jobvsl, jstring jobvsr, jstring sort, jobject selctg, jstring sense, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject sdim, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray vsl, jint offsetvsl, jint ldvsl, jdoubleArray vsr, jint offsetvsr, jint ldvsr, jdoubleArray rconde, jint offsetrconde, jdoubleArray rcondv, jint offsetrcondv, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jbooleanArray bwork, jint offsetbwork, jobject info) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static void (*strrfs_)(const char *uplo, char *trans, char *diag, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int * iwork, /*FIXME*/void *info); +// static void (*sgges_)(char *jobvsl, char *jobvsr, char *sort, /*FIXME*/void *selctg, int *n, float *a, int *lda, float *b, int *ldb, /*FIXME*/void *sdim, float *alphar, float *alphai, float *beta, float *vsl, int *ldvsl, float *vsr, int *ldvsr, float *work, int *lwork, int *bwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_strrfsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggesK(JNIEnv *env, UNUSED jobject obj, + jstring jobvsl, jstring jobvsr, jstring sort, jobject selctg, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject sdim, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray vsl, jint offsetvsl, jint ldvsl, jfloatArray vsr, jint offsetvsr, jint ldvsr, jfloatArray work, jint offsetwork, jint lwork, jbooleanArray bwork, jint offsetbwork, jobject info) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static void (*strsen_)(char *job, char *compq, int *select, int *n, float *t, int *ldt, float *q, int *ldq, float *wr, float *wi, /*FIXME*/void *m, /*FIXME*/void *s, /*FIXME*/void *sep, float *work, int *lwork, int * iwork, int *liwork, /*FIXME*/void *info); +// static void (*sggesx_)(char *jobvsl, char *jobvsr, char *sort, /*FIXME*/void *selctg, char *sense, int *n, float *a, int *lda, float *b, int *ldb, /*FIXME*/void *sdim, float *alphar, float *alphai, float *beta, float *vsl, int *ldvsl, float *vsr, int *ldvsr, float *rconde, float *rcondv, float *work, int *lwork, int * iwork, int *liwork, int *bwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_strsenK(JNIEnv *env, UNUSED jobject obj, - jstring job, jstring compq, jbooleanArray select, jint offsetselect, jint n, jfloatArray t, jint offsett, jint ldt, jfloatArray q, jint offsetq, jint ldq, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jobject m, jobject s, jobject sep, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggesxK(JNIEnv *env, UNUSED jobject obj, + jstring jobvsl, jstring jobvsr, jstring sort, jobject selctg, jstring sense, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject sdim, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray vsl, jint offsetvsl, jint ldvsl, jfloatArray vsr, jint offsetvsr, jint ldvsr, jfloatArray rconde, jint offsetrconde, jfloatArray rcondv, jint offsetrcondv, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jbooleanArray bwork, jint offsetbwork, jobject info) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static void (*strsna_)(char *job, char *howmny, int *select, int *n, float *t, int *ldt, float *vl, int *ldvl, float *vr, int *ldvr, float *s, float *sep, int *mm, /*FIXME*/void *m, float *work, int *ldwork, int * iwork, /*FIXME*/void *info); +// static void (*sgees_)(char *jobvs, char *sort, /*FIXME*/void *select, int *n, float *a, int *lda, /*FIXME*/void *sdim, float *wr, float *wi, float *vs, int *ldvs, float *work, int *lwork, int *bwork, int *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_strsnaK(JNIEnv *env, UNUSED jobject obj, - jstring job, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jfloatArray t, jint offsett, jint ldt, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jfloatArray s, jint offsets, jfloatArray sep, jint offsetsep, jint mm, jobject m, jfloatArray work, jint offsetwork, jint ldwork, jintArray iwork, jint offsetiwork, jobject info) { +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeesK(JNIEnv *env, UNUSED jobject obj, + jstring jobvs, jstring sort, jobject select, jint n, jfloatArray a, jint offseta, jint lda, jobject sdim, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jfloatArray vs, jint offsetvs, jint ldvs, jfloatArray work, jint offsetwork, jint lwork, jbooleanArray bwork, jint offsetbwork, jobject info) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static void (*strsyl_)(char *trana, char *tranb, int *isgn, int *m, int *n, float *a, int *lda, float *b, int *ldb, float *c, int *Ldc, /*FIXME*/void *scale, /*FIXME*/void *info); +// static void (*sgeesx_)(char *jobvs, char *sort, /*FIXME*/void *select, char *sense, int *n, float *a, int *lda, /*FIXME*/void *sdim, float *wr, float *wi, float *vs, int *ldvs, /*FIXME*/void *rconde, /*FIXME*/void *rcondv, float *work, int *lwork, int * iwork, int *liwork, int *bwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_strsylK(JNIEnv *env, UNUSED jobject obj, - jstring trana, jstring tranb, jint isgn, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray c, jint offsetc, jint Ldc, jobject scale, jobject info) { +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeesxK(JNIEnv *env, UNUSED jobject obj, + jstring jobvs, jstring sort, jobject select, jstring sense, jint n, jfloatArray a, jint offseta, jint lda, jobject sdim, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jfloatArray vs, jint offsetvs, jint ldvs, jobject rconde, jobject rcondv, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jbooleanArray bwork, jint offsetbwork, jobject info) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static void (*strti2_)(const char *uplo, char *diag, int *n, float *a, int *lda, /*FIXME*/void *info); +// static void (*dgees_)(char *jobvs, char *sort, /*FIXME*/void *select, int *n, double *a, int *lda, /*FIXME*/void *sdim, double *wr, double *wi, double *vs, int *ldvs, double *work, int *lwork, int *bwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_strti2K(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring diag, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeesK(JNIEnv *env, UNUSED jobject obj, + jstring jobvs, jstring sort, jobject select, jint n, jdoubleArray a, jint offseta, jint lda, jobject sdim, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jdoubleArray vs, jint offsetvs, jint ldvs, jdoubleArray work, jint offsetwork, jint lwork, jbooleanArray bwork, jint offsetbwork, jobject info) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static void (*strtri_)(const char *uplo, char *diag, int *n, float *a, int *lda, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_strtriK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring diag, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { +// static void (*dgeesx_)(char *jobvs, char *sort, /*FIXME*/void *select, char *sense, int *n, double *a, int *lda, /*FIXME*/void *sdim, double *wr, double *wi, double *vs, int *ldvs, /*FIXME*/void *rconde, /*FIXME*/void *rcondv, double *work, int *lwork, int * iwork, int *liwork, int *bwork, /*FIXME*/void *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeesxK(JNIEnv *env, UNUSED jobject obj, + jstring jobvs, jstring sort, jobject select, jstring sense, jint n, jdoubleArray a, jint offseta, jint lda, jobject sdim, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jdoubleArray vs, jint offsetvs, jint ldvs, jobject rconde, jobject rcondv, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jbooleanArray bwork, jint offsetbwork, jobject info) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static void (*strtrs_)(const char *uplo, char *trans, char *diag, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, /*FIXME*/void *info); +// static void (*dlazq3_)(int *i0, /*FIXME*/void *n0, double *z, int *pp, /*FIXME*/void *dmin, /*FIXME*/void *sigma, /*FIXME*/void *desig, /*FIXME*/void *qmax, /*FIXME*/void *nfail, /*FIXME*/void *iter, /*FIXME*/void *ndiv, int *ieee, /*FIXME*/void *ttype, /*FIXME*/void *dmin1, /*FIXME*/void *dmin2, /*FIXME*/void *dn, /*FIXME*/void *dn1, /*FIXME*/void *dn2, /*FIXME*/void *tau); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_strtrsK(JNIEnv *env, UNUSED jobject obj, - jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject info) { +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlazq3K(JNIEnv *env, UNUSED jobject obj, + jint i0, jobject n0, jdoubleArray z, jint offsetz, jint pp, jobject dmin, jobject sigma, jobject desig, jobject qmax, jobject nfail, jobject iter, jobject ndiv, jboolean ieee, jobject ttype, jobject dmin1, jobject dmin2, jobject dn, jobject dn1, jobject dn2, jobject tau) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static void (*stzrqf_)(int *m, int *n, float *a, int *lda, float *tau, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stzrqfK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jobject info) { +// static void (*dlazq4_)(int *i0, int *n0, double *z, int *pp, int *n0in, double *dmin, double *dmin1, double *dmin2, double *dn, double *dn1, double *dn2, /*FIXME*/void *tau, /*FIXME*/void *ttype, /*FIXME*/void *g); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlazq4K(JNIEnv *env, UNUSED jobject obj, + jint i0, jint n0, jdoubleArray z, jint offsetz, jint pp, jint n0in, jdouble dmin, jdouble dmin1, jdouble dmin2, jdouble dn, jdouble dn1, jdouble dn2, jobject tau, jobject ttype, jobject g) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static void (*stzrzf_)(int *m, int *n, float *a, int *lda, float *tau, float *work, int *lwork, /*FIXME*/void *info); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_stzrzfK(JNIEnv *env, UNUSED jobject obj, - jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { +// static void (*slazq3_)(int *i0, /*FIXME*/void *n0, float *z, int *pp, /*FIXME*/void *dmin, /*FIXME*/void *sigma, /*FIXME*/void *desig, /*FIXME*/void *qmax, /*FIXME*/void *nfail, /*FIXME*/void *iter, /*FIXME*/void *ndiv, int *ieee, /*FIXME*/void *ttype, /*FIXME*/void *dmin1, /*FIXME*/void *dmin2, /*FIXME*/void *dn, /*FIXME*/void *dn1, /*FIXME*/void *dn2, /*FIXME*/void *tau); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slazq3K(JNIEnv *env, UNUSED jobject obj, + jint i0, jobject n0, jfloatArray z, jint offsetz, jint pp, jobject dmin, jobject sigma, jobject desig, jobject qmax, jobject nfail, jobject iter, jobject ndiv, jboolean ieee, jobject ttype, jobject dmin1, jobject dmin2, jobject dn, jobject dn1, jobject dn2, jobject tau) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static double (*dlamch_)(char *cmach); -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamchK(JNIEnv *env, UNUSED jobject obj, - jstring cmach) { +// static void (*slazq4_)(int *i0, int *n0, float *z, int *pp, int *n0in, float *dmin, float *dmin1, float *dmin2, float *dn, float *dn1, float *dn2, /*FIXME*/void *tau, /*FIXME*/void *ttype, /*FIXME*/void *g); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slazq4K(JNIEnv *env, UNUSED jobject obj, + jint i0, jint n0, jfloatArray z, jint offsetz, jint pp, jint n0in, jfloat dmin, jfloat dmin1, jfloat dmin2, jfloat dn, jfloat dn1, jfloat dn2, jobject tau, jobject ttype, jobject g) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; } + // static void (*dlamc1_)(/*FIXME*/void *beta, /*FIXME*/void *t, /*FIXME*/void *rnd, /*FIXME*/void *ieee1); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc1K(JNIEnv *env, UNUSED jobject obj, @@ -5083,6 +19725,7 @@ void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc1K(JNIEnv *env, UNUSED jobjec (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } + // static void (*dlamc2_)(/*FIXME*/void *beta, /*FIXME*/void *t, /*FIXME*/void *rnd, /*FIXME*/void *eps, /*FIXME*/void *emin, /*FIXME*/void *rmin, /*FIXME*/void *emax, /*FIXME*/void *rmax); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc2K(JNIEnv *env, UNUSED jobject obj, @@ -5090,13 +19733,6 @@ void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc2K(JNIEnv *env, UNUSED jobjec (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static double (*dlamc3_)(double *a, double *b); - -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc3K(JNIEnv *env, UNUSED jobject obj, - jdouble a, jdouble b) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; -} // static void (*dlamc4_)(/*FIXME*/void *emin, double *start, int *base); @@ -5105,6 +19741,7 @@ void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc4K(JNIEnv *env, UNUSED jobjec (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } + // static void (*dlamc5_)(int *beta, int *p, int *emin, int *ieee, /*FIXME*/void *emax, /*FIXME*/void *rmax); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc5K(JNIEnv *env, UNUSED jobject obj, @@ -5112,36 +19749,6 @@ void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc5K(JNIEnv *env, UNUSED jobjec (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static double (*dsecnd_)(void); - -jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dsecndK(JNIEnv *env, UNUSED jobject obj) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; -} - -static int *(*lsame_)(char *ca, char *cb); - -jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_lsameK(JNIEnv *env, UNUSED jobject obj, - jstring ca, jstring cb) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; -} - -static float (*second_)(void); - -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_secondK(JNIEnv *env, UNUSED jobject obj) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; -} - - -static float (*slamch_)(char *cmach); - -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slamchK(JNIEnv *env, UNUSED jobject obj, - jstring cmach) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; -} // static void (*slamc1_)(/*FIXME*/void *beta, /*FIXME*/void *t, /*FIXME*/void *rnd, /*FIXME*/void *ieee1); @@ -5150,6 +19757,7 @@ void Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc1K(JNIEnv *env, UNUSED jobjec (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } + // static void (*slamc2_)(/*FIXME*/void *beta, /*FIXME*/void *t, /*FIXME*/void *rnd, /*FIXME*/void *eps, /*FIXME*/void *emin, /*FIXME*/void *rmin, /*FIXME*/void *emax, /*FIXME*/void *rmax); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc2K(JNIEnv *env, UNUSED jobject obj, @@ -5157,13 +19765,6 @@ void Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc2K(JNIEnv *env, UNUSED jobjec (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -static float (*slamc3_)(float *a, float *b); - -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc3K(JNIEnv *env, UNUSED jobject obj, - jfloat a, jfloat b) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); - return 0; -} // static void (*slamc4_)(/*FIXME*/void *emin, float *start, int *base); @@ -5172,6 +19773,7 @@ void Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc4K(JNIEnv *env, UNUSED jobjec (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } + // static void (*slamc5_)(int *beta, int *p, int *emin, int *ieee, /*FIXME*/void *emax, /*FIXME*/void *rmax); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc5K(JNIEnv *env, UNUSED jobject obj, @@ -5294,10 +19896,10 @@ jint JNI_OnLoad(JavaVM *vm, UNUSED void *reserved) { LOAD_SYMBOL(dgebal_) LOAD_SYMBOL(dgecon_) LOAD_SYMBOL(dgebrd_) - LOAD_SYMBOL(dgees_) + // LOAD_SYMBOL(dgees_) LOAD_SYMBOL(dgeequ_) LOAD_SYMBOL(dgeev_) - LOAD_SYMBOL(dgeesx_) + // LOAD_SYMBOL(dgeesx_) LOAD_SYMBOL(dgegs_) LOAD_SYMBOL(dgeevx_) LOAD_SYMBOL(dgehd2_) @@ -5330,10 +19932,10 @@ jint JNI_OnLoad(JavaVM *vm, UNUSED void *reserved) { LOAD_SYMBOL(dgetrf_) LOAD_SYMBOL(dggbak_) LOAD_SYMBOL(dgetrs_) - LOAD_SYMBOL(dgges_) + // LOAD_SYMBOL(dgges_) LOAD_SYMBOL(dggbal_) LOAD_SYMBOL(dggev_) - LOAD_SYMBOL(dggesx_) + // LOAD_SYMBOL(dggesx_) LOAD_SYMBOL(dggglm_) LOAD_SYMBOL(dggevx_) LOAD_SYMBOL(dgglse_) @@ -5652,8 +20254,8 @@ jint JNI_OnLoad(JavaVM *vm, UNUSED void *reserved) { LOAD_SYMBOL(sgebd2_) LOAD_SYMBOL(sgeequ_) LOAD_SYMBOL(sgecon_) - LOAD_SYMBOL(sgeesx_) - LOAD_SYMBOL(sgees_) + // LOAD_SYMBOL(sgeesx_) + // LOAD_SYMBOL(sgees_) LOAD_SYMBOL(sgeevx_) LOAD_SYMBOL(sgeev_) LOAD_SYMBOL(sgegv_) @@ -5688,8 +20290,8 @@ jint JNI_OnLoad(JavaVM *vm, UNUSED void *reserved) { LOAD_SYMBOL(sgetri_) LOAD_SYMBOL(sggbal_) LOAD_SYMBOL(sggbak_) - LOAD_SYMBOL(sggesx_) - LOAD_SYMBOL(sgges_) + // LOAD_SYMBOL(sggesx_) + // LOAD_SYMBOL(sgges_) LOAD_SYMBOL(sggevx_) LOAD_SYMBOL(sggev_) LOAD_SYMBOL(sgghrd_) diff --git a/pom.xml b/pom.xml index 19f1fe7d..6db69752 100644 --- a/pom.xml +++ b/pom.xml @@ -242,7 +242,7 @@ information or have any questions. - + @@ -252,7 +252,7 @@ information or have any questions. - + From 1cc5e6233c65b6f400b0c9edccee964c1ef7d26d Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Sun, 2 May 2021 02:00:35 +0200 Subject: [PATCH 31/42] Compiler complains that __ret may be uninitialized It's because it doesn't know Throw never returns --- pom.xml | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/pom.xml b/pom.xml index 6db69752..779d0665 100644 --- a/pom.xml +++ b/pom.xml @@ -242,7 +242,7 @@ information or have any questions. - + @@ -252,7 +252,7 @@ information or have any questions. - + From 44221fe2d0d13dfe3c26f052b32f4b719916e500 Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Sun, 2 May 2021 11:32:27 +0200 Subject: [PATCH 32/42] Generate function for NotImplemented + Reduce whitespace noise --- generator.py | 1822 +++++++++++++++++++++++++------------------------- 1 file changed, 927 insertions(+), 895 deletions(-) diff --git a/generator.py b/generator.py index f56a1b21..3cc54945 100644 --- a/generator.py +++ b/generator.py @@ -66,8 +66,18 @@ def __init__(self, name): self.java_type_and_name = "jstring {name}".format(name=name) self.native_argument = "__n{name}".format(name=name) self.native_local = "const char *__n{name} = NULL".format(name=name) - self.prolog = "if (!(__n{name} = (*env)->GetStringUTFChars(env, {name}, NULL))) goto fail;".format(name=name) + self.prolog = "if (!(__n{name} = (*env)->GetStringUTFChars(env, {name}, NULL))) {{ failed = TRUE; goto done; }}".format(name=name) self.epilog = "if (__n{name}) (*env)->ReleaseStringUTFChars(env, {name}, __n{name});".format(name=name) +class JObject: + def __init__(self, name): + self.idx = 0 + self.name = name + self.native_type_and_name = "const char *{name}".format(name=name) + self.java_type_and_name = "jstring {name}".format(name=name) + # self.native_argument = "__n{name}".format(name=name) + # self.native_local = "const char *__n{name} = NULL".format(name=name) + # self.prolog = "if (!(__n{name} = (*env)->GetStringUTFChars(env, {name}, NULL))) {{ failed = TRUE; goto done; }}".format(name=name) + # self.epilog = "if (__n{name}) (*env)->ReleaseStringUTFChars(env, {name}, __n{name});".format(name=name) class JBooleanW: def __init__(self, name): @@ -117,7 +127,7 @@ def __init__(self, name): self.java_type_and_name = "jobject {name}".format(name=name) self.native_argument = "__n{name}".format(name=name) self.native_local = "char *__n{name} = NULL; jstring __j{name} = NULL;".format(name=name) - self.prolog = "__j{name} = (jstring)(*env)->GetObjectField(env, {name}, StringW_val_fieldID); if (!(__n{name} = (char*)(*env)->GetStringUTFChars(env, {name}, NULL))) goto fail;".format(name=name) + self.prolog = "__j{name} = (jstring)(*env)->GetObjectField(env, {name}, StringW_val_fieldID); if (!(__n{name} = (char*)(*env)->GetStringUTFChars(env, {name}, NULL))) {{ failed = TRUE; goto done; }}".format(name=name) self.epilog = "if (__n{name}) {{ (*env)->ReleaseStringUTFChars(env, __j{name}, (const char*)__n{name}); if (!failed) (*env)->SetObjectField(env, {name}, StringW_val_fieldID, __j{name}); }}".format(name=name) class JBooleanArray: @@ -128,7 +138,7 @@ def __init__(self, name): self.java_type_and_name = "jbooleanArray {name}, jint offset{name}".format(name=name) self.native_argument = "__n{name} + offset{name}".format(name=name) self.native_local = "jboolean *__j{name} = NULL; int *__n{name} = NULL".format(name=name) - self.prolog = "if (!(__j{name} = (*env)->GetPrimitiveArrayCritical(env, {name}, NULL))) {{ goto fail; }} do {{ int length = (*env)->GetArrayLength(env, {name}); if (length <= 0) goto fail; if (!(__n{name} = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) {{ __n{name}[i] = __j{name}[i]; }} }} while(0);".format(name=name) + self.prolog = "if (!(__j{name} = (*env)->GetPrimitiveArrayCritical(env, {name}, NULL))) {{ failed = TRUE; goto done; }} do {{ int length = (*env)->GetArrayLength(env, {name}); if (length <= 0) {{ failed = TRUE; goto done; }} if (!(__n{name} = malloc(sizeof(jboolean) * length))) {{ failed = TRUE; goto done; }} for (int i = 0; i < length; i++) {{ __n{name}[i] = __j{name}[i]; }} }} while(0);".format(name=name) self.epilog = "if (__n{name}) {{ free(__n{name}); }} if (__j{name}) (*env)->ReleasePrimitiveArrayCritical(env, {name}, __n{name}, JNI_ABORT);".format(name=name) class JIntArray: def __init__(self, name, mode = "0"): @@ -138,7 +148,7 @@ def __init__(self, name, mode = "0"): self.java_type_and_name = "jintArray {name}, jint offset{name}".format(name=name) self.native_argument = "__n{name} + offset{name}".format(name=name) self.native_local = "int *__n{name} = NULL".format(name=name) - self.prolog = "if (!(__n{name} = (*env)->GetPrimitiveArrayCritical(env, {name}, NULL))) goto fail;".format(name=name) + self.prolog = "if (!(__n{name} = (*env)->GetPrimitiveArrayCritical(env, {name}, NULL))) {{ failed = TRUE; goto done; }}".format(name=name) self.epilog = "if (__n{name}) (*env)->ReleasePrimitiveArrayCritical(env, {name}, __n{name}, {mode});".format(name=name, mode=("JNI_ABORT" if mode == "JNI_ABORT" else ("failed ? JNI_ABORT : %s" % mode))) class JFloatArray: def __init__(self, name, mode = "0"): @@ -148,7 +158,7 @@ def __init__(self, name, mode = "0"): self.java_type_and_name = "jfloatArray {name}, jint offset{name}".format(name=name) self.native_argument = "__n{name} + offset{name}".format(name=name) self.native_local = "float *__n{name} = NULL".format(name=name) - self.prolog = "if (!(__n{name} = (*env)->GetPrimitiveArrayCritical(env, {name}, NULL))) goto fail;".format(name=name) + self.prolog = "if (!(__n{name} = (*env)->GetPrimitiveArrayCritical(env, {name}, NULL))) {{ failed = TRUE; goto done; }}".format(name=name) self.epilog = "if (__n{name}) (*env)->ReleasePrimitiveArrayCritical(env, {name}, __n{name}, {mode});".format(name=name, mode=("JNI_ABORT" if mode == "JNI_ABORT" else ("failed ? JNI_ABORT : %s" % mode))) class JDoubleArray: def __init__(self, name, mode = "0"): @@ -158,51 +168,73 @@ def __init__(self, name, mode = "0"): self.java_type_and_name = "jdoubleArray {name}, jint offset{name}".format(name=name) self.native_argument = "__n{name} + offset{name}".format(name=name) self.native_local = "double *__n{name} = NULL".format(name=name) - self.prolog = "if (!(__n{name} = (*env)->GetPrimitiveArrayCritical(env, {name}, NULL))) goto fail;".format(name=name) + self.prolog = "if (!(__n{name} = (*env)->GetPrimitiveArrayCritical(env, {name}, NULL))) {{ failed = TRUE; goto done; }}".format(name=name) self.epilog = "if (__n{name}) (*env)->ReleasePrimitiveArrayCritical(env, {name}, __n{name}, {mode});".format(name=name, mode=("JNI_ABORT" if mode == "JNI_ABORT" else ("failed ? JNI_ABORT : %s" % mode))) -def routine_r(pkg, ret, name, *args): - # Print native function signature - print("static {ret} (*{name}_)({args});".format(ret=ret.native_type, name=name, args=", ".join([arg.native_type_and_name for arg in args]))) - print() - # Print JNI function implementation - print("{ret} Java_dev_ludovic_netlib_{pkg}_JNI{pkgupper}_{name}K(JNIEnv *env, UNUSED jobject obj{args}) {{".format(ret=ret.java_type, pkg=pkg, pkgupper=pkg.upper(), name=name, args="".join([", " + arg.java_type_and_name for arg in args]))) - print(" {rettype} __ret;".format(rettype=ret.java_type)) - print(" jboolean failed = FALSE;") - if len(args) > 0: - print(" " + " ".join([a + ";" for a in [arg.native_local for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0])) - print("\n".join([" " + a for a in [arg.prolog for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0])) - print(" __ret = {name}_({args});".format(name=name, args=", ".join([arg.native_argument for arg in args]))) - print("done:") - print("\n".join([" " + a for a in [arg.epilog for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0][::-1])) - print(" if (failed) throwOOM(env);") - print(" return __ret;") - print("fail:") - print(" failed = TRUE;") - print(" goto done;") - print("}") - print() +class RoutineR: + def __init__(self, pkg, ret, name, *args): + # Print native function signature + print("static {ret} (*{name}_)({args});".format(ret=ret.native_type, name=name, args=", ".join([arg.native_type_and_name for arg in args]))) + print() + # Print JNI function implementation + print("{ret} Java_dev_ludovic_netlib_{pkg}_JNI{pkgupper}_{name}K(JNIEnv *env, UNUSED jobject obj{args}) {{".format(ret=ret.java_type, pkg=pkg, pkgupper=pkg.upper(), name=name, args="".join([", " + arg.java_type_and_name for arg in args]))) + print(" {rettype} __ret;".format(rettype=ret.java_type)) + print(" jboolean failed = FALSE;") + if any(len(arg.native_local) > 0 for arg in sorted(args, key=lambda a: a.idx)): + print(" " + " ".join([a + ";" for a in [arg.native_local for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0])) + if any(len(arg.prolog) > 0 for arg in sorted(args, key=lambda a: a.idx)): + print("\n".join([" " + a for a in [arg.prolog for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0])) + print(" __ret = {name}_({args});".format(name=name, args=", ".join([arg.native_argument for arg in args]))) + print("done:") + if any(len(arg.epilog) > 0 for arg in sorted(args, key=lambda a: a.idx)): + print("\n".join([" " + a for a in [arg.epilog for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0][::-1])) + print(" if (failed) throwOOM(env);") + print(" return __ret;") + print("}") + print() + +class RoutineR_NI: + def __init__(self, pkg, ret, name, *args): + # Print native function signature + print("// static {ret} (*{name}_)({args});".format(ret=ret.native_type, name=name, args=", ".join([arg.native_type_and_name for arg in args]))) + print() + # Print JNI function implementation + print("{ret} Java_dev_ludovic_netlib_{pkg}_JNI{pkgupper}_{name}K(JNIEnv *env, UNUSED jobject obj{args}) {{".format(ret=ret.java_type, pkg=pkg, pkgupper=pkg.upper(), name=name, args="".join([", UNUSED " + arg.java_type_and_name for arg in args]))) + print(" (*env)->ThrowNew(env, (*env)->FindClass(env, \"java/lang/UnsupportedOperationException\"), \"not implemented\");") + print(" return 0;") + print("}") + print() + +class Routine: + def __init__(self, pkg, name, *args): + # Print native function signature + print("static void (*{name}_)({args});".format(name=name, args=", ".join([arg.native_type_and_name for arg in args]))) + print() + # Print JNI function implementation + print("void Java_dev_ludovic_netlib_{pkg}_JNI{pkgupper}_{name}K(JNIEnv *env, UNUSED jobject obj{args}) {{".format(pkg=pkg, pkgupper=pkg.upper(), name=name, args="".join([", " + arg.java_type_and_name for arg in args]))) + print(" jboolean failed = FALSE;") + if any(len(arg.native_local) > 0 for arg in sorted(args, key=lambda a: a.idx)): + print(" " + " ".join([a + ";" for a in [arg.native_local for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0])) + if any(len(arg.prolog) > 0 for arg in sorted(args, key=lambda a: a.idx)): + print("\n".join([" " + a for a in [arg.prolog for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0])) + print(" {name}_({args});".format(name=name, args=", ".join([arg.native_argument for arg in args]))) + print("done:") + if any(len(arg.epilog) > 0 for arg in sorted(args, key=lambda a: a.idx)): + print("\n".join([" " + a for a in [arg.epilog for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0][::-1])) + print(" if (failed) throwOOM(env);") + print("}") + print() -def routine(pkg, name, *args): - # Print native function signature - print("static void (*{name}_)({args});".format(name=name, args=", ".join([arg.native_type_and_name for arg in args]))) - print() - # Print JNI function implementation - print("void Java_dev_ludovic_netlib_{pkg}_JNI{pkgupper}_{name}K(JNIEnv *env, UNUSED jobject obj{args}) {{".format(pkg=pkg, pkgupper=pkg.upper(), name=name, args="".join([", " + arg.java_type_and_name for arg in args]))) - print(" jboolean failed = FALSE;") - if len(args) > 0: - print(" " + " ".join([a + ";" for a in [arg.native_local for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0])) - print("\n".join([" " + a for a in [arg.prolog for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0])) - print(" {name}_({args});".format(name=name, args=", ".join([arg.native_argument for arg in args]))) - print("done:") - print("\n".join([" " + a for a in [arg.epilog for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0][::-1])) - print(" if (failed) throwOOM(env);") - print(" return;") - print("fail:") - print(" failed = TRUE;") - print(" goto done;") - print("}") - print() +class Routine_NI: + def __init__(self, pkg, name, *args): + # Print native function signature + print("// static void (*{name}_)({args});".format(name=name, args=", ".join([arg.native_type_and_name for arg in args]))) + print() + # Print JNI function implementation + print("void Java_dev_ludovic_netlib_{pkg}_JNI{pkgupper}_{name}K(JNIEnv *env, UNUSED jobject obj{args}) {{".format(pkg=pkg, pkgupper=pkg.upper(), name=name, args="".join([", UNUSED " + arg.java_type_and_name for arg in args]))) + print(" (*env)->ThrowNew(env, (*env)->FindClass(env, \"java/lang/UnsupportedOperationException\"), \"not implemented\");") + print("}") + print() # Copy from Java @@ -216,855 +248,855 @@ def routine(pkg, name, *args): # $< $1("$5") if sys.argv[1] == "blas": - routine_r("blas", JDoubleR(), "dasum", JInt("n"), JDoubleArray("x", "JNI_ABORT"), JInt("incx")) - routine_r("blas", JFloatR(), "sasum", JInt("n"), JFloatArray("x", "JNI_ABORT"), JInt("incx")) - routine ("blas", "daxpy", JInt("n"), JDouble("alpha"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("y"), JInt("incy")) - routine ("blas", "saxpy", JInt("n"), JFloat("alpha"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("y"), JInt("incy")) - routine ("blas", "dcopy", JInt("n"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("y"), JInt("incy")) - routine ("blas", "scopy", JInt("n"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("y"), JInt("incy")) - routine_r("blas", JDoubleR(), "ddot", JInt("n"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("y", "JNI_ABORT"), JInt("incy")) - routine_r("blas", JFloatR(), "sdot", JInt("n"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("y", "JNI_ABORT"), JInt("incy")) - routine_r("blas", JFloatR(), "sdsdot", JInt("n"), JFloat("sb"), JFloatArray("sx", "JNI_ABORT"), JInt("incsx"), JFloatArray("sy", "JNI_ABORT"), JInt("incsy")) - routine ("blas", "dgbmv", JString("trans"), JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDouble("beta"), JDoubleArray("y"), JInt("incy")) - routine ("blas", "sgbmv", JString("trans"), JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloat("beta"), JFloatArray("y"), JInt("incy")) - routine ("blas", "dgemm", JString("transa"), JString("transb"), JInt("m"), JInt("n"), JInt("k"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("b", "JNI_ABORT"), JInt("ldb"), JDouble("beta"), JDoubleArray("c"), JInt("ldc")) - routine ("blas", "sgemm", JString("transa"), JString("transb"), JInt("m"), JInt("n"), JInt("k"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("b", "JNI_ABORT"), JInt("ldb"), JFloat("beta"), JFloatArray("c"), JInt("ldc")) - routine ("blas", "dgemv", JString("trans"), JInt("m"), JInt("n"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDouble("beta"), JDoubleArray("y"), JInt("incy")) - routine ("blas", "sgemv", JString("trans"), JInt("m"), JInt("n"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloat("beta"), JFloatArray("y"), JInt("incy")) - routine ("blas", "dger", JInt("m"), JInt("n"), JDouble("alpha"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("y", "JNI_ABORT"), JInt("incy"), JDoubleArray("a"), JInt("lda")) - routine ("blas", "sger", JInt("m"), JInt("n"), JFloat("alpha"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("y", "JNI_ABORT"), JInt("incy"), JFloatArray("a"), JInt("lda")) - routine_r("blas", JDoubleR(), "dnrm2", JInt("n"), JDoubleArray("x", "JNI_ABORT"), JInt("incx")) - routine_r("blas", JFloatR(), "snrm2", JInt("n"), JFloatArray("x", "JNI_ABORT"), JInt("incx")) - routine ("blas", "drot", JInt("n"), JDoubleArray("dx"), JInt("incx"), JDoubleArray("dy"), JInt("incy"), JDouble("c"), JDouble("s")) - routine ("blas", "srot", JInt("n"), JFloatArray("sx"), JInt("incx"), JFloatArray("sy"), JInt("incy"), JFloat("c"), JFloat("s")) - routine ("blas", "drotm", JInt("n"), JDoubleArray("dx", "JNI_ABORT"), JInt("incx"), JDoubleArray("dy"), JInt("incy"), JDoubleArray("dparam", "JNI_ABORT")) - routine ("blas", "srotm", JInt("n"), JFloatArray("sx", "JNI_ABORT"), JInt("incx"), JFloatArray("sy"), JInt("incy"), JFloatArray("sparam", "JNI_ABORT")) - routine ("blas", "drotmg", JDoubleW("dd1"), JDoubleW("dd2"), JDoubleW("dx1"), JDouble("dy1"), JDoubleArray("dparam", "JNI_ABORT")) - routine ("blas", "srotmg", JFloatW("sd1"), JFloatW("sd2"), JFloatW("sx1"), JFloat("sy1"), JFloatArray("sparam", "JNI_ABORT")) - routine ("blas", "dsbmv", JString("uplo"), JInt("n"), JInt("k"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDouble("beta"), JDoubleArray("y"), JInt("incy")) - routine ("blas", "ssbmv", JString("uplo"), JInt("n"), JInt("k"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloat("beta"), JFloatArray("y"), JInt("incy")) - routine ("blas", "dscal", JInt("n"), JDouble("alpha"), JDoubleArray("x"), JInt("incx")) - routine ("blas", "sscal", JInt("n"), JFloat("alpha"), JFloatArray("x"), JInt("incx")) - routine ("blas", "dspmv", JString("uplo"), JInt("n"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDouble("beta"), JDoubleArray("y"), JInt("incy")) - routine ("blas", "sspmv", JString("uplo"), JInt("n"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloat("beta"), JFloatArray("y"), JInt("incy")) - routine ("blas", "dspr", JString("uplo"), JInt("n"), JDouble("alpha"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("a")) - routine ("blas", "sspr", JString("uplo"), JInt("n"), JFloat("alpha"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("a")) - routine ("blas", "dspr2", JString("uplo"), JInt("n"), JDouble("alpha"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("y", "JNI_ABORT"), JInt("incy"), JDoubleArray("a")) - routine ("blas", "sspr2", JString("uplo"), JInt("n"), JFloat("alpha"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("y", "JNI_ABORT"), JInt("incy"), JFloatArray("a")) - routine ("blas", "dswap", JInt("n"), JDoubleArray("x"), JInt("incx"), JDoubleArray("y"), JInt("incy")) - routine ("blas", "sswap", JInt("n"), JFloatArray("x"), JInt("incx"), JFloatArray("y"), JInt("incy")) - routine ("blas", "dsymm", JString("side"), JString("uplo"), JInt("m"), JInt("n"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("b", "JNI_ABORT"), JInt("ldb"), JDouble("beta"), JDoubleArray("c"), JInt("ldc")) - routine ("blas", "ssymm", JString("side"), JString("uplo"), JInt("m"), JInt("n"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("b", "JNI_ABORT"), JInt("ldb"), JFloat("beta"), JFloatArray("c"), JInt("ldc")) - routine ("blas", "dsymv", JString("uplo"), JInt("n"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDouble("beta"), JDoubleArray("y"), JInt("incy")) - routine ("blas", "ssymv", JString("uplo"), JInt("n"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloat("beta"), JFloatArray("y"), JInt("incy")) - routine ("blas", "dsyr", JString("uplo"), JInt("n"), JDouble("alpha"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("a"), JInt("lda")) - routine ("blas", "ssyr", JString("uplo"), JInt("n"), JFloat("alpha"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("a"), JInt("lda")) - routine ("blas", "dsyr2", JString("uplo"), JInt("n"), JDouble("alpha"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("y", "JNI_ABORT"), JInt("incy"), JDoubleArray("a"), JInt("lda")) - routine ("blas", "ssyr2", JString("uplo"), JInt("n"), JFloat("alpha"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("y", "JNI_ABORT"), JInt("incy"), JFloatArray("a"), JInt("lda")) - routine ("blas", "dsyr2k", JString("uplo"), JString("trans"), JInt("n"), JInt("k"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("b", "JNI_ABORT"), JInt("ldb"), JDouble("beta"), JDoubleArray("c"), JInt("ldc")) - routine ("blas", "ssyr2k", JString("uplo"), JString("trans"), JInt("n"), JInt("k"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("b", "JNI_ABORT"), JInt("ldb"), JFloat("beta"), JFloatArray("c"), JInt("ldc")) - routine ("blas", "dsyrk", JString("uplo"), JString("trans"), JInt("n"), JInt("k"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDouble("beta"), JDoubleArray("c"), JInt("ldc")) - routine ("blas", "ssyrk", JString("uplo"), JString("trans"), JInt("n"), JInt("k"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloat("beta"), JFloatArray("c"), JInt("ldc")) - routine ("blas", "dtbmv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("k"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x"), JInt("incx")) - routine ("blas", "stbmv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("k"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x"), JInt("incx")) - routine ("blas", "dtbsv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("k"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x"), JInt("incx")) - routine ("blas", "stbsv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("k"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x"), JInt("incx")) - routine ("blas", "dtpmv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JDoubleArray("a", "JNI_ABORT"), JDoubleArray("x"), JInt("incx")) - routine ("blas", "stpmv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JFloatArray("a", "JNI_ABORT"), JFloatArray("x"), JInt("incx")) - routine ("blas", "dtpsv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JDoubleArray("a", "JNI_ABORT"), JDoubleArray("x"), JInt("incx")) - routine ("blas", "stpsv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JFloatArray("a", "JNI_ABORT"), JFloatArray("x"), JInt("incx")) - routine ("blas", "dtrmm", JString("side"), JString("uplo"), JString("transa"), JString("diag"), JInt("m"), JInt("n"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("b"), JInt("ldb")) - routine ("blas", "strmm", JString("side"), JString("uplo"), JString("transa"), JString("diag"), JInt("m"), JInt("n"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("b"), JInt("ldb")) - routine ("blas", "dtrmv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x"), JInt("incx")) - routine ("blas", "strmv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x"), JInt("incx")) - routine ("blas", "dtrsm", JString("side"), JString("uplo"), JString("transa"), JString("diag"), JInt("m"), JInt("n"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("b"), JInt("ldb")) - routine ("blas", "strsm", JString("side"), JString("uplo"), JString("transa"), JString("diag"), JInt("m"), JInt("n"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("b"), JInt("ldb")) - routine ("blas", "dtrsv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x"), JInt("incx")) - routine ("blas", "strsv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x"), JInt("incx")) - routine_r("blas", JIntR(), "idamax", JInt("n"), JDoubleArray("dx", "JNI_ABORT"), JInt("incdx")) - routine_r("blas", JIntR(), "isamax", JInt("n"), JFloatArray("sx", "JNI_ABORT"), JInt("incsx")) + RoutineR ("blas", JDoubleR(), "dasum", JInt("n"), JDoubleArray("x", "JNI_ABORT"), JInt("incx")) + RoutineR ("blas", JFloatR(), "sasum", JInt("n"), JFloatArray("x", "JNI_ABORT"), JInt("incx")) + Routine ("blas", "daxpy", JInt("n"), JDouble("alpha"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("y"), JInt("incy")) + Routine ("blas", "saxpy", JInt("n"), JFloat("alpha"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("y"), JInt("incy")) + Routine ("blas", "dcopy", JInt("n"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("y"), JInt("incy")) + Routine ("blas", "scopy", JInt("n"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("y"), JInt("incy")) + RoutineR ("blas", JDoubleR(), "ddot", JInt("n"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("y", "JNI_ABORT"), JInt("incy")) + RoutineR ("blas", JFloatR(), "sdot", JInt("n"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("y", "JNI_ABORT"), JInt("incy")) + RoutineR ("blas", JFloatR(), "sdsdot", JInt("n"), JFloat("sb"), JFloatArray("sx", "JNI_ABORT"), JInt("incsx"), JFloatArray("sy", "JNI_ABORT"), JInt("incsy")) + Routine ("blas", "dgbmv", JString("trans"), JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDouble("beta"), JDoubleArray("y"), JInt("incy")) + Routine ("blas", "sgbmv", JString("trans"), JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloat("beta"), JFloatArray("y"), JInt("incy")) + Routine ("blas", "dgemm", JString("transa"), JString("transb"), JInt("m"), JInt("n"), JInt("k"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("b", "JNI_ABORT"), JInt("ldb"), JDouble("beta"), JDoubleArray("c"), JInt("ldc")) + Routine ("blas", "sgemm", JString("transa"), JString("transb"), JInt("m"), JInt("n"), JInt("k"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("b", "JNI_ABORT"), JInt("ldb"), JFloat("beta"), JFloatArray("c"), JInt("ldc")) + Routine ("blas", "dgemv", JString("trans"), JInt("m"), JInt("n"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDouble("beta"), JDoubleArray("y"), JInt("incy")) + Routine ("blas", "sgemv", JString("trans"), JInt("m"), JInt("n"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloat("beta"), JFloatArray("y"), JInt("incy")) + Routine ("blas", "dger", JInt("m"), JInt("n"), JDouble("alpha"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("y", "JNI_ABORT"), JInt("incy"), JDoubleArray("a"), JInt("lda")) + Routine ("blas", "sger", JInt("m"), JInt("n"), JFloat("alpha"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("y", "JNI_ABORT"), JInt("incy"), JFloatArray("a"), JInt("lda")) + RoutineR ("blas", JDoubleR(), "dnrm2", JInt("n"), JDoubleArray("x", "JNI_ABORT"), JInt("incx")) + RoutineR ("blas", JFloatR(), "snrm2", JInt("n"), JFloatArray("x", "JNI_ABORT"), JInt("incx")) + Routine ("blas", "drot", JInt("n"), JDoubleArray("dx"), JInt("incx"), JDoubleArray("dy"), JInt("incy"), JDouble("c"), JDouble("s")) + Routine ("blas", "srot", JInt("n"), JFloatArray("sx"), JInt("incx"), JFloatArray("sy"), JInt("incy"), JFloat("c"), JFloat("s")) + Routine ("blas", "drotm", JInt("n"), JDoubleArray("dx", "JNI_ABORT"), JInt("incx"), JDoubleArray("dy"), JInt("incy"), JDoubleArray("dparam", "JNI_ABORT")) + Routine ("blas", "srotm", JInt("n"), JFloatArray("sx", "JNI_ABORT"), JInt("incx"), JFloatArray("sy"), JInt("incy"), JFloatArray("sparam", "JNI_ABORT")) + Routine ("blas", "drotmg", JDoubleW("dd1"), JDoubleW("dd2"), JDoubleW("dx1"), JDouble("dy1"), JDoubleArray("dparam", "JNI_ABORT")) + Routine ("blas", "srotmg", JFloatW("sd1"), JFloatW("sd2"), JFloatW("sx1"), JFloat("sy1"), JFloatArray("sparam", "JNI_ABORT")) + Routine ("blas", "dsbmv", JString("uplo"), JInt("n"), JInt("k"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDouble("beta"), JDoubleArray("y"), JInt("incy")) + Routine ("blas", "ssbmv", JString("uplo"), JInt("n"), JInt("k"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloat("beta"), JFloatArray("y"), JInt("incy")) + Routine ("blas", "dscal", JInt("n"), JDouble("alpha"), JDoubleArray("x"), JInt("incx")) + Routine ("blas", "sscal", JInt("n"), JFloat("alpha"), JFloatArray("x"), JInt("incx")) + Routine ("blas", "dspmv", JString("uplo"), JInt("n"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDouble("beta"), JDoubleArray("y"), JInt("incy")) + Routine ("blas", "sspmv", JString("uplo"), JInt("n"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloat("beta"), JFloatArray("y"), JInt("incy")) + Routine ("blas", "dspr", JString("uplo"), JInt("n"), JDouble("alpha"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("a")) + Routine ("blas", "sspr", JString("uplo"), JInt("n"), JFloat("alpha"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("a")) + Routine ("blas", "dspr2", JString("uplo"), JInt("n"), JDouble("alpha"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("y", "JNI_ABORT"), JInt("incy"), JDoubleArray("a")) + Routine ("blas", "sspr2", JString("uplo"), JInt("n"), JFloat("alpha"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("y", "JNI_ABORT"), JInt("incy"), JFloatArray("a")) + Routine ("blas", "dswap", JInt("n"), JDoubleArray("x"), JInt("incx"), JDoubleArray("y"), JInt("incy")) + Routine ("blas", "sswap", JInt("n"), JFloatArray("x"), JInt("incx"), JFloatArray("y"), JInt("incy")) + Routine ("blas", "dsymm", JString("side"), JString("uplo"), JInt("m"), JInt("n"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("b", "JNI_ABORT"), JInt("ldb"), JDouble("beta"), JDoubleArray("c"), JInt("ldc")) + Routine ("blas", "ssymm", JString("side"), JString("uplo"), JInt("m"), JInt("n"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("b", "JNI_ABORT"), JInt("ldb"), JFloat("beta"), JFloatArray("c"), JInt("ldc")) + Routine ("blas", "dsymv", JString("uplo"), JInt("n"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDouble("beta"), JDoubleArray("y"), JInt("incy")) + Routine ("blas", "ssymv", JString("uplo"), JInt("n"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloat("beta"), JFloatArray("y"), JInt("incy")) + Routine ("blas", "dsyr", JString("uplo"), JInt("n"), JDouble("alpha"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("a"), JInt("lda")) + Routine ("blas", "ssyr", JString("uplo"), JInt("n"), JFloat("alpha"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("a"), JInt("lda")) + Routine ("blas", "dsyr2", JString("uplo"), JInt("n"), JDouble("alpha"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("y", "JNI_ABORT"), JInt("incy"), JDoubleArray("a"), JInt("lda")) + Routine ("blas", "ssyr2", JString("uplo"), JInt("n"), JFloat("alpha"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("y", "JNI_ABORT"), JInt("incy"), JFloatArray("a"), JInt("lda")) + Routine ("blas", "dsyr2k", JString("uplo"), JString("trans"), JInt("n"), JInt("k"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("b", "JNI_ABORT"), JInt("ldb"), JDouble("beta"), JDoubleArray("c"), JInt("ldc")) + Routine ("blas", "ssyr2k", JString("uplo"), JString("trans"), JInt("n"), JInt("k"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("b", "JNI_ABORT"), JInt("ldb"), JFloat("beta"), JFloatArray("c"), JInt("ldc")) + Routine ("blas", "dsyrk", JString("uplo"), JString("trans"), JInt("n"), JInt("k"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDouble("beta"), JDoubleArray("c"), JInt("ldc")) + Routine ("blas", "ssyrk", JString("uplo"), JString("trans"), JInt("n"), JInt("k"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloat("beta"), JFloatArray("c"), JInt("ldc")) + Routine ("blas", "dtbmv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("k"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x"), JInt("incx")) + Routine ("blas", "stbmv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("k"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x"), JInt("incx")) + Routine ("blas", "dtbsv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("k"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x"), JInt("incx")) + Routine ("blas", "stbsv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("k"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x"), JInt("incx")) + Routine ("blas", "dtpmv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JDoubleArray("a", "JNI_ABORT"), JDoubleArray("x"), JInt("incx")) + Routine ("blas", "stpmv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JFloatArray("a", "JNI_ABORT"), JFloatArray("x"), JInt("incx")) + Routine ("blas", "dtpsv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JDoubleArray("a", "JNI_ABORT"), JDoubleArray("x"), JInt("incx")) + Routine ("blas", "stpsv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JFloatArray("a", "JNI_ABORT"), JFloatArray("x"), JInt("incx")) + Routine ("blas", "dtrmm", JString("side"), JString("uplo"), JString("transa"), JString("diag"), JInt("m"), JInt("n"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("b"), JInt("ldb")) + Routine ("blas", "strmm", JString("side"), JString("uplo"), JString("transa"), JString("diag"), JInt("m"), JInt("n"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("b"), JInt("ldb")) + Routine ("blas", "dtrmv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x"), JInt("incx")) + Routine ("blas", "strmv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x"), JInt("incx")) + Routine ("blas", "dtrsm", JString("side"), JString("uplo"), JString("transa"), JString("diag"), JInt("m"), JInt("n"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("b"), JInt("ldb")) + Routine ("blas", "strsm", JString("side"), JString("uplo"), JString("transa"), JString("diag"), JInt("m"), JInt("n"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("b"), JInt("ldb")) + Routine ("blas", "dtrsv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x"), JInt("incx")) + Routine ("blas", "strsv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x"), JInt("incx")) + RoutineR ("blas", JIntR(), "idamax", JInt("n"), JDoubleArray("dx", "JNI_ABORT"), JInt("incdx")) + RoutineR ("blas", JIntR(), "isamax", JInt("n"), JFloatArray("sx", "JNI_ABORT"), JInt("incsx")) if sys.argv[1] == "arpack": - routine ("arpack", "dmout", JInt("lout"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JInt("idigit"), JString("ifmt")) - routine ("arpack", "smout", JInt("lout"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JInt("idigit"), JString("ifmt")) - routine ("arpack", "dvout", JInt("lout"), JInt("n"), JDoubleArray("sx"), JInt("idigit"), JString("ifmt")) - routine ("arpack", "svout", JInt("lout"), JInt("n"), JFloatArray("sx"), JInt("idigit"), JString("ifmt")) - routine ("arpack", "ivout", JInt("lout"), JInt("n"), JIntArray("ix"), JInt("idigit"), JString("ifmt")) - routine ("arpack", "dgetv0", JIntW("ido"), JString("bmat"), JInt("itry"), JBoolean("initv"), JInt("n"), JInt("j"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("resid"), JDoubleW("rnorm"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("ierr")) - routine ("arpack", "sgetv0", JIntW("ido"), JString("bmat"), JInt("itry"), JBoolean("initv"), JInt("n"), JInt("j"), JFloatArray("v"), JInt("ldv"), JFloatArray("resid"), JFloatW("rnorm"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("ierr")) - # routine ("arpack", "dlaqrb", JBoolean("wantt"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("z"), JIntW("info")) - # routine ("arpack", "slaqrb", JBoolean("wantt"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("z"), JIntW("info")) - routine ("arpack", "dnaitr", JIntW("ido"), JString("bmat"), JInt("n"), JInt("k"), JInt("np"), JInt("nb"), JDoubleArray("resid"), JDoubleW("rnorm"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("info")) - routine ("arpack", "snaitr", JIntW("ido"), JString("bmat"), JInt("n"), JInt("k"), JInt("np"), JInt("nb"), JFloatArray("resid"), JFloatW("rnorm"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("info")) - routine ("arpack", "dnapps", JInt("n"), JIntW("kev"), JInt("np"), JDoubleArray("shiftr"), JDoubleArray("shifti"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("resid"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workl"), JDoubleArray("workd")) - routine ("arpack", "snapps", JInt("n"), JIntW("kev"), JInt("np"), JFloatArray("shiftr"), JFloatArray("shifti"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JFloatArray("resid"), JFloatArray("q"), JInt("ldq"), JFloatArray("workl"), JFloatArray("workd")) - routine ("arpack", "dnaup2", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JIntW("np"), JDouble("tol"), JDoubleArray("resid"), JInt("mode"), JInt("iupd"), JInt("ishift"), JIntW("mxiter"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("ritzr"), JDoubleArray("ritzi"), JDoubleArray("bounds"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workl"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("info")) - routine ("arpack", "snaup2", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JIntW("np"), JFloat("tol"), JFloatArray("resid"), JInt("mode"), JInt("iupd"), JInt("ishift"), JIntW("mxiter"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JFloatArray("ritzr"), JFloatArray("ritzi"), JFloatArray("bounds"), JFloatArray("q"), JInt("ldq"), JFloatArray("workl"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("info")) - routine ("arpack", "dnaupd", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JInt("nev"), JDoubleW("tol"), JDoubleArray("resid"), JInt("ncv"), JDoubleArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JDoubleArray("workd"), JDoubleArray("workl"), JInt("lworkl"), JIntW("info")) - routine ("arpack", "snaupd", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JInt("nev"), JFloatW("tol"), JFloatArray("resid"), JInt("ncv"), JFloatArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JFloatArray("workd"), JFloatArray("workl"), JInt("lworkl"), JIntW("info")) - routine ("arpack", "dnconv", JInt("n"), JDoubleArray("ritzr"), JDoubleArray("ritzi"), JDoubleArray("bounds"), JDouble("tol"), JIntW("nconv")) - routine ("arpack", "snconv", JInt("n"), JFloatArray("ritzr"), JFloatArray("ritzi"), JFloatArray("bounds"), JFloat("tol"), JIntW("nconv")) - routine ("arpack", "dsconv", JInt("n"), JDoubleArray("ritz"), JDoubleArray("bounds"), JDouble("tol"), JIntW("nconv")) - routine ("arpack", "ssconv", JInt("n"), JFloatArray("ritz"), JFloatArray("bounds"), JFloat("tol"), JIntW("nconv")) - routine ("arpack", "dneigh", JDouble("rnorm"), JIntW("n"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("ritzr"), JDoubleArray("ritzi"), JDoubleArray("bounds"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workl"), JIntW("ierr")) - routine ("arpack", "sneigh", JFloat("rnorm"), JIntW("n"), JFloatArray("h"), JInt("ldh"), JFloatArray("ritzr"), JFloatArray("ritzi"), JFloatArray("bounds"), JFloatArray("q"), JInt("ldq"), JFloatArray("workl"), JIntW("ierr")) - routine ("arpack", "dneupd", JBoolean("rvec"), JString("howmny"), JBooleanArray("select"), JDoubleArray("dr"), JDoubleArray("di"), JDoubleArray("z"), JInt("ldz"), JDouble("sigmar"), JDouble("sigmai"), JDoubleArray("workev"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JDouble("tol"), JDoubleArray("resid"), JInt("ncv"), JDoubleArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JDoubleArray("workd"), JDoubleArray("workl"), JInt("lworkl"), JIntW("info")) - routine ("arpack", "sneupd", JBoolean("rvec"), JString("howmny"), JBooleanArray("select"), JFloatArray("dr"), JFloatArray("di"), JFloatArray("z"), JInt("ldz"), JFloat("sigmar"), JFloat("sigmai"), JFloatArray("workev"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JFloat("tol"), JFloatArray("resid"), JInt("ncv"), JFloatArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JFloatArray("workd"), JFloatArray("workl"), JInt("lworkl"), JIntW("info")) - routine ("arpack", "dngets", JInt("ishift"), JString("which"), JIntW("kev"), JIntW("np"), JDoubleArray("ritzr"), JDoubleArray("ritzi"), JDoubleArray("bounds"), JDoubleArray("shiftr"), JDoubleArray("shifti")) - routine ("arpack", "sngets", JInt("ishift"), JString("which"), JIntW("kev"), JIntW("np"), JFloatArray("ritzr"), JFloatArray("ritzi"), JFloatArray("bounds"), JFloatArray("shiftr"), JFloatArray("shifti")) - routine ("arpack", "dsaitr", JIntW("ido"), JString("bmat"), JInt("n"), JInt("k"), JInt("np"), JInt("mode"), JDoubleArray("resid"), JDoubleW("rnorm"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("info")) - routine ("arpack", "ssaitr", JIntW("ido"), JString("bmat"), JInt("n"), JInt("k"), JInt("np"), JInt("mode"), JFloatArray("resid"), JFloatW("rnorm"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("info")) - routine ("arpack", "dsapps", JInt("n"), JInt("kev"), JInt("np"), JDoubleArray("shift"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("resid"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workd")) - routine ("arpack", "ssapps", JInt("n"), JInt("kev"), JInt("np"), JFloatArray("shift"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JFloatArray("resid"), JFloatArray("q"), JInt("ldq"), JFloatArray("workd")) - routine ("arpack", "dsaup2", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JIntW("np"), JDouble("tol"), JDoubleArray("resid"), JInt("mode"), JInt("iupd"), JInt("ishift"), JIntW("mxiter"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("ritz"), JDoubleArray("bounds"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workl"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("info")) - routine ("arpack", "ssaup2", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JIntW("np"), JFloat("tol"), JFloatArray("resid"), JInt("mode"), JInt("iupd"), JInt("ishift"), JIntW("mxiter"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JFloatArray("ritz"), JFloatArray("bounds"), JFloatArray("q"), JInt("ldq"), JFloatArray("workl"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("info")) - routine ("arpack", "dseigt", JDouble("rnorm"), JInt("n"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("eig"), JDoubleArray("bounds"), JDoubleArray("workl"), JIntW("ierr")) - routine ("arpack", "sseigt", JFloat("rnorm"), JInt("n"), JFloatArray("h"), JInt("ldh"), JFloatArray("eig"), JFloatArray("bounds"), JFloatArray("workl"), JIntW("ierr")) - routine ("arpack", "dsesrt", JString("which"), JBoolean("apply"), JInt("n"), JDoubleArray("x"), JInt("na"), JDoubleArray("a"), JInt("lda")) - routine ("arpack", "ssesrt", JString("which"), JBoolean("apply"), JInt("n"), JFloatArray("x"), JInt("na"), JFloatArray("a"), JInt("lda")) - routine ("arpack", "dsaupd", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JInt("nev"), JDoubleW("tol"), JDoubleArray("resid"), JInt("ncv"), JDoubleArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JDoubleArray("workd"), JDoubleArray("workl"), JInt("lworkl"), JIntW("info")) - routine ("arpack", "ssaupd", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JInt("nev"), JFloatW("tol"), JFloatArray("resid"), JInt("ncv"), JFloatArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JFloatArray("workd"), JFloatArray("workl"), JInt("lworkl"), JIntW("info")) - routine ("arpack", "dseupd", JBoolean("rvec"), JString("howmny"), JBooleanArray("select"), JDoubleArray("d"), JDoubleArray("z"), JInt("ldz"), JDouble("sigma"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JDouble("tol"), JDoubleArray("resid"), JInt("ncv"), JDoubleArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JDoubleArray("workd"), JDoubleArray("workl"), JInt("lworkl"), JIntW("info")) - routine ("arpack", "sseupd", JBoolean("rvec"), JString("howmny"), JBooleanArray("select"), JFloatArray("d"), JFloatArray("z"), JInt("ldz"), JFloat("sigma"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JFloat("tol"), JFloatArray("resid"), JInt("ncv"), JFloatArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JFloatArray("workd"), JFloatArray("workl"), JInt("lworkl"), JIntW("info")) - routine ("arpack", "dsgets", JInt("ishift"), JString("which"), JIntW("kev"), JIntW("np"), JDoubleArray("ritz"), JDoubleArray("bounds"), JDoubleArray("shifts")) - routine ("arpack", "ssgets", JInt("ishift"), JString("which"), JIntW("kev"), JIntW("np"), JFloatArray("ritz"), JFloatArray("bounds"), JFloatArray("shifts")) - routine ("arpack", "dsortc", JString("which"), JBoolean("apply"), JInt("n"), JDoubleArray("xreal"), JDoubleArray("ximag"), JDoubleArray("y")) - routine ("arpack", "ssortc", JString("which"), JBoolean("apply"), JInt("n"), JFloatArray("xreal"), JFloatArray("ximag"), JFloatArray("y")) - routine ("arpack", "dsortr", JString("which"), JBoolean("apply"), JInt("n"), JDoubleArray("x1"), JDoubleArray("x2")) - routine ("arpack", "ssortr", JString("which"), JBoolean("apply"), JInt("n"), JFloatArray("x1"), JFloatArray("x2")) - routine ("arpack", "dstatn") - routine ("arpack", "sstatn") - routine ("arpack", "dstats") - routine ("arpack", "sstats") - routine ("arpack", "dstqrb", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JDoubleArray("work"), JIntW("info")) - routine ("arpack", "sstqrb", JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JFloatArray("work"), JIntW("info")) - routine_r("arpack", JIntR(), "icnteq", JInt("n"), JIntArray("array"), JInt("value")) - routine ("arpack", "icopy", JInt("n"), JIntArray("lx"), JInt("incx"), JIntArray("ly"), JInt("incy")) - routine ("arpack", "iset", JInt("n"), JInt("value"), JIntArray("array"), JInt("inc")) - routine ("arpack", "iswap", JInt("n"), JIntArray("sx"), JInt("incx"), JIntArray("sy"), JInt("incy")) - routine ("arpack", "second", JFloatW("t")) + Routine ("arpack", "dmout", JInt("lout"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JInt("idigit"), JString("ifmt")) + Routine ("arpack", "smout", JInt("lout"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JInt("idigit"), JString("ifmt")) + Routine ("arpack", "dvout", JInt("lout"), JInt("n"), JDoubleArray("sx"), JInt("idigit"), JString("ifmt")) + Routine ("arpack", "svout", JInt("lout"), JInt("n"), JFloatArray("sx"), JInt("idigit"), JString("ifmt")) + Routine ("arpack", "ivout", JInt("lout"), JInt("n"), JIntArray("ix"), JInt("idigit"), JString("ifmt")) + Routine ("arpack", "dgetv0", JIntW("ido"), JString("bmat"), JInt("itry"), JBoolean("initv"), JInt("n"), JInt("j"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("resid"), JDoubleW("rnorm"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("ierr")) + Routine ("arpack", "sgetv0", JIntW("ido"), JString("bmat"), JInt("itry"), JBoolean("initv"), JInt("n"), JInt("j"), JFloatArray("v"), JInt("ldv"), JFloatArray("resid"), JFloatW("rnorm"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("ierr")) + Routine_NI("arpack", "dlaqrb", JBoolean("wantt"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("z"), JIntW("info")) + Routine_NI("arpack", "slaqrb", JBoolean("wantt"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("z"), JIntW("info")) + Routine ("arpack", "dnaitr", JIntW("ido"), JString("bmat"), JInt("n"), JInt("k"), JInt("np"), JInt("nb"), JDoubleArray("resid"), JDoubleW("rnorm"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("info")) + Routine ("arpack", "snaitr", JIntW("ido"), JString("bmat"), JInt("n"), JInt("k"), JInt("np"), JInt("nb"), JFloatArray("resid"), JFloatW("rnorm"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("info")) + Routine ("arpack", "dnapps", JInt("n"), JIntW("kev"), JInt("np"), JDoubleArray("shiftr"), JDoubleArray("shifti"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("resid"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workl"), JDoubleArray("workd")) + Routine ("arpack", "snapps", JInt("n"), JIntW("kev"), JInt("np"), JFloatArray("shiftr"), JFloatArray("shifti"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JFloatArray("resid"), JFloatArray("q"), JInt("ldq"), JFloatArray("workl"), JFloatArray("workd")) + Routine ("arpack", "dnaup2", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JIntW("np"), JDouble("tol"), JDoubleArray("resid"), JInt("mode"), JInt("iupd"), JInt("ishift"), JIntW("mxiter"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("ritzr"), JDoubleArray("ritzi"), JDoubleArray("bounds"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workl"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("info")) + Routine ("arpack", "snaup2", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JIntW("np"), JFloat("tol"), JFloatArray("resid"), JInt("mode"), JInt("iupd"), JInt("ishift"), JIntW("mxiter"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JFloatArray("ritzr"), JFloatArray("ritzi"), JFloatArray("bounds"), JFloatArray("q"), JInt("ldq"), JFloatArray("workl"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("info")) + Routine ("arpack", "dnaupd", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JInt("nev"), JDoubleW("tol"), JDoubleArray("resid"), JInt("ncv"), JDoubleArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JDoubleArray("workd"), JDoubleArray("workl"), JInt("lworkl"), JIntW("info")) + Routine ("arpack", "snaupd", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JInt("nev"), JFloatW("tol"), JFloatArray("resid"), JInt("ncv"), JFloatArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JFloatArray("workd"), JFloatArray("workl"), JInt("lworkl"), JIntW("info")) + Routine ("arpack", "dnconv", JInt("n"), JDoubleArray("ritzr"), JDoubleArray("ritzi"), JDoubleArray("bounds"), JDouble("tol"), JIntW("nconv")) + Routine ("arpack", "snconv", JInt("n"), JFloatArray("ritzr"), JFloatArray("ritzi"), JFloatArray("bounds"), JFloat("tol"), JIntW("nconv")) + Routine ("arpack", "dsconv", JInt("n"), JDoubleArray("ritz"), JDoubleArray("bounds"), JDouble("tol"), JIntW("nconv")) + Routine ("arpack", "ssconv", JInt("n"), JFloatArray("ritz"), JFloatArray("bounds"), JFloat("tol"), JIntW("nconv")) + Routine ("arpack", "dneigh", JDouble("rnorm"), JIntW("n"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("ritzr"), JDoubleArray("ritzi"), JDoubleArray("bounds"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workl"), JIntW("ierr")) + Routine ("arpack", "sneigh", JFloat("rnorm"), JIntW("n"), JFloatArray("h"), JInt("ldh"), JFloatArray("ritzr"), JFloatArray("ritzi"), JFloatArray("bounds"), JFloatArray("q"), JInt("ldq"), JFloatArray("workl"), JIntW("ierr")) + Routine ("arpack", "dneupd", JBoolean("rvec"), JString("howmny"), JBooleanArray("select"), JDoubleArray("dr"), JDoubleArray("di"), JDoubleArray("z"), JInt("ldz"), JDouble("sigmar"), JDouble("sigmai"), JDoubleArray("workev"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JDouble("tol"), JDoubleArray("resid"), JInt("ncv"), JDoubleArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JDoubleArray("workd"), JDoubleArray("workl"), JInt("lworkl"), JIntW("info")) + Routine ("arpack", "sneupd", JBoolean("rvec"), JString("howmny"), JBooleanArray("select"), JFloatArray("dr"), JFloatArray("di"), JFloatArray("z"), JInt("ldz"), JFloat("sigmar"), JFloat("sigmai"), JFloatArray("workev"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JFloat("tol"), JFloatArray("resid"), JInt("ncv"), JFloatArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JFloatArray("workd"), JFloatArray("workl"), JInt("lworkl"), JIntW("info")) + Routine ("arpack", "dngets", JInt("ishift"), JString("which"), JIntW("kev"), JIntW("np"), JDoubleArray("ritzr"), JDoubleArray("ritzi"), JDoubleArray("bounds"), JDoubleArray("shiftr"), JDoubleArray("shifti")) + Routine ("arpack", "sngets", JInt("ishift"), JString("which"), JIntW("kev"), JIntW("np"), JFloatArray("ritzr"), JFloatArray("ritzi"), JFloatArray("bounds"), JFloatArray("shiftr"), JFloatArray("shifti")) + Routine ("arpack", "dsaitr", JIntW("ido"), JString("bmat"), JInt("n"), JInt("k"), JInt("np"), JInt("mode"), JDoubleArray("resid"), JDoubleW("rnorm"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("info")) + Routine ("arpack", "ssaitr", JIntW("ido"), JString("bmat"), JInt("n"), JInt("k"), JInt("np"), JInt("mode"), JFloatArray("resid"), JFloatW("rnorm"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("info")) + Routine ("arpack", "dsapps", JInt("n"), JInt("kev"), JInt("np"), JDoubleArray("shift"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("resid"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workd")) + Routine ("arpack", "ssapps", JInt("n"), JInt("kev"), JInt("np"), JFloatArray("shift"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JFloatArray("resid"), JFloatArray("q"), JInt("ldq"), JFloatArray("workd")) + Routine ("arpack", "dsaup2", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JIntW("np"), JDouble("tol"), JDoubleArray("resid"), JInt("mode"), JInt("iupd"), JInt("ishift"), JIntW("mxiter"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("ritz"), JDoubleArray("bounds"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workl"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("info")) + Routine ("arpack", "ssaup2", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JIntW("np"), JFloat("tol"), JFloatArray("resid"), JInt("mode"), JInt("iupd"), JInt("ishift"), JIntW("mxiter"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JFloatArray("ritz"), JFloatArray("bounds"), JFloatArray("q"), JInt("ldq"), JFloatArray("workl"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("info")) + Routine ("arpack", "dseigt", JDouble("rnorm"), JInt("n"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("eig"), JDoubleArray("bounds"), JDoubleArray("workl"), JIntW("ierr")) + Routine ("arpack", "sseigt", JFloat("rnorm"), JInt("n"), JFloatArray("h"), JInt("ldh"), JFloatArray("eig"), JFloatArray("bounds"), JFloatArray("workl"), JIntW("ierr")) + Routine ("arpack", "dsesrt", JString("which"), JBoolean("apply"), JInt("n"), JDoubleArray("x"), JInt("na"), JDoubleArray("a"), JInt("lda")) + Routine ("arpack", "ssesrt", JString("which"), JBoolean("apply"), JInt("n"), JFloatArray("x"), JInt("na"), JFloatArray("a"), JInt("lda")) + Routine ("arpack", "dsaupd", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JInt("nev"), JDoubleW("tol"), JDoubleArray("resid"), JInt("ncv"), JDoubleArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JDoubleArray("workd"), JDoubleArray("workl"), JInt("lworkl"), JIntW("info")) + Routine ("arpack", "ssaupd", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JInt("nev"), JFloatW("tol"), JFloatArray("resid"), JInt("ncv"), JFloatArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JFloatArray("workd"), JFloatArray("workl"), JInt("lworkl"), JIntW("info")) + Routine ("arpack", "dseupd", JBoolean("rvec"), JString("howmny"), JBooleanArray("select"), JDoubleArray("d"), JDoubleArray("z"), JInt("ldz"), JDouble("sigma"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JDouble("tol"), JDoubleArray("resid"), JInt("ncv"), JDoubleArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JDoubleArray("workd"), JDoubleArray("workl"), JInt("lworkl"), JIntW("info")) + Routine ("arpack", "sseupd", JBoolean("rvec"), JString("howmny"), JBooleanArray("select"), JFloatArray("d"), JFloatArray("z"), JInt("ldz"), JFloat("sigma"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JFloat("tol"), JFloatArray("resid"), JInt("ncv"), JFloatArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JFloatArray("workd"), JFloatArray("workl"), JInt("lworkl"), JIntW("info")) + Routine ("arpack", "dsgets", JInt("ishift"), JString("which"), JIntW("kev"), JIntW("np"), JDoubleArray("ritz"), JDoubleArray("bounds"), JDoubleArray("shifts")) + Routine ("arpack", "ssgets", JInt("ishift"), JString("which"), JIntW("kev"), JIntW("np"), JFloatArray("ritz"), JFloatArray("bounds"), JFloatArray("shifts")) + Routine ("arpack", "dsortc", JString("which"), JBoolean("apply"), JInt("n"), JDoubleArray("xreal"), JDoubleArray("ximag"), JDoubleArray("y")) + Routine ("arpack", "ssortc", JString("which"), JBoolean("apply"), JInt("n"), JFloatArray("xreal"), JFloatArray("ximag"), JFloatArray("y")) + Routine ("arpack", "dsortr", JString("which"), JBoolean("apply"), JInt("n"), JDoubleArray("x1"), JDoubleArray("x2")) + Routine ("arpack", "ssortr", JString("which"), JBoolean("apply"), JInt("n"), JFloatArray("x1"), JFloatArray("x2")) + Routine ("arpack", "dstatn") + Routine ("arpack", "sstatn") + Routine ("arpack", "dstats") + Routine ("arpack", "sstats") + Routine ("arpack", "dstqrb", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JDoubleArray("work"), JIntW("info")) + Routine ("arpack", "sstqrb", JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JFloatArray("work"), JIntW("info")) + RoutineR ("arpack", JIntR(), "icnteq", JInt("n"), JIntArray("array"), JInt("value")) + Routine ("arpack", "icopy", JInt("n"), JIntArray("lx"), JInt("incx"), JIntArray("ly"), JInt("incy")) + Routine ("arpack", "iset", JInt("n"), JInt("value"), JIntArray("array"), JInt("inc")) + Routine ("arpack", "iswap", JInt("n"), JIntArray("sx"), JInt("incx"), JIntArray("sy"), JInt("incy")) + Routine ("arpack", "second", JFloatW("t")) if sys.argv[1] == "lapack": - routine ("lapack", "dbdsdc", JString("uplo"), JString("compq"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("q"), JIntArray("iq"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dbdsqr", JString("uplo"), JInt("n"), JInt("ncvt"), JInt("nru"), JInt("ncc"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "ddisna", JString("job"), JInt("m"), JInt("n"), JDoubleArray("d"), JDoubleArray("sep"), JIntW("info")) - routine ("lapack", "dgbbrd", JString("vect"), JInt("m"), JInt("n"), JInt("ncc"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("pt"), JInt("ldpt"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dgbcon", JString("norm"), JInt("n"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JIntArray("ipiv"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dgbequ", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("r"), JDoubleArray("c"), JDoubleW("rowcnd"), JDoubleW("colcnd"), JDoubleW("amax"), JIntW("info")) - routine ("lapack", "dgbrfs", JString("trans"), JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("afb"), JInt("ldafb"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dgbsv", JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "dgbsvx", JString("fact"), JString("trans"), JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("afb"), JInt("ldafb"), JIntArray("ipiv"), JStringW("equed"), JDoubleArray("r"), JDoubleArray("c"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dgbtf2", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JIntArray("ipiv"), JIntW("info")) - routine ("lapack", "dgbtrf", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JIntArray("ipiv"), JIntW("info")) - routine ("lapack", "dgbtrs", JString("trans"), JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "dgebak", JString("job"), JString("side"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("scale"), JInt("m"), JDoubleArray("v"), JInt("ldv"), JIntW("info")) - routine ("lapack", "dgebal", JString("job"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("ilo"), JIntW("ihi"), JDoubleArray("scale"), JIntW("info")) - routine ("lapack", "dgebd2", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("tauq"), JDoubleArray("taup"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dgebrd", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("tauq"), JDoubleArray("taup"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dgecon", JString("norm"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dgeequ", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("r"), JDoubleArray("c"), JDoubleW("rowcnd"), JDoubleW("colcnd"), JDoubleW("amax"), JIntW("info")) - # routine ("lapack", "dgees", JString("jobvs"), JString("sort"), JObject("select"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("sdim"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("vs"), JInt("ldvs"), JDoubleArray("work"), JInt("lwork"), JBooleanArray("bwork"), JIntW("info")) - # routine ("lapack", "dgeesx", JString("jobvs"), JString("sort"), JObject("select"), JString("sense"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("sdim"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("vs"), JInt("ldvs"), JDoubleW("rconde"), JDoubleW("rcondv"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JBooleanArray("bwork"), JIntW("info")) - routine ("lapack", "dgeev", JString("jobvl"), JString("jobvr"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dgeevx", JString("balanc"), JString("jobvl"), JString("jobvr"), JString("sense"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JIntW("ilo"), JIntW("ihi"), JDoubleArray("scale"), JDoubleW("abnrm"), JDoubleArray("rconde"), JDoubleArray("rcondv"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dgegs", JString("jobvsl"), JString("jobvsr"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("vsl"), JInt("ldvsl"), JDoubleArray("vsr"), JInt("ldvsr"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dgegv", JString("jobvl"), JString("jobvr"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dgehd2", JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dgehrd", JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dgelq2", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dgelqf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dgels", JString("trans"), JInt("m"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dgelsd", JInt("m"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("s"), JDouble("rcond"), JIntW("rank"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dgelss", JInt("m"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("s"), JDouble("rcond"), JIntW("rank"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dgelsx", JInt("m"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntArray("jpvt"), JDouble("rcond"), JIntW("rank"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dgelsy", JInt("m"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntArray("jpvt"), JDouble("rcond"), JIntW("rank"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dgeql2", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dgeqlf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dgeqp3", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("jpvt"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dgeqpf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("jpvt"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dgeqr2", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dgeqrf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dgerfs", JString("trans"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("af"), JInt("ldaf"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dgerq2", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dgerqf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dgesc2", JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("rhs"), JIntArray("ipiv"), JIntArray("jpiv"), JDoubleW("scale")) - routine ("lapack", "dgesdd", JString("jobz"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("s"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dgesv", JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "dgesvd", JString("jobu"), JString("jobvt"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("s"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dgesvx", JString("fact"), JString("trans"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("af"), JInt("ldaf"), JIntArray("ipiv"), JStringW("equed"), JDoubleArray("r"), JDoubleArray("c"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dgetc2", JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JIntArray("jpiv"), JIntW("info")) - routine ("lapack", "dgetf2", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JIntW("info")) - routine ("lapack", "dgetrf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JIntW("info")) - routine ("lapack", "dgetri", JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dgetrs", JString("trans"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "dggbak", JString("job"), JString("side"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("lscale"), JDoubleArray("rscale"), JInt("m"), JDoubleArray("v"), JInt("ldv"), JIntW("info")) - routine ("lapack", "dggbal", JString("job"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("ilo"), JIntW("ihi"), JDoubleArray("lscale"), JDoubleArray("rscale"), JDoubleArray("work"), JIntW("info")) - # routine ("lapack", "dgges", JString("jobvsl"), JString("jobvsr"), JString("sort"), JObject("selctg"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("sdim"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("vsl"), JInt("ldvsl"), JDoubleArray("vsr"), JInt("ldvsr"), JDoubleArray("work"), JInt("lwork"), JBooleanArray("bwork"), JIntW("info")) - # routine ("lapack", "dggesx", JString("jobvsl"), JString("jobvsr"), JString("sort"), JObject("selctg"), JString("sense"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("sdim"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("vsl"), JInt("ldvsl"), JDoubleArray("vsr"), JInt("ldvsr"), JDoubleArray("rconde"), JDoubleArray("rcondv"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JBooleanArray("bwork"), JIntW("info")) - routine ("lapack", "dggev", JString("jobvl"), JString("jobvr"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dggevx", JString("balanc"), JString("jobvl"), JString("jobvr"), JString("sense"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JIntW("ilo"), JIntW("ihi"), JDoubleArray("lscale"), JDoubleArray("rscale"), JDoubleW("abnrm"), JDoubleW("bbnrm"), JDoubleArray("rconde"), JDoubleArray("rcondv"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JBooleanArray("bwork"), JIntW("info")) - routine ("lapack", "dggglm", JInt("n"), JInt("m"), JInt("p"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("d"), JDoubleArray("x"), JDoubleArray("y"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dgghrd", JString("compq"), JString("compz"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("z"), JInt("ldz"), JIntW("info")) - routine ("lapack", "dgglse", JInt("m"), JInt("n"), JInt("p"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("c"), JDoubleArray("d"), JDoubleArray("x"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dggqrf", JInt("n"), JInt("m"), JInt("p"), JDoubleArray("a"), JInt("lda"), JDoubleArray("taua"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("taub"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dggrqf", JInt("m"), JInt("p"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("taua"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("taub"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dggsvd", JString("jobu"), JString("jobv"), JString("jobq"), JInt("m"), JInt("n"), JInt("p"), JIntW("k"), JIntW("l"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alpha"), JDoubleArray("beta"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dggsvp", JString("jobu"), JString("jobv"), JString("jobq"), JInt("m"), JInt("p"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDouble("tola"), JDouble("tolb"), JIntW("k"), JIntW("l"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("q"), JInt("ldq"), JIntArray("iwork"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dgtcon", JString("norm"), JInt("n"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("du2"), JIntArray("ipiv"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dgtrfs", JString("trans"), JInt("n"), JInt("nrhs"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("dlf"), JDoubleArray("df"), JDoubleArray("duf"), JDoubleArray("du2"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dgtsv", JInt("n"), JInt("nrhs"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "dgtsvx", JString("fact"), JString("trans"), JInt("n"), JInt("nrhs"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("dlf"), JDoubleArray("df"), JDoubleArray("duf"), JDoubleArray("du2"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dgttrf", JInt("n"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("du2"), JIntArray("ipiv"), JIntW("info")) - routine ("lapack", "dgttrs", JString("trans"), JInt("n"), JInt("nrhs"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("du2"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "dgtts2", JInt("itrans"), JInt("n"), JInt("nrhs"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("du2"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb")) - routine ("lapack", "dhgeqz", JString("job"), JString("compq"), JString("compz"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dhsein", JString("side"), JString("eigsrc"), JString("initv"), JBooleanArray("select"), JInt("n"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JInt("mm"), JIntW("m"), JDoubleArray("work"), JIntArray("ifaill"), JIntArray("ifailr"), JIntW("info")) - routine ("lapack", "dhseqr", JString("job"), JString("compz"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine_r("lapack", JBooleanR(), "disnan", JDouble("din")) - routine ("lapack", "dlabad", JDoubleW("small"), JDoubleW("large")) - routine ("lapack", "dlabrd", JInt("m"), JInt("n"), JInt("nb"), JDoubleArray("a"), JInt("lda"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("tauq"), JDoubleArray("taup"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("y"), JInt("ldy")) - routine ("lapack", "dlacn2", JInt("n"), JDoubleArray("v"), JDoubleArray("x"), JIntArray("isgn"), JDoubleW("est"), JIntW("kase"), JIntArray("isave")) - routine ("lapack", "dlacon", JInt("n"), JDoubleArray("v"), JDoubleArray("x"), JIntArray("isgn"), JDoubleW("est"), JIntW("kase")) - routine ("lapack", "dlacpy", JString("uplo"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb")) - routine ("lapack", "dladiv", JDouble("a"), JDouble("b"), JDouble("c"), JDouble("d"), JDoubleW("p"), JDoubleW("q")) - routine ("lapack", "dlae2", JDouble("a"), JDouble("b"), JDouble("c"), JDoubleW("rt1"), JDoubleW("rt2")) - routine ("lapack", "dlaebz", JInt("ijob"), JInt("nitmax"), JInt("n"), JInt("mmax"), JInt("minp"), JInt("nbmin"), JDouble("abstol"), JDouble("reltol"), JDouble("pivmin"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("e2"), JIntArray("nval"), JDoubleArray("ab"), JDoubleArray("c"), JIntW("mout"), JIntArray("nab"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dlaed0", JInt("icompq"), JInt("qsiz"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("qstore"), JInt("ldqs"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dlaed1", JInt("n"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JIntArray("indxq"), JDoubleW("rho"), JInt("cutpnt"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dlaed2", JIntW("k"), JInt("n"), JInt("n1"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JIntArray("indxq"), JDoubleW("rho"), JDoubleArray("z"), JDoubleArray("dlamda"), JDoubleArray("w"), JDoubleArray("q2"), JIntArray("indx"), JIntArray("indxc"), JIntArray("indxp"), JIntArray("coltyp"), JIntW("info")) - routine ("lapack", "dlaed3", JInt("k"), JInt("n"), JInt("n1"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JDouble("rho"), JDoubleArray("dlamda"), JDoubleArray("q2"), JIntArray("indx"), JIntArray("ctot"), JDoubleArray("w"), JDoubleArray("s"), JIntW("info")) - routine ("lapack", "dlaed4", JInt("n"), JInt("i"), JDoubleArray("d"), JDoubleArray("z"), JDoubleArray("delta"), JDouble("rho"), JDoubleW("dlam"), JIntW("info")) - routine ("lapack", "dlaed5", JInt("i"), JDoubleArray("d"), JDoubleArray("z"), JDoubleArray("delta"), JDouble("rho"), JDoubleW("dlam")) - routine ("lapack", "dlaed6", JInt("kniter"), JBoolean("orgati"), JDouble("rho"), JDoubleArray("d"), JDoubleArray("z"), JDouble("finit"), JDoubleW("tau"), JIntW("info")) - routine ("lapack", "dlaed7", JInt("icompq"), JInt("n"), JInt("qsiz"), JInt("tlvls"), JInt("curlvl"), JInt("curpbm"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JIntArray("indxq"), JDoubleW("rho"), JInt("cutpnt"), JDoubleArray("qstore"), JIntArray("qptr"), JIntArray("prmptr"), JIntArray("perm"), JIntArray("givptr"), JIntArray("givcol"), JDoubleArray("givnum"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dlaed8", JInt("icompq"), JIntW("k"), JInt("n"), JInt("qsiz"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JIntArray("indxq"), JDoubleW("rho"), JInt("cutpnt"), JDoubleArray("z"), JDoubleArray("dlamda"), JDoubleArray("q2"), JInt("ldq2"), JDoubleArray("w"), JIntArray("perm"), JIntW("givptr"), JIntArray("givcol"), JDoubleArray("givnum"), JIntArray("indxp"), JIntArray("indx"), JIntW("info")) - routine ("lapack", "dlaed9", JInt("k"), JInt("kstart"), JInt("kstop"), JInt("n"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JDouble("rho"), JDoubleArray("dlamda"), JDoubleArray("w"), JDoubleArray("s"), JInt("lds"), JIntW("info")) - routine ("lapack", "dlaeda", JInt("n"), JInt("tlvls"), JInt("curlvl"), JInt("curpbm"), JIntArray("prmptr"), JIntArray("perm"), JIntArray("givptr"), JIntArray("givcol"), JDoubleArray("givnum"), JDoubleArray("q"), JIntArray("qptr"), JDoubleArray("z"), JDoubleArray("ztemp"), JIntW("info")) - routine ("lapack", "dlaein", JBoolean("rightv"), JBoolean("noinit"), JInt("n"), JDoubleArray("h"), JInt("ldh"), JDouble("wr"), JDouble("wi"), JDoubleArray("vr"), JDoubleArray("vi"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("work"), JDouble("eps3"), JDouble("smlnum"), JDouble("bignum"), JIntW("info")) - routine ("lapack", "dlaev2", JDouble("a"), JDouble("b"), JDouble("c"), JDoubleW("rt1"), JDoubleW("rt2"), JDoubleW("cs1"), JDoubleW("sn1")) - routine ("lapack", "dlaexc", JBoolean("wantq"), JInt("n"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("q"), JInt("ldq"), JInt("j1"), JInt("n1"), JInt("n2"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dlag2", JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDouble("safmin"), JDoubleW("scale1"), JDoubleW("scale2"), JDoubleW("wr1"), JDoubleW("wr2"), JDoubleW("wi")) - routine ("lapack", "dlag2s", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JFloatArray("sa"), JInt("ldsa"), JIntW("info")) - routine ("lapack", "dlags2", JBoolean("upper"), JDouble("a1"), JDouble("a2"), JDouble("a3"), JDouble("b1"), JDouble("b2"), JDouble("b3"), JDoubleW("csu"), JDoubleW("snu"), JDoubleW("csv"), JDoubleW("snv"), JDoubleW("csq"), JDoubleW("snq")) - routine ("lapack", "dlagtf", JInt("n"), JDoubleArray("a"), JDouble("lambda"), JDoubleArray("b"), JDoubleArray("c"), JDouble("tol"), JDoubleArray("d"), JIntArray("in"), JIntW("info")) - routine ("lapack", "dlagtm", JString("trans"), JInt("n"), JInt("nrhs"), JDouble("alpha"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("x"), JInt("ldx"), JDouble("beta"), JDoubleArray("b"), JInt("ldb")) - routine ("lapack", "dlagts", JInt("job"), JInt("n"), JDoubleArray("a"), JDoubleArray("b"), JDoubleArray("c"), JDoubleArray("d"), JIntArray("in"), JDoubleArray("y"), JDoubleW("tol"), JIntW("info")) - routine ("lapack", "dlagv2", JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleW("csl"), JDoubleW("snl"), JDoubleW("csr"), JDoubleW("snr")) - routine ("lapack", "dlahqr", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JInt("iloz"), JInt("ihiz"), JDoubleArray("z"), JInt("ldz"), JIntW("info")) - routine ("lapack", "dlahr2", JInt("n"), JInt("k"), JInt("nb"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("y"), JInt("ldy")) - routine ("lapack", "dlahrd", JInt("n"), JInt("k"), JInt("nb"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("y"), JInt("ldy")) - routine ("lapack", "dlaic1", JInt("job"), JInt("j"), JDoubleArray("x"), JDouble("sest"), JDoubleArray("w"), JDouble("gamma"), JDoubleW("sestpr"), JDoubleW("s"), JDoubleW("c")) - routine_r("lapack", JBooleanR(), "dlaisnan", JDouble("din1"), JDouble("din2")) - routine ("lapack", "dlaln2", JBoolean("ltrans"), JInt("na"), JInt("nw"), JDouble("smin"), JDouble("ca"), JDoubleArray("a"), JInt("lda"), JDouble("d1"), JDouble("d2"), JDoubleArray("b"), JInt("ldb"), JDouble("wr"), JDouble("wi"), JDoubleArray("x"), JInt("ldx"), JDoubleW("scale"), JDoubleW("xnorm"), JIntW("info")) - routine ("lapack", "dlals0", JInt("icompq"), JInt("nl"), JInt("nr"), JInt("sqre"), JInt("nrhs"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("bx"), JInt("ldbx"), JIntArray("perm"), JInt("givptr"), JIntArray("givcol"), JInt("ldgcol"), JDoubleArray("givnum"), JInt("ldgnum"), JDoubleArray("poles"), JDoubleArray("difl"), JDoubleArray("difr"), JDoubleArray("z"), JInt("k"), JDouble("c"), JDouble("s"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dlalsa", JInt("icompq"), JInt("smlsiz"), JInt("n"), JInt("nrhs"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("bx"), JInt("ldbx"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JIntArray("k"), JDoubleArray("difl"), JDoubleArray("difr"), JDoubleArray("z"), JDoubleArray("poles"), JIntArray("givptr"), JIntArray("givcol"), JInt("ldgcol"), JIntArray("perm"), JDoubleArray("givnum"), JDoubleArray("c"), JDoubleArray("s"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dlalsd", JString("uplo"), JInt("smlsiz"), JInt("n"), JInt("nrhs"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("b"), JInt("ldb"), JDouble("rcond"), JIntW("rank"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dlamrg", JInt("n1"), JInt("n2"), JDoubleArray("a"), JInt("dtrd1"), JInt("dtrd2"), JIntArray("index")) - routine_r("lapack", JIntR(), "dlaneg", JInt("n"), JDoubleArray("d"), JDoubleArray("lld"), JDouble("sigma"), JDouble("pivmin"), JInt("r")) - routine_r("lapack", JDoubleR(), "dlangb", JString("norm"), JInt("n"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("work")) - routine_r("lapack", JDoubleR(), "dlange", JString("norm"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("work")) - routine_r("lapack", JDoubleR(), "dlangt", JString("norm"), JInt("n"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du")) - routine_r("lapack", JDoubleR(), "dlanhs", JString("norm"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("work")) - routine_r("lapack", JDoubleR(), "dlansb", JString("norm"), JString("uplo"), JInt("n"), JInt("k"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("work")) - routine_r("lapack", JDoubleR(), "dlansp", JString("norm"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("work")) - routine_r("lapack", JDoubleR(), "dlanst", JString("norm"), JInt("n"), JDoubleArray("d"), JDoubleArray("e")) - routine_r("lapack", JDoubleR(), "dlansy", JString("norm"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("work")) - routine_r("lapack", JDoubleR(), "dlantb", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JInt("k"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("work")) - routine_r("lapack", JDoubleR(), "dlantp", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JDoubleArray("ap"), JDoubleArray("work")) - routine_r("lapack", JDoubleR(), "dlantr", JString("norm"), JString("uplo"), JString("diag"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("work")) - routine ("lapack", "dlanv2", JDoubleW("a"), JDoubleW("b"), JDoubleW("c"), JDoubleW("d"), JDoubleW("rt1r"), JDoubleW("rt1i"), JDoubleW("rt2r"), JDoubleW("rt2i"), JDoubleW("cs"), JDoubleW("sn")) - routine ("lapack", "dlapll", JInt("n"), JDoubleArray("x"), JInt("incx"), JDoubleArray("y"), JInt("incy"), JDoubleW("ssmin")) - routine ("lapack", "dlapmt", JBoolean("forwrd"), JInt("m"), JInt("n"), JDoubleArray("x"), JInt("ldx"), JIntArray("k")) - routine_r("lapack", JDoubleR(), "dlapy2", JDouble("x"), JDouble("y")) - routine_r("lapack", JDoubleR(), "dlapy3", JDouble("x"), JDouble("y"), JDouble("z")) - routine ("lapack", "dlaqgb", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("r"), JDoubleArray("c"), JDouble("rowcnd"), JDouble("colcnd"), JDouble("amax"), JStringW("equed")) - routine ("lapack", "dlaqge", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("r"), JDoubleArray("c"), JDouble("rowcnd"), JDouble("colcnd"), JDouble("amax"), JStringW("equed")) - routine ("lapack", "dlaqp2", JInt("m"), JInt("n"), JInt("offset"), JDoubleArray("a"), JInt("lda"), JIntArray("jpvt"), JDoubleArray("tau"), JDoubleArray("vn1"), JDoubleArray("vn2"), JDoubleArray("work")) - routine ("lapack", "dlaqps", JInt("m"), JInt("n"), JInt("offset"), JInt("nb"), JIntW("kb"), JDoubleArray("a"), JInt("lda"), JIntArray("jpvt"), JDoubleArray("tau"), JDoubleArray("vn1"), JDoubleArray("vn2"), JDoubleArray("auxv"), JDoubleArray("f"), JInt("ldf")) - routine ("lapack", "dlaqr0", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JInt("iloz"), JInt("ihiz"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dlaqr1", JInt("n"), JDoubleArray("h"), JInt("ldh"), JDouble("sr1"), JDouble("si1"), JDouble("sr2"), JDouble("si2"), JDoubleArray("v")) - routine ("lapack", "dlaqr2", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ktop"), JInt("kbot"), JInt("nw"), JDoubleArray("h"), JInt("ldh"), JInt("iloz"), JInt("ihiz"), JDoubleArray("z"), JInt("ldz"), JIntW("ns"), JIntW("nd"), JDoubleArray("sr"), JDoubleArray("si"), JDoubleArray("v"), JInt("ldv"), JInt("nh"), JDoubleArray("t"), JInt("ldt"), JInt("nv"), JDoubleArray("wv"), JInt("ldwv"), JDoubleArray("work"), JInt("lwork")) - routine ("lapack", "dlaqr3", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ktop"), JInt("kbot"), JInt("nw"), JDoubleArray("h"), JInt("ldh"), JInt("iloz"), JInt("ihiz"), JDoubleArray("z"), JInt("ldz"), JIntW("ns"), JIntW("nd"), JDoubleArray("sr"), JDoubleArray("si"), JDoubleArray("v"), JInt("ldv"), JInt("nh"), JDoubleArray("t"), JInt("ldt"), JInt("nv"), JDoubleArray("wv"), JInt("ldwv"), JDoubleArray("work"), JInt("lwork")) - routine ("lapack", "dlaqr4", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JInt("iloz"), JInt("ihiz"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dlaqr5", JBoolean("wantt"), JBoolean("wantz"), JInt("kacc22"), JInt("n"), JInt("ktop"), JInt("kbot"), JInt("nshfts"), JDoubleArray("sr"), JDoubleArray("si"), JDoubleArray("h"), JInt("ldh"), JInt("iloz"), JInt("ihiz"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("u"), JInt("ldu"), JInt("nv"), JDoubleArray("wv"), JInt("ldwv"), JInt("nh"), JDoubleArray("wh"), JInt("ldwh")) - routine ("lapack", "dlaqsb", JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("s"), JDouble("scond"), JDouble("amax"), JStringW("equed")) - routine ("lapack", "dlaqsp", JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("s"), JDouble("scond"), JDouble("amax"), JStringW("equed")) - routine ("lapack", "dlaqsy", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("s"), JDouble("scond"), JDouble("amax"), JStringW("equed")) - routine ("lapack", "dlaqtr", JBoolean("ltran"), JBoolean("lreal"), JInt("n"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("b"), JDouble("w"), JDoubleW("scale"), JDoubleArray("x"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dlar1v", JInt("n"), JInt("b1"), JInt("bn"), JDouble("lambda"), JDoubleArray("d"), JDoubleArray("l"), JDoubleArray("ld"), JDoubleArray("lld"), JDouble("pivmin"), JDouble("gaptol"), JDoubleArray("z"), JBoolean("wantnc"), JIntW("negcnt"), JDoubleW("ztz"), JDoubleW("mingma"), JIntW("r"), JIntArray("isuppz"), JDoubleW("nrminv"), JDoubleW("resid"), JDoubleW("rqcorr"), JDoubleArray("work")) - routine ("lapack", "dlar2v", JInt("n"), JDoubleArray("x"), JDoubleArray("y"), JDoubleArray("z"), JInt("incx"), JDoubleArray("c"), JDoubleArray("s"), JInt("incc")) - routine ("lapack", "dlarf", JString("side"), JInt("m"), JInt("n"), JDoubleArray("v"), JInt("incv"), JDouble("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work")) - routine ("lapack", "dlarfb", JString("side"), JString("trans"), JString("direct"), JString("storev"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("ldwork")) - routine ("lapack", "dlarfg", JInt("n"), JDoubleW("alpha"), JDoubleArray("x"), JInt("incx"), JDoubleW("tau")) - routine ("lapack", "dlarft", JString("direct"), JString("storev"), JInt("n"), JInt("k"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("tau"), JDoubleArray("t"), JInt("ldt")) - routine ("lapack", "dlarfx", JString("side"), JInt("m"), JInt("n"), JDoubleArray("v"), JDouble("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work")) - routine ("lapack", "dlargv", JInt("n"), JDoubleArray("x"), JInt("incx"), JDoubleArray("y"), JInt("incy"), JDoubleArray("c"), JInt("incc")) - routine ("lapack", "dlarnv", JInt("idist"), JIntArray("iseed"), JInt("n"), JDoubleArray("x")) - routine ("lapack", "dlarra", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("e2"), JDouble("spltol"), JDouble("tnrm"), JIntW("nsplit"), JIntArray("isplit"), JIntW("info")) - routine ("lapack", "dlarrb", JInt("n"), JDoubleArray("d"), JDoubleArray("lld"), JInt("ifirst"), JInt("ilast"), JDouble("rtol1"), JDouble("rtol2"), JInt("offset"), JDoubleArray("w"), JDoubleArray("wgap"), JDoubleArray("werr"), JDoubleArray("work"), JIntArray("iwork"), JDouble("pivmin"), JDouble("spdiam"), JInt("twist"), JIntW("info")) - routine ("lapack", "dlarrc", JString("jobt"), JInt("n"), JDouble("vl"), JDouble("vu"), JDoubleArray("d"), JDoubleArray("e"), JDouble("pivmin"), JIntW("eigcnt"), JIntW("lcnt"), JIntW("rcnt"), JIntW("info")) - routine ("lapack", "dlarrd", JString("range"), JString("order"), JInt("n"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDoubleArray("gers"), JDouble("reltol"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("e2"), JDouble("pivmin"), JInt("nsplit"), JIntArray("isplit"), JIntW("m"), JDoubleArray("w"), JDoubleArray("werr"), JDoubleW("wl"), JDoubleW("wu"), JIntArray("iblock"), JIntArray("indexw"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dlarre", JString("range"), JInt("n"), JDoubleW("vl"), JDoubleW("vu"), JInt("il"), JInt("iu"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("e2"), JDouble("rtol1"), JDouble("rtol2"), JDouble("spltol"), JIntW("nsplit"), JIntArray("isplit"), JIntW("m"), JDoubleArray("w"), JDoubleArray("werr"), JDoubleArray("wgap"), JIntArray("iblock"), JIntArray("indexw"), JDoubleArray("gers"), JDoubleW("pivmin"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dlarrf", JInt("n"), JDoubleArray("d"), JDoubleArray("l"), JDoubleArray("ld"), JInt("clstrt"), JInt("clend"), JDoubleArray("w"), JDoubleArray("wgap"), JDoubleArray("werr"), JDouble("spdiam"), JDouble("clgapl"), JDouble("clgapr"), JDouble("pivmin"), JDoubleW("sigma"), JDoubleArray("dplus"), JDoubleArray("lplus"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dlarrj", JInt("n"), JDoubleArray("d"), JDoubleArray("e2"), JInt("ifirst"), JInt("ilast"), JDouble("rtol"), JInt("offset"), JDoubleArray("w"), JDoubleArray("werr"), JDoubleArray("work"), JIntArray("iwork"), JDouble("pivmin"), JDouble("spdiam"), JIntW("info")) - routine ("lapack", "dlarrk", JInt("n"), JInt("iw"), JDouble("gl"), JDouble("gu"), JDoubleArray("d"), JDoubleArray("e2"), JDouble("pivmin"), JDouble("reltol"), JDoubleW("w"), JDoubleW("werr"), JIntW("info")) - routine ("lapack", "dlarrr", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JIntW("info")) - routine ("lapack", "dlarrv", JInt("n"), JDouble("vl"), JDouble("vu"), JDoubleArray("d"), JDoubleArray("l"), JDouble("pivmin"), JIntArray("isplit"), JInt("m"), JInt("dol"), JInt("dou"), JDouble("minrgp"), JDoubleW("rtol1"), JDoubleW("rtol2"), JDoubleArray("w"), JDoubleArray("werr"), JDoubleArray("wgap"), JIntArray("iblock"), JIntArray("indexw"), JDoubleArray("gers"), JDoubleArray("z"), JInt("ldz"), JIntArray("isuppz"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dlartg", JDouble("f"), JDouble("g"), JDoubleW("cs"), JDoubleW("sn"), JDoubleW("r")) - routine ("lapack", "dlartv", JInt("n"), JDoubleArray("x"), JInt("incx"), JDoubleArray("y"), JInt("incy"), JDoubleArray("c"), JDoubleArray("s"), JInt("incc")) - routine ("lapack", "dlaruv", JIntArray("iseed"), JInt("n"), JDoubleArray("x")) - routine ("lapack", "dlarz", JString("side"), JInt("m"), JInt("n"), JInt("l"), JDoubleArray("v"), JInt("incv"), JDouble("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work")) - routine ("lapack", "dlarzb", JString("side"), JString("trans"), JString("direct"), JString("storev"), JInt("m"), JInt("n"), JInt("k"), JInt("l"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("ldwork")) - routine ("lapack", "dlarzt", JString("direct"), JString("storev"), JInt("n"), JInt("k"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("tau"), JDoubleArray("t"), JInt("ldt")) - routine ("lapack", "dlas2", JDouble("f"), JDouble("g"), JDouble("h"), JDoubleW("ssmin"), JDoubleW("ssmax")) - routine ("lapack", "dlascl", JString("type"), JInt("kl"), JInt("ku"), JDouble("cfrom"), JDouble("cto"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) - routine ("lapack", "dlasd0", JInt("n"), JInt("sqre"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JInt("ldvt"), JInt("smlsiz"), JIntArray("iwork"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dlasd1", JInt("nl"), JInt("nr"), JInt("sqre"), JDoubleArray("d"), JDoubleW("alpha"), JDoubleW("beta"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JInt("ldvt"), JIntArray("idxq"), JIntArray("iwork"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dlasd2", JInt("nl"), JInt("nr"), JInt("sqre"), JIntW("k"), JDoubleArray("d"), JDoubleArray("z"), JDouble("alpha"), JDouble("beta"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("dsigma"), JDoubleArray("u2"), JInt("ldu2"), JDoubleArray("vt2"), JInt("ldvt2"), JIntArray("idxp"), JIntArray("idx"), JIntArray("idxc"), JIntArray("idxq"), JIntArray("coltyp"), JIntW("info")) - routine ("lapack", "dlasd3", JInt("nl"), JInt("nr"), JInt("sqre"), JInt("k"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("dsigma"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("u2"), JInt("ldu2"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("vt2"), JInt("ldvt2"), JIntArray("idxc"), JIntArray("ctot"), JDoubleArray("z"), JIntW("info")) - routine ("lapack", "dlasd4", JInt("n"), JInt("i"), JDoubleArray("d"), JDoubleArray("z"), JDoubleArray("delta"), JDouble("rho"), JDoubleW("sigma"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dlasd5", JInt("i"), JDoubleArray("d"), JDoubleArray("z"), JDoubleArray("delta"), JDouble("rho"), JDoubleW("dsigma"), JDoubleArray("work")) - routine ("lapack", "dlasd6", JInt("icompq"), JInt("nl"), JInt("nr"), JInt("sqre"), JDoubleArray("d"), JDoubleArray("vf"), JDoubleArray("vl"), JDoubleW("alpha"), JDoubleW("beta"), JIntArray("idxq"), JIntArray("perm"), JIntW("givptr"), JIntArray("givcol"), JInt("ldgcol"), JDoubleArray("givnum"), JInt("ldgnum"), JDoubleArray("poles"), JDoubleArray("difl"), JDoubleArray("difr"), JDoubleArray("z"), JIntW("k"), JDoubleW("c"), JDoubleW("s"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dlasd7", JInt("icompq"), JInt("nl"), JInt("nr"), JInt("sqre"), JIntW("k"), JDoubleArray("d"), JDoubleArray("z"), JDoubleArray("zw"), JDoubleArray("vf"), JDoubleArray("vfw"), JDoubleArray("vl"), JDoubleArray("vlw"), JDouble("alpha"), JDouble("beta"), JDoubleArray("dsigma"), JIntArray("idx"), JIntArray("idxp"), JIntArray("idxq"), JIntArray("perm"), JIntW("givptr"), JIntArray("givcol"), JInt("ldgcol"), JDoubleArray("givnum"), JInt("ldgnum"), JDoubleW("c"), JDoubleW("s"), JIntW("info")) - routine ("lapack", "dlasd8", JInt("icompq"), JInt("k"), JDoubleArray("d"), JDoubleArray("z"), JDoubleArray("vf"), JDoubleArray("vl"), JDoubleArray("difl"), JDoubleArray("difr"), JInt("lddifr"), JDoubleArray("dsigma"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dlasda", JInt("icompq"), JInt("smlsiz"), JInt("n"), JInt("sqre"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JIntArray("k"), JDoubleArray("difl"), JDoubleArray("difr"), JDoubleArray("z"), JDoubleArray("poles"), JIntArray("givptr"), JIntArray("givcol"), JInt("ldgcol"), JIntArray("perm"), JDoubleArray("givnum"), JDoubleArray("c"), JDoubleArray("s"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dlasdq", JString("uplo"), JInt("sqre"), JInt("n"), JInt("ncvt"), JInt("nru"), JInt("ncc"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dlasdt", JInt("n"), JIntW("lvl"), JIntW("nd"), JIntArray("inode"), JIntArray("ndiml"), JIntArray("ndimr"), JInt("msub")) - routine ("lapack", "dlaset", JString("uplo"), JInt("m"), JInt("n"), JDouble("alpha"), JDouble("beta"), JDoubleArray("a"), JInt("lda")) - routine ("lapack", "dlasq1", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dlasq2", JInt("n"), JDoubleArray("z"), JIntW("info")) - routine ("lapack", "dlasq3", JInt("i0"), JIntW("n0"), JDoubleArray("z"), JInt("pp"), JDoubleW("dmin"), JDoubleW("sigma"), JDoubleW("desig"), JDoubleW("qmax"), JIntW("nfail"), JIntW("iter"), JIntW("ndiv"), JBoolean("ieee")) - routine ("lapack", "dlasq4", JInt("i0"), JInt("n0"), JDoubleArray("z"), JInt("pp"), JInt("n0in"), JDouble("dmin"), JDouble("dmin1"), JDouble("dmin2"), JDouble("dn"), JDouble("dn1"), JDouble("dn2"), JDoubleW("tau"), JIntW("ttype")) - routine ("lapack", "dlasq5", JInt("i0"), JInt("n0"), JDoubleArray("z"), JInt("pp"), JDouble("tau"), JDoubleW("dmin"), JDoubleW("dmin1"), JDoubleW("dmin2"), JDoubleW("dn"), JDoubleW("dnm1"), JDoubleW("dnm2"), JBoolean("ieee")) - routine ("lapack", "dlasq6", JInt("i0"), JInt("n0"), JDoubleArray("z"), JInt("pp"), JDoubleW("dmin"), JDoubleW("dmin1"), JDoubleW("dmin2"), JDoubleW("dn"), JDoubleW("dnm1"), JDoubleW("dnm2")) - routine ("lapack", "dlasr", JString("side"), JString("pivot"), JString("direct"), JInt("m"), JInt("n"), JDoubleArray("c"), JDoubleArray("s"), JDoubleArray("a"), JInt("lda")) - routine ("lapack", "dlasrt", JString("id"), JInt("n"), JDoubleArray("d"), JIntW("info")) - routine ("lapack", "dlassq", JInt("n"), JDoubleArray("x"), JInt("incx"), JDoubleW("scale"), JDoubleW("sumsq")) - routine ("lapack", "dlasv2", JDouble("f"), JDouble("g"), JDouble("h"), JDoubleW("ssmin"), JDoubleW("ssmax"), JDoubleW("snr"), JDoubleW("csr"), JDoubleW("snl"), JDoubleW("csl")) - routine ("lapack", "dlaswp", JInt("n"), JDoubleArray("a"), JInt("lda"), JInt("k1"), JInt("k2"), JIntArray("ipiv"), JInt("incx")) - routine ("lapack", "dlasy2", JBoolean("ltranl"), JBoolean("ltranr"), JInt("isgn"), JInt("n1"), JInt("n2"), JDoubleArray("tl"), JInt("ldtl"), JDoubleArray("tr"), JInt("ldtr"), JDoubleArray("b"), JInt("ldb"), JDoubleW("scale"), JDoubleArray("x"), JInt("ldx"), JDoubleW("xnorm"), JIntW("info")) - routine ("lapack", "dlasyf", JString("uplo"), JInt("n"), JInt("nb"), JIntW("kb"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("w"), JInt("ldw"), JIntW("info")) - routine ("lapack", "dlatbs", JString("uplo"), JString("trans"), JString("diag"), JString("normin"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("x"), JDoubleW("scale"), JDoubleArray("cnorm"), JIntW("info")) - routine ("lapack", "dlatdf", JInt("ijob"), JInt("n"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("rhs"), JDoubleW("rdsum"), JDoubleW("rdscal"), JIntArray("ipiv"), JIntArray("jpiv")) - routine ("lapack", "dlatps", JString("uplo"), JString("trans"), JString("diag"), JString("normin"), JInt("n"), JDoubleArray("ap"), JDoubleArray("x"), JDoubleW("scale"), JDoubleArray("cnorm"), JIntW("info")) - routine ("lapack", "dlatrd", JString("uplo"), JInt("n"), JInt("nb"), JDoubleArray("a"), JInt("lda"), JDoubleArray("e"), JDoubleArray("tau"), JDoubleArray("w"), JInt("ldw")) - routine ("lapack", "dlatrs", JString("uplo"), JString("trans"), JString("diag"), JString("normin"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("x"), JDoubleW("scale"), JDoubleArray("cnorm"), JIntW("info")) - routine ("lapack", "dlatrz", JInt("m"), JInt("n"), JInt("l"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work")) - routine ("lapack", "dlatzm", JString("side"), JInt("m"), JInt("n"), JDoubleArray("v"), JInt("incv"), JDouble("tau"), JDoubleArray("c1"), JDoubleArray("c2"), JInt("Ldc"), JDoubleArray("work")) - routine ("lapack", "dlauu2", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) - routine ("lapack", "dlauum", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) - # routine ("lapack", "dlazq3", JInt("i0"), JIntW("n0"), JDoubleArray("z"), JInt("pp"), JDoubleW("dmin"), JDoubleW("sigma"), JDoubleW("desig"), JDoubleW("qmax"), JIntW("nfail"), JIntW("iter"), JIntW("ndiv"), JBoolean("ieee"), JIntW("ttype"), JDoubleW("dmin1"), JDoubleW("dmin2"), JDoubleW("dn"), JDoubleW("dn1"), JDoubleW("dn2"), JDoubleW("tau")) - # routine ("lapack", "dlazq4", JInt("i0"), JInt("n0"), JDoubleArray("z"), JInt("pp"), JInt("n0in"), JDouble("dmin"), JDouble("dmin1"), JDouble("dmin2"), JDouble("dn"), JDouble("dn1"), JDouble("dn2"), JDoubleW("tau"), JIntW("ttype"), JDoubleW("g")) - routine ("lapack", "dopgtr", JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("tau"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dopmtr", JString("side"), JString("uplo"), JString("trans"), JInt("m"), JInt("n"), JDoubleArray("ap"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dorg2l", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dorg2r", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dorgbr", JString("vect"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dorghr", JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dorgl2", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dorglq", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dorgql", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dorgqr", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dorgr2", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dorgrq", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dorgtr", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dorm2l", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dorm2r", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dormbr", JString("vect"), JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dormhr", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dorml2", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dormlq", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dormql", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dormqr", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dormr2", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dormr3", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JInt("l"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dormrq", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dormrz", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JInt("l"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dormtr", JString("side"), JString("uplo"), JString("trans"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dpbcon", JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dpbequ", JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("s"), JDoubleW("scond"), JDoubleW("amax"), JIntW("info")) - routine ("lapack", "dpbrfs", JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("afb"), JInt("ldafb"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dpbstf", JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JIntW("info")) - routine ("lapack", "dpbsv", JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "dpbsvx", JString("fact"), JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("afb"), JInt("ldafb"), JStringW("equed"), JDoubleArray("s"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dpbtf2", JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JIntW("info")) - routine ("lapack", "dpbtrf", JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JIntW("info")) - routine ("lapack", "dpbtrs", JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "dpocon", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dpoequ", JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("s"), JDoubleW("scond"), JDoubleW("amax"), JIntW("info")) - routine ("lapack", "dporfs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("af"), JInt("ldaf"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dposv", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "dposvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("af"), JInt("ldaf"), JStringW("equed"), JDoubleArray("s"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dpotf2", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) - routine ("lapack", "dpotrf", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) - routine ("lapack", "dpotri", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) - routine ("lapack", "dpotrs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "dppcon", JString("uplo"), JInt("n"), JDoubleArray("ap"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dppequ", JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("s"), JDoubleW("scond"), JDoubleW("amax"), JIntW("info")) - routine ("lapack", "dpprfs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("afp"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dppsv", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "dppsvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("afp"), JStringW("equed"), JDoubleArray("s"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dpptrf", JString("uplo"), JInt("n"), JDoubleArray("ap"), JIntW("info")) - routine ("lapack", "dpptri", JString("uplo"), JInt("n"), JDoubleArray("ap"), JIntW("info")) - routine ("lapack", "dpptrs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "dptcon", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dpteqr", JString("compz"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dptrfs", JInt("n"), JInt("nrhs"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("df"), JDoubleArray("ef"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dptsv", JInt("n"), JInt("nrhs"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "dptsvx", JString("fact"), JInt("n"), JInt("nrhs"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("df"), JDoubleArray("ef"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dpttrf", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JIntW("info")) - routine ("lapack", "dpttrs", JInt("n"), JInt("nrhs"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "dptts2", JInt("n"), JInt("nrhs"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("b"), JInt("ldb")) - routine ("lapack", "drscl", JInt("n"), JDouble("sa"), JDoubleArray("sx"), JInt("incx")) - routine ("lapack", "dsbev", JString("jobz"), JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dsbevd", JString("jobz"), JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - routine ("lapack", "dsbevx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("q"), JInt("ldq"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - routine ("lapack", "dsbgst", JString("vect"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("bb"), JInt("ldbb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dsbgv", JString("jobz"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("bb"), JInt("ldbb"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dsbgvd", JString("jobz"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("bb"), JInt("ldbb"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - routine ("lapack", "dsbgvx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("bb"), JInt("ldbb"), JDoubleArray("q"), JInt("ldq"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - routine ("lapack", "dsbtrd", JString("vect"), JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dsgesv", JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("work"), JFloatArray("swork"), JIntW("iter"), JIntW("info")) - routine ("lapack", "dspcon", JString("uplo"), JInt("n"), JDoubleArray("ap"), JIntArray("ipiv"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dspev", JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dspevd", JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - routine ("lapack", "dspevx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - routine ("lapack", "dspgst", JInt("itype"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("bp"), JIntW("info")) - routine ("lapack", "dspgv", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("bp"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dspgvd", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("bp"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - routine ("lapack", "dspgvx", JInt("itype"), JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("bp"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - routine ("lapack", "dsprfs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("afp"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dspsv", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "dspsvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("afp"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dsptrd", JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("tau"), JIntW("info")) - routine ("lapack", "dsptrf", JString("uplo"), JInt("n"), JDoubleArray("ap"), JIntArray("ipiv"), JIntW("info")) - routine ("lapack", "dsptri", JString("uplo"), JInt("n"), JDoubleArray("ap"), JIntArray("ipiv"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dsptrs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "dstebz", JString("range"), JString("order"), JInt("n"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JDoubleArray("d"), JDoubleArray("e"), JIntW("m"), JIntW("nsplit"), JDoubleArray("w"), JIntArray("iblock"), JIntArray("isplit"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dstedc", JString("compz"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - routine ("lapack", "dstegr", JString("jobz"), JString("range"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JIntArray("isuppz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - routine ("lapack", "dstein", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JInt("m"), JDoubleArray("w"), JIntArray("iblock"), JIntArray("isplit"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - routine ("lapack", "dstemr", JString("jobz"), JString("range"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JInt("nzc"), JIntArray("isuppz"), JBooleanW("tryrac"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - routine ("lapack", "dsteqr", JString("compz"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dsterf", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JIntW("info")) - routine ("lapack", "dstev", JString("jobz"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dstevd", JString("jobz"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - routine ("lapack", "dstevr", JString("jobz"), JString("range"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JIntArray("isuppz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - routine ("lapack", "dstevx", JString("jobz"), JString("range"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - routine ("lapack", "dsycon", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dsyev", JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("w"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dsyevd", JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("w"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - routine ("lapack", "dsyevr", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JIntArray("isuppz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - routine ("lapack", "dsyevx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - routine ("lapack", "dsygs2", JInt("itype"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "dsygst", JInt("itype"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "dsygv", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("w"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dsygvd", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("w"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - routine ("lapack", "dsygvx", JInt("itype"), JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - routine ("lapack", "dsyrfs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("af"), JInt("ldaf"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dsysv", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dsysvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("af"), JInt("ldaf"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dsytd2", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("tau"), JIntW("info")) - routine ("lapack", "dsytf2", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JIntW("info")) - routine ("lapack", "dsytrd", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dsytrf", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dsytri", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dsytrs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "dtbcon", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dtbrfs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("kd"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dtbtrs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("kd"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "dtgevc", JString("side"), JString("howmny"), JBooleanArray("select"), JInt("n"), JDoubleArray("s"), JInt("lds"), JDoubleArray("p"), JInt("ldp"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JInt("mm"), JIntW("m"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dtgex2", JBoolean("wantq"), JBoolean("wantz"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("z"), JInt("ldz"), JInt("j1"), JInt("n1"), JInt("n2"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dtgexc", JBoolean("wantq"), JBoolean("wantz"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("z"), JInt("ldz"), JIntW("ifst"), JIntW("ilst"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "dtgsen", JInt("ijob"), JBoolean("wantq"), JBoolean("wantz"), JBooleanArray("select"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("z"), JInt("ldz"), JIntW("m"), JDoubleW("pl"), JDoubleW("pr"), JDoubleArray("dif"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - routine ("lapack", "dtgsja", JString("jobu"), JString("jobv"), JString("jobq"), JInt("m"), JInt("p"), JInt("n"), JInt("k"), JInt("l"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDouble("tola"), JDouble("tolb"), JDoubleArray("alpha"), JDoubleArray("beta"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("work"), JIntW("ncycle"), JIntW("info")) - routine ("lapack", "dtgsna", JString("job"), JString("howmny"), JBooleanArray("select"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JDoubleArray("s"), JDoubleArray("dif"), JInt("mm"), JIntW("m"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dtgsy2", JString("trans"), JInt("ijob"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("d"), JInt("ldd"), JDoubleArray("e"), JInt("lde"), JDoubleArray("f"), JInt("ldf"), JDoubleW("scale"), JDoubleW("rdsum"), JDoubleW("rdscal"), JIntArray("iwork"), JIntW("pq"), JIntW("info")) - routine ("lapack", "dtgsyl", JString("trans"), JInt("ijob"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("d"), JInt("ldd"), JDoubleArray("e"), JInt("lde"), JDoubleArray("f"), JInt("ldf"), JDoubleW("scale"), JDoubleW("dif"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dtpcon", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JDoubleArray("ap"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dtprfs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dtptri", JString("uplo"), JString("diag"), JInt("n"), JDoubleArray("ap"), JIntW("info")) - routine ("lapack", "dtptrs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "dtrcon", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dtrevc", JString("side"), JString("howmny"), JBooleanArray("select"), JInt("n"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JInt("mm"), JIntW("m"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dtrexc", JString("compq"), JInt("n"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("q"), JInt("ldq"), JIntW("ifst"), JIntW("ilst"), JDoubleArray("work"), JIntW("info")) - routine ("lapack", "dtrrfs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dtrsen", JString("job"), JString("compq"), JBooleanArray("select"), JInt("n"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("wr"), JDoubleArray("wi"), JIntW("m"), JDoubleW("s"), JDoubleW("sep"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - routine ("lapack", "dtrsna", JString("job"), JString("howmny"), JBooleanArray("select"), JInt("n"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JDoubleArray("s"), JDoubleArray("sep"), JInt("mm"), JIntW("m"), JDoubleArray("work"), JInt("ldwork"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "dtrsyl", JString("trana"), JString("tranb"), JInt("isgn"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("c"), JInt("Ldc"), JDoubleW("scale"), JIntW("info")) - routine ("lapack", "dtrti2", JString("uplo"), JString("diag"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) - routine ("lapack", "dtrtri", JString("uplo"), JString("diag"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) - routine ("lapack", "dtrtrs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "dtzrqf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JIntW("info")) - routine ("lapack", "dtzrzf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - routine_r("lapack", JIntR(), "ieeeck", JInt("ispec"), JFloat("zero"), JFloat("one")) - routine_r("lapack", JIntR(), "ilaenv", JInt("ispec"), JString("name"), JString("opts"), JInt("n1"), JInt("n2"), JInt("n3"), JInt("n4")) - routine ("lapack", "ilaver", JIntW("vers_major"), JIntW("vers_minor"), JIntW("vers_patch")) - routine_r("lapack", JIntR(), "iparmq", JInt("ispec"), JString("name"), JString("opts"), JInt("n"), JInt("ilo"), JInt("ihi"), JInt("lwork")) - routine_r("lapack", JBooleanR(), "lsamen", JInt("n"), JString("ca"), JString("cb")) - routine ("lapack", "sbdsdc", JString("uplo"), JString("compq"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("q"), JIntArray("iq"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "sbdsqr", JString("uplo"), JInt("n"), JInt("ncvt"), JInt("nru"), JInt("ncc"), JFloatArray("d"), JFloatArray("e"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("u"), JInt("ldu"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "sdisna", JString("job"), JInt("m"), JInt("n"), JFloatArray("d"), JFloatArray("sep"), JIntW("info")) - routine ("lapack", "sgbbrd", JString("vect"), JInt("m"), JInt("n"), JInt("ncc"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JFloatArray("d"), JFloatArray("e"), JFloatArray("q"), JInt("ldq"), JFloatArray("pt"), JInt("ldpt"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "sgbcon", JString("norm"), JInt("n"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JIntArray("ipiv"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "sgbequ", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JFloatArray("r"), JFloatArray("c"), JFloatW("rowcnd"), JFloatW("colcnd"), JFloatW("amax"), JIntW("info")) - routine ("lapack", "sgbrfs", JString("trans"), JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("afb"), JInt("ldafb"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "sgbsv", JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "sgbsvx", JString("fact"), JString("trans"), JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("afb"), JInt("ldafb"), JIntArray("ipiv"), JStringW("equed"), JFloatArray("r"), JFloatArray("c"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "sgbtf2", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JIntArray("ipiv"), JIntW("info")) - routine ("lapack", "sgbtrf", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JIntArray("ipiv"), JIntW("info")) - routine ("lapack", "sgbtrs", JString("trans"), JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "sgebak", JString("job"), JString("side"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("scale"), JInt("m"), JFloatArray("v"), JInt("ldv"), JIntW("info")) - routine ("lapack", "sgebal", JString("job"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("ilo"), JIntW("ihi"), JFloatArray("scale"), JIntW("info")) - routine ("lapack", "sgebd2", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("d"), JFloatArray("e"), JFloatArray("tauq"), JFloatArray("taup"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "sgebrd", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("d"), JFloatArray("e"), JFloatArray("tauq"), JFloatArray("taup"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sgecon", JString("norm"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "sgeequ", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("r"), JFloatArray("c"), JFloatW("rowcnd"), JFloatW("colcnd"), JFloatW("amax"), JIntW("info")) - # routine ("lapack", "sgees", JString("jobvs"), JString("sort"), JObject("select"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("sdim"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("vs"), JInt("ldvs"), JFloatArray("work"), JInt("lwork"), JBooleanArray("bwork"), JIntW("info")) - # routine ("lapack", "sgeesx", JString("jobvs"), JString("sort"), JObject("select"), JString("sense"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("sdim"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("vs"), JInt("ldvs"), JFloatW("rconde"), JFloatW("rcondv"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JBooleanArray("bwork"), JIntW("info")) - routine ("lapack", "sgeev", JString("jobvl"), JString("jobvr"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sgeevx", JString("balanc"), JString("jobvl"), JString("jobvr"), JString("sense"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JIntW("ilo"), JIntW("ihi"), JFloatArray("scale"), JFloatW("abnrm"), JFloatArray("rconde"), JFloatArray("rcondv"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "sgegs", JString("jobvsl"), JString("jobvsr"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("vsl"), JInt("ldvsl"), JFloatArray("vsr"), JInt("ldvsr"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sgegv", JString("jobvl"), JString("jobvr"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sgehd2", JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "sgehrd", JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sgelq2", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "sgelqf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sgels", JString("trans"), JInt("m"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sgelsd", JInt("m"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("s"), JFloat("rcond"), JIntW("rank"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "sgelss", JInt("m"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("s"), JFloat("rcond"), JIntW("rank"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sgelsx", JInt("m"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntArray("jpvt"), JFloat("rcond"), JIntW("rank"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "sgelsy", JInt("m"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntArray("jpvt"), JFloat("rcond"), JIntW("rank"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sgeql2", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "sgeqlf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sgeqp3", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("jpvt"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sgeqpf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("jpvt"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "sgeqr2", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "sgeqrf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sgerfs", JString("trans"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("af"), JInt("ldaf"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "sgerq2", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "sgerqf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sgesc2", JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("rhs"), JIntArray("ipiv"), JIntArray("jpiv"), JFloatW("scale")) - routine ("lapack", "sgesdd", JString("jobz"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("s"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "sgesv", JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "sgesvd", JString("jobu"), JString("jobvt"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("s"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sgesvx", JString("fact"), JString("trans"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("af"), JInt("ldaf"), JIntArray("ipiv"), JStringW("equed"), JFloatArray("r"), JFloatArray("c"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "sgetc2", JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JIntArray("jpiv"), JIntW("info")) - routine ("lapack", "sgetf2", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JIntW("info")) - routine ("lapack", "sgetrf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JIntW("info")) - routine ("lapack", "sgetri", JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sgetrs", JString("trans"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "sggbak", JString("job"), JString("side"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("lscale"), JFloatArray("rscale"), JInt("m"), JFloatArray("v"), JInt("ldv"), JIntW("info")) - routine ("lapack", "sggbal", JString("job"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("ilo"), JIntW("ihi"), JFloatArray("lscale"), JFloatArray("rscale"), JFloatArray("work"), JIntW("info")) - # routine ("lapack", "sgges", JString("jobvsl"), JString("jobvsr"), JString("sort"), JObject("selctg"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("sdim"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("vsl"), JInt("ldvsl"), JFloatArray("vsr"), JInt("ldvsr"), JFloatArray("work"), JInt("lwork"), JBooleanArray("bwork"), JIntW("info")) - # routine ("lapack", "sggesx", JString("jobvsl"), JString("jobvsr"), JString("sort"), JObject("selctg"), JString("sense"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("sdim"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("vsl"), JInt("ldvsl"), JFloatArray("vsr"), JInt("ldvsr"), JFloatArray("rconde"), JFloatArray("rcondv"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JBooleanArray("bwork"), JIntW("info")) - routine ("lapack", "sggev", JString("jobvl"), JString("jobvr"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sggevx", JString("balanc"), JString("jobvl"), JString("jobvr"), JString("sense"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JIntW("ilo"), JIntW("ihi"), JFloatArray("lscale"), JFloatArray("rscale"), JFloatW("abnrm"), JFloatW("bbnrm"), JFloatArray("rconde"), JFloatArray("rcondv"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JBooleanArray("bwork"), JIntW("info")) - routine ("lapack", "sggglm", JInt("n"), JInt("m"), JInt("p"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("d"), JFloatArray("x"), JFloatArray("y"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sgghrd", JString("compq"), JString("compz"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("q"), JInt("ldq"), JFloatArray("z"), JInt("ldz"), JIntW("info")) - routine ("lapack", "sgglse", JInt("m"), JInt("n"), JInt("p"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("c"), JFloatArray("d"), JFloatArray("x"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sggqrf", JInt("n"), JInt("m"), JInt("p"), JFloatArray("a"), JInt("lda"), JFloatArray("taua"), JFloatArray("b"), JInt("ldb"), JFloatArray("taub"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sggrqf", JInt("m"), JInt("p"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("taua"), JFloatArray("b"), JInt("ldb"), JFloatArray("taub"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sggsvd", JString("jobu"), JString("jobv"), JString("jobq"), JInt("m"), JInt("n"), JInt("p"), JIntW("k"), JIntW("l"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alpha"), JFloatArray("beta"), JFloatArray("u"), JInt("ldu"), JFloatArray("v"), JInt("ldv"), JFloatArray("q"), JInt("ldq"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "sggsvp", JString("jobu"), JString("jobv"), JString("jobq"), JInt("m"), JInt("p"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloat("tola"), JFloat("tolb"), JIntW("k"), JIntW("l"), JFloatArray("u"), JInt("ldu"), JFloatArray("v"), JInt("ldv"), JFloatArray("q"), JInt("ldq"), JIntArray("iwork"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "sgtcon", JString("norm"), JInt("n"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("du2"), JIntArray("ipiv"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "sgtrfs", JString("trans"), JInt("n"), JInt("nrhs"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("dlf"), JFloatArray("df"), JFloatArray("duf"), JFloatArray("du2"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "sgtsv", JInt("n"), JInt("nrhs"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "sgtsvx", JString("fact"), JString("trans"), JInt("n"), JInt("nrhs"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("dlf"), JFloatArray("df"), JFloatArray("duf"), JFloatArray("du2"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "sgttrf", JInt("n"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("du2"), JIntArray("ipiv"), JIntW("info")) - routine ("lapack", "sgttrs", JString("trans"), JInt("n"), JInt("nrhs"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("du2"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "sgtts2", JInt("itrans"), JInt("n"), JInt("nrhs"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("du2"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb")) - routine ("lapack", "shgeqz", JString("job"), JString("compq"), JString("compz"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("t"), JInt("ldt"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("q"), JInt("ldq"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "shsein", JString("side"), JString("eigsrc"), JString("initv"), JBooleanArray("select"), JInt("n"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JInt("mm"), JIntW("m"), JFloatArray("work"), JIntArray("ifaill"), JIntArray("ifailr"), JIntW("info")) - routine ("lapack", "shseqr", JString("job"), JString("compz"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine_r("lapack", JBooleanR(), "sisnan", JFloat("sin")) - routine ("lapack", "slabad", JFloatW("small"), JFloatW("large")) - routine ("lapack", "slabrd", JInt("m"), JInt("n"), JInt("nb"), JFloatArray("a"), JInt("lda"), JFloatArray("d"), JFloatArray("e"), JFloatArray("tauq"), JFloatArray("taup"), JFloatArray("x"), JInt("ldx"), JFloatArray("y"), JInt("ldy")) - routine ("lapack", "slacn2", JInt("n"), JFloatArray("v"), JFloatArray("x"), JIntArray("isgn"), JFloatW("est"), JIntW("kase"), JIntArray("isave")) - routine ("lapack", "slacon", JInt("n"), JFloatArray("v"), JFloatArray("x"), JIntArray("isgn"), JFloatW("est"), JIntW("kase")) - routine ("lapack", "slacpy", JString("uplo"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb")) - routine ("lapack", "sladiv", JFloat("a"), JFloat("b"), JFloat("c"), JFloat("d"), JFloatW("p"), JFloatW("q")) - routine ("lapack", "slae2", JFloat("a"), JFloat("b"), JFloat("c"), JFloatW("rt1"), JFloatW("rt2")) - routine ("lapack", "slaebz", JInt("ijob"), JInt("nitmax"), JInt("n"), JInt("mmax"), JInt("minp"), JInt("nbmin"), JFloat("abstol"), JFloat("reltol"), JFloat("pivmin"), JFloatArray("d"), JFloatArray("e"), JFloatArray("e2"), JIntArray("nval"), JFloatArray("ab"), JFloatArray("c"), JIntW("mout"), JIntArray("nab"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "slaed0", JInt("icompq"), JInt("qsiz"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("q"), JInt("ldq"), JFloatArray("qstore"), JInt("ldqs"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "slaed1", JInt("n"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JIntArray("indxq"), JFloatW("rho"), JInt("cutpnt"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "slaed2", JIntW("k"), JInt("n"), JInt("n1"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JIntArray("indxq"), JFloatW("rho"), JFloatArray("z"), JFloatArray("dlamda"), JFloatArray("w"), JFloatArray("q2"), JIntArray("indx"), JIntArray("indxc"), JIntArray("indxp"), JIntArray("coltyp"), JIntW("info")) - routine ("lapack", "slaed3", JInt("k"), JInt("n"), JInt("n1"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JFloat("rho"), JFloatArray("dlamda"), JFloatArray("q2"), JIntArray("indx"), JIntArray("ctot"), JFloatArray("w"), JFloatArray("s"), JIntW("info")) - routine ("lapack", "slaed4", JInt("n"), JInt("i"), JFloatArray("d"), JFloatArray("z"), JFloatArray("delta"), JFloat("rho"), JFloatW("dlam"), JIntW("info")) - routine ("lapack", "slaed5", JInt("i"), JFloatArray("d"), JFloatArray("z"), JFloatArray("delta"), JFloat("rho"), JFloatW("dlam")) - routine ("lapack", "slaed6", JInt("kniter"), JBoolean("orgati"), JFloat("rho"), JFloatArray("d"), JFloatArray("z"), JFloat("finit"), JFloatW("tau"), JIntW("info")) - routine ("lapack", "slaed7", JInt("icompq"), JInt("n"), JInt("qsiz"), JInt("tlvls"), JInt("curlvl"), JInt("curpbm"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JIntArray("indxq"), JFloatW("rho"), JInt("cutpnt"), JFloatArray("qstore"), JIntArray("qptr"), JIntArray("prmptr"), JIntArray("perm"), JIntArray("givptr"), JIntArray("givcol"), JFloatArray("givnum"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "slaed8", JInt("icompq"), JIntW("k"), JInt("n"), JInt("qsiz"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JIntArray("indxq"), JFloatW("rho"), JInt("cutpnt"), JFloatArray("z"), JFloatArray("dlamda"), JFloatArray("q2"), JInt("ldq2"), JFloatArray("w"), JIntArray("perm"), JIntW("givptr"), JIntArray("givcol"), JFloatArray("givnum"), JIntArray("indxp"), JIntArray("indx"), JIntW("info")) - routine ("lapack", "slaed9", JInt("k"), JInt("kstart"), JInt("kstop"), JInt("n"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JFloat("rho"), JFloatArray("dlamda"), JFloatArray("w"), JFloatArray("s"), JInt("lds"), JIntW("info")) - routine ("lapack", "slaeda", JInt("n"), JInt("tlvls"), JInt("curlvl"), JInt("curpbm"), JIntArray("prmptr"), JIntArray("perm"), JIntArray("givptr"), JIntArray("givcol"), JFloatArray("givnum"), JFloatArray("q"), JIntArray("qptr"), JFloatArray("z"), JFloatArray("ztemp"), JIntW("info")) - routine ("lapack", "slaein", JBoolean("rightv"), JBoolean("noinit"), JInt("n"), JFloatArray("h"), JInt("ldh"), JFloat("wr"), JFloat("wi"), JFloatArray("vr"), JFloatArray("vi"), JFloatArray("b"), JInt("ldb"), JFloatArray("work"), JFloat("eps3"), JFloat("smlnum"), JFloat("bignum"), JIntW("info")) - routine ("lapack", "slaev2", JFloat("a"), JFloat("b"), JFloat("c"), JFloatW("rt1"), JFloatW("rt2"), JFloatW("cs1"), JFloatW("sn1")) - routine ("lapack", "slaexc", JBoolean("wantq"), JInt("n"), JFloatArray("t"), JInt("ldt"), JFloatArray("q"), JInt("ldq"), JInt("j1"), JInt("n1"), JInt("n2"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "slag2", JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloat("safmin"), JFloatW("scale1"), JFloatW("scale2"), JFloatW("wr1"), JFloatW("wr2"), JFloatW("wi")) - routine ("lapack", "slag2d", JInt("m"), JInt("n"), JFloatArray("sa"), JInt("ldsa"), JDoubleArray("a"), JInt("lda"), JIntW("info")) - routine ("lapack", "slags2", JBoolean("upper"), JFloat("a1"), JFloat("a2"), JFloat("a3"), JFloat("b1"), JFloat("b2"), JFloat("b3"), JFloatW("csu"), JFloatW("snu"), JFloatW("csv"), JFloatW("snv"), JFloatW("csq"), JFloatW("snq")) - routine ("lapack", "slagtf", JInt("n"), JFloatArray("a"), JFloat("lambda"), JFloatArray("b"), JFloatArray("c"), JFloat("tol"), JFloatArray("d"), JIntArray("in"), JIntW("info")) - routine ("lapack", "slagtm", JString("trans"), JInt("n"), JInt("nrhs"), JFloat("alpha"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("x"), JInt("ldx"), JFloat("beta"), JFloatArray("b"), JInt("ldb")) - routine ("lapack", "slagts", JInt("job"), JInt("n"), JFloatArray("a"), JFloatArray("b"), JFloatArray("c"), JFloatArray("d"), JIntArray("in"), JFloatArray("y"), JFloatW("tol"), JIntW("info")) - routine ("lapack", "slagv2", JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatW("csl"), JFloatW("snl"), JFloatW("csr"), JFloatW("snr")) - routine ("lapack", "slahqr", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JInt("iloz"), JInt("ihiz"), JFloatArray("z"), JInt("ldz"), JIntW("info")) - routine ("lapack", "slahr2", JInt("n"), JInt("k"), JInt("nb"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("t"), JInt("ldt"), JFloatArray("y"), JInt("ldy")) - routine ("lapack", "slahrd", JInt("n"), JInt("k"), JInt("nb"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("t"), JInt("ldt"), JFloatArray("y"), JInt("ldy")) - routine ("lapack", "slaic1", JInt("job"), JInt("j"), JFloatArray("x"), JFloat("sest"), JFloatArray("w"), JFloat("gamma"), JFloatW("sestpr"), JFloatW("s"), JFloatW("c")) - routine_r("lapack", JBooleanR(), "slaisnan", JFloat("sin1"), JFloat("sin2")) - routine ("lapack", "slaln2", JBoolean("ltrans"), JInt("na"), JInt("nw"), JFloat("smin"), JFloat("ca"), JFloatArray("a"), JInt("lda"), JFloat("d1"), JFloat("d2"), JFloatArray("b"), JInt("ldb"), JFloat("wr"), JFloat("wi"), JFloatArray("x"), JInt("ldx"), JFloatW("scale"), JFloatW("xnorm"), JIntW("info")) - routine ("lapack", "slals0", JInt("icompq"), JInt("nl"), JInt("nr"), JInt("sqre"), JInt("nrhs"), JFloatArray("b"), JInt("ldb"), JFloatArray("bx"), JInt("ldbx"), JIntArray("perm"), JInt("givptr"), JIntArray("givcol"), JInt("ldgcol"), JFloatArray("givnum"), JInt("ldgnum"), JFloatArray("poles"), JFloatArray("difl"), JFloatArray("difr"), JFloatArray("z"), JInt("k"), JFloat("c"), JFloat("s"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "slalsa", JInt("icompq"), JInt("smlsiz"), JInt("n"), JInt("nrhs"), JFloatArray("b"), JInt("ldb"), JFloatArray("bx"), JInt("ldbx"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JIntArray("k"), JFloatArray("difl"), JFloatArray("difr"), JFloatArray("z"), JFloatArray("poles"), JIntArray("givptr"), JIntArray("givcol"), JInt("ldgcol"), JIntArray("perm"), JFloatArray("givnum"), JFloatArray("c"), JFloatArray("s"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "slalsd", JString("uplo"), JInt("smlsiz"), JInt("n"), JInt("nrhs"), JFloatArray("d"), JFloatArray("e"), JFloatArray("b"), JInt("ldb"), JFloat("rcond"), JIntW("rank"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "slamrg", JInt("n1"), JInt("n2"), JFloatArray("a"), JInt("strd1"), JInt("strd2"), JIntArray("index")) - routine_r("lapack", JIntR(), "slaneg", JInt("n"), JFloatArray("d"), JFloatArray("lld"), JFloat("sigma"), JFloat("pivmin"), JInt("r")) - routine_r("lapack", JFloatR(), "slangb", JString("norm"), JInt("n"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JFloatArray("work")) - routine_r("lapack", JFloatR(), "slange", JString("norm"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("work")) - routine_r("lapack", JFloatR(), "slangt", JString("norm"), JInt("n"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du")) - routine_r("lapack", JFloatR(), "slanhs", JString("norm"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("work")) - routine_r("lapack", JFloatR(), "slansb", JString("norm"), JString("uplo"), JInt("n"), JInt("k"), JFloatArray("ab"), JInt("ldab"), JFloatArray("work")) - routine_r("lapack", JFloatR(), "slansp", JString("norm"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("work")) - routine_r("lapack", JFloatR(), "slanst", JString("norm"), JInt("n"), JFloatArray("d"), JFloatArray("e")) - routine_r("lapack", JFloatR(), "slansy", JString("norm"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("work")) - routine_r("lapack", JFloatR(), "slantb", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JInt("k"), JFloatArray("ab"), JInt("ldab"), JFloatArray("work")) - routine_r("lapack", JFloatR(), "slantp", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JFloatArray("ap"), JFloatArray("work")) - routine_r("lapack", JFloatR(), "slantr", JString("norm"), JString("uplo"), JString("diag"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("work")) - routine ("lapack", "slanv2", JFloatW("a"), JFloatW("b"), JFloatW("c"), JFloatW("d"), JFloatW("rt1r"), JFloatW("rt1i"), JFloatW("rt2r"), JFloatW("rt2i"), JFloatW("cs"), JFloatW("sn")) - routine ("lapack", "slapll", JInt("n"), JFloatArray("x"), JInt("incx"), JFloatArray("y"), JInt("incy"), JFloatW("ssmin")) - routine ("lapack", "slapmt", JBoolean("forwrd"), JInt("m"), JInt("n"), JFloatArray("x"), JInt("ldx"), JIntArray("k")) - routine_r("lapack", JFloatR(), "slapy2", JFloat("x"), JFloat("y")) - routine_r("lapack", JFloatR(), "slapy3", JFloat("x"), JFloat("y"), JFloat("z")) - routine ("lapack", "slaqgb", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JFloatArray("r"), JFloatArray("c"), JFloat("rowcnd"), JFloat("colcnd"), JFloat("amax"), JStringW("equed")) - routine ("lapack", "slaqge", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("r"), JFloatArray("c"), JFloat("rowcnd"), JFloat("colcnd"), JFloat("amax"), JStringW("equed")) - routine ("lapack", "slaqp2", JInt("m"), JInt("n"), JInt("offset"), JFloatArray("a"), JInt("lda"), JIntArray("jpvt"), JFloatArray("tau"), JFloatArray("vn1"), JFloatArray("vn2"), JFloatArray("work")) - routine ("lapack", "slaqps", JInt("m"), JInt("n"), JInt("offset"), JInt("nb"), JIntW("kb"), JFloatArray("a"), JInt("lda"), JIntArray("jpvt"), JFloatArray("tau"), JFloatArray("vn1"), JFloatArray("vn2"), JFloatArray("auxv"), JFloatArray("f"), JInt("ldf")) - routine ("lapack", "slaqr0", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JInt("iloz"), JInt("ihiz"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "slaqr1", JInt("n"), JFloatArray("h"), JInt("ldh"), JFloat("sr1"), JFloat("si1"), JFloat("sr2"), JFloat("si2"), JFloatArray("v")) - routine ("lapack", "slaqr2", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ktop"), JInt("kbot"), JInt("nw"), JFloatArray("h"), JInt("ldh"), JInt("iloz"), JInt("ihiz"), JFloatArray("z"), JInt("ldz"), JIntW("ns"), JIntW("nd"), JFloatArray("sr"), JFloatArray("si"), JFloatArray("v"), JInt("ldv"), JInt("nh"), JFloatArray("t"), JInt("ldt"), JInt("nv"), JFloatArray("wv"), JInt("ldwv"), JFloatArray("work"), JInt("lwork")) - routine ("lapack", "slaqr3", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ktop"), JInt("kbot"), JInt("nw"), JFloatArray("h"), JInt("ldh"), JInt("iloz"), JInt("ihiz"), JFloatArray("z"), JInt("ldz"), JIntW("ns"), JIntW("nd"), JFloatArray("sr"), JFloatArray("si"), JFloatArray("v"), JInt("ldv"), JInt("nh"), JFloatArray("t"), JInt("ldt"), JInt("nv"), JFloatArray("wv"), JInt("ldwv"), JFloatArray("work"), JInt("lwork")) - routine ("lapack", "slaqr4", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JInt("iloz"), JInt("ihiz"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "slaqr5", JBoolean("wantt"), JBoolean("wantz"), JInt("kacc22"), JInt("n"), JInt("ktop"), JInt("kbot"), JInt("nshfts"), JFloatArray("sr"), JFloatArray("si"), JFloatArray("h"), JInt("ldh"), JInt("iloz"), JInt("ihiz"), JFloatArray("z"), JInt("ldz"), JFloatArray("v"), JInt("ldv"), JFloatArray("u"), JInt("ldu"), JInt("nv"), JFloatArray("wv"), JInt("ldwv"), JInt("nh"), JFloatArray("wh"), JInt("ldwh")) - routine ("lapack", "slaqsb", JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("s"), JFloat("scond"), JFloat("amax"), JStringW("equed")) - routine ("lapack", "slaqsp", JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("s"), JFloat("scond"), JFloat("amax"), JStringW("equed")) - routine ("lapack", "slaqsy", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("s"), JFloat("scond"), JFloat("amax"), JStringW("equed")) - routine ("lapack", "slaqtr", JBoolean("ltran"), JBoolean("lreal"), JInt("n"), JFloatArray("t"), JInt("ldt"), JFloatArray("b"), JFloat("w"), JFloatW("scale"), JFloatArray("x"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "slar1v", JInt("n"), JInt("b1"), JInt("bn"), JFloat("lambda"), JFloatArray("d"), JFloatArray("l"), JFloatArray("ld"), JFloatArray("lld"), JFloat("pivmin"), JFloat("gaptol"), JFloatArray("z"), JBoolean("wantnc"), JIntW("negcnt"), JFloatW("ztz"), JFloatW("mingma"), JIntW("r"), JIntArray("isuppz"), JFloatW("nrminv"), JFloatW("resid"), JFloatW("rqcorr"), JFloatArray("work")) - routine ("lapack", "slar2v", JInt("n"), JFloatArray("x"), JFloatArray("y"), JFloatArray("z"), JInt("incx"), JFloatArray("c"), JFloatArray("s"), JInt("incc")) - routine ("lapack", "slarf", JString("side"), JInt("m"), JInt("n"), JFloatArray("v"), JInt("incv"), JFloat("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work")) - routine ("lapack", "slarfb", JString("side"), JString("trans"), JString("direct"), JString("storev"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("v"), JInt("ldv"), JFloatArray("t"), JInt("ldt"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("ldwork")) - routine ("lapack", "slarfg", JInt("n"), JFloatW("alpha"), JFloatArray("x"), JInt("incx"), JFloatW("tau")) - routine ("lapack", "slarft", JString("direct"), JString("storev"), JInt("n"), JInt("k"), JFloatArray("v"), JInt("ldv"), JFloatArray("tau"), JFloatArray("t"), JInt("ldt")) - routine ("lapack", "slarfx", JString("side"), JInt("m"), JInt("n"), JFloatArray("v"), JFloat("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work")) - routine ("lapack", "slargv", JInt("n"), JFloatArray("x"), JInt("incx"), JFloatArray("y"), JInt("incy"), JFloatArray("c"), JInt("incc")) - routine ("lapack", "slarnv", JInt("idist"), JIntArray("iseed"), JInt("n"), JFloatArray("x")) - routine ("lapack", "slarra", JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("e2"), JFloat("spltol"), JFloat("tnrm"), JIntW("nsplit"), JIntArray("isplit"), JIntW("info")) - routine ("lapack", "slarrb", JInt("n"), JFloatArray("d"), JFloatArray("lld"), JInt("ifirst"), JInt("ilast"), JFloat("rtol1"), JFloat("rtol2"), JInt("offset"), JFloatArray("w"), JFloatArray("wgap"), JFloatArray("werr"), JFloatArray("work"), JIntArray("iwork"), JFloat("pivmin"), JFloat("spdiam"), JInt("twist"), JIntW("info")) - routine ("lapack", "slarrc", JString("jobt"), JInt("n"), JFloat("vl"), JFloat("vu"), JFloatArray("d"), JFloatArray("e"), JFloat("pivmin"), JIntW("eigcnt"), JIntW("lcnt"), JIntW("rcnt"), JIntW("info")) - routine ("lapack", "slarrd", JString("range"), JString("order"), JInt("n"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloatArray("gers"), JFloat("reltol"), JFloatArray("d"), JFloatArray("e"), JFloatArray("e2"), JFloat("pivmin"), JInt("nsplit"), JIntArray("isplit"), JIntW("m"), JFloatArray("w"), JFloatArray("werr"), JFloatW("wl"), JFloatW("wu"), JIntArray("iblock"), JIntArray("indexw"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "slarre", JString("range"), JInt("n"), JFloatW("vl"), JFloatW("vu"), JInt("il"), JInt("iu"), JFloatArray("d"), JFloatArray("e"), JFloatArray("e2"), JFloat("rtol1"), JFloat("rtol2"), JFloat("spltol"), JIntW("nsplit"), JIntArray("isplit"), JIntW("m"), JFloatArray("w"), JFloatArray("werr"), JFloatArray("wgap"), JIntArray("iblock"), JIntArray("indexw"), JFloatArray("gers"), JFloatW("pivmin"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "slarrf", JInt("n"), JFloatArray("d"), JFloatArray("l"), JFloatArray("ld"), JInt("clstrt"), JInt("clend"), JFloatArray("w"), JFloatArray("wgap"), JFloatArray("werr"), JFloat("spdiam"), JFloat("clgapl"), JFloat("clgapr"), JFloat("pivmin"), JFloatW("sigma"), JFloatArray("dplus"), JFloatArray("lplus"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "slarrj", JInt("n"), JFloatArray("d"), JFloatArray("e2"), JInt("ifirst"), JInt("ilast"), JFloat("rtol"), JInt("offset"), JFloatArray("w"), JFloatArray("werr"), JFloatArray("work"), JIntArray("iwork"), JFloat("pivmin"), JFloat("spdiam"), JIntW("info")) - routine ("lapack", "slarrk", JInt("n"), JInt("iw"), JFloat("gl"), JFloat("gu"), JFloatArray("d"), JFloatArray("e2"), JFloat("pivmin"), JFloat("reltol"), JFloatW("w"), JFloatW("werr"), JIntW("info")) - routine ("lapack", "slarrr", JInt("n"), JFloatArray("d"), JFloatArray("e"), JIntW("info")) - routine ("lapack", "slarrv", JInt("n"), JFloat("vl"), JFloat("vu"), JFloatArray("d"), JFloatArray("l"), JFloat("pivmin"), JIntArray("isplit"), JInt("m"), JInt("dol"), JInt("dou"), JFloat("minrgp"), JFloatW("rtol1"), JFloatW("rtol2"), JFloatArray("w"), JFloatArray("werr"), JFloatArray("wgap"), JIntArray("iblock"), JIntArray("indexw"), JFloatArray("gers"), JFloatArray("z"), JInt("ldz"), JIntArray("isuppz"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "slartg", JFloat("f"), JFloat("g"), JFloatW("cs"), JFloatW("sn"), JFloatW("r")) - routine ("lapack", "slartv", JInt("n"), JFloatArray("x"), JInt("incx"), JFloatArray("y"), JInt("incy"), JFloatArray("c"), JFloatArray("s"), JInt("incc")) - routine ("lapack", "slaruv", JIntArray("iseed"), JInt("n"), JFloatArray("x")) - routine ("lapack", "slarz", JString("side"), JInt("m"), JInt("n"), JInt("l"), JFloatArray("v"), JInt("incv"), JFloat("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work")) - routine ("lapack", "slarzb", JString("side"), JString("trans"), JString("direct"), JString("storev"), JInt("m"), JInt("n"), JInt("k"), JInt("l"), JFloatArray("v"), JInt("ldv"), JFloatArray("t"), JInt("ldt"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("ldwork")) - routine ("lapack", "slarzt", JString("direct"), JString("storev"), JInt("n"), JInt("k"), JFloatArray("v"), JInt("ldv"), JFloatArray("tau"), JFloatArray("t"), JInt("ldt")) - routine ("lapack", "slas2", JFloat("f"), JFloat("g"), JFloat("h"), JFloatW("ssmin"), JFloatW("ssmax")) - routine ("lapack", "slascl", JString("type"), JInt("kl"), JInt("ku"), JFloat("cfrom"), JFloat("cto"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) - routine ("lapack", "slasd0", JInt("n"), JInt("sqre"), JFloatArray("d"), JFloatArray("e"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JInt("ldvt"), JInt("smlsiz"), JIntArray("iwork"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "slasd1", JInt("nl"), JInt("nr"), JInt("sqre"), JFloatArray("d"), JFloatW("alpha"), JFloatW("beta"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JInt("ldvt"), JIntArray("idxq"), JIntArray("iwork"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "slasd2", JInt("nl"), JInt("nr"), JInt("sqre"), JIntW("k"), JFloatArray("d"), JFloatArray("z"), JFloat("alpha"), JFloat("beta"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("dsigma"), JFloatArray("u2"), JInt("ldu2"), JFloatArray("vt2"), JInt("ldvt2"), JIntArray("idxp"), JIntArray("idx"), JIntArray("idxc"), JIntArray("idxq"), JIntArray("coltyp"), JIntW("info")) - routine ("lapack", "slasd3", JInt("nl"), JInt("nr"), JInt("sqre"), JInt("k"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JFloatArray("dsigma"), JFloatArray("u"), JInt("ldu"), JFloatArray("u2"), JInt("ldu2"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("vt2"), JInt("ldvt2"), JIntArray("idxc"), JIntArray("ctot"), JFloatArray("z"), JIntW("info")) - routine ("lapack", "slasd4", JInt("n"), JInt("i"), JFloatArray("d"), JFloatArray("z"), JFloatArray("delta"), JFloat("rho"), JFloatW("sigma"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "slasd5", JInt("i"), JFloatArray("d"), JFloatArray("z"), JFloatArray("delta"), JFloat("rho"), JFloatW("dsigma"), JFloatArray("work")) - routine ("lapack", "slasd6", JInt("icompq"), JInt("nl"), JInt("nr"), JInt("sqre"), JFloatArray("d"), JFloatArray("vf"), JFloatArray("vl"), JFloatW("alpha"), JFloatW("beta"), JIntArray("idxq"), JIntArray("perm"), JIntW("givptr"), JIntArray("givcol"), JInt("ldgcol"), JFloatArray("givnum"), JInt("ldgnum"), JFloatArray("poles"), JFloatArray("difl"), JFloatArray("difr"), JFloatArray("z"), JIntW("k"), JFloatW("c"), JFloatW("s"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "slasd7", JInt("icompq"), JInt("nl"), JInt("nr"), JInt("sqre"), JIntW("k"), JFloatArray("d"), JFloatArray("z"), JFloatArray("zw"), JFloatArray("vf"), JFloatArray("vfw"), JFloatArray("vl"), JFloatArray("vlw"), JFloat("alpha"), JFloat("beta"), JFloatArray("dsigma"), JIntArray("idx"), JIntArray("idxp"), JIntArray("idxq"), JIntArray("perm"), JIntW("givptr"), JIntArray("givcol"), JInt("ldgcol"), JFloatArray("givnum"), JInt("ldgnum"), JFloatW("c"), JFloatW("s"), JIntW("info")) - routine ("lapack", "slasd8", JInt("icompq"), JInt("k"), JFloatArray("d"), JFloatArray("z"), JFloatArray("vf"), JFloatArray("vl"), JFloatArray("difl"), JFloatArray("difr"), JInt("lddifr"), JFloatArray("dsigma"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "slasda", JInt("icompq"), JInt("smlsiz"), JInt("n"), JInt("sqre"), JFloatArray("d"), JFloatArray("e"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JIntArray("k"), JFloatArray("difl"), JFloatArray("difr"), JFloatArray("z"), JFloatArray("poles"), JIntArray("givptr"), JIntArray("givcol"), JInt("ldgcol"), JIntArray("perm"), JFloatArray("givnum"), JFloatArray("c"), JFloatArray("s"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "slasdq", JString("uplo"), JInt("sqre"), JInt("n"), JInt("ncvt"), JInt("nru"), JInt("ncc"), JFloatArray("d"), JFloatArray("e"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("u"), JInt("ldu"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "slasdt", JInt("n"), JIntW("lvl"), JIntW("nd"), JIntArray("inode"), JIntArray("ndiml"), JIntArray("ndimr"), JInt("msub")) - routine ("lapack", "slaset", JString("uplo"), JInt("m"), JInt("n"), JFloat("alpha"), JFloat("beta"), JFloatArray("a"), JInt("lda")) - routine ("lapack", "slasq1", JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "slasq2", JInt("n"), JFloatArray("z"), JIntW("info")) - routine ("lapack", "slasq3", JInt("i0"), JIntW("n0"), JFloatArray("z"), JInt("pp"), JFloatW("dmin"), JFloatW("sigma"), JFloatW("desig"), JFloatW("qmax"), JIntW("nfail"), JIntW("iter"), JIntW("ndiv"), JBoolean("ieee")) - routine ("lapack", "slasq4", JInt("i0"), JInt("n0"), JFloatArray("z"), JInt("pp"), JInt("n0in"), JFloat("dmin"), JFloat("dmin1"), JFloat("dmin2"), JFloat("dn"), JFloat("dn1"), JFloat("dn2"), JFloatW("tau"), JIntW("ttype")) - routine ("lapack", "slasq5", JInt("i0"), JInt("n0"), JFloatArray("z"), JInt("pp"), JFloat("tau"), JFloatW("dmin"), JFloatW("dmin1"), JFloatW("dmin2"), JFloatW("dn"), JFloatW("dnm1"), JFloatW("dnm2"), JBoolean("ieee")) - routine ("lapack", "slasq6", JInt("i0"), JInt("n0"), JFloatArray("z"), JInt("pp"), JFloatW("dmin"), JFloatW("dmin1"), JFloatW("dmin2"), JFloatW("dn"), JFloatW("dnm1"), JFloatW("dnm2")) - routine ("lapack", "slasr", JString("side"), JString("pivot"), JString("direct"), JInt("m"), JInt("n"), JFloatArray("c"), JFloatArray("s"), JFloatArray("a"), JInt("lda")) - routine ("lapack", "slasrt", JString("id"), JInt("n"), JFloatArray("d"), JIntW("info")) - routine ("lapack", "slassq", JInt("n"), JFloatArray("x"), JInt("incx"), JFloatW("scale"), JFloatW("sumsq")) - routine ("lapack", "slasv2", JFloat("f"), JFloat("g"), JFloat("h"), JFloatW("ssmin"), JFloatW("ssmax"), JFloatW("snr"), JFloatW("csr"), JFloatW("snl"), JFloatW("csl")) - routine ("lapack", "slaswp", JInt("n"), JFloatArray("a"), JInt("lda"), JInt("k1"), JInt("k2"), JIntArray("ipiv"), JInt("incx")) - routine ("lapack", "slasy2", JBoolean("ltranl"), JBoolean("ltranr"), JInt("isgn"), JInt("n1"), JInt("n2"), JFloatArray("tl"), JInt("ldtl"), JFloatArray("tr"), JInt("ldtr"), JFloatArray("b"), JInt("ldb"), JFloatW("scale"), JFloatArray("x"), JInt("ldx"), JFloatW("xnorm"), JIntW("info")) - routine ("lapack", "slasyf", JString("uplo"), JInt("n"), JInt("nb"), JIntW("kb"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("w"), JInt("ldw"), JIntW("info")) - routine ("lapack", "slatbs", JString("uplo"), JString("trans"), JString("diag"), JString("normin"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("x"), JFloatW("scale"), JFloatArray("cnorm"), JIntW("info")) - routine ("lapack", "slatdf", JInt("ijob"), JInt("n"), JFloatArray("z"), JInt("ldz"), JFloatArray("rhs"), JFloatW("rdsum"), JFloatW("rdscal"), JIntArray("ipiv"), JIntArray("jpiv")) - routine ("lapack", "slatps", JString("uplo"), JString("trans"), JString("diag"), JString("normin"), JInt("n"), JFloatArray("ap"), JFloatArray("x"), JFloatW("scale"), JFloatArray("cnorm"), JIntW("info")) - routine ("lapack", "slatrd", JString("uplo"), JInt("n"), JInt("nb"), JFloatArray("a"), JInt("lda"), JFloatArray("e"), JFloatArray("tau"), JFloatArray("w"), JInt("ldw")) - routine ("lapack", "slatrs", JString("uplo"), JString("trans"), JString("diag"), JString("normin"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("x"), JFloatW("scale"), JFloatArray("cnorm"), JIntW("info")) - routine ("lapack", "slatrz", JInt("m"), JInt("n"), JInt("l"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work")) - routine ("lapack", "slatzm", JString("side"), JInt("m"), JInt("n"), JFloatArray("v"), JInt("incv"), JFloat("tau"), JFloatArray("c1"), JFloatArray("c2"), JInt("Ldc"), JFloatArray("work")) - routine ("lapack", "slauu2", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) - routine ("lapack", "slauum", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) - # routine ("lapack", "slazq3", JInt("i0"), JIntW("n0"), JFloatArray("z"), JInt("pp"), JFloatW("dmin"), JFloatW("sigma"), JFloatW("desig"), JFloatW("qmax"), JIntW("nfail"), JIntW("iter"), JIntW("ndiv"), JBoolean("ieee"), JIntW("ttype"), JFloatW("dmin1"), JFloatW("dmin2"), JFloatW("dn"), JFloatW("dn1"), JFloatW("dn2"), JFloatW("tau")) - # routine ("lapack", "slazq4", JInt("i0"), JInt("n0"), JFloatArray("z"), JInt("pp"), JInt("n0in"), JFloat("dmin"), JFloat("dmin1"), JFloat("dmin2"), JFloat("dn"), JFloat("dn1"), JFloat("dn2"), JFloatW("tau"), JIntW("ttype"), JFloatW("g")) - routine ("lapack", "sopgtr", JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("tau"), JFloatArray("q"), JInt("ldq"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "sopmtr", JString("side"), JString("uplo"), JString("trans"), JInt("m"), JInt("n"), JFloatArray("ap"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "sorg2l", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "sorg2r", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "sorgbr", JString("vect"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sorghr", JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sorgl2", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "sorglq", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sorgql", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sorgqr", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sorgr2", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "sorgrq", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sorgtr", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sorm2l", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "sorm2r", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "sormbr", JString("vect"), JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sormhr", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sorml2", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "sormlq", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sormql", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sormqr", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sormr2", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "sormr3", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JInt("l"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "sormrq", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sormrz", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JInt("l"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "sormtr", JString("side"), JString("uplo"), JString("trans"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "spbcon", JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "spbequ", JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("s"), JFloatW("scond"), JFloatW("amax"), JIntW("info")) - routine ("lapack", "spbrfs", JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("afb"), JInt("ldafb"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "spbstf", JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JIntW("info")) - routine ("lapack", "spbsv", JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "spbsvx", JString("fact"), JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("afb"), JInt("ldafb"), JStringW("equed"), JFloatArray("s"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "spbtf2", JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JIntW("info")) - routine ("lapack", "spbtrf", JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JIntW("info")) - routine ("lapack", "spbtrs", JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "spocon", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "spoequ", JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("s"), JFloatW("scond"), JFloatW("amax"), JIntW("info")) - routine ("lapack", "sporfs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("af"), JInt("ldaf"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "sposv", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "sposvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("af"), JInt("ldaf"), JStringW("equed"), JFloatArray("s"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "spotf2", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) - routine ("lapack", "spotrf", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) - routine ("lapack", "spotri", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) - routine ("lapack", "spotrs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "sppcon", JString("uplo"), JInt("n"), JFloatArray("ap"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "sppequ", JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("s"), JFloatW("scond"), JFloatW("amax"), JIntW("info")) - routine ("lapack", "spprfs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("afp"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "sppsv", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "sppsvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("afp"), JStringW("equed"), JFloatArray("s"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "spptrf", JString("uplo"), JInt("n"), JFloatArray("ap"), JIntW("info")) - routine ("lapack", "spptri", JString("uplo"), JInt("n"), JFloatArray("ap"), JIntW("info")) - routine ("lapack", "spptrs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "sptcon", JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "spteqr", JString("compz"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "sptrfs", JInt("n"), JInt("nrhs"), JFloatArray("d"), JFloatArray("e"), JFloatArray("df"), JFloatArray("ef"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "sptsv", JInt("n"), JInt("nrhs"), JFloatArray("d"), JFloatArray("e"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "sptsvx", JString("fact"), JInt("n"), JInt("nrhs"), JFloatArray("d"), JFloatArray("e"), JFloatArray("df"), JFloatArray("ef"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "spttrf", JInt("n"), JFloatArray("d"), JFloatArray("e"), JIntW("info")) - routine ("lapack", "spttrs", JInt("n"), JInt("nrhs"), JFloatArray("d"), JFloatArray("e"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "sptts2", JInt("n"), JInt("nrhs"), JFloatArray("d"), JFloatArray("e"), JFloatArray("b"), JInt("ldb")) - routine ("lapack", "srscl", JInt("n"), JFloat("sa"), JFloatArray("sx"), JInt("incx")) - routine ("lapack", "ssbev", JString("jobz"), JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "ssbevd", JString("jobz"), JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - routine ("lapack", "ssbevx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("q"), JInt("ldq"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - routine ("lapack", "ssbgst", JString("vect"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JFloatArray("ab"), JInt("ldab"), JFloatArray("bb"), JInt("ldbb"), JFloatArray("x"), JInt("ldx"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "ssbgv", JString("jobz"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JFloatArray("ab"), JInt("ldab"), JFloatArray("bb"), JInt("ldbb"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "ssbgvd", JString("jobz"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JFloatArray("ab"), JInt("ldab"), JFloatArray("bb"), JInt("ldbb"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - routine ("lapack", "ssbgvx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JFloatArray("ab"), JInt("ldab"), JFloatArray("bb"), JInt("ldbb"), JFloatArray("q"), JInt("ldq"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - routine ("lapack", "ssbtrd", JString("vect"), JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("d"), JFloatArray("e"), JFloatArray("q"), JInt("ldq"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "sspcon", JString("uplo"), JInt("n"), JFloatArray("ap"), JIntArray("ipiv"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "sspev", JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "sspevd", JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - routine ("lapack", "sspevx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - routine ("lapack", "sspgst", JInt("itype"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("bp"), JIntW("info")) - routine ("lapack", "sspgv", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("bp"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "sspgvd", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("bp"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - routine ("lapack", "sspgvx", JInt("itype"), JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("bp"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - routine ("lapack", "ssprfs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("afp"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "sspsv", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "sspsvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("afp"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "ssptrd", JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("d"), JFloatArray("e"), JFloatArray("tau"), JIntW("info")) - routine ("lapack", "ssptrf", JString("uplo"), JInt("n"), JFloatArray("ap"), JIntArray("ipiv"), JIntW("info")) - routine ("lapack", "ssptri", JString("uplo"), JInt("n"), JFloatArray("ap"), JIntArray("ipiv"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "ssptrs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "sstebz", JString("range"), JString("order"), JInt("n"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JFloatArray("d"), JFloatArray("e"), JIntW("m"), JIntW("nsplit"), JFloatArray("w"), JIntArray("iblock"), JIntArray("isplit"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "sstedc", JString("compz"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - routine ("lapack", "sstegr", JString("jobz"), JString("range"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JIntArray("isuppz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - routine ("lapack", "sstein", JInt("n"), JFloatArray("d"), JFloatArray("e"), JInt("m"), JFloatArray("w"), JIntArray("iblock"), JIntArray("isplit"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - routine ("lapack", "sstemr", JString("jobz"), JString("range"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JInt("nzc"), JIntArray("isuppz"), JBooleanW("tryrac"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - routine ("lapack", "ssteqr", JString("compz"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "ssterf", JInt("n"), JFloatArray("d"), JFloatArray("e"), JIntW("info")) - routine ("lapack", "sstev", JString("jobz"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "sstevd", JString("jobz"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - routine ("lapack", "sstevr", JString("jobz"), JString("range"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JIntArray("isuppz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - routine ("lapack", "sstevx", JString("jobz"), JString("range"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - routine ("lapack", "ssycon", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "ssyev", JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("w"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "ssyevd", JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("w"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - routine ("lapack", "ssyevr", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JIntArray("isuppz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - routine ("lapack", "ssyevx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - routine ("lapack", "ssygs2", JInt("itype"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "ssygst", JInt("itype"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "ssygv", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("w"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "ssygvd", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("w"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - routine ("lapack", "ssygvx", JInt("itype"), JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - routine ("lapack", "ssyrfs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("af"), JInt("ldaf"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "ssysv", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "ssysvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("af"), JInt("ldaf"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "ssytd2", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("d"), JFloatArray("e"), JFloatArray("tau"), JIntW("info")) - routine ("lapack", "ssytf2", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JIntW("info")) - routine ("lapack", "ssytrd", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("d"), JFloatArray("e"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "ssytrf", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "ssytri", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "ssytrs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "stbcon", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "stbrfs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("kd"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "stbtrs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("kd"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "stgevc", JString("side"), JString("howmny"), JBooleanArray("select"), JInt("n"), JFloatArray("s"), JInt("lds"), JFloatArray("p"), JInt("ldp"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JInt("mm"), JIntW("m"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "stgex2", JBoolean("wantq"), JBoolean("wantz"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("q"), JInt("ldq"), JFloatArray("z"), JInt("ldz"), JInt("j1"), JInt("n1"), JInt("n2"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "stgexc", JBoolean("wantq"), JBoolean("wantz"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("q"), JInt("ldq"), JFloatArray("z"), JInt("ldz"), JIntW("ifst"), JIntW("ilst"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine ("lapack", "stgsen", JInt("ijob"), JBoolean("wantq"), JBoolean("wantz"), JBooleanArray("select"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("q"), JInt("ldq"), JFloatArray("z"), JInt("ldz"), JIntW("m"), JFloatW("pl"), JFloatW("pr"), JFloatArray("dif"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - routine ("lapack", "stgsja", JString("jobu"), JString("jobv"), JString("jobq"), JInt("m"), JInt("p"), JInt("n"), JInt("k"), JInt("l"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloat("tola"), JFloat("tolb"), JFloatArray("alpha"), JFloatArray("beta"), JFloatArray("u"), JInt("ldu"), JFloatArray("v"), JInt("ldv"), JFloatArray("q"), JInt("ldq"), JFloatArray("work"), JIntW("ncycle"), JIntW("info")) - routine ("lapack", "stgsna", JString("job"), JString("howmny"), JBooleanArray("select"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JFloatArray("s"), JFloatArray("dif"), JInt("mm"), JIntW("m"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "stgsy2", JString("trans"), JInt("ijob"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("c"), JInt("Ldc"), JFloatArray("d"), JInt("ldd"), JFloatArray("e"), JInt("lde"), JFloatArray("f"), JInt("ldf"), JFloatW("scale"), JFloatW("rdsum"), JFloatW("rdscal"), JIntArray("iwork"), JIntW("pq"), JIntW("info")) - routine ("lapack", "stgsyl", JString("trans"), JInt("ijob"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("c"), JInt("Ldc"), JFloatArray("d"), JInt("ldd"), JFloatArray("e"), JInt("lde"), JFloatArray("f"), JInt("ldf"), JFloatW("scale"), JFloatW("dif"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "stpcon", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JFloatArray("ap"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "stprfs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "stptri", JString("uplo"), JString("diag"), JInt("n"), JFloatArray("ap"), JIntW("info")) - routine ("lapack", "stptrs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "strcon", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "strevc", JString("side"), JString("howmny"), JBooleanArray("select"), JInt("n"), JFloatArray("t"), JInt("ldt"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JInt("mm"), JIntW("m"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "strexc", JString("compq"), JInt("n"), JFloatArray("t"), JInt("ldt"), JFloatArray("q"), JInt("ldq"), JIntW("ifst"), JIntW("ilst"), JFloatArray("work"), JIntW("info")) - routine ("lapack", "strrfs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "strsen", JString("job"), JString("compq"), JBooleanArray("select"), JInt("n"), JFloatArray("t"), JInt("ldt"), JFloatArray("q"), JInt("ldq"), JFloatArray("wr"), JFloatArray("wi"), JIntW("m"), JFloatW("s"), JFloatW("sep"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - routine ("lapack", "strsna", JString("job"), JString("howmny"), JBooleanArray("select"), JInt("n"), JFloatArray("t"), JInt("ldt"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JFloatArray("s"), JFloatArray("sep"), JInt("mm"), JIntW("m"), JFloatArray("work"), JInt("ldwork"), JIntArray("iwork"), JIntW("info")) - routine ("lapack", "strsyl", JString("trana"), JString("tranb"), JInt("isgn"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("c"), JInt("Ldc"), JFloatW("scale"), JIntW("info")) - routine ("lapack", "strti2", JString("uplo"), JString("diag"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) - routine ("lapack", "strtri", JString("uplo"), JString("diag"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) - routine ("lapack", "strtrs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - routine ("lapack", "stzrqf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JIntW("info")) - routine ("lapack", "stzrzf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - routine_r("lapack", JDoubleR(), "dlamch", JString("cmach")) - # routine ("lapack", "dlamc1", JIntW("beta"), JIntW("t"), JBooleanW("rnd"), JBooleanW("ieee1")) - # routine ("lapack", "dlamc2", JIntW("beta"), JIntW("t"), JBooleanW("rnd"), JDoubleW("eps"), JIntW("emin"), JDoubleW("rmin"), JIntW("emax"), JDoubleW("rmax")) - routine_r("lapack", JDoubleR(), "dlamc3", JDouble("a"), JDouble("b")) - # routine ("lapack", "dlamc4", JIntW("emin"), JDouble("start"), JInt("base")) - # routine ("lapack", "dlamc5", JInt("beta"), JInt("p"), JInt("emin"), JBoolean("ieee"), JIntW("emax"), JDoubleW("rmax")) - routine_r("lapack", JDoubleR(), "dsecnd") - routine_r("lapack", JBooleanR(), "lsame", JString("ca"), JString("cb")) - routine_r("lapack", JFloatR(), "second") - routine_r("lapack", JFloatR(), "slamch", JString("cmach")) - # routine ("lapack", "slamc1", JIntW("beta"), JIntW("t"), JBooleanW("rnd"), JBooleanW("ieee1")) - # routine ("lapack", "slamc2", JIntW("beta"), JIntW("t"), JBooleanW("rnd"), JFloatW("eps"), JIntW("emin"), JFloatW("rmin"), JIntW("emax"), JFloatW("rmax")) - routine_r("lapack", JFloatR(), "slamc3", JFloat("a"), JFloat("b")) - # routine ("lapack", "slamc4", JIntW("emin"), JFloat("start"), JInt("base")) - # routine ("lapack", "slamc5", JInt("beta"), JInt("p"), JInt("emin"), JBoolean("ieee"), JIntW("emax"), JFloatW("rmax")) \ No newline at end of file + Routine ("lapack", "dbdsdc", JString("uplo"), JString("compq"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("q"), JIntArray("iq"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dbdsqr", JString("uplo"), JInt("n"), JInt("ncvt"), JInt("nru"), JInt("ncc"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "ddisna", JString("job"), JInt("m"), JInt("n"), JDoubleArray("d"), JDoubleArray("sep"), JIntW("info")) + Routine ("lapack", "dgbbrd", JString("vect"), JInt("m"), JInt("n"), JInt("ncc"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("pt"), JInt("ldpt"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dgbcon", JString("norm"), JInt("n"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JIntArray("ipiv"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dgbequ", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("r"), JDoubleArray("c"), JDoubleW("rowcnd"), JDoubleW("colcnd"), JDoubleW("amax"), JIntW("info")) + Routine ("lapack", "dgbrfs", JString("trans"), JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("afb"), JInt("ldafb"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dgbsv", JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "dgbsvx", JString("fact"), JString("trans"), JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("afb"), JInt("ldafb"), JIntArray("ipiv"), JStringW("equed"), JDoubleArray("r"), JDoubleArray("c"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dgbtf2", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JIntArray("ipiv"), JIntW("info")) + Routine ("lapack", "dgbtrf", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JIntArray("ipiv"), JIntW("info")) + Routine ("lapack", "dgbtrs", JString("trans"), JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "dgebak", JString("job"), JString("side"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("scale"), JInt("m"), JDoubleArray("v"), JInt("ldv"), JIntW("info")) + Routine ("lapack", "dgebal", JString("job"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("ilo"), JIntW("ihi"), JDoubleArray("scale"), JIntW("info")) + Routine ("lapack", "dgebd2", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("tauq"), JDoubleArray("taup"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dgebrd", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("tauq"), JDoubleArray("taup"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dgecon", JString("norm"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dgeequ", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("r"), JDoubleArray("c"), JDoubleW("rowcnd"), JDoubleW("colcnd"), JDoubleW("amax"), JIntW("info")) + Routine_NI("lapack", "dgees", JString("jobvs"), JString("sort"), JObject("select"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("sdim"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("vs"), JInt("ldvs"), JDoubleArray("work"), JInt("lwork"), JBooleanArray("bwork"), JIntW("info")) + Routine_NI("lapack", "dgeesx", JString("jobvs"), JString("sort"), JObject("select"), JString("sense"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("sdim"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("vs"), JInt("ldvs"), JDoubleW("rconde"), JDoubleW("rcondv"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JBooleanArray("bwork"), JIntW("info")) + Routine ("lapack", "dgeev", JString("jobvl"), JString("jobvr"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dgeevx", JString("balanc"), JString("jobvl"), JString("jobvr"), JString("sense"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JIntW("ilo"), JIntW("ihi"), JDoubleArray("scale"), JDoubleW("abnrm"), JDoubleArray("rconde"), JDoubleArray("rcondv"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dgegs", JString("jobvsl"), JString("jobvsr"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("vsl"), JInt("ldvsl"), JDoubleArray("vsr"), JInt("ldvsr"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dgegv", JString("jobvl"), JString("jobvr"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dgehd2", JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dgehrd", JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dgelq2", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dgelqf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dgels", JString("trans"), JInt("m"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dgelsd", JInt("m"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("s"), JDouble("rcond"), JIntW("rank"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dgelss", JInt("m"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("s"), JDouble("rcond"), JIntW("rank"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dgelsx", JInt("m"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntArray("jpvt"), JDouble("rcond"), JIntW("rank"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dgelsy", JInt("m"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntArray("jpvt"), JDouble("rcond"), JIntW("rank"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dgeql2", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dgeqlf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dgeqp3", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("jpvt"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dgeqpf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("jpvt"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dgeqr2", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dgeqrf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dgerfs", JString("trans"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("af"), JInt("ldaf"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dgerq2", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dgerqf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dgesc2", JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("rhs"), JIntArray("ipiv"), JIntArray("jpiv"), JDoubleW("scale")) + Routine ("lapack", "dgesdd", JString("jobz"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("s"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dgesv", JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "dgesvd", JString("jobu"), JString("jobvt"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("s"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dgesvx", JString("fact"), JString("trans"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("af"), JInt("ldaf"), JIntArray("ipiv"), JStringW("equed"), JDoubleArray("r"), JDoubleArray("c"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dgetc2", JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JIntArray("jpiv"), JIntW("info")) + Routine ("lapack", "dgetf2", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JIntW("info")) + Routine ("lapack", "dgetrf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JIntW("info")) + Routine ("lapack", "dgetri", JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dgetrs", JString("trans"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "dggbak", JString("job"), JString("side"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("lscale"), JDoubleArray("rscale"), JInt("m"), JDoubleArray("v"), JInt("ldv"), JIntW("info")) + Routine ("lapack", "dggbal", JString("job"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("ilo"), JIntW("ihi"), JDoubleArray("lscale"), JDoubleArray("rscale"), JDoubleArray("work"), JIntW("info")) + Routine_NI("lapack", "dgges", JString("jobvsl"), JString("jobvsr"), JString("sort"), JObject("selctg"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("sdim"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("vsl"), JInt("ldvsl"), JDoubleArray("vsr"), JInt("ldvsr"), JDoubleArray("work"), JInt("lwork"), JBooleanArray("bwork"), JIntW("info")) + Routine_NI("lapack", "dggesx", JString("jobvsl"), JString("jobvsr"), JString("sort"), JObject("selctg"), JString("sense"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("sdim"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("vsl"), JInt("ldvsl"), JDoubleArray("vsr"), JInt("ldvsr"), JDoubleArray("rconde"), JDoubleArray("rcondv"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JBooleanArray("bwork"), JIntW("info")) + Routine ("lapack", "dggev", JString("jobvl"), JString("jobvr"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dggevx", JString("balanc"), JString("jobvl"), JString("jobvr"), JString("sense"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JIntW("ilo"), JIntW("ihi"), JDoubleArray("lscale"), JDoubleArray("rscale"), JDoubleW("abnrm"), JDoubleW("bbnrm"), JDoubleArray("rconde"), JDoubleArray("rcondv"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JBooleanArray("bwork"), JIntW("info")) + Routine ("lapack", "dggglm", JInt("n"), JInt("m"), JInt("p"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("d"), JDoubleArray("x"), JDoubleArray("y"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dgghrd", JString("compq"), JString("compz"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("z"), JInt("ldz"), JIntW("info")) + Routine ("lapack", "dgglse", JInt("m"), JInt("n"), JInt("p"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("c"), JDoubleArray("d"), JDoubleArray("x"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dggqrf", JInt("n"), JInt("m"), JInt("p"), JDoubleArray("a"), JInt("lda"), JDoubleArray("taua"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("taub"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dggrqf", JInt("m"), JInt("p"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("taua"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("taub"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dggsvd", JString("jobu"), JString("jobv"), JString("jobq"), JInt("m"), JInt("n"), JInt("p"), JIntW("k"), JIntW("l"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alpha"), JDoubleArray("beta"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dggsvp", JString("jobu"), JString("jobv"), JString("jobq"), JInt("m"), JInt("p"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDouble("tola"), JDouble("tolb"), JIntW("k"), JIntW("l"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("q"), JInt("ldq"), JIntArray("iwork"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dgtcon", JString("norm"), JInt("n"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("du2"), JIntArray("ipiv"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dgtrfs", JString("trans"), JInt("n"), JInt("nrhs"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("dlf"), JDoubleArray("df"), JDoubleArray("duf"), JDoubleArray("du2"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dgtsv", JInt("n"), JInt("nrhs"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "dgtsvx", JString("fact"), JString("trans"), JInt("n"), JInt("nrhs"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("dlf"), JDoubleArray("df"), JDoubleArray("duf"), JDoubleArray("du2"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dgttrf", JInt("n"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("du2"), JIntArray("ipiv"), JIntW("info")) + Routine ("lapack", "dgttrs", JString("trans"), JInt("n"), JInt("nrhs"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("du2"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "dgtts2", JInt("itrans"), JInt("n"), JInt("nrhs"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("du2"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb")) + Routine ("lapack", "dhgeqz", JString("job"), JString("compq"), JString("compz"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dhsein", JString("side"), JString("eigsrc"), JString("initv"), JBooleanArray("select"), JInt("n"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JInt("mm"), JIntW("m"), JDoubleArray("work"), JIntArray("ifaill"), JIntArray("ifailr"), JIntW("info")) + Routine ("lapack", "dhseqr", JString("job"), JString("compz"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + RoutineR ("lapack", JBooleanR(), "disnan", JDouble("din")) + Routine ("lapack", "dlabad", JDoubleW("small"), JDoubleW("large")) + Routine ("lapack", "dlabrd", JInt("m"), JInt("n"), JInt("nb"), JDoubleArray("a"), JInt("lda"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("tauq"), JDoubleArray("taup"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("y"), JInt("ldy")) + Routine ("lapack", "dlacn2", JInt("n"), JDoubleArray("v"), JDoubleArray("x"), JIntArray("isgn"), JDoubleW("est"), JIntW("kase"), JIntArray("isave")) + Routine ("lapack", "dlacon", JInt("n"), JDoubleArray("v"), JDoubleArray("x"), JIntArray("isgn"), JDoubleW("est"), JIntW("kase")) + Routine ("lapack", "dlacpy", JString("uplo"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb")) + Routine ("lapack", "dladiv", JDouble("a"), JDouble("b"), JDouble("c"), JDouble("d"), JDoubleW("p"), JDoubleW("q")) + Routine ("lapack", "dlae2", JDouble("a"), JDouble("b"), JDouble("c"), JDoubleW("rt1"), JDoubleW("rt2")) + Routine ("lapack", "dlaebz", JInt("ijob"), JInt("nitmax"), JInt("n"), JInt("mmax"), JInt("minp"), JInt("nbmin"), JDouble("abstol"), JDouble("reltol"), JDouble("pivmin"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("e2"), JIntArray("nval"), JDoubleArray("ab"), JDoubleArray("c"), JIntW("mout"), JIntArray("nab"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dlaed0", JInt("icompq"), JInt("qsiz"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("qstore"), JInt("ldqs"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dlaed1", JInt("n"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JIntArray("indxq"), JDoubleW("rho"), JInt("cutpnt"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dlaed2", JIntW("k"), JInt("n"), JInt("n1"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JIntArray("indxq"), JDoubleW("rho"), JDoubleArray("z"), JDoubleArray("dlamda"), JDoubleArray("w"), JDoubleArray("q2"), JIntArray("indx"), JIntArray("indxc"), JIntArray("indxp"), JIntArray("coltyp"), JIntW("info")) + Routine ("lapack", "dlaed3", JInt("k"), JInt("n"), JInt("n1"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JDouble("rho"), JDoubleArray("dlamda"), JDoubleArray("q2"), JIntArray("indx"), JIntArray("ctot"), JDoubleArray("w"), JDoubleArray("s"), JIntW("info")) + Routine ("lapack", "dlaed4", JInt("n"), JInt("i"), JDoubleArray("d"), JDoubleArray("z"), JDoubleArray("delta"), JDouble("rho"), JDoubleW("dlam"), JIntW("info")) + Routine ("lapack", "dlaed5", JInt("i"), JDoubleArray("d"), JDoubleArray("z"), JDoubleArray("delta"), JDouble("rho"), JDoubleW("dlam")) + Routine ("lapack", "dlaed6", JInt("kniter"), JBoolean("orgati"), JDouble("rho"), JDoubleArray("d"), JDoubleArray("z"), JDouble("finit"), JDoubleW("tau"), JIntW("info")) + Routine ("lapack", "dlaed7", JInt("icompq"), JInt("n"), JInt("qsiz"), JInt("tlvls"), JInt("curlvl"), JInt("curpbm"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JIntArray("indxq"), JDoubleW("rho"), JInt("cutpnt"), JDoubleArray("qstore"), JIntArray("qptr"), JIntArray("prmptr"), JIntArray("perm"), JIntArray("givptr"), JIntArray("givcol"), JDoubleArray("givnum"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dlaed8", JInt("icompq"), JIntW("k"), JInt("n"), JInt("qsiz"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JIntArray("indxq"), JDoubleW("rho"), JInt("cutpnt"), JDoubleArray("z"), JDoubleArray("dlamda"), JDoubleArray("q2"), JInt("ldq2"), JDoubleArray("w"), JIntArray("perm"), JIntW("givptr"), JIntArray("givcol"), JDoubleArray("givnum"), JIntArray("indxp"), JIntArray("indx"), JIntW("info")) + Routine ("lapack", "dlaed9", JInt("k"), JInt("kstart"), JInt("kstop"), JInt("n"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JDouble("rho"), JDoubleArray("dlamda"), JDoubleArray("w"), JDoubleArray("s"), JInt("lds"), JIntW("info")) + Routine ("lapack", "dlaeda", JInt("n"), JInt("tlvls"), JInt("curlvl"), JInt("curpbm"), JIntArray("prmptr"), JIntArray("perm"), JIntArray("givptr"), JIntArray("givcol"), JDoubleArray("givnum"), JDoubleArray("q"), JIntArray("qptr"), JDoubleArray("z"), JDoubleArray("ztemp"), JIntW("info")) + Routine ("lapack", "dlaein", JBoolean("rightv"), JBoolean("noinit"), JInt("n"), JDoubleArray("h"), JInt("ldh"), JDouble("wr"), JDouble("wi"), JDoubleArray("vr"), JDoubleArray("vi"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("work"), JDouble("eps3"), JDouble("smlnum"), JDouble("bignum"), JIntW("info")) + Routine ("lapack", "dlaev2", JDouble("a"), JDouble("b"), JDouble("c"), JDoubleW("rt1"), JDoubleW("rt2"), JDoubleW("cs1"), JDoubleW("sn1")) + Routine ("lapack", "dlaexc", JBoolean("wantq"), JInt("n"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("q"), JInt("ldq"), JInt("j1"), JInt("n1"), JInt("n2"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dlag2", JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDouble("safmin"), JDoubleW("scale1"), JDoubleW("scale2"), JDoubleW("wr1"), JDoubleW("wr2"), JDoubleW("wi")) + Routine ("lapack", "dlag2s", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JFloatArray("sa"), JInt("ldsa"), JIntW("info")) + Routine ("lapack", "dlags2", JBoolean("upper"), JDouble("a1"), JDouble("a2"), JDouble("a3"), JDouble("b1"), JDouble("b2"), JDouble("b3"), JDoubleW("csu"), JDoubleW("snu"), JDoubleW("csv"), JDoubleW("snv"), JDoubleW("csq"), JDoubleW("snq")) + Routine ("lapack", "dlagtf", JInt("n"), JDoubleArray("a"), JDouble("lambda"), JDoubleArray("b"), JDoubleArray("c"), JDouble("tol"), JDoubleArray("d"), JIntArray("in"), JIntW("info")) + Routine ("lapack", "dlagtm", JString("trans"), JInt("n"), JInt("nrhs"), JDouble("alpha"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("x"), JInt("ldx"), JDouble("beta"), JDoubleArray("b"), JInt("ldb")) + Routine ("lapack", "dlagts", JInt("job"), JInt("n"), JDoubleArray("a"), JDoubleArray("b"), JDoubleArray("c"), JDoubleArray("d"), JIntArray("in"), JDoubleArray("y"), JDoubleW("tol"), JIntW("info")) + Routine ("lapack", "dlagv2", JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleW("csl"), JDoubleW("snl"), JDoubleW("csr"), JDoubleW("snr")) + Routine ("lapack", "dlahqr", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JInt("iloz"), JInt("ihiz"), JDoubleArray("z"), JInt("ldz"), JIntW("info")) + Routine ("lapack", "dlahr2", JInt("n"), JInt("k"), JInt("nb"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("y"), JInt("ldy")) + Routine ("lapack", "dlahrd", JInt("n"), JInt("k"), JInt("nb"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("y"), JInt("ldy")) + Routine ("lapack", "dlaic1", JInt("job"), JInt("j"), JDoubleArray("x"), JDouble("sest"), JDoubleArray("w"), JDouble("gamma"), JDoubleW("sestpr"), JDoubleW("s"), JDoubleW("c")) + RoutineR ("lapack", JBooleanR(), "dlaisnan", JDouble("din1"), JDouble("din2")) + Routine ("lapack", "dlaln2", JBoolean("ltrans"), JInt("na"), JInt("nw"), JDouble("smin"), JDouble("ca"), JDoubleArray("a"), JInt("lda"), JDouble("d1"), JDouble("d2"), JDoubleArray("b"), JInt("ldb"), JDouble("wr"), JDouble("wi"), JDoubleArray("x"), JInt("ldx"), JDoubleW("scale"), JDoubleW("xnorm"), JIntW("info")) + Routine ("lapack", "dlals0", JInt("icompq"), JInt("nl"), JInt("nr"), JInt("sqre"), JInt("nrhs"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("bx"), JInt("ldbx"), JIntArray("perm"), JInt("givptr"), JIntArray("givcol"), JInt("ldgcol"), JDoubleArray("givnum"), JInt("ldgnum"), JDoubleArray("poles"), JDoubleArray("difl"), JDoubleArray("difr"), JDoubleArray("z"), JInt("k"), JDouble("c"), JDouble("s"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dlalsa", JInt("icompq"), JInt("smlsiz"), JInt("n"), JInt("nrhs"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("bx"), JInt("ldbx"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JIntArray("k"), JDoubleArray("difl"), JDoubleArray("difr"), JDoubleArray("z"), JDoubleArray("poles"), JIntArray("givptr"), JIntArray("givcol"), JInt("ldgcol"), JIntArray("perm"), JDoubleArray("givnum"), JDoubleArray("c"), JDoubleArray("s"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dlalsd", JString("uplo"), JInt("smlsiz"), JInt("n"), JInt("nrhs"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("b"), JInt("ldb"), JDouble("rcond"), JIntW("rank"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dlamrg", JInt("n1"), JInt("n2"), JDoubleArray("a"), JInt("dtrd1"), JInt("dtrd2"), JIntArray("index")) + RoutineR ("lapack", JIntR(), "dlaneg", JInt("n"), JDoubleArray("d"), JDoubleArray("lld"), JDouble("sigma"), JDouble("pivmin"), JInt("r")) + RoutineR ("lapack", JDoubleR(), "dlangb", JString("norm"), JInt("n"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("work")) + RoutineR ("lapack", JDoubleR(), "dlange", JString("norm"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("work")) + RoutineR ("lapack", JDoubleR(), "dlangt", JString("norm"), JInt("n"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du")) + RoutineR ("lapack", JDoubleR(), "dlanhs", JString("norm"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("work")) + RoutineR ("lapack", JDoubleR(), "dlansb", JString("norm"), JString("uplo"), JInt("n"), JInt("k"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("work")) + RoutineR ("lapack", JDoubleR(), "dlansp", JString("norm"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("work")) + RoutineR ("lapack", JDoubleR(), "dlanst", JString("norm"), JInt("n"), JDoubleArray("d"), JDoubleArray("e")) + RoutineR ("lapack", JDoubleR(), "dlansy", JString("norm"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("work")) + RoutineR ("lapack", JDoubleR(), "dlantb", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JInt("k"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("work")) + RoutineR ("lapack", JDoubleR(), "dlantp", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JDoubleArray("ap"), JDoubleArray("work")) + RoutineR ("lapack", JDoubleR(), "dlantr", JString("norm"), JString("uplo"), JString("diag"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("work")) + Routine ("lapack", "dlanv2", JDoubleW("a"), JDoubleW("b"), JDoubleW("c"), JDoubleW("d"), JDoubleW("rt1r"), JDoubleW("rt1i"), JDoubleW("rt2r"), JDoubleW("rt2i"), JDoubleW("cs"), JDoubleW("sn")) + Routine ("lapack", "dlapll", JInt("n"), JDoubleArray("x"), JInt("incx"), JDoubleArray("y"), JInt("incy"), JDoubleW("ssmin")) + Routine ("lapack", "dlapmt", JBoolean("forwrd"), JInt("m"), JInt("n"), JDoubleArray("x"), JInt("ldx"), JIntArray("k")) + RoutineR ("lapack", JDoubleR(), "dlapy2", JDouble("x"), JDouble("y")) + RoutineR ("lapack", JDoubleR(), "dlapy3", JDouble("x"), JDouble("y"), JDouble("z")) + Routine ("lapack", "dlaqgb", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("r"), JDoubleArray("c"), JDouble("rowcnd"), JDouble("colcnd"), JDouble("amax"), JStringW("equed")) + Routine ("lapack", "dlaqge", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("r"), JDoubleArray("c"), JDouble("rowcnd"), JDouble("colcnd"), JDouble("amax"), JStringW("equed")) + Routine ("lapack", "dlaqp2", JInt("m"), JInt("n"), JInt("offset"), JDoubleArray("a"), JInt("lda"), JIntArray("jpvt"), JDoubleArray("tau"), JDoubleArray("vn1"), JDoubleArray("vn2"), JDoubleArray("work")) + Routine ("lapack", "dlaqps", JInt("m"), JInt("n"), JInt("offset"), JInt("nb"), JIntW("kb"), JDoubleArray("a"), JInt("lda"), JIntArray("jpvt"), JDoubleArray("tau"), JDoubleArray("vn1"), JDoubleArray("vn2"), JDoubleArray("auxv"), JDoubleArray("f"), JInt("ldf")) + Routine ("lapack", "dlaqr0", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JInt("iloz"), JInt("ihiz"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dlaqr1", JInt("n"), JDoubleArray("h"), JInt("ldh"), JDouble("sr1"), JDouble("si1"), JDouble("sr2"), JDouble("si2"), JDoubleArray("v")) + Routine ("lapack", "dlaqr2", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ktop"), JInt("kbot"), JInt("nw"), JDoubleArray("h"), JInt("ldh"), JInt("iloz"), JInt("ihiz"), JDoubleArray("z"), JInt("ldz"), JIntW("ns"), JIntW("nd"), JDoubleArray("sr"), JDoubleArray("si"), JDoubleArray("v"), JInt("ldv"), JInt("nh"), JDoubleArray("t"), JInt("ldt"), JInt("nv"), JDoubleArray("wv"), JInt("ldwv"), JDoubleArray("work"), JInt("lwork")) + Routine ("lapack", "dlaqr3", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ktop"), JInt("kbot"), JInt("nw"), JDoubleArray("h"), JInt("ldh"), JInt("iloz"), JInt("ihiz"), JDoubleArray("z"), JInt("ldz"), JIntW("ns"), JIntW("nd"), JDoubleArray("sr"), JDoubleArray("si"), JDoubleArray("v"), JInt("ldv"), JInt("nh"), JDoubleArray("t"), JInt("ldt"), JInt("nv"), JDoubleArray("wv"), JInt("ldwv"), JDoubleArray("work"), JInt("lwork")) + Routine ("lapack", "dlaqr4", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JInt("iloz"), JInt("ihiz"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dlaqr5", JBoolean("wantt"), JBoolean("wantz"), JInt("kacc22"), JInt("n"), JInt("ktop"), JInt("kbot"), JInt("nshfts"), JDoubleArray("sr"), JDoubleArray("si"), JDoubleArray("h"), JInt("ldh"), JInt("iloz"), JInt("ihiz"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("u"), JInt("ldu"), JInt("nv"), JDoubleArray("wv"), JInt("ldwv"), JInt("nh"), JDoubleArray("wh"), JInt("ldwh")) + Routine ("lapack", "dlaqsb", JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("s"), JDouble("scond"), JDouble("amax"), JStringW("equed")) + Routine ("lapack", "dlaqsp", JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("s"), JDouble("scond"), JDouble("amax"), JStringW("equed")) + Routine ("lapack", "dlaqsy", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("s"), JDouble("scond"), JDouble("amax"), JStringW("equed")) + Routine ("lapack", "dlaqtr", JBoolean("ltran"), JBoolean("lreal"), JInt("n"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("b"), JDouble("w"), JDoubleW("scale"), JDoubleArray("x"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dlar1v", JInt("n"), JInt("b1"), JInt("bn"), JDouble("lambda"), JDoubleArray("d"), JDoubleArray("l"), JDoubleArray("ld"), JDoubleArray("lld"), JDouble("pivmin"), JDouble("gaptol"), JDoubleArray("z"), JBoolean("wantnc"), JIntW("negcnt"), JDoubleW("ztz"), JDoubleW("mingma"), JIntW("r"), JIntArray("isuppz"), JDoubleW("nrminv"), JDoubleW("resid"), JDoubleW("rqcorr"), JDoubleArray("work")) + Routine ("lapack", "dlar2v", JInt("n"), JDoubleArray("x"), JDoubleArray("y"), JDoubleArray("z"), JInt("incx"), JDoubleArray("c"), JDoubleArray("s"), JInt("incc")) + Routine ("lapack", "dlarf", JString("side"), JInt("m"), JInt("n"), JDoubleArray("v"), JInt("incv"), JDouble("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work")) + Routine ("lapack", "dlarfb", JString("side"), JString("trans"), JString("direct"), JString("storev"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("ldwork")) + Routine ("lapack", "dlarfg", JInt("n"), JDoubleW("alpha"), JDoubleArray("x"), JInt("incx"), JDoubleW("tau")) + Routine ("lapack", "dlarft", JString("direct"), JString("storev"), JInt("n"), JInt("k"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("tau"), JDoubleArray("t"), JInt("ldt")) + Routine ("lapack", "dlarfx", JString("side"), JInt("m"), JInt("n"), JDoubleArray("v"), JDouble("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work")) + Routine ("lapack", "dlargv", JInt("n"), JDoubleArray("x"), JInt("incx"), JDoubleArray("y"), JInt("incy"), JDoubleArray("c"), JInt("incc")) + Routine ("lapack", "dlarnv", JInt("idist"), JIntArray("iseed"), JInt("n"), JDoubleArray("x")) + Routine ("lapack", "dlarra", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("e2"), JDouble("spltol"), JDouble("tnrm"), JIntW("nsplit"), JIntArray("isplit"), JIntW("info")) + Routine ("lapack", "dlarrb", JInt("n"), JDoubleArray("d"), JDoubleArray("lld"), JInt("ifirst"), JInt("ilast"), JDouble("rtol1"), JDouble("rtol2"), JInt("offset"), JDoubleArray("w"), JDoubleArray("wgap"), JDoubleArray("werr"), JDoubleArray("work"), JIntArray("iwork"), JDouble("pivmin"), JDouble("spdiam"), JInt("twist"), JIntW("info")) + Routine ("lapack", "dlarrc", JString("jobt"), JInt("n"), JDouble("vl"), JDouble("vu"), JDoubleArray("d"), JDoubleArray("e"), JDouble("pivmin"), JIntW("eigcnt"), JIntW("lcnt"), JIntW("rcnt"), JIntW("info")) + Routine ("lapack", "dlarrd", JString("range"), JString("order"), JInt("n"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDoubleArray("gers"), JDouble("reltol"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("e2"), JDouble("pivmin"), JInt("nsplit"), JIntArray("isplit"), JIntW("m"), JDoubleArray("w"), JDoubleArray("werr"), JDoubleW("wl"), JDoubleW("wu"), JIntArray("iblock"), JIntArray("indexw"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dlarre", JString("range"), JInt("n"), JDoubleW("vl"), JDoubleW("vu"), JInt("il"), JInt("iu"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("e2"), JDouble("rtol1"), JDouble("rtol2"), JDouble("spltol"), JIntW("nsplit"), JIntArray("isplit"), JIntW("m"), JDoubleArray("w"), JDoubleArray("werr"), JDoubleArray("wgap"), JIntArray("iblock"), JIntArray("indexw"), JDoubleArray("gers"), JDoubleW("pivmin"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dlarrf", JInt("n"), JDoubleArray("d"), JDoubleArray("l"), JDoubleArray("ld"), JInt("clstrt"), JInt("clend"), JDoubleArray("w"), JDoubleArray("wgap"), JDoubleArray("werr"), JDouble("spdiam"), JDouble("clgapl"), JDouble("clgapr"), JDouble("pivmin"), JDoubleW("sigma"), JDoubleArray("dplus"), JDoubleArray("lplus"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dlarrj", JInt("n"), JDoubleArray("d"), JDoubleArray("e2"), JInt("ifirst"), JInt("ilast"), JDouble("rtol"), JInt("offset"), JDoubleArray("w"), JDoubleArray("werr"), JDoubleArray("work"), JIntArray("iwork"), JDouble("pivmin"), JDouble("spdiam"), JIntW("info")) + Routine ("lapack", "dlarrk", JInt("n"), JInt("iw"), JDouble("gl"), JDouble("gu"), JDoubleArray("d"), JDoubleArray("e2"), JDouble("pivmin"), JDouble("reltol"), JDoubleW("w"), JDoubleW("werr"), JIntW("info")) + Routine ("lapack", "dlarrr", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JIntW("info")) + Routine ("lapack", "dlarrv", JInt("n"), JDouble("vl"), JDouble("vu"), JDoubleArray("d"), JDoubleArray("l"), JDouble("pivmin"), JIntArray("isplit"), JInt("m"), JInt("dol"), JInt("dou"), JDouble("minrgp"), JDoubleW("rtol1"), JDoubleW("rtol2"), JDoubleArray("w"), JDoubleArray("werr"), JDoubleArray("wgap"), JIntArray("iblock"), JIntArray("indexw"), JDoubleArray("gers"), JDoubleArray("z"), JInt("ldz"), JIntArray("isuppz"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dlartg", JDouble("f"), JDouble("g"), JDoubleW("cs"), JDoubleW("sn"), JDoubleW("r")) + Routine ("lapack", "dlartv", JInt("n"), JDoubleArray("x"), JInt("incx"), JDoubleArray("y"), JInt("incy"), JDoubleArray("c"), JDoubleArray("s"), JInt("incc")) + Routine ("lapack", "dlaruv", JIntArray("iseed"), JInt("n"), JDoubleArray("x")) + Routine ("lapack", "dlarz", JString("side"), JInt("m"), JInt("n"), JInt("l"), JDoubleArray("v"), JInt("incv"), JDouble("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work")) + Routine ("lapack", "dlarzb", JString("side"), JString("trans"), JString("direct"), JString("storev"), JInt("m"), JInt("n"), JInt("k"), JInt("l"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("ldwork")) + Routine ("lapack", "dlarzt", JString("direct"), JString("storev"), JInt("n"), JInt("k"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("tau"), JDoubleArray("t"), JInt("ldt")) + Routine ("lapack", "dlas2", JDouble("f"), JDouble("g"), JDouble("h"), JDoubleW("ssmin"), JDoubleW("ssmax")) + Routine ("lapack", "dlascl", JString("type"), JInt("kl"), JInt("ku"), JDouble("cfrom"), JDouble("cto"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) + Routine ("lapack", "dlasd0", JInt("n"), JInt("sqre"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JInt("ldvt"), JInt("smlsiz"), JIntArray("iwork"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dlasd1", JInt("nl"), JInt("nr"), JInt("sqre"), JDoubleArray("d"), JDoubleW("alpha"), JDoubleW("beta"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JInt("ldvt"), JIntArray("idxq"), JIntArray("iwork"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dlasd2", JInt("nl"), JInt("nr"), JInt("sqre"), JIntW("k"), JDoubleArray("d"), JDoubleArray("z"), JDouble("alpha"), JDouble("beta"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("dsigma"), JDoubleArray("u2"), JInt("ldu2"), JDoubleArray("vt2"), JInt("ldvt2"), JIntArray("idxp"), JIntArray("idx"), JIntArray("idxc"), JIntArray("idxq"), JIntArray("coltyp"), JIntW("info")) + Routine ("lapack", "dlasd3", JInt("nl"), JInt("nr"), JInt("sqre"), JInt("k"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("dsigma"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("u2"), JInt("ldu2"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("vt2"), JInt("ldvt2"), JIntArray("idxc"), JIntArray("ctot"), JDoubleArray("z"), JIntW("info")) + Routine ("lapack", "dlasd4", JInt("n"), JInt("i"), JDoubleArray("d"), JDoubleArray("z"), JDoubleArray("delta"), JDouble("rho"), JDoubleW("sigma"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dlasd5", JInt("i"), JDoubleArray("d"), JDoubleArray("z"), JDoubleArray("delta"), JDouble("rho"), JDoubleW("dsigma"), JDoubleArray("work")) + Routine ("lapack", "dlasd6", JInt("icompq"), JInt("nl"), JInt("nr"), JInt("sqre"), JDoubleArray("d"), JDoubleArray("vf"), JDoubleArray("vl"), JDoubleW("alpha"), JDoubleW("beta"), JIntArray("idxq"), JIntArray("perm"), JIntW("givptr"), JIntArray("givcol"), JInt("ldgcol"), JDoubleArray("givnum"), JInt("ldgnum"), JDoubleArray("poles"), JDoubleArray("difl"), JDoubleArray("difr"), JDoubleArray("z"), JIntW("k"), JDoubleW("c"), JDoubleW("s"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dlasd7", JInt("icompq"), JInt("nl"), JInt("nr"), JInt("sqre"), JIntW("k"), JDoubleArray("d"), JDoubleArray("z"), JDoubleArray("zw"), JDoubleArray("vf"), JDoubleArray("vfw"), JDoubleArray("vl"), JDoubleArray("vlw"), JDouble("alpha"), JDouble("beta"), JDoubleArray("dsigma"), JIntArray("idx"), JIntArray("idxp"), JIntArray("idxq"), JIntArray("perm"), JIntW("givptr"), JIntArray("givcol"), JInt("ldgcol"), JDoubleArray("givnum"), JInt("ldgnum"), JDoubleW("c"), JDoubleW("s"), JIntW("info")) + Routine ("lapack", "dlasd8", JInt("icompq"), JInt("k"), JDoubleArray("d"), JDoubleArray("z"), JDoubleArray("vf"), JDoubleArray("vl"), JDoubleArray("difl"), JDoubleArray("difr"), JInt("lddifr"), JDoubleArray("dsigma"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dlasda", JInt("icompq"), JInt("smlsiz"), JInt("n"), JInt("sqre"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JIntArray("k"), JDoubleArray("difl"), JDoubleArray("difr"), JDoubleArray("z"), JDoubleArray("poles"), JIntArray("givptr"), JIntArray("givcol"), JInt("ldgcol"), JIntArray("perm"), JDoubleArray("givnum"), JDoubleArray("c"), JDoubleArray("s"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dlasdq", JString("uplo"), JInt("sqre"), JInt("n"), JInt("ncvt"), JInt("nru"), JInt("ncc"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dlasdt", JInt("n"), JIntW("lvl"), JIntW("nd"), JIntArray("inode"), JIntArray("ndiml"), JIntArray("ndimr"), JInt("msub")) + Routine ("lapack", "dlaset", JString("uplo"), JInt("m"), JInt("n"), JDouble("alpha"), JDouble("beta"), JDoubleArray("a"), JInt("lda")) + Routine ("lapack", "dlasq1", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dlasq2", JInt("n"), JDoubleArray("z"), JIntW("info")) + Routine ("lapack", "dlasq3", JInt("i0"), JIntW("n0"), JDoubleArray("z"), JInt("pp"), JDoubleW("dmin"), JDoubleW("sigma"), JDoubleW("desig"), JDoubleW("qmax"), JIntW("nfail"), JIntW("iter"), JIntW("ndiv"), JBoolean("ieee")) + Routine ("lapack", "dlasq4", JInt("i0"), JInt("n0"), JDoubleArray("z"), JInt("pp"), JInt("n0in"), JDouble("dmin"), JDouble("dmin1"), JDouble("dmin2"), JDouble("dn"), JDouble("dn1"), JDouble("dn2"), JDoubleW("tau"), JIntW("ttype")) + Routine ("lapack", "dlasq5", JInt("i0"), JInt("n0"), JDoubleArray("z"), JInt("pp"), JDouble("tau"), JDoubleW("dmin"), JDoubleW("dmin1"), JDoubleW("dmin2"), JDoubleW("dn"), JDoubleW("dnm1"), JDoubleW("dnm2"), JBoolean("ieee")) + Routine ("lapack", "dlasq6", JInt("i0"), JInt("n0"), JDoubleArray("z"), JInt("pp"), JDoubleW("dmin"), JDoubleW("dmin1"), JDoubleW("dmin2"), JDoubleW("dn"), JDoubleW("dnm1"), JDoubleW("dnm2")) + Routine ("lapack", "dlasr", JString("side"), JString("pivot"), JString("direct"), JInt("m"), JInt("n"), JDoubleArray("c"), JDoubleArray("s"), JDoubleArray("a"), JInt("lda")) + Routine ("lapack", "dlasrt", JString("id"), JInt("n"), JDoubleArray("d"), JIntW("info")) + Routine ("lapack", "dlassq", JInt("n"), JDoubleArray("x"), JInt("incx"), JDoubleW("scale"), JDoubleW("sumsq")) + Routine ("lapack", "dlasv2", JDouble("f"), JDouble("g"), JDouble("h"), JDoubleW("ssmin"), JDoubleW("ssmax"), JDoubleW("snr"), JDoubleW("csr"), JDoubleW("snl"), JDoubleW("csl")) + Routine ("lapack", "dlaswp", JInt("n"), JDoubleArray("a"), JInt("lda"), JInt("k1"), JInt("k2"), JIntArray("ipiv"), JInt("incx")) + Routine ("lapack", "dlasy2", JBoolean("ltranl"), JBoolean("ltranr"), JInt("isgn"), JInt("n1"), JInt("n2"), JDoubleArray("tl"), JInt("ldtl"), JDoubleArray("tr"), JInt("ldtr"), JDoubleArray("b"), JInt("ldb"), JDoubleW("scale"), JDoubleArray("x"), JInt("ldx"), JDoubleW("xnorm"), JIntW("info")) + Routine ("lapack", "dlasyf", JString("uplo"), JInt("n"), JInt("nb"), JIntW("kb"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("w"), JInt("ldw"), JIntW("info")) + Routine ("lapack", "dlatbs", JString("uplo"), JString("trans"), JString("diag"), JString("normin"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("x"), JDoubleW("scale"), JDoubleArray("cnorm"), JIntW("info")) + Routine ("lapack", "dlatdf", JInt("ijob"), JInt("n"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("rhs"), JDoubleW("rdsum"), JDoubleW("rdscal"), JIntArray("ipiv"), JIntArray("jpiv")) + Routine ("lapack", "dlatps", JString("uplo"), JString("trans"), JString("diag"), JString("normin"), JInt("n"), JDoubleArray("ap"), JDoubleArray("x"), JDoubleW("scale"), JDoubleArray("cnorm"), JIntW("info")) + Routine ("lapack", "dlatrd", JString("uplo"), JInt("n"), JInt("nb"), JDoubleArray("a"), JInt("lda"), JDoubleArray("e"), JDoubleArray("tau"), JDoubleArray("w"), JInt("ldw")) + Routine ("lapack", "dlatrs", JString("uplo"), JString("trans"), JString("diag"), JString("normin"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("x"), JDoubleW("scale"), JDoubleArray("cnorm"), JIntW("info")) + Routine ("lapack", "dlatrz", JInt("m"), JInt("n"), JInt("l"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work")) + Routine ("lapack", "dlatzm", JString("side"), JInt("m"), JInt("n"), JDoubleArray("v"), JInt("incv"), JDouble("tau"), JDoubleArray("c1"), JDoubleArray("c2"), JInt("Ldc"), JDoubleArray("work")) + Routine ("lapack", "dlauu2", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) + Routine ("lapack", "dlauum", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) + Routine_NI("lapack", "dlazq3", JInt("i0"), JIntW("n0"), JDoubleArray("z"), JInt("pp"), JDoubleW("dmin"), JDoubleW("sigma"), JDoubleW("desig"), JDoubleW("qmax"), JIntW("nfail"), JIntW("iter"), JIntW("ndiv"), JBoolean("ieee"), JIntW("ttype"), JDoubleW("dmin1"), JDoubleW("dmin2"), JDoubleW("dn"), JDoubleW("dn1"), JDoubleW("dn2"), JDoubleW("tau")) + Routine_NI("lapack", "dlazq4", JInt("i0"), JInt("n0"), JDoubleArray("z"), JInt("pp"), JInt("n0in"), JDouble("dmin"), JDouble("dmin1"), JDouble("dmin2"), JDouble("dn"), JDouble("dn1"), JDouble("dn2"), JDoubleW("tau"), JIntW("ttype"), JDoubleW("g")) + Routine ("lapack", "dopgtr", JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("tau"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dopmtr", JString("side"), JString("uplo"), JString("trans"), JInt("m"), JInt("n"), JDoubleArray("ap"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dorg2l", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dorg2r", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dorgbr", JString("vect"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dorghr", JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dorgl2", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dorglq", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dorgql", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dorgqr", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dorgr2", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dorgrq", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dorgtr", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dorm2l", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dorm2r", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dormbr", JString("vect"), JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dormhr", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dorml2", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dormlq", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dormql", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dormqr", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dormr2", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dormr3", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JInt("l"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dormrq", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dormrz", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JInt("l"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dormtr", JString("side"), JString("uplo"), JString("trans"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dpbcon", JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dpbequ", JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("s"), JDoubleW("scond"), JDoubleW("amax"), JIntW("info")) + Routine ("lapack", "dpbrfs", JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("afb"), JInt("ldafb"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dpbstf", JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JIntW("info")) + Routine ("lapack", "dpbsv", JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "dpbsvx", JString("fact"), JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("afb"), JInt("ldafb"), JStringW("equed"), JDoubleArray("s"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dpbtf2", JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JIntW("info")) + Routine ("lapack", "dpbtrf", JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JIntW("info")) + Routine ("lapack", "dpbtrs", JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "dpocon", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dpoequ", JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("s"), JDoubleW("scond"), JDoubleW("amax"), JIntW("info")) + Routine ("lapack", "dporfs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("af"), JInt("ldaf"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dposv", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "dposvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("af"), JInt("ldaf"), JStringW("equed"), JDoubleArray("s"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dpotf2", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) + Routine ("lapack", "dpotrf", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) + Routine ("lapack", "dpotri", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) + Routine ("lapack", "dpotrs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "dppcon", JString("uplo"), JInt("n"), JDoubleArray("ap"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dppequ", JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("s"), JDoubleW("scond"), JDoubleW("amax"), JIntW("info")) + Routine ("lapack", "dpprfs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("afp"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dppsv", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "dppsvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("afp"), JStringW("equed"), JDoubleArray("s"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dpptrf", JString("uplo"), JInt("n"), JDoubleArray("ap"), JIntW("info")) + Routine ("lapack", "dpptri", JString("uplo"), JInt("n"), JDoubleArray("ap"), JIntW("info")) + Routine ("lapack", "dpptrs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "dptcon", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dpteqr", JString("compz"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dptrfs", JInt("n"), JInt("nrhs"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("df"), JDoubleArray("ef"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dptsv", JInt("n"), JInt("nrhs"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "dptsvx", JString("fact"), JInt("n"), JInt("nrhs"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("df"), JDoubleArray("ef"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dpttrf", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JIntW("info")) + Routine ("lapack", "dpttrs", JInt("n"), JInt("nrhs"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "dptts2", JInt("n"), JInt("nrhs"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("b"), JInt("ldb")) + Routine ("lapack", "drscl", JInt("n"), JDouble("sa"), JDoubleArray("sx"), JInt("incx")) + Routine ("lapack", "dsbev", JString("jobz"), JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dsbevd", JString("jobz"), JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + Routine ("lapack", "dsbevx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("q"), JInt("ldq"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + Routine ("lapack", "dsbgst", JString("vect"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("bb"), JInt("ldbb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dsbgv", JString("jobz"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("bb"), JInt("ldbb"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dsbgvd", JString("jobz"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("bb"), JInt("ldbb"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + Routine ("lapack", "dsbgvx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("bb"), JInt("ldbb"), JDoubleArray("q"), JInt("ldq"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + Routine ("lapack", "dsbtrd", JString("vect"), JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dsgesv", JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("work"), JFloatArray("swork"), JIntW("iter"), JIntW("info")) + Routine ("lapack", "dspcon", JString("uplo"), JInt("n"), JDoubleArray("ap"), JIntArray("ipiv"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dspev", JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dspevd", JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + Routine ("lapack", "dspevx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + Routine ("lapack", "dspgst", JInt("itype"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("bp"), JIntW("info")) + Routine ("lapack", "dspgv", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("bp"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dspgvd", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("bp"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + Routine ("lapack", "dspgvx", JInt("itype"), JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("bp"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + Routine ("lapack", "dsprfs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("afp"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dspsv", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "dspsvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("afp"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dsptrd", JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("tau"), JIntW("info")) + Routine ("lapack", "dsptrf", JString("uplo"), JInt("n"), JDoubleArray("ap"), JIntArray("ipiv"), JIntW("info")) + Routine ("lapack", "dsptri", JString("uplo"), JInt("n"), JDoubleArray("ap"), JIntArray("ipiv"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dsptrs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "dstebz", JString("range"), JString("order"), JInt("n"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JDoubleArray("d"), JDoubleArray("e"), JIntW("m"), JIntW("nsplit"), JDoubleArray("w"), JIntArray("iblock"), JIntArray("isplit"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dstedc", JString("compz"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + Routine ("lapack", "dstegr", JString("jobz"), JString("range"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JIntArray("isuppz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + Routine ("lapack", "dstein", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JInt("m"), JDoubleArray("w"), JIntArray("iblock"), JIntArray("isplit"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + Routine ("lapack", "dstemr", JString("jobz"), JString("range"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JInt("nzc"), JIntArray("isuppz"), JBooleanW("tryrac"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + Routine ("lapack", "dsteqr", JString("compz"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dsterf", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JIntW("info")) + Routine ("lapack", "dstev", JString("jobz"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dstevd", JString("jobz"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + Routine ("lapack", "dstevr", JString("jobz"), JString("range"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JIntArray("isuppz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + Routine ("lapack", "dstevx", JString("jobz"), JString("range"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + Routine ("lapack", "dsycon", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dsyev", JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("w"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dsyevd", JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("w"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + Routine ("lapack", "dsyevr", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JIntArray("isuppz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + Routine ("lapack", "dsyevx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + Routine ("lapack", "dsygs2", JInt("itype"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "dsygst", JInt("itype"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "dsygv", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("w"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dsygvd", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("w"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + Routine ("lapack", "dsygvx", JInt("itype"), JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + Routine ("lapack", "dsyrfs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("af"), JInt("ldaf"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dsysv", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dsysvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("af"), JInt("ldaf"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dsytd2", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("tau"), JIntW("info")) + Routine ("lapack", "dsytf2", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JIntW("info")) + Routine ("lapack", "dsytrd", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dsytrf", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dsytri", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dsytrs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "dtbcon", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dtbrfs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("kd"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dtbtrs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("kd"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "dtgevc", JString("side"), JString("howmny"), JBooleanArray("select"), JInt("n"), JDoubleArray("s"), JInt("lds"), JDoubleArray("p"), JInt("ldp"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JInt("mm"), JIntW("m"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dtgex2", JBoolean("wantq"), JBoolean("wantz"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("z"), JInt("ldz"), JInt("j1"), JInt("n1"), JInt("n2"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dtgexc", JBoolean("wantq"), JBoolean("wantz"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("z"), JInt("ldz"), JIntW("ifst"), JIntW("ilst"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "dtgsen", JInt("ijob"), JBoolean("wantq"), JBoolean("wantz"), JBooleanArray("select"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("z"), JInt("ldz"), JIntW("m"), JDoubleW("pl"), JDoubleW("pr"), JDoubleArray("dif"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + Routine ("lapack", "dtgsja", JString("jobu"), JString("jobv"), JString("jobq"), JInt("m"), JInt("p"), JInt("n"), JInt("k"), JInt("l"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDouble("tola"), JDouble("tolb"), JDoubleArray("alpha"), JDoubleArray("beta"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("work"), JIntW("ncycle"), JIntW("info")) + Routine ("lapack", "dtgsna", JString("job"), JString("howmny"), JBooleanArray("select"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JDoubleArray("s"), JDoubleArray("dif"), JInt("mm"), JIntW("m"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dtgsy2", JString("trans"), JInt("ijob"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("d"), JInt("ldd"), JDoubleArray("e"), JInt("lde"), JDoubleArray("f"), JInt("ldf"), JDoubleW("scale"), JDoubleW("rdsum"), JDoubleW("rdscal"), JIntArray("iwork"), JIntW("pq"), JIntW("info")) + Routine ("lapack", "dtgsyl", JString("trans"), JInt("ijob"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("d"), JInt("ldd"), JDoubleArray("e"), JInt("lde"), JDoubleArray("f"), JInt("ldf"), JDoubleW("scale"), JDoubleW("dif"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dtpcon", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JDoubleArray("ap"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dtprfs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dtptri", JString("uplo"), JString("diag"), JInt("n"), JDoubleArray("ap"), JIntW("info")) + Routine ("lapack", "dtptrs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "dtrcon", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dtrevc", JString("side"), JString("howmny"), JBooleanArray("select"), JInt("n"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JInt("mm"), JIntW("m"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dtrexc", JString("compq"), JInt("n"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("q"), JInt("ldq"), JIntW("ifst"), JIntW("ilst"), JDoubleArray("work"), JIntW("info")) + Routine ("lapack", "dtrrfs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dtrsen", JString("job"), JString("compq"), JBooleanArray("select"), JInt("n"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("wr"), JDoubleArray("wi"), JIntW("m"), JDoubleW("s"), JDoubleW("sep"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + Routine ("lapack", "dtrsna", JString("job"), JString("howmny"), JBooleanArray("select"), JInt("n"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JDoubleArray("s"), JDoubleArray("sep"), JInt("mm"), JIntW("m"), JDoubleArray("work"), JInt("ldwork"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "dtrsyl", JString("trana"), JString("tranb"), JInt("isgn"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("c"), JInt("Ldc"), JDoubleW("scale"), JIntW("info")) + Routine ("lapack", "dtrti2", JString("uplo"), JString("diag"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) + Routine ("lapack", "dtrtri", JString("uplo"), JString("diag"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) + Routine ("lapack", "dtrtrs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "dtzrqf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JIntW("info")) + Routine ("lapack", "dtzrzf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) + RoutineR ("lapack", JIntR(), "ieeeck", JInt("ispec"), JFloat("zero"), JFloat("one")) + RoutineR ("lapack", JIntR(), "ilaenv", JInt("ispec"), JString("name"), JString("opts"), JInt("n1"), JInt("n2"), JInt("n3"), JInt("n4")) + Routine ("lapack", "ilaver", JIntW("vers_major"), JIntW("vers_minor"), JIntW("vers_patch")) + RoutineR ("lapack", JIntR(), "iparmq", JInt("ispec"), JString("name"), JString("opts"), JInt("n"), JInt("ilo"), JInt("ihi"), JInt("lwork")) + RoutineR ("lapack", JBooleanR(), "lsamen", JInt("n"), JString("ca"), JString("cb")) + Routine ("lapack", "sbdsdc", JString("uplo"), JString("compq"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("q"), JIntArray("iq"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "sbdsqr", JString("uplo"), JInt("n"), JInt("ncvt"), JInt("nru"), JInt("ncc"), JFloatArray("d"), JFloatArray("e"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("u"), JInt("ldu"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "sdisna", JString("job"), JInt("m"), JInt("n"), JFloatArray("d"), JFloatArray("sep"), JIntW("info")) + Routine ("lapack", "sgbbrd", JString("vect"), JInt("m"), JInt("n"), JInt("ncc"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JFloatArray("d"), JFloatArray("e"), JFloatArray("q"), JInt("ldq"), JFloatArray("pt"), JInt("ldpt"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "sgbcon", JString("norm"), JInt("n"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JIntArray("ipiv"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "sgbequ", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JFloatArray("r"), JFloatArray("c"), JFloatW("rowcnd"), JFloatW("colcnd"), JFloatW("amax"), JIntW("info")) + Routine ("lapack", "sgbrfs", JString("trans"), JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("afb"), JInt("ldafb"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "sgbsv", JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "sgbsvx", JString("fact"), JString("trans"), JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("afb"), JInt("ldafb"), JIntArray("ipiv"), JStringW("equed"), JFloatArray("r"), JFloatArray("c"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "sgbtf2", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JIntArray("ipiv"), JIntW("info")) + Routine ("lapack", "sgbtrf", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JIntArray("ipiv"), JIntW("info")) + Routine ("lapack", "sgbtrs", JString("trans"), JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "sgebak", JString("job"), JString("side"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("scale"), JInt("m"), JFloatArray("v"), JInt("ldv"), JIntW("info")) + Routine ("lapack", "sgebal", JString("job"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("ilo"), JIntW("ihi"), JFloatArray("scale"), JIntW("info")) + Routine ("lapack", "sgebd2", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("d"), JFloatArray("e"), JFloatArray("tauq"), JFloatArray("taup"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "sgebrd", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("d"), JFloatArray("e"), JFloatArray("tauq"), JFloatArray("taup"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sgecon", JString("norm"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "sgeequ", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("r"), JFloatArray("c"), JFloatW("rowcnd"), JFloatW("colcnd"), JFloatW("amax"), JIntW("info")) + Routine_NI("lapack", "sgees", JString("jobvs"), JString("sort"), JObject("select"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("sdim"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("vs"), JInt("ldvs"), JFloatArray("work"), JInt("lwork"), JBooleanArray("bwork"), JIntW("info")) + Routine_NI("lapack", "sgeesx", JString("jobvs"), JString("sort"), JObject("select"), JString("sense"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("sdim"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("vs"), JInt("ldvs"), JFloatW("rconde"), JFloatW("rcondv"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JBooleanArray("bwork"), JIntW("info")) + Routine ("lapack", "sgeev", JString("jobvl"), JString("jobvr"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sgeevx", JString("balanc"), JString("jobvl"), JString("jobvr"), JString("sense"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JIntW("ilo"), JIntW("ihi"), JFloatArray("scale"), JFloatW("abnrm"), JFloatArray("rconde"), JFloatArray("rcondv"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "sgegs", JString("jobvsl"), JString("jobvsr"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("vsl"), JInt("ldvsl"), JFloatArray("vsr"), JInt("ldvsr"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sgegv", JString("jobvl"), JString("jobvr"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sgehd2", JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "sgehrd", JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sgelq2", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "sgelqf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sgels", JString("trans"), JInt("m"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sgelsd", JInt("m"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("s"), JFloat("rcond"), JIntW("rank"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "sgelss", JInt("m"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("s"), JFloat("rcond"), JIntW("rank"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sgelsx", JInt("m"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntArray("jpvt"), JFloat("rcond"), JIntW("rank"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "sgelsy", JInt("m"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntArray("jpvt"), JFloat("rcond"), JIntW("rank"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sgeql2", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "sgeqlf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sgeqp3", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("jpvt"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sgeqpf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("jpvt"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "sgeqr2", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "sgeqrf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sgerfs", JString("trans"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("af"), JInt("ldaf"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "sgerq2", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "sgerqf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sgesc2", JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("rhs"), JIntArray("ipiv"), JIntArray("jpiv"), JFloatW("scale")) + Routine ("lapack", "sgesdd", JString("jobz"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("s"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "sgesv", JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "sgesvd", JString("jobu"), JString("jobvt"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("s"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sgesvx", JString("fact"), JString("trans"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("af"), JInt("ldaf"), JIntArray("ipiv"), JStringW("equed"), JFloatArray("r"), JFloatArray("c"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "sgetc2", JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JIntArray("jpiv"), JIntW("info")) + Routine ("lapack", "sgetf2", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JIntW("info")) + Routine ("lapack", "sgetrf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JIntW("info")) + Routine ("lapack", "sgetri", JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sgetrs", JString("trans"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "sggbak", JString("job"), JString("side"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("lscale"), JFloatArray("rscale"), JInt("m"), JFloatArray("v"), JInt("ldv"), JIntW("info")) + Routine ("lapack", "sggbal", JString("job"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("ilo"), JIntW("ihi"), JFloatArray("lscale"), JFloatArray("rscale"), JFloatArray("work"), JIntW("info")) + Routine_NI("lapack", "sgges", JString("jobvsl"), JString("jobvsr"), JString("sort"), JObject("selctg"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("sdim"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("vsl"), JInt("ldvsl"), JFloatArray("vsr"), JInt("ldvsr"), JFloatArray("work"), JInt("lwork"), JBooleanArray("bwork"), JIntW("info")) + Routine_NI("lapack", "sggesx", JString("jobvsl"), JString("jobvsr"), JString("sort"), JObject("selctg"), JString("sense"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("sdim"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("vsl"), JInt("ldvsl"), JFloatArray("vsr"), JInt("ldvsr"), JFloatArray("rconde"), JFloatArray("rcondv"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JBooleanArray("bwork"), JIntW("info")) + Routine ("lapack", "sggev", JString("jobvl"), JString("jobvr"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sggevx", JString("balanc"), JString("jobvl"), JString("jobvr"), JString("sense"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JIntW("ilo"), JIntW("ihi"), JFloatArray("lscale"), JFloatArray("rscale"), JFloatW("abnrm"), JFloatW("bbnrm"), JFloatArray("rconde"), JFloatArray("rcondv"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JBooleanArray("bwork"), JIntW("info")) + Routine ("lapack", "sggglm", JInt("n"), JInt("m"), JInt("p"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("d"), JFloatArray("x"), JFloatArray("y"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sgghrd", JString("compq"), JString("compz"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("q"), JInt("ldq"), JFloatArray("z"), JInt("ldz"), JIntW("info")) + Routine ("lapack", "sgglse", JInt("m"), JInt("n"), JInt("p"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("c"), JFloatArray("d"), JFloatArray("x"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sggqrf", JInt("n"), JInt("m"), JInt("p"), JFloatArray("a"), JInt("lda"), JFloatArray("taua"), JFloatArray("b"), JInt("ldb"), JFloatArray("taub"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sggrqf", JInt("m"), JInt("p"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("taua"), JFloatArray("b"), JInt("ldb"), JFloatArray("taub"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sggsvd", JString("jobu"), JString("jobv"), JString("jobq"), JInt("m"), JInt("n"), JInt("p"), JIntW("k"), JIntW("l"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alpha"), JFloatArray("beta"), JFloatArray("u"), JInt("ldu"), JFloatArray("v"), JInt("ldv"), JFloatArray("q"), JInt("ldq"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "sggsvp", JString("jobu"), JString("jobv"), JString("jobq"), JInt("m"), JInt("p"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloat("tola"), JFloat("tolb"), JIntW("k"), JIntW("l"), JFloatArray("u"), JInt("ldu"), JFloatArray("v"), JInt("ldv"), JFloatArray("q"), JInt("ldq"), JIntArray("iwork"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "sgtcon", JString("norm"), JInt("n"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("du2"), JIntArray("ipiv"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "sgtrfs", JString("trans"), JInt("n"), JInt("nrhs"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("dlf"), JFloatArray("df"), JFloatArray("duf"), JFloatArray("du2"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "sgtsv", JInt("n"), JInt("nrhs"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "sgtsvx", JString("fact"), JString("trans"), JInt("n"), JInt("nrhs"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("dlf"), JFloatArray("df"), JFloatArray("duf"), JFloatArray("du2"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "sgttrf", JInt("n"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("du2"), JIntArray("ipiv"), JIntW("info")) + Routine ("lapack", "sgttrs", JString("trans"), JInt("n"), JInt("nrhs"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("du2"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "sgtts2", JInt("itrans"), JInt("n"), JInt("nrhs"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("du2"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb")) + Routine ("lapack", "shgeqz", JString("job"), JString("compq"), JString("compz"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("t"), JInt("ldt"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("q"), JInt("ldq"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "shsein", JString("side"), JString("eigsrc"), JString("initv"), JBooleanArray("select"), JInt("n"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JInt("mm"), JIntW("m"), JFloatArray("work"), JIntArray("ifaill"), JIntArray("ifailr"), JIntW("info")) + Routine ("lapack", "shseqr", JString("job"), JString("compz"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + RoutineR ("lapack", JBooleanR(), "sisnan", JFloat("sin")) + Routine ("lapack", "slabad", JFloatW("small"), JFloatW("large")) + Routine ("lapack", "slabrd", JInt("m"), JInt("n"), JInt("nb"), JFloatArray("a"), JInt("lda"), JFloatArray("d"), JFloatArray("e"), JFloatArray("tauq"), JFloatArray("taup"), JFloatArray("x"), JInt("ldx"), JFloatArray("y"), JInt("ldy")) + Routine ("lapack", "slacn2", JInt("n"), JFloatArray("v"), JFloatArray("x"), JIntArray("isgn"), JFloatW("est"), JIntW("kase"), JIntArray("isave")) + Routine ("lapack", "slacon", JInt("n"), JFloatArray("v"), JFloatArray("x"), JIntArray("isgn"), JFloatW("est"), JIntW("kase")) + Routine ("lapack", "slacpy", JString("uplo"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb")) + Routine ("lapack", "sladiv", JFloat("a"), JFloat("b"), JFloat("c"), JFloat("d"), JFloatW("p"), JFloatW("q")) + Routine ("lapack", "slae2", JFloat("a"), JFloat("b"), JFloat("c"), JFloatW("rt1"), JFloatW("rt2")) + Routine ("lapack", "slaebz", JInt("ijob"), JInt("nitmax"), JInt("n"), JInt("mmax"), JInt("minp"), JInt("nbmin"), JFloat("abstol"), JFloat("reltol"), JFloat("pivmin"), JFloatArray("d"), JFloatArray("e"), JFloatArray("e2"), JIntArray("nval"), JFloatArray("ab"), JFloatArray("c"), JIntW("mout"), JIntArray("nab"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "slaed0", JInt("icompq"), JInt("qsiz"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("q"), JInt("ldq"), JFloatArray("qstore"), JInt("ldqs"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "slaed1", JInt("n"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JIntArray("indxq"), JFloatW("rho"), JInt("cutpnt"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "slaed2", JIntW("k"), JInt("n"), JInt("n1"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JIntArray("indxq"), JFloatW("rho"), JFloatArray("z"), JFloatArray("dlamda"), JFloatArray("w"), JFloatArray("q2"), JIntArray("indx"), JIntArray("indxc"), JIntArray("indxp"), JIntArray("coltyp"), JIntW("info")) + Routine ("lapack", "slaed3", JInt("k"), JInt("n"), JInt("n1"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JFloat("rho"), JFloatArray("dlamda"), JFloatArray("q2"), JIntArray("indx"), JIntArray("ctot"), JFloatArray("w"), JFloatArray("s"), JIntW("info")) + Routine ("lapack", "slaed4", JInt("n"), JInt("i"), JFloatArray("d"), JFloatArray("z"), JFloatArray("delta"), JFloat("rho"), JFloatW("dlam"), JIntW("info")) + Routine ("lapack", "slaed5", JInt("i"), JFloatArray("d"), JFloatArray("z"), JFloatArray("delta"), JFloat("rho"), JFloatW("dlam")) + Routine ("lapack", "slaed6", JInt("kniter"), JBoolean("orgati"), JFloat("rho"), JFloatArray("d"), JFloatArray("z"), JFloat("finit"), JFloatW("tau"), JIntW("info")) + Routine ("lapack", "slaed7", JInt("icompq"), JInt("n"), JInt("qsiz"), JInt("tlvls"), JInt("curlvl"), JInt("curpbm"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JIntArray("indxq"), JFloatW("rho"), JInt("cutpnt"), JFloatArray("qstore"), JIntArray("qptr"), JIntArray("prmptr"), JIntArray("perm"), JIntArray("givptr"), JIntArray("givcol"), JFloatArray("givnum"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "slaed8", JInt("icompq"), JIntW("k"), JInt("n"), JInt("qsiz"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JIntArray("indxq"), JFloatW("rho"), JInt("cutpnt"), JFloatArray("z"), JFloatArray("dlamda"), JFloatArray("q2"), JInt("ldq2"), JFloatArray("w"), JIntArray("perm"), JIntW("givptr"), JIntArray("givcol"), JFloatArray("givnum"), JIntArray("indxp"), JIntArray("indx"), JIntW("info")) + Routine ("lapack", "slaed9", JInt("k"), JInt("kstart"), JInt("kstop"), JInt("n"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JFloat("rho"), JFloatArray("dlamda"), JFloatArray("w"), JFloatArray("s"), JInt("lds"), JIntW("info")) + Routine ("lapack", "slaeda", JInt("n"), JInt("tlvls"), JInt("curlvl"), JInt("curpbm"), JIntArray("prmptr"), JIntArray("perm"), JIntArray("givptr"), JIntArray("givcol"), JFloatArray("givnum"), JFloatArray("q"), JIntArray("qptr"), JFloatArray("z"), JFloatArray("ztemp"), JIntW("info")) + Routine ("lapack", "slaein", JBoolean("rightv"), JBoolean("noinit"), JInt("n"), JFloatArray("h"), JInt("ldh"), JFloat("wr"), JFloat("wi"), JFloatArray("vr"), JFloatArray("vi"), JFloatArray("b"), JInt("ldb"), JFloatArray("work"), JFloat("eps3"), JFloat("smlnum"), JFloat("bignum"), JIntW("info")) + Routine ("lapack", "slaev2", JFloat("a"), JFloat("b"), JFloat("c"), JFloatW("rt1"), JFloatW("rt2"), JFloatW("cs1"), JFloatW("sn1")) + Routine ("lapack", "slaexc", JBoolean("wantq"), JInt("n"), JFloatArray("t"), JInt("ldt"), JFloatArray("q"), JInt("ldq"), JInt("j1"), JInt("n1"), JInt("n2"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "slag2", JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloat("safmin"), JFloatW("scale1"), JFloatW("scale2"), JFloatW("wr1"), JFloatW("wr2"), JFloatW("wi")) + Routine ("lapack", "slag2d", JInt("m"), JInt("n"), JFloatArray("sa"), JInt("ldsa"), JDoubleArray("a"), JInt("lda"), JIntW("info")) + Routine ("lapack", "slags2", JBoolean("upper"), JFloat("a1"), JFloat("a2"), JFloat("a3"), JFloat("b1"), JFloat("b2"), JFloat("b3"), JFloatW("csu"), JFloatW("snu"), JFloatW("csv"), JFloatW("snv"), JFloatW("csq"), JFloatW("snq")) + Routine ("lapack", "slagtf", JInt("n"), JFloatArray("a"), JFloat("lambda"), JFloatArray("b"), JFloatArray("c"), JFloat("tol"), JFloatArray("d"), JIntArray("in"), JIntW("info")) + Routine ("lapack", "slagtm", JString("trans"), JInt("n"), JInt("nrhs"), JFloat("alpha"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("x"), JInt("ldx"), JFloat("beta"), JFloatArray("b"), JInt("ldb")) + Routine ("lapack", "slagts", JInt("job"), JInt("n"), JFloatArray("a"), JFloatArray("b"), JFloatArray("c"), JFloatArray("d"), JIntArray("in"), JFloatArray("y"), JFloatW("tol"), JIntW("info")) + Routine ("lapack", "slagv2", JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatW("csl"), JFloatW("snl"), JFloatW("csr"), JFloatW("snr")) + Routine ("lapack", "slahqr", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JInt("iloz"), JInt("ihiz"), JFloatArray("z"), JInt("ldz"), JIntW("info")) + Routine ("lapack", "slahr2", JInt("n"), JInt("k"), JInt("nb"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("t"), JInt("ldt"), JFloatArray("y"), JInt("ldy")) + Routine ("lapack", "slahrd", JInt("n"), JInt("k"), JInt("nb"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("t"), JInt("ldt"), JFloatArray("y"), JInt("ldy")) + Routine ("lapack", "slaic1", JInt("job"), JInt("j"), JFloatArray("x"), JFloat("sest"), JFloatArray("w"), JFloat("gamma"), JFloatW("sestpr"), JFloatW("s"), JFloatW("c")) + RoutineR ("lapack", JBooleanR(), "slaisnan", JFloat("sin1"), JFloat("sin2")) + Routine ("lapack", "slaln2", JBoolean("ltrans"), JInt("na"), JInt("nw"), JFloat("smin"), JFloat("ca"), JFloatArray("a"), JInt("lda"), JFloat("d1"), JFloat("d2"), JFloatArray("b"), JInt("ldb"), JFloat("wr"), JFloat("wi"), JFloatArray("x"), JInt("ldx"), JFloatW("scale"), JFloatW("xnorm"), JIntW("info")) + Routine ("lapack", "slals0", JInt("icompq"), JInt("nl"), JInt("nr"), JInt("sqre"), JInt("nrhs"), JFloatArray("b"), JInt("ldb"), JFloatArray("bx"), JInt("ldbx"), JIntArray("perm"), JInt("givptr"), JIntArray("givcol"), JInt("ldgcol"), JFloatArray("givnum"), JInt("ldgnum"), JFloatArray("poles"), JFloatArray("difl"), JFloatArray("difr"), JFloatArray("z"), JInt("k"), JFloat("c"), JFloat("s"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "slalsa", JInt("icompq"), JInt("smlsiz"), JInt("n"), JInt("nrhs"), JFloatArray("b"), JInt("ldb"), JFloatArray("bx"), JInt("ldbx"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JIntArray("k"), JFloatArray("difl"), JFloatArray("difr"), JFloatArray("z"), JFloatArray("poles"), JIntArray("givptr"), JIntArray("givcol"), JInt("ldgcol"), JIntArray("perm"), JFloatArray("givnum"), JFloatArray("c"), JFloatArray("s"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "slalsd", JString("uplo"), JInt("smlsiz"), JInt("n"), JInt("nrhs"), JFloatArray("d"), JFloatArray("e"), JFloatArray("b"), JInt("ldb"), JFloat("rcond"), JIntW("rank"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "slamrg", JInt("n1"), JInt("n2"), JFloatArray("a"), JInt("strd1"), JInt("strd2"), JIntArray("index")) + RoutineR ("lapack", JIntR(), "slaneg", JInt("n"), JFloatArray("d"), JFloatArray("lld"), JFloat("sigma"), JFloat("pivmin"), JInt("r")) + RoutineR ("lapack", JFloatR(), "slangb", JString("norm"), JInt("n"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JFloatArray("work")) + RoutineR ("lapack", JFloatR(), "slange", JString("norm"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("work")) + RoutineR ("lapack", JFloatR(), "slangt", JString("norm"), JInt("n"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du")) + RoutineR ("lapack", JFloatR(), "slanhs", JString("norm"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("work")) + RoutineR ("lapack", JFloatR(), "slansb", JString("norm"), JString("uplo"), JInt("n"), JInt("k"), JFloatArray("ab"), JInt("ldab"), JFloatArray("work")) + RoutineR ("lapack", JFloatR(), "slansp", JString("norm"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("work")) + RoutineR ("lapack", JFloatR(), "slanst", JString("norm"), JInt("n"), JFloatArray("d"), JFloatArray("e")) + RoutineR ("lapack", JFloatR(), "slansy", JString("norm"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("work")) + RoutineR ("lapack", JFloatR(), "slantb", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JInt("k"), JFloatArray("ab"), JInt("ldab"), JFloatArray("work")) + RoutineR ("lapack", JFloatR(), "slantp", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JFloatArray("ap"), JFloatArray("work")) + RoutineR ("lapack", JFloatR(), "slantr", JString("norm"), JString("uplo"), JString("diag"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("work")) + Routine ("lapack", "slanv2", JFloatW("a"), JFloatW("b"), JFloatW("c"), JFloatW("d"), JFloatW("rt1r"), JFloatW("rt1i"), JFloatW("rt2r"), JFloatW("rt2i"), JFloatW("cs"), JFloatW("sn")) + Routine ("lapack", "slapll", JInt("n"), JFloatArray("x"), JInt("incx"), JFloatArray("y"), JInt("incy"), JFloatW("ssmin")) + Routine ("lapack", "slapmt", JBoolean("forwrd"), JInt("m"), JInt("n"), JFloatArray("x"), JInt("ldx"), JIntArray("k")) + RoutineR ("lapack", JFloatR(), "slapy2", JFloat("x"), JFloat("y")) + RoutineR ("lapack", JFloatR(), "slapy3", JFloat("x"), JFloat("y"), JFloat("z")) + Routine ("lapack", "slaqgb", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JFloatArray("r"), JFloatArray("c"), JFloat("rowcnd"), JFloat("colcnd"), JFloat("amax"), JStringW("equed")) + Routine ("lapack", "slaqge", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("r"), JFloatArray("c"), JFloat("rowcnd"), JFloat("colcnd"), JFloat("amax"), JStringW("equed")) + Routine ("lapack", "slaqp2", JInt("m"), JInt("n"), JInt("offset"), JFloatArray("a"), JInt("lda"), JIntArray("jpvt"), JFloatArray("tau"), JFloatArray("vn1"), JFloatArray("vn2"), JFloatArray("work")) + Routine ("lapack", "slaqps", JInt("m"), JInt("n"), JInt("offset"), JInt("nb"), JIntW("kb"), JFloatArray("a"), JInt("lda"), JIntArray("jpvt"), JFloatArray("tau"), JFloatArray("vn1"), JFloatArray("vn2"), JFloatArray("auxv"), JFloatArray("f"), JInt("ldf")) + Routine ("lapack", "slaqr0", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JInt("iloz"), JInt("ihiz"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "slaqr1", JInt("n"), JFloatArray("h"), JInt("ldh"), JFloat("sr1"), JFloat("si1"), JFloat("sr2"), JFloat("si2"), JFloatArray("v")) + Routine ("lapack", "slaqr2", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ktop"), JInt("kbot"), JInt("nw"), JFloatArray("h"), JInt("ldh"), JInt("iloz"), JInt("ihiz"), JFloatArray("z"), JInt("ldz"), JIntW("ns"), JIntW("nd"), JFloatArray("sr"), JFloatArray("si"), JFloatArray("v"), JInt("ldv"), JInt("nh"), JFloatArray("t"), JInt("ldt"), JInt("nv"), JFloatArray("wv"), JInt("ldwv"), JFloatArray("work"), JInt("lwork")) + Routine ("lapack", "slaqr3", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ktop"), JInt("kbot"), JInt("nw"), JFloatArray("h"), JInt("ldh"), JInt("iloz"), JInt("ihiz"), JFloatArray("z"), JInt("ldz"), JIntW("ns"), JIntW("nd"), JFloatArray("sr"), JFloatArray("si"), JFloatArray("v"), JInt("ldv"), JInt("nh"), JFloatArray("t"), JInt("ldt"), JInt("nv"), JFloatArray("wv"), JInt("ldwv"), JFloatArray("work"), JInt("lwork")) + Routine ("lapack", "slaqr4", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JInt("iloz"), JInt("ihiz"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "slaqr5", JBoolean("wantt"), JBoolean("wantz"), JInt("kacc22"), JInt("n"), JInt("ktop"), JInt("kbot"), JInt("nshfts"), JFloatArray("sr"), JFloatArray("si"), JFloatArray("h"), JInt("ldh"), JInt("iloz"), JInt("ihiz"), JFloatArray("z"), JInt("ldz"), JFloatArray("v"), JInt("ldv"), JFloatArray("u"), JInt("ldu"), JInt("nv"), JFloatArray("wv"), JInt("ldwv"), JInt("nh"), JFloatArray("wh"), JInt("ldwh")) + Routine ("lapack", "slaqsb", JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("s"), JFloat("scond"), JFloat("amax"), JStringW("equed")) + Routine ("lapack", "slaqsp", JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("s"), JFloat("scond"), JFloat("amax"), JStringW("equed")) + Routine ("lapack", "slaqsy", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("s"), JFloat("scond"), JFloat("amax"), JStringW("equed")) + Routine ("lapack", "slaqtr", JBoolean("ltran"), JBoolean("lreal"), JInt("n"), JFloatArray("t"), JInt("ldt"), JFloatArray("b"), JFloat("w"), JFloatW("scale"), JFloatArray("x"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "slar1v", JInt("n"), JInt("b1"), JInt("bn"), JFloat("lambda"), JFloatArray("d"), JFloatArray("l"), JFloatArray("ld"), JFloatArray("lld"), JFloat("pivmin"), JFloat("gaptol"), JFloatArray("z"), JBoolean("wantnc"), JIntW("negcnt"), JFloatW("ztz"), JFloatW("mingma"), JIntW("r"), JIntArray("isuppz"), JFloatW("nrminv"), JFloatW("resid"), JFloatW("rqcorr"), JFloatArray("work")) + Routine ("lapack", "slar2v", JInt("n"), JFloatArray("x"), JFloatArray("y"), JFloatArray("z"), JInt("incx"), JFloatArray("c"), JFloatArray("s"), JInt("incc")) + Routine ("lapack", "slarf", JString("side"), JInt("m"), JInt("n"), JFloatArray("v"), JInt("incv"), JFloat("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work")) + Routine ("lapack", "slarfb", JString("side"), JString("trans"), JString("direct"), JString("storev"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("v"), JInt("ldv"), JFloatArray("t"), JInt("ldt"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("ldwork")) + Routine ("lapack", "slarfg", JInt("n"), JFloatW("alpha"), JFloatArray("x"), JInt("incx"), JFloatW("tau")) + Routine ("lapack", "slarft", JString("direct"), JString("storev"), JInt("n"), JInt("k"), JFloatArray("v"), JInt("ldv"), JFloatArray("tau"), JFloatArray("t"), JInt("ldt")) + Routine ("lapack", "slarfx", JString("side"), JInt("m"), JInt("n"), JFloatArray("v"), JFloat("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work")) + Routine ("lapack", "slargv", JInt("n"), JFloatArray("x"), JInt("incx"), JFloatArray("y"), JInt("incy"), JFloatArray("c"), JInt("incc")) + Routine ("lapack", "slarnv", JInt("idist"), JIntArray("iseed"), JInt("n"), JFloatArray("x")) + Routine ("lapack", "slarra", JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("e2"), JFloat("spltol"), JFloat("tnrm"), JIntW("nsplit"), JIntArray("isplit"), JIntW("info")) + Routine ("lapack", "slarrb", JInt("n"), JFloatArray("d"), JFloatArray("lld"), JInt("ifirst"), JInt("ilast"), JFloat("rtol1"), JFloat("rtol2"), JInt("offset"), JFloatArray("w"), JFloatArray("wgap"), JFloatArray("werr"), JFloatArray("work"), JIntArray("iwork"), JFloat("pivmin"), JFloat("spdiam"), JInt("twist"), JIntW("info")) + Routine ("lapack", "slarrc", JString("jobt"), JInt("n"), JFloat("vl"), JFloat("vu"), JFloatArray("d"), JFloatArray("e"), JFloat("pivmin"), JIntW("eigcnt"), JIntW("lcnt"), JIntW("rcnt"), JIntW("info")) + Routine ("lapack", "slarrd", JString("range"), JString("order"), JInt("n"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloatArray("gers"), JFloat("reltol"), JFloatArray("d"), JFloatArray("e"), JFloatArray("e2"), JFloat("pivmin"), JInt("nsplit"), JIntArray("isplit"), JIntW("m"), JFloatArray("w"), JFloatArray("werr"), JFloatW("wl"), JFloatW("wu"), JIntArray("iblock"), JIntArray("indexw"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "slarre", JString("range"), JInt("n"), JFloatW("vl"), JFloatW("vu"), JInt("il"), JInt("iu"), JFloatArray("d"), JFloatArray("e"), JFloatArray("e2"), JFloat("rtol1"), JFloat("rtol2"), JFloat("spltol"), JIntW("nsplit"), JIntArray("isplit"), JIntW("m"), JFloatArray("w"), JFloatArray("werr"), JFloatArray("wgap"), JIntArray("iblock"), JIntArray("indexw"), JFloatArray("gers"), JFloatW("pivmin"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "slarrf", JInt("n"), JFloatArray("d"), JFloatArray("l"), JFloatArray("ld"), JInt("clstrt"), JInt("clend"), JFloatArray("w"), JFloatArray("wgap"), JFloatArray("werr"), JFloat("spdiam"), JFloat("clgapl"), JFloat("clgapr"), JFloat("pivmin"), JFloatW("sigma"), JFloatArray("dplus"), JFloatArray("lplus"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "slarrj", JInt("n"), JFloatArray("d"), JFloatArray("e2"), JInt("ifirst"), JInt("ilast"), JFloat("rtol"), JInt("offset"), JFloatArray("w"), JFloatArray("werr"), JFloatArray("work"), JIntArray("iwork"), JFloat("pivmin"), JFloat("spdiam"), JIntW("info")) + Routine ("lapack", "slarrk", JInt("n"), JInt("iw"), JFloat("gl"), JFloat("gu"), JFloatArray("d"), JFloatArray("e2"), JFloat("pivmin"), JFloat("reltol"), JFloatW("w"), JFloatW("werr"), JIntW("info")) + Routine ("lapack", "slarrr", JInt("n"), JFloatArray("d"), JFloatArray("e"), JIntW("info")) + Routine ("lapack", "slarrv", JInt("n"), JFloat("vl"), JFloat("vu"), JFloatArray("d"), JFloatArray("l"), JFloat("pivmin"), JIntArray("isplit"), JInt("m"), JInt("dol"), JInt("dou"), JFloat("minrgp"), JFloatW("rtol1"), JFloatW("rtol2"), JFloatArray("w"), JFloatArray("werr"), JFloatArray("wgap"), JIntArray("iblock"), JIntArray("indexw"), JFloatArray("gers"), JFloatArray("z"), JInt("ldz"), JIntArray("isuppz"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "slartg", JFloat("f"), JFloat("g"), JFloatW("cs"), JFloatW("sn"), JFloatW("r")) + Routine ("lapack", "slartv", JInt("n"), JFloatArray("x"), JInt("incx"), JFloatArray("y"), JInt("incy"), JFloatArray("c"), JFloatArray("s"), JInt("incc")) + Routine ("lapack", "slaruv", JIntArray("iseed"), JInt("n"), JFloatArray("x")) + Routine ("lapack", "slarz", JString("side"), JInt("m"), JInt("n"), JInt("l"), JFloatArray("v"), JInt("incv"), JFloat("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work")) + Routine ("lapack", "slarzb", JString("side"), JString("trans"), JString("direct"), JString("storev"), JInt("m"), JInt("n"), JInt("k"), JInt("l"), JFloatArray("v"), JInt("ldv"), JFloatArray("t"), JInt("ldt"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("ldwork")) + Routine ("lapack", "slarzt", JString("direct"), JString("storev"), JInt("n"), JInt("k"), JFloatArray("v"), JInt("ldv"), JFloatArray("tau"), JFloatArray("t"), JInt("ldt")) + Routine ("lapack", "slas2", JFloat("f"), JFloat("g"), JFloat("h"), JFloatW("ssmin"), JFloatW("ssmax")) + Routine ("lapack", "slascl", JString("type"), JInt("kl"), JInt("ku"), JFloat("cfrom"), JFloat("cto"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) + Routine ("lapack", "slasd0", JInt("n"), JInt("sqre"), JFloatArray("d"), JFloatArray("e"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JInt("ldvt"), JInt("smlsiz"), JIntArray("iwork"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "slasd1", JInt("nl"), JInt("nr"), JInt("sqre"), JFloatArray("d"), JFloatW("alpha"), JFloatW("beta"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JInt("ldvt"), JIntArray("idxq"), JIntArray("iwork"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "slasd2", JInt("nl"), JInt("nr"), JInt("sqre"), JIntW("k"), JFloatArray("d"), JFloatArray("z"), JFloat("alpha"), JFloat("beta"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("dsigma"), JFloatArray("u2"), JInt("ldu2"), JFloatArray("vt2"), JInt("ldvt2"), JIntArray("idxp"), JIntArray("idx"), JIntArray("idxc"), JIntArray("idxq"), JIntArray("coltyp"), JIntW("info")) + Routine ("lapack", "slasd3", JInt("nl"), JInt("nr"), JInt("sqre"), JInt("k"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JFloatArray("dsigma"), JFloatArray("u"), JInt("ldu"), JFloatArray("u2"), JInt("ldu2"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("vt2"), JInt("ldvt2"), JIntArray("idxc"), JIntArray("ctot"), JFloatArray("z"), JIntW("info")) + Routine ("lapack", "slasd4", JInt("n"), JInt("i"), JFloatArray("d"), JFloatArray("z"), JFloatArray("delta"), JFloat("rho"), JFloatW("sigma"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "slasd5", JInt("i"), JFloatArray("d"), JFloatArray("z"), JFloatArray("delta"), JFloat("rho"), JFloatW("dsigma"), JFloatArray("work")) + Routine ("lapack", "slasd6", JInt("icompq"), JInt("nl"), JInt("nr"), JInt("sqre"), JFloatArray("d"), JFloatArray("vf"), JFloatArray("vl"), JFloatW("alpha"), JFloatW("beta"), JIntArray("idxq"), JIntArray("perm"), JIntW("givptr"), JIntArray("givcol"), JInt("ldgcol"), JFloatArray("givnum"), JInt("ldgnum"), JFloatArray("poles"), JFloatArray("difl"), JFloatArray("difr"), JFloatArray("z"), JIntW("k"), JFloatW("c"), JFloatW("s"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "slasd7", JInt("icompq"), JInt("nl"), JInt("nr"), JInt("sqre"), JIntW("k"), JFloatArray("d"), JFloatArray("z"), JFloatArray("zw"), JFloatArray("vf"), JFloatArray("vfw"), JFloatArray("vl"), JFloatArray("vlw"), JFloat("alpha"), JFloat("beta"), JFloatArray("dsigma"), JIntArray("idx"), JIntArray("idxp"), JIntArray("idxq"), JIntArray("perm"), JIntW("givptr"), JIntArray("givcol"), JInt("ldgcol"), JFloatArray("givnum"), JInt("ldgnum"), JFloatW("c"), JFloatW("s"), JIntW("info")) + Routine ("lapack", "slasd8", JInt("icompq"), JInt("k"), JFloatArray("d"), JFloatArray("z"), JFloatArray("vf"), JFloatArray("vl"), JFloatArray("difl"), JFloatArray("difr"), JInt("lddifr"), JFloatArray("dsigma"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "slasda", JInt("icompq"), JInt("smlsiz"), JInt("n"), JInt("sqre"), JFloatArray("d"), JFloatArray("e"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JIntArray("k"), JFloatArray("difl"), JFloatArray("difr"), JFloatArray("z"), JFloatArray("poles"), JIntArray("givptr"), JIntArray("givcol"), JInt("ldgcol"), JIntArray("perm"), JFloatArray("givnum"), JFloatArray("c"), JFloatArray("s"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "slasdq", JString("uplo"), JInt("sqre"), JInt("n"), JInt("ncvt"), JInt("nru"), JInt("ncc"), JFloatArray("d"), JFloatArray("e"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("u"), JInt("ldu"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "slasdt", JInt("n"), JIntW("lvl"), JIntW("nd"), JIntArray("inode"), JIntArray("ndiml"), JIntArray("ndimr"), JInt("msub")) + Routine ("lapack", "slaset", JString("uplo"), JInt("m"), JInt("n"), JFloat("alpha"), JFloat("beta"), JFloatArray("a"), JInt("lda")) + Routine ("lapack", "slasq1", JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "slasq2", JInt("n"), JFloatArray("z"), JIntW("info")) + Routine ("lapack", "slasq3", JInt("i0"), JIntW("n0"), JFloatArray("z"), JInt("pp"), JFloatW("dmin"), JFloatW("sigma"), JFloatW("desig"), JFloatW("qmax"), JIntW("nfail"), JIntW("iter"), JIntW("ndiv"), JBoolean("ieee")) + Routine ("lapack", "slasq4", JInt("i0"), JInt("n0"), JFloatArray("z"), JInt("pp"), JInt("n0in"), JFloat("dmin"), JFloat("dmin1"), JFloat("dmin2"), JFloat("dn"), JFloat("dn1"), JFloat("dn2"), JFloatW("tau"), JIntW("ttype")) + Routine ("lapack", "slasq5", JInt("i0"), JInt("n0"), JFloatArray("z"), JInt("pp"), JFloat("tau"), JFloatW("dmin"), JFloatW("dmin1"), JFloatW("dmin2"), JFloatW("dn"), JFloatW("dnm1"), JFloatW("dnm2"), JBoolean("ieee")) + Routine ("lapack", "slasq6", JInt("i0"), JInt("n0"), JFloatArray("z"), JInt("pp"), JFloatW("dmin"), JFloatW("dmin1"), JFloatW("dmin2"), JFloatW("dn"), JFloatW("dnm1"), JFloatW("dnm2")) + Routine ("lapack", "slasr", JString("side"), JString("pivot"), JString("direct"), JInt("m"), JInt("n"), JFloatArray("c"), JFloatArray("s"), JFloatArray("a"), JInt("lda")) + Routine ("lapack", "slasrt", JString("id"), JInt("n"), JFloatArray("d"), JIntW("info")) + Routine ("lapack", "slassq", JInt("n"), JFloatArray("x"), JInt("incx"), JFloatW("scale"), JFloatW("sumsq")) + Routine ("lapack", "slasv2", JFloat("f"), JFloat("g"), JFloat("h"), JFloatW("ssmin"), JFloatW("ssmax"), JFloatW("snr"), JFloatW("csr"), JFloatW("snl"), JFloatW("csl")) + Routine ("lapack", "slaswp", JInt("n"), JFloatArray("a"), JInt("lda"), JInt("k1"), JInt("k2"), JIntArray("ipiv"), JInt("incx")) + Routine ("lapack", "slasy2", JBoolean("ltranl"), JBoolean("ltranr"), JInt("isgn"), JInt("n1"), JInt("n2"), JFloatArray("tl"), JInt("ldtl"), JFloatArray("tr"), JInt("ldtr"), JFloatArray("b"), JInt("ldb"), JFloatW("scale"), JFloatArray("x"), JInt("ldx"), JFloatW("xnorm"), JIntW("info")) + Routine ("lapack", "slasyf", JString("uplo"), JInt("n"), JInt("nb"), JIntW("kb"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("w"), JInt("ldw"), JIntW("info")) + Routine ("lapack", "slatbs", JString("uplo"), JString("trans"), JString("diag"), JString("normin"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("x"), JFloatW("scale"), JFloatArray("cnorm"), JIntW("info")) + Routine ("lapack", "slatdf", JInt("ijob"), JInt("n"), JFloatArray("z"), JInt("ldz"), JFloatArray("rhs"), JFloatW("rdsum"), JFloatW("rdscal"), JIntArray("ipiv"), JIntArray("jpiv")) + Routine ("lapack", "slatps", JString("uplo"), JString("trans"), JString("diag"), JString("normin"), JInt("n"), JFloatArray("ap"), JFloatArray("x"), JFloatW("scale"), JFloatArray("cnorm"), JIntW("info")) + Routine ("lapack", "slatrd", JString("uplo"), JInt("n"), JInt("nb"), JFloatArray("a"), JInt("lda"), JFloatArray("e"), JFloatArray("tau"), JFloatArray("w"), JInt("ldw")) + Routine ("lapack", "slatrs", JString("uplo"), JString("trans"), JString("diag"), JString("normin"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("x"), JFloatW("scale"), JFloatArray("cnorm"), JIntW("info")) + Routine ("lapack", "slatrz", JInt("m"), JInt("n"), JInt("l"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work")) + Routine ("lapack", "slatzm", JString("side"), JInt("m"), JInt("n"), JFloatArray("v"), JInt("incv"), JFloat("tau"), JFloatArray("c1"), JFloatArray("c2"), JInt("Ldc"), JFloatArray("work")) + Routine ("lapack", "slauu2", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) + Routine ("lapack", "slauum", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) + Routine_NI("lapack", "slazq3", JInt("i0"), JIntW("n0"), JFloatArray("z"), JInt("pp"), JFloatW("dmin"), JFloatW("sigma"), JFloatW("desig"), JFloatW("qmax"), JIntW("nfail"), JIntW("iter"), JIntW("ndiv"), JBoolean("ieee"), JIntW("ttype"), JFloatW("dmin1"), JFloatW("dmin2"), JFloatW("dn"), JFloatW("dn1"), JFloatW("dn2"), JFloatW("tau")) + Routine_NI("lapack", "slazq4", JInt("i0"), JInt("n0"), JFloatArray("z"), JInt("pp"), JInt("n0in"), JFloat("dmin"), JFloat("dmin1"), JFloat("dmin2"), JFloat("dn"), JFloat("dn1"), JFloat("dn2"), JFloatW("tau"), JIntW("ttype"), JFloatW("g")) + Routine ("lapack", "sopgtr", JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("tau"), JFloatArray("q"), JInt("ldq"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "sopmtr", JString("side"), JString("uplo"), JString("trans"), JInt("m"), JInt("n"), JFloatArray("ap"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "sorg2l", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "sorg2r", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "sorgbr", JString("vect"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sorghr", JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sorgl2", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "sorglq", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sorgql", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sorgqr", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sorgr2", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "sorgrq", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sorgtr", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sorm2l", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "sorm2r", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "sormbr", JString("vect"), JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sormhr", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sorml2", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "sormlq", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sormql", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sormqr", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sormr2", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "sormr3", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JInt("l"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "sormrq", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sormrz", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JInt("l"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "sormtr", JString("side"), JString("uplo"), JString("trans"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "spbcon", JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "spbequ", JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("s"), JFloatW("scond"), JFloatW("amax"), JIntW("info")) + Routine ("lapack", "spbrfs", JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("afb"), JInt("ldafb"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "spbstf", JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JIntW("info")) + Routine ("lapack", "spbsv", JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "spbsvx", JString("fact"), JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("afb"), JInt("ldafb"), JStringW("equed"), JFloatArray("s"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "spbtf2", JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JIntW("info")) + Routine ("lapack", "spbtrf", JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JIntW("info")) + Routine ("lapack", "spbtrs", JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "spocon", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "spoequ", JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("s"), JFloatW("scond"), JFloatW("amax"), JIntW("info")) + Routine ("lapack", "sporfs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("af"), JInt("ldaf"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "sposv", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "sposvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("af"), JInt("ldaf"), JStringW("equed"), JFloatArray("s"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "spotf2", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) + Routine ("lapack", "spotrf", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) + Routine ("lapack", "spotri", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) + Routine ("lapack", "spotrs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "sppcon", JString("uplo"), JInt("n"), JFloatArray("ap"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "sppequ", JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("s"), JFloatW("scond"), JFloatW("amax"), JIntW("info")) + Routine ("lapack", "spprfs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("afp"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "sppsv", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "sppsvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("afp"), JStringW("equed"), JFloatArray("s"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "spptrf", JString("uplo"), JInt("n"), JFloatArray("ap"), JIntW("info")) + Routine ("lapack", "spptri", JString("uplo"), JInt("n"), JFloatArray("ap"), JIntW("info")) + Routine ("lapack", "spptrs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "sptcon", JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "spteqr", JString("compz"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "sptrfs", JInt("n"), JInt("nrhs"), JFloatArray("d"), JFloatArray("e"), JFloatArray("df"), JFloatArray("ef"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "sptsv", JInt("n"), JInt("nrhs"), JFloatArray("d"), JFloatArray("e"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "sptsvx", JString("fact"), JInt("n"), JInt("nrhs"), JFloatArray("d"), JFloatArray("e"), JFloatArray("df"), JFloatArray("ef"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "spttrf", JInt("n"), JFloatArray("d"), JFloatArray("e"), JIntW("info")) + Routine ("lapack", "spttrs", JInt("n"), JInt("nrhs"), JFloatArray("d"), JFloatArray("e"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "sptts2", JInt("n"), JInt("nrhs"), JFloatArray("d"), JFloatArray("e"), JFloatArray("b"), JInt("ldb")) + Routine ("lapack", "srscl", JInt("n"), JFloat("sa"), JFloatArray("sx"), JInt("incx")) + Routine ("lapack", "ssbev", JString("jobz"), JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "ssbevd", JString("jobz"), JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + Routine ("lapack", "ssbevx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("q"), JInt("ldq"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + Routine ("lapack", "ssbgst", JString("vect"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JFloatArray("ab"), JInt("ldab"), JFloatArray("bb"), JInt("ldbb"), JFloatArray("x"), JInt("ldx"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "ssbgv", JString("jobz"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JFloatArray("ab"), JInt("ldab"), JFloatArray("bb"), JInt("ldbb"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "ssbgvd", JString("jobz"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JFloatArray("ab"), JInt("ldab"), JFloatArray("bb"), JInt("ldbb"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + Routine ("lapack", "ssbgvx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JFloatArray("ab"), JInt("ldab"), JFloatArray("bb"), JInt("ldbb"), JFloatArray("q"), JInt("ldq"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + Routine ("lapack", "ssbtrd", JString("vect"), JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("d"), JFloatArray("e"), JFloatArray("q"), JInt("ldq"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "sspcon", JString("uplo"), JInt("n"), JFloatArray("ap"), JIntArray("ipiv"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "sspev", JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "sspevd", JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + Routine ("lapack", "sspevx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + Routine ("lapack", "sspgst", JInt("itype"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("bp"), JIntW("info")) + Routine ("lapack", "sspgv", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("bp"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "sspgvd", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("bp"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + Routine ("lapack", "sspgvx", JInt("itype"), JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("bp"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + Routine ("lapack", "ssprfs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("afp"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "sspsv", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "sspsvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("afp"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "ssptrd", JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("d"), JFloatArray("e"), JFloatArray("tau"), JIntW("info")) + Routine ("lapack", "ssptrf", JString("uplo"), JInt("n"), JFloatArray("ap"), JIntArray("ipiv"), JIntW("info")) + Routine ("lapack", "ssptri", JString("uplo"), JInt("n"), JFloatArray("ap"), JIntArray("ipiv"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "ssptrs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "sstebz", JString("range"), JString("order"), JInt("n"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JFloatArray("d"), JFloatArray("e"), JIntW("m"), JIntW("nsplit"), JFloatArray("w"), JIntArray("iblock"), JIntArray("isplit"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "sstedc", JString("compz"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + Routine ("lapack", "sstegr", JString("jobz"), JString("range"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JIntArray("isuppz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + Routine ("lapack", "sstein", JInt("n"), JFloatArray("d"), JFloatArray("e"), JInt("m"), JFloatArray("w"), JIntArray("iblock"), JIntArray("isplit"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + Routine ("lapack", "sstemr", JString("jobz"), JString("range"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JInt("nzc"), JIntArray("isuppz"), JBooleanW("tryrac"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + Routine ("lapack", "ssteqr", JString("compz"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "ssterf", JInt("n"), JFloatArray("d"), JFloatArray("e"), JIntW("info")) + Routine ("lapack", "sstev", JString("jobz"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "sstevd", JString("jobz"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + Routine ("lapack", "sstevr", JString("jobz"), JString("range"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JIntArray("isuppz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + Routine ("lapack", "sstevx", JString("jobz"), JString("range"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + Routine ("lapack", "ssycon", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "ssyev", JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("w"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "ssyevd", JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("w"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + Routine ("lapack", "ssyevr", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JIntArray("isuppz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + Routine ("lapack", "ssyevx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + Routine ("lapack", "ssygs2", JInt("itype"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "ssygst", JInt("itype"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "ssygv", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("w"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "ssygvd", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("w"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + Routine ("lapack", "ssygvx", JInt("itype"), JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) + Routine ("lapack", "ssyrfs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("af"), JInt("ldaf"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "ssysv", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "ssysvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("af"), JInt("ldaf"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "ssytd2", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("d"), JFloatArray("e"), JFloatArray("tau"), JIntW("info")) + Routine ("lapack", "ssytf2", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JIntW("info")) + Routine ("lapack", "ssytrd", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("d"), JFloatArray("e"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "ssytrf", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "ssytri", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "ssytrs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "stbcon", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "stbrfs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("kd"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "stbtrs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("kd"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "stgevc", JString("side"), JString("howmny"), JBooleanArray("select"), JInt("n"), JFloatArray("s"), JInt("lds"), JFloatArray("p"), JInt("ldp"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JInt("mm"), JIntW("m"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "stgex2", JBoolean("wantq"), JBoolean("wantz"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("q"), JInt("ldq"), JFloatArray("z"), JInt("ldz"), JInt("j1"), JInt("n1"), JInt("n2"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "stgexc", JBoolean("wantq"), JBoolean("wantz"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("q"), JInt("ldq"), JFloatArray("z"), JInt("ldz"), JIntW("ifst"), JIntW("ilst"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + Routine ("lapack", "stgsen", JInt("ijob"), JBoolean("wantq"), JBoolean("wantz"), JBooleanArray("select"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("q"), JInt("ldq"), JFloatArray("z"), JInt("ldz"), JIntW("m"), JFloatW("pl"), JFloatW("pr"), JFloatArray("dif"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + Routine ("lapack", "stgsja", JString("jobu"), JString("jobv"), JString("jobq"), JInt("m"), JInt("p"), JInt("n"), JInt("k"), JInt("l"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloat("tola"), JFloat("tolb"), JFloatArray("alpha"), JFloatArray("beta"), JFloatArray("u"), JInt("ldu"), JFloatArray("v"), JInt("ldv"), JFloatArray("q"), JInt("ldq"), JFloatArray("work"), JIntW("ncycle"), JIntW("info")) + Routine ("lapack", "stgsna", JString("job"), JString("howmny"), JBooleanArray("select"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JFloatArray("s"), JFloatArray("dif"), JInt("mm"), JIntW("m"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "stgsy2", JString("trans"), JInt("ijob"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("c"), JInt("Ldc"), JFloatArray("d"), JInt("ldd"), JFloatArray("e"), JInt("lde"), JFloatArray("f"), JInt("ldf"), JFloatW("scale"), JFloatW("rdsum"), JFloatW("rdscal"), JIntArray("iwork"), JIntW("pq"), JIntW("info")) + Routine ("lapack", "stgsyl", JString("trans"), JInt("ijob"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("c"), JInt("Ldc"), JFloatArray("d"), JInt("ldd"), JFloatArray("e"), JInt("lde"), JFloatArray("f"), JInt("ldf"), JFloatW("scale"), JFloatW("dif"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "stpcon", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JFloatArray("ap"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "stprfs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "stptri", JString("uplo"), JString("diag"), JInt("n"), JFloatArray("ap"), JIntW("info")) + Routine ("lapack", "stptrs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "strcon", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "strevc", JString("side"), JString("howmny"), JBooleanArray("select"), JInt("n"), JFloatArray("t"), JInt("ldt"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JInt("mm"), JIntW("m"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "strexc", JString("compq"), JInt("n"), JFloatArray("t"), JInt("ldt"), JFloatArray("q"), JInt("ldq"), JIntW("ifst"), JIntW("ilst"), JFloatArray("work"), JIntW("info")) + Routine ("lapack", "strrfs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "strsen", JString("job"), JString("compq"), JBooleanArray("select"), JInt("n"), JFloatArray("t"), JInt("ldt"), JFloatArray("q"), JInt("ldq"), JFloatArray("wr"), JFloatArray("wi"), JIntW("m"), JFloatW("s"), JFloatW("sep"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) + Routine ("lapack", "strsna", JString("job"), JString("howmny"), JBooleanArray("select"), JInt("n"), JFloatArray("t"), JInt("ldt"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JFloatArray("s"), JFloatArray("sep"), JInt("mm"), JIntW("m"), JFloatArray("work"), JInt("ldwork"), JIntArray("iwork"), JIntW("info")) + Routine ("lapack", "strsyl", JString("trana"), JString("tranb"), JInt("isgn"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("c"), JInt("Ldc"), JFloatW("scale"), JIntW("info")) + Routine ("lapack", "strti2", JString("uplo"), JString("diag"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) + Routine ("lapack", "strtri", JString("uplo"), JString("diag"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) + Routine ("lapack", "strtrs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("info")) + Routine ("lapack", "stzrqf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JIntW("info")) + Routine ("lapack", "stzrzf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) + RoutineR ("lapack", JDoubleR(), "dlamch", JString("cmach")) + Routine_NI("lapack", "dlamc1", JIntW("beta"), JIntW("t"), JBooleanW("rnd"), JBooleanW("ieee1")) + Routine_NI("lapack", "dlamc2", JIntW("beta"), JIntW("t"), JBooleanW("rnd"), JDoubleW("eps"), JIntW("emin"), JDoubleW("rmin"), JIntW("emax"), JDoubleW("rmax")) + RoutineR ("lapack", JDoubleR(), "dlamc3", JDouble("a"), JDouble("b")) + Routine_NI("lapack", "dlamc4", JIntW("emin"), JDouble("start"), JInt("base")) + Routine_NI("lapack", "dlamc5", JInt("beta"), JInt("p"), JInt("emin"), JBoolean("ieee"), JIntW("emax"), JDoubleW("rmax")) + RoutineR ("lapack", JDoubleR(), "dsecnd") + RoutineR ("lapack", JBooleanR(), "lsame", JString("ca"), JString("cb")) + RoutineR ("lapack", JFloatR(), "second") + RoutineR ("lapack", JFloatR(), "slamch", JString("cmach")) + Routine_NI("lapack", "slamc1", JIntW("beta"), JIntW("t"), JBooleanW("rnd"), JBooleanW("ieee1")) + Routine_NI("lapack", "slamc2", JIntW("beta"), JIntW("t"), JBooleanW("rnd"), JFloatW("eps"), JIntW("emin"), JFloatW("rmin"), JIntW("emax"), JFloatW("rmax")) + RoutineR ("lapack", JFloatR(), "slamc3", JFloat("a"), JFloat("b")) + Routine_NI("lapack", "slamc4", JIntW("emin"), JFloat("start"), JInt("base")) + Routine_NI("lapack", "slamc5", JInt("beta"), JInt("p"), JInt("emin"), JBoolean("ieee"), JIntW("emax"), JFloatW("rmax")) \ No newline at end of file From 768a4736ef5ab554c609bedd639a1ff43a6e2106 Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Sun, 2 May 2021 11:54:10 +0200 Subject: [PATCH 33/42] Remove -Wno-unused-function and -Wno-unused-parameter warnings --- generator.py | 104 +- lapack/src/main/native/jni.c | 27879 +++++++++++++++++---------------- pom.xml | 4 +- 3 files changed, 14646 insertions(+), 13341 deletions(-) diff --git a/generator.py b/generator.py index 3cc54945..301d88f8 100644 --- a/generator.py +++ b/generator.py @@ -23,17 +23,17 @@ def __init__(self, name): self.idx = 0 self.name = name self.native_type_and_name = "int *{name}".format(name=name) - self.java_type_and_name = "jboolean {name}".format(name=name) + self.java_type_and_name = [a.format(name=name) for a in ["jboolean {name}"]] self.native_argument = "&__n{name}".format(name=name) - self.native_local = "int __n{name}".format(name=name) + self.native_local = "int __n{name};".format(name=name) self.prolog = "__n{name} = {name};".format(name=name) - self.epilog = "if (!failed) {name} = __n{name};".format(name=name) + self.epilog = "if (!__failed) {name} = __n{name};".format(name=name) class JInt: def __init__(self, name): self.idx = 0 self.name = name self.native_type_and_name = "int *{name}".format(name=name) - self.java_type_and_name = "jint {name}".format(name=name) + self.java_type_and_name = [a.format(name=name) for a in ["jint {name}"]] self.native_argument = "&{name}".format(name=name) self.native_local = "" self.prolog = "" @@ -43,7 +43,7 @@ def __init__(self, name): self.idx = 0 self.name = name self.native_type_and_name = "float *{name}".format(name=name) - self.java_type_and_name = "jfloat {name}".format(name=name) + self.java_type_and_name = [a.format(name=name) for a in ["jfloat {name}"]] self.native_argument = "&{name}".format(name=name) self.native_local = "" self.prolog = "" @@ -53,7 +53,7 @@ def __init__(self, name): self.idx = 0 self.name = name self.native_type_and_name = "double *{name}".format(name=name) - self.java_type_and_name = "jdouble {name}".format(name=name) + self.java_type_and_name = [a.format(name=name) for a in ["jdouble {name}"]] self.native_argument = "&{name}".format(name=name) self.native_local = "" self.prolog = "" @@ -63,20 +63,20 @@ def __init__(self, name): self.idx = 0 self.name = name self.native_type_and_name = "const char *{name}".format(name=name) - self.java_type_and_name = "jstring {name}".format(name=name) + self.java_type_and_name = [a.format(name=name) for a in ["jstring {name}"]] self.native_argument = "__n{name}".format(name=name) - self.native_local = "const char *__n{name} = NULL".format(name=name) - self.prolog = "if (!(__n{name} = (*env)->GetStringUTFChars(env, {name}, NULL))) {{ failed = TRUE; goto done; }}".format(name=name) + self.native_local = "const char *__n{name} = NULL;".format(name=name) + self.prolog = "if (!(__n{name} = (*env)->GetStringUTFChars(env, {name}, NULL))) {{ __failed = TRUE; goto done; }}".format(name=name) self.epilog = "if (__n{name}) (*env)->ReleaseStringUTFChars(env, {name}, __n{name});".format(name=name) class JObject: def __init__(self, name): self.idx = 0 self.name = name self.native_type_and_name = "const char *{name}".format(name=name) - self.java_type_and_name = "jstring {name}".format(name=name) + self.java_type_and_name = [a.format(name=name) for a in ["jstring {name}"]] # self.native_argument = "__n{name}".format(name=name) - # self.native_local = "const char *__n{name} = NULL".format(name=name) - # self.prolog = "if (!(__n{name} = (*env)->GetStringUTFChars(env, {name}, NULL))) {{ failed = TRUE; goto done; }}".format(name=name) + # self.native_local = "const char *__n{name} = NULL;".format(name=name) + # self.prolog = "if (!(__n{name} = (*env)->GetStringUTFChars(env, {name}, NULL))) {{ __failed = TRUE; goto done; }}".format(name=name) # self.epilog = "if (__n{name}) (*env)->ReleaseStringUTFChars(env, {name}, __n{name});".format(name=name) class JBooleanW: @@ -84,92 +84,92 @@ def __init__(self, name): self.idx = 0 self.name = name self.native_type_and_name = "int *{name}".format(name=name) - self.java_type_and_name = "jobject {name}".format(name=name) + self.java_type_and_name = [a.format(name=name) for a in ["jobject {name}"]] self.native_argument = "&__n{name}".format(name=name) - self.native_local = "int __n{name} = 0".format(name=name) + self.native_local = "int __n{name} = 0;".format(name=name) self.prolog = "__n{name} = (*env)->GetBooleanField(env, {name}, booleanW_val_fieldID);".format(name=name) - self.epilog = "if (!failed) (*env)->SetBooleanField(env, {name}, booleanW_val_fieldID, __n{name});".format(name=name) + self.epilog = "if (!__failed) (*env)->SetBooleanField(env, {name}, booleanW_val_fieldID, __n{name});".format(name=name) class JIntW: def __init__(self, name): self.idx = 0 self.name = name self.native_type_and_name = "int *{name}".format(name=name) - self.java_type_and_name = "jobject {name}".format(name=name) + self.java_type_and_name = [a.format(name=name) for a in ["jobject {name}"]] self.native_argument = "&__n{name}".format(name=name) - self.native_local = "int __n{name} = 0".format(name=name) + self.native_local = "int __n{name} = 0;".format(name=name) self.prolog = "__n{name} = (*env)->GetIntField(env, {name}, intW_val_fieldID);".format(name=name) - self.epilog = "if (!failed) (*env)->SetIntField(env, {name}, intW_val_fieldID, __n{name});".format(name=name) + self.epilog = "if (!__failed) (*env)->SetIntField(env, {name}, intW_val_fieldID, __n{name});".format(name=name) class JFloatW: def __init__(self, name): self.idx = 0 self.name = name self.native_type_and_name = "float *{name}".format(name=name) - self.java_type_and_name = "jobject {name}".format(name=name) + self.java_type_and_name = [a.format(name=name) for a in ["jobject {name}"]] self.native_argument = "&__n{name}".format(name=name) - self.native_local = "float __n{name} = 0".format(name=name) + self.native_local = "float __n{name} = 0;".format(name=name) self.prolog = "__n{name} = (*env)->GetFloatField(env, {name}, floatW_val_fieldID);".format(name=name) - self.epilog = "if (!failed) (*env)->SetFloatField(env, {name}, floatW_val_fieldID, __n{name});".format(name=name) + self.epilog = "if (!__failed) (*env)->SetFloatField(env, {name}, floatW_val_fieldID, __n{name});".format(name=name) class JDoubleW: def __init__(self, name): self.idx = 0 self.name = name self.native_type_and_name = "double *{name}".format(name=name) - self.java_type_and_name = "jobject {name}".format(name=name) + self.java_type_and_name = [a.format(name=name) for a in ["jobject {name}"]] self.native_argument = "&__n{name}".format(name=name) - self.native_local = "double __n{name} = 0".format(name=name) + self.native_local = "double __n{name} = 0;".format(name=name) self.prolog = "__n{name} = (*env)->GetDoubleField(env, {name}, doubleW_val_fieldID);".format(name=name) - self.epilog = "if (!failed) (*env)->SetDoubleField(env, {name}, doubleW_val_fieldID, __n{name});".format(name=name) + self.epilog = "if (!__failed) (*env)->SetDoubleField(env, {name}, doubleW_val_fieldID, __n{name});".format(name=name) class JStringW: def __init__(self, name): self.idx = 0 self.name = name self.native_type_and_name = "char *{name}".format(name=name) - self.java_type_and_name = "jobject {name}".format(name=name) + self.java_type_and_name = [a.format(name=name) for a in ["jobject {name}"]] self.native_argument = "__n{name}".format(name=name) self.native_local = "char *__n{name} = NULL; jstring __j{name} = NULL;".format(name=name) - self.prolog = "__j{name} = (jstring)(*env)->GetObjectField(env, {name}, StringW_val_fieldID); if (!(__n{name} = (char*)(*env)->GetStringUTFChars(env, {name}, NULL))) {{ failed = TRUE; goto done; }}".format(name=name) - self.epilog = "if (__n{name}) {{ (*env)->ReleaseStringUTFChars(env, __j{name}, (const char*)__n{name}); if (!failed) (*env)->SetObjectField(env, {name}, StringW_val_fieldID, __j{name}); }}".format(name=name) + self.prolog = "__j{name} = (jstring)(*env)->GetObjectField(env, {name}, StringW_val_fieldID); if (!(__n{name} = (char*)(*env)->GetStringUTFChars(env, {name}, NULL))) {{ __failed = TRUE; goto done; }}".format(name=name) + self.epilog = "if (__n{name}) {{ (*env)->ReleaseStringUTFChars(env, __j{name}, (const char*)__n{name}); if (!__failed) (*env)->SetObjectField(env, {name}, StringW_val_fieldID, __j{name}); }}".format(name=name) class JBooleanArray: def __init__(self, name): self.idx = 1 self.name = name self.native_type_and_name = "int *{name}".format(name=name) - self.java_type_and_name = "jbooleanArray {name}, jint offset{name}".format(name=name) + self.java_type_and_name = [a.format(name=name) for a in ["jbooleanArray {name}", "jint offset{name}"]] self.native_argument = "__n{name} + offset{name}".format(name=name) - self.native_local = "jboolean *__j{name} = NULL; int *__n{name} = NULL".format(name=name) - self.prolog = "if (!(__j{name} = (*env)->GetPrimitiveArrayCritical(env, {name}, NULL))) {{ failed = TRUE; goto done; }} do {{ int length = (*env)->GetArrayLength(env, {name}); if (length <= 0) {{ failed = TRUE; goto done; }} if (!(__n{name} = malloc(sizeof(jboolean) * length))) {{ failed = TRUE; goto done; }} for (int i = 0; i < length; i++) {{ __n{name}[i] = __j{name}[i]; }} }} while(0);".format(name=name) + self.native_local = "int *__n{name} = NULL; jboolean *__j{name} = NULL;".format(name=name) + self.prolog = "if (!(__j{name} = (*env)->GetPrimitiveArrayCritical(env, {name}, NULL))) {{ __failed = TRUE; goto done; }} do {{ int length = (*env)->GetArrayLength(env, {name}); if (length <= 0) {{ __failed = TRUE; goto done; }} if (!(__n{name} = malloc(sizeof(jboolean) * length))) {{ __failed = TRUE; goto done; }} for (int i = 0; i < length; i++) {{ __n{name}[i] = __j{name}[i]; }} }} while(0);".format(name=name) self.epilog = "if (__n{name}) {{ free(__n{name}); }} if (__j{name}) (*env)->ReleasePrimitiveArrayCritical(env, {name}, __n{name}, JNI_ABORT);".format(name=name) class JIntArray: def __init__(self, name, mode = "0"): self.idx = 1 self.name = name self.native_type_and_name = "int *{name}".format(name=name) - self.java_type_and_name = "jintArray {name}, jint offset{name}".format(name=name) + self.java_type_and_name = [a.format(name=name) for a in ["jintArray {name}", "jint offset{name}"]] self.native_argument = "__n{name} + offset{name}".format(name=name) - self.native_local = "int *__n{name} = NULL".format(name=name) - self.prolog = "if (!(__n{name} = (*env)->GetPrimitiveArrayCritical(env, {name}, NULL))) {{ failed = TRUE; goto done; }}".format(name=name) - self.epilog = "if (__n{name}) (*env)->ReleasePrimitiveArrayCritical(env, {name}, __n{name}, {mode});".format(name=name, mode=("JNI_ABORT" if mode == "JNI_ABORT" else ("failed ? JNI_ABORT : %s" % mode))) + self.native_local = "int *__n{name} = NULL;".format(name=name) + self.prolog = "if (!(__n{name} = (*env)->GetPrimitiveArrayCritical(env, {name}, NULL))) {{ __failed = TRUE; goto done; }}".format(name=name) + self.epilog = "if (__n{name}) (*env)->ReleasePrimitiveArrayCritical(env, {name}, __n{name}, {mode});".format(name=name, mode=("JNI_ABORT" if mode == "JNI_ABORT" else ("__failed ? JNI_ABORT : %s" % mode))) class JFloatArray: def __init__(self, name, mode = "0"): self.idx = 1 self.name = name self.native_type_and_name = "float *{name}".format(name=name) - self.java_type_and_name = "jfloatArray {name}, jint offset{name}".format(name=name) + self.java_type_and_name = [a.format(name=name) for a in ["jfloatArray {name}", "jint offset{name}"]] self.native_argument = "__n{name} + offset{name}".format(name=name) - self.native_local = "float *__n{name} = NULL".format(name=name) - self.prolog = "if (!(__n{name} = (*env)->GetPrimitiveArrayCritical(env, {name}, NULL))) {{ failed = TRUE; goto done; }}".format(name=name) - self.epilog = "if (__n{name}) (*env)->ReleasePrimitiveArrayCritical(env, {name}, __n{name}, {mode});".format(name=name, mode=("JNI_ABORT" if mode == "JNI_ABORT" else ("failed ? JNI_ABORT : %s" % mode))) + self.native_local = "float *__n{name} = NULL;".format(name=name) + self.prolog = "if (!(__n{name} = (*env)->GetPrimitiveArrayCritical(env, {name}, NULL))) {{ __failed = TRUE; goto done; }}".format(name=name) + self.epilog = "if (__n{name}) (*env)->ReleasePrimitiveArrayCritical(env, {name}, __n{name}, {mode});".format(name=name, mode=("JNI_ABORT" if mode == "JNI_ABORT" else ("__failed ? JNI_ABORT : %s" % mode))) class JDoubleArray: def __init__(self, name, mode = "0"): self.idx = 1 self.name = name self.native_type_and_name = "double *{name}".format(name=name) - self.java_type_and_name = "jdoubleArray {name}, jint offset{name}".format(name=name) + self.java_type_and_name = [a.format(name=name) for a in ["jdoubleArray {name}", "jint offset{name}"]] self.native_argument = "__n{name} + offset{name}".format(name=name) - self.native_local = "double *__n{name} = NULL".format(name=name) - self.prolog = "if (!(__n{name} = (*env)->GetPrimitiveArrayCritical(env, {name}, NULL))) {{ failed = TRUE; goto done; }}".format(name=name) - self.epilog = "if (__n{name}) (*env)->ReleasePrimitiveArrayCritical(env, {name}, __n{name}, {mode});".format(name=name, mode=("JNI_ABORT" if mode == "JNI_ABORT" else ("failed ? JNI_ABORT : %s" % mode))) + self.native_local = "double *__n{name} = NULL;".format(name=name) + self.prolog = "if (!(__n{name} = (*env)->GetPrimitiveArrayCritical(env, {name}, NULL))) {{ __failed = TRUE; goto done; }}".format(name=name) + self.epilog = "if (__n{name}) (*env)->ReleasePrimitiveArrayCritical(env, {name}, __n{name}, {mode});".format(name=name, mode=("JNI_ABORT" if mode == "JNI_ABORT" else ("__failed ? JNI_ABORT : %s" % mode))) class RoutineR: def __init__(self, pkg, ret, name, *args): @@ -177,18 +177,18 @@ def __init__(self, pkg, ret, name, *args): print("static {ret} (*{name}_)({args});".format(ret=ret.native_type, name=name, args=", ".join([arg.native_type_and_name for arg in args]))) print() # Print JNI function implementation - print("{ret} Java_dev_ludovic_netlib_{pkg}_JNI{pkgupper}_{name}K(JNIEnv *env, UNUSED jobject obj{args}) {{".format(ret=ret.java_type, pkg=pkg, pkgupper=pkg.upper(), name=name, args="".join([", " + arg.java_type_and_name for arg in args]))) - print(" {rettype} __ret;".format(rettype=ret.java_type)) - print(" jboolean failed = FALSE;") + print("{ret} Java_dev_ludovic_netlib_{pkg}_JNI{pkgupper}_{name}K(JNIEnv *env, UNUSED jobject obj{args}) {{".format(ret=ret.java_type, pkg=pkg, pkgupper=pkg.upper(), name=name, args="".join([", " + a for arg in args for a in arg.java_type_and_name]))) + print(" {rettype} __ret = 0;".format(rettype=ret.java_type)) + print(" jboolean __failed = FALSE;") if any(len(arg.native_local) > 0 for arg in sorted(args, key=lambda a: a.idx)): - print(" " + " ".join([a + ";" for a in [arg.native_local for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0])) + print("\n".join([" " + a for a in [arg.native_local for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0])) if any(len(arg.prolog) > 0 for arg in sorted(args, key=lambda a: a.idx)): print("\n".join([" " + a for a in [arg.prolog for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0])) print(" __ret = {name}_({args});".format(name=name, args=", ".join([arg.native_argument for arg in args]))) print("done:") if any(len(arg.epilog) > 0 for arg in sorted(args, key=lambda a: a.idx)): print("\n".join([" " + a for a in [arg.epilog for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0][::-1])) - print(" if (failed) throwOOM(env);") + print(" if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, \"java/lang/OutOfMemoryError\"), \"Failed to copy from heap to native memory\");") print(" return __ret;") print("}") print() @@ -211,17 +211,17 @@ def __init__(self, pkg, name, *args): print("static void (*{name}_)({args});".format(name=name, args=", ".join([arg.native_type_and_name for arg in args]))) print() # Print JNI function implementation - print("void Java_dev_ludovic_netlib_{pkg}_JNI{pkgupper}_{name}K(JNIEnv *env, UNUSED jobject obj{args}) {{".format(pkg=pkg, pkgupper=pkg.upper(), name=name, args="".join([", " + arg.java_type_and_name for arg in args]))) - print(" jboolean failed = FALSE;") + print("void Java_dev_ludovic_netlib_{pkg}_JNI{pkgupper}_{name}K(JNIEnv *env, UNUSED jobject obj{args}) {{".format(pkg=pkg, pkgupper=pkg.upper(), name=name, args="".join([", " + a for arg in args for a in arg.java_type_and_name]))) + print(" jboolean __failed = FALSE;") if any(len(arg.native_local) > 0 for arg in sorted(args, key=lambda a: a.idx)): - print(" " + " ".join([a + ";" for a in [arg.native_local for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0])) + print("\n".join([" " + a for a in [arg.native_local for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0])) if any(len(arg.prolog) > 0 for arg in sorted(args, key=lambda a: a.idx)): print("\n".join([" " + a for a in [arg.prolog for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0])) print(" {name}_({args});".format(name=name, args=", ".join([arg.native_argument for arg in args]))) print("done:") if any(len(arg.epilog) > 0 for arg in sorted(args, key=lambda a: a.idx)): print("\n".join([" " + a for a in [arg.epilog for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0][::-1])) - print(" if (failed) throwOOM(env);") + print(" if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, \"java/lang/OutOfMemoryError\"), \"Failed to copy from heap to native memory\");") print("}") print() @@ -231,7 +231,7 @@ def __init__(self, pkg, name, *args): print("// static void (*{name}_)({args});".format(name=name, args=", ".join([arg.native_type_and_name for arg in args]))) print() # Print JNI function implementation - print("void Java_dev_ludovic_netlib_{pkg}_JNI{pkgupper}_{name}K(JNIEnv *env, UNUSED jobject obj{args}) {{".format(pkg=pkg, pkgupper=pkg.upper(), name=name, args="".join([", UNUSED " + arg.java_type_and_name for arg in args]))) + print("void Java_dev_ludovic_netlib_{pkg}_JNI{pkgupper}_{name}K(JNIEnv *env, UNUSED jobject obj{args}) {{".format(pkg=pkg, pkgupper=pkg.upper(), name=name, args="".join([", UNUSED " + a for arg in args for a in arg.java_type_and_name]))) print(" (*env)->ThrowNew(env, (*env)->FindClass(env, \"java/lang/UnsupportedOperationException\"), \"not implemented\");") print("}") print() diff --git a/lapack/src/main/native/jni.c b/lapack/src/main/native/jni.c index 68d0f8d7..f041c14d 100644 --- a/lapack/src/main/native/jni.c +++ b/lapack/src/main/native/jni.c @@ -42,2766 +42,3013 @@ static jfieldID StringW_val_fieldID; static void *lapack; -static void throwOOM(JNIEnv *env) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); -} - static void (*dbdsdc_)(const char *uplo, const char *compq, int *n, double *d, double *e, double *u, int *ldu, double *vt, int *ldvt, double *q, int *iq, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dbdsdcK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring compq, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jint ldvt, jdoubleArray q, jint offsetq, jintArray iq, jint offsetiq, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ncompq = NULL; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nu = NULL; double *__nvt = NULL; double *__nq = NULL; int *__niq = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ncompq = (*env)->GetStringUTFChars(env, compq, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; - if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__niq = (*env)->GetPrimitiveArrayCritical(env, iq, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ncompq = NULL; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; + double *__nu = NULL; + double *__nvt = NULL; + double *__nq = NULL; + int *__niq = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ncompq = (*env)->GetStringUTFChars(env, compq, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) { __failed = TRUE; goto done; } + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__niq = (*env)->GetPrimitiveArrayCritical(env, iq, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dbdsdc_(__nuplo, __ncompq, &n, __nd + offsetd, __ne + offsete, __nu + offsetu, &ldu, __nvt + offsetvt, &ldvt, __nq + offsetq, __niq + offsetiq, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__niq) (*env)->ReleasePrimitiveArrayCritical(env, iq, __niq, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); - if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__niq) (*env)->ReleasePrimitiveArrayCritical(env, iq, __niq, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, __failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ncompq) (*env)->ReleaseStringUTFChars(env, compq, __ncompq); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dbdsqr_)(const char *uplo, int *n, int *ncvt, int *nru, int *ncc, double *d, double *e, double *vt, int *ldvt, double *u, int *ldu, double *c, int *Ldc, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dbdsqrK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint ncvt, jint nru, jint ncc, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray vt, jint offsetvt, jint ldvt, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nvt = NULL; double *__nu = NULL; double *__nc = NULL; double *__nwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; - if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; + double *__nvt = NULL; + double *__nu = NULL; + double *__nc = NULL; + double *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) { __failed = TRUE; goto done; } + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dbdsqr_(__nuplo, &n, &ncvt, &nru, &ncc, __nd + offsetd, __ne + offsete, __nvt + offsetvt, &ldvt, __nu + offsetu, &ldu, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); - if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, __failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ddisna_)(const char *job, int *m, int *n, double *d, double *sep, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ddisnaK(JNIEnv *env, UNUSED jobject obj, jstring job, jint m, jint n, jdoubleArray d, jint offsetd, jdoubleArray sep, jint offsetsep, jobject info) { - jboolean failed = FALSE; - const char *__njob = NULL; int __ninfo = 0; double *__nd = NULL; double *__nsep = NULL; - if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nsep = (*env)->GetPrimitiveArrayCritical(env, sep, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njob = NULL; + int __ninfo = 0; + double *__nd = NULL; + double *__nsep = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nsep = (*env)->GetPrimitiveArrayCritical(env, sep, NULL))) { __failed = TRUE; goto done; } ddisna_(__njob, &m, &n, __nd + offsetd, __nsep + offsetsep, &__ninfo); done: - if (__nsep) (*env)->ReleasePrimitiveArrayCritical(env, sep, __nsep, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nsep) (*env)->ReleasePrimitiveArrayCritical(env, sep, __nsep, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgbbrd_)(const char *vect, int *m, int *n, int *ncc, int *kl, int *ku, double *ab, int *ldab, double *d, double *e, double *q, int *ldq, double *pt, int *ldpt, double *c, int *Ldc, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbbrdK(JNIEnv *env, UNUSED jobject obj, jstring vect, jint m, jint n, jint ncc, jint kl, jint ku, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray pt, jint offsetpt, jint ldpt, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nvect = NULL; int __ninfo = 0; double *__nab = NULL; double *__nd = NULL; double *__ne = NULL; double *__nq = NULL; double *__npt = NULL; double *__nc = NULL; double *__nwork = NULL; - if (!(__nvect = (*env)->GetStringUTFChars(env, vect, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__npt = (*env)->GetPrimitiveArrayCritical(env, pt, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nvect = NULL; + int __ninfo = 0; + double *__nab = NULL; + double *__nd = NULL; + double *__ne = NULL; + double *__nq = NULL; + double *__npt = NULL; + double *__nc = NULL; + double *__nwork = NULL; + if (!(__nvect = (*env)->GetStringUTFChars(env, vect, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__npt = (*env)->GetPrimitiveArrayCritical(env, pt, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dgbbrd_(__nvect, &m, &n, &ncc, &kl, &ku, __nab + offsetab, &ldab, __nd + offsetd, __ne + offsete, __nq + offsetq, &ldq, __npt + offsetpt, &ldpt, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__npt) (*env)->ReleasePrimitiveArrayCritical(env, pt, __npt, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__npt) (*env)->ReleasePrimitiveArrayCritical(env, pt, __npt, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nvect) (*env)->ReleaseStringUTFChars(env, vect, __nvect); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgbcon_)(const char *norm, int *n, int *kl, int *ku, double *ab, int *ldab, int *ipiv, double *anorm, double *rcond, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbconK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jint kl, jint ku, jdoubleArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nnorm = NULL; double __nrcond = 0; int __ninfo = 0; double *__nab = NULL; int *__nipiv = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + double __nrcond = 0; + int __ninfo = 0; + double *__nab = NULL; + int *__nipiv = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dgbcon_(__nnorm, &n, &kl, &ku, __nab + offsetab, &ldab, __nipiv + offsetipiv, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgbequ_)(int *m, int *n, int *kl, int *ku, double *ab, int *ldab, double *r, double *c, double *rowcnd, double *colcnd, double *amax, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbequK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint kl, jint ku, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray r, jint offsetr, jdoubleArray c, jint offsetc, jobject rowcnd, jobject colcnd, jobject amax, jobject info) { - jboolean failed = FALSE; - double __nrowcnd = 0; double __ncolcnd = 0; double __namax = 0; int __ninfo = 0; double *__nab = NULL; double *__nr = NULL; double *__nc = NULL; + jboolean __failed = FALSE; + double __nrowcnd = 0; + double __ncolcnd = 0; + double __namax = 0; + int __ninfo = 0; + double *__nab = NULL; + double *__nr = NULL; + double *__nc = NULL; __nrowcnd = (*env)->GetDoubleField(env, rowcnd, doubleW_val_fieldID); __ncolcnd = (*env)->GetDoubleField(env, colcnd, doubleW_val_fieldID); __namax = (*env)->GetDoubleField(env, amax, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } dgbequ_(&m, &n, &kl, &ku, __nab + offsetab, &ldab, __nr + offsetr, __nc + offsetc, &__nrowcnd, &__ncolcnd, &__namax, &__ninfo); done: - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, amax, doubleW_val_fieldID, __namax); - if (!failed) (*env)->SetDoubleField(env, colcnd, doubleW_val_fieldID, __ncolcnd); - if (!failed) (*env)->SetDoubleField(env, rowcnd, doubleW_val_fieldID, __nrowcnd); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, amax, doubleW_val_fieldID, __namax); + if (!__failed) (*env)->SetDoubleField(env, colcnd, doubleW_val_fieldID, __ncolcnd); + if (!__failed) (*env)->SetDoubleField(env, rowcnd, doubleW_val_fieldID, __nrowcnd); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgbrfs_)(const char *trans, int *n, int *kl, int *ku, int *nrhs, double *ab, int *ldab, double *afb, int *ldafb, int *ipiv, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbrfsK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint n, jint kl, jint ku, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray afb, jint offsetafb, jint ldafb, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__ntrans = NULL; int __ninfo = 0; double *__nab = NULL; double *__nafb = NULL; int *__nipiv = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nafb = (*env)->GetPrimitiveArrayCritical(env, afb, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ntrans = NULL; + int __ninfo = 0; + double *__nab = NULL; + double *__nafb = NULL; + int *__nipiv = NULL; + double *__nb = NULL; + double *__nx = NULL; + double *__nferr = NULL; + double *__nberr = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nafb = (*env)->GetPrimitiveArrayCritical(env, afb, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dgbrfs_(__ntrans, &n, &kl, &ku, &nrhs, __nab + offsetab, &ldab, __nafb + offsetafb, &ldafb, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nafb) (*env)->ReleasePrimitiveArrayCritical(env, afb, __nafb, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nafb) (*env)->ReleasePrimitiveArrayCritical(env, afb, __nafb, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgbsv_)(int *n, int *kl, int *ku, int *nrhs, double *ab, int *ldab, int *ipiv, double *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbsvK(JNIEnv *env, UNUSED jobject obj, jint n, jint kl, jint ku, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__nab = NULL; int *__nipiv = NULL; double *__nb = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__nab = NULL; + int *__nipiv = NULL; + double *__nb = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } dgbsv_(&n, &kl, &ku, &nrhs, __nab + offsetab, &ldab, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgbsvx_)(const char *fact, const char *trans, int *n, int *kl, int *ku, int *nrhs, double *ab, int *ldab, double *afb, int *ldafb, int *ipiv, char *equed, double *r, double *c, double *b, int *ldb, double *x, int *ldx, double *rcond, double *ferr, double *berr, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbsvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring trans, jint n, jint kl, jint ku, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray afb, jint offsetafb, jint ldafb, jintArray ipiv, jint offsetipiv, jobject equed, jdoubleArray r, jint offsetr, jdoubleArray c, jint offsetc, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nfact = NULL; const char *__ntrans = NULL; char *__nequed = NULL; jstring __jequed = NULL;; double __nrcond = 0; int __ninfo = 0; double *__nab = NULL; double *__nafb = NULL; int *__nipiv = NULL; double *__nr = NULL; double *__nc = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nfact = NULL; + const char *__ntrans = NULL; + char *__nequed = NULL; jstring __jequed = NULL; + double __nrcond = 0; + int __ninfo = 0; + double *__nab = NULL; + double *__nafb = NULL; + int *__nipiv = NULL; + double *__nr = NULL; + double *__nc = NULL; + double *__nb = NULL; + double *__nx = NULL; + double *__nferr = NULL; + double *__nberr = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nafb = (*env)->GetPrimitiveArrayCritical(env, afb, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nafb = (*env)->GetPrimitiveArrayCritical(env, afb, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dgbsvx_(__nfact, __ntrans, &n, &kl, &ku, &nrhs, __nab + offsetab, &ldab, __nafb + offsetafb, &ldafb, __nipiv + offsetipiv, __nequed, __nr + offsetr, __nc + offsetc, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nafb) (*env)->ReleasePrimitiveArrayCritical(env, afb, __nafb, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); - if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nafb) (*env)->ReleasePrimitiveArrayCritical(env, afb, __nafb, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!__failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgbtf2_)(int *m, int *n, int *kl, int *ku, double *ab, int *ldab, int *ipiv, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbtf2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint kl, jint ku, jdoubleArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__nab = NULL; int *__nipiv = NULL; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__nab = NULL; + int *__nipiv = NULL; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } dgbtf2_(&m, &n, &kl, &ku, __nab + offsetab, &ldab, __nipiv + offsetipiv, &__ninfo); done: - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgbtrf_)(int *m, int *n, int *kl, int *ku, double *ab, int *ldab, int *ipiv, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbtrfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint kl, jint ku, jdoubleArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__nab = NULL; int *__nipiv = NULL; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__nab = NULL; + int *__nipiv = NULL; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } dgbtrf_(&m, &n, &kl, &ku, __nab + offsetab, &ldab, __nipiv + offsetipiv, &__ninfo); done: - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgbtrs_)(const char *trans, int *n, int *kl, int *ku, int *nrhs, double *ab, int *ldab, int *ipiv, double *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgbtrsK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint n, jint kl, jint ku, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__ntrans = NULL; int __ninfo = 0; double *__nab = NULL; int *__nipiv = NULL; double *__nb = NULL; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ntrans = NULL; + int __ninfo = 0; + double *__nab = NULL; + int *__nipiv = NULL; + double *__nb = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } dgbtrs_(__ntrans, &n, &kl, &ku, &nrhs, __nab + offsetab, &ldab, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgebak_)(const char *job, const char *side, int *n, int *ilo, int *ihi, double *scale, int *m, double *v, int *ldv, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgebakK(JNIEnv *env, UNUSED jobject obj, jstring job, jstring side, jint n, jint ilo, jint ihi, jdoubleArray scale, jint offsetscale, jint m, jdoubleArray v, jint offsetv, jint ldv, jobject info) { - jboolean failed = FALSE; - const char *__njob = NULL; const char *__nside = NULL; int __ninfo = 0; double *__nscale = NULL; double *__nv = NULL; - if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nscale = (*env)->GetPrimitiveArrayCritical(env, scale, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njob = NULL; + const char *__nside = NULL; + int __ninfo = 0; + double *__nscale = NULL; + double *__nv = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) { __failed = TRUE; goto done; } + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nscale = (*env)->GetPrimitiveArrayCritical(env, scale, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } dgebak_(__njob, __nside, &n, &ilo, &ihi, __nscale + offsetscale, &m, __nv + offsetv, &ldv, &__ninfo); done: - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nscale) (*env)->ReleasePrimitiveArrayCritical(env, scale, __nscale, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nscale) (*env)->ReleasePrimitiveArrayCritical(env, scale, __nscale, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgebal_)(const char *job, int *n, double *a, int *lda, int *ilo, int *ihi, double *scale, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgebalK(JNIEnv *env, UNUSED jobject obj, jstring job, jint n, jdoubleArray a, jint offseta, jint lda, jobject ilo, jobject ihi, jdoubleArray scale, jint offsetscale, jobject info) { - jboolean failed = FALSE; - const char *__njob = NULL; int __nilo = 0; int __nihi = 0; int __ninfo = 0; double *__na = NULL; double *__nscale = NULL; - if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njob = NULL; + int __nilo = 0; + int __nihi = 0; + int __ninfo = 0; + double *__na = NULL; + double *__nscale = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) { __failed = TRUE; goto done; } __nilo = (*env)->GetIntField(env, ilo, intW_val_fieldID); __nihi = (*env)->GetIntField(env, ihi, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nscale = (*env)->GetPrimitiveArrayCritical(env, scale, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nscale = (*env)->GetPrimitiveArrayCritical(env, scale, NULL))) { __failed = TRUE; goto done; } dgebal_(__njob, &n, __na + offseta, &lda, &__nilo, &__nihi, __nscale + offsetscale, &__ninfo); done: - if (__nscale) (*env)->ReleasePrimitiveArrayCritical(env, scale, __nscale, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, ihi, intW_val_fieldID, __nihi); - if (!failed) (*env)->SetIntField(env, ilo, intW_val_fieldID, __nilo); + if (__nscale) (*env)->ReleasePrimitiveArrayCritical(env, scale, __nscale, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, ihi, intW_val_fieldID, __nihi); + if (!__failed) (*env)->SetIntField(env, ilo, intW_val_fieldID, __nilo); if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgebd2_)(int *m, int *n, double *a, int *lda, double *d, double *e, double *tauq, double *taup, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgebd2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray tauq, jint offsettauq, jdoubleArray taup, jint offsettaup, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; double *__nd = NULL; double *__ne = NULL; double *__ntauq = NULL; double *__ntaup = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__ntauq = (*env)->GetPrimitiveArrayCritical(env, tauq, NULL))) goto fail; - if (!(__ntaup = (*env)->GetPrimitiveArrayCritical(env, taup, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + double *__nd = NULL; + double *__ne = NULL; + double *__ntauq = NULL; + double *__ntaup = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__ntauq = (*env)->GetPrimitiveArrayCritical(env, tauq, NULL))) { __failed = TRUE; goto done; } + if (!(__ntaup = (*env)->GetPrimitiveArrayCritical(env, taup, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dgebd2_(&m, &n, __na + offseta, &lda, __nd + offsetd, __ne + offsete, __ntauq + offsettauq, __ntaup + offsettaup, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntaup) (*env)->ReleasePrimitiveArrayCritical(env, taup, __ntaup, failed ? JNI_ABORT : 0); - if (__ntauq) (*env)->ReleasePrimitiveArrayCritical(env, tauq, __ntauq, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntaup) (*env)->ReleasePrimitiveArrayCritical(env, taup, __ntaup, __failed ? JNI_ABORT : 0); + if (__ntauq) (*env)->ReleasePrimitiveArrayCritical(env, tauq, __ntauq, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgebrd_)(int *m, int *n, double *a, int *lda, double *d, double *e, double *tauq, double *taup, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgebrdK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray tauq, jint offsettauq, jdoubleArray taup, jint offsettaup, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; double *__nd = NULL; double *__ne = NULL; double *__ntauq = NULL; double *__ntaup = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__ntauq = (*env)->GetPrimitiveArrayCritical(env, tauq, NULL))) goto fail; - if (!(__ntaup = (*env)->GetPrimitiveArrayCritical(env, taup, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + double *__nd = NULL; + double *__ne = NULL; + double *__ntauq = NULL; + double *__ntaup = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__ntauq = (*env)->GetPrimitiveArrayCritical(env, tauq, NULL))) { __failed = TRUE; goto done; } + if (!(__ntaup = (*env)->GetPrimitiveArrayCritical(env, taup, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dgebrd_(&m, &n, __na + offseta, &lda, __nd + offsetd, __ne + offsete, __ntauq + offsettauq, __ntaup + offsettaup, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntaup) (*env)->ReleasePrimitiveArrayCritical(env, taup, __ntaup, failed ? JNI_ABORT : 0); - if (__ntauq) (*env)->ReleasePrimitiveArrayCritical(env, tauq, __ntauq, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntaup) (*env)->ReleasePrimitiveArrayCritical(env, taup, __ntaup, __failed ? JNI_ABORT : 0); + if (__ntauq) (*env)->ReleasePrimitiveArrayCritical(env, tauq, __ntauq, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgecon_)(const char *norm, int *n, double *a, int *lda, double *anorm, double *rcond, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeconK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jdoubleArray a, jint offseta, jint lda, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nnorm = NULL; double __nrcond = 0; int __ninfo = 0; double *__na = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + double __nrcond = 0; + int __ninfo = 0; + double *__na = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dgecon_(__nnorm, &n, __na + offseta, &lda, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgeequ_)(int *m, int *n, double *a, int *lda, double *r, double *c, double *rowcnd, double *colcnd, double *amax, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeequK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray r, jint offsetr, jdoubleArray c, jint offsetc, jobject rowcnd, jobject colcnd, jobject amax, jobject info) { - jboolean failed = FALSE; - double __nrowcnd = 0; double __ncolcnd = 0; double __namax = 0; int __ninfo = 0; double *__na = NULL; double *__nr = NULL; double *__nc = NULL; + jboolean __failed = FALSE; + double __nrowcnd = 0; + double __ncolcnd = 0; + double __namax = 0; + int __ninfo = 0; + double *__na = NULL; + double *__nr = NULL; + double *__nc = NULL; __nrowcnd = (*env)->GetDoubleField(env, rowcnd, doubleW_val_fieldID); __ncolcnd = (*env)->GetDoubleField(env, colcnd, doubleW_val_fieldID); __namax = (*env)->GetDoubleField(env, amax, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } dgeequ_(&m, &n, __na + offseta, &lda, __nr + offsetr, __nc + offsetc, &__nrowcnd, &__ncolcnd, &__namax, &__ninfo); done: - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, amax, doubleW_val_fieldID, __namax); - if (!failed) (*env)->SetDoubleField(env, colcnd, doubleW_val_fieldID, __ncolcnd); - if (!failed) (*env)->SetDoubleField(env, rowcnd, doubleW_val_fieldID, __nrowcnd); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, amax, doubleW_val_fieldID, __namax); + if (!__failed) (*env)->SetDoubleField(env, colcnd, doubleW_val_fieldID, __ncolcnd); + if (!__failed) (*env)->SetDoubleField(env, rowcnd, doubleW_val_fieldID, __nrowcnd); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); +} + +// static void (*dgees_)(const char *jobvs, const char *sort, const char *select, int *n, double *a, int *lda, int *sdim, double *wr, double *wi, double *vs, int *ldvs, double *work, int *lwork, int *bwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeesK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring jobvs, UNUSED jstring sort, UNUSED jstring select, UNUSED jint n, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jobject sdim, UNUSED jdoubleArray wr, UNUSED jint offsetwr, UNUSED jdoubleArray wi, UNUSED jint offsetwi, UNUSED jdoubleArray vs, UNUSED jint offsetvs, UNUSED jint ldvs, UNUSED jdoubleArray work, UNUSED jint offsetwork, UNUSED jint lwork, UNUSED jbooleanArray bwork, UNUSED jint offsetbwork, UNUSED jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +// static void (*dgeesx_)(const char *jobvs, const char *sort, const char *select, const char *sense, int *n, double *a, int *lda, int *sdim, double *wr, double *wi, double *vs, int *ldvs, double *rconde, double *rcondv, double *work, int *lwork, int *iwork, int *liwork, int *bwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeesxK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring jobvs, UNUSED jstring sort, UNUSED jstring select, UNUSED jstring sense, UNUSED jint n, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jobject sdim, UNUSED jdoubleArray wr, UNUSED jint offsetwr, UNUSED jdoubleArray wi, UNUSED jint offsetwi, UNUSED jdoubleArray vs, UNUSED jint offsetvs, UNUSED jint ldvs, UNUSED jobject rconde, UNUSED jobject rcondv, UNUSED jdoubleArray work, UNUSED jint offsetwork, UNUSED jint lwork, UNUSED jintArray iwork, UNUSED jint offsetiwork, UNUSED jint liwork, UNUSED jbooleanArray bwork, UNUSED jint offsetbwork, UNUSED jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } static void (*dgeev_)(const char *jobvl, const char *jobvr, int *n, double *a, int *lda, double *wr, double *wi, double *vl, int *ldvl, double *vr, int *ldvr, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeevK(JNIEnv *env, UNUSED jobject obj, jstring jobvl, jstring jobvr, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__njobvl = NULL; const char *__njobvr = NULL; int __ninfo = 0; double *__na = NULL; double *__nwr = NULL; double *__nwi = NULL; double *__nvl = NULL; double *__nvr = NULL; double *__nwork = NULL; - if (!(__njobvl = (*env)->GetStringUTFChars(env, jobvl, NULL))) goto fail; - if (!(__njobvr = (*env)->GetStringUTFChars(env, jobvr, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; - if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; - if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; - if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobvl = NULL; + const char *__njobvr = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__nwr = NULL; + double *__nwi = NULL; + double *__nvl = NULL; + double *__nvr = NULL; + double *__nwork = NULL; + if (!(__njobvl = (*env)->GetStringUTFChars(env, jobvl, NULL))) { __failed = TRUE; goto done; } + if (!(__njobvr = (*env)->GetStringUTFChars(env, jobvr, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) { __failed = TRUE; goto done; } + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) { __failed = TRUE; goto done; } + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dgeev_(__njobvl, __njobvr, &n, __na + offseta, &lda, __nwr + offsetwr, __nwi + offsetwi, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); - if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); - if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); - if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, __failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, __failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, __failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__njobvr) (*env)->ReleaseStringUTFChars(env, jobvr, __njobvr); if (__njobvl) (*env)->ReleaseStringUTFChars(env, jobvl, __njobvl); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgeevx_)(const char *balanc, const char *jobvl, const char *jobvr, const char *sense, int *n, double *a, int *lda, double *wr, double *wi, double *vl, int *ldvl, double *vr, int *ldvr, int *ilo, int *ihi, double *scale, double *abnrm, double *rconde, double *rcondv, double *work, int *lwork, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeevxK(JNIEnv *env, UNUSED jobject obj, jstring balanc, jstring jobvl, jstring jobvr, jstring sense, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jobject ilo, jobject ihi, jdoubleArray scale, jint offsetscale, jobject abnrm, jdoubleArray rconde, jint offsetrconde, jdoubleArray rcondv, jint offsetrcondv, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nbalanc = NULL; const char *__njobvl = NULL; const char *__njobvr = NULL; const char *__nsense = NULL; int __nilo = 0; int __nihi = 0; double __nabnrm = 0; int __ninfo = 0; double *__na = NULL; double *__nwr = NULL; double *__nwi = NULL; double *__nvl = NULL; double *__nvr = NULL; double *__nscale = NULL; double *__nrconde = NULL; double *__nrcondv = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nbalanc = (*env)->GetStringUTFChars(env, balanc, NULL))) goto fail; - if (!(__njobvl = (*env)->GetStringUTFChars(env, jobvl, NULL))) goto fail; - if (!(__njobvr = (*env)->GetStringUTFChars(env, jobvr, NULL))) goto fail; - if (!(__nsense = (*env)->GetStringUTFChars(env, sense, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nbalanc = NULL; + const char *__njobvl = NULL; + const char *__njobvr = NULL; + const char *__nsense = NULL; + int __nilo = 0; + int __nihi = 0; + double __nabnrm = 0; + int __ninfo = 0; + double *__na = NULL; + double *__nwr = NULL; + double *__nwi = NULL; + double *__nvl = NULL; + double *__nvr = NULL; + double *__nscale = NULL; + double *__nrconde = NULL; + double *__nrcondv = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nbalanc = (*env)->GetStringUTFChars(env, balanc, NULL))) { __failed = TRUE; goto done; } + if (!(__njobvl = (*env)->GetStringUTFChars(env, jobvl, NULL))) { __failed = TRUE; goto done; } + if (!(__njobvr = (*env)->GetStringUTFChars(env, jobvr, NULL))) { __failed = TRUE; goto done; } + if (!(__nsense = (*env)->GetStringUTFChars(env, sense, NULL))) { __failed = TRUE; goto done; } __nilo = (*env)->GetIntField(env, ilo, intW_val_fieldID); __nihi = (*env)->GetIntField(env, ihi, intW_val_fieldID); __nabnrm = (*env)->GetDoubleField(env, abnrm, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; - if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; - if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; - if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; - if (!(__nscale = (*env)->GetPrimitiveArrayCritical(env, scale, NULL))) goto fail; - if (!(__nrconde = (*env)->GetPrimitiveArrayCritical(env, rconde, NULL))) goto fail; - if (!(__nrcondv = (*env)->GetPrimitiveArrayCritical(env, rcondv, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) { __failed = TRUE; goto done; } + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) { __failed = TRUE; goto done; } + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) { __failed = TRUE; goto done; } + if (!(__nscale = (*env)->GetPrimitiveArrayCritical(env, scale, NULL))) { __failed = TRUE; goto done; } + if (!(__nrconde = (*env)->GetPrimitiveArrayCritical(env, rconde, NULL))) { __failed = TRUE; goto done; } + if (!(__nrcondv = (*env)->GetPrimitiveArrayCritical(env, rcondv, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dgeevx_(__nbalanc, __njobvl, __njobvr, __nsense, &n, __na + offseta, &lda, __nwr + offsetwr, __nwi + offsetwi, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, &__nilo, &__nihi, __nscale + offsetscale, &__nabnrm, __nrconde + offsetrconde, __nrcondv + offsetrcondv, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nrcondv) (*env)->ReleasePrimitiveArrayCritical(env, rcondv, __nrcondv, failed ? JNI_ABORT : 0); - if (__nrconde) (*env)->ReleasePrimitiveArrayCritical(env, rconde, __nrconde, failed ? JNI_ABORT : 0); - if (__nscale) (*env)->ReleasePrimitiveArrayCritical(env, scale, __nscale, failed ? JNI_ABORT : 0); - if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); - if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); - if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); - if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, abnrm, doubleW_val_fieldID, __nabnrm); - if (!failed) (*env)->SetIntField(env, ihi, intW_val_fieldID, __nihi); - if (!failed) (*env)->SetIntField(env, ilo, intW_val_fieldID, __nilo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nrcondv) (*env)->ReleasePrimitiveArrayCritical(env, rcondv, __nrcondv, __failed ? JNI_ABORT : 0); + if (__nrconde) (*env)->ReleasePrimitiveArrayCritical(env, rconde, __nrconde, __failed ? JNI_ABORT : 0); + if (__nscale) (*env)->ReleasePrimitiveArrayCritical(env, scale, __nscale, __failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, __failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, __failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, __failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, abnrm, doubleW_val_fieldID, __nabnrm); + if (!__failed) (*env)->SetIntField(env, ihi, intW_val_fieldID, __nihi); + if (!__failed) (*env)->SetIntField(env, ilo, intW_val_fieldID, __nilo); if (__nsense) (*env)->ReleaseStringUTFChars(env, sense, __nsense); if (__njobvr) (*env)->ReleaseStringUTFChars(env, jobvr, __njobvr); if (__njobvl) (*env)->ReleaseStringUTFChars(env, jobvl, __njobvl); if (__nbalanc) (*env)->ReleaseStringUTFChars(env, balanc, __nbalanc); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgegs_)(const char *jobvsl, const char *jobvsr, int *n, double *a, int *lda, double *b, int *ldb, double *alphar, double *alphai, double *beta, double *vsl, int *ldvsl, double *vsr, int *ldvsr, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgegsK(JNIEnv *env, UNUSED jobject obj, jstring jobvsl, jstring jobvsr, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray vsl, jint offsetvsl, jint ldvsl, jdoubleArray vsr, jint offsetvsr, jint ldvsr, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__njobvsl = NULL; const char *__njobvsr = NULL; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nalphar = NULL; double *__nalphai = NULL; double *__nbeta = NULL; double *__nvsl = NULL; double *__nvsr = NULL; double *__nwork = NULL; - if (!(__njobvsl = (*env)->GetStringUTFChars(env, jobvsl, NULL))) goto fail; - if (!(__njobvsr = (*env)->GetStringUTFChars(env, jobvsr, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) goto fail; - if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) goto fail; - if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; - if (!(__nvsl = (*env)->GetPrimitiveArrayCritical(env, vsl, NULL))) goto fail; - if (!(__nvsr = (*env)->GetPrimitiveArrayCritical(env, vsr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobvsl = NULL; + const char *__njobvsr = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + double *__nalphar = NULL; + double *__nalphai = NULL; + double *__nbeta = NULL; + double *__nvsl = NULL; + double *__nvsr = NULL; + double *__nwork = NULL; + if (!(__njobvsl = (*env)->GetStringUTFChars(env, jobvsl, NULL))) { __failed = TRUE; goto done; } + if (!(__njobvsr = (*env)->GetStringUTFChars(env, jobvsr, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) { __failed = TRUE; goto done; } + if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) { __failed = TRUE; goto done; } + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) { __failed = TRUE; goto done; } + if (!(__nvsl = (*env)->GetPrimitiveArrayCritical(env, vsl, NULL))) { __failed = TRUE; goto done; } + if (!(__nvsr = (*env)->GetPrimitiveArrayCritical(env, vsr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dgegs_(__njobvsl, __njobvsr, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nalphar + offsetalphar, __nalphai + offsetalphai, __nbeta + offsetbeta, __nvsl + offsetvsl, &ldvsl, __nvsr + offsetvsr, &ldvsr, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nvsr) (*env)->ReleasePrimitiveArrayCritical(env, vsr, __nvsr, failed ? JNI_ABORT : 0); - if (__nvsl) (*env)->ReleasePrimitiveArrayCritical(env, vsl, __nvsl, failed ? JNI_ABORT : 0); - if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); - if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, failed ? JNI_ABORT : 0); - if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nvsr) (*env)->ReleasePrimitiveArrayCritical(env, vsr, __nvsr, __failed ? JNI_ABORT : 0); + if (__nvsl) (*env)->ReleasePrimitiveArrayCritical(env, vsl, __nvsl, __failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, __failed ? JNI_ABORT : 0); + if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, __failed ? JNI_ABORT : 0); + if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__njobvsr) (*env)->ReleaseStringUTFChars(env, jobvsr, __njobvsr); if (__njobvsl) (*env)->ReleaseStringUTFChars(env, jobvsl, __njobvsl); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgegv_)(const char *jobvl, const char *jobvr, int *n, double *a, int *lda, double *b, int *ldb, double *alphar, double *alphai, double *beta, double *vl, int *ldvl, double *vr, int *ldvr, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgegvK(JNIEnv *env, UNUSED jobject obj, jstring jobvl, jstring jobvr, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__njobvl = NULL; const char *__njobvr = NULL; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nalphar = NULL; double *__nalphai = NULL; double *__nbeta = NULL; double *__nvl = NULL; double *__nvr = NULL; double *__nwork = NULL; - if (!(__njobvl = (*env)->GetStringUTFChars(env, jobvl, NULL))) goto fail; - if (!(__njobvr = (*env)->GetStringUTFChars(env, jobvr, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) goto fail; - if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) goto fail; - if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; - if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; - if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobvl = NULL; + const char *__njobvr = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + double *__nalphar = NULL; + double *__nalphai = NULL; + double *__nbeta = NULL; + double *__nvl = NULL; + double *__nvr = NULL; + double *__nwork = NULL; + if (!(__njobvl = (*env)->GetStringUTFChars(env, jobvl, NULL))) { __failed = TRUE; goto done; } + if (!(__njobvr = (*env)->GetStringUTFChars(env, jobvr, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) { __failed = TRUE; goto done; } + if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) { __failed = TRUE; goto done; } + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) { __failed = TRUE; goto done; } + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) { __failed = TRUE; goto done; } + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dgegv_(__njobvl, __njobvr, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nalphar + offsetalphar, __nalphai + offsetalphai, __nbeta + offsetbeta, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); - if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); - if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); - if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, failed ? JNI_ABORT : 0); - if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, __failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, __failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, __failed ? JNI_ABORT : 0); + if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, __failed ? JNI_ABORT : 0); + if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__njobvr) (*env)->ReleaseStringUTFChars(env, jobvr, __njobvr); if (__njobvl) (*env)->ReleaseStringUTFChars(env, jobvl, __njobvl); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgehd2_)(int *n, int *ilo, int *ihi, double *a, int *lda, double *tau, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgehd2K(JNIEnv *env, UNUSED jobject obj, jint n, jint ilo, jint ihi, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dgehd2_(&n, &ilo, &ihi, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgehrd_)(int *n, int *ilo, int *ihi, double *a, int *lda, double *tau, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgehrdK(JNIEnv *env, UNUSED jobject obj, jint n, jint ilo, jint ihi, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dgehrd_(&n, &ilo, &ihi, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgelq2_)(int *m, int *n, double *a, int *lda, double *tau, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelq2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dgelq2_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgelqf_)(int *m, int *n, double *a, int *lda, double *tau, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelqfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dgelqf_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgels_)(const char *trans, int *m, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelsK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint m, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nwork = NULL; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ntrans = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + double *__nwork = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dgels_(__ntrans, &m, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgelsd_)(int *m, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, double *s, double *rcond, int *rank, double *work, int *lwork, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelsdK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray s, jint offsets, jdouble rcond, jobject rank, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - int __nrank = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__ns = NULL; double *__nwork = NULL; int *__niwork = NULL; + jboolean __failed = FALSE; + int __nrank = 0; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + double *__ns = NULL; + double *__nwork = NULL; + int *__niwork = NULL; __nrank = (*env)->GetIntField(env, rank, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dgelsd_(&m, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, __ns + offsets, &rcond, &__nrank, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, rank, intW_val_fieldID, __nrank); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, rank, intW_val_fieldID, __nrank); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgelss_)(int *m, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, double *s, double *rcond, int *rank, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelssK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray s, jint offsets, jdouble rcond, jobject rank, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __nrank = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__ns = NULL; double *__nwork = NULL; + jboolean __failed = FALSE; + int __nrank = 0; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + double *__ns = NULL; + double *__nwork = NULL; __nrank = (*env)->GetIntField(env, rank, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dgelss_(&m, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, __ns + offsets, &rcond, &__nrank, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, rank, intW_val_fieldID, __nrank); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, rank, intW_val_fieldID, __nrank); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgelsx_)(int *m, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, int *jpvt, double *rcond, int *rank, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelsxK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jintArray jpvt, jint offsetjpvt, jdouble rcond, jobject rank, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __nrank = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; int *__njpvt = NULL; double *__nwork = NULL; + jboolean __failed = FALSE; + int __nrank = 0; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + int *__njpvt = NULL; + double *__nwork = NULL; __nrank = (*env)->GetIntField(env, rank, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dgelsx_(&m, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, __njpvt + offsetjpvt, &rcond, &__nrank, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, rank, intW_val_fieldID, __nrank); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, rank, intW_val_fieldID, __nrank); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgelsy_)(int *m, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, int *jpvt, double *rcond, int *rank, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgelsyK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jintArray jpvt, jint offsetjpvt, jdouble rcond, jobject rank, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __nrank = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; int *__njpvt = NULL; double *__nwork = NULL; + jboolean __failed = FALSE; + int __nrank = 0; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + int *__njpvt = NULL; + double *__nwork = NULL; __nrank = (*env)->GetIntField(env, rank, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dgelsy_(&m, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, __njpvt + offsetjpvt, &rcond, &__nrank, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, rank, intW_val_fieldID, __nrank); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, rank, intW_val_fieldID, __nrank); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgeql2_)(int *m, int *n, double *a, int *lda, double *tau, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeql2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dgeql2_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgeqlf_)(int *m, int *n, double *a, int *lda, double *tau, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeqlfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dgeqlf_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgeqp3_)(int *m, int *n, double *a, int *lda, int *jpvt, double *tau, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeqp3K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; int *__njpvt = NULL; double *__ntau = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + int *__njpvt = NULL; + double *__ntau = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dgeqp3_(&m, &n, __na + offseta, &lda, __njpvt + offsetjpvt, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgeqpf_)(int *m, int *n, double *a, int *lda, int *jpvt, double *tau, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeqpfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; int *__njpvt = NULL; double *__ntau = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + int *__njpvt = NULL; + double *__ntau = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dgeqpf_(&m, &n, __na + offseta, &lda, __njpvt + offsetjpvt, __ntau + offsettau, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgeqr2_)(int *m, int *n, double *a, int *lda, double *tau, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeqr2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dgeqr2_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgeqrf_)(int *m, int *n, double *a, int *lda, double *tau, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeqrfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dgeqrf_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgerfs_)(const char *trans, int *n, int *nrhs, double *a, int *lda, double *af, int *ldaf, int *ipiv, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgerfsK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; double *__naf = NULL; int *__nipiv = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ntrans = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__naf = NULL; + int *__nipiv = NULL; + double *__nb = NULL; + double *__nx = NULL; + double *__nferr = NULL; + double *__nberr = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dgerfs_(__ntrans, &n, &nrhs, __na + offseta, &lda, __naf + offsetaf, &ldaf, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgerq2_)(int *m, int *n, double *a, int *lda, double *tau, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgerq2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dgerq2_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgerqf_)(int *m, int *n, double *a, int *lda, double *tau, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgerqfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dgerqf_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgesc2_)(int *n, double *a, int *lda, double *rhs, int *ipiv, int *jpiv, double *scale); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgesc2K(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray rhs, jint offsetrhs, jintArray ipiv, jint offsetipiv, jintArray jpiv, jint offsetjpiv, jobject scale) { - jboolean failed = FALSE; - double __nscale = 0; double *__na = NULL; double *__nrhs = NULL; int *__nipiv = NULL; int *__njpiv = NULL; + jboolean __failed = FALSE; + double __nscale = 0; + double *__na = NULL; + double *__nrhs = NULL; + int *__nipiv = NULL; + int *__njpiv = NULL; __nscale = (*env)->GetDoubleField(env, scale, doubleW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nrhs = (*env)->GetPrimitiveArrayCritical(env, rhs, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__njpiv = (*env)->GetPrimitiveArrayCritical(env, jpiv, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nrhs = (*env)->GetPrimitiveArrayCritical(env, rhs, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__njpiv = (*env)->GetPrimitiveArrayCritical(env, jpiv, NULL))) { __failed = TRUE; goto done; } dgesc2_(&n, __na + offseta, &lda, __nrhs + offsetrhs, __nipiv + offsetipiv, __njpiv + offsetjpiv, &__nscale); done: - if (__njpiv) (*env)->ReleasePrimitiveArrayCritical(env, jpiv, __njpiv, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nrhs) (*env)->ReleasePrimitiveArrayCritical(env, rhs, __nrhs, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__njpiv) (*env)->ReleasePrimitiveArrayCritical(env, jpiv, __njpiv, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nrhs) (*env)->ReleasePrimitiveArrayCritical(env, rhs, __nrhs, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgesdd_)(const char *jobz, int *m, int *n, double *a, int *lda, double *s, double *u, int *ldu, double *vt, int *ldvt, double *work, int *lwork, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgesddK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray s, jint offsets, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jint ldvt, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; int __ninfo = 0; double *__na = NULL; double *__ns = NULL; double *__nu = NULL; double *__nvt = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; - if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; - if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__ns = NULL; + double *__nu = NULL; + double *__nvt = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) { __failed = TRUE; goto done; } + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dgesdd_(__njobz, &m, &n, __na + offseta, &lda, __ns + offsets, __nu + offsetu, &ldu, __nvt + offsetvt, &ldvt, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); - if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, __failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, __failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgesv_)(int *n, int *nrhs, double *a, int *lda, int *ipiv, double *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgesvK(JNIEnv *env, UNUSED jobject obj, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; int *__nipiv = NULL; double *__nb = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + int *__nipiv = NULL; + double *__nb = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } dgesv_(&n, &nrhs, __na + offseta, &lda, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgesvd_)(const char *jobu, const char *jobvt, int *m, int *n, double *a, int *lda, double *s, double *u, int *ldu, double *vt, int *ldvt, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgesvdK(JNIEnv *env, UNUSED jobject obj, jstring jobu, jstring jobvt, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray s, jint offsets, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jint ldvt, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__njobu = NULL; const char *__njobvt = NULL; int __ninfo = 0; double *__na = NULL; double *__ns = NULL; double *__nu = NULL; double *__nvt = NULL; double *__nwork = NULL; - if (!(__njobu = (*env)->GetStringUTFChars(env, jobu, NULL))) goto fail; - if (!(__njobvt = (*env)->GetStringUTFChars(env, jobvt, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; - if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; - if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobu = NULL; + const char *__njobvt = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__ns = NULL; + double *__nu = NULL; + double *__nvt = NULL; + double *__nwork = NULL; + if (!(__njobu = (*env)->GetStringUTFChars(env, jobu, NULL))) { __failed = TRUE; goto done; } + if (!(__njobvt = (*env)->GetStringUTFChars(env, jobvt, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) { __failed = TRUE; goto done; } + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dgesvd_(__njobu, __njobvt, &m, &n, __na + offseta, &lda, __ns + offsets, __nu + offsetu, &ldu, __nvt + offsetvt, &ldvt, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); - if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, __failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, __failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__njobvt) (*env)->ReleaseStringUTFChars(env, jobvt, __njobvt); if (__njobu) (*env)->ReleaseStringUTFChars(env, jobu, __njobu); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgesvx_)(const char *fact, const char *trans, int *n, int *nrhs, double *a, int *lda, double *af, int *ldaf, int *ipiv, char *equed, double *r, double *c, double *b, int *ldb, double *x, int *ldx, double *rcond, double *ferr, double *berr, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgesvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring trans, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jobject equed, jdoubleArray r, jint offsetr, jdoubleArray c, jint offsetc, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nfact = NULL; const char *__ntrans = NULL; char *__nequed = NULL; jstring __jequed = NULL;; double __nrcond = 0; int __ninfo = 0; double *__na = NULL; double *__naf = NULL; int *__nipiv = NULL; double *__nr = NULL; double *__nc = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nfact = NULL; + const char *__ntrans = NULL; + char *__nequed = NULL; jstring __jequed = NULL; + double __nrcond = 0; + int __ninfo = 0; + double *__na = NULL; + double *__naf = NULL; + int *__nipiv = NULL; + double *__nr = NULL; + double *__nc = NULL; + double *__nb = NULL; + double *__nx = NULL; + double *__nferr = NULL; + double *__nberr = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dgesvx_(__nfact, __ntrans, &n, &nrhs, __na + offseta, &lda, __naf + offsetaf, &ldaf, __nipiv + offsetipiv, __nequed, __nr + offsetr, __nc + offsetc, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); - if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!__failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgetc2_)(int *n, double *a, int *lda, int *ipiv, int *jpiv, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgetc2K(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jintArray jpiv, jint offsetjpiv, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; int *__nipiv = NULL; int *__njpiv = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__njpiv = (*env)->GetPrimitiveArrayCritical(env, jpiv, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + int *__nipiv = NULL; + int *__njpiv = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__njpiv = (*env)->GetPrimitiveArrayCritical(env, jpiv, NULL))) { __failed = TRUE; goto done; } dgetc2_(&n, __na + offseta, &lda, __nipiv + offsetipiv, __njpiv + offsetjpiv, &__ninfo); done: - if (__njpiv) (*env)->ReleasePrimitiveArrayCritical(env, jpiv, __njpiv, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__njpiv) (*env)->ReleasePrimitiveArrayCritical(env, jpiv, __njpiv, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgetf2_)(int *m, int *n, double *a, int *lda, int *ipiv, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgetf2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; int *__nipiv = NULL; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + int *__nipiv = NULL; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } dgetf2_(&m, &n, __na + offseta, &lda, __nipiv + offsetipiv, &__ninfo); done: - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgetrf_)(int *m, int *n, double *a, int *lda, int *ipiv, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgetrfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; int *__nipiv = NULL; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + int *__nipiv = NULL; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } dgetrf_(&m, &n, __na + offseta, &lda, __nipiv + offsetipiv, &__ninfo); done: - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgetri_)(int *n, double *a, int *lda, int *ipiv, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgetriK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; int *__nipiv = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + int *__nipiv = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dgetri_(&n, __na + offseta, &lda, __nipiv + offsetipiv, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgetrs_)(const char *trans, int *n, int *nrhs, double *a, int *lda, int *ipiv, double *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgetrsK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; int *__nipiv = NULL; double *__nb = NULL; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ntrans = NULL; + int __ninfo = 0; + double *__na = NULL; + int *__nipiv = NULL; + double *__nb = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } dgetrs_(__ntrans, &n, &nrhs, __na + offseta, &lda, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dggbak_)(const char *job, const char *side, int *n, int *ilo, int *ihi, double *lscale, double *rscale, int *m, double *v, int *ldv, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggbakK(JNIEnv *env, UNUSED jobject obj, jstring job, jstring side, jint n, jint ilo, jint ihi, jdoubleArray lscale, jint offsetlscale, jdoubleArray rscale, jint offsetrscale, jint m, jdoubleArray v, jint offsetv, jint ldv, jobject info) { - jboolean failed = FALSE; - const char *__njob = NULL; const char *__nside = NULL; int __ninfo = 0; double *__nlscale = NULL; double *__nrscale = NULL; double *__nv = NULL; - if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nlscale = (*env)->GetPrimitiveArrayCritical(env, lscale, NULL))) goto fail; - if (!(__nrscale = (*env)->GetPrimitiveArrayCritical(env, rscale, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njob = NULL; + const char *__nside = NULL; + int __ninfo = 0; + double *__nlscale = NULL; + double *__nrscale = NULL; + double *__nv = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) { __failed = TRUE; goto done; } + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nlscale = (*env)->GetPrimitiveArrayCritical(env, lscale, NULL))) { __failed = TRUE; goto done; } + if (!(__nrscale = (*env)->GetPrimitiveArrayCritical(env, rscale, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } dggbak_(__njob, __nside, &n, &ilo, &ihi, __nlscale + offsetlscale, __nrscale + offsetrscale, &m, __nv + offsetv, &ldv, &__ninfo); done: - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nrscale) (*env)->ReleasePrimitiveArrayCritical(env, rscale, __nrscale, failed ? JNI_ABORT : 0); - if (__nlscale) (*env)->ReleasePrimitiveArrayCritical(env, lscale, __nlscale, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nrscale) (*env)->ReleasePrimitiveArrayCritical(env, rscale, __nrscale, __failed ? JNI_ABORT : 0); + if (__nlscale) (*env)->ReleasePrimitiveArrayCritical(env, lscale, __nlscale, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dggbal_)(const char *job, int *n, double *a, int *lda, double *b, int *ldb, int *ilo, int *ihi, double *lscale, double *rscale, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggbalK(JNIEnv *env, UNUSED jobject obj, jstring job, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject ilo, jobject ihi, jdoubleArray lscale, jint offsetlscale, jdoubleArray rscale, jint offsetrscale, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__njob = NULL; int __nilo = 0; int __nihi = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nlscale = NULL; double *__nrscale = NULL; double *__nwork = NULL; - if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njob = NULL; + int __nilo = 0; + int __nihi = 0; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + double *__nlscale = NULL; + double *__nrscale = NULL; + double *__nwork = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) { __failed = TRUE; goto done; } __nilo = (*env)->GetIntField(env, ilo, intW_val_fieldID); __nihi = (*env)->GetIntField(env, ihi, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nlscale = (*env)->GetPrimitiveArrayCritical(env, lscale, NULL))) goto fail; - if (!(__nrscale = (*env)->GetPrimitiveArrayCritical(env, rscale, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nlscale = (*env)->GetPrimitiveArrayCritical(env, lscale, NULL))) { __failed = TRUE; goto done; } + if (!(__nrscale = (*env)->GetPrimitiveArrayCritical(env, rscale, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dggbal_(__njob, &n, __na + offseta, &lda, __nb + offsetb, &ldb, &__nilo, &__nihi, __nlscale + offsetlscale, __nrscale + offsetrscale, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nrscale) (*env)->ReleasePrimitiveArrayCritical(env, rscale, __nrscale, failed ? JNI_ABORT : 0); - if (__nlscale) (*env)->ReleasePrimitiveArrayCritical(env, lscale, __nlscale, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, ihi, intW_val_fieldID, __nihi); - if (!failed) (*env)->SetIntField(env, ilo, intW_val_fieldID, __nilo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nrscale) (*env)->ReleasePrimitiveArrayCritical(env, rscale, __nrscale, __failed ? JNI_ABORT : 0); + if (__nlscale) (*env)->ReleasePrimitiveArrayCritical(env, lscale, __nlscale, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, ihi, intW_val_fieldID, __nihi); + if (!__failed) (*env)->SetIntField(env, ilo, intW_val_fieldID, __nilo); if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); +} + +// static void (*dgges_)(const char *jobvsl, const char *jobvsr, const char *sort, const char *selctg, int *n, double *a, int *lda, double *b, int *ldb, int *sdim, double *alphar, double *alphai, double *beta, double *vsl, int *ldvsl, double *vsr, int *ldvsr, double *work, int *lwork, int *bwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggesK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring jobvsl, UNUSED jstring jobvsr, UNUSED jstring sort, UNUSED jstring selctg, UNUSED jint n, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jdoubleArray b, UNUSED jint offsetb, UNUSED jint ldb, UNUSED jobject sdim, UNUSED jdoubleArray alphar, UNUSED jint offsetalphar, UNUSED jdoubleArray alphai, UNUSED jint offsetalphai, UNUSED jdoubleArray beta, UNUSED jint offsetbeta, UNUSED jdoubleArray vsl, UNUSED jint offsetvsl, UNUSED jint ldvsl, UNUSED jdoubleArray vsr, UNUSED jint offsetvsr, UNUSED jint ldvsr, UNUSED jdoubleArray work, UNUSED jint offsetwork, UNUSED jint lwork, UNUSED jbooleanArray bwork, UNUSED jint offsetbwork, UNUSED jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +// static void (*dggesx_)(const char *jobvsl, const char *jobvsr, const char *sort, const char *selctg, const char *sense, int *n, double *a, int *lda, double *b, int *ldb, int *sdim, double *alphar, double *alphai, double *beta, double *vsl, int *ldvsl, double *vsr, int *ldvsr, double *rconde, double *rcondv, double *work, int *lwork, int *iwork, int *liwork, int *bwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggesxK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring jobvsl, UNUSED jstring jobvsr, UNUSED jstring sort, UNUSED jstring selctg, UNUSED jstring sense, UNUSED jint n, UNUSED jdoubleArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jdoubleArray b, UNUSED jint offsetb, UNUSED jint ldb, UNUSED jobject sdim, UNUSED jdoubleArray alphar, UNUSED jint offsetalphar, UNUSED jdoubleArray alphai, UNUSED jint offsetalphai, UNUSED jdoubleArray beta, UNUSED jint offsetbeta, UNUSED jdoubleArray vsl, UNUSED jint offsetvsl, UNUSED jint ldvsl, UNUSED jdoubleArray vsr, UNUSED jint offsetvsr, UNUSED jint ldvsr, UNUSED jdoubleArray rconde, UNUSED jint offsetrconde, UNUSED jdoubleArray rcondv, UNUSED jint offsetrcondv, UNUSED jdoubleArray work, UNUSED jint offsetwork, UNUSED jint lwork, UNUSED jintArray iwork, UNUSED jint offsetiwork, UNUSED jint liwork, UNUSED jbooleanArray bwork, UNUSED jint offsetbwork, UNUSED jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } static void (*dggev_)(const char *jobvl, const char *jobvr, int *n, double *a, int *lda, double *b, int *ldb, double *alphar, double *alphai, double *beta, double *vl, int *ldvl, double *vr, int *ldvr, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggevK(JNIEnv *env, UNUSED jobject obj, jstring jobvl, jstring jobvr, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__njobvl = NULL; const char *__njobvr = NULL; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nalphar = NULL; double *__nalphai = NULL; double *__nbeta = NULL; double *__nvl = NULL; double *__nvr = NULL; double *__nwork = NULL; - if (!(__njobvl = (*env)->GetStringUTFChars(env, jobvl, NULL))) goto fail; - if (!(__njobvr = (*env)->GetStringUTFChars(env, jobvr, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) goto fail; - if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) goto fail; - if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; - if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; - if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobvl = NULL; + const char *__njobvr = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + double *__nalphar = NULL; + double *__nalphai = NULL; + double *__nbeta = NULL; + double *__nvl = NULL; + double *__nvr = NULL; + double *__nwork = NULL; + if (!(__njobvl = (*env)->GetStringUTFChars(env, jobvl, NULL))) { __failed = TRUE; goto done; } + if (!(__njobvr = (*env)->GetStringUTFChars(env, jobvr, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) { __failed = TRUE; goto done; } + if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) { __failed = TRUE; goto done; } + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) { __failed = TRUE; goto done; } + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) { __failed = TRUE; goto done; } + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dggev_(__njobvl, __njobvr, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nalphar + offsetalphar, __nalphai + offsetalphai, __nbeta + offsetbeta, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); - if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); - if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); - if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, failed ? JNI_ABORT : 0); - if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, __failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, __failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, __failed ? JNI_ABORT : 0); + if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, __failed ? JNI_ABORT : 0); + if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__njobvr) (*env)->ReleaseStringUTFChars(env, jobvr, __njobvr); if (__njobvl) (*env)->ReleaseStringUTFChars(env, jobvl, __njobvl); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dggevx_)(const char *balanc, const char *jobvl, const char *jobvr, const char *sense, int *n, double *a, int *lda, double *b, int *ldb, double *alphar, double *alphai, double *beta, double *vl, int *ldvl, double *vr, int *ldvr, int *ilo, int *ihi, double *lscale, double *rscale, double *abnrm, double *bbnrm, double *rconde, double *rcondv, double *work, int *lwork, int *iwork, int *bwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggevxK(JNIEnv *env, UNUSED jobject obj, jstring balanc, jstring jobvl, jstring jobvr, jstring sense, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jobject ilo, jobject ihi, jdoubleArray lscale, jint offsetlscale, jdoubleArray rscale, jint offsetrscale, jobject abnrm, jobject bbnrm, jdoubleArray rconde, jint offsetrconde, jdoubleArray rcondv, jint offsetrcondv, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jbooleanArray bwork, jint offsetbwork, jobject info) { - jboolean failed = FALSE; - const char *__nbalanc = NULL; const char *__njobvl = NULL; const char *__njobvr = NULL; const char *__nsense = NULL; int __nilo = 0; int __nihi = 0; double __nabnrm = 0; double __nbbnrm = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nalphar = NULL; double *__nalphai = NULL; double *__nbeta = NULL; double *__nvl = NULL; double *__nvr = NULL; double *__nlscale = NULL; double *__nrscale = NULL; double *__nrconde = NULL; double *__nrcondv = NULL; double *__nwork = NULL; int *__niwork = NULL; jboolean *__jbwork = NULL; int *__nbwork = NULL; - if (!(__nbalanc = (*env)->GetStringUTFChars(env, balanc, NULL))) goto fail; - if (!(__njobvl = (*env)->GetStringUTFChars(env, jobvl, NULL))) goto fail; - if (!(__njobvr = (*env)->GetStringUTFChars(env, jobvr, NULL))) goto fail; - if (!(__nsense = (*env)->GetStringUTFChars(env, sense, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nbalanc = NULL; + const char *__njobvl = NULL; + const char *__njobvr = NULL; + const char *__nsense = NULL; + int __nilo = 0; + int __nihi = 0; + double __nabnrm = 0; + double __nbbnrm = 0; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + double *__nalphar = NULL; + double *__nalphai = NULL; + double *__nbeta = NULL; + double *__nvl = NULL; + double *__nvr = NULL; + double *__nlscale = NULL; + double *__nrscale = NULL; + double *__nrconde = NULL; + double *__nrcondv = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + int *__nbwork = NULL; jboolean *__jbwork = NULL; + if (!(__nbalanc = (*env)->GetStringUTFChars(env, balanc, NULL))) { __failed = TRUE; goto done; } + if (!(__njobvl = (*env)->GetStringUTFChars(env, jobvl, NULL))) { __failed = TRUE; goto done; } + if (!(__njobvr = (*env)->GetStringUTFChars(env, jobvr, NULL))) { __failed = TRUE; goto done; } + if (!(__nsense = (*env)->GetStringUTFChars(env, sense, NULL))) { __failed = TRUE; goto done; } __nilo = (*env)->GetIntField(env, ilo, intW_val_fieldID); __nihi = (*env)->GetIntField(env, ihi, intW_val_fieldID); __nabnrm = (*env)->GetDoubleField(env, abnrm, doubleW_val_fieldID); __nbbnrm = (*env)->GetDoubleField(env, bbnrm, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) goto fail; - if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) goto fail; - if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; - if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; - if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; - if (!(__nlscale = (*env)->GetPrimitiveArrayCritical(env, lscale, NULL))) goto fail; - if (!(__nrscale = (*env)->GetPrimitiveArrayCritical(env, rscale, NULL))) goto fail; - if (!(__nrconde = (*env)->GetPrimitiveArrayCritical(env, rconde, NULL))) goto fail; - if (!(__nrcondv = (*env)->GetPrimitiveArrayCritical(env, rcondv, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; - if (!(__jbwork = (*env)->GetPrimitiveArrayCritical(env, bwork, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, bwork); if (length <= 0) goto fail; if (!(__nbwork = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nbwork[i] = __jbwork[i]; } } while(0); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) { __failed = TRUE; goto done; } + if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) { __failed = TRUE; goto done; } + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) { __failed = TRUE; goto done; } + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) { __failed = TRUE; goto done; } + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) { __failed = TRUE; goto done; } + if (!(__nlscale = (*env)->GetPrimitiveArrayCritical(env, lscale, NULL))) { __failed = TRUE; goto done; } + if (!(__nrscale = (*env)->GetPrimitiveArrayCritical(env, rscale, NULL))) { __failed = TRUE; goto done; } + if (!(__nrconde = (*env)->GetPrimitiveArrayCritical(env, rconde, NULL))) { __failed = TRUE; goto done; } + if (!(__nrcondv = (*env)->GetPrimitiveArrayCritical(env, rcondv, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } + if (!(__jbwork = (*env)->GetPrimitiveArrayCritical(env, bwork, NULL))) { __failed = TRUE; goto done; } do { int length = (*env)->GetArrayLength(env, bwork); if (length <= 0) { __failed = TRUE; goto done; } if (!(__nbwork = malloc(sizeof(jboolean) * length))) { __failed = TRUE; goto done; } for (int i = 0; i < length; i++) { __nbwork[i] = __jbwork[i]; } } while(0); dggevx_(__nbalanc, __njobvl, __njobvr, __nsense, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nalphar + offsetalphar, __nalphai + offsetalphai, __nbeta + offsetbeta, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, &__nilo, &__nihi, __nlscale + offsetlscale, __nrscale + offsetrscale, &__nabnrm, &__nbbnrm, __nrconde + offsetrconde, __nrcondv + offsetrcondv, __nwork + offsetwork, &lwork, __niwork + offsetiwork, __nbwork + offsetbwork, &__ninfo); done: if (__nbwork) { free(__nbwork); } if (__jbwork) (*env)->ReleasePrimitiveArrayCritical(env, bwork, __nbwork, JNI_ABORT); - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nrcondv) (*env)->ReleasePrimitiveArrayCritical(env, rcondv, __nrcondv, failed ? JNI_ABORT : 0); - if (__nrconde) (*env)->ReleasePrimitiveArrayCritical(env, rconde, __nrconde, failed ? JNI_ABORT : 0); - if (__nrscale) (*env)->ReleasePrimitiveArrayCritical(env, rscale, __nrscale, failed ? JNI_ABORT : 0); - if (__nlscale) (*env)->ReleasePrimitiveArrayCritical(env, lscale, __nlscale, failed ? JNI_ABORT : 0); - if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); - if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); - if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); - if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, failed ? JNI_ABORT : 0); - if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, bbnrm, doubleW_val_fieldID, __nbbnrm); - if (!failed) (*env)->SetDoubleField(env, abnrm, doubleW_val_fieldID, __nabnrm); - if (!failed) (*env)->SetIntField(env, ihi, intW_val_fieldID, __nihi); - if (!failed) (*env)->SetIntField(env, ilo, intW_val_fieldID, __nilo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nrcondv) (*env)->ReleasePrimitiveArrayCritical(env, rcondv, __nrcondv, __failed ? JNI_ABORT : 0); + if (__nrconde) (*env)->ReleasePrimitiveArrayCritical(env, rconde, __nrconde, __failed ? JNI_ABORT : 0); + if (__nrscale) (*env)->ReleasePrimitiveArrayCritical(env, rscale, __nrscale, __failed ? JNI_ABORT : 0); + if (__nlscale) (*env)->ReleasePrimitiveArrayCritical(env, lscale, __nlscale, __failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, __failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, __failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, __failed ? JNI_ABORT : 0); + if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, __failed ? JNI_ABORT : 0); + if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, bbnrm, doubleW_val_fieldID, __nbbnrm); + if (!__failed) (*env)->SetDoubleField(env, abnrm, doubleW_val_fieldID, __nabnrm); + if (!__failed) (*env)->SetIntField(env, ihi, intW_val_fieldID, __nihi); + if (!__failed) (*env)->SetIntField(env, ilo, intW_val_fieldID, __nilo); if (__nsense) (*env)->ReleaseStringUTFChars(env, sense, __nsense); if (__njobvr) (*env)->ReleaseStringUTFChars(env, jobvr, __njobvr); if (__njobvl) (*env)->ReleaseStringUTFChars(env, jobvl, __njobvl); if (__nbalanc) (*env)->ReleaseStringUTFChars(env, balanc, __nbalanc); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dggglm_)(int *n, int *m, int *p, double *a, int *lda, double *b, int *ldb, double *d, double *x, double *y, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggglmK(JNIEnv *env, UNUSED jobject obj, jint n, jint m, jint p, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray d, jint offsetd, jdoubleArray x, jint offsetx, jdoubleArray y, jint offsety, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nd = NULL; double *__nx = NULL; double *__ny = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + double *__nd = NULL; + double *__nx = NULL; + double *__ny = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dggglm_(&n, &m, &p, __na + offseta, &lda, __nb + offsetb, &ldb, __nd + offsetd, __nx + offsetx, __ny + offsety, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgghrd_)(const char *compq, const char *compz, int *n, int *ilo, int *ihi, double *a, int *lda, double *b, int *ldb, double *q, int *ldq, double *z, int *ldz, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgghrdK(JNIEnv *env, UNUSED jobject obj, jstring compq, jstring compz, jint n, jint ilo, jint ihi, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray z, jint offsetz, jint ldz, jobject info) { - jboolean failed = FALSE; - const char *__ncompq = NULL; const char *__ncompz = NULL; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nq = NULL; double *__nz = NULL; - if (!(__ncompq = (*env)->GetStringUTFChars(env, compq, NULL))) goto fail; - if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ncompq = NULL; + const char *__ncompz = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + double *__nq = NULL; + double *__nz = NULL; + if (!(__ncompq = (*env)->GetStringUTFChars(env, compq, NULL))) { __failed = TRUE; goto done; } + if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } dgghrd_(__ncompq, __ncompz, &n, &ilo, &ihi, __na + offseta, &lda, __nb + offsetb, &ldb, __nq + offsetq, &ldq, __nz + offsetz, &ldz, &__ninfo); done: - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ncompz) (*env)->ReleaseStringUTFChars(env, compz, __ncompz); if (__ncompq) (*env)->ReleaseStringUTFChars(env, compq, __ncompq); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgglse_)(int *m, int *n, int *p, double *a, int *lda, double *b, int *ldb, double *c, double *d, double *x, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgglseK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint p, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray c, jint offsetc, jdoubleArray d, jint offsetd, jdoubleArray x, jint offsetx, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nc = NULL; double *__nd = NULL; double *__nx = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + double *__nc = NULL; + double *__nd = NULL; + double *__nx = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dgglse_(&m, &n, &p, __na + offseta, &lda, __nb + offsetb, &ldb, __nc + offsetc, __nd + offsetd, __nx + offsetx, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dggqrf_)(int *n, int *m, int *p, double *a, int *lda, double *taua, double *b, int *ldb, double *taub, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggqrfK(JNIEnv *env, UNUSED jobject obj, jint n, jint m, jint p, jdoubleArray a, jint offseta, jint lda, jdoubleArray taua, jint offsettaua, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray taub, jint offsettaub, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; double *__ntaua = NULL; double *__nb = NULL; double *__ntaub = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntaua = (*env)->GetPrimitiveArrayCritical(env, taua, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__ntaub = (*env)->GetPrimitiveArrayCritical(env, taub, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + double *__ntaua = NULL; + double *__nb = NULL; + double *__ntaub = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntaua = (*env)->GetPrimitiveArrayCritical(env, taua, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__ntaub = (*env)->GetPrimitiveArrayCritical(env, taub, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dggqrf_(&n, &m, &p, __na + offseta, &lda, __ntaua + offsettaua, __nb + offsetb, &ldb, __ntaub + offsettaub, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntaub) (*env)->ReleasePrimitiveArrayCritical(env, taub, __ntaub, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__ntaua) (*env)->ReleasePrimitiveArrayCritical(env, taua, __ntaua, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntaub) (*env)->ReleasePrimitiveArrayCritical(env, taub, __ntaub, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__ntaua) (*env)->ReleasePrimitiveArrayCritical(env, taua, __ntaua, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dggrqf_)(int *m, int *p, int *n, double *a, int *lda, double *taua, double *b, int *ldb, double *taub, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggrqfK(JNIEnv *env, UNUSED jobject obj, jint m, jint p, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray taua, jint offsettaua, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray taub, jint offsettaub, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; double *__ntaua = NULL; double *__nb = NULL; double *__ntaub = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntaua = (*env)->GetPrimitiveArrayCritical(env, taua, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__ntaub = (*env)->GetPrimitiveArrayCritical(env, taub, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + double *__ntaua = NULL; + double *__nb = NULL; + double *__ntaub = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntaua = (*env)->GetPrimitiveArrayCritical(env, taua, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__ntaub = (*env)->GetPrimitiveArrayCritical(env, taub, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dggrqf_(&m, &p, &n, __na + offseta, &lda, __ntaua + offsettaua, __nb + offsetb, &ldb, __ntaub + offsettaub, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntaub) (*env)->ReleasePrimitiveArrayCritical(env, taub, __ntaub, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__ntaua) (*env)->ReleasePrimitiveArrayCritical(env, taua, __ntaua, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntaub) (*env)->ReleasePrimitiveArrayCritical(env, taub, __ntaub, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__ntaua) (*env)->ReleasePrimitiveArrayCritical(env, taua, __ntaua, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dggsvd_)(const char *jobu, const char *jobv, const char *jobq, int *m, int *n, int *p, int *k, int *l, double *a, int *lda, double *b, int *ldb, double *alpha, double *beta, double *u, int *ldu, double *v, int *ldv, double *q, int *ldq, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggsvdK(JNIEnv *env, UNUSED jobject obj, jstring jobu, jstring jobv, jstring jobq, jint m, jint n, jint p, jobject k, jobject l, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray alpha, jint offsetalpha, jdoubleArray beta, jint offsetbeta, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__njobu = NULL; const char *__njobv = NULL; const char *__njobq = NULL; int __nk = 0; int __nl = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nalpha = NULL; double *__nbeta = NULL; double *__nu = NULL; double *__nv = NULL; double *__nq = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__njobu = (*env)->GetStringUTFChars(env, jobu, NULL))) goto fail; - if (!(__njobv = (*env)->GetStringUTFChars(env, jobv, NULL))) goto fail; - if (!(__njobq = (*env)->GetStringUTFChars(env, jobq, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobu = NULL; + const char *__njobv = NULL; + const char *__njobq = NULL; + int __nk = 0; + int __nl = 0; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + double *__nalpha = NULL; + double *__nbeta = NULL; + double *__nu = NULL; + double *__nv = NULL; + double *__nq = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__njobu = (*env)->GetStringUTFChars(env, jobu, NULL))) { __failed = TRUE; goto done; } + if (!(__njobv = (*env)->GetStringUTFChars(env, jobv, NULL))) { __failed = TRUE; goto done; } + if (!(__njobq = (*env)->GetStringUTFChars(env, jobq, NULL))) { __failed = TRUE; goto done; } __nk = (*env)->GetIntField(env, k, intW_val_fieldID); __nl = (*env)->GetIntField(env, l, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nalpha = (*env)->GetPrimitiveArrayCritical(env, alpha, NULL))) goto fail; - if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; - if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nalpha = (*env)->GetPrimitiveArrayCritical(env, alpha, NULL))) { __failed = TRUE; goto done; } + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) { __failed = TRUE; goto done; } + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dggsvd_(__njobu, __njobv, __njobq, &m, &n, &p, &__nk, &__nl, __na + offseta, &lda, __nb + offsetb, &ldb, __nalpha + offsetalpha, __nbeta + offsetbeta, __nu + offsetu, &ldu, __nv + offsetv, &ldv, __nq + offsetq, &ldq, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); - if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); - if (__nalpha) (*env)->ReleasePrimitiveArrayCritical(env, alpha, __nalpha, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, l, intW_val_fieldID, __nl); - if (!failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, __failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, __failed ? JNI_ABORT : 0); + if (__nalpha) (*env)->ReleasePrimitiveArrayCritical(env, alpha, __nalpha, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, l, intW_val_fieldID, __nl); + if (!__failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); if (__njobq) (*env)->ReleaseStringUTFChars(env, jobq, __njobq); if (__njobv) (*env)->ReleaseStringUTFChars(env, jobv, __njobv); if (__njobu) (*env)->ReleaseStringUTFChars(env, jobu, __njobu); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dggsvp_)(const char *jobu, const char *jobv, const char *jobq, int *m, int *p, int *n, double *a, int *lda, double *b, int *ldb, double *tola, double *tolb, int *k, int *l, double *u, int *ldu, double *v, int *ldv, double *q, int *ldq, int *iwork, double *tau, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggsvpK(JNIEnv *env, UNUSED jobject obj, jstring jobu, jstring jobv, jstring jobq, jint m, jint p, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble tola, jdouble tolb, jobject k, jobject l, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray q, jint offsetq, jint ldq, jintArray iwork, jint offsetiwork, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__njobu = NULL; const char *__njobv = NULL; const char *__njobq = NULL; int __nk = 0; int __nl = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nu = NULL; double *__nv = NULL; double *__nq = NULL; int *__niwork = NULL; double *__ntau = NULL; double *__nwork = NULL; - if (!(__njobu = (*env)->GetStringUTFChars(env, jobu, NULL))) goto fail; - if (!(__njobv = (*env)->GetStringUTFChars(env, jobv, NULL))) goto fail; - if (!(__njobq = (*env)->GetStringUTFChars(env, jobq, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobu = NULL; + const char *__njobv = NULL; + const char *__njobq = NULL; + int __nk = 0; + int __nl = 0; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + double *__nu = NULL; + double *__nv = NULL; + double *__nq = NULL; + int *__niwork = NULL; + double *__ntau = NULL; + double *__nwork = NULL; + if (!(__njobu = (*env)->GetStringUTFChars(env, jobu, NULL))) { __failed = TRUE; goto done; } + if (!(__njobv = (*env)->GetStringUTFChars(env, jobv, NULL))) { __failed = TRUE; goto done; } + if (!(__njobq = (*env)->GetStringUTFChars(env, jobq, NULL))) { __failed = TRUE; goto done; } __nk = (*env)->GetIntField(env, k, intW_val_fieldID); __nl = (*env)->GetIntField(env, l, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dggsvp_(__njobu, __njobv, __njobq, &m, &p, &n, __na + offseta, &lda, __nb + offsetb, &ldb, &tola, &tolb, &__nk, &__nl, __nu + offsetu, &ldu, __nv + offsetv, &ldv, __nq + offsetq, &ldq, __niwork + offsetiwork, __ntau + offsettau, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, l, intW_val_fieldID, __nl); - if (!failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, l, intW_val_fieldID, __nl); + if (!__failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); if (__njobq) (*env)->ReleaseStringUTFChars(env, jobq, __njobq); if (__njobv) (*env)->ReleaseStringUTFChars(env, jobv, __njobv); if (__njobu) (*env)->ReleaseStringUTFChars(env, jobu, __njobu); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgtcon_)(const char *norm, int *n, double *dl, double *d, double *du, double *du2, int *ipiv, double *anorm, double *rcond, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgtconK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nnorm = NULL; double __nrcond = 0; int __ninfo = 0; double *__ndl = NULL; double *__nd = NULL; double *__ndu = NULL; double *__ndu2 = NULL; int *__nipiv = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + double __nrcond = 0; + int __ninfo = 0; + double *__ndl = NULL; + double *__nd = NULL; + double *__ndu = NULL; + double *__ndu2 = NULL; + int *__nipiv = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; - if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) { __failed = TRUE; goto done; } + if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dgtcon_(__nnorm, &n, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __ndu2 + offsetdu2, __nipiv + offsetipiv, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, failed ? JNI_ABORT : 0); - if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, __failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgtrfs_)(const char *trans, int *n, int *nrhs, double *dl, double *d, double *du, double *dlf, double *df, double *duf, double *du2, int *ipiv, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgtrfsK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint n, jint nrhs, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray dlf, jint offsetdlf, jdoubleArray df, jint offsetdf, jdoubleArray duf, jint offsetduf, jdoubleArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__ntrans = NULL; int __ninfo = 0; double *__ndl = NULL; double *__nd = NULL; double *__ndu = NULL; double *__ndlf = NULL; double *__ndf = NULL; double *__nduf = NULL; double *__ndu2 = NULL; int *__nipiv = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; - if (!(__ndlf = (*env)->GetPrimitiveArrayCritical(env, dlf, NULL))) goto fail; - if (!(__ndf = (*env)->GetPrimitiveArrayCritical(env, df, NULL))) goto fail; - if (!(__nduf = (*env)->GetPrimitiveArrayCritical(env, duf, NULL))) goto fail; - if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ntrans = NULL; + int __ninfo = 0; + double *__ndl = NULL; + double *__nd = NULL; + double *__ndu = NULL; + double *__ndlf = NULL; + double *__ndf = NULL; + double *__nduf = NULL; + double *__ndu2 = NULL; + int *__nipiv = NULL; + double *__nb = NULL; + double *__nx = NULL; + double *__nferr = NULL; + double *__nberr = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) { __failed = TRUE; goto done; } + if (!(__ndlf = (*env)->GetPrimitiveArrayCritical(env, dlf, NULL))) { __failed = TRUE; goto done; } + if (!(__ndf = (*env)->GetPrimitiveArrayCritical(env, df, NULL))) { __failed = TRUE; goto done; } + if (!(__nduf = (*env)->GetPrimitiveArrayCritical(env, duf, NULL))) { __failed = TRUE; goto done; } + if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dgtrfs_(__ntrans, &n, &nrhs, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __ndlf + offsetdlf, __ndf + offsetdf, __nduf + offsetduf, __ndu2 + offsetdu2, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, failed ? JNI_ABORT : 0); - if (__nduf) (*env)->ReleasePrimitiveArrayCritical(env, duf, __nduf, failed ? JNI_ABORT : 0); - if (__ndf) (*env)->ReleasePrimitiveArrayCritical(env, df, __ndf, failed ? JNI_ABORT : 0); - if (__ndlf) (*env)->ReleasePrimitiveArrayCritical(env, dlf, __ndlf, failed ? JNI_ABORT : 0); - if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, __failed ? JNI_ABORT : 0); + if (__nduf) (*env)->ReleasePrimitiveArrayCritical(env, duf, __nduf, __failed ? JNI_ABORT : 0); + if (__ndf) (*env)->ReleasePrimitiveArrayCritical(env, df, __ndf, __failed ? JNI_ABORT : 0); + if (__ndlf) (*env)->ReleasePrimitiveArrayCritical(env, dlf, __ndlf, __failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgtsv_)(int *n, int *nrhs, double *dl, double *d, double *du, double *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgtsvK(JNIEnv *env, UNUSED jobject obj, jint n, jint nrhs, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__ndl = NULL; double *__nd = NULL; double *__ndu = NULL; double *__nb = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__ndl = NULL; + double *__nd = NULL; + double *__ndu = NULL; + double *__nb = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } dgtsv_(&n, &nrhs, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgtsvx_)(const char *fact, const char *trans, int *n, int *nrhs, double *dl, double *d, double *du, double *dlf, double *df, double *duf, double *du2, int *ipiv, double *b, int *ldb, double *x, int *ldx, double *rcond, double *ferr, double *berr, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgtsvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring trans, jint n, jint nrhs, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray dlf, jint offsetdlf, jdoubleArray df, jint offsetdf, jdoubleArray duf, jint offsetduf, jdoubleArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nfact = NULL; const char *__ntrans = NULL; double __nrcond = 0; int __ninfo = 0; double *__ndl = NULL; double *__nd = NULL; double *__ndu = NULL; double *__ndlf = NULL; double *__ndf = NULL; double *__nduf = NULL; double *__ndu2 = NULL; int *__nipiv = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nfact = NULL; + const char *__ntrans = NULL; + double __nrcond = 0; + int __ninfo = 0; + double *__ndl = NULL; + double *__nd = NULL; + double *__ndu = NULL; + double *__ndlf = NULL; + double *__ndf = NULL; + double *__nduf = NULL; + double *__ndu2 = NULL; + int *__nipiv = NULL; + double *__nb = NULL; + double *__nx = NULL; + double *__nferr = NULL; + double *__nberr = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; - if (!(__ndlf = (*env)->GetPrimitiveArrayCritical(env, dlf, NULL))) goto fail; - if (!(__ndf = (*env)->GetPrimitiveArrayCritical(env, df, NULL))) goto fail; - if (!(__nduf = (*env)->GetPrimitiveArrayCritical(env, duf, NULL))) goto fail; - if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) { __failed = TRUE; goto done; } + if (!(__ndlf = (*env)->GetPrimitiveArrayCritical(env, dlf, NULL))) { __failed = TRUE; goto done; } + if (!(__ndf = (*env)->GetPrimitiveArrayCritical(env, df, NULL))) { __failed = TRUE; goto done; } + if (!(__nduf = (*env)->GetPrimitiveArrayCritical(env, duf, NULL))) { __failed = TRUE; goto done; } + if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dgtsvx_(__nfact, __ntrans, &n, &nrhs, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __ndlf + offsetdlf, __ndf + offsetdf, __nduf + offsetduf, __ndu2 + offsetdu2, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, failed ? JNI_ABORT : 0); - if (__nduf) (*env)->ReleasePrimitiveArrayCritical(env, duf, __nduf, failed ? JNI_ABORT : 0); - if (__ndf) (*env)->ReleasePrimitiveArrayCritical(env, df, __ndf, failed ? JNI_ABORT : 0); - if (__ndlf) (*env)->ReleasePrimitiveArrayCritical(env, dlf, __ndlf, failed ? JNI_ABORT : 0); - if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, __failed ? JNI_ABORT : 0); + if (__nduf) (*env)->ReleasePrimitiveArrayCritical(env, duf, __nduf, __failed ? JNI_ABORT : 0); + if (__ndf) (*env)->ReleasePrimitiveArrayCritical(env, df, __ndf, __failed ? JNI_ABORT : 0); + if (__ndlf) (*env)->ReleasePrimitiveArrayCritical(env, dlf, __ndlf, __failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgttrf_)(int *n, double *dl, double *d, double *du, double *du2, int *ipiv, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgttrfK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__ndl = NULL; double *__nd = NULL; double *__ndu = NULL; double *__ndu2 = NULL; int *__nipiv = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; - if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__ndl = NULL; + double *__nd = NULL; + double *__ndu = NULL; + double *__ndu2 = NULL; + int *__nipiv = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) { __failed = TRUE; goto done; } + if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } dgttrf_(&n, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __ndu2 + offsetdu2, __nipiv + offsetipiv, &__ninfo); done: - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, failed ? JNI_ABORT : 0); - if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, __failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgttrs_)(const char *trans, int *n, int *nrhs, double *dl, double *d, double *du, double *du2, int *ipiv, double *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgttrsK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint n, jint nrhs, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__ntrans = NULL; int __ninfo = 0; double *__ndl = NULL; double *__nd = NULL; double *__ndu = NULL; double *__ndu2 = NULL; int *__nipiv = NULL; double *__nb = NULL; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; - if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ntrans = NULL; + int __ninfo = 0; + double *__ndl = NULL; + double *__nd = NULL; + double *__ndu = NULL; + double *__ndu2 = NULL; + int *__nipiv = NULL; + double *__nb = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) { __failed = TRUE; goto done; } + if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } dgttrs_(__ntrans, &n, &nrhs, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __ndu2 + offsetdu2, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, failed ? JNI_ABORT : 0); - if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, __failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgtts2_)(int *itrans, int *n, int *nrhs, double *dl, double *d, double *du, double *du2, int *ipiv, double *b, int *ldb); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgtts2K(JNIEnv *env, UNUSED jobject obj, jint itrans, jint n, jint nrhs, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb) { - jboolean failed = FALSE; - double *__ndl = NULL; double *__nd = NULL; double *__ndu = NULL; double *__ndu2 = NULL; int *__nipiv = NULL; double *__nb = NULL; - if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; - if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + double *__ndl = NULL; + double *__nd = NULL; + double *__ndu = NULL; + double *__ndu2 = NULL; + int *__nipiv = NULL; + double *__nb = NULL; + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) { __failed = TRUE; goto done; } + if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } dgtts2_(&itrans, &n, &nrhs, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __ndu2 + offsetdu2, __nipiv + offsetipiv, __nb + offsetb, &ldb); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, failed ? JNI_ABORT : 0); - if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, __failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dhgeqz_)(const char *job, const char *compq, const char *compz, int *n, int *ilo, int *ihi, double *h, int *ldh, double *t, int *ldt, double *alphar, double *alphai, double *beta, double *q, int *ldq, double *z, int *ldz, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dhgeqzK(JNIEnv *env, UNUSED jobject obj, jstring job, jstring compq, jstring compz, jint n, jint ilo, jint ihi, jdoubleArray h, jint offseth, jint ldh, jdoubleArray t, jint offsett, jint ldt, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__njob = NULL; const char *__ncompq = NULL; const char *__ncompz = NULL; int __ninfo = 0; double *__nh = NULL; double *__nt = NULL; double *__nalphar = NULL; double *__nalphai = NULL; double *__nbeta = NULL; double *__nq = NULL; double *__nz = NULL; double *__nwork = NULL; - if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; - if (!(__ncompq = (*env)->GetStringUTFChars(env, compq, NULL))) goto fail; - if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; - if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) goto fail; - if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) goto fail; - if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njob = NULL; + const char *__ncompq = NULL; + const char *__ncompz = NULL; + int __ninfo = 0; + double *__nh = NULL; + double *__nt = NULL; + double *__nalphar = NULL; + double *__nalphai = NULL; + double *__nbeta = NULL; + double *__nq = NULL; + double *__nz = NULL; + double *__nwork = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) { __failed = TRUE; goto done; } + if (!(__ncompq = (*env)->GetStringUTFChars(env, compq, NULL))) { __failed = TRUE; goto done; } + if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) { __failed = TRUE; goto done; } + if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) { __failed = TRUE; goto done; } + if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) { __failed = TRUE; goto done; } + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dhgeqz_(__njob, __ncompq, __ncompz, &n, &ilo, &ihi, __nh + offseth, &ldh, __nt + offsett, &ldt, __nalphar + offsetalphar, __nalphai + offsetalphai, __nbeta + offsetbeta, __nq + offsetq, &ldq, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); - if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, failed ? JNI_ABORT : 0); - if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, failed ? JNI_ABORT : 0); - if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, __failed ? JNI_ABORT : 0); + if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, __failed ? JNI_ABORT : 0); + if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, __failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ncompz) (*env)->ReleaseStringUTFChars(env, compz, __ncompz); if (__ncompq) (*env)->ReleaseStringUTFChars(env, compq, __ncompq); if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dhsein_)(const char *side, const char *eigsrc, const char *initv, int *select, int *n, double *h, int *ldh, double *wr, double *wi, double *vl, int *ldvl, double *vr, int *ldvr, int *mm, int *m, double *work, int *ifaill, int *ifailr, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dhseinK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring eigsrc, jstring initv, jbooleanArray select, jint offsetselect, jint n, jdoubleArray h, jint offseth, jint ldh, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jint mm, jobject m, jdoubleArray work, jint offsetwork, jintArray ifaill, jint offsetifaill, jintArray ifailr, jint offsetifailr, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__neigsrc = NULL; const char *__ninitv = NULL; int __nm = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; double *__nh = NULL; double *__nwr = NULL; double *__nwi = NULL; double *__nvl = NULL; double *__nvr = NULL; double *__nwork = NULL; int *__nifaill = NULL; int *__nifailr = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__neigsrc = (*env)->GetStringUTFChars(env, eigsrc, NULL))) goto fail; - if (!(__ninitv = (*env)->GetStringUTFChars(env, initv, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__neigsrc = NULL; + const char *__ninitv = NULL; + int __nm = 0; + int __ninfo = 0; + int *__nselect = NULL; jboolean *__jselect = NULL; + double *__nh = NULL; + double *__nwr = NULL; + double *__nwi = NULL; + double *__nvl = NULL; + double *__nvr = NULL; + double *__nwork = NULL; + int *__nifaill = NULL; + int *__nifailr = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__neigsrc = (*env)->GetStringUTFChars(env, eigsrc, NULL))) { __failed = TRUE; goto done; } + if (!(__ninitv = (*env)->GetStringUTFChars(env, initv, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; - if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; - if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; - if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__nifaill = (*env)->GetPrimitiveArrayCritical(env, ifaill, NULL))) goto fail; - if (!(__nifailr = (*env)->GetPrimitiveArrayCritical(env, ifailr, NULL))) goto fail; + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { __failed = TRUE; goto done; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) { __failed = TRUE; goto done; } if (!(__nselect = malloc(sizeof(jboolean) * length))) { __failed = TRUE; goto done; } for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) { __failed = TRUE; goto done; } + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) { __failed = TRUE; goto done; } + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__nifaill = (*env)->GetPrimitiveArrayCritical(env, ifaill, NULL))) { __failed = TRUE; goto done; } + if (!(__nifailr = (*env)->GetPrimitiveArrayCritical(env, ifailr, NULL))) { __failed = TRUE; goto done; } dhsein_(__nside, __neigsrc, __ninitv, __nselect + offsetselect, &n, __nh + offseth, &ldh, __nwr + offsetwr, __nwi + offsetwi, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, &mm, &__nm, __nwork + offsetwork, __nifaill + offsetifaill, __nifailr + offsetifailr, &__ninfo); done: - if (__nifailr) (*env)->ReleasePrimitiveArrayCritical(env, ifailr, __nifailr, failed ? JNI_ABORT : 0); - if (__nifaill) (*env)->ReleasePrimitiveArrayCritical(env, ifaill, __nifaill, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); - if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); - if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); - if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (__nifailr) (*env)->ReleasePrimitiveArrayCritical(env, ifailr, __nifailr, __failed ? JNI_ABORT : 0); + if (__nifaill) (*env)->ReleasePrimitiveArrayCritical(env, ifaill, __nifaill, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, __failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, __failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, __failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__ninitv) (*env)->ReleaseStringUTFChars(env, initv, __ninitv); if (__neigsrc) (*env)->ReleaseStringUTFChars(env, eigsrc, __neigsrc); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dhseqr_)(const char *job, const char *compz, int *n, int *ilo, int *ihi, double *h, int *ldh, double *wr, double *wi, double *z, int *ldz, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dhseqrK(JNIEnv *env, UNUSED jobject obj, jstring job, jstring compz, jint n, jint ilo, jint ihi, jdoubleArray h, jint offseth, jint ldh, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__njob = NULL; const char *__ncompz = NULL; int __ninfo = 0; double *__nh = NULL; double *__nwr = NULL; double *__nwi = NULL; double *__nz = NULL; double *__nwork = NULL; - if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; - if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; - if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njob = NULL; + const char *__ncompz = NULL; + int __ninfo = 0; + double *__nh = NULL; + double *__nwr = NULL; + double *__nwi = NULL; + double *__nz = NULL; + double *__nwork = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) { __failed = TRUE; goto done; } + if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dhseqr_(__njob, __ncompz, &n, &ilo, &ihi, __nh + offseth, &ldh, __nwr + offsetwr, __nwi + offsetwi, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); - if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, __failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ncompz) (*env)->ReleaseStringUTFChars(env, compz, __ncompz); if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static int (*disnan_)(double *din); jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_disnanK(JNIEnv *env, UNUSED jobject obj, jdouble din) { - jboolean __ret; - jboolean failed = FALSE; - - + jboolean __ret = 0; + jboolean __failed = FALSE; __ret = disnan_(&din); done: - - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static void (*dlabad_)(double *small, double *large); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlabadK(JNIEnv *env, UNUSED jobject obj, jobject small, jobject large) { - jboolean failed = FALSE; - double __nsmall = 0; double __nlarge = 0; + jboolean __failed = FALSE; + double __nsmall = 0; + double __nlarge = 0; __nsmall = (*env)->GetDoubleField(env, small, doubleW_val_fieldID); __nlarge = (*env)->GetDoubleField(env, large, doubleW_val_fieldID); dlabad_(&__nsmall, &__nlarge); done: - if (!failed) (*env)->SetDoubleField(env, large, doubleW_val_fieldID, __nlarge); - if (!failed) (*env)->SetDoubleField(env, small, doubleW_val_fieldID, __nsmall); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetDoubleField(env, large, doubleW_val_fieldID, __nlarge); + if (!__failed) (*env)->SetDoubleField(env, small, doubleW_val_fieldID, __nsmall); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlabrd_)(int *m, int *n, int *nb, double *a, int *lda, double *d, double *e, double *tauq, double *taup, double *x, int *ldx, double *y, int *ldy); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlabrdK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint nb, jdoubleArray a, jint offseta, jint lda, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray tauq, jint offsettauq, jdoubleArray taup, jint offsettaup, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray y, jint offsety, jint ldy) { - jboolean failed = FALSE; - double *__na = NULL; double *__nd = NULL; double *__ne = NULL; double *__ntauq = NULL; double *__ntaup = NULL; double *__nx = NULL; double *__ny = NULL; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__ntauq = (*env)->GetPrimitiveArrayCritical(env, tauq, NULL))) goto fail; - if (!(__ntaup = (*env)->GetPrimitiveArrayCritical(env, taup, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + jboolean __failed = FALSE; + double *__na = NULL; + double *__nd = NULL; + double *__ne = NULL; + double *__ntauq = NULL; + double *__ntaup = NULL; + double *__nx = NULL; + double *__ny = NULL; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__ntauq = (*env)->GetPrimitiveArrayCritical(env, tauq, NULL))) { __failed = TRUE; goto done; } + if (!(__ntaup = (*env)->GetPrimitiveArrayCritical(env, taup, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } dlabrd_(&m, &n, &nb, __na + offseta, &lda, __nd + offsetd, __ne + offsete, __ntauq + offsettauq, __ntaup + offsettaup, __nx + offsetx, &ldx, __ny + offsety, &ldy); done: - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__ntaup) (*env)->ReleasePrimitiveArrayCritical(env, taup, __ntaup, failed ? JNI_ABORT : 0); - if (__ntauq) (*env)->ReleasePrimitiveArrayCritical(env, tauq, __ntauq, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__ntaup) (*env)->ReleasePrimitiveArrayCritical(env, taup, __ntaup, __failed ? JNI_ABORT : 0); + if (__ntauq) (*env)->ReleasePrimitiveArrayCritical(env, tauq, __ntauq, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlacn2_)(int *n, double *v, double *x, int *isgn, double *est, int *kase, int *isave); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlacn2K(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray v, jint offsetv, jdoubleArray x, jint offsetx, jintArray isgn, jint offsetisgn, jobject est, jobject kase, jintArray isave, jint offsetisave) { - jboolean failed = FALSE; - double __nest = 0; int __nkase = 0; double *__nv = NULL; double *__nx = NULL; int *__nisgn = NULL; int *__nisave = NULL; + jboolean __failed = FALSE; + double __nest = 0; + int __nkase = 0; + double *__nv = NULL; + double *__nx = NULL; + int *__nisgn = NULL; + int *__nisave = NULL; __nest = (*env)->GetDoubleField(env, est, doubleW_val_fieldID); __nkase = (*env)->GetIntField(env, kase, intW_val_fieldID); - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nisgn = (*env)->GetPrimitiveArrayCritical(env, isgn, NULL))) goto fail; - if (!(__nisave = (*env)->GetPrimitiveArrayCritical(env, isave, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nisgn = (*env)->GetPrimitiveArrayCritical(env, isgn, NULL))) { __failed = TRUE; goto done; } + if (!(__nisave = (*env)->GetPrimitiveArrayCritical(env, isave, NULL))) { __failed = TRUE; goto done; } dlacn2_(&n, __nv + offsetv, __nx + offsetx, __nisgn + offsetisgn, &__nest, &__nkase, __nisave + offsetisave); done: - if (__nisave) (*env)->ReleasePrimitiveArrayCritical(env, isave, __nisave, failed ? JNI_ABORT : 0); - if (__nisgn) (*env)->ReleasePrimitiveArrayCritical(env, isgn, __nisgn, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, kase, intW_val_fieldID, __nkase); - if (!failed) (*env)->SetDoubleField(env, est, doubleW_val_fieldID, __nest); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nisave) (*env)->ReleasePrimitiveArrayCritical(env, isave, __nisave, __failed ? JNI_ABORT : 0); + if (__nisgn) (*env)->ReleasePrimitiveArrayCritical(env, isgn, __nisgn, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, kase, intW_val_fieldID, __nkase); + if (!__failed) (*env)->SetDoubleField(env, est, doubleW_val_fieldID, __nest); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlacon_)(int *n, double *v, double *x, int *isgn, double *est, int *kase); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaconK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray v, jint offsetv, jdoubleArray x, jint offsetx, jintArray isgn, jint offsetisgn, jobject est, jobject kase) { - jboolean failed = FALSE; - double __nest = 0; int __nkase = 0; double *__nv = NULL; double *__nx = NULL; int *__nisgn = NULL; + jboolean __failed = FALSE; + double __nest = 0; + int __nkase = 0; + double *__nv = NULL; + double *__nx = NULL; + int *__nisgn = NULL; __nest = (*env)->GetDoubleField(env, est, doubleW_val_fieldID); __nkase = (*env)->GetIntField(env, kase, intW_val_fieldID); - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nisgn = (*env)->GetPrimitiveArrayCritical(env, isgn, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nisgn = (*env)->GetPrimitiveArrayCritical(env, isgn, NULL))) { __failed = TRUE; goto done; } dlacon_(&n, __nv + offsetv, __nx + offsetx, __nisgn + offsetisgn, &__nest, &__nkase); done: - if (__nisgn) (*env)->ReleasePrimitiveArrayCritical(env, isgn, __nisgn, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, kase, intW_val_fieldID, __nkase); - if (!failed) (*env)->SetDoubleField(env, est, doubleW_val_fieldID, __nest); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nisgn) (*env)->ReleasePrimitiveArrayCritical(env, isgn, __nisgn, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, kase, intW_val_fieldID, __nkase); + if (!__failed) (*env)->SetDoubleField(env, est, doubleW_val_fieldID, __nest); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlacpy_)(const char *uplo, int *m, int *n, double *a, int *lda, double *b, int *ldb); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlacpyK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb) { - jboolean failed = FALSE; - const char *__nuplo = NULL; double *__na = NULL; double *__nb = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + double *__na = NULL; + double *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } dlacpy_(__nuplo, &m, &n, __na + offseta, &lda, __nb + offsetb, &ldb); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dladiv_)(double *a, double *b, double *c, double *d, double *p, double *q); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dladivK(JNIEnv *env, UNUSED jobject obj, jdouble a, jdouble b, jdouble c, jdouble d, jobject p, jobject q) { - jboolean failed = FALSE; - double __np = 0; double __nq = 0; + jboolean __failed = FALSE; + double __np = 0; + double __nq = 0; __np = (*env)->GetDoubleField(env, p, doubleW_val_fieldID); __nq = (*env)->GetDoubleField(env, q, doubleW_val_fieldID); dladiv_(&a, &b, &c, &d, &__np, &__nq); done: - if (!failed) (*env)->SetDoubleField(env, q, doubleW_val_fieldID, __nq); - if (!failed) (*env)->SetDoubleField(env, p, doubleW_val_fieldID, __np); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetDoubleField(env, q, doubleW_val_fieldID, __nq); + if (!__failed) (*env)->SetDoubleField(env, p, doubleW_val_fieldID, __np); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlae2_)(double *a, double *b, double *c, double *rt1, double *rt2); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlae2K(JNIEnv *env, UNUSED jobject obj, jdouble a, jdouble b, jdouble c, jobject rt1, jobject rt2) { - jboolean failed = FALSE; - double __nrt1 = 0; double __nrt2 = 0; + jboolean __failed = FALSE; + double __nrt1 = 0; + double __nrt2 = 0; __nrt1 = (*env)->GetDoubleField(env, rt1, doubleW_val_fieldID); __nrt2 = (*env)->GetDoubleField(env, rt2, doubleW_val_fieldID); dlae2_(&a, &b, &c, &__nrt1, &__nrt2); done: - if (!failed) (*env)->SetDoubleField(env, rt2, doubleW_val_fieldID, __nrt2); - if (!failed) (*env)->SetDoubleField(env, rt1, doubleW_val_fieldID, __nrt1); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetDoubleField(env, rt2, doubleW_val_fieldID, __nrt2); + if (!__failed) (*env)->SetDoubleField(env, rt1, doubleW_val_fieldID, __nrt1); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaebz_)(int *ijob, int *nitmax, int *n, int *mmax, int *minp, int *nbmin, double *abstol, double *reltol, double *pivmin, double *d, double *e, double *e2, int *nval, double *ab, double *c, int *mout, int *nab, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaebzK(JNIEnv *env, UNUSED jobject obj, jint ijob, jint nitmax, jint n, jint mmax, jint minp, jint nbmin, jdouble abstol, jdouble reltol, jdouble pivmin, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray e2, jint offsete2, jintArray nval, jint offsetnval, jdoubleArray ab, jint offsetab, jdoubleArray c, jint offsetc, jobject mout, jintArray nab, jint offsetnab, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - int __nmout = 0; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__ne2 = NULL; int *__nnval = NULL; double *__nab = NULL; double *__nc = NULL; int *__nnab = NULL; double *__nwork = NULL; int *__niwork = NULL; + jboolean __failed = FALSE; + int __nmout = 0; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; + double *__ne2 = NULL; + int *__nnval = NULL; + double *__nab = NULL; + double *__nc = NULL; + int *__nnab = NULL; + double *__nwork = NULL; + int *__niwork = NULL; __nmout = (*env)->GetIntField(env, mout, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) goto fail; - if (!(__nnval = (*env)->GetPrimitiveArrayCritical(env, nval, NULL))) goto fail; - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nnab = (*env)->GetPrimitiveArrayCritical(env, nab, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) { __failed = TRUE; goto done; } + if (!(__nnval = (*env)->GetPrimitiveArrayCritical(env, nval, NULL))) { __failed = TRUE; goto done; } + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nnab = (*env)->GetPrimitiveArrayCritical(env, nab, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dlaebz_(&ijob, &nitmax, &n, &mmax, &minp, &nbmin, &abstol, &reltol, &pivmin, __nd + offsetd, __ne + offsete, __ne2 + offsete2, __nnval + offsetnval, __nab + offsetab, __nc + offsetc, &__nmout, __nnab + offsetnab, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nnab) (*env)->ReleasePrimitiveArrayCritical(env, nab, __nnab, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (__nnval) (*env)->ReleasePrimitiveArrayCritical(env, nval, __nnval, failed ? JNI_ABORT : 0); - if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, mout, intW_val_fieldID, __nmout); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nnab) (*env)->ReleasePrimitiveArrayCritical(env, nab, __nnab, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (__nnval) (*env)->ReleasePrimitiveArrayCritical(env, nval, __nnval, __failed ? JNI_ABORT : 0); + if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, mout, intW_val_fieldID, __nmout); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaed0_)(int *icompq, int *qsiz, int *n, double *d, double *e, double *q, int *ldq, double *qstore, int *ldqs, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed0K(JNIEnv *env, UNUSED jobject obj, jint icompq, jint qsiz, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray qstore, jint offsetqstore, jint ldqs, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nq = NULL; double *__nqstore = NULL; double *__nwork = NULL; int *__niwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nqstore = (*env)->GetPrimitiveArrayCritical(env, qstore, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; + double *__nq = NULL; + double *__nqstore = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nqstore = (*env)->GetPrimitiveArrayCritical(env, qstore, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dlaed0_(&icompq, &qsiz, &n, __nd + offsetd, __ne + offsete, __nq + offsetq, &ldq, __nqstore + offsetqstore, &ldqs, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nqstore) (*env)->ReleasePrimitiveArrayCritical(env, qstore, __nqstore, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nqstore) (*env)->ReleasePrimitiveArrayCritical(env, qstore, __nqstore, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaed1_)(int *n, double *d, double *q, int *ldq, int *indxq, double *rho, int *cutpnt, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed1K(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray d, jint offsetd, jdoubleArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jint cutpnt, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - double __nrho = 0; int __ninfo = 0; double *__nd = NULL; double *__nq = NULL; int *__nindxq = NULL; double *__nwork = NULL; int *__niwork = NULL; + jboolean __failed = FALSE; + double __nrho = 0; + int __ninfo = 0; + double *__nd = NULL; + double *__nq = NULL; + int *__nindxq = NULL; + double *__nwork = NULL; + int *__niwork = NULL; __nrho = (*env)->GetDoubleField(env, rho, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nindxq = (*env)->GetPrimitiveArrayCritical(env, indxq, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nindxq = (*env)->GetPrimitiveArrayCritical(env, indxq, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dlaed1_(&n, __nd + offsetd, __nq + offsetq, &ldq, __nindxq + offsetindxq, &__nrho, &cutpnt, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nindxq) (*env)->ReleasePrimitiveArrayCritical(env, indxq, __nindxq, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, rho, doubleW_val_fieldID, __nrho); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nindxq) (*env)->ReleasePrimitiveArrayCritical(env, indxq, __nindxq, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, rho, doubleW_val_fieldID, __nrho); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaed2_)(int *k, int *n, int *n1, double *d, double *q, int *ldq, int *indxq, double *rho, double *z, double *dlamda, double *w, double *q2, int *indx, int *indxc, int *indxp, int *coltyp, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed2K(JNIEnv *env, UNUSED jobject obj, jobject k, jint n, jint n1, jdoubleArray d, jint offsetd, jdoubleArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jdoubleArray z, jint offsetz, jdoubleArray dlamda, jint offsetdlamda, jdoubleArray w, jint offsetw, jdoubleArray q2, jint offsetq2, jintArray indx, jint offsetindx, jintArray indxc, jint offsetindxc, jintArray indxp, jint offsetindxp, jintArray coltyp, jint offsetcoltyp, jobject info) { - jboolean failed = FALSE; - int __nk = 0; double __nrho = 0; int __ninfo = 0; double *__nd = NULL; double *__nq = NULL; int *__nindxq = NULL; double *__nz = NULL; double *__ndlamda = NULL; double *__nw = NULL; double *__nq2 = NULL; int *__nindx = NULL; int *__nindxc = NULL; int *__nindxp = NULL; int *__ncoltyp = NULL; + jboolean __failed = FALSE; + int __nk = 0; + double __nrho = 0; + int __ninfo = 0; + double *__nd = NULL; + double *__nq = NULL; + int *__nindxq = NULL; + double *__nz = NULL; + double *__ndlamda = NULL; + double *__nw = NULL; + double *__nq2 = NULL; + int *__nindx = NULL; + int *__nindxc = NULL; + int *__nindxp = NULL; + int *__ncoltyp = NULL; __nk = (*env)->GetIntField(env, k, intW_val_fieldID); __nrho = (*env)->GetDoubleField(env, rho, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nindxq = (*env)->GetPrimitiveArrayCritical(env, indxq, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__ndlamda = (*env)->GetPrimitiveArrayCritical(env, dlamda, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nq2 = (*env)->GetPrimitiveArrayCritical(env, q2, NULL))) goto fail; - if (!(__nindx = (*env)->GetPrimitiveArrayCritical(env, indx, NULL))) goto fail; - if (!(__nindxc = (*env)->GetPrimitiveArrayCritical(env, indxc, NULL))) goto fail; - if (!(__nindxp = (*env)->GetPrimitiveArrayCritical(env, indxp, NULL))) goto fail; - if (!(__ncoltyp = (*env)->GetPrimitiveArrayCritical(env, coltyp, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nindxq = (*env)->GetPrimitiveArrayCritical(env, indxq, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__ndlamda = (*env)->GetPrimitiveArrayCritical(env, dlamda, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nq2 = (*env)->GetPrimitiveArrayCritical(env, q2, NULL))) { __failed = TRUE; goto done; } + if (!(__nindx = (*env)->GetPrimitiveArrayCritical(env, indx, NULL))) { __failed = TRUE; goto done; } + if (!(__nindxc = (*env)->GetPrimitiveArrayCritical(env, indxc, NULL))) { __failed = TRUE; goto done; } + if (!(__nindxp = (*env)->GetPrimitiveArrayCritical(env, indxp, NULL))) { __failed = TRUE; goto done; } + if (!(__ncoltyp = (*env)->GetPrimitiveArrayCritical(env, coltyp, NULL))) { __failed = TRUE; goto done; } dlaed2_(&__nk, &n, &n1, __nd + offsetd, __nq + offsetq, &ldq, __nindxq + offsetindxq, &__nrho, __nz + offsetz, __ndlamda + offsetdlamda, __nw + offsetw, __nq2 + offsetq2, __nindx + offsetindx, __nindxc + offsetindxc, __nindxp + offsetindxp, __ncoltyp + offsetcoltyp, &__ninfo); done: - if (__ncoltyp) (*env)->ReleasePrimitiveArrayCritical(env, coltyp, __ncoltyp, failed ? JNI_ABORT : 0); - if (__nindxp) (*env)->ReleasePrimitiveArrayCritical(env, indxp, __nindxp, failed ? JNI_ABORT : 0); - if (__nindxc) (*env)->ReleasePrimitiveArrayCritical(env, indxc, __nindxc, failed ? JNI_ABORT : 0); - if (__nindx) (*env)->ReleasePrimitiveArrayCritical(env, indx, __nindx, failed ? JNI_ABORT : 0); - if (__nq2) (*env)->ReleasePrimitiveArrayCritical(env, q2, __nq2, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__ndlamda) (*env)->ReleasePrimitiveArrayCritical(env, dlamda, __ndlamda, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nindxq) (*env)->ReleasePrimitiveArrayCritical(env, indxq, __nindxq, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, rho, doubleW_val_fieldID, __nrho); - if (!failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ncoltyp) (*env)->ReleasePrimitiveArrayCritical(env, coltyp, __ncoltyp, __failed ? JNI_ABORT : 0); + if (__nindxp) (*env)->ReleasePrimitiveArrayCritical(env, indxp, __nindxp, __failed ? JNI_ABORT : 0); + if (__nindxc) (*env)->ReleasePrimitiveArrayCritical(env, indxc, __nindxc, __failed ? JNI_ABORT : 0); + if (__nindx) (*env)->ReleasePrimitiveArrayCritical(env, indx, __nindx, __failed ? JNI_ABORT : 0); + if (__nq2) (*env)->ReleasePrimitiveArrayCritical(env, q2, __nq2, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__ndlamda) (*env)->ReleasePrimitiveArrayCritical(env, dlamda, __ndlamda, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nindxq) (*env)->ReleasePrimitiveArrayCritical(env, indxq, __nindxq, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, rho, doubleW_val_fieldID, __nrho); + if (!__failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaed3_)(int *k, int *n, int *n1, double *d, double *q, int *ldq, double *rho, double *dlamda, double *q2, int *indx, int *ctot, double *w, double *s, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed3K(JNIEnv *env, UNUSED jobject obj, jint k, jint n, jint n1, jdoubleArray d, jint offsetd, jdoubleArray q, jint offsetq, jint ldq, jdouble rho, jdoubleArray dlamda, jint offsetdlamda, jdoubleArray q2, jint offsetq2, jintArray indx, jint offsetindx, jintArray ctot, jint offsetctot, jdoubleArray w, jint offsetw, jdoubleArray s, jint offsets, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__nd = NULL; double *__nq = NULL; double *__ndlamda = NULL; double *__nq2 = NULL; int *__nindx = NULL; int *__nctot = NULL; double *__nw = NULL; double *__ns = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__ndlamda = (*env)->GetPrimitiveArrayCritical(env, dlamda, NULL))) goto fail; - if (!(__nq2 = (*env)->GetPrimitiveArrayCritical(env, q2, NULL))) goto fail; - if (!(__nindx = (*env)->GetPrimitiveArrayCritical(env, indx, NULL))) goto fail; - if (!(__nctot = (*env)->GetPrimitiveArrayCritical(env, ctot, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__nd = NULL; + double *__nq = NULL; + double *__ndlamda = NULL; + double *__nq2 = NULL; + int *__nindx = NULL; + int *__nctot = NULL; + double *__nw = NULL; + double *__ns = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__ndlamda = (*env)->GetPrimitiveArrayCritical(env, dlamda, NULL))) { __failed = TRUE; goto done; } + if (!(__nq2 = (*env)->GetPrimitiveArrayCritical(env, q2, NULL))) { __failed = TRUE; goto done; } + if (!(__nindx = (*env)->GetPrimitiveArrayCritical(env, indx, NULL))) { __failed = TRUE; goto done; } + if (!(__nctot = (*env)->GetPrimitiveArrayCritical(env, ctot, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } dlaed3_(&k, &n, &n1, __nd + offsetd, __nq + offsetq, &ldq, &rho, __ndlamda + offsetdlamda, __nq2 + offsetq2, __nindx + offsetindx, __nctot + offsetctot, __nw + offsetw, __ns + offsets, &__ninfo); done: - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nctot) (*env)->ReleasePrimitiveArrayCritical(env, ctot, __nctot, failed ? JNI_ABORT : 0); - if (__nindx) (*env)->ReleasePrimitiveArrayCritical(env, indx, __nindx, failed ? JNI_ABORT : 0); - if (__nq2) (*env)->ReleasePrimitiveArrayCritical(env, q2, __nq2, failed ? JNI_ABORT : 0); - if (__ndlamda) (*env)->ReleasePrimitiveArrayCritical(env, dlamda, __ndlamda, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nctot) (*env)->ReleasePrimitiveArrayCritical(env, ctot, __nctot, __failed ? JNI_ABORT : 0); + if (__nindx) (*env)->ReleasePrimitiveArrayCritical(env, indx, __nindx, __failed ? JNI_ABORT : 0); + if (__nq2) (*env)->ReleasePrimitiveArrayCritical(env, q2, __nq2, __failed ? JNI_ABORT : 0); + if (__ndlamda) (*env)->ReleasePrimitiveArrayCritical(env, dlamda, __ndlamda, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaed4_)(int *n, int *i, double *d, double *z, double *delta, double *rho, double *dlam, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed4K(JNIEnv *env, UNUSED jobject obj, jint n, jint i, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdoubleArray delta, jint offsetdelta, jdouble rho, jobject dlam, jobject info) { - jboolean failed = FALSE; - double __ndlam = 0; int __ninfo = 0; double *__nd = NULL; double *__nz = NULL; double *__ndelta = NULL; + jboolean __failed = FALSE; + double __ndlam = 0; + int __ninfo = 0; + double *__nd = NULL; + double *__nz = NULL; + double *__ndelta = NULL; __ndlam = (*env)->GetDoubleField(env, dlam, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__ndelta = (*env)->GetPrimitiveArrayCritical(env, delta, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__ndelta = (*env)->GetPrimitiveArrayCritical(env, delta, NULL))) { __failed = TRUE; goto done; } dlaed4_(&n, &i, __nd + offsetd, __nz + offsetz, __ndelta + offsetdelta, &rho, &__ndlam, &__ninfo); done: - if (__ndelta) (*env)->ReleasePrimitiveArrayCritical(env, delta, __ndelta, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, dlam, doubleW_val_fieldID, __ndlam); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ndelta) (*env)->ReleasePrimitiveArrayCritical(env, delta, __ndelta, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, dlam, doubleW_val_fieldID, __ndlam); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaed5_)(int *i, double *d, double *z, double *delta, double *rho, double *dlam); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed5K(JNIEnv *env, UNUSED jobject obj, jint i, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdoubleArray delta, jint offsetdelta, jdouble rho, jobject dlam) { - jboolean failed = FALSE; - double __ndlam = 0; double *__nd = NULL; double *__nz = NULL; double *__ndelta = NULL; + jboolean __failed = FALSE; + double __ndlam = 0; + double *__nd = NULL; + double *__nz = NULL; + double *__ndelta = NULL; __ndlam = (*env)->GetDoubleField(env, dlam, doubleW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__ndelta = (*env)->GetPrimitiveArrayCritical(env, delta, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__ndelta = (*env)->GetPrimitiveArrayCritical(env, delta, NULL))) { __failed = TRUE; goto done; } dlaed5_(&i, __nd + offsetd, __nz + offsetz, __ndelta + offsetdelta, &rho, &__ndlam); done: - if (__ndelta) (*env)->ReleasePrimitiveArrayCritical(env, delta, __ndelta, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetDoubleField(env, dlam, doubleW_val_fieldID, __ndlam); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ndelta) (*env)->ReleasePrimitiveArrayCritical(env, delta, __ndelta, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetDoubleField(env, dlam, doubleW_val_fieldID, __ndlam); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaed6_)(int *kniter, int *orgati, double *rho, double *d, double *z, double *finit, double *tau, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed6K(JNIEnv *env, UNUSED jobject obj, jint kniter, jboolean orgati, jdouble rho, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdouble finit, jobject tau, jobject info) { - jboolean failed = FALSE; - int __norgati; double __ntau = 0; int __ninfo = 0; double *__nd = NULL; double *__nz = NULL; + jboolean __failed = FALSE; + int __norgati; + double __ntau = 0; + int __ninfo = 0; + double *__nd = NULL; + double *__nz = NULL; __norgati = orgati; __ntau = (*env)->GetDoubleField(env, tau, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } dlaed6_(&kniter, &__norgati, &rho, __nd + offsetd, __nz + offsetz, &finit, &__ntau, &__ninfo); done: - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, tau, doubleW_val_fieldID, __ntau); - if (!failed) orgati = __norgati; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, tau, doubleW_val_fieldID, __ntau); + if (!__failed) orgati = __norgati; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaed7_)(int *icompq, int *n, int *qsiz, int *tlvls, int *curlvl, int *curpbm, double *d, double *q, int *ldq, int *indxq, double *rho, int *cutpnt, double *qstore, int *qptr, int *prmptr, int *perm, int *givptr, int *givcol, double *givnum, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed7K(JNIEnv *env, UNUSED jobject obj, jint icompq, jint n, jint qsiz, jint tlvls, jint curlvl, jint curpbm, jdoubleArray d, jint offsetd, jdoubleArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jint cutpnt, jdoubleArray qstore, jint offsetqstore, jintArray qptr, jint offsetqptr, jintArray prmptr, jint offsetprmptr, jintArray perm, jint offsetperm, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jdoubleArray givnum, jint offsetgivnum, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - double __nrho = 0; int __ninfo = 0; double *__nd = NULL; double *__nq = NULL; int *__nindxq = NULL; double *__nqstore = NULL; int *__nqptr = NULL; int *__nprmptr = NULL; int *__nperm = NULL; int *__ngivptr = NULL; int *__ngivcol = NULL; double *__ngivnum = NULL; double *__nwork = NULL; int *__niwork = NULL; + jboolean __failed = FALSE; + double __nrho = 0; + int __ninfo = 0; + double *__nd = NULL; + double *__nq = NULL; + int *__nindxq = NULL; + double *__nqstore = NULL; + int *__nqptr = NULL; + int *__nprmptr = NULL; + int *__nperm = NULL; + int *__ngivptr = NULL; + int *__ngivcol = NULL; + double *__ngivnum = NULL; + double *__nwork = NULL; + int *__niwork = NULL; __nrho = (*env)->GetDoubleField(env, rho, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nindxq = (*env)->GetPrimitiveArrayCritical(env, indxq, NULL))) goto fail; - if (!(__nqstore = (*env)->GetPrimitiveArrayCritical(env, qstore, NULL))) goto fail; - if (!(__nqptr = (*env)->GetPrimitiveArrayCritical(env, qptr, NULL))) goto fail; - if (!(__nprmptr = (*env)->GetPrimitiveArrayCritical(env, prmptr, NULL))) goto fail; - if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; - if (!(__ngivptr = (*env)->GetPrimitiveArrayCritical(env, givptr, NULL))) goto fail; - if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; - if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nindxq = (*env)->GetPrimitiveArrayCritical(env, indxq, NULL))) { __failed = TRUE; goto done; } + if (!(__nqstore = (*env)->GetPrimitiveArrayCritical(env, qstore, NULL))) { __failed = TRUE; goto done; } + if (!(__nqptr = (*env)->GetPrimitiveArrayCritical(env, qptr, NULL))) { __failed = TRUE; goto done; } + if (!(__nprmptr = (*env)->GetPrimitiveArrayCritical(env, prmptr, NULL))) { __failed = TRUE; goto done; } + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivptr = (*env)->GetPrimitiveArrayCritical(env, givptr, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dlaed7_(&icompq, &n, &qsiz, &tlvls, &curlvl, &curpbm, __nd + offsetd, __nq + offsetq, &ldq, __nindxq + offsetindxq, &__nrho, &cutpnt, __nqstore + offsetqstore, __nqptr + offsetqptr, __nprmptr + offsetprmptr, __nperm + offsetperm, __ngivptr + offsetgivptr, __ngivcol + offsetgivcol, __ngivnum + offsetgivnum, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); - if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); - if (__ngivptr) (*env)->ReleasePrimitiveArrayCritical(env, givptr, __ngivptr, failed ? JNI_ABORT : 0); - if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); - if (__nprmptr) (*env)->ReleasePrimitiveArrayCritical(env, prmptr, __nprmptr, failed ? JNI_ABORT : 0); - if (__nqptr) (*env)->ReleasePrimitiveArrayCritical(env, qptr, __nqptr, failed ? JNI_ABORT : 0); - if (__nqstore) (*env)->ReleasePrimitiveArrayCritical(env, qstore, __nqstore, failed ? JNI_ABORT : 0); - if (__nindxq) (*env)->ReleasePrimitiveArrayCritical(env, indxq, __nindxq, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, rho, doubleW_val_fieldID, __nrho); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, __failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, __failed ? JNI_ABORT : 0); + if (__ngivptr) (*env)->ReleasePrimitiveArrayCritical(env, givptr, __ngivptr, __failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, __failed ? JNI_ABORT : 0); + if (__nprmptr) (*env)->ReleasePrimitiveArrayCritical(env, prmptr, __nprmptr, __failed ? JNI_ABORT : 0); + if (__nqptr) (*env)->ReleasePrimitiveArrayCritical(env, qptr, __nqptr, __failed ? JNI_ABORT : 0); + if (__nqstore) (*env)->ReleasePrimitiveArrayCritical(env, qstore, __nqstore, __failed ? JNI_ABORT : 0); + if (__nindxq) (*env)->ReleasePrimitiveArrayCritical(env, indxq, __nindxq, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, rho, doubleW_val_fieldID, __nrho); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaed8_)(int *icompq, int *k, int *n, int *qsiz, double *d, double *q, int *ldq, int *indxq, double *rho, int *cutpnt, double *z, double *dlamda, double *q2, int *ldq2, double *w, int *perm, int *givptr, int *givcol, double *givnum, int *indxp, int *indx, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed8K(JNIEnv *env, UNUSED jobject obj, jint icompq, jobject k, jint n, jint qsiz, jdoubleArray d, jint offsetd, jdoubleArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jint cutpnt, jdoubleArray z, jint offsetz, jdoubleArray dlamda, jint offsetdlamda, jdoubleArray q2, jint offsetq2, jint ldq2, jdoubleArray w, jint offsetw, jintArray perm, jint offsetperm, jobject givptr, jintArray givcol, jint offsetgivcol, jdoubleArray givnum, jint offsetgivnum, jintArray indxp, jint offsetindxp, jintArray indx, jint offsetindx, jobject info) { - jboolean failed = FALSE; - int __nk = 0; double __nrho = 0; int __ngivptr = 0; int __ninfo = 0; double *__nd = NULL; double *__nq = NULL; int *__nindxq = NULL; double *__nz = NULL; double *__ndlamda = NULL; double *__nq2 = NULL; double *__nw = NULL; int *__nperm = NULL; int *__ngivcol = NULL; double *__ngivnum = NULL; int *__nindxp = NULL; int *__nindx = NULL; + jboolean __failed = FALSE; + int __nk = 0; + double __nrho = 0; + int __ngivptr = 0; + int __ninfo = 0; + double *__nd = NULL; + double *__nq = NULL; + int *__nindxq = NULL; + double *__nz = NULL; + double *__ndlamda = NULL; + double *__nq2 = NULL; + double *__nw = NULL; + int *__nperm = NULL; + int *__ngivcol = NULL; + double *__ngivnum = NULL; + int *__nindxp = NULL; + int *__nindx = NULL; __nk = (*env)->GetIntField(env, k, intW_val_fieldID); __nrho = (*env)->GetDoubleField(env, rho, doubleW_val_fieldID); __ngivptr = (*env)->GetIntField(env, givptr, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nindxq = (*env)->GetPrimitiveArrayCritical(env, indxq, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__ndlamda = (*env)->GetPrimitiveArrayCritical(env, dlamda, NULL))) goto fail; - if (!(__nq2 = (*env)->GetPrimitiveArrayCritical(env, q2, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; - if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; - if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; - if (!(__nindxp = (*env)->GetPrimitiveArrayCritical(env, indxp, NULL))) goto fail; - if (!(__nindx = (*env)->GetPrimitiveArrayCritical(env, indx, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nindxq = (*env)->GetPrimitiveArrayCritical(env, indxq, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__ndlamda = (*env)->GetPrimitiveArrayCritical(env, dlamda, NULL))) { __failed = TRUE; goto done; } + if (!(__nq2 = (*env)->GetPrimitiveArrayCritical(env, q2, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) { __failed = TRUE; goto done; } + if (!(__nindxp = (*env)->GetPrimitiveArrayCritical(env, indxp, NULL))) { __failed = TRUE; goto done; } + if (!(__nindx = (*env)->GetPrimitiveArrayCritical(env, indx, NULL))) { __failed = TRUE; goto done; } dlaed8_(&icompq, &__nk, &n, &qsiz, __nd + offsetd, __nq + offsetq, &ldq, __nindxq + offsetindxq, &__nrho, &cutpnt, __nz + offsetz, __ndlamda + offsetdlamda, __nq2 + offsetq2, &ldq2, __nw + offsetw, __nperm + offsetperm, &__ngivptr, __ngivcol + offsetgivcol, __ngivnum + offsetgivnum, __nindxp + offsetindxp, __nindx + offsetindx, &__ninfo); done: - if (__nindx) (*env)->ReleasePrimitiveArrayCritical(env, indx, __nindx, failed ? JNI_ABORT : 0); - if (__nindxp) (*env)->ReleasePrimitiveArrayCritical(env, indxp, __nindxp, failed ? JNI_ABORT : 0); - if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); - if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); - if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nq2) (*env)->ReleasePrimitiveArrayCritical(env, q2, __nq2, failed ? JNI_ABORT : 0); - if (__ndlamda) (*env)->ReleasePrimitiveArrayCritical(env, dlamda, __ndlamda, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nindxq) (*env)->ReleasePrimitiveArrayCritical(env, indxq, __nindxq, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, givptr, intW_val_fieldID, __ngivptr); - if (!failed) (*env)->SetDoubleField(env, rho, doubleW_val_fieldID, __nrho); - if (!failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nindx) (*env)->ReleasePrimitiveArrayCritical(env, indx, __nindx, __failed ? JNI_ABORT : 0); + if (__nindxp) (*env)->ReleasePrimitiveArrayCritical(env, indxp, __nindxp, __failed ? JNI_ABORT : 0); + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, __failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, __failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nq2) (*env)->ReleasePrimitiveArrayCritical(env, q2, __nq2, __failed ? JNI_ABORT : 0); + if (__ndlamda) (*env)->ReleasePrimitiveArrayCritical(env, dlamda, __ndlamda, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nindxq) (*env)->ReleasePrimitiveArrayCritical(env, indxq, __nindxq, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, givptr, intW_val_fieldID, __ngivptr); + if (!__failed) (*env)->SetDoubleField(env, rho, doubleW_val_fieldID, __nrho); + if (!__failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaed9_)(int *k, int *kstart, int *kstop, int *n, double *d, double *q, int *ldq, double *rho, double *dlamda, double *w, double *s, int *lds, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaed9K(JNIEnv *env, UNUSED jobject obj, jint k, jint kstart, jint kstop, jint n, jdoubleArray d, jint offsetd, jdoubleArray q, jint offsetq, jint ldq, jdouble rho, jdoubleArray dlamda, jint offsetdlamda, jdoubleArray w, jint offsetw, jdoubleArray s, jint offsets, jint lds, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__nd = NULL; double *__nq = NULL; double *__ndlamda = NULL; double *__nw = NULL; double *__ns = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__ndlamda = (*env)->GetPrimitiveArrayCritical(env, dlamda, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__nd = NULL; + double *__nq = NULL; + double *__ndlamda = NULL; + double *__nw = NULL; + double *__ns = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__ndlamda = (*env)->GetPrimitiveArrayCritical(env, dlamda, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } dlaed9_(&k, &kstart, &kstop, &n, __nd + offsetd, __nq + offsetq, &ldq, &rho, __ndlamda + offsetdlamda, __nw + offsetw, __ns + offsets, &lds, &__ninfo); done: - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__ndlamda) (*env)->ReleasePrimitiveArrayCritical(env, dlamda, __ndlamda, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__ndlamda) (*env)->ReleasePrimitiveArrayCritical(env, dlamda, __ndlamda, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaeda_)(int *n, int *tlvls, int *curlvl, int *curpbm, int *prmptr, int *perm, int *givptr, int *givcol, double *givnum, double *q, int *qptr, double *z, double *ztemp, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaedaK(JNIEnv *env, UNUSED jobject obj, jint n, jint tlvls, jint curlvl, jint curpbm, jintArray prmptr, jint offsetprmptr, jintArray perm, jint offsetperm, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jdoubleArray givnum, jint offsetgivnum, jdoubleArray q, jint offsetq, jintArray qptr, jint offsetqptr, jdoubleArray z, jint offsetz, jdoubleArray ztemp, jint offsetztemp, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; int *__nprmptr = NULL; int *__nperm = NULL; int *__ngivptr = NULL; int *__ngivcol = NULL; double *__ngivnum = NULL; double *__nq = NULL; int *__nqptr = NULL; double *__nz = NULL; double *__nztemp = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nprmptr = (*env)->GetPrimitiveArrayCritical(env, prmptr, NULL))) goto fail; - if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; - if (!(__ngivptr = (*env)->GetPrimitiveArrayCritical(env, givptr, NULL))) goto fail; - if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; - if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nqptr = (*env)->GetPrimitiveArrayCritical(env, qptr, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nztemp = (*env)->GetPrimitiveArrayCritical(env, ztemp, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + int *__nprmptr = NULL; + int *__nperm = NULL; + int *__ngivptr = NULL; + int *__ngivcol = NULL; + double *__ngivnum = NULL; + double *__nq = NULL; + int *__nqptr = NULL; + double *__nz = NULL; + double *__nztemp = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nprmptr = (*env)->GetPrimitiveArrayCritical(env, prmptr, NULL))) { __failed = TRUE; goto done; } + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivptr = (*env)->GetPrimitiveArrayCritical(env, givptr, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nqptr = (*env)->GetPrimitiveArrayCritical(env, qptr, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nztemp = (*env)->GetPrimitiveArrayCritical(env, ztemp, NULL))) { __failed = TRUE; goto done; } dlaeda_(&n, &tlvls, &curlvl, &curpbm, __nprmptr + offsetprmptr, __nperm + offsetperm, __ngivptr + offsetgivptr, __ngivcol + offsetgivcol, __ngivnum + offsetgivnum, __nq + offsetq, __nqptr + offsetqptr, __nz + offsetz, __nztemp + offsetztemp, &__ninfo); done: - if (__nztemp) (*env)->ReleasePrimitiveArrayCritical(env, ztemp, __nztemp, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nqptr) (*env)->ReleasePrimitiveArrayCritical(env, qptr, __nqptr, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); - if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); - if (__ngivptr) (*env)->ReleasePrimitiveArrayCritical(env, givptr, __ngivptr, failed ? JNI_ABORT : 0); - if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); - if (__nprmptr) (*env)->ReleasePrimitiveArrayCritical(env, prmptr, __nprmptr, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nztemp) (*env)->ReleasePrimitiveArrayCritical(env, ztemp, __nztemp, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nqptr) (*env)->ReleasePrimitiveArrayCritical(env, qptr, __nqptr, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, __failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, __failed ? JNI_ABORT : 0); + if (__ngivptr) (*env)->ReleasePrimitiveArrayCritical(env, givptr, __ngivptr, __failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, __failed ? JNI_ABORT : 0); + if (__nprmptr) (*env)->ReleasePrimitiveArrayCritical(env, prmptr, __nprmptr, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaein_)(int *rightv, int *noinit, int *n, double *h, int *ldh, double *wr, double *wi, double *vr, double *vi, double *b, int *ldb, double *work, double *eps3, double *smlnum, double *bignum, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaeinK(JNIEnv *env, UNUSED jobject obj, jboolean rightv, jboolean noinit, jint n, jdoubleArray h, jint offseth, jint ldh, jdouble wr, jdouble wi, jdoubleArray vr, jint offsetvr, jdoubleArray vi, jint offsetvi, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray work, jint offsetwork, jdouble eps3, jdouble smlnum, jdouble bignum, jobject info) { - jboolean failed = FALSE; - int __nrightv; int __nnoinit; int __ninfo = 0; double *__nh = NULL; double *__nvr = NULL; double *__nvi = NULL; double *__nb = NULL; double *__nwork = NULL; + jboolean __failed = FALSE; + int __nrightv; + int __nnoinit; + int __ninfo = 0; + double *__nh = NULL; + double *__nvr = NULL; + double *__nvi = NULL; + double *__nb = NULL; + double *__nwork = NULL; __nrightv = rightv; __nnoinit = noinit; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; - if (!(__nvi = (*env)->GetPrimitiveArrayCritical(env, vi, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) { __failed = TRUE; goto done; } + if (!(__nvi = (*env)->GetPrimitiveArrayCritical(env, vi, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dlaein_(&__nrightv, &__nnoinit, &n, __nh + offseth, &ldh, &wr, &wi, __nvr + offsetvr, __nvi + offsetvi, __nb + offsetb, &ldb, __nwork + offsetwork, &eps3, &smlnum, &bignum, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nvi) (*env)->ReleasePrimitiveArrayCritical(env, vi, __nvi, failed ? JNI_ABORT : 0); - if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) noinit = __nnoinit; - if (!failed) rightv = __nrightv; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nvi) (*env)->ReleasePrimitiveArrayCritical(env, vi, __nvi, __failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) noinit = __nnoinit; + if (!__failed) rightv = __nrightv; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaev2_)(double *a, double *b, double *c, double *rt1, double *rt2, double *cs1, double *sn1); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaev2K(JNIEnv *env, UNUSED jobject obj, jdouble a, jdouble b, jdouble c, jobject rt1, jobject rt2, jobject cs1, jobject sn1) { - jboolean failed = FALSE; - double __nrt1 = 0; double __nrt2 = 0; double __ncs1 = 0; double __nsn1 = 0; + jboolean __failed = FALSE; + double __nrt1 = 0; + double __nrt2 = 0; + double __ncs1 = 0; + double __nsn1 = 0; __nrt1 = (*env)->GetDoubleField(env, rt1, doubleW_val_fieldID); __nrt2 = (*env)->GetDoubleField(env, rt2, doubleW_val_fieldID); __ncs1 = (*env)->GetDoubleField(env, cs1, doubleW_val_fieldID); __nsn1 = (*env)->GetDoubleField(env, sn1, doubleW_val_fieldID); dlaev2_(&a, &b, &c, &__nrt1, &__nrt2, &__ncs1, &__nsn1); done: - if (!failed) (*env)->SetDoubleField(env, sn1, doubleW_val_fieldID, __nsn1); - if (!failed) (*env)->SetDoubleField(env, cs1, doubleW_val_fieldID, __ncs1); - if (!failed) (*env)->SetDoubleField(env, rt2, doubleW_val_fieldID, __nrt2); - if (!failed) (*env)->SetDoubleField(env, rt1, doubleW_val_fieldID, __nrt1); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetDoubleField(env, sn1, doubleW_val_fieldID, __nsn1); + if (!__failed) (*env)->SetDoubleField(env, cs1, doubleW_val_fieldID, __ncs1); + if (!__failed) (*env)->SetDoubleField(env, rt2, doubleW_val_fieldID, __nrt2); + if (!__failed) (*env)->SetDoubleField(env, rt1, doubleW_val_fieldID, __nrt1); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaexc_)(int *wantq, int *n, double *t, int *ldt, double *q, int *ldq, int *j1, int *n1, int *n2, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaexcK(JNIEnv *env, UNUSED jobject obj, jboolean wantq, jint n, jdoubleArray t, jint offsett, jint ldt, jdoubleArray q, jint offsetq, jint ldq, jint j1, jint n1, jint n2, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __nwantq; int __ninfo = 0; double *__nt = NULL; double *__nq = NULL; double *__nwork = NULL; + jboolean __failed = FALSE; + int __nwantq; + int __ninfo = 0; + double *__nt = NULL; + double *__nq = NULL; + double *__nwork = NULL; __nwantq = wantq; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dlaexc_(&__nwantq, &n, __nt + offsett, &ldt, __nq + offsetq, &ldq, &j1, &n1, &n2, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) wantq = __nwantq; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) wantq = __nwantq; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlag2_)(double *a, int *lda, double *b, int *ldb, double *safmin, double *scale1, double *scale2, double *wr1, double *wr2, double *wi); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlag2K(JNIEnv *env, UNUSED jobject obj, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble safmin, jobject scale1, jobject scale2, jobject wr1, jobject wr2, jobject wi) { - jboolean failed = FALSE; - double __nscale1 = 0; double __nscale2 = 0; double __nwr1 = 0; double __nwr2 = 0; double __nwi = 0; double *__na = NULL; double *__nb = NULL; + jboolean __failed = FALSE; + double __nscale1 = 0; + double __nscale2 = 0; + double __nwr1 = 0; + double __nwr2 = 0; + double __nwi = 0; + double *__na = NULL; + double *__nb = NULL; __nscale1 = (*env)->GetDoubleField(env, scale1, doubleW_val_fieldID); __nscale2 = (*env)->GetDoubleField(env, scale2, doubleW_val_fieldID); __nwr1 = (*env)->GetDoubleField(env, wr1, doubleW_val_fieldID); __nwr2 = (*env)->GetDoubleField(env, wr2, doubleW_val_fieldID); __nwi = (*env)->GetDoubleField(env, wi, doubleW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } dlag2_(__na + offseta, &lda, __nb + offsetb, &ldb, &safmin, &__nscale1, &__nscale2, &__nwr1, &__nwr2, &__nwi); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetDoubleField(env, wi, doubleW_val_fieldID, __nwi); - if (!failed) (*env)->SetDoubleField(env, wr2, doubleW_val_fieldID, __nwr2); - if (!failed) (*env)->SetDoubleField(env, wr1, doubleW_val_fieldID, __nwr1); - if (!failed) (*env)->SetDoubleField(env, scale2, doubleW_val_fieldID, __nscale2); - if (!failed) (*env)->SetDoubleField(env, scale1, doubleW_val_fieldID, __nscale1); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetDoubleField(env, wi, doubleW_val_fieldID, __nwi); + if (!__failed) (*env)->SetDoubleField(env, wr2, doubleW_val_fieldID, __nwr2); + if (!__failed) (*env)->SetDoubleField(env, wr1, doubleW_val_fieldID, __nwr1); + if (!__failed) (*env)->SetDoubleField(env, scale2, doubleW_val_fieldID, __nscale2); + if (!__failed) (*env)->SetDoubleField(env, scale1, doubleW_val_fieldID, __nscale1); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlag2s_)(int *m, int *n, double *a, int *lda, float *sa, int *ldsa, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlag2sK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jfloatArray sa, jint offsetsa, jint ldsa, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; float *__nsa = NULL; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + float *__nsa = NULL; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nsa = (*env)->GetPrimitiveArrayCritical(env, sa, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nsa = (*env)->GetPrimitiveArrayCritical(env, sa, NULL))) { __failed = TRUE; goto done; } dlag2s_(&m, &n, __na + offseta, &lda, __nsa + offsetsa, &ldsa, &__ninfo); done: - if (__nsa) (*env)->ReleasePrimitiveArrayCritical(env, sa, __nsa, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nsa) (*env)->ReleasePrimitiveArrayCritical(env, sa, __nsa, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlags2_)(int *upper, double *a1, double *a2, double *a3, double *b1, double *b2, double *b3, double *csu, double *snu, double *csv, double *snv, double *csq, double *snq); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlags2K(JNIEnv *env, UNUSED jobject obj, jboolean upper, jdouble a1, jdouble a2, jdouble a3, jdouble b1, jdouble b2, jdouble b3, jobject csu, jobject snu, jobject csv, jobject snv, jobject csq, jobject snq) { - jboolean failed = FALSE; - int __nupper; double __ncsu = 0; double __nsnu = 0; double __ncsv = 0; double __nsnv = 0; double __ncsq = 0; double __nsnq = 0; + jboolean __failed = FALSE; + int __nupper; + double __ncsu = 0; + double __nsnu = 0; + double __ncsv = 0; + double __nsnv = 0; + double __ncsq = 0; + double __nsnq = 0; __nupper = upper; __ncsu = (*env)->GetDoubleField(env, csu, doubleW_val_fieldID); __nsnu = (*env)->GetDoubleField(env, snu, doubleW_val_fieldID); @@ -2811,684 +3058,710 @@ void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlags2K(JNIEnv *env, UNUSED jobjec __nsnq = (*env)->GetDoubleField(env, snq, doubleW_val_fieldID); dlags2_(&__nupper, &a1, &a2, &a3, &b1, &b2, &b3, &__ncsu, &__nsnu, &__ncsv, &__nsnv, &__ncsq, &__nsnq); done: - if (!failed) (*env)->SetDoubleField(env, snq, doubleW_val_fieldID, __nsnq); - if (!failed) (*env)->SetDoubleField(env, csq, doubleW_val_fieldID, __ncsq); - if (!failed) (*env)->SetDoubleField(env, snv, doubleW_val_fieldID, __nsnv); - if (!failed) (*env)->SetDoubleField(env, csv, doubleW_val_fieldID, __ncsv); - if (!failed) (*env)->SetDoubleField(env, snu, doubleW_val_fieldID, __nsnu); - if (!failed) (*env)->SetDoubleField(env, csu, doubleW_val_fieldID, __ncsu); - if (!failed) upper = __nupper; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetDoubleField(env, snq, doubleW_val_fieldID, __nsnq); + if (!__failed) (*env)->SetDoubleField(env, csq, doubleW_val_fieldID, __ncsq); + if (!__failed) (*env)->SetDoubleField(env, snv, doubleW_val_fieldID, __nsnv); + if (!__failed) (*env)->SetDoubleField(env, csv, doubleW_val_fieldID, __ncsv); + if (!__failed) (*env)->SetDoubleField(env, snu, doubleW_val_fieldID, __nsnu); + if (!__failed) (*env)->SetDoubleField(env, csu, doubleW_val_fieldID, __ncsu); + if (!__failed) upper = __nupper; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlagtf_)(int *n, double *a, double *lambda, double *b, double *c, double *tol, double *d, int *in, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlagtfK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray a, jint offseta, jdouble lambda, jdoubleArray b, jint offsetb, jdoubleArray c, jint offsetc, jdouble tol, jdoubleArray d, jint offsetd, jintArray in, jint offsetin, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nc = NULL; double *__nd = NULL; int *__nin = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nin = (*env)->GetPrimitiveArrayCritical(env, in, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + double *__nc = NULL; + double *__nd = NULL; + int *__nin = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nin = (*env)->GetPrimitiveArrayCritical(env, in, NULL))) { __failed = TRUE; goto done; } dlagtf_(&n, __na + offseta, &lambda, __nb + offsetb, __nc + offsetc, &tol, __nd + offsetd, __nin + offsetin, &__ninfo); done: - if (__nin) (*env)->ReleasePrimitiveArrayCritical(env, in, __nin, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nin) (*env)->ReleasePrimitiveArrayCritical(env, in, __nin, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlagtm_)(const char *trans, int *n, int *nrhs, double *alpha, double *dl, double *d, double *du, double *x, int *ldx, double *beta, double *b, int *ldb); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlagtmK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint n, jint nrhs, jdouble alpha, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu, jdoubleArray x, jint offsetx, jint ldx, jdouble beta, jdoubleArray b, jint offsetb, jint ldb) { - jboolean failed = FALSE; - const char *__ntrans = NULL; double *__ndl = NULL; double *__nd = NULL; double *__ndu = NULL; double *__nx = NULL; double *__nb = NULL; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ntrans = NULL; + double *__ndl = NULL; + double *__nd = NULL; + double *__ndu = NULL; + double *__nx = NULL; + double *__nb = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } dlagtm_(__ntrans, &n, &nrhs, &alpha, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __nx + offsetx, &ldx, &beta, __nb + offsetb, &ldb); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, __failed ? JNI_ABORT : 0); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlagts_)(int *job, int *n, double *a, double *b, double *c, double *d, int *in, double *y, double *tol, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlagtsK(JNIEnv *env, UNUSED jobject obj, jint job, jint n, jdoubleArray a, jint offseta, jdoubleArray b, jint offsetb, jdoubleArray c, jint offsetc, jdoubleArray d, jint offsetd, jintArray in, jint offsetin, jdoubleArray y, jint offsety, jobject tol, jobject info) { - jboolean failed = FALSE; - double __ntol = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nc = NULL; double *__nd = NULL; int *__nin = NULL; double *__ny = NULL; + jboolean __failed = FALSE; + double __ntol = 0; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + double *__nc = NULL; + double *__nd = NULL; + int *__nin = NULL; + double *__ny = NULL; __ntol = (*env)->GetDoubleField(env, tol, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nin = (*env)->GetPrimitiveArrayCritical(env, in, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nin = (*env)->GetPrimitiveArrayCritical(env, in, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } dlagts_(&job, &n, __na + offseta, __nb + offsetb, __nc + offsetc, __nd + offsetd, __nin + offsetin, __ny + offsety, &__ntol, &__ninfo); done: - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); - if (__nin) (*env)->ReleasePrimitiveArrayCritical(env, in, __nin, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, tol, doubleW_val_fieldID, __ntol); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); + if (__nin) (*env)->ReleasePrimitiveArrayCritical(env, in, __nin, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, tol, doubleW_val_fieldID, __ntol); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlagv2_)(double *a, int *lda, double *b, int *ldb, double *alphar, double *alphai, double *beta, double *csl, double *snl, double *csr, double *snr); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlagv2K(JNIEnv *env, UNUSED jobject obj, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jobject csl, jobject snl, jobject csr, jobject snr) { - jboolean failed = FALSE; - double __ncsl = 0; double __nsnl = 0; double __ncsr = 0; double __nsnr = 0; double *__na = NULL; double *__nb = NULL; double *__nalphar = NULL; double *__nalphai = NULL; double *__nbeta = NULL; + jboolean __failed = FALSE; + double __ncsl = 0; + double __nsnl = 0; + double __ncsr = 0; + double __nsnr = 0; + double *__na = NULL; + double *__nb = NULL; + double *__nalphar = NULL; + double *__nalphai = NULL; + double *__nbeta = NULL; __ncsl = (*env)->GetDoubleField(env, csl, doubleW_val_fieldID); __nsnl = (*env)->GetDoubleField(env, snl, doubleW_val_fieldID); __ncsr = (*env)->GetDoubleField(env, csr, doubleW_val_fieldID); __nsnr = (*env)->GetDoubleField(env, snr, doubleW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) goto fail; - if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) goto fail; - if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) { __failed = TRUE; goto done; } + if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) { __failed = TRUE; goto done; } + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) { __failed = TRUE; goto done; } dlagv2_(__na + offseta, &lda, __nb + offsetb, &ldb, __nalphar + offsetalphar, __nalphai + offsetalphai, __nbeta + offsetbeta, &__ncsl, &__nsnl, &__ncsr, &__nsnr); done: - if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); - if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, failed ? JNI_ABORT : 0); - if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetDoubleField(env, snr, doubleW_val_fieldID, __nsnr); - if (!failed) (*env)->SetDoubleField(env, csr, doubleW_val_fieldID, __ncsr); - if (!failed) (*env)->SetDoubleField(env, snl, doubleW_val_fieldID, __nsnl); - if (!failed) (*env)->SetDoubleField(env, csl, doubleW_val_fieldID, __ncsl); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, __failed ? JNI_ABORT : 0); + if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, __failed ? JNI_ABORT : 0); + if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetDoubleField(env, snr, doubleW_val_fieldID, __nsnr); + if (!__failed) (*env)->SetDoubleField(env, csr, doubleW_val_fieldID, __ncsr); + if (!__failed) (*env)->SetDoubleField(env, snl, doubleW_val_fieldID, __nsnl); + if (!__failed) (*env)->SetDoubleField(env, csl, doubleW_val_fieldID, __ncsl); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlahqr_)(int *wantt, int *wantz, int *n, int *ilo, int *ihi, double *h, int *ldh, double *wr, double *wi, int *iloz, int *ihiz, double *z, int *ldz, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlahqrK(JNIEnv *env, UNUSED jobject obj, jboolean wantt, jboolean wantz, jint n, jint ilo, jint ihi, jdoubleArray h, jint offseth, jint ldh, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jint iloz, jint ihiz, jdoubleArray z, jint offsetz, jint ldz, jobject info) { - jboolean failed = FALSE; - int __nwantt; int __nwantz; int __ninfo = 0; double *__nh = NULL; double *__nwr = NULL; double *__nwi = NULL; double *__nz = NULL; + jboolean __failed = FALSE; + int __nwantt; + int __nwantz; + int __ninfo = 0; + double *__nh = NULL; + double *__nwr = NULL; + double *__nwi = NULL; + double *__nz = NULL; __nwantt = wantt; __nwantz = wantz; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; - if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } dlahqr_(&__nwantt, &__nwantz, &n, &ilo, &ihi, __nh + offseth, &ldh, __nwr + offsetwr, __nwi + offsetwi, &iloz, &ihiz, __nz + offsetz, &ldz, &__ninfo); done: - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); - if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) wantz = __nwantz; - if (!failed) wantt = __nwantt; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, __failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) wantz = __nwantz; + if (!__failed) wantt = __nwantt; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlahr2_)(int *n, int *k, int *nb, double *a, int *lda, double *tau, double *t, int *ldt, double *y, int *ldy); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlahr2K(JNIEnv *env, UNUSED jobject obj, jint n, jint k, jint nb, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray t, jint offsett, jint ldt, jdoubleArray y, jint offsety, jint ldy) { - jboolean failed = FALSE; - double *__na = NULL; double *__ntau = NULL; double *__nt = NULL; double *__ny = NULL; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + jboolean __failed = FALSE; + double *__na = NULL; + double *__ntau = NULL; + double *__nt = NULL; + double *__ny = NULL; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } dlahr2_(&n, &k, &nb, __na + offseta, &lda, __ntau + offsettau, __nt + offsett, &ldt, __ny + offsety, &ldy); done: - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); - if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlahrd_)(int *n, int *k, int *nb, double *a, int *lda, double *tau, double *t, int *ldt, double *y, int *ldy); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlahrdK(JNIEnv *env, UNUSED jobject obj, jint n, jint k, jint nb, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray t, jint offsett, jint ldt, jdoubleArray y, jint offsety, jint ldy) { - jboolean failed = FALSE; - double *__na = NULL; double *__ntau = NULL; double *__nt = NULL; double *__ny = NULL; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + jboolean __failed = FALSE; + double *__na = NULL; + double *__ntau = NULL; + double *__nt = NULL; + double *__ny = NULL; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } dlahrd_(&n, &k, &nb, __na + offseta, &lda, __ntau + offsettau, __nt + offsett, &ldt, __ny + offsety, &ldy); done: - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); - if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaic1_)(int *job, int *j, double *x, double *sest, double *w, double *gamma, double *sestpr, double *s, double *c); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaic1K(JNIEnv *env, UNUSED jobject obj, jint job, jint j, jdoubleArray x, jint offsetx, jdouble sest, jdoubleArray w, jint offsetw, jdouble gamma, jobject sestpr, jobject s, jobject c) { - jboolean failed = FALSE; - double __nsestpr = 0; double __ns = 0; double __nc = 0; double *__nx = NULL; double *__nw = NULL; + jboolean __failed = FALSE; + double __nsestpr = 0; + double __ns = 0; + double __nc = 0; + double *__nx = NULL; + double *__nw = NULL; __nsestpr = (*env)->GetDoubleField(env, sestpr, doubleW_val_fieldID); __ns = (*env)->GetDoubleField(env, s, doubleW_val_fieldID); __nc = (*env)->GetDoubleField(env, c, doubleW_val_fieldID); - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } dlaic1_(&job, &j, __nx + offsetx, &sest, __nw + offsetw, &gamma, &__nsestpr, &__ns, &__nc); done: - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetDoubleField(env, c, doubleW_val_fieldID, __nc); - if (!failed) (*env)->SetDoubleField(env, s, doubleW_val_fieldID, __ns); - if (!failed) (*env)->SetDoubleField(env, sestpr, doubleW_val_fieldID, __nsestpr); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetDoubleField(env, c, doubleW_val_fieldID, __nc); + if (!__failed) (*env)->SetDoubleField(env, s, doubleW_val_fieldID, __ns); + if (!__failed) (*env)->SetDoubleField(env, sestpr, doubleW_val_fieldID, __nsestpr); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static int (*dlaisnan_)(double *din1, double *din2); jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaisnanK(JNIEnv *env, UNUSED jobject obj, jdouble din1, jdouble din2) { - jboolean __ret; - jboolean failed = FALSE; - - + jboolean __ret = 0; + jboolean __failed = FALSE; __ret = dlaisnan_(&din1, &din2); done: - - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static void (*dlaln2_)(int *ltrans, int *na, int *nw, double *smin, double *ca, double *a, int *lda, double *d1, double *d2, double *b, int *ldb, double *wr, double *wi, double *x, int *ldx, double *scale, double *xnorm, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaln2K(JNIEnv *env, UNUSED jobject obj, jboolean ltrans, jint na, jint nw, jdouble smin, jdouble ca, jdoubleArray a, jint offseta, jint lda, jdouble d1, jdouble d2, jdoubleArray b, jint offsetb, jint ldb, jdouble wr, jdouble wi, jdoubleArray x, jint offsetx, jint ldx, jobject scale, jobject xnorm, jobject info) { - jboolean failed = FALSE; - int __nltrans; double __nscale = 0; double __nxnorm = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nx = NULL; + jboolean __failed = FALSE; + int __nltrans; + double __nscale = 0; + double __nxnorm = 0; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + double *__nx = NULL; __nltrans = ltrans; __nscale = (*env)->GetDoubleField(env, scale, doubleW_val_fieldID); __nxnorm = (*env)->GetDoubleField(env, xnorm, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } dlaln2_(&__nltrans, &na, &nw, &smin, &ca, __na + offseta, &lda, &d1, &d2, __nb + offsetb, &ldb, &wr, &wi, __nx + offsetx, &ldx, &__nscale, &__nxnorm, &__ninfo); done: - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, xnorm, doubleW_val_fieldID, __nxnorm); - if (!failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); - if (!failed) ltrans = __nltrans; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, xnorm, doubleW_val_fieldID, __nxnorm); + if (!__failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); + if (!__failed) ltrans = __nltrans; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlals0_)(int *icompq, int *nl, int *nr, int *sqre, int *nrhs, double *b, int *ldb, double *bx, int *ldbx, int *perm, int *givptr, int *givcol, int *ldgcol, double *givnum, int *ldgnum, double *poles, double *difl, double *difr, double *z, int *k, double *c, double *s, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlals0K(JNIEnv *env, UNUSED jobject obj, jint icompq, jint nl, jint nr, jint sqre, jint nrhs, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray bx, jint offsetbx, jint ldbx, jintArray perm, jint offsetperm, jint givptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jdoubleArray givnum, jint offsetgivnum, jint ldgnum, jdoubleArray poles, jint offsetpoles, jdoubleArray difl, jint offsetdifl, jdoubleArray difr, jint offsetdifr, jdoubleArray z, jint offsetz, jint k, jdouble c, jdouble s, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__nb = NULL; double *__nbx = NULL; int *__nperm = NULL; int *__ngivcol = NULL; double *__ngivnum = NULL; double *__npoles = NULL; double *__ndifl = NULL; double *__ndifr = NULL; double *__nz = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nbx = (*env)->GetPrimitiveArrayCritical(env, bx, NULL))) goto fail; - if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; - if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; - if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; - if (!(__npoles = (*env)->GetPrimitiveArrayCritical(env, poles, NULL))) goto fail; - if (!(__ndifl = (*env)->GetPrimitiveArrayCritical(env, difl, NULL))) goto fail; - if (!(__ndifr = (*env)->GetPrimitiveArrayCritical(env, difr, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__nb = NULL; + double *__nbx = NULL; + int *__nperm = NULL; + int *__ngivcol = NULL; + double *__ngivnum = NULL; + double *__npoles = NULL; + double *__ndifl = NULL; + double *__ndifr = NULL; + double *__nz = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nbx = (*env)->GetPrimitiveArrayCritical(env, bx, NULL))) { __failed = TRUE; goto done; } + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) { __failed = TRUE; goto done; } + if (!(__npoles = (*env)->GetPrimitiveArrayCritical(env, poles, NULL))) { __failed = TRUE; goto done; } + if (!(__ndifl = (*env)->GetPrimitiveArrayCritical(env, difl, NULL))) { __failed = TRUE; goto done; } + if (!(__ndifr = (*env)->GetPrimitiveArrayCritical(env, difr, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dlals0_(&icompq, &nl, &nr, &sqre, &nrhs, __nb + offsetb, &ldb, __nbx + offsetbx, &ldbx, __nperm + offsetperm, &givptr, __ngivcol + offsetgivcol, &ldgcol, __ngivnum + offsetgivnum, &ldgnum, __npoles + offsetpoles, __ndifl + offsetdifl, __ndifr + offsetdifr, __nz + offsetz, &k, &c, &s, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__ndifr) (*env)->ReleasePrimitiveArrayCritical(env, difr, __ndifr, failed ? JNI_ABORT : 0); - if (__ndifl) (*env)->ReleasePrimitiveArrayCritical(env, difl, __ndifl, failed ? JNI_ABORT : 0); - if (__npoles) (*env)->ReleasePrimitiveArrayCritical(env, poles, __npoles, failed ? JNI_ABORT : 0); - if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); - if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); - if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); - if (__nbx) (*env)->ReleasePrimitiveArrayCritical(env, bx, __nbx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__ndifr) (*env)->ReleasePrimitiveArrayCritical(env, difr, __ndifr, __failed ? JNI_ABORT : 0); + if (__ndifl) (*env)->ReleasePrimitiveArrayCritical(env, difl, __ndifl, __failed ? JNI_ABORT : 0); + if (__npoles) (*env)->ReleasePrimitiveArrayCritical(env, poles, __npoles, __failed ? JNI_ABORT : 0); + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, __failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, __failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, __failed ? JNI_ABORT : 0); + if (__nbx) (*env)->ReleasePrimitiveArrayCritical(env, bx, __nbx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlalsa_)(int *icompq, int *smlsiz, int *n, int *nrhs, double *b, int *ldb, double *bx, int *ldbx, double *u, int *ldu, double *vt, int *k, double *difl, double *difr, double *z, double *poles, int *givptr, int *givcol, int *ldgcol, int *perm, double *givnum, double *c, double *s, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlalsaK(JNIEnv *env, UNUSED jobject obj, jint icompq, jint smlsiz, jint n, jint nrhs, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray bx, jint offsetbx, jint ldbx, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jintArray k, jint offsetk, jdoubleArray difl, jint offsetdifl, jdoubleArray difr, jint offsetdifr, jdoubleArray z, jint offsetz, jdoubleArray poles, jint offsetpoles, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jintArray perm, jint offsetperm, jdoubleArray givnum, jint offsetgivnum, jdoubleArray c, jint offsetc, jdoubleArray s, jint offsets, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__nb = NULL; double *__nbx = NULL; double *__nu = NULL; double *__nvt = NULL; int *__nk = NULL; double *__ndifl = NULL; double *__ndifr = NULL; double *__nz = NULL; double *__npoles = NULL; int *__ngivptr = NULL; int *__ngivcol = NULL; int *__nperm = NULL; double *__ngivnum = NULL; double *__nc = NULL; double *__ns = NULL; double *__nwork = NULL; int *__niwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nbx = (*env)->GetPrimitiveArrayCritical(env, bx, NULL))) goto fail; - if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; - if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; - if (!(__nk = (*env)->GetPrimitiveArrayCritical(env, k, NULL))) goto fail; - if (!(__ndifl = (*env)->GetPrimitiveArrayCritical(env, difl, NULL))) goto fail; - if (!(__ndifr = (*env)->GetPrimitiveArrayCritical(env, difr, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__npoles = (*env)->GetPrimitiveArrayCritical(env, poles, NULL))) goto fail; - if (!(__ngivptr = (*env)->GetPrimitiveArrayCritical(env, givptr, NULL))) goto fail; - if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; - if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; - if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__nb = NULL; + double *__nbx = NULL; + double *__nu = NULL; + double *__nvt = NULL; + int *__nk = NULL; + double *__ndifl = NULL; + double *__ndifr = NULL; + double *__nz = NULL; + double *__npoles = NULL; + int *__ngivptr = NULL; + int *__ngivcol = NULL; + int *__nperm = NULL; + double *__ngivnum = NULL; + double *__nc = NULL; + double *__ns = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nbx = (*env)->GetPrimitiveArrayCritical(env, bx, NULL))) { __failed = TRUE; goto done; } + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) { __failed = TRUE; goto done; } + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) { __failed = TRUE; goto done; } + if (!(__nk = (*env)->GetPrimitiveArrayCritical(env, k, NULL))) { __failed = TRUE; goto done; } + if (!(__ndifl = (*env)->GetPrimitiveArrayCritical(env, difl, NULL))) { __failed = TRUE; goto done; } + if (!(__ndifr = (*env)->GetPrimitiveArrayCritical(env, difr, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__npoles = (*env)->GetPrimitiveArrayCritical(env, poles, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivptr = (*env)->GetPrimitiveArrayCritical(env, givptr, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) { __failed = TRUE; goto done; } + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dlalsa_(&icompq, &smlsiz, &n, &nrhs, __nb + offsetb, &ldb, __nbx + offsetbx, &ldbx, __nu + offsetu, &ldu, __nvt + offsetvt, __nk + offsetk, __ndifl + offsetdifl, __ndifr + offsetdifr, __nz + offsetz, __npoles + offsetpoles, __ngivptr + offsetgivptr, __ngivcol + offsetgivcol, &ldgcol, __nperm + offsetperm, __ngivnum + offsetgivnum, __nc + offsetc, __ns + offsets, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); - if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); - if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); - if (__ngivptr) (*env)->ReleasePrimitiveArrayCritical(env, givptr, __ngivptr, failed ? JNI_ABORT : 0); - if (__npoles) (*env)->ReleasePrimitiveArrayCritical(env, poles, __npoles, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__ndifr) (*env)->ReleasePrimitiveArrayCritical(env, difr, __ndifr, failed ? JNI_ABORT : 0); - if (__ndifl) (*env)->ReleasePrimitiveArrayCritical(env, difl, __ndifl, failed ? JNI_ABORT : 0); - if (__nk) (*env)->ReleasePrimitiveArrayCritical(env, k, __nk, failed ? JNI_ABORT : 0); - if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); - if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); - if (__nbx) (*env)->ReleasePrimitiveArrayCritical(env, bx, __nbx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, __failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, __failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, __failed ? JNI_ABORT : 0); + if (__ngivptr) (*env)->ReleasePrimitiveArrayCritical(env, givptr, __ngivptr, __failed ? JNI_ABORT : 0); + if (__npoles) (*env)->ReleasePrimitiveArrayCritical(env, poles, __npoles, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__ndifr) (*env)->ReleasePrimitiveArrayCritical(env, difr, __ndifr, __failed ? JNI_ABORT : 0); + if (__ndifl) (*env)->ReleasePrimitiveArrayCritical(env, difl, __ndifl, __failed ? JNI_ABORT : 0); + if (__nk) (*env)->ReleasePrimitiveArrayCritical(env, k, __nk, __failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, __failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, __failed ? JNI_ABORT : 0); + if (__nbx) (*env)->ReleasePrimitiveArrayCritical(env, bx, __nbx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlalsd_)(const char *uplo, int *smlsiz, int *n, int *nrhs, double *d, double *e, double *b, int *ldb, double *rcond, int *rank, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlalsdK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint smlsiz, jint n, jint nrhs, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray b, jint offsetb, jint ldb, jdouble rcond, jobject rank, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __nrank = 0; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nb = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __nrank = 0; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; + double *__nb = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nrank = (*env)->GetIntField(env, rank, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dlalsd_(__nuplo, &smlsiz, &n, &nrhs, __nd + offsetd, __ne + offsete, __nb + offsetb, &ldb, &rcond, &__nrank, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, rank, intW_val_fieldID, __nrank); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, rank, intW_val_fieldID, __nrank); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlamrg_)(int *n1, int *n2, double *a, int *dtrd1, int *dtrd2, int *index); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamrgK(JNIEnv *env, UNUSED jobject obj, jint n1, jint n2, jdoubleArray a, jint offseta, jint dtrd1, jint dtrd2, jintArray index, jint offsetindex) { - jboolean failed = FALSE; - double *__na = NULL; int *__nindex = NULL; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nindex = (*env)->GetPrimitiveArrayCritical(env, index, NULL))) goto fail; + jboolean __failed = FALSE; + double *__na = NULL; + int *__nindex = NULL; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nindex = (*env)->GetPrimitiveArrayCritical(env, index, NULL))) { __failed = TRUE; goto done; } dlamrg_(&n1, &n2, __na + offseta, &dtrd1, &dtrd2, __nindex + offsetindex); done: - if (__nindex) (*env)->ReleasePrimitiveArrayCritical(env, index, __nindex, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nindex) (*env)->ReleasePrimitiveArrayCritical(env, index, __nindex, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static int (*dlaneg_)(int *n, double *d, double *lld, double *sigma, double *pivmin, int *r); jint Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanegK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray d, jint offsetd, jdoubleArray lld, jint offsetlld, jdouble sigma, jdouble pivmin, jint r) { - jint __ret; - jboolean failed = FALSE; - double *__nd = NULL; double *__nlld = NULL; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nlld = (*env)->GetPrimitiveArrayCritical(env, lld, NULL))) goto fail; + jint __ret = 0; + jboolean __failed = FALSE; + double *__nd = NULL; + double *__nlld = NULL; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nlld = (*env)->GetPrimitiveArrayCritical(env, lld, NULL))) { __failed = TRUE; goto done; } __ret = dlaneg_(&n, __nd + offsetd, __nlld + offsetlld, &sigma, &pivmin, &r); done: - if (__nlld) (*env)->ReleasePrimitiveArrayCritical(env, lld, __nlld, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); + if (__nlld) (*env)->ReleasePrimitiveArrayCritical(env, lld, __nlld, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static double (*dlangb_)(const char *norm, int *n, int *kl, int *ku, double *ab, int *ldab, double *work); jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlangbK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jint kl, jint ku, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray work, jint offsetwork) { - jdouble __ret; - jboolean failed = FALSE; - const char *__nnorm = NULL; double *__nab = NULL; double *__nwork = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jdouble __ret = 0; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + double *__nab = NULL; + double *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } __ret = dlangb_(__nnorm, &n, &kl, &ku, __nab + offsetab, &ldab, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static double (*dlange_)(const char *norm, int *m, int *n, double *a, int *lda, double *work); jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlangeK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray work, jint offsetwork) { - jdouble __ret; - jboolean failed = FALSE; - const char *__nnorm = NULL; double *__na = NULL; double *__nwork = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jdouble __ret = 0; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + double *__na = NULL; + double *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } __ret = dlange_(__nnorm, &m, &n, __na + offseta, &lda, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static double (*dlangt_)(const char *norm, int *n, double *dl, double *d, double *du); jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlangtK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jdoubleArray dl, jint offsetdl, jdoubleArray d, jint offsetd, jdoubleArray du, jint offsetdu) { - jdouble __ret; - jboolean failed = FALSE; - const char *__nnorm = NULL; double *__ndl = NULL; double *__nd = NULL; double *__ndu = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; - if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; + jdouble __ret = 0; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + double *__ndl = NULL; + double *__nd = NULL; + double *__ndu = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) { __failed = TRUE; goto done; } __ret = dlangt_(__nnorm, &n, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu); done: - if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, __failed ? JNI_ABORT : 0); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static double (*dlanhs_)(const char *norm, int *n, double *a, int *lda, double *work); jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanhsK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray work, jint offsetwork) { - jdouble __ret; - jboolean failed = FALSE; - const char *__nnorm = NULL; double *__na = NULL; double *__nwork = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jdouble __ret = 0; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + double *__na = NULL; + double *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } __ret = dlanhs_(__nnorm, &n, __na + offseta, &lda, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static double (*dlansb_)(const char *norm, const char *uplo, int *n, int *k, double *ab, int *ldab, double *work); jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlansbK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jint n, jint k, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray work, jint offsetwork) { - jdouble __ret; - jboolean failed = FALSE; - const char *__nnorm = NULL; const char *__nuplo = NULL; double *__nab = NULL; double *__nwork = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jdouble __ret = 0; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + const char *__nuplo = NULL; + double *__nab = NULL; + double *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } __ret = dlansb_(__nnorm, __nuplo, &n, &k, __nab + offsetab, &ldab, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static double (*dlansp_)(const char *norm, const char *uplo, int *n, double *ap, double *work); jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanspK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray work, jint offsetwork) { - jdouble __ret; - jboolean failed = FALSE; - const char *__nnorm = NULL; const char *__nuplo = NULL; double *__nap = NULL; double *__nwork = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jdouble __ret = 0; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + const char *__nuplo = NULL; + double *__nap = NULL; + double *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } __ret = dlansp_(__nnorm, __nuplo, &n, __nap + offsetap, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static double (*dlanst_)(const char *norm, int *n, double *d, double *e); jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanstK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete) { - jdouble __ret; - jboolean failed = FALSE; - const char *__nnorm = NULL; double *__nd = NULL; double *__ne = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + jdouble __ret = 0; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + double *__nd = NULL; + double *__ne = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } __ret = dlanst_(__nnorm, &n, __nd + offsetd, __ne + offsete); done: - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static double (*dlansy_)(const char *norm, const char *uplo, int *n, double *a, int *lda, double *work); jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlansyK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray work, jint offsetwork) { - jdouble __ret; - jboolean failed = FALSE; - const char *__nnorm = NULL; const char *__nuplo = NULL; double *__na = NULL; double *__nwork = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jdouble __ret = 0; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + const char *__nuplo = NULL; + double *__na = NULL; + double *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } __ret = dlansy_(__nnorm, __nuplo, &n, __na + offseta, &lda, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static double (*dlantb_)(const char *norm, const char *uplo, const char *diag, int *n, int *k, double *ab, int *ldab, double *work); jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlantbK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jstring diag, jint n, jint k, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray work, jint offsetwork) { - jdouble __ret; - jboolean failed = FALSE; - const char *__nnorm = NULL; const char *__nuplo = NULL; const char *__ndiag = NULL; double *__nab = NULL; double *__nwork = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jdouble __ret = 0; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + const char *__nuplo = NULL; + const char *__ndiag = NULL; + double *__nab = NULL; + double *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } __ret = dlantb_(__nnorm, __nuplo, __ndiag, &n, &k, __nab + offsetab, &ldab, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static double (*dlantp_)(const char *norm, const char *uplo, const char *diag, int *n, double *ap, double *work); jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlantpK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jstring diag, jint n, jdoubleArray ap, jint offsetap, jdoubleArray work, jint offsetwork) { - jdouble __ret; - jboolean failed = FALSE; - const char *__nnorm = NULL; const char *__nuplo = NULL; const char *__ndiag = NULL; double *__nap = NULL; double *__nwork = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jdouble __ret = 0; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + const char *__nuplo = NULL; + const char *__ndiag = NULL; + double *__nap = NULL; + double *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } __ret = dlantp_(__nnorm, __nuplo, __ndiag, &n, __nap + offsetap, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static double (*dlantr_)(const char *norm, const char *uplo, const char *diag, int *m, int *n, double *a, int *lda, double *work); jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlantrK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jstring diag, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray work, jint offsetwork) { - jdouble __ret; - jboolean failed = FALSE; - const char *__nnorm = NULL; const char *__nuplo = NULL; const char *__ndiag = NULL; double *__na = NULL; double *__nwork = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jdouble __ret = 0; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + const char *__nuplo = NULL; + const char *__ndiag = NULL; + double *__na = NULL; + double *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } __ret = dlantr_(__nnorm, __nuplo, __ndiag, &m, &n, __na + offseta, &lda, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static void (*dlanv2_)(double *a, double *b, double *c, double *d, double *rt1r, double *rt1i, double *rt2r, double *rt2i, double *cs, double *sn); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanv2K(JNIEnv *env, UNUSED jobject obj, jobject a, jobject b, jobject c, jobject d, jobject rt1r, jobject rt1i, jobject rt2r, jobject rt2i, jobject cs, jobject sn) { - jboolean failed = FALSE; - double __na = 0; double __nb = 0; double __nc = 0; double __nd = 0; double __nrt1r = 0; double __nrt1i = 0; double __nrt2r = 0; double __nrt2i = 0; double __ncs = 0; double __nsn = 0; + jboolean __failed = FALSE; + double __na = 0; + double __nb = 0; + double __nc = 0; + double __nd = 0; + double __nrt1r = 0; + double __nrt1i = 0; + double __nrt2r = 0; + double __nrt2i = 0; + double __ncs = 0; + double __nsn = 0; __na = (*env)->GetDoubleField(env, a, doubleW_val_fieldID); __nb = (*env)->GetDoubleField(env, b, doubleW_val_fieldID); __nc = (*env)->GetDoubleField(env, c, doubleW_val_fieldID); @@ -3501,486 +3774,504 @@ void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlanv2K(JNIEnv *env, UNUSED jobjec __nsn = (*env)->GetDoubleField(env, sn, doubleW_val_fieldID); dlanv2_(&__na, &__nb, &__nc, &__nd, &__nrt1r, &__nrt1i, &__nrt2r, &__nrt2i, &__ncs, &__nsn); done: - if (!failed) (*env)->SetDoubleField(env, sn, doubleW_val_fieldID, __nsn); - if (!failed) (*env)->SetDoubleField(env, cs, doubleW_val_fieldID, __ncs); - if (!failed) (*env)->SetDoubleField(env, rt2i, doubleW_val_fieldID, __nrt2i); - if (!failed) (*env)->SetDoubleField(env, rt2r, doubleW_val_fieldID, __nrt2r); - if (!failed) (*env)->SetDoubleField(env, rt1i, doubleW_val_fieldID, __nrt1i); - if (!failed) (*env)->SetDoubleField(env, rt1r, doubleW_val_fieldID, __nrt1r); - if (!failed) (*env)->SetDoubleField(env, d, doubleW_val_fieldID, __nd); - if (!failed) (*env)->SetDoubleField(env, c, doubleW_val_fieldID, __nc); - if (!failed) (*env)->SetDoubleField(env, b, doubleW_val_fieldID, __nb); - if (!failed) (*env)->SetDoubleField(env, a, doubleW_val_fieldID, __na); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetDoubleField(env, sn, doubleW_val_fieldID, __nsn); + if (!__failed) (*env)->SetDoubleField(env, cs, doubleW_val_fieldID, __ncs); + if (!__failed) (*env)->SetDoubleField(env, rt2i, doubleW_val_fieldID, __nrt2i); + if (!__failed) (*env)->SetDoubleField(env, rt2r, doubleW_val_fieldID, __nrt2r); + if (!__failed) (*env)->SetDoubleField(env, rt1i, doubleW_val_fieldID, __nrt1i); + if (!__failed) (*env)->SetDoubleField(env, rt1r, doubleW_val_fieldID, __nrt1r); + if (!__failed) (*env)->SetDoubleField(env, d, doubleW_val_fieldID, __nd); + if (!__failed) (*env)->SetDoubleField(env, c, doubleW_val_fieldID, __nc); + if (!__failed) (*env)->SetDoubleField(env, b, doubleW_val_fieldID, __nb); + if (!__failed) (*env)->SetDoubleField(env, a, doubleW_val_fieldID, __na); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlapll_)(int *n, double *x, int *incx, double *y, int *incy, double *ssmin); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlapllK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy, jobject ssmin) { - jboolean failed = FALSE; - double __nssmin = 0; double *__nx = NULL; double *__ny = NULL; + jboolean __failed = FALSE; + double __nssmin = 0; + double *__nx = NULL; + double *__ny = NULL; __nssmin = (*env)->GetDoubleField(env, ssmin, doubleW_val_fieldID); - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } dlapll_(&n, __nx + offsetx, &incx, __ny + offsety, &incy, &__nssmin); done: - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetDoubleField(env, ssmin, doubleW_val_fieldID, __nssmin); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetDoubleField(env, ssmin, doubleW_val_fieldID, __nssmin); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlapmt_)(int *forwrd, int *m, int *n, double *x, int *ldx, int *k); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlapmtK(JNIEnv *env, UNUSED jobject obj, jboolean forwrd, jint m, jint n, jdoubleArray x, jint offsetx, jint ldx, jintArray k, jint offsetk) { - jboolean failed = FALSE; - int __nforwrd; double *__nx = NULL; int *__nk = NULL; + jboolean __failed = FALSE; + int __nforwrd; + double *__nx = NULL; + int *__nk = NULL; __nforwrd = forwrd; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nk = (*env)->GetPrimitiveArrayCritical(env, k, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nk = (*env)->GetPrimitiveArrayCritical(env, k, NULL))) { __failed = TRUE; goto done; } dlapmt_(&__nforwrd, &m, &n, __nx + offsetx, &ldx, __nk + offsetk); done: - if (__nk) (*env)->ReleasePrimitiveArrayCritical(env, k, __nk, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (!failed) forwrd = __nforwrd; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nk) (*env)->ReleasePrimitiveArrayCritical(env, k, __nk, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (!__failed) forwrd = __nforwrd; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static double (*dlapy2_)(double *x, double *y); jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlapy2K(JNIEnv *env, UNUSED jobject obj, jdouble x, jdouble y) { - jdouble __ret; - jboolean failed = FALSE; - - + jdouble __ret = 0; + jboolean __failed = FALSE; __ret = dlapy2_(&x, &y); done: - - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static double (*dlapy3_)(double *x, double *y, double *z); jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlapy3K(JNIEnv *env, UNUSED jobject obj, jdouble x, jdouble y, jdouble z) { - jdouble __ret; - jboolean failed = FALSE; - - + jdouble __ret = 0; + jboolean __failed = FALSE; __ret = dlapy3_(&x, &y, &z); done: - - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static void (*dlaqgb_)(int *m, int *n, int *kl, int *ku, double *ab, int *ldab, double *r, double *c, double *rowcnd, double *colcnd, double *amax, char *equed); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqgbK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint kl, jint ku, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray r, jint offsetr, jdoubleArray c, jint offsetc, jdouble rowcnd, jdouble colcnd, jdouble amax, jobject equed) { - jboolean failed = FALSE; - char *__nequed = NULL; jstring __jequed = NULL;; double *__nab = NULL; double *__nr = NULL; double *__nc = NULL; - __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + jboolean __failed = FALSE; + char *__nequed = NULL; jstring __jequed = NULL; + double *__nab = NULL; + double *__nr = NULL; + double *__nc = NULL; + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) { __failed = TRUE; goto done; } + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } dlaqgb_(&m, &n, &kl, &ku, __nab + offsetab, &ldab, __nr + offsetr, __nc + offsetc, &rowcnd, &colcnd, &amax, __nequed); done: - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!__failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaqge_)(int *m, int *n, double *a, int *lda, double *r, double *c, double *rowcnd, double *colcnd, double *amax, char *equed); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqgeK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray r, jint offsetr, jdoubleArray c, jint offsetc, jdouble rowcnd, jdouble colcnd, jdouble amax, jobject equed) { - jboolean failed = FALSE; - char *__nequed = NULL; jstring __jequed = NULL;; double *__na = NULL; double *__nr = NULL; double *__nc = NULL; - __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + jboolean __failed = FALSE; + char *__nequed = NULL; jstring __jequed = NULL; + double *__na = NULL; + double *__nr = NULL; + double *__nc = NULL; + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } dlaqge_(&m, &n, __na + offseta, &lda, __nr + offsetr, __nc + offsetc, &rowcnd, &colcnd, &amax, __nequed); done: - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!__failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaqp2_)(int *m, int *n, int *offset, double *a, int *lda, int *jpvt, double *tau, double *vn1, double *vn2, double *work); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqp2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint offset, jdoubleArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jdoubleArray tau, jint offsettau, jdoubleArray vn1, jint offsetvn1, jdoubleArray vn2, jint offsetvn2, jdoubleArray work, jint offsetwork) { - jboolean failed = FALSE; - double *__na = NULL; int *__njpvt = NULL; double *__ntau = NULL; double *__nvn1 = NULL; double *__nvn2 = NULL; double *__nwork = NULL; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nvn1 = (*env)->GetPrimitiveArrayCritical(env, vn1, NULL))) goto fail; - if (!(__nvn2 = (*env)->GetPrimitiveArrayCritical(env, vn2, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + double *__na = NULL; + int *__njpvt = NULL; + double *__ntau = NULL; + double *__nvn1 = NULL; + double *__nvn2 = NULL; + double *__nwork = NULL; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nvn1 = (*env)->GetPrimitiveArrayCritical(env, vn1, NULL))) { __failed = TRUE; goto done; } + if (!(__nvn2 = (*env)->GetPrimitiveArrayCritical(env, vn2, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dlaqp2_(&m, &n, &offset, __na + offseta, &lda, __njpvt + offsetjpvt, __ntau + offsettau, __nvn1 + offsetvn1, __nvn2 + offsetvn2, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nvn2) (*env)->ReleasePrimitiveArrayCritical(env, vn2, __nvn2, failed ? JNI_ABORT : 0); - if (__nvn1) (*env)->ReleasePrimitiveArrayCritical(env, vn1, __nvn1, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nvn2) (*env)->ReleasePrimitiveArrayCritical(env, vn2, __nvn2, __failed ? JNI_ABORT : 0); + if (__nvn1) (*env)->ReleasePrimitiveArrayCritical(env, vn1, __nvn1, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaqps_)(int *m, int *n, int *offset, int *nb, int *kb, double *a, int *lda, int *jpvt, double *tau, double *vn1, double *vn2, double *auxv, double *f, int *ldf); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqpsK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint offset, jint nb, jobject kb, jdoubleArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jdoubleArray tau, jint offsettau, jdoubleArray vn1, jint offsetvn1, jdoubleArray vn2, jint offsetvn2, jdoubleArray auxv, jint offsetauxv, jdoubleArray f, jint offsetf, jint ldf) { - jboolean failed = FALSE; - int __nkb = 0; double *__na = NULL; int *__njpvt = NULL; double *__ntau = NULL; double *__nvn1 = NULL; double *__nvn2 = NULL; double *__nauxv = NULL; double *__nf = NULL; + jboolean __failed = FALSE; + int __nkb = 0; + double *__na = NULL; + int *__njpvt = NULL; + double *__ntau = NULL; + double *__nvn1 = NULL; + double *__nvn2 = NULL; + double *__nauxv = NULL; + double *__nf = NULL; __nkb = (*env)->GetIntField(env, kb, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nvn1 = (*env)->GetPrimitiveArrayCritical(env, vn1, NULL))) goto fail; - if (!(__nvn2 = (*env)->GetPrimitiveArrayCritical(env, vn2, NULL))) goto fail; - if (!(__nauxv = (*env)->GetPrimitiveArrayCritical(env, auxv, NULL))) goto fail; - if (!(__nf = (*env)->GetPrimitiveArrayCritical(env, f, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nvn1 = (*env)->GetPrimitiveArrayCritical(env, vn1, NULL))) { __failed = TRUE; goto done; } + if (!(__nvn2 = (*env)->GetPrimitiveArrayCritical(env, vn2, NULL))) { __failed = TRUE; goto done; } + if (!(__nauxv = (*env)->GetPrimitiveArrayCritical(env, auxv, NULL))) { __failed = TRUE; goto done; } + if (!(__nf = (*env)->GetPrimitiveArrayCritical(env, f, NULL))) { __failed = TRUE; goto done; } dlaqps_(&m, &n, &offset, &nb, &__nkb, __na + offseta, &lda, __njpvt + offsetjpvt, __ntau + offsettau, __nvn1 + offsetvn1, __nvn2 + offsetvn2, __nauxv + offsetauxv, __nf + offsetf, &ldf); done: - if (__nf) (*env)->ReleasePrimitiveArrayCritical(env, f, __nf, failed ? JNI_ABORT : 0); - if (__nauxv) (*env)->ReleasePrimitiveArrayCritical(env, auxv, __nauxv, failed ? JNI_ABORT : 0); - if (__nvn2) (*env)->ReleasePrimitiveArrayCritical(env, vn2, __nvn2, failed ? JNI_ABORT : 0); - if (__nvn1) (*env)->ReleasePrimitiveArrayCritical(env, vn1, __nvn1, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, kb, intW_val_fieldID, __nkb); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nf) (*env)->ReleasePrimitiveArrayCritical(env, f, __nf, __failed ? JNI_ABORT : 0); + if (__nauxv) (*env)->ReleasePrimitiveArrayCritical(env, auxv, __nauxv, __failed ? JNI_ABORT : 0); + if (__nvn2) (*env)->ReleasePrimitiveArrayCritical(env, vn2, __nvn2, __failed ? JNI_ABORT : 0); + if (__nvn1) (*env)->ReleasePrimitiveArrayCritical(env, vn1, __nvn1, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, kb, intW_val_fieldID, __nkb); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaqr0_)(int *wantt, int *wantz, int *n, int *ilo, int *ihi, double *h, int *ldh, double *wr, double *wi, int *iloz, int *ihiz, double *z, int *ldz, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr0K(JNIEnv *env, UNUSED jobject obj, jboolean wantt, jboolean wantz, jint n, jint ilo, jint ihi, jdoubleArray h, jint offseth, jint ldh, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jint iloz, jint ihiz, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __nwantt; int __nwantz; int __ninfo = 0; double *__nh = NULL; double *__nwr = NULL; double *__nwi = NULL; double *__nz = NULL; double *__nwork = NULL; + jboolean __failed = FALSE; + int __nwantt; + int __nwantz; + int __ninfo = 0; + double *__nh = NULL; + double *__nwr = NULL; + double *__nwi = NULL; + double *__nz = NULL; + double *__nwork = NULL; __nwantt = wantt; __nwantz = wantz; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; - if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dlaqr0_(&__nwantt, &__nwantz, &n, &ilo, &ihi, __nh + offseth, &ldh, __nwr + offsetwr, __nwi + offsetwi, &iloz, &ihiz, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); - if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) wantz = __nwantz; - if (!failed) wantt = __nwantt; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, __failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) wantz = __nwantz; + if (!__failed) wantt = __nwantt; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaqr1_)(int *n, double *h, int *ldh, double *sr1, double *si1, double *sr2, double *si2, double *v); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr1K(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray h, jint offseth, jint ldh, jdouble sr1, jdouble si1, jdouble sr2, jdouble si2, jdoubleArray v, jint offsetv) { - jboolean failed = FALSE; - double *__nh = NULL; double *__nv = NULL; - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + jboolean __failed = FALSE; + double *__nh = NULL; + double *__nv = NULL; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } dlaqr1_(&n, __nh + offseth, &ldh, &sr1, &si1, &sr2, &si2, __nv + offsetv); done: - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaqr2_)(int *wantt, int *wantz, int *n, int *ktop, int *kbot, int *nw, double *h, int *ldh, int *iloz, int *ihiz, double *z, int *ldz, int *ns, int *nd, double *sr, double *si, double *v, int *ldv, int *nh, double *t, int *ldt, int *nv, double *wv, int *ldwv, double *work, int *lwork); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr2K(JNIEnv *env, UNUSED jobject obj, jboolean wantt, jboolean wantz, jint n, jint ktop, jint kbot, jint nw, jdoubleArray h, jint offseth, jint ldh, jint iloz, jint ihiz, jdoubleArray z, jint offsetz, jint ldz, jobject ns, jobject nd, jdoubleArray sr, jint offsetsr, jdoubleArray si, jint offsetsi, jdoubleArray v, jint offsetv, jint ldv, jint nh, jdoubleArray t, jint offsett, jint ldt, jint nv, jdoubleArray wv, jint offsetwv, jint ldwv, jdoubleArray work, jint offsetwork, jint lwork) { - jboolean failed = FALSE; - int __nwantt; int __nwantz; int __nns = 0; int __nnd = 0; double *__nh = NULL; double *__nz = NULL; double *__nsr = NULL; double *__nsi = NULL; double *__nv = NULL; double *__nt = NULL; double *__nwv = NULL; double *__nwork = NULL; + jboolean __failed = FALSE; + int __nwantt; + int __nwantz; + int __nns = 0; + int __nnd = 0; + double *__nh = NULL; + double *__nz = NULL; + double *__nsr = NULL; + double *__nsi = NULL; + double *__nv = NULL; + double *__nt = NULL; + double *__nwv = NULL; + double *__nwork = NULL; __nwantt = wantt; __nwantz = wantz; __nns = (*env)->GetIntField(env, ns, intW_val_fieldID); __nnd = (*env)->GetIntField(env, nd, intW_val_fieldID); - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nsr = (*env)->GetPrimitiveArrayCritical(env, sr, NULL))) goto fail; - if (!(__nsi = (*env)->GetPrimitiveArrayCritical(env, si, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; - if (!(__nwv = (*env)->GetPrimitiveArrayCritical(env, wv, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nsr = (*env)->GetPrimitiveArrayCritical(env, sr, NULL))) { __failed = TRUE; goto done; } + if (!(__nsi = (*env)->GetPrimitiveArrayCritical(env, si, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) { __failed = TRUE; goto done; } + if (!(__nwv = (*env)->GetPrimitiveArrayCritical(env, wv, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dlaqr2_(&__nwantt, &__nwantz, &n, &ktop, &kbot, &nw, __nh + offseth, &ldh, &iloz, &ihiz, __nz + offsetz, &ldz, &__nns, &__nnd, __nsr + offsetsr, __nsi + offsetsi, __nv + offsetv, &ldv, &nh, __nt + offsett, &ldt, &nv, __nwv + offsetwv, &ldwv, __nwork + offsetwork, &lwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nwv) (*env)->ReleasePrimitiveArrayCritical(env, wv, __nwv, failed ? JNI_ABORT : 0); - if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nsi) (*env)->ReleasePrimitiveArrayCritical(env, si, __nsi, failed ? JNI_ABORT : 0); - if (__nsr) (*env)->ReleasePrimitiveArrayCritical(env, sr, __nsr, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, nd, intW_val_fieldID, __nnd); - if (!failed) (*env)->SetIntField(env, ns, intW_val_fieldID, __nns); - if (!failed) wantz = __nwantz; - if (!failed) wantt = __nwantt; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nwv) (*env)->ReleasePrimitiveArrayCritical(env, wv, __nwv, __failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nsi) (*env)->ReleasePrimitiveArrayCritical(env, si, __nsi, __failed ? JNI_ABORT : 0); + if (__nsr) (*env)->ReleasePrimitiveArrayCritical(env, sr, __nsr, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, nd, intW_val_fieldID, __nnd); + if (!__failed) (*env)->SetIntField(env, ns, intW_val_fieldID, __nns); + if (!__failed) wantz = __nwantz; + if (!__failed) wantt = __nwantt; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaqr3_)(int *wantt, int *wantz, int *n, int *ktop, int *kbot, int *nw, double *h, int *ldh, int *iloz, int *ihiz, double *z, int *ldz, int *ns, int *nd, double *sr, double *si, double *v, int *ldv, int *nh, double *t, int *ldt, int *nv, double *wv, int *ldwv, double *work, int *lwork); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr3K(JNIEnv *env, UNUSED jobject obj, jboolean wantt, jboolean wantz, jint n, jint ktop, jint kbot, jint nw, jdoubleArray h, jint offseth, jint ldh, jint iloz, jint ihiz, jdoubleArray z, jint offsetz, jint ldz, jobject ns, jobject nd, jdoubleArray sr, jint offsetsr, jdoubleArray si, jint offsetsi, jdoubleArray v, jint offsetv, jint ldv, jint nh, jdoubleArray t, jint offsett, jint ldt, jint nv, jdoubleArray wv, jint offsetwv, jint ldwv, jdoubleArray work, jint offsetwork, jint lwork) { - jboolean failed = FALSE; - int __nwantt; int __nwantz; int __nns = 0; int __nnd = 0; double *__nh = NULL; double *__nz = NULL; double *__nsr = NULL; double *__nsi = NULL; double *__nv = NULL; double *__nt = NULL; double *__nwv = NULL; double *__nwork = NULL; + jboolean __failed = FALSE; + int __nwantt; + int __nwantz; + int __nns = 0; + int __nnd = 0; + double *__nh = NULL; + double *__nz = NULL; + double *__nsr = NULL; + double *__nsi = NULL; + double *__nv = NULL; + double *__nt = NULL; + double *__nwv = NULL; + double *__nwork = NULL; __nwantt = wantt; __nwantz = wantz; __nns = (*env)->GetIntField(env, ns, intW_val_fieldID); __nnd = (*env)->GetIntField(env, nd, intW_val_fieldID); - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nsr = (*env)->GetPrimitiveArrayCritical(env, sr, NULL))) goto fail; - if (!(__nsi = (*env)->GetPrimitiveArrayCritical(env, si, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; - if (!(__nwv = (*env)->GetPrimitiveArrayCritical(env, wv, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nsr = (*env)->GetPrimitiveArrayCritical(env, sr, NULL))) { __failed = TRUE; goto done; } + if (!(__nsi = (*env)->GetPrimitiveArrayCritical(env, si, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) { __failed = TRUE; goto done; } + if (!(__nwv = (*env)->GetPrimitiveArrayCritical(env, wv, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dlaqr3_(&__nwantt, &__nwantz, &n, &ktop, &kbot, &nw, __nh + offseth, &ldh, &iloz, &ihiz, __nz + offsetz, &ldz, &__nns, &__nnd, __nsr + offsetsr, __nsi + offsetsi, __nv + offsetv, &ldv, &nh, __nt + offsett, &ldt, &nv, __nwv + offsetwv, &ldwv, __nwork + offsetwork, &lwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nwv) (*env)->ReleasePrimitiveArrayCritical(env, wv, __nwv, failed ? JNI_ABORT : 0); - if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nsi) (*env)->ReleasePrimitiveArrayCritical(env, si, __nsi, failed ? JNI_ABORT : 0); - if (__nsr) (*env)->ReleasePrimitiveArrayCritical(env, sr, __nsr, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, nd, intW_val_fieldID, __nnd); - if (!failed) (*env)->SetIntField(env, ns, intW_val_fieldID, __nns); - if (!failed) wantz = __nwantz; - if (!failed) wantt = __nwantt; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nwv) (*env)->ReleasePrimitiveArrayCritical(env, wv, __nwv, __failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nsi) (*env)->ReleasePrimitiveArrayCritical(env, si, __nsi, __failed ? JNI_ABORT : 0); + if (__nsr) (*env)->ReleasePrimitiveArrayCritical(env, sr, __nsr, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, nd, intW_val_fieldID, __nnd); + if (!__failed) (*env)->SetIntField(env, ns, intW_val_fieldID, __nns); + if (!__failed) wantz = __nwantz; + if (!__failed) wantt = __nwantt; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaqr4_)(int *wantt, int *wantz, int *n, int *ilo, int *ihi, double *h, int *ldh, double *wr, double *wi, int *iloz, int *ihiz, double *z, int *ldz, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr4K(JNIEnv *env, UNUSED jobject obj, jboolean wantt, jboolean wantz, jint n, jint ilo, jint ihi, jdoubleArray h, jint offseth, jint ldh, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jint iloz, jint ihiz, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __nwantt; int __nwantz; int __ninfo = 0; double *__nh = NULL; double *__nwr = NULL; double *__nwi = NULL; double *__nz = NULL; double *__nwork = NULL; + jboolean __failed = FALSE; + int __nwantt; + int __nwantz; + int __ninfo = 0; + double *__nh = NULL; + double *__nwr = NULL; + double *__nwi = NULL; + double *__nz = NULL; + double *__nwork = NULL; __nwantt = wantt; __nwantz = wantz; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; - if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dlaqr4_(&__nwantt, &__nwantz, &n, &ilo, &ihi, __nh + offseth, &ldh, __nwr + offsetwr, __nwi + offsetwi, &iloz, &ihiz, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); - if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) wantz = __nwantz; - if (!failed) wantt = __nwantt; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, __failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) wantz = __nwantz; + if (!__failed) wantt = __nwantt; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaqr5_)(int *wantt, int *wantz, int *kacc22, int *n, int *ktop, int *kbot, int *nshfts, double *sr, double *si, double *h, int *ldh, int *iloz, int *ihiz, double *z, int *ldz, double *v, int *ldv, double *u, int *ldu, int *nv, double *wv, int *ldwv, int *nh, double *wh, int *ldwh); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqr5K(JNIEnv *env, UNUSED jobject obj, jboolean wantt, jboolean wantz, jint kacc22, jint n, jint ktop, jint kbot, jint nshfts, jdoubleArray sr, jint offsetsr, jdoubleArray si, jint offsetsi, jdoubleArray h, jint offseth, jint ldh, jint iloz, jint ihiz, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray u, jint offsetu, jint ldu, jint nv, jdoubleArray wv, jint offsetwv, jint ldwv, jint nh, jdoubleArray wh, jint offsetwh, jint ldwh) { - jboolean failed = FALSE; - int __nwantt; int __nwantz; double *__nsr = NULL; double *__nsi = NULL; double *__nh = NULL; double *__nz = NULL; double *__nv = NULL; double *__nu = NULL; double *__nwv = NULL; double *__nwh = NULL; + jboolean __failed = FALSE; + int __nwantt; + int __nwantz; + double *__nsr = NULL; + double *__nsi = NULL; + double *__nh = NULL; + double *__nz = NULL; + double *__nv = NULL; + double *__nu = NULL; + double *__nwv = NULL; + double *__nwh = NULL; __nwantt = wantt; __nwantz = wantz; - if (!(__nsr = (*env)->GetPrimitiveArrayCritical(env, sr, NULL))) goto fail; - if (!(__nsi = (*env)->GetPrimitiveArrayCritical(env, si, NULL))) goto fail; - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; - if (!(__nwv = (*env)->GetPrimitiveArrayCritical(env, wv, NULL))) goto fail; - if (!(__nwh = (*env)->GetPrimitiveArrayCritical(env, wh, NULL))) goto fail; + if (!(__nsr = (*env)->GetPrimitiveArrayCritical(env, sr, NULL))) { __failed = TRUE; goto done; } + if (!(__nsi = (*env)->GetPrimitiveArrayCritical(env, si, NULL))) { __failed = TRUE; goto done; } + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) { __failed = TRUE; goto done; } + if (!(__nwv = (*env)->GetPrimitiveArrayCritical(env, wv, NULL))) { __failed = TRUE; goto done; } + if (!(__nwh = (*env)->GetPrimitiveArrayCritical(env, wh, NULL))) { __failed = TRUE; goto done; } dlaqr5_(&__nwantt, &__nwantz, &kacc22, &n, &ktop, &kbot, &nshfts, __nsr + offsetsr, __nsi + offsetsi, __nh + offseth, &ldh, &iloz, &ihiz, __nz + offsetz, &ldz, __nv + offsetv, &ldv, __nu + offsetu, &ldu, &nv, __nwv + offsetwv, &ldwv, &nh, __nwh + offsetwh, &ldwh); done: - if (__nwh) (*env)->ReleasePrimitiveArrayCritical(env, wh, __nwh, failed ? JNI_ABORT : 0); - if (__nwv) (*env)->ReleasePrimitiveArrayCritical(env, wv, __nwv, failed ? JNI_ABORT : 0); - if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (__nsi) (*env)->ReleasePrimitiveArrayCritical(env, si, __nsi, failed ? JNI_ABORT : 0); - if (__nsr) (*env)->ReleasePrimitiveArrayCritical(env, sr, __nsr, failed ? JNI_ABORT : 0); - if (!failed) wantz = __nwantz; - if (!failed) wantt = __nwantt; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwh) (*env)->ReleasePrimitiveArrayCritical(env, wh, __nwh, __failed ? JNI_ABORT : 0); + if (__nwv) (*env)->ReleasePrimitiveArrayCritical(env, wv, __nwv, __failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (__nsi) (*env)->ReleasePrimitiveArrayCritical(env, si, __nsi, __failed ? JNI_ABORT : 0); + if (__nsr) (*env)->ReleasePrimitiveArrayCritical(env, sr, __nsr, __failed ? JNI_ABORT : 0); + if (!__failed) wantz = __nwantz; + if (!__failed) wantt = __nwantt; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaqsb_)(const char *uplo, int *n, int *kd, double *ab, int *ldab, double *s, double *scond, double *amax, char *equed); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqsbK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray s, jint offsets, jdouble scond, jdouble amax, jobject equed) { - jboolean failed = FALSE; - const char *__nuplo = NULL; char *__nequed = NULL; jstring __jequed = NULL;; double *__nab = NULL; double *__ns = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + char *__nequed = NULL; jstring __jequed = NULL; + double *__nab = NULL; + double *__ns = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) { __failed = TRUE; goto done; } + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } dlaqsb_(__nuplo, &n, &kd, __nab + offsetab, &ldab, __ns + offsets, &scond, &amax, __nequed); done: - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!__failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaqsp_)(const char *uplo, int *n, double *ap, double *s, double *scond, double *amax, char *equed); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqspK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray s, jint offsets, jdouble scond, jdouble amax, jobject equed) { - jboolean failed = FALSE; - const char *__nuplo = NULL; char *__nequed = NULL; jstring __jequed = NULL;; double *__nap = NULL; double *__ns = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + char *__nequed = NULL; jstring __jequed = NULL; + double *__nap = NULL; + double *__ns = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) { __failed = TRUE; goto done; } + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } dlaqsp_(__nuplo, &n, __nap + offsetap, __ns + offsets, &scond, &amax, __nequed); done: - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!__failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaqsy_)(const char *uplo, int *n, double *a, int *lda, double *s, double *scond, double *amax, char *equed); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqsyK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray s, jint offsets, jdouble scond, jdouble amax, jobject equed) { - jboolean failed = FALSE; - const char *__nuplo = NULL; char *__nequed = NULL; jstring __jequed = NULL;; double *__na = NULL; double *__ns = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + char *__nequed = NULL; jstring __jequed = NULL; + double *__na = NULL; + double *__ns = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } dlaqsy_(__nuplo, &n, __na + offseta, &lda, __ns + offsets, &scond, &amax, __nequed); done: - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!__failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaqtr_)(int *ltran, int *lreal, int *n, double *t, int *ldt, double *b, double *w, double *scale, double *x, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaqtrK(JNIEnv *env, UNUSED jobject obj, jboolean ltran, jboolean lreal, jint n, jdoubleArray t, jint offsett, jint ldt, jdoubleArray b, jint offsetb, jdouble w, jobject scale, jdoubleArray x, jint offsetx, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __nltran; int __nlreal; double __nscale = 0; int __ninfo = 0; double *__nt = NULL; double *__nb = NULL; double *__nx = NULL; double *__nwork = NULL; + jboolean __failed = FALSE; + int __nltran; + int __nlreal; + double __nscale = 0; + int __ninfo = 0; + double *__nt = NULL; + double *__nb = NULL; + double *__nx = NULL; + double *__nwork = NULL; __nltran = ltran; __nlreal = lreal; __nscale = (*env)->GetDoubleField(env, scale, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dlaqtr_(&__nltran, &__nlreal, &n, __nt + offsett, &ldt, __nb + offsetb, &w, &__nscale, __nx + offsetx, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); - if (!failed) lreal = __nlreal; - if (!failed) ltran = __nltran; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); + if (!__failed) lreal = __nlreal; + if (!__failed) ltran = __nltran; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlar1v_)(int *n, int *b1, int *bn, double *lambda, double *d, double *l, double *ld, double *lld, double *pivmin, double *gaptol, double *z, int *wantnc, int *negcnt, double *ztz, double *mingma, int *r, int *isuppz, double *nrminv, double *resid, double *rqcorr, double *work); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlar1vK(JNIEnv *env, UNUSED jobject obj, jint n, jint b1, jint bn, jdouble lambda, jdoubleArray d, jint offsetd, jdoubleArray l, jint offsetl, jdoubleArray ld, jint offsetld, jdoubleArray lld, jint offsetlld, jdouble pivmin, jdouble gaptol, jdoubleArray z, jint offsetz, jboolean wantnc, jobject negcnt, jobject ztz, jobject mingma, jobject r, jintArray isuppz, jint offsetisuppz, jobject nrminv, jobject resid, jobject rqcorr, jdoubleArray work, jint offsetwork) { - jboolean failed = FALSE; - int __nwantnc; int __nnegcnt = 0; double __nztz = 0; double __nmingma = 0; int __nr = 0; double __nnrminv = 0; double __nresid = 0; double __nrqcorr = 0; double *__nd = NULL; double *__nl = NULL; double *__nld = NULL; double *__nlld = NULL; double *__nz = NULL; int *__nisuppz = NULL; double *__nwork = NULL; + jboolean __failed = FALSE; + int __nwantnc; + int __nnegcnt = 0; + double __nztz = 0; + double __nmingma = 0; + int __nr = 0; + double __nnrminv = 0; + double __nresid = 0; + double __nrqcorr = 0; + double *__nd = NULL; + double *__nl = NULL; + double *__nld = NULL; + double *__nlld = NULL; + double *__nz = NULL; + int *__nisuppz = NULL; + double *__nwork = NULL; __nwantnc = wantnc; __nnegcnt = (*env)->GetIntField(env, negcnt, intW_val_fieldID); __nztz = (*env)->GetDoubleField(env, ztz, doubleW_val_fieldID); @@ -3989,922 +4280,993 @@ void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlar1vK(JNIEnv *env, UNUSED jobjec __nnrminv = (*env)->GetDoubleField(env, nrminv, doubleW_val_fieldID); __nresid = (*env)->GetDoubleField(env, resid, doubleW_val_fieldID); __nrqcorr = (*env)->GetDoubleField(env, rqcorr, doubleW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nl = (*env)->GetPrimitiveArrayCritical(env, l, NULL))) goto fail; - if (!(__nld = (*env)->GetPrimitiveArrayCritical(env, ld, NULL))) goto fail; - if (!(__nlld = (*env)->GetPrimitiveArrayCritical(env, lld, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nl = (*env)->GetPrimitiveArrayCritical(env, l, NULL))) { __failed = TRUE; goto done; } + if (!(__nld = (*env)->GetPrimitiveArrayCritical(env, ld, NULL))) { __failed = TRUE; goto done; } + if (!(__nlld = (*env)->GetPrimitiveArrayCritical(env, lld, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dlar1v_(&n, &b1, &bn, &lambda, __nd + offsetd, __nl + offsetl, __nld + offsetld, __nlld + offsetlld, &pivmin, &gaptol, __nz + offsetz, &__nwantnc, &__nnegcnt, &__nztz, &__nmingma, &__nr, __nisuppz + offsetisuppz, &__nnrminv, &__nresid, &__nrqcorr, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nlld) (*env)->ReleasePrimitiveArrayCritical(env, lld, __nlld, failed ? JNI_ABORT : 0); - if (__nld) (*env)->ReleasePrimitiveArrayCritical(env, ld, __nld, failed ? JNI_ABORT : 0); - if (__nl) (*env)->ReleasePrimitiveArrayCritical(env, l, __nl, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetDoubleField(env, rqcorr, doubleW_val_fieldID, __nrqcorr); - if (!failed) (*env)->SetDoubleField(env, resid, doubleW_val_fieldID, __nresid); - if (!failed) (*env)->SetDoubleField(env, nrminv, doubleW_val_fieldID, __nnrminv); - if (!failed) (*env)->SetIntField(env, r, intW_val_fieldID, __nr); - if (!failed) (*env)->SetDoubleField(env, mingma, doubleW_val_fieldID, __nmingma); - if (!failed) (*env)->SetDoubleField(env, ztz, doubleW_val_fieldID, __nztz); - if (!failed) (*env)->SetIntField(env, negcnt, intW_val_fieldID, __nnegcnt); - if (!failed) wantnc = __nwantnc; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nlld) (*env)->ReleasePrimitiveArrayCritical(env, lld, __nlld, __failed ? JNI_ABORT : 0); + if (__nld) (*env)->ReleasePrimitiveArrayCritical(env, ld, __nld, __failed ? JNI_ABORT : 0); + if (__nl) (*env)->ReleasePrimitiveArrayCritical(env, l, __nl, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetDoubleField(env, rqcorr, doubleW_val_fieldID, __nrqcorr); + if (!__failed) (*env)->SetDoubleField(env, resid, doubleW_val_fieldID, __nresid); + if (!__failed) (*env)->SetDoubleField(env, nrminv, doubleW_val_fieldID, __nnrminv); + if (!__failed) (*env)->SetIntField(env, r, intW_val_fieldID, __nr); + if (!__failed) (*env)->SetDoubleField(env, mingma, doubleW_val_fieldID, __nmingma); + if (!__failed) (*env)->SetDoubleField(env, ztz, doubleW_val_fieldID, __nztz); + if (!__failed) (*env)->SetIntField(env, negcnt, intW_val_fieldID, __nnegcnt); + if (!__failed) wantnc = __nwantnc; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlar2v_)(int *n, double *x, double *y, double *z, int *incx, double *c, double *s, int *incc); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlar2vK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray x, jint offsetx, jdoubleArray y, jint offsety, jdoubleArray z, jint offsetz, jint incx, jdoubleArray c, jint offsetc, jdoubleArray s, jint offsets, jint incc) { - jboolean failed = FALSE; - double *__nx = NULL; double *__ny = NULL; double *__nz = NULL; double *__nc = NULL; double *__ns = NULL; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + jboolean __failed = FALSE; + double *__nx = NULL; + double *__ny = NULL; + double *__nz = NULL; + double *__nc = NULL; + double *__ns = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } dlar2v_(&n, __nx + offsetx, __ny + offsety, __nz + offsetz, &incx, __nc + offsetc, __ns + offsets, &incc); done: - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlarf_)(const char *side, int *m, int *n, double *v, int *incv, double *tau, double *c, int *Ldc, double *work); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarfK(JNIEnv *env, UNUSED jobject obj, jstring side, jint m, jint n, jdoubleArray v, jint offsetv, jint incv, jdouble tau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork) { - jboolean failed = FALSE; - const char *__nside = NULL; double *__nv = NULL; double *__nc = NULL; double *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + double *__nv = NULL; + double *__nc = NULL; + double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dlarf_(__nside, &m, &n, __nv + offsetv, &incv, &tau, __nc + offsetc, &Ldc, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlarfb_)(const char *side, const char *trans, const char *direct, const char *storev, int *m, int *n, int *k, double *v, int *ldv, double *t, int *ldt, double *c, int *Ldc, double *work, int *ldwork); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarfbK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jstring direct, jstring storev, jint m, jint n, jint k, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray t, jint offsett, jint ldt, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint ldwork) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__ntrans = NULL; const char *__ndirect = NULL; const char *__nstorev = NULL; double *__nv = NULL; double *__nt = NULL; double *__nc = NULL; double *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndirect = (*env)->GetStringUTFChars(env, direct, NULL))) goto fail; - if (!(__nstorev = (*env)->GetStringUTFChars(env, storev, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__ntrans = NULL; + const char *__ndirect = NULL; + const char *__nstorev = NULL; + double *__nv = NULL; + double *__nt = NULL; + double *__nc = NULL; + double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndirect = (*env)->GetStringUTFChars(env, direct, NULL))) { __failed = TRUE; goto done; } + if (!(__nstorev = (*env)->GetStringUTFChars(env, storev, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dlarfb_(__nside, __ntrans, __ndirect, __nstorev, &m, &n, &k, __nv + offsetv, &ldv, __nt + offsett, &ldt, __nc + offsetc, &Ldc, __nwork + offsetwork, &ldwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); if (__nstorev) (*env)->ReleaseStringUTFChars(env, storev, __nstorev); if (__ndirect) (*env)->ReleaseStringUTFChars(env, direct, __ndirect); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlarfg_)(int *n, double *alpha, double *x, int *incx, double *tau); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarfgK(JNIEnv *env, UNUSED jobject obj, jint n, jobject alpha, jdoubleArray x, jint offsetx, jint incx, jobject tau) { - jboolean failed = FALSE; - double __nalpha = 0; double __ntau = 0; double *__nx = NULL; + jboolean __failed = FALSE; + double __nalpha = 0; + double __ntau = 0; + double *__nx = NULL; __nalpha = (*env)->GetDoubleField(env, alpha, doubleW_val_fieldID); __ntau = (*env)->GetDoubleField(env, tau, doubleW_val_fieldID); - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } dlarfg_(&n, &__nalpha, __nx + offsetx, &incx, &__ntau); done: - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetDoubleField(env, tau, doubleW_val_fieldID, __ntau); - if (!failed) (*env)->SetDoubleField(env, alpha, doubleW_val_fieldID, __nalpha); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetDoubleField(env, tau, doubleW_val_fieldID, __ntau); + if (!__failed) (*env)->SetDoubleField(env, alpha, doubleW_val_fieldID, __nalpha); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlarft_)(const char *direct, const char *storev, int *n, int *k, double *v, int *ldv, double *tau, double *t, int *ldt); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarftK(JNIEnv *env, UNUSED jobject obj, jstring direct, jstring storev, jint n, jint k, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray tau, jint offsettau, jdoubleArray t, jint offsett, jint ldt) { - jboolean failed = FALSE; - const char *__ndirect = NULL; const char *__nstorev = NULL; double *__nv = NULL; double *__ntau = NULL; double *__nt = NULL; - if (!(__ndirect = (*env)->GetStringUTFChars(env, direct, NULL))) goto fail; - if (!(__nstorev = (*env)->GetStringUTFChars(env, storev, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ndirect = NULL; + const char *__nstorev = NULL; + double *__nv = NULL; + double *__ntau = NULL; + double *__nt = NULL; + if (!(__ndirect = (*env)->GetStringUTFChars(env, direct, NULL))) { __failed = TRUE; goto done; } + if (!(__nstorev = (*env)->GetStringUTFChars(env, storev, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) { __failed = TRUE; goto done; } dlarft_(__ndirect, __nstorev, &n, &k, __nv + offsetv, &ldv, __ntau + offsettau, __nt + offsett, &ldt); done: - if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); if (__nstorev) (*env)->ReleaseStringUTFChars(env, storev, __nstorev); if (__ndirect) (*env)->ReleaseStringUTFChars(env, direct, __ndirect); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlarfx_)(const char *side, int *m, int *n, double *v, double *tau, double *c, int *Ldc, double *work); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarfxK(JNIEnv *env, UNUSED jobject obj, jstring side, jint m, jint n, jdoubleArray v, jint offsetv, jdouble tau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork) { - jboolean failed = FALSE; - const char *__nside = NULL; double *__nv = NULL; double *__nc = NULL; double *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + double *__nv = NULL; + double *__nc = NULL; + double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dlarfx_(__nside, &m, &n, __nv + offsetv, &tau, __nc + offsetc, &Ldc, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlargv_)(int *n, double *x, int *incx, double *y, int *incy, double *c, int *incc); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlargvK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy, jdoubleArray c, jint offsetc, jint incc) { - jboolean failed = FALSE; - double *__nx = NULL; double *__ny = NULL; double *__nc = NULL; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + jboolean __failed = FALSE; + double *__nx = NULL; + double *__ny = NULL; + double *__nc = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } dlargv_(&n, __nx + offsetx, &incx, __ny + offsety, &incy, __nc + offsetc, &incc); done: - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlarnv_)(int *idist, int *iseed, int *n, double *x); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarnvK(JNIEnv *env, UNUSED jobject obj, jint idist, jintArray iseed, jint offsetiseed, jint n, jdoubleArray x, jint offsetx) { - jboolean failed = FALSE; - int *__niseed = NULL; double *__nx = NULL; - if (!(__niseed = (*env)->GetPrimitiveArrayCritical(env, iseed, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + jboolean __failed = FALSE; + int *__niseed = NULL; + double *__nx = NULL; + if (!(__niseed = (*env)->GetPrimitiveArrayCritical(env, iseed, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } dlarnv_(&idist, __niseed + offsetiseed, &n, __nx + offsetx); done: - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__niseed) (*env)->ReleasePrimitiveArrayCritical(env, iseed, __niseed, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__niseed) (*env)->ReleasePrimitiveArrayCritical(env, iseed, __niseed, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlarra_)(int *n, double *d, double *e, double *e2, double *spltol, double *tnrm, int *nsplit, int *isplit, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarraK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray e2, jint offsete2, jdouble spltol, jdouble tnrm, jobject nsplit, jintArray isplit, jint offsetisplit, jobject info) { - jboolean failed = FALSE; - int __nnsplit = 0; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__ne2 = NULL; int *__nisplit = NULL; + jboolean __failed = FALSE; + int __nnsplit = 0; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; + double *__ne2 = NULL; + int *__nisplit = NULL; __nnsplit = (*env)->GetIntField(env, nsplit, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) goto fail; - if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) { __failed = TRUE; goto done; } + if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) { __failed = TRUE; goto done; } dlarra_(&n, __nd + offsetd, __ne + offsete, __ne2 + offsete2, &spltol, &tnrm, &__nnsplit, __nisplit + offsetisplit, &__ninfo); done: - if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, failed ? JNI_ABORT : 0); - if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, nsplit, intW_val_fieldID, __nnsplit); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, __failed ? JNI_ABORT : 0); + if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, nsplit, intW_val_fieldID, __nnsplit); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlarrb_)(int *n, double *d, double *lld, int *ifirst, int *ilast, double *rtol1, double *rtol2, int *offset, double *w, double *wgap, double *werr, double *work, int *iwork, double *pivmin, double *spdiam, int *twist, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrbK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray d, jint offsetd, jdoubleArray lld, jint offsetlld, jint ifirst, jint ilast, jdouble rtol1, jdouble rtol2, jint offset, jdoubleArray w, jint offsetw, jdoubleArray wgap, jint offsetwgap, jdoubleArray werr, jint offsetwerr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jdouble pivmin, jdouble spdiam, jint twist, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__nd = NULL; double *__nlld = NULL; double *__nw = NULL; double *__nwgap = NULL; double *__nwerr = NULL; double *__nwork = NULL; int *__niwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nlld = (*env)->GetPrimitiveArrayCritical(env, lld, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nwgap = (*env)->GetPrimitiveArrayCritical(env, wgap, NULL))) goto fail; - if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__nd = NULL; + double *__nlld = NULL; + double *__nw = NULL; + double *__nwgap = NULL; + double *__nwerr = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nlld = (*env)->GetPrimitiveArrayCritical(env, lld, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nwgap = (*env)->GetPrimitiveArrayCritical(env, wgap, NULL))) { __failed = TRUE; goto done; } + if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dlarrb_(&n, __nd + offsetd, __nlld + offsetlld, &ifirst, &ilast, &rtol1, &rtol2, &offset, __nw + offsetw, __nwgap + offsetwgap, __nwerr + offsetwerr, __nwork + offsetwork, __niwork + offsetiwork, &pivmin, &spdiam, &twist, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, failed ? JNI_ABORT : 0); - if (__nwgap) (*env)->ReleasePrimitiveArrayCritical(env, wgap, __nwgap, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nlld) (*env)->ReleasePrimitiveArrayCritical(env, lld, __nlld, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, __failed ? JNI_ABORT : 0); + if (__nwgap) (*env)->ReleasePrimitiveArrayCritical(env, wgap, __nwgap, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nlld) (*env)->ReleasePrimitiveArrayCritical(env, lld, __nlld, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlarrc_)(const char *jobt, int *n, double *vl, double *vu, double *d, double *e, double *pivmin, int *eigcnt, int *lcnt, int *rcnt, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrcK(JNIEnv *env, UNUSED jobject obj, jstring jobt, jint n, jdouble vl, jdouble vu, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdouble pivmin, jobject eigcnt, jobject lcnt, jobject rcnt, jobject info) { - jboolean failed = FALSE; - const char *__njobt = NULL; int __neigcnt = 0; int __nlcnt = 0; int __nrcnt = 0; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; - if (!(__njobt = (*env)->GetStringUTFChars(env, jobt, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobt = NULL; + int __neigcnt = 0; + int __nlcnt = 0; + int __nrcnt = 0; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; + if (!(__njobt = (*env)->GetStringUTFChars(env, jobt, NULL))) { __failed = TRUE; goto done; } __neigcnt = (*env)->GetIntField(env, eigcnt, intW_val_fieldID); __nlcnt = (*env)->GetIntField(env, lcnt, intW_val_fieldID); __nrcnt = (*env)->GetIntField(env, rcnt, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } dlarrc_(__njobt, &n, &vl, &vu, __nd + offsetd, __ne + offsete, &pivmin, &__neigcnt, &__nlcnt, &__nrcnt, &__ninfo); done: - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, rcnt, intW_val_fieldID, __nrcnt); - if (!failed) (*env)->SetIntField(env, lcnt, intW_val_fieldID, __nlcnt); - if (!failed) (*env)->SetIntField(env, eigcnt, intW_val_fieldID, __neigcnt); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, rcnt, intW_val_fieldID, __nrcnt); + if (!__failed) (*env)->SetIntField(env, lcnt, intW_val_fieldID, __nlcnt); + if (!__failed) (*env)->SetIntField(env, eigcnt, intW_val_fieldID, __neigcnt); if (__njobt) (*env)->ReleaseStringUTFChars(env, jobt, __njobt); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlarrd_)(const char *range, const char *order, int *n, double *vl, double *vu, int *il, int *iu, double *gers, double *reltol, double *d, double *e, double *e2, double *pivmin, int *nsplit, int *isplit, int *m, double *w, double *werr, double *wl, double *wu, int *iblock, int *indexw, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrdK(JNIEnv *env, UNUSED jobject obj, jstring range, jstring order, jint n, jdouble vl, jdouble vu, jint il, jint iu, jdoubleArray gers, jint offsetgers, jdouble reltol, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray e2, jint offsete2, jdouble pivmin, jint nsplit, jintArray isplit, jint offsetisplit, jobject m, jdoubleArray w, jint offsetw, jdoubleArray werr, jint offsetwerr, jobject wl, jobject wu, jintArray iblock, jint offsetiblock, jintArray indexw, jint offsetindexw, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nrange = NULL; const char *__norder = NULL; int __nm = 0; double __nwl = 0; double __nwu = 0; int __ninfo = 0; double *__ngers = NULL; double *__nd = NULL; double *__ne = NULL; double *__ne2 = NULL; int *__nisplit = NULL; double *__nw = NULL; double *__nwerr = NULL; int *__niblock = NULL; int *__nindexw = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; - if (!(__norder = (*env)->GetStringUTFChars(env, order, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nrange = NULL; + const char *__norder = NULL; + int __nm = 0; + double __nwl = 0; + double __nwu = 0; + int __ninfo = 0; + double *__ngers = NULL; + double *__nd = NULL; + double *__ne = NULL; + double *__ne2 = NULL; + int *__nisplit = NULL; + double *__nw = NULL; + double *__nwerr = NULL; + int *__niblock = NULL; + int *__nindexw = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) { __failed = TRUE; goto done; } + if (!(__norder = (*env)->GetStringUTFChars(env, order, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __nwl = (*env)->GetDoubleField(env, wl, doubleW_val_fieldID); __nwu = (*env)->GetDoubleField(env, wu, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__ngers = (*env)->GetPrimitiveArrayCritical(env, gers, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) goto fail; - if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) goto fail; - if (!(__niblock = (*env)->GetPrimitiveArrayCritical(env, iblock, NULL))) goto fail; - if (!(__nindexw = (*env)->GetPrimitiveArrayCritical(env, indexw, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__ngers = (*env)->GetPrimitiveArrayCritical(env, gers, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) { __failed = TRUE; goto done; } + if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) { __failed = TRUE; goto done; } + if (!(__niblock = (*env)->GetPrimitiveArrayCritical(env, iblock, NULL))) { __failed = TRUE; goto done; } + if (!(__nindexw = (*env)->GetPrimitiveArrayCritical(env, indexw, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dlarrd_(__nrange, __norder, &n, &vl, &vu, &il, &iu, __ngers + offsetgers, &reltol, __nd + offsetd, __ne + offsete, __ne2 + offsete2, &pivmin, &nsplit, __nisplit + offsetisplit, &__nm, __nw + offsetw, __nwerr + offsetwerr, &__nwl, &__nwu, __niblock + offsetiblock, __nindexw + offsetindexw, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nindexw) (*env)->ReleasePrimitiveArrayCritical(env, indexw, __nindexw, failed ? JNI_ABORT : 0); - if (__niblock) (*env)->ReleasePrimitiveArrayCritical(env, iblock, __niblock, failed ? JNI_ABORT : 0); - if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, failed ? JNI_ABORT : 0); - if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__ngers) (*env)->ReleasePrimitiveArrayCritical(env, gers, __ngers, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, wu, doubleW_val_fieldID, __nwu); - if (!failed) (*env)->SetDoubleField(env, wl, doubleW_val_fieldID, __nwl); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nindexw) (*env)->ReleasePrimitiveArrayCritical(env, indexw, __nindexw, __failed ? JNI_ABORT : 0); + if (__niblock) (*env)->ReleasePrimitiveArrayCritical(env, iblock, __niblock, __failed ? JNI_ABORT : 0); + if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, __failed ? JNI_ABORT : 0); + if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__ngers) (*env)->ReleasePrimitiveArrayCritical(env, gers, __ngers, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, wu, doubleW_val_fieldID, __nwu); + if (!__failed) (*env)->SetDoubleField(env, wl, doubleW_val_fieldID, __nwl); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__norder) (*env)->ReleaseStringUTFChars(env, order, __norder); if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlarre_)(const char *range, int *n, double *vl, double *vu, int *il, int *iu, double *d, double *e, double *e2, double *rtol1, double *rtol2, double *spltol, int *nsplit, int *isplit, int *m, double *w, double *werr, double *wgap, int *iblock, int *indexw, double *gers, double *pivmin, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarreK(JNIEnv *env, UNUSED jobject obj, jstring range, jint n, jobject vl, jobject vu, jint il, jint iu, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray e2, jint offsete2, jdouble rtol1, jdouble rtol2, jdouble spltol, jobject nsplit, jintArray isplit, jint offsetisplit, jobject m, jdoubleArray w, jint offsetw, jdoubleArray werr, jint offsetwerr, jdoubleArray wgap, jint offsetwgap, jintArray iblock, jint offsetiblock, jintArray indexw, jint offsetindexw, jdoubleArray gers, jint offsetgers, jobject pivmin, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nrange = NULL; double __nvl = 0; double __nvu = 0; int __nnsplit = 0; int __nm = 0; double __npivmin = 0; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__ne2 = NULL; int *__nisplit = NULL; double *__nw = NULL; double *__nwerr = NULL; double *__nwgap = NULL; int *__niblock = NULL; int *__nindexw = NULL; double *__ngers = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nrange = NULL; + double __nvl = 0; + double __nvu = 0; + int __nnsplit = 0; + int __nm = 0; + double __npivmin = 0; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; + double *__ne2 = NULL; + int *__nisplit = NULL; + double *__nw = NULL; + double *__nwerr = NULL; + double *__nwgap = NULL; + int *__niblock = NULL; + int *__nindexw = NULL; + double *__ngers = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) { __failed = TRUE; goto done; } __nvl = (*env)->GetDoubleField(env, vl, doubleW_val_fieldID); __nvu = (*env)->GetDoubleField(env, vu, doubleW_val_fieldID); __nnsplit = (*env)->GetIntField(env, nsplit, intW_val_fieldID); __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __npivmin = (*env)->GetDoubleField(env, pivmin, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) goto fail; - if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) goto fail; - if (!(__nwgap = (*env)->GetPrimitiveArrayCritical(env, wgap, NULL))) goto fail; - if (!(__niblock = (*env)->GetPrimitiveArrayCritical(env, iblock, NULL))) goto fail; - if (!(__nindexw = (*env)->GetPrimitiveArrayCritical(env, indexw, NULL))) goto fail; - if (!(__ngers = (*env)->GetPrimitiveArrayCritical(env, gers, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) { __failed = TRUE; goto done; } + if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwgap = (*env)->GetPrimitiveArrayCritical(env, wgap, NULL))) { __failed = TRUE; goto done; } + if (!(__niblock = (*env)->GetPrimitiveArrayCritical(env, iblock, NULL))) { __failed = TRUE; goto done; } + if (!(__nindexw = (*env)->GetPrimitiveArrayCritical(env, indexw, NULL))) { __failed = TRUE; goto done; } + if (!(__ngers = (*env)->GetPrimitiveArrayCritical(env, gers, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dlarre_(__nrange, &n, &__nvl, &__nvu, &il, &iu, __nd + offsetd, __ne + offsete, __ne2 + offsete2, &rtol1, &rtol2, &spltol, &__nnsplit, __nisplit + offsetisplit, &__nm, __nw + offsetw, __nwerr + offsetwerr, __nwgap + offsetwgap, __niblock + offsetiblock, __nindexw + offsetindexw, __ngers + offsetgers, &__npivmin, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ngers) (*env)->ReleasePrimitiveArrayCritical(env, gers, __ngers, failed ? JNI_ABORT : 0); - if (__nindexw) (*env)->ReleasePrimitiveArrayCritical(env, indexw, __nindexw, failed ? JNI_ABORT : 0); - if (__niblock) (*env)->ReleasePrimitiveArrayCritical(env, iblock, __niblock, failed ? JNI_ABORT : 0); - if (__nwgap) (*env)->ReleasePrimitiveArrayCritical(env, wgap, __nwgap, failed ? JNI_ABORT : 0); - if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, failed ? JNI_ABORT : 0); - if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, pivmin, doubleW_val_fieldID, __npivmin); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); - if (!failed) (*env)->SetIntField(env, nsplit, intW_val_fieldID, __nnsplit); - if (!failed) (*env)->SetDoubleField(env, vu, doubleW_val_fieldID, __nvu); - if (!failed) (*env)->SetDoubleField(env, vl, doubleW_val_fieldID, __nvl); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ngers) (*env)->ReleasePrimitiveArrayCritical(env, gers, __ngers, __failed ? JNI_ABORT : 0); + if (__nindexw) (*env)->ReleasePrimitiveArrayCritical(env, indexw, __nindexw, __failed ? JNI_ABORT : 0); + if (__niblock) (*env)->ReleasePrimitiveArrayCritical(env, iblock, __niblock, __failed ? JNI_ABORT : 0); + if (__nwgap) (*env)->ReleasePrimitiveArrayCritical(env, wgap, __nwgap, __failed ? JNI_ABORT : 0); + if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, __failed ? JNI_ABORT : 0); + if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, pivmin, doubleW_val_fieldID, __npivmin); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (!__failed) (*env)->SetIntField(env, nsplit, intW_val_fieldID, __nnsplit); + if (!__failed) (*env)->SetDoubleField(env, vu, doubleW_val_fieldID, __nvu); + if (!__failed) (*env)->SetDoubleField(env, vl, doubleW_val_fieldID, __nvl); if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlarrf_)(int *n, double *d, double *l, double *ld, int *clstrt, int *clend, double *w, double *wgap, double *werr, double *spdiam, double *clgapl, double *clgapr, double *pivmin, double *sigma, double *dplus, double *lplus, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrfK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray d, jint offsetd, jdoubleArray l, jint offsetl, jdoubleArray ld, jint offsetld, jint clstrt, jint clend, jdoubleArray w, jint offsetw, jdoubleArray wgap, jint offsetwgap, jdoubleArray werr, jint offsetwerr, jdouble spdiam, jdouble clgapl, jdouble clgapr, jdouble pivmin, jobject sigma, jdoubleArray dplus, jint offsetdplus, jdoubleArray lplus, jint offsetlplus, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - double __nsigma = 0; int __ninfo = 0; double *__nd = NULL; double *__nl = NULL; double *__nld = NULL; double *__nw = NULL; double *__nwgap = NULL; double *__nwerr = NULL; double *__ndplus = NULL; double *__nlplus = NULL; double *__nwork = NULL; + jboolean __failed = FALSE; + double __nsigma = 0; + int __ninfo = 0; + double *__nd = NULL; + double *__nl = NULL; + double *__nld = NULL; + double *__nw = NULL; + double *__nwgap = NULL; + double *__nwerr = NULL; + double *__ndplus = NULL; + double *__nlplus = NULL; + double *__nwork = NULL; __nsigma = (*env)->GetDoubleField(env, sigma, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nl = (*env)->GetPrimitiveArrayCritical(env, l, NULL))) goto fail; - if (!(__nld = (*env)->GetPrimitiveArrayCritical(env, ld, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nwgap = (*env)->GetPrimitiveArrayCritical(env, wgap, NULL))) goto fail; - if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) goto fail; - if (!(__ndplus = (*env)->GetPrimitiveArrayCritical(env, dplus, NULL))) goto fail; - if (!(__nlplus = (*env)->GetPrimitiveArrayCritical(env, lplus, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nl = (*env)->GetPrimitiveArrayCritical(env, l, NULL))) { __failed = TRUE; goto done; } + if (!(__nld = (*env)->GetPrimitiveArrayCritical(env, ld, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nwgap = (*env)->GetPrimitiveArrayCritical(env, wgap, NULL))) { __failed = TRUE; goto done; } + if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) { __failed = TRUE; goto done; } + if (!(__ndplus = (*env)->GetPrimitiveArrayCritical(env, dplus, NULL))) { __failed = TRUE; goto done; } + if (!(__nlplus = (*env)->GetPrimitiveArrayCritical(env, lplus, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dlarrf_(&n, __nd + offsetd, __nl + offsetl, __nld + offsetld, &clstrt, &clend, __nw + offsetw, __nwgap + offsetwgap, __nwerr + offsetwerr, &spdiam, &clgapl, &clgapr, &pivmin, &__nsigma, __ndplus + offsetdplus, __nlplus + offsetlplus, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nlplus) (*env)->ReleasePrimitiveArrayCritical(env, lplus, __nlplus, failed ? JNI_ABORT : 0); - if (__ndplus) (*env)->ReleasePrimitiveArrayCritical(env, dplus, __ndplus, failed ? JNI_ABORT : 0); - if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, failed ? JNI_ABORT : 0); - if (__nwgap) (*env)->ReleasePrimitiveArrayCritical(env, wgap, __nwgap, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nld) (*env)->ReleasePrimitiveArrayCritical(env, ld, __nld, failed ? JNI_ABORT : 0); - if (__nl) (*env)->ReleasePrimitiveArrayCritical(env, l, __nl, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, sigma, doubleW_val_fieldID, __nsigma); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nlplus) (*env)->ReleasePrimitiveArrayCritical(env, lplus, __nlplus, __failed ? JNI_ABORT : 0); + if (__ndplus) (*env)->ReleasePrimitiveArrayCritical(env, dplus, __ndplus, __failed ? JNI_ABORT : 0); + if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, __failed ? JNI_ABORT : 0); + if (__nwgap) (*env)->ReleasePrimitiveArrayCritical(env, wgap, __nwgap, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nld) (*env)->ReleasePrimitiveArrayCritical(env, ld, __nld, __failed ? JNI_ABORT : 0); + if (__nl) (*env)->ReleasePrimitiveArrayCritical(env, l, __nl, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, sigma, doubleW_val_fieldID, __nsigma); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlarrj_)(int *n, double *d, double *e2, int *ifirst, int *ilast, double *rtol, int *offset, double *w, double *werr, double *work, int *iwork, double *pivmin, double *spdiam, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrjK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray d, jint offsetd, jdoubleArray e2, jint offsete2, jint ifirst, jint ilast, jdouble rtol, jint offset, jdoubleArray w, jint offsetw, jdoubleArray werr, jint offsetwerr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jdouble pivmin, jdouble spdiam, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__nd = NULL; double *__ne2 = NULL; double *__nw = NULL; double *__nwerr = NULL; double *__nwork = NULL; int *__niwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__nd = NULL; + double *__ne2 = NULL; + double *__nw = NULL; + double *__nwerr = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dlarrj_(&n, __nd + offsetd, __ne2 + offsete2, &ifirst, &ilast, &rtol, &offset, __nw + offsetw, __nwerr + offsetwerr, __nwork + offsetwork, __niwork + offsetiwork, &pivmin, &spdiam, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlarrk_)(int *n, int *iw, double *gl, double *gu, double *d, double *e2, double *pivmin, double *reltol, double *w, double *werr, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrkK(JNIEnv *env, UNUSED jobject obj, jint n, jint iw, jdouble gl, jdouble gu, jdoubleArray d, jint offsetd, jdoubleArray e2, jint offsete2, jdouble pivmin, jdouble reltol, jobject w, jobject werr, jobject info) { - jboolean failed = FALSE; - double __nw = 0; double __nwerr = 0; int __ninfo = 0; double *__nd = NULL; double *__ne2 = NULL; + jboolean __failed = FALSE; + double __nw = 0; + double __nwerr = 0; + int __ninfo = 0; + double *__nd = NULL; + double *__ne2 = NULL; __nw = (*env)->GetDoubleField(env, w, doubleW_val_fieldID); __nwerr = (*env)->GetDoubleField(env, werr, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) { __failed = TRUE; goto done; } dlarrk_(&n, &iw, &gl, &gu, __nd + offsetd, __ne2 + offsete2, &pivmin, &reltol, &__nw, &__nwerr, &__ninfo); done: - if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, werr, doubleW_val_fieldID, __nwerr); - if (!failed) (*env)->SetDoubleField(env, w, doubleW_val_fieldID, __nw); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, werr, doubleW_val_fieldID, __nwerr); + if (!__failed) (*env)->SetDoubleField(env, w, doubleW_val_fieldID, __nw); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlarrr_)(int *n, double *d, double *e, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrrK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } dlarrr_(&n, __nd + offsetd, __ne + offsete, &__ninfo); done: - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlarrv_)(int *n, double *vl, double *vu, double *d, double *l, double *pivmin, int *isplit, int *m, int *dol, int *dou, double *minrgp, double *rtol1, double *rtol2, double *w, double *werr, double *wgap, int *iblock, int *indexw, double *gers, double *z, int *ldz, int *isuppz, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarrvK(JNIEnv *env, UNUSED jobject obj, jint n, jdouble vl, jdouble vu, jdoubleArray d, jint offsetd, jdoubleArray l, jint offsetl, jdouble pivmin, jintArray isplit, jint offsetisplit, jint m, jint dol, jint dou, jdouble minrgp, jobject rtol1, jobject rtol2, jdoubleArray w, jint offsetw, jdoubleArray werr, jint offsetwerr, jdoubleArray wgap, jint offsetwgap, jintArray iblock, jint offsetiblock, jintArray indexw, jint offsetindexw, jdoubleArray gers, jint offsetgers, jdoubleArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - double __nrtol1 = 0; double __nrtol2 = 0; int __ninfo = 0; double *__nd = NULL; double *__nl = NULL; int *__nisplit = NULL; double *__nw = NULL; double *__nwerr = NULL; double *__nwgap = NULL; int *__niblock = NULL; int *__nindexw = NULL; double *__ngers = NULL; double *__nz = NULL; int *__nisuppz = NULL; double *__nwork = NULL; int *__niwork = NULL; + jboolean __failed = FALSE; + double __nrtol1 = 0; + double __nrtol2 = 0; + int __ninfo = 0; + double *__nd = NULL; + double *__nl = NULL; + int *__nisplit = NULL; + double *__nw = NULL; + double *__nwerr = NULL; + double *__nwgap = NULL; + int *__niblock = NULL; + int *__nindexw = NULL; + double *__ngers = NULL; + double *__nz = NULL; + int *__nisuppz = NULL; + double *__nwork = NULL; + int *__niwork = NULL; __nrtol1 = (*env)->GetDoubleField(env, rtol1, doubleW_val_fieldID); __nrtol2 = (*env)->GetDoubleField(env, rtol2, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nl = (*env)->GetPrimitiveArrayCritical(env, l, NULL))) goto fail; - if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) goto fail; - if (!(__nwgap = (*env)->GetPrimitiveArrayCritical(env, wgap, NULL))) goto fail; - if (!(__niblock = (*env)->GetPrimitiveArrayCritical(env, iblock, NULL))) goto fail; - if (!(__nindexw = (*env)->GetPrimitiveArrayCritical(env, indexw, NULL))) goto fail; - if (!(__ngers = (*env)->GetPrimitiveArrayCritical(env, gers, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nl = (*env)->GetPrimitiveArrayCritical(env, l, NULL))) { __failed = TRUE; goto done; } + if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwgap = (*env)->GetPrimitiveArrayCritical(env, wgap, NULL))) { __failed = TRUE; goto done; } + if (!(__niblock = (*env)->GetPrimitiveArrayCritical(env, iblock, NULL))) { __failed = TRUE; goto done; } + if (!(__nindexw = (*env)->GetPrimitiveArrayCritical(env, indexw, NULL))) { __failed = TRUE; goto done; } + if (!(__ngers = (*env)->GetPrimitiveArrayCritical(env, gers, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dlarrv_(&n, &vl, &vu, __nd + offsetd, __nl + offsetl, &pivmin, __nisplit + offsetisplit, &m, &dol, &dou, &minrgp, &__nrtol1, &__nrtol2, __nw + offsetw, __nwerr + offsetwerr, __nwgap + offsetwgap, __niblock + offsetiblock, __nindexw + offsetindexw, __ngers + offsetgers, __nz + offsetz, &ldz, __nisuppz + offsetisuppz, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__ngers) (*env)->ReleasePrimitiveArrayCritical(env, gers, __ngers, failed ? JNI_ABORT : 0); - if (__nindexw) (*env)->ReleasePrimitiveArrayCritical(env, indexw, __nindexw, failed ? JNI_ABORT : 0); - if (__niblock) (*env)->ReleasePrimitiveArrayCritical(env, iblock, __niblock, failed ? JNI_ABORT : 0); - if (__nwgap) (*env)->ReleasePrimitiveArrayCritical(env, wgap, __nwgap, failed ? JNI_ABORT : 0); - if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, failed ? JNI_ABORT : 0); - if (__nl) (*env)->ReleasePrimitiveArrayCritical(env, l, __nl, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, rtol2, doubleW_val_fieldID, __nrtol2); - if (!failed) (*env)->SetDoubleField(env, rtol1, doubleW_val_fieldID, __nrtol1); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__ngers) (*env)->ReleasePrimitiveArrayCritical(env, gers, __ngers, __failed ? JNI_ABORT : 0); + if (__nindexw) (*env)->ReleasePrimitiveArrayCritical(env, indexw, __nindexw, __failed ? JNI_ABORT : 0); + if (__niblock) (*env)->ReleasePrimitiveArrayCritical(env, iblock, __niblock, __failed ? JNI_ABORT : 0); + if (__nwgap) (*env)->ReleasePrimitiveArrayCritical(env, wgap, __nwgap, __failed ? JNI_ABORT : 0); + if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, __failed ? JNI_ABORT : 0); + if (__nl) (*env)->ReleasePrimitiveArrayCritical(env, l, __nl, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, rtol2, doubleW_val_fieldID, __nrtol2); + if (!__failed) (*env)->SetDoubleField(env, rtol1, doubleW_val_fieldID, __nrtol1); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlartg_)(double *f, double *g, double *cs, double *sn, double *r); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlartgK(JNIEnv *env, UNUSED jobject obj, jdouble f, jdouble g, jobject cs, jobject sn, jobject r) { - jboolean failed = FALSE; - double __ncs = 0; double __nsn = 0; double __nr = 0; + jboolean __failed = FALSE; + double __ncs = 0; + double __nsn = 0; + double __nr = 0; __ncs = (*env)->GetDoubleField(env, cs, doubleW_val_fieldID); __nsn = (*env)->GetDoubleField(env, sn, doubleW_val_fieldID); __nr = (*env)->GetDoubleField(env, r, doubleW_val_fieldID); dlartg_(&f, &g, &__ncs, &__nsn, &__nr); done: - if (!failed) (*env)->SetDoubleField(env, r, doubleW_val_fieldID, __nr); - if (!failed) (*env)->SetDoubleField(env, sn, doubleW_val_fieldID, __nsn); - if (!failed) (*env)->SetDoubleField(env, cs, doubleW_val_fieldID, __ncs); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetDoubleField(env, r, doubleW_val_fieldID, __nr); + if (!__failed) (*env)->SetDoubleField(env, sn, doubleW_val_fieldID, __nsn); + if (!__failed) (*env)->SetDoubleField(env, cs, doubleW_val_fieldID, __ncs); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlartv_)(int *n, double *x, int *incx, double *y, int *incy, double *c, double *s, int *incc); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlartvK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy, jdoubleArray c, jint offsetc, jdoubleArray s, jint offsets, jint incc) { - jboolean failed = FALSE; - double *__nx = NULL; double *__ny = NULL; double *__nc = NULL; double *__ns = NULL; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + jboolean __failed = FALSE; + double *__nx = NULL; + double *__ny = NULL; + double *__nc = NULL; + double *__ns = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } dlartv_(&n, __nx + offsetx, &incx, __ny + offsety, &incy, __nc + offsetc, __ns + offsets, &incc); done: - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaruv_)(int *iseed, int *n, double *x); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaruvK(JNIEnv *env, UNUSED jobject obj, jintArray iseed, jint offsetiseed, jint n, jdoubleArray x, jint offsetx) { - jboolean failed = FALSE; - int *__niseed = NULL; double *__nx = NULL; - if (!(__niseed = (*env)->GetPrimitiveArrayCritical(env, iseed, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + jboolean __failed = FALSE; + int *__niseed = NULL; + double *__nx = NULL; + if (!(__niseed = (*env)->GetPrimitiveArrayCritical(env, iseed, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } dlaruv_(__niseed + offsetiseed, &n, __nx + offsetx); done: - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__niseed) (*env)->ReleasePrimitiveArrayCritical(env, iseed, __niseed, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__niseed) (*env)->ReleasePrimitiveArrayCritical(env, iseed, __niseed, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlarz_)(const char *side, int *m, int *n, int *l, double *v, int *incv, double *tau, double *c, int *Ldc, double *work); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarzK(JNIEnv *env, UNUSED jobject obj, jstring side, jint m, jint n, jint l, jdoubleArray v, jint offsetv, jint incv, jdouble tau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork) { - jboolean failed = FALSE; - const char *__nside = NULL; double *__nv = NULL; double *__nc = NULL; double *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + double *__nv = NULL; + double *__nc = NULL; + double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dlarz_(__nside, &m, &n, &l, __nv + offsetv, &incv, &tau, __nc + offsetc, &Ldc, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlarzb_)(const char *side, const char *trans, const char *direct, const char *storev, int *m, int *n, int *k, int *l, double *v, int *ldv, double *t, int *ldt, double *c, int *Ldc, double *work, int *ldwork); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarzbK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jstring direct, jstring storev, jint m, jint n, jint k, jint l, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray t, jint offsett, jint ldt, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint ldwork) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__ntrans = NULL; const char *__ndirect = NULL; const char *__nstorev = NULL; double *__nv = NULL; double *__nt = NULL; double *__nc = NULL; double *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndirect = (*env)->GetStringUTFChars(env, direct, NULL))) goto fail; - if (!(__nstorev = (*env)->GetStringUTFChars(env, storev, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__ntrans = NULL; + const char *__ndirect = NULL; + const char *__nstorev = NULL; + double *__nv = NULL; + double *__nt = NULL; + double *__nc = NULL; + double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndirect = (*env)->GetStringUTFChars(env, direct, NULL))) { __failed = TRUE; goto done; } + if (!(__nstorev = (*env)->GetStringUTFChars(env, storev, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dlarzb_(__nside, __ntrans, __ndirect, __nstorev, &m, &n, &k, &l, __nv + offsetv, &ldv, __nt + offsett, &ldt, __nc + offsetc, &Ldc, __nwork + offsetwork, &ldwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); if (__nstorev) (*env)->ReleaseStringUTFChars(env, storev, __nstorev); if (__ndirect) (*env)->ReleaseStringUTFChars(env, direct, __ndirect); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlarzt_)(const char *direct, const char *storev, int *n, int *k, double *v, int *ldv, double *tau, double *t, int *ldt); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlarztK(JNIEnv *env, UNUSED jobject obj, jstring direct, jstring storev, jint n, jint k, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray tau, jint offsettau, jdoubleArray t, jint offsett, jint ldt) { - jboolean failed = FALSE; - const char *__ndirect = NULL; const char *__nstorev = NULL; double *__nv = NULL; double *__ntau = NULL; double *__nt = NULL; - if (!(__ndirect = (*env)->GetStringUTFChars(env, direct, NULL))) goto fail; - if (!(__nstorev = (*env)->GetStringUTFChars(env, storev, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ndirect = NULL; + const char *__nstorev = NULL; + double *__nv = NULL; + double *__ntau = NULL; + double *__nt = NULL; + if (!(__ndirect = (*env)->GetStringUTFChars(env, direct, NULL))) { __failed = TRUE; goto done; } + if (!(__nstorev = (*env)->GetStringUTFChars(env, storev, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) { __failed = TRUE; goto done; } dlarzt_(__ndirect, __nstorev, &n, &k, __nv + offsetv, &ldv, __ntau + offsettau, __nt + offsett, &ldt); done: - if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); if (__nstorev) (*env)->ReleaseStringUTFChars(env, storev, __nstorev); if (__ndirect) (*env)->ReleaseStringUTFChars(env, direct, __ndirect); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlas2_)(double *f, double *g, double *h, double *ssmin, double *ssmax); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlas2K(JNIEnv *env, UNUSED jobject obj, jdouble f, jdouble g, jdouble h, jobject ssmin, jobject ssmax) { - jboolean failed = FALSE; - double __nssmin = 0; double __nssmax = 0; + jboolean __failed = FALSE; + double __nssmin = 0; + double __nssmax = 0; __nssmin = (*env)->GetDoubleField(env, ssmin, doubleW_val_fieldID); __nssmax = (*env)->GetDoubleField(env, ssmax, doubleW_val_fieldID); dlas2_(&f, &g, &h, &__nssmin, &__nssmax); done: - if (!failed) (*env)->SetDoubleField(env, ssmax, doubleW_val_fieldID, __nssmax); - if (!failed) (*env)->SetDoubleField(env, ssmin, doubleW_val_fieldID, __nssmin); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetDoubleField(env, ssmax, doubleW_val_fieldID, __nssmax); + if (!__failed) (*env)->SetDoubleField(env, ssmin, doubleW_val_fieldID, __nssmin); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlascl_)(const char *type, int *kl, int *ku, double *cfrom, double *cto, int *m, int *n, double *a, int *lda, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasclK(JNIEnv *env, UNUSED jobject obj, jstring type, jint kl, jint ku, jdouble cfrom, jdouble cto, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { - jboolean failed = FALSE; - const char *__ntype = NULL; int __ninfo = 0; double *__na = NULL; - if (!(__ntype = (*env)->GetStringUTFChars(env, type, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ntype = NULL; + int __ninfo = 0; + double *__na = NULL; + if (!(__ntype = (*env)->GetStringUTFChars(env, type, NULL))) { __failed = TRUE; goto done; } __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } dlascl_(__ntype, &kl, &ku, &cfrom, &cto, &m, &n, __na + offseta, &lda, &__ninfo); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntype) (*env)->ReleaseStringUTFChars(env, type, __ntype); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlasd0_)(int *n, int *sqre, double *d, double *e, double *u, int *ldu, double *vt, int *ldvt, int *smlsiz, int *iwork, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd0K(JNIEnv *env, UNUSED jobject obj, jint n, jint sqre, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jint ldvt, jint smlsiz, jintArray iwork, jint offsetiwork, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nu = NULL; double *__nvt = NULL; int *__niwork = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; - if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; + double *__nu = NULL; + double *__nvt = NULL; + int *__niwork = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) { __failed = TRUE; goto done; } + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dlasd0_(&n, &sqre, __nd + offsetd, __ne + offsete, __nu + offsetu, &ldu, __nvt + offsetvt, &ldvt, &smlsiz, __niwork + offsetiwork, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); - if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, __failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlasd1_)(int *nl, int *nr, int *sqre, double *d, double *alpha, double *beta, double *u, int *ldu, double *vt, int *ldvt, int *idxq, int *iwork, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd1K(JNIEnv *env, UNUSED jobject obj, jint nl, jint nr, jint sqre, jdoubleArray d, jint offsetd, jobject alpha, jobject beta, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jint ldvt, jintArray idxq, jint offsetidxq, jintArray iwork, jint offsetiwork, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - double __nalpha = 0; double __nbeta = 0; int __ninfo = 0; double *__nd = NULL; double *__nu = NULL; double *__nvt = NULL; int *__nidxq = NULL; int *__niwork = NULL; double *__nwork = NULL; + jboolean __failed = FALSE; + double __nalpha = 0; + double __nbeta = 0; + int __ninfo = 0; + double *__nd = NULL; + double *__nu = NULL; + double *__nvt = NULL; + int *__nidxq = NULL; + int *__niwork = NULL; + double *__nwork = NULL; __nalpha = (*env)->GetDoubleField(env, alpha, doubleW_val_fieldID); __nbeta = (*env)->GetDoubleField(env, beta, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; - if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; - if (!(__nidxq = (*env)->GetPrimitiveArrayCritical(env, idxq, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) { __failed = TRUE; goto done; } + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) { __failed = TRUE; goto done; } + if (!(__nidxq = (*env)->GetPrimitiveArrayCritical(env, idxq, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dlasd1_(&nl, &nr, &sqre, __nd + offsetd, &__nalpha, &__nbeta, __nu + offsetu, &ldu, __nvt + offsetvt, &ldvt, __nidxq + offsetidxq, __niwork + offsetiwork, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nidxq) (*env)->ReleasePrimitiveArrayCritical(env, idxq, __nidxq, failed ? JNI_ABORT : 0); - if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); - if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, beta, doubleW_val_fieldID, __nbeta); - if (!failed) (*env)->SetDoubleField(env, alpha, doubleW_val_fieldID, __nalpha); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nidxq) (*env)->ReleasePrimitiveArrayCritical(env, idxq, __nidxq, __failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, __failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, beta, doubleW_val_fieldID, __nbeta); + if (!__failed) (*env)->SetDoubleField(env, alpha, doubleW_val_fieldID, __nalpha); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlasd2_)(int *nl, int *nr, int *sqre, int *k, double *d, double *z, double *alpha, double *beta, double *u, int *ldu, double *vt, int *ldvt, double *dsigma, double *u2, int *ldu2, double *vt2, int *ldvt2, int *idxp, int *idx, int *idxc, int *idxq, int *coltyp, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd2K(JNIEnv *env, UNUSED jobject obj, jint nl, jint nr, jint sqre, jobject k, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdouble alpha, jdouble beta, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jint ldvt, jdoubleArray dsigma, jint offsetdsigma, jdoubleArray u2, jint offsetu2, jint ldu2, jdoubleArray vt2, jint offsetvt2, jint ldvt2, jintArray idxp, jint offsetidxp, jintArray idx, jint offsetidx, jintArray idxc, jint offsetidxc, jintArray idxq, jint offsetidxq, jintArray coltyp, jint offsetcoltyp, jobject info) { - jboolean failed = FALSE; - int __nk = 0; int __ninfo = 0; double *__nd = NULL; double *__nz = NULL; double *__nu = NULL; double *__nvt = NULL; double *__ndsigma = NULL; double *__nu2 = NULL; double *__nvt2 = NULL; int *__nidxp = NULL; int *__nidx = NULL; int *__nidxc = NULL; int *__nidxq = NULL; int *__ncoltyp = NULL; + jboolean __failed = FALSE; + int __nk = 0; + int __ninfo = 0; + double *__nd = NULL; + double *__nz = NULL; + double *__nu = NULL; + double *__nvt = NULL; + double *__ndsigma = NULL; + double *__nu2 = NULL; + double *__nvt2 = NULL; + int *__nidxp = NULL; + int *__nidx = NULL; + int *__nidxc = NULL; + int *__nidxq = NULL; + int *__ncoltyp = NULL; __nk = (*env)->GetIntField(env, k, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; - if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; - if (!(__ndsigma = (*env)->GetPrimitiveArrayCritical(env, dsigma, NULL))) goto fail; - if (!(__nu2 = (*env)->GetPrimitiveArrayCritical(env, u2, NULL))) goto fail; - if (!(__nvt2 = (*env)->GetPrimitiveArrayCritical(env, vt2, NULL))) goto fail; - if (!(__nidxp = (*env)->GetPrimitiveArrayCritical(env, idxp, NULL))) goto fail; - if (!(__nidx = (*env)->GetPrimitiveArrayCritical(env, idx, NULL))) goto fail; - if (!(__nidxc = (*env)->GetPrimitiveArrayCritical(env, idxc, NULL))) goto fail; - if (!(__nidxq = (*env)->GetPrimitiveArrayCritical(env, idxq, NULL))) goto fail; - if (!(__ncoltyp = (*env)->GetPrimitiveArrayCritical(env, coltyp, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) { __failed = TRUE; goto done; } + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) { __failed = TRUE; goto done; } + if (!(__ndsigma = (*env)->GetPrimitiveArrayCritical(env, dsigma, NULL))) { __failed = TRUE; goto done; } + if (!(__nu2 = (*env)->GetPrimitiveArrayCritical(env, u2, NULL))) { __failed = TRUE; goto done; } + if (!(__nvt2 = (*env)->GetPrimitiveArrayCritical(env, vt2, NULL))) { __failed = TRUE; goto done; } + if (!(__nidxp = (*env)->GetPrimitiveArrayCritical(env, idxp, NULL))) { __failed = TRUE; goto done; } + if (!(__nidx = (*env)->GetPrimitiveArrayCritical(env, idx, NULL))) { __failed = TRUE; goto done; } + if (!(__nidxc = (*env)->GetPrimitiveArrayCritical(env, idxc, NULL))) { __failed = TRUE; goto done; } + if (!(__nidxq = (*env)->GetPrimitiveArrayCritical(env, idxq, NULL))) { __failed = TRUE; goto done; } + if (!(__ncoltyp = (*env)->GetPrimitiveArrayCritical(env, coltyp, NULL))) { __failed = TRUE; goto done; } dlasd2_(&nl, &nr, &sqre, &__nk, __nd + offsetd, __nz + offsetz, &alpha, &beta, __nu + offsetu, &ldu, __nvt + offsetvt, &ldvt, __ndsigma + offsetdsigma, __nu2 + offsetu2, &ldu2, __nvt2 + offsetvt2, &ldvt2, __nidxp + offsetidxp, __nidx + offsetidx, __nidxc + offsetidxc, __nidxq + offsetidxq, __ncoltyp + offsetcoltyp, &__ninfo); done: - if (__ncoltyp) (*env)->ReleasePrimitiveArrayCritical(env, coltyp, __ncoltyp, failed ? JNI_ABORT : 0); - if (__nidxq) (*env)->ReleasePrimitiveArrayCritical(env, idxq, __nidxq, failed ? JNI_ABORT : 0); - if (__nidxc) (*env)->ReleasePrimitiveArrayCritical(env, idxc, __nidxc, failed ? JNI_ABORT : 0); - if (__nidx) (*env)->ReleasePrimitiveArrayCritical(env, idx, __nidx, failed ? JNI_ABORT : 0); - if (__nidxp) (*env)->ReleasePrimitiveArrayCritical(env, idxp, __nidxp, failed ? JNI_ABORT : 0); - if (__nvt2) (*env)->ReleasePrimitiveArrayCritical(env, vt2, __nvt2, failed ? JNI_ABORT : 0); - if (__nu2) (*env)->ReleasePrimitiveArrayCritical(env, u2, __nu2, failed ? JNI_ABORT : 0); - if (__ndsigma) (*env)->ReleasePrimitiveArrayCritical(env, dsigma, __ndsigma, failed ? JNI_ABORT : 0); - if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); - if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ncoltyp) (*env)->ReleasePrimitiveArrayCritical(env, coltyp, __ncoltyp, __failed ? JNI_ABORT : 0); + if (__nidxq) (*env)->ReleasePrimitiveArrayCritical(env, idxq, __nidxq, __failed ? JNI_ABORT : 0); + if (__nidxc) (*env)->ReleasePrimitiveArrayCritical(env, idxc, __nidxc, __failed ? JNI_ABORT : 0); + if (__nidx) (*env)->ReleasePrimitiveArrayCritical(env, idx, __nidx, __failed ? JNI_ABORT : 0); + if (__nidxp) (*env)->ReleasePrimitiveArrayCritical(env, idxp, __nidxp, __failed ? JNI_ABORT : 0); + if (__nvt2) (*env)->ReleasePrimitiveArrayCritical(env, vt2, __nvt2, __failed ? JNI_ABORT : 0); + if (__nu2) (*env)->ReleasePrimitiveArrayCritical(env, u2, __nu2, __failed ? JNI_ABORT : 0); + if (__ndsigma) (*env)->ReleasePrimitiveArrayCritical(env, dsigma, __ndsigma, __failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, __failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlasd3_)(int *nl, int *nr, int *sqre, int *k, double *d, double *q, int *ldq, double *dsigma, double *u, int *ldu, double *u2, int *ldu2, double *vt, int *ldvt, double *vt2, int *ldvt2, int *idxc, int *ctot, double *z, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd3K(JNIEnv *env, UNUSED jobject obj, jint nl, jint nr, jint sqre, jint k, jdoubleArray d, jint offsetd, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray dsigma, jint offsetdsigma, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray u2, jint offsetu2, jint ldu2, jdoubleArray vt, jint offsetvt, jint ldvt, jdoubleArray vt2, jint offsetvt2, jint ldvt2, jintArray idxc, jint offsetidxc, jintArray ctot, jint offsetctot, jdoubleArray z, jint offsetz, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__nd = NULL; double *__nq = NULL; double *__ndsigma = NULL; double *__nu = NULL; double *__nu2 = NULL; double *__nvt = NULL; double *__nvt2 = NULL; int *__nidxc = NULL; int *__nctot = NULL; double *__nz = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__ndsigma = (*env)->GetPrimitiveArrayCritical(env, dsigma, NULL))) goto fail; - if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; - if (!(__nu2 = (*env)->GetPrimitiveArrayCritical(env, u2, NULL))) goto fail; - if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; - if (!(__nvt2 = (*env)->GetPrimitiveArrayCritical(env, vt2, NULL))) goto fail; - if (!(__nidxc = (*env)->GetPrimitiveArrayCritical(env, idxc, NULL))) goto fail; - if (!(__nctot = (*env)->GetPrimitiveArrayCritical(env, ctot, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__nd = NULL; + double *__nq = NULL; + double *__ndsigma = NULL; + double *__nu = NULL; + double *__nu2 = NULL; + double *__nvt = NULL; + double *__nvt2 = NULL; + int *__nidxc = NULL; + int *__nctot = NULL; + double *__nz = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__ndsigma = (*env)->GetPrimitiveArrayCritical(env, dsigma, NULL))) { __failed = TRUE; goto done; } + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) { __failed = TRUE; goto done; } + if (!(__nu2 = (*env)->GetPrimitiveArrayCritical(env, u2, NULL))) { __failed = TRUE; goto done; } + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) { __failed = TRUE; goto done; } + if (!(__nvt2 = (*env)->GetPrimitiveArrayCritical(env, vt2, NULL))) { __failed = TRUE; goto done; } + if (!(__nidxc = (*env)->GetPrimitiveArrayCritical(env, idxc, NULL))) { __failed = TRUE; goto done; } + if (!(__nctot = (*env)->GetPrimitiveArrayCritical(env, ctot, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } dlasd3_(&nl, &nr, &sqre, &k, __nd + offsetd, __nq + offsetq, &ldq, __ndsigma + offsetdsigma, __nu + offsetu, &ldu, __nu2 + offsetu2, &ldu2, __nvt + offsetvt, &ldvt, __nvt2 + offsetvt2, &ldvt2, __nidxc + offsetidxc, __nctot + offsetctot, __nz + offsetz, &__ninfo); done: - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nctot) (*env)->ReleasePrimitiveArrayCritical(env, ctot, __nctot, failed ? JNI_ABORT : 0); - if (__nidxc) (*env)->ReleasePrimitiveArrayCritical(env, idxc, __nidxc, failed ? JNI_ABORT : 0); - if (__nvt2) (*env)->ReleasePrimitiveArrayCritical(env, vt2, __nvt2, failed ? JNI_ABORT : 0); - if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); - if (__nu2) (*env)->ReleasePrimitiveArrayCritical(env, u2, __nu2, failed ? JNI_ABORT : 0); - if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); - if (__ndsigma) (*env)->ReleasePrimitiveArrayCritical(env, dsigma, __ndsigma, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nctot) (*env)->ReleasePrimitiveArrayCritical(env, ctot, __nctot, __failed ? JNI_ABORT : 0); + if (__nidxc) (*env)->ReleasePrimitiveArrayCritical(env, idxc, __nidxc, __failed ? JNI_ABORT : 0); + if (__nvt2) (*env)->ReleasePrimitiveArrayCritical(env, vt2, __nvt2, __failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, __failed ? JNI_ABORT : 0); + if (__nu2) (*env)->ReleasePrimitiveArrayCritical(env, u2, __nu2, __failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, __failed ? JNI_ABORT : 0); + if (__ndsigma) (*env)->ReleasePrimitiveArrayCritical(env, dsigma, __ndsigma, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlasd4_)(int *n, int *i, double *d, double *z, double *delta, double *rho, double *sigma, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd4K(JNIEnv *env, UNUSED jobject obj, jint n, jint i, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdoubleArray delta, jint offsetdelta, jdouble rho, jobject sigma, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - double __nsigma = 0; int __ninfo = 0; double *__nd = NULL; double *__nz = NULL; double *__ndelta = NULL; double *__nwork = NULL; + jboolean __failed = FALSE; + double __nsigma = 0; + int __ninfo = 0; + double *__nd = NULL; + double *__nz = NULL; + double *__ndelta = NULL; + double *__nwork = NULL; __nsigma = (*env)->GetDoubleField(env, sigma, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__ndelta = (*env)->GetPrimitiveArrayCritical(env, delta, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__ndelta = (*env)->GetPrimitiveArrayCritical(env, delta, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dlasd4_(&n, &i, __nd + offsetd, __nz + offsetz, __ndelta + offsetdelta, &rho, &__nsigma, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ndelta) (*env)->ReleasePrimitiveArrayCritical(env, delta, __ndelta, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, sigma, doubleW_val_fieldID, __nsigma); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ndelta) (*env)->ReleasePrimitiveArrayCritical(env, delta, __ndelta, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, sigma, doubleW_val_fieldID, __nsigma); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlasd5_)(int *i, double *d, double *z, double *delta, double *rho, double *dsigma, double *work); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd5K(JNIEnv *env, UNUSED jobject obj, jint i, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdoubleArray delta, jint offsetdelta, jdouble rho, jobject dsigma, jdoubleArray work, jint offsetwork) { - jboolean failed = FALSE; - double __ndsigma = 0; double *__nd = NULL; double *__nz = NULL; double *__ndelta = NULL; double *__nwork = NULL; + jboolean __failed = FALSE; + double __ndsigma = 0; + double *__nd = NULL; + double *__nz = NULL; + double *__ndelta = NULL; + double *__nwork = NULL; __ndsigma = (*env)->GetDoubleField(env, dsigma, doubleW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__ndelta = (*env)->GetPrimitiveArrayCritical(env, delta, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__ndelta = (*env)->GetPrimitiveArrayCritical(env, delta, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dlasd5_(&i, __nd + offsetd, __nz + offsetz, __ndelta + offsetdelta, &rho, &__ndsigma, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ndelta) (*env)->ReleasePrimitiveArrayCritical(env, delta, __ndelta, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetDoubleField(env, dsigma, doubleW_val_fieldID, __ndsigma); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ndelta) (*env)->ReleasePrimitiveArrayCritical(env, delta, __ndelta, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetDoubleField(env, dsigma, doubleW_val_fieldID, __ndsigma); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlasd6_)(int *icompq, int *nl, int *nr, int *sqre, double *d, double *vf, double *vl, double *alpha, double *beta, int *idxq, int *perm, int *givptr, int *givcol, int *ldgcol, double *givnum, int *ldgnum, double *poles, double *difl, double *difr, double *z, int *k, double *c, double *s, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd6K(JNIEnv *env, UNUSED jobject obj, jint icompq, jint nl, jint nr, jint sqre, jdoubleArray d, jint offsetd, jdoubleArray vf, jint offsetvf, jdoubleArray vl, jint offsetvl, jobject alpha, jobject beta, jintArray idxq, jint offsetidxq, jintArray perm, jint offsetperm, jobject givptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jdoubleArray givnum, jint offsetgivnum, jint ldgnum, jdoubleArray poles, jint offsetpoles, jdoubleArray difl, jint offsetdifl, jdoubleArray difr, jint offsetdifr, jdoubleArray z, jint offsetz, jobject k, jobject c, jobject s, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - double __nalpha = 0; double __nbeta = 0; int __ngivptr = 0; int __nk = 0; double __nc = 0; double __ns = 0; int __ninfo = 0; double *__nd = NULL; double *__nvf = NULL; double *__nvl = NULL; int *__nidxq = NULL; int *__nperm = NULL; int *__ngivcol = NULL; double *__ngivnum = NULL; double *__npoles = NULL; double *__ndifl = NULL; double *__ndifr = NULL; double *__nz = NULL; double *__nwork = NULL; int *__niwork = NULL; + jboolean __failed = FALSE; + double __nalpha = 0; + double __nbeta = 0; + int __ngivptr = 0; + int __nk = 0; + double __nc = 0; + double __ns = 0; + int __ninfo = 0; + double *__nd = NULL; + double *__nvf = NULL; + double *__nvl = NULL; + int *__nidxq = NULL; + int *__nperm = NULL; + int *__ngivcol = NULL; + double *__ngivnum = NULL; + double *__npoles = NULL; + double *__ndifl = NULL; + double *__ndifr = NULL; + double *__nz = NULL; + double *__nwork = NULL; + int *__niwork = NULL; __nalpha = (*env)->GetDoubleField(env, alpha, doubleW_val_fieldID); __nbeta = (*env)->GetDoubleField(env, beta, doubleW_val_fieldID); __ngivptr = (*env)->GetIntField(env, givptr, intW_val_fieldID); @@ -4912,299 +5274,331 @@ void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd6K(JNIEnv *env, UNUSED jobjec __nc = (*env)->GetDoubleField(env, c, doubleW_val_fieldID); __ns = (*env)->GetDoubleField(env, s, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nvf = (*env)->GetPrimitiveArrayCritical(env, vf, NULL))) goto fail; - if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; - if (!(__nidxq = (*env)->GetPrimitiveArrayCritical(env, idxq, NULL))) goto fail; - if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; - if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; - if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; - if (!(__npoles = (*env)->GetPrimitiveArrayCritical(env, poles, NULL))) goto fail; - if (!(__ndifl = (*env)->GetPrimitiveArrayCritical(env, difl, NULL))) goto fail; - if (!(__ndifr = (*env)->GetPrimitiveArrayCritical(env, difr, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nvf = (*env)->GetPrimitiveArrayCritical(env, vf, NULL))) { __failed = TRUE; goto done; } + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) { __failed = TRUE; goto done; } + if (!(__nidxq = (*env)->GetPrimitiveArrayCritical(env, idxq, NULL))) { __failed = TRUE; goto done; } + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) { __failed = TRUE; goto done; } + if (!(__npoles = (*env)->GetPrimitiveArrayCritical(env, poles, NULL))) { __failed = TRUE; goto done; } + if (!(__ndifl = (*env)->GetPrimitiveArrayCritical(env, difl, NULL))) { __failed = TRUE; goto done; } + if (!(__ndifr = (*env)->GetPrimitiveArrayCritical(env, difr, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dlasd6_(&icompq, &nl, &nr, &sqre, __nd + offsetd, __nvf + offsetvf, __nvl + offsetvl, &__nalpha, &__nbeta, __nidxq + offsetidxq, __nperm + offsetperm, &__ngivptr, __ngivcol + offsetgivcol, &ldgcol, __ngivnum + offsetgivnum, &ldgnum, __npoles + offsetpoles, __ndifl + offsetdifl, __ndifr + offsetdifr, __nz + offsetz, &__nk, &__nc, &__ns, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__ndifr) (*env)->ReleasePrimitiveArrayCritical(env, difr, __ndifr, failed ? JNI_ABORT : 0); - if (__ndifl) (*env)->ReleasePrimitiveArrayCritical(env, difl, __ndifl, failed ? JNI_ABORT : 0); - if (__npoles) (*env)->ReleasePrimitiveArrayCritical(env, poles, __npoles, failed ? JNI_ABORT : 0); - if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); - if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); - if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); - if (__nidxq) (*env)->ReleasePrimitiveArrayCritical(env, idxq, __nidxq, failed ? JNI_ABORT : 0); - if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); - if (__nvf) (*env)->ReleasePrimitiveArrayCritical(env, vf, __nvf, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, s, doubleW_val_fieldID, __ns); - if (!failed) (*env)->SetDoubleField(env, c, doubleW_val_fieldID, __nc); - if (!failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); - if (!failed) (*env)->SetIntField(env, givptr, intW_val_fieldID, __ngivptr); - if (!failed) (*env)->SetDoubleField(env, beta, doubleW_val_fieldID, __nbeta); - if (!failed) (*env)->SetDoubleField(env, alpha, doubleW_val_fieldID, __nalpha); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__ndifr) (*env)->ReleasePrimitiveArrayCritical(env, difr, __ndifr, __failed ? JNI_ABORT : 0); + if (__ndifl) (*env)->ReleasePrimitiveArrayCritical(env, difl, __ndifl, __failed ? JNI_ABORT : 0); + if (__npoles) (*env)->ReleasePrimitiveArrayCritical(env, poles, __npoles, __failed ? JNI_ABORT : 0); + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, __failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, __failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, __failed ? JNI_ABORT : 0); + if (__nidxq) (*env)->ReleasePrimitiveArrayCritical(env, idxq, __nidxq, __failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, __failed ? JNI_ABORT : 0); + if (__nvf) (*env)->ReleasePrimitiveArrayCritical(env, vf, __nvf, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, s, doubleW_val_fieldID, __ns); + if (!__failed) (*env)->SetDoubleField(env, c, doubleW_val_fieldID, __nc); + if (!__failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); + if (!__failed) (*env)->SetIntField(env, givptr, intW_val_fieldID, __ngivptr); + if (!__failed) (*env)->SetDoubleField(env, beta, doubleW_val_fieldID, __nbeta); + if (!__failed) (*env)->SetDoubleField(env, alpha, doubleW_val_fieldID, __nalpha); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlasd7_)(int *icompq, int *nl, int *nr, int *sqre, int *k, double *d, double *z, double *zw, double *vf, double *vfw, double *vl, double *vlw, double *alpha, double *beta, double *dsigma, int *idx, int *idxp, int *idxq, int *perm, int *givptr, int *givcol, int *ldgcol, double *givnum, int *ldgnum, double *c, double *s, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd7K(JNIEnv *env, UNUSED jobject obj, jint icompq, jint nl, jint nr, jint sqre, jobject k, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdoubleArray zw, jint offsetzw, jdoubleArray vf, jint offsetvf, jdoubleArray vfw, jint offsetvfw, jdoubleArray vl, jint offsetvl, jdoubleArray vlw, jint offsetvlw, jdouble alpha, jdouble beta, jdoubleArray dsigma, jint offsetdsigma, jintArray idx, jint offsetidx, jintArray idxp, jint offsetidxp, jintArray idxq, jint offsetidxq, jintArray perm, jint offsetperm, jobject givptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jdoubleArray givnum, jint offsetgivnum, jint ldgnum, jobject c, jobject s, jobject info) { - jboolean failed = FALSE; - int __nk = 0; int __ngivptr = 0; double __nc = 0; double __ns = 0; int __ninfo = 0; double *__nd = NULL; double *__nz = NULL; double *__nzw = NULL; double *__nvf = NULL; double *__nvfw = NULL; double *__nvl = NULL; double *__nvlw = NULL; double *__ndsigma = NULL; int *__nidx = NULL; int *__nidxp = NULL; int *__nidxq = NULL; int *__nperm = NULL; int *__ngivcol = NULL; double *__ngivnum = NULL; + jboolean __failed = FALSE; + int __nk = 0; + int __ngivptr = 0; + double __nc = 0; + double __ns = 0; + int __ninfo = 0; + double *__nd = NULL; + double *__nz = NULL; + double *__nzw = NULL; + double *__nvf = NULL; + double *__nvfw = NULL; + double *__nvl = NULL; + double *__nvlw = NULL; + double *__ndsigma = NULL; + int *__nidx = NULL; + int *__nidxp = NULL; + int *__nidxq = NULL; + int *__nperm = NULL; + int *__ngivcol = NULL; + double *__ngivnum = NULL; __nk = (*env)->GetIntField(env, k, intW_val_fieldID); __ngivptr = (*env)->GetIntField(env, givptr, intW_val_fieldID); __nc = (*env)->GetDoubleField(env, c, doubleW_val_fieldID); __ns = (*env)->GetDoubleField(env, s, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nzw = (*env)->GetPrimitiveArrayCritical(env, zw, NULL))) goto fail; - if (!(__nvf = (*env)->GetPrimitiveArrayCritical(env, vf, NULL))) goto fail; - if (!(__nvfw = (*env)->GetPrimitiveArrayCritical(env, vfw, NULL))) goto fail; - if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; - if (!(__nvlw = (*env)->GetPrimitiveArrayCritical(env, vlw, NULL))) goto fail; - if (!(__ndsigma = (*env)->GetPrimitiveArrayCritical(env, dsigma, NULL))) goto fail; - if (!(__nidx = (*env)->GetPrimitiveArrayCritical(env, idx, NULL))) goto fail; - if (!(__nidxp = (*env)->GetPrimitiveArrayCritical(env, idxp, NULL))) goto fail; - if (!(__nidxq = (*env)->GetPrimitiveArrayCritical(env, idxq, NULL))) goto fail; - if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; - if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; - if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nzw = (*env)->GetPrimitiveArrayCritical(env, zw, NULL))) { __failed = TRUE; goto done; } + if (!(__nvf = (*env)->GetPrimitiveArrayCritical(env, vf, NULL))) { __failed = TRUE; goto done; } + if (!(__nvfw = (*env)->GetPrimitiveArrayCritical(env, vfw, NULL))) { __failed = TRUE; goto done; } + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) { __failed = TRUE; goto done; } + if (!(__nvlw = (*env)->GetPrimitiveArrayCritical(env, vlw, NULL))) { __failed = TRUE; goto done; } + if (!(__ndsigma = (*env)->GetPrimitiveArrayCritical(env, dsigma, NULL))) { __failed = TRUE; goto done; } + if (!(__nidx = (*env)->GetPrimitiveArrayCritical(env, idx, NULL))) { __failed = TRUE; goto done; } + if (!(__nidxp = (*env)->GetPrimitiveArrayCritical(env, idxp, NULL))) { __failed = TRUE; goto done; } + if (!(__nidxq = (*env)->GetPrimitiveArrayCritical(env, idxq, NULL))) { __failed = TRUE; goto done; } + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) { __failed = TRUE; goto done; } dlasd7_(&icompq, &nl, &nr, &sqre, &__nk, __nd + offsetd, __nz + offsetz, __nzw + offsetzw, __nvf + offsetvf, __nvfw + offsetvfw, __nvl + offsetvl, __nvlw + offsetvlw, &alpha, &beta, __ndsigma + offsetdsigma, __nidx + offsetidx, __nidxp + offsetidxp, __nidxq + offsetidxq, __nperm + offsetperm, &__ngivptr, __ngivcol + offsetgivcol, &ldgcol, __ngivnum + offsetgivnum, &ldgnum, &__nc, &__ns, &__ninfo); done: - if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); - if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); - if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); - if (__nidxq) (*env)->ReleasePrimitiveArrayCritical(env, idxq, __nidxq, failed ? JNI_ABORT : 0); - if (__nidxp) (*env)->ReleasePrimitiveArrayCritical(env, idxp, __nidxp, failed ? JNI_ABORT : 0); - if (__nidx) (*env)->ReleasePrimitiveArrayCritical(env, idx, __nidx, failed ? JNI_ABORT : 0); - if (__ndsigma) (*env)->ReleasePrimitiveArrayCritical(env, dsigma, __ndsigma, failed ? JNI_ABORT : 0); - if (__nvlw) (*env)->ReleasePrimitiveArrayCritical(env, vlw, __nvlw, failed ? JNI_ABORT : 0); - if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); - if (__nvfw) (*env)->ReleasePrimitiveArrayCritical(env, vfw, __nvfw, failed ? JNI_ABORT : 0); - if (__nvf) (*env)->ReleasePrimitiveArrayCritical(env, vf, __nvf, failed ? JNI_ABORT : 0); - if (__nzw) (*env)->ReleasePrimitiveArrayCritical(env, zw, __nzw, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, s, doubleW_val_fieldID, __ns); - if (!failed) (*env)->SetDoubleField(env, c, doubleW_val_fieldID, __nc); - if (!failed) (*env)->SetIntField(env, givptr, intW_val_fieldID, __ngivptr); - if (!failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, __failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, __failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, __failed ? JNI_ABORT : 0); + if (__nidxq) (*env)->ReleasePrimitiveArrayCritical(env, idxq, __nidxq, __failed ? JNI_ABORT : 0); + if (__nidxp) (*env)->ReleasePrimitiveArrayCritical(env, idxp, __nidxp, __failed ? JNI_ABORT : 0); + if (__nidx) (*env)->ReleasePrimitiveArrayCritical(env, idx, __nidx, __failed ? JNI_ABORT : 0); + if (__ndsigma) (*env)->ReleasePrimitiveArrayCritical(env, dsigma, __ndsigma, __failed ? JNI_ABORT : 0); + if (__nvlw) (*env)->ReleasePrimitiveArrayCritical(env, vlw, __nvlw, __failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, __failed ? JNI_ABORT : 0); + if (__nvfw) (*env)->ReleasePrimitiveArrayCritical(env, vfw, __nvfw, __failed ? JNI_ABORT : 0); + if (__nvf) (*env)->ReleasePrimitiveArrayCritical(env, vf, __nvf, __failed ? JNI_ABORT : 0); + if (__nzw) (*env)->ReleasePrimitiveArrayCritical(env, zw, __nzw, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, s, doubleW_val_fieldID, __ns); + if (!__failed) (*env)->SetDoubleField(env, c, doubleW_val_fieldID, __nc); + if (!__failed) (*env)->SetIntField(env, givptr, intW_val_fieldID, __ngivptr); + if (!__failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlasd8_)(int *icompq, int *k, double *d, double *z, double *vf, double *vl, double *difl, double *difr, int *lddifr, double *dsigma, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasd8K(JNIEnv *env, UNUSED jobject obj, jint icompq, jint k, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jdoubleArray vf, jint offsetvf, jdoubleArray vl, jint offsetvl, jdoubleArray difl, jint offsetdifl, jdoubleArray difr, jint offsetdifr, jint lddifr, jdoubleArray dsigma, jint offsetdsigma, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__nd = NULL; double *__nz = NULL; double *__nvf = NULL; double *__nvl = NULL; double *__ndifl = NULL; double *__ndifr = NULL; double *__ndsigma = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nvf = (*env)->GetPrimitiveArrayCritical(env, vf, NULL))) goto fail; - if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; - if (!(__ndifl = (*env)->GetPrimitiveArrayCritical(env, difl, NULL))) goto fail; - if (!(__ndifr = (*env)->GetPrimitiveArrayCritical(env, difr, NULL))) goto fail; - if (!(__ndsigma = (*env)->GetPrimitiveArrayCritical(env, dsigma, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__nd = NULL; + double *__nz = NULL; + double *__nvf = NULL; + double *__nvl = NULL; + double *__ndifl = NULL; + double *__ndifr = NULL; + double *__ndsigma = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nvf = (*env)->GetPrimitiveArrayCritical(env, vf, NULL))) { __failed = TRUE; goto done; } + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) { __failed = TRUE; goto done; } + if (!(__ndifl = (*env)->GetPrimitiveArrayCritical(env, difl, NULL))) { __failed = TRUE; goto done; } + if (!(__ndifr = (*env)->GetPrimitiveArrayCritical(env, difr, NULL))) { __failed = TRUE; goto done; } + if (!(__ndsigma = (*env)->GetPrimitiveArrayCritical(env, dsigma, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dlasd8_(&icompq, &k, __nd + offsetd, __nz + offsetz, __nvf + offsetvf, __nvl + offsetvl, __ndifl + offsetdifl, __ndifr + offsetdifr, &lddifr, __ndsigma + offsetdsigma, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ndsigma) (*env)->ReleasePrimitiveArrayCritical(env, dsigma, __ndsigma, failed ? JNI_ABORT : 0); - if (__ndifr) (*env)->ReleasePrimitiveArrayCritical(env, difr, __ndifr, failed ? JNI_ABORT : 0); - if (__ndifl) (*env)->ReleasePrimitiveArrayCritical(env, difl, __ndifl, failed ? JNI_ABORT : 0); - if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); - if (__nvf) (*env)->ReleasePrimitiveArrayCritical(env, vf, __nvf, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ndsigma) (*env)->ReleasePrimitiveArrayCritical(env, dsigma, __ndsigma, __failed ? JNI_ABORT : 0); + if (__ndifr) (*env)->ReleasePrimitiveArrayCritical(env, difr, __ndifr, __failed ? JNI_ABORT : 0); + if (__ndifl) (*env)->ReleasePrimitiveArrayCritical(env, difl, __ndifl, __failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, __failed ? JNI_ABORT : 0); + if (__nvf) (*env)->ReleasePrimitiveArrayCritical(env, vf, __nvf, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlasda_)(int *icompq, int *smlsiz, int *n, int *sqre, double *d, double *e, double *u, int *ldu, double *vt, int *k, double *difl, double *difr, double *z, double *poles, int *givptr, int *givcol, int *ldgcol, int *perm, double *givnum, double *c, double *s, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasdaK(JNIEnv *env, UNUSED jobject obj, jint icompq, jint smlsiz, jint n, jint sqre, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jintArray k, jint offsetk, jdoubleArray difl, jint offsetdifl, jdoubleArray difr, jint offsetdifr, jdoubleArray z, jint offsetz, jdoubleArray poles, jint offsetpoles, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jintArray perm, jint offsetperm, jdoubleArray givnum, jint offsetgivnum, jdoubleArray c, jint offsetc, jdoubleArray s, jint offsets, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nu = NULL; double *__nvt = NULL; int *__nk = NULL; double *__ndifl = NULL; double *__ndifr = NULL; double *__nz = NULL; double *__npoles = NULL; int *__ngivptr = NULL; int *__ngivcol = NULL; int *__nperm = NULL; double *__ngivnum = NULL; double *__nc = NULL; double *__ns = NULL; double *__nwork = NULL; int *__niwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; - if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; - if (!(__nk = (*env)->GetPrimitiveArrayCritical(env, k, NULL))) goto fail; - if (!(__ndifl = (*env)->GetPrimitiveArrayCritical(env, difl, NULL))) goto fail; - if (!(__ndifr = (*env)->GetPrimitiveArrayCritical(env, difr, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__npoles = (*env)->GetPrimitiveArrayCritical(env, poles, NULL))) goto fail; - if (!(__ngivptr = (*env)->GetPrimitiveArrayCritical(env, givptr, NULL))) goto fail; - if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; - if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; - if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; + double *__nu = NULL; + double *__nvt = NULL; + int *__nk = NULL; + double *__ndifl = NULL; + double *__ndifr = NULL; + double *__nz = NULL; + double *__npoles = NULL; + int *__ngivptr = NULL; + int *__ngivcol = NULL; + int *__nperm = NULL; + double *__ngivnum = NULL; + double *__nc = NULL; + double *__ns = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) { __failed = TRUE; goto done; } + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) { __failed = TRUE; goto done; } + if (!(__nk = (*env)->GetPrimitiveArrayCritical(env, k, NULL))) { __failed = TRUE; goto done; } + if (!(__ndifl = (*env)->GetPrimitiveArrayCritical(env, difl, NULL))) { __failed = TRUE; goto done; } + if (!(__ndifr = (*env)->GetPrimitiveArrayCritical(env, difr, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__npoles = (*env)->GetPrimitiveArrayCritical(env, poles, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivptr = (*env)->GetPrimitiveArrayCritical(env, givptr, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) { __failed = TRUE; goto done; } + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dlasda_(&icompq, &smlsiz, &n, &sqre, __nd + offsetd, __ne + offsete, __nu + offsetu, &ldu, __nvt + offsetvt, __nk + offsetk, __ndifl + offsetdifl, __ndifr + offsetdifr, __nz + offsetz, __npoles + offsetpoles, __ngivptr + offsetgivptr, __ngivcol + offsetgivcol, &ldgcol, __nperm + offsetperm, __ngivnum + offsetgivnum, __nc + offsetc, __ns + offsets, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); - if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); - if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); - if (__ngivptr) (*env)->ReleasePrimitiveArrayCritical(env, givptr, __ngivptr, failed ? JNI_ABORT : 0); - if (__npoles) (*env)->ReleasePrimitiveArrayCritical(env, poles, __npoles, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__ndifr) (*env)->ReleasePrimitiveArrayCritical(env, difr, __ndifr, failed ? JNI_ABORT : 0); - if (__ndifl) (*env)->ReleasePrimitiveArrayCritical(env, difl, __ndifl, failed ? JNI_ABORT : 0); - if (__nk) (*env)->ReleasePrimitiveArrayCritical(env, k, __nk, failed ? JNI_ABORT : 0); - if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); - if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, __failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, __failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, __failed ? JNI_ABORT : 0); + if (__ngivptr) (*env)->ReleasePrimitiveArrayCritical(env, givptr, __ngivptr, __failed ? JNI_ABORT : 0); + if (__npoles) (*env)->ReleasePrimitiveArrayCritical(env, poles, __npoles, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__ndifr) (*env)->ReleasePrimitiveArrayCritical(env, difr, __ndifr, __failed ? JNI_ABORT : 0); + if (__ndifl) (*env)->ReleasePrimitiveArrayCritical(env, difl, __ndifl, __failed ? JNI_ABORT : 0); + if (__nk) (*env)->ReleasePrimitiveArrayCritical(env, k, __nk, __failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, __failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlasdq_)(const char *uplo, int *sqre, int *n, int *ncvt, int *nru, int *ncc, double *d, double *e, double *vt, int *ldvt, double *u, int *ldu, double *c, int *Ldc, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasdqK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint sqre, jint n, jint ncvt, jint nru, jint ncc, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray vt, jint offsetvt, jint ldvt, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nvt = NULL; double *__nu = NULL; double *__nc = NULL; double *__nwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; - if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; + double *__nvt = NULL; + double *__nu = NULL; + double *__nc = NULL; + double *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) { __failed = TRUE; goto done; } + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dlasdq_(__nuplo, &sqre, &n, &ncvt, &nru, &ncc, __nd + offsetd, __ne + offsete, __nvt + offsetvt, &ldvt, __nu + offsetu, &ldu, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); - if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, __failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlasdt_)(int *n, int *lvl, int *nd, int *inode, int *ndiml, int *ndimr, int *msub); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasdtK(JNIEnv *env, UNUSED jobject obj, jint n, jobject lvl, jobject nd, jintArray inode, jint offsetinode, jintArray ndiml, jint offsetndiml, jintArray ndimr, jint offsetndimr, jint msub) { - jboolean failed = FALSE; - int __nlvl = 0; int __nnd = 0; int *__ninode = NULL; int *__nndiml = NULL; int *__nndimr = NULL; + jboolean __failed = FALSE; + int __nlvl = 0; + int __nnd = 0; + int *__ninode = NULL; + int *__nndiml = NULL; + int *__nndimr = NULL; __nlvl = (*env)->GetIntField(env, lvl, intW_val_fieldID); __nnd = (*env)->GetIntField(env, nd, intW_val_fieldID); - if (!(__ninode = (*env)->GetPrimitiveArrayCritical(env, inode, NULL))) goto fail; - if (!(__nndiml = (*env)->GetPrimitiveArrayCritical(env, ndiml, NULL))) goto fail; - if (!(__nndimr = (*env)->GetPrimitiveArrayCritical(env, ndimr, NULL))) goto fail; + if (!(__ninode = (*env)->GetPrimitiveArrayCritical(env, inode, NULL))) { __failed = TRUE; goto done; } + if (!(__nndiml = (*env)->GetPrimitiveArrayCritical(env, ndiml, NULL))) { __failed = TRUE; goto done; } + if (!(__nndimr = (*env)->GetPrimitiveArrayCritical(env, ndimr, NULL))) { __failed = TRUE; goto done; } dlasdt_(&n, &__nlvl, &__nnd, __ninode + offsetinode, __nndiml + offsetndiml, __nndimr + offsetndimr, &msub); done: - if (__nndimr) (*env)->ReleasePrimitiveArrayCritical(env, ndimr, __nndimr, failed ? JNI_ABORT : 0); - if (__nndiml) (*env)->ReleasePrimitiveArrayCritical(env, ndiml, __nndiml, failed ? JNI_ABORT : 0); - if (__ninode) (*env)->ReleasePrimitiveArrayCritical(env, inode, __ninode, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, nd, intW_val_fieldID, __nnd); - if (!failed) (*env)->SetIntField(env, lvl, intW_val_fieldID, __nlvl); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nndimr) (*env)->ReleasePrimitiveArrayCritical(env, ndimr, __nndimr, __failed ? JNI_ABORT : 0); + if (__nndiml) (*env)->ReleasePrimitiveArrayCritical(env, ndiml, __nndiml, __failed ? JNI_ABORT : 0); + if (__ninode) (*env)->ReleasePrimitiveArrayCritical(env, inode, __ninode, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, nd, intW_val_fieldID, __nnd); + if (!__failed) (*env)->SetIntField(env, lvl, intW_val_fieldID, __nlvl); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaset_)(const char *uplo, int *m, int *n, double *alpha, double *beta, double *a, int *lda); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasetK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint m, jint n, jdouble alpha, jdouble beta, jdoubleArray a, jint offseta, jint lda) { - jboolean failed = FALSE; - const char *__nuplo = NULL; double *__na = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + double *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } dlaset_(__nuplo, &m, &n, &alpha, &beta, __na + offseta, &lda); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlasq1_)(int *n, double *d, double *e, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq1K(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dlasq1_(&n, __nd + offsetd, __ne + offsete, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlasq2_)(int *n, double *z, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq2K(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray z, jint offsetz, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__nz = NULL; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__nz = NULL; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } dlasq2_(&n, __nz + offsetz, &__ninfo); done: - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlasq3_)(int *i0, int *n0, double *z, int *pp, double *dmin, double *sigma, double *desig, double *qmax, int *nfail, int *iter, int *ndiv, int *ieee); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq3K(JNIEnv *env, UNUSED jobject obj, jint i0, jobject n0, jdoubleArray z, jint offsetz, jint pp, jobject dmin, jobject sigma, jobject desig, jobject qmax, jobject nfail, jobject iter, jobject ndiv, jboolean ieee) { - jboolean failed = FALSE; - int __nn0 = 0; double __ndmin = 0; double __nsigma = 0; double __ndesig = 0; double __nqmax = 0; int __nnfail = 0; int __niter = 0; int __nndiv = 0; int __nieee; double *__nz = NULL; + jboolean __failed = FALSE; + int __nn0 = 0; + double __ndmin = 0; + double __nsigma = 0; + double __ndesig = 0; + double __nqmax = 0; + int __nnfail = 0; + int __niter = 0; + int __nndiv = 0; + int __nieee; + double *__nz = NULL; __nn0 = (*env)->GetIntField(env, n0, intW_val_fieldID); __ndmin = (*env)->GetDoubleField(env, dmin, doubleW_val_fieldID); __nsigma = (*env)->GetDoubleField(env, sigma, doubleW_val_fieldID); @@ -5214,51 +5608,52 @@ void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq3K(JNIEnv *env, UNUSED jobjec __niter = (*env)->GetIntField(env, iter, intW_val_fieldID); __nndiv = (*env)->GetIntField(env, ndiv, intW_val_fieldID); __nieee = ieee; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } dlasq3_(&i0, &__nn0, __nz + offsetz, &pp, &__ndmin, &__nsigma, &__ndesig, &__nqmax, &__nnfail, &__niter, &__nndiv, &__nieee); done: - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (!failed) ieee = __nieee; - if (!failed) (*env)->SetIntField(env, ndiv, intW_val_fieldID, __nndiv); - if (!failed) (*env)->SetIntField(env, iter, intW_val_fieldID, __niter); - if (!failed) (*env)->SetIntField(env, nfail, intW_val_fieldID, __nnfail); - if (!failed) (*env)->SetDoubleField(env, qmax, doubleW_val_fieldID, __nqmax); - if (!failed) (*env)->SetDoubleField(env, desig, doubleW_val_fieldID, __ndesig); - if (!failed) (*env)->SetDoubleField(env, sigma, doubleW_val_fieldID, __nsigma); - if (!failed) (*env)->SetDoubleField(env, dmin, doubleW_val_fieldID, __ndmin); - if (!failed) (*env)->SetIntField(env, n0, intW_val_fieldID, __nn0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (!__failed) ieee = __nieee; + if (!__failed) (*env)->SetIntField(env, ndiv, intW_val_fieldID, __nndiv); + if (!__failed) (*env)->SetIntField(env, iter, intW_val_fieldID, __niter); + if (!__failed) (*env)->SetIntField(env, nfail, intW_val_fieldID, __nnfail); + if (!__failed) (*env)->SetDoubleField(env, qmax, doubleW_val_fieldID, __nqmax); + if (!__failed) (*env)->SetDoubleField(env, desig, doubleW_val_fieldID, __ndesig); + if (!__failed) (*env)->SetDoubleField(env, sigma, doubleW_val_fieldID, __nsigma); + if (!__failed) (*env)->SetDoubleField(env, dmin, doubleW_val_fieldID, __ndmin); + if (!__failed) (*env)->SetIntField(env, n0, intW_val_fieldID, __nn0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlasq4_)(int *i0, int *n0, double *z, int *pp, int *n0in, double *dmin, double *dmin1, double *dmin2, double *dn, double *dn1, double *dn2, double *tau, int *ttype); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq4K(JNIEnv *env, UNUSED jobject obj, jint i0, jint n0, jdoubleArray z, jint offsetz, jint pp, jint n0in, jdouble dmin, jdouble dmin1, jdouble dmin2, jdouble dn, jdouble dn1, jdouble dn2, jobject tau, jobject ttype) { - jboolean failed = FALSE; - double __ntau = 0; int __nttype = 0; double *__nz = NULL; + jboolean __failed = FALSE; + double __ntau = 0; + int __nttype = 0; + double *__nz = NULL; __ntau = (*env)->GetDoubleField(env, tau, doubleW_val_fieldID); __nttype = (*env)->GetIntField(env, ttype, intW_val_fieldID); - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } dlasq4_(&i0, &n0, __nz + offsetz, &pp, &n0in, &dmin, &dmin1, &dmin2, &dn, &dn1, &dn2, &__ntau, &__nttype); done: - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, ttype, intW_val_fieldID, __nttype); - if (!failed) (*env)->SetDoubleField(env, tau, doubleW_val_fieldID, __ntau); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, ttype, intW_val_fieldID, __nttype); + if (!__failed) (*env)->SetDoubleField(env, tau, doubleW_val_fieldID, __ntau); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlasq5_)(int *i0, int *n0, double *z, int *pp, double *tau, double *dmin, double *dmin1, double *dmin2, double *dn, double *dnm1, double *dnm2, int *ieee); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq5K(JNIEnv *env, UNUSED jobject obj, jint i0, jint n0, jdoubleArray z, jint offsetz, jint pp, jdouble tau, jobject dmin, jobject dmin1, jobject dmin2, jobject dn, jobject dnm1, jobject dnm2, jboolean ieee) { - jboolean failed = FALSE; - double __ndmin = 0; double __ndmin1 = 0; double __ndmin2 = 0; double __ndn = 0; double __ndnm1 = 0; double __ndnm2 = 0; int __nieee; double *__nz = NULL; + jboolean __failed = FALSE; + double __ndmin = 0; + double __ndmin1 = 0; + double __ndmin2 = 0; + double __ndn = 0; + double __ndnm1 = 0; + double __ndnm2 = 0; + int __nieee; + double *__nz = NULL; __ndmin = (*env)->GetDoubleField(env, dmin, doubleW_val_fieldID); __ndmin1 = (*env)->GetDoubleField(env, dmin1, doubleW_val_fieldID); __ndmin2 = (*env)->GetDoubleField(env, dmin2, doubleW_val_fieldID); @@ -5266,123 +5661,123 @@ void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq5K(JNIEnv *env, UNUSED jobjec __ndnm1 = (*env)->GetDoubleField(env, dnm1, doubleW_val_fieldID); __ndnm2 = (*env)->GetDoubleField(env, dnm2, doubleW_val_fieldID); __nieee = ieee; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } dlasq5_(&i0, &n0, __nz + offsetz, &pp, &tau, &__ndmin, &__ndmin1, &__ndmin2, &__ndn, &__ndnm1, &__ndnm2, &__nieee); done: - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (!failed) ieee = __nieee; - if (!failed) (*env)->SetDoubleField(env, dnm2, doubleW_val_fieldID, __ndnm2); - if (!failed) (*env)->SetDoubleField(env, dnm1, doubleW_val_fieldID, __ndnm1); - if (!failed) (*env)->SetDoubleField(env, dn, doubleW_val_fieldID, __ndn); - if (!failed) (*env)->SetDoubleField(env, dmin2, doubleW_val_fieldID, __ndmin2); - if (!failed) (*env)->SetDoubleField(env, dmin1, doubleW_val_fieldID, __ndmin1); - if (!failed) (*env)->SetDoubleField(env, dmin, doubleW_val_fieldID, __ndmin); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (!__failed) ieee = __nieee; + if (!__failed) (*env)->SetDoubleField(env, dnm2, doubleW_val_fieldID, __ndnm2); + if (!__failed) (*env)->SetDoubleField(env, dnm1, doubleW_val_fieldID, __ndnm1); + if (!__failed) (*env)->SetDoubleField(env, dn, doubleW_val_fieldID, __ndn); + if (!__failed) (*env)->SetDoubleField(env, dmin2, doubleW_val_fieldID, __ndmin2); + if (!__failed) (*env)->SetDoubleField(env, dmin1, doubleW_val_fieldID, __ndmin1); + if (!__failed) (*env)->SetDoubleField(env, dmin, doubleW_val_fieldID, __ndmin); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlasq6_)(int *i0, int *n0, double *z, int *pp, double *dmin, double *dmin1, double *dmin2, double *dn, double *dnm1, double *dnm2); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasq6K(JNIEnv *env, UNUSED jobject obj, jint i0, jint n0, jdoubleArray z, jint offsetz, jint pp, jobject dmin, jobject dmin1, jobject dmin2, jobject dn, jobject dnm1, jobject dnm2) { - jboolean failed = FALSE; - double __ndmin = 0; double __ndmin1 = 0; double __ndmin2 = 0; double __ndn = 0; double __ndnm1 = 0; double __ndnm2 = 0; double *__nz = NULL; + jboolean __failed = FALSE; + double __ndmin = 0; + double __ndmin1 = 0; + double __ndmin2 = 0; + double __ndn = 0; + double __ndnm1 = 0; + double __ndnm2 = 0; + double *__nz = NULL; __ndmin = (*env)->GetDoubleField(env, dmin, doubleW_val_fieldID); __ndmin1 = (*env)->GetDoubleField(env, dmin1, doubleW_val_fieldID); __ndmin2 = (*env)->GetDoubleField(env, dmin2, doubleW_val_fieldID); __ndn = (*env)->GetDoubleField(env, dn, doubleW_val_fieldID); __ndnm1 = (*env)->GetDoubleField(env, dnm1, doubleW_val_fieldID); __ndnm2 = (*env)->GetDoubleField(env, dnm2, doubleW_val_fieldID); - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } dlasq6_(&i0, &n0, __nz + offsetz, &pp, &__ndmin, &__ndmin1, &__ndmin2, &__ndn, &__ndnm1, &__ndnm2); done: - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetDoubleField(env, dnm2, doubleW_val_fieldID, __ndnm2); - if (!failed) (*env)->SetDoubleField(env, dnm1, doubleW_val_fieldID, __ndnm1); - if (!failed) (*env)->SetDoubleField(env, dn, doubleW_val_fieldID, __ndn); - if (!failed) (*env)->SetDoubleField(env, dmin2, doubleW_val_fieldID, __ndmin2); - if (!failed) (*env)->SetDoubleField(env, dmin1, doubleW_val_fieldID, __ndmin1); - if (!failed) (*env)->SetDoubleField(env, dmin, doubleW_val_fieldID, __ndmin); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetDoubleField(env, dnm2, doubleW_val_fieldID, __ndnm2); + if (!__failed) (*env)->SetDoubleField(env, dnm1, doubleW_val_fieldID, __ndnm1); + if (!__failed) (*env)->SetDoubleField(env, dn, doubleW_val_fieldID, __ndn); + if (!__failed) (*env)->SetDoubleField(env, dmin2, doubleW_val_fieldID, __ndmin2); + if (!__failed) (*env)->SetDoubleField(env, dmin1, doubleW_val_fieldID, __ndmin1); + if (!__failed) (*env)->SetDoubleField(env, dmin, doubleW_val_fieldID, __ndmin); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlasr_)(const char *side, const char *pivot, const char *direct, int *m, int *n, double *c, double *s, double *a, int *lda); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasrK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring pivot, jstring direct, jint m, jint n, jdoubleArray c, jint offsetc, jdoubleArray s, jint offsets, jdoubleArray a, jint offseta, jint lda) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__npivot = NULL; const char *__ndirect = NULL; double *__nc = NULL; double *__ns = NULL; double *__na = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__npivot = (*env)->GetStringUTFChars(env, pivot, NULL))) goto fail; - if (!(__ndirect = (*env)->GetStringUTFChars(env, direct, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__npivot = NULL; + const char *__ndirect = NULL; + double *__nc = NULL; + double *__ns = NULL; + double *__na = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__npivot = (*env)->GetStringUTFChars(env, pivot, NULL))) { __failed = TRUE; goto done; } + if (!(__ndirect = (*env)->GetStringUTFChars(env, direct, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } dlasr_(__nside, __npivot, __ndirect, &m, &n, __nc + offsetc, __ns + offsets, __na + offseta, &lda); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); if (__ndirect) (*env)->ReleaseStringUTFChars(env, direct, __ndirect); if (__npivot) (*env)->ReleaseStringUTFChars(env, pivot, __npivot); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlasrt_)(const char *id, int *n, double *d, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasrtK(JNIEnv *env, UNUSED jobject obj, jstring id, jint n, jdoubleArray d, jint offsetd, jobject info) { - jboolean failed = FALSE; - const char *__nid = NULL; int __ninfo = 0; double *__nd = NULL; - if (!(__nid = (*env)->GetStringUTFChars(env, id, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nid = NULL; + int __ninfo = 0; + double *__nd = NULL; + if (!(__nid = (*env)->GetStringUTFChars(env, id, NULL))) { __failed = TRUE; goto done; } __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } dlasrt_(__nid, &n, __nd + offsetd, &__ninfo); done: - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nid) (*env)->ReleaseStringUTFChars(env, id, __nid); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlassq_)(int *n, double *x, int *incx, double *scale, double *sumsq); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlassqK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray x, jint offsetx, jint incx, jobject scale, jobject sumsq) { - jboolean failed = FALSE; - double __nscale = 0; double __nsumsq = 0; double *__nx = NULL; + jboolean __failed = FALSE; + double __nscale = 0; + double __nsumsq = 0; + double *__nx = NULL; __nscale = (*env)->GetDoubleField(env, scale, doubleW_val_fieldID); __nsumsq = (*env)->GetDoubleField(env, sumsq, doubleW_val_fieldID); - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } dlassq_(&n, __nx + offsetx, &incx, &__nscale, &__nsumsq); done: - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetDoubleField(env, sumsq, doubleW_val_fieldID, __nsumsq); - if (!failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetDoubleField(env, sumsq, doubleW_val_fieldID, __nsumsq); + if (!__failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlasv2_)(double *f, double *g, double *h, double *ssmin, double *ssmax, double *snr, double *csr, double *snl, double *csl); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasv2K(JNIEnv *env, UNUSED jobject obj, jdouble f, jdouble g, jdouble h, jobject ssmin, jobject ssmax, jobject snr, jobject csr, jobject snl, jobject csl) { - jboolean failed = FALSE; - double __nssmin = 0; double __nssmax = 0; double __nsnr = 0; double __ncsr = 0; double __nsnl = 0; double __ncsl = 0; + jboolean __failed = FALSE; + double __nssmin = 0; + double __nssmax = 0; + double __nsnr = 0; + double __ncsr = 0; + double __nsnl = 0; + double __ncsl = 0; __nssmin = (*env)->GetDoubleField(env, ssmin, doubleW_val_fieldID); __nssmax = (*env)->GetDoubleField(env, ssmax, doubleW_val_fieldID); __nsnr = (*env)->GetDoubleField(env, snr, doubleW_val_fieldID); @@ -5391,7211 +5786,7779 @@ void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasv2K(JNIEnv *env, UNUSED jobjec __ncsl = (*env)->GetDoubleField(env, csl, doubleW_val_fieldID); dlasv2_(&f, &g, &h, &__nssmin, &__nssmax, &__nsnr, &__ncsr, &__nsnl, &__ncsl); done: - if (!failed) (*env)->SetDoubleField(env, csl, doubleW_val_fieldID, __ncsl); - if (!failed) (*env)->SetDoubleField(env, snl, doubleW_val_fieldID, __nsnl); - if (!failed) (*env)->SetDoubleField(env, csr, doubleW_val_fieldID, __ncsr); - if (!failed) (*env)->SetDoubleField(env, snr, doubleW_val_fieldID, __nsnr); - if (!failed) (*env)->SetDoubleField(env, ssmax, doubleW_val_fieldID, __nssmax); - if (!failed) (*env)->SetDoubleField(env, ssmin, doubleW_val_fieldID, __nssmin); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetDoubleField(env, csl, doubleW_val_fieldID, __ncsl); + if (!__failed) (*env)->SetDoubleField(env, snl, doubleW_val_fieldID, __nsnl); + if (!__failed) (*env)->SetDoubleField(env, csr, doubleW_val_fieldID, __ncsr); + if (!__failed) (*env)->SetDoubleField(env, snr, doubleW_val_fieldID, __nsnr); + if (!__failed) (*env)->SetDoubleField(env, ssmax, doubleW_val_fieldID, __nssmax); + if (!__failed) (*env)->SetDoubleField(env, ssmin, doubleW_val_fieldID, __nssmin); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlaswp_)(int *n, double *a, int *lda, int *k1, int *k2, int *ipiv, int *incx); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlaswpK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray a, jint offseta, jint lda, jint k1, jint k2, jintArray ipiv, jint offsetipiv, jint incx) { - jboolean failed = FALSE; - double *__na = NULL; int *__nipiv = NULL; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + jboolean __failed = FALSE; + double *__na = NULL; + int *__nipiv = NULL; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } dlaswp_(&n, __na + offseta, &lda, &k1, &k2, __nipiv + offsetipiv, &incx); done: - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlasy2_)(int *ltranl, int *ltranr, int *isgn, int *n1, int *n2, double *tl, int *ldtl, double *tr, int *ldtr, double *b, int *ldb, double *scale, double *x, int *ldx, double *xnorm, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasy2K(JNIEnv *env, UNUSED jobject obj, jboolean ltranl, jboolean ltranr, jint isgn, jint n1, jint n2, jdoubleArray tl, jint offsettl, jint ldtl, jdoubleArray tr, jint offsettr, jint ldtr, jdoubleArray b, jint offsetb, jint ldb, jobject scale, jdoubleArray x, jint offsetx, jint ldx, jobject xnorm, jobject info) { - jboolean failed = FALSE; - int __nltranl; int __nltranr; double __nscale = 0; double __nxnorm = 0; int __ninfo = 0; double *__ntl = NULL; double *__ntr = NULL; double *__nb = NULL; double *__nx = NULL; + jboolean __failed = FALSE; + int __nltranl; + int __nltranr; + double __nscale = 0; + double __nxnorm = 0; + int __ninfo = 0; + double *__ntl = NULL; + double *__ntr = NULL; + double *__nb = NULL; + double *__nx = NULL; __nltranl = ltranl; __nltranr = ltranr; __nscale = (*env)->GetDoubleField(env, scale, doubleW_val_fieldID); __nxnorm = (*env)->GetDoubleField(env, xnorm, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__ntl = (*env)->GetPrimitiveArrayCritical(env, tl, NULL))) goto fail; - if (!(__ntr = (*env)->GetPrimitiveArrayCritical(env, tr, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ntl = (*env)->GetPrimitiveArrayCritical(env, tl, NULL))) { __failed = TRUE; goto done; } + if (!(__ntr = (*env)->GetPrimitiveArrayCritical(env, tr, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } dlasy2_(&__nltranl, &__nltranr, &isgn, &n1, &n2, __ntl + offsettl, &ldtl, __ntr + offsettr, &ldtr, __nb + offsetb, &ldb, &__nscale, __nx + offsetx, &ldx, &__nxnorm, &__ninfo); done: - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__ntr) (*env)->ReleasePrimitiveArrayCritical(env, tr, __ntr, failed ? JNI_ABORT : 0); - if (__ntl) (*env)->ReleasePrimitiveArrayCritical(env, tl, __ntl, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, xnorm, doubleW_val_fieldID, __nxnorm); - if (!failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); - if (!failed) ltranr = __nltranr; - if (!failed) ltranl = __nltranl; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__ntr) (*env)->ReleasePrimitiveArrayCritical(env, tr, __ntr, __failed ? JNI_ABORT : 0); + if (__ntl) (*env)->ReleasePrimitiveArrayCritical(env, tl, __ntl, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, xnorm, doubleW_val_fieldID, __nxnorm); + if (!__failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); + if (!__failed) ltranr = __nltranr; + if (!__failed) ltranl = __nltranl; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlasyf_)(const char *uplo, int *n, int *nb, int *kb, double *a, int *lda, int *ipiv, double *w, int *ldw, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlasyfK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nb, jobject kb, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray w, jint offsetw, jint ldw, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __nkb = 0; int __ninfo = 0; double *__na = NULL; int *__nipiv = NULL; double *__nw = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __nkb = 0; + int __ninfo = 0; + double *__na = NULL; + int *__nipiv = NULL; + double *__nw = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nkb = (*env)->GetIntField(env, kb, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } dlasyf_(__nuplo, &n, &nb, &__nkb, __na + offseta, &lda, __nipiv + offsetipiv, __nw + offsetw, &ldw, &__ninfo); done: - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, kb, intW_val_fieldID, __nkb); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, kb, intW_val_fieldID, __nkb); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlatbs_)(const char *uplo, const char *trans, const char *diag, const char *normin, int *n, int *kd, double *ab, int *ldab, double *x, double *scale, double *cnorm, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatbsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jstring normin, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray x, jint offsetx, jobject scale, jdoubleArray cnorm, jint offsetcnorm, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; const char *__nnormin = NULL; double __nscale = 0; int __ninfo = 0; double *__nab = NULL; double *__nx = NULL; double *__ncnorm = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(__nnormin = (*env)->GetStringUTFChars(env, normin, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + const char *__ndiag = NULL; + const char *__nnormin = NULL; + double __nscale = 0; + int __ninfo = 0; + double *__nab = NULL; + double *__nx = NULL; + double *__ncnorm = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + if (!(__nnormin = (*env)->GetStringUTFChars(env, normin, NULL))) { __failed = TRUE; goto done; } __nscale = (*env)->GetDoubleField(env, scale, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ncnorm = (*env)->GetPrimitiveArrayCritical(env, cnorm, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ncnorm = (*env)->GetPrimitiveArrayCritical(env, cnorm, NULL))) { __failed = TRUE; goto done; } dlatbs_(__nuplo, __ntrans, __ndiag, __nnormin, &n, &kd, __nab + offsetab, &ldab, __nx + offsetx, &__nscale, __ncnorm + offsetcnorm, &__ninfo); done: - if (__ncnorm) (*env)->ReleasePrimitiveArrayCritical(env, cnorm, __ncnorm, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); + if (__ncnorm) (*env)->ReleasePrimitiveArrayCritical(env, cnorm, __ncnorm, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); if (__nnormin) (*env)->ReleaseStringUTFChars(env, normin, __nnormin); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlatdf_)(int *ijob, int *n, double *z, int *ldz, double *rhs, double *rdsum, double *rdscal, int *ipiv, int *jpiv); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatdfK(JNIEnv *env, UNUSED jobject obj, jint ijob, jint n, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray rhs, jint offsetrhs, jobject rdsum, jobject rdscal, jintArray ipiv, jint offsetipiv, jintArray jpiv, jint offsetjpiv) { - jboolean failed = FALSE; - double __nrdsum = 0; double __nrdscal = 0; double *__nz = NULL; double *__nrhs = NULL; int *__nipiv = NULL; int *__njpiv = NULL; + jboolean __failed = FALSE; + double __nrdsum = 0; + double __nrdscal = 0; + double *__nz = NULL; + double *__nrhs = NULL; + int *__nipiv = NULL; + int *__njpiv = NULL; __nrdsum = (*env)->GetDoubleField(env, rdsum, doubleW_val_fieldID); __nrdscal = (*env)->GetDoubleField(env, rdscal, doubleW_val_fieldID); - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nrhs = (*env)->GetPrimitiveArrayCritical(env, rhs, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__njpiv = (*env)->GetPrimitiveArrayCritical(env, jpiv, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nrhs = (*env)->GetPrimitiveArrayCritical(env, rhs, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__njpiv = (*env)->GetPrimitiveArrayCritical(env, jpiv, NULL))) { __failed = TRUE; goto done; } dlatdf_(&ijob, &n, __nz + offsetz, &ldz, __nrhs + offsetrhs, &__nrdsum, &__nrdscal, __nipiv + offsetipiv, __njpiv + offsetjpiv); done: - if (__njpiv) (*env)->ReleasePrimitiveArrayCritical(env, jpiv, __njpiv, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nrhs) (*env)->ReleasePrimitiveArrayCritical(env, rhs, __nrhs, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetDoubleField(env, rdscal, doubleW_val_fieldID, __nrdscal); - if (!failed) (*env)->SetDoubleField(env, rdsum, doubleW_val_fieldID, __nrdsum); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__njpiv) (*env)->ReleasePrimitiveArrayCritical(env, jpiv, __njpiv, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nrhs) (*env)->ReleasePrimitiveArrayCritical(env, rhs, __nrhs, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetDoubleField(env, rdscal, doubleW_val_fieldID, __nrdscal); + if (!__failed) (*env)->SetDoubleField(env, rdsum, doubleW_val_fieldID, __nrdsum); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlatps_)(const char *uplo, const char *trans, const char *diag, const char *normin, int *n, double *ap, double *x, double *scale, double *cnorm, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatpsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jstring normin, jint n, jdoubleArray ap, jint offsetap, jdoubleArray x, jint offsetx, jobject scale, jdoubleArray cnorm, jint offsetcnorm, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; const char *__nnormin = NULL; double __nscale = 0; int __ninfo = 0; double *__nap = NULL; double *__nx = NULL; double *__ncnorm = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(__nnormin = (*env)->GetStringUTFChars(env, normin, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + const char *__ndiag = NULL; + const char *__nnormin = NULL; + double __nscale = 0; + int __ninfo = 0; + double *__nap = NULL; + double *__nx = NULL; + double *__ncnorm = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + if (!(__nnormin = (*env)->GetStringUTFChars(env, normin, NULL))) { __failed = TRUE; goto done; } __nscale = (*env)->GetDoubleField(env, scale, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ncnorm = (*env)->GetPrimitiveArrayCritical(env, cnorm, NULL))) goto fail; + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ncnorm = (*env)->GetPrimitiveArrayCritical(env, cnorm, NULL))) { __failed = TRUE; goto done; } dlatps_(__nuplo, __ntrans, __ndiag, __nnormin, &n, __nap + offsetap, __nx + offsetx, &__nscale, __ncnorm + offsetcnorm, &__ninfo); done: - if (__ncnorm) (*env)->ReleasePrimitiveArrayCritical(env, cnorm, __ncnorm, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); + if (__ncnorm) (*env)->ReleasePrimitiveArrayCritical(env, cnorm, __ncnorm, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); if (__nnormin) (*env)->ReleaseStringUTFChars(env, normin, __nnormin); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlatrd_)(const char *uplo, int *n, int *nb, double *a, int *lda, double *e, double *tau, double *w, int *ldw); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatrdK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nb, jdoubleArray a, jint offseta, jint lda, jdoubleArray e, jint offsete, jdoubleArray tau, jint offsettau, jdoubleArray w, jint offsetw, jint ldw) { - jboolean failed = FALSE; - const char *__nuplo = NULL; double *__na = NULL; double *__ne = NULL; double *__ntau = NULL; double *__nw = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + double *__na = NULL; + double *__ne = NULL; + double *__ntau = NULL; + double *__nw = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } dlatrd_(__nuplo, &n, &nb, __na + offseta, &lda, __ne + offsete, __ntau + offsettau, __nw + offsetw, &ldw); done: - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlatrs_)(const char *uplo, const char *trans, const char *diag, const char *normin, int *n, double *a, int *lda, double *x, double *scale, double *cnorm, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jstring normin, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jobject scale, jdoubleArray cnorm, jint offsetcnorm, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; const char *__nnormin = NULL; double __nscale = 0; int __ninfo = 0; double *__na = NULL; double *__nx = NULL; double *__ncnorm = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(__nnormin = (*env)->GetStringUTFChars(env, normin, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + const char *__ndiag = NULL; + const char *__nnormin = NULL; + double __nscale = 0; + int __ninfo = 0; + double *__na = NULL; + double *__nx = NULL; + double *__ncnorm = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + if (!(__nnormin = (*env)->GetStringUTFChars(env, normin, NULL))) { __failed = TRUE; goto done; } __nscale = (*env)->GetDoubleField(env, scale, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ncnorm = (*env)->GetPrimitiveArrayCritical(env, cnorm, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ncnorm = (*env)->GetPrimitiveArrayCritical(env, cnorm, NULL))) { __failed = TRUE; goto done; } dlatrs_(__nuplo, __ntrans, __ndiag, __nnormin, &n, __na + offseta, &lda, __nx + offsetx, &__nscale, __ncnorm + offsetcnorm, &__ninfo); done: - if (__ncnorm) (*env)->ReleasePrimitiveArrayCritical(env, cnorm, __ncnorm, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); + if (__ncnorm) (*env)->ReleasePrimitiveArrayCritical(env, cnorm, __ncnorm, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); if (__nnormin) (*env)->ReleaseStringUTFChars(env, normin, __nnormin); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlatrz_)(int *m, int *n, int *l, double *a, int *lda, double *tau, double *work); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatrzK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint l, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork) { - jboolean failed = FALSE; - double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + double *__na = NULL; + double *__ntau = NULL; + double *__nwork = NULL; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dlatrz_(&m, &n, &l, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlatzm_)(const char *side, int *m, int *n, double *v, int *incv, double *tau, double *c1, double *c2, int *Ldc, double *work); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlatzmK(JNIEnv *env, UNUSED jobject obj, jstring side, jint m, jint n, jdoubleArray v, jint offsetv, jint incv, jdouble tau, jdoubleArray c1, jint offsetc1, jdoubleArray c2, jint offsetc2, jint Ldc, jdoubleArray work, jint offsetwork) { - jboolean failed = FALSE; - const char *__nside = NULL; double *__nv = NULL; double *__nc1 = NULL; double *__nc2 = NULL; double *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nc1 = (*env)->GetPrimitiveArrayCritical(env, c1, NULL))) goto fail; - if (!(__nc2 = (*env)->GetPrimitiveArrayCritical(env, c2, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + double *__nv = NULL; + double *__nc1 = NULL; + double *__nc2 = NULL; + double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nc1 = (*env)->GetPrimitiveArrayCritical(env, c1, NULL))) { __failed = TRUE; goto done; } + if (!(__nc2 = (*env)->GetPrimitiveArrayCritical(env, c2, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dlatzm_(__nside, &m, &n, __nv + offsetv, &incv, &tau, __nc1 + offsetc1, __nc2 + offsetc2, &Ldc, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc2) (*env)->ReleasePrimitiveArrayCritical(env, c2, __nc2, failed ? JNI_ABORT : 0); - if (__nc1) (*env)->ReleasePrimitiveArrayCritical(env, c1, __nc1, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc2) (*env)->ReleasePrimitiveArrayCritical(env, c2, __nc2, __failed ? JNI_ABORT : 0); + if (__nc1) (*env)->ReleasePrimitiveArrayCritical(env, c1, __nc1, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlauu2_)(const char *uplo, int *n, double *a, int *lda, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlauu2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } dlauu2_(__nuplo, &n, __na + offseta, &lda, &__ninfo); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dlauum_)(const char *uplo, int *n, double *a, int *lda, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlauumK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } dlauum_(__nuplo, &n, __na + offseta, &lda, &__ninfo); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); +} + +// static void (*dlazq3_)(int *i0, int *n0, double *z, int *pp, double *dmin, double *sigma, double *desig, double *qmax, int *nfail, int *iter, int *ndiv, int *ieee, int *ttype, double *dmin1, double *dmin2, double *dn, double *dn1, double *dn2, double *tau); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlazq3K(JNIEnv *env, UNUSED jobject obj, UNUSED jint i0, UNUSED jobject n0, UNUSED jdoubleArray z, UNUSED jint offsetz, UNUSED jint pp, UNUSED jobject dmin, UNUSED jobject sigma, UNUSED jobject desig, UNUSED jobject qmax, UNUSED jobject nfail, UNUSED jobject iter, UNUSED jobject ndiv, UNUSED jboolean ieee, UNUSED jobject ttype, UNUSED jobject dmin1, UNUSED jobject dmin2, UNUSED jobject dn, UNUSED jobject dn1, UNUSED jobject dn2, UNUSED jobject tau) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +// static void (*dlazq4_)(int *i0, int *n0, double *z, int *pp, int *n0in, double *dmin, double *dmin1, double *dmin2, double *dn, double *dn1, double *dn2, double *tau, int *ttype, double *g); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlazq4K(JNIEnv *env, UNUSED jobject obj, UNUSED jint i0, UNUSED jint n0, UNUSED jdoubleArray z, UNUSED jint offsetz, UNUSED jint pp, UNUSED jint n0in, UNUSED jdouble dmin, UNUSED jdouble dmin1, UNUSED jdouble dmin2, UNUSED jdouble dn, UNUSED jdouble dn1, UNUSED jdouble dn2, UNUSED jobject tau, UNUSED jobject ttype, UNUSED jobject g) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } static void (*dopgtr_)(const char *uplo, int *n, double *ap, double *tau, double *q, int *ldq, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dopgtrK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray tau, jint offsettau, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; double *__ntau = NULL; double *__nq = NULL; double *__nwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__nap = NULL; + double *__ntau = NULL; + double *__nq = NULL; + double *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dopgtr_(__nuplo, &n, __nap + offsetap, __ntau + offsettau, __nq + offsetq, &ldq, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dopmtr_)(const char *side, const char *uplo, const char *trans, int *m, int *n, double *ap, double *tau, double *c, int *Ldc, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dopmtrK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring uplo, jstring trans, jint m, jint n, jdoubleArray ap, jint offsetap, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__nuplo = NULL; const char *__ntrans = NULL; int __ninfo = 0; double *__nap = NULL; double *__ntau = NULL; double *__nc = NULL; double *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + int __ninfo = 0; + double *__nap = NULL; + double *__ntau = NULL; + double *__nc = NULL; + double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dopmtr_(__nside, __nuplo, __ntrans, &m, &n, __nap + offsetap, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dorg2l_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorg2lK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dorg2l_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dorg2r_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorg2rK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dorg2r_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dorgbr_)(const char *vect, int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgbrK(JNIEnv *env, UNUSED jobject obj, jstring vect, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__nvect = NULL; int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; - if (!(__nvect = (*env)->GetStringUTFChars(env, vect, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nvect = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nwork = NULL; + if (!(__nvect = (*env)->GetStringUTFChars(env, vect, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dorgbr_(__nvect, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nvect) (*env)->ReleaseStringUTFChars(env, vect, __nvect); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dorghr_)(int *n, int *ilo, int *ihi, double *a, int *lda, double *tau, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorghrK(JNIEnv *env, UNUSED jobject obj, jint n, jint ilo, jint ihi, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dorghr_(&n, &ilo, &ihi, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dorgl2_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgl2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dorgl2_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dorglq_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorglqK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dorglq_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dorgql_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgqlK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dorgql_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dorgqr_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgqrK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dorgqr_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dorgr2_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgr2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dorgr2_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dorgrq_)(int *m, int *n, int *k, double *a, int *lda, double *tau, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgrqK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dorgrq_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dorgtr_)(const char *uplo, int *n, double *a, int *lda, double *tau, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorgtrK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dorgtr_(__nuplo, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dorm2l_)(const char *side, const char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorm2lK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nc = NULL; double *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__ntrans = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nc = NULL; + double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dorm2l_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dorm2r_)(const char *side, const char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorm2rK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nc = NULL; double *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__ntrans = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nc = NULL; + double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dorm2r_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dormbr_)(const char *vect, const char *side, const char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormbrK(JNIEnv *env, UNUSED jobject obj, jstring vect, jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__nvect = NULL; const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nc = NULL; double *__nwork = NULL; - if (!(__nvect = (*env)->GetStringUTFChars(env, vect, NULL))) goto fail; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nvect = NULL; + const char *__nside = NULL; + const char *__ntrans = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nc = NULL; + double *__nwork = NULL; + if (!(__nvect = (*env)->GetStringUTFChars(env, vect, NULL))) { __failed = TRUE; goto done; } + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dormbr_(__nvect, __nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); if (__nvect) (*env)->ReleaseStringUTFChars(env, vect, __nvect); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dormhr_)(const char *side, const char *trans, int *m, int *n, int *ilo, int *ihi, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormhrK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint ilo, jint ihi, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nc = NULL; double *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__ntrans = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nc = NULL; + double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dormhr_(__nside, __ntrans, &m, &n, &ilo, &ihi, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dorml2_)(const char *side, const char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dorml2K(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nc = NULL; double *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__ntrans = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nc = NULL; + double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dorml2_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dormlq_)(const char *side, const char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormlqK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nc = NULL; double *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__ntrans = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nc = NULL; + double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dormlq_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dormql_)(const char *side, const char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormqlK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nc = NULL; double *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__ntrans = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nc = NULL; + double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dormql_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dormqr_)(const char *side, const char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormqrK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nc = NULL; double *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__ntrans = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nc = NULL; + double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dormqr_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dormr2_)(const char *side, const char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormr2K(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nc = NULL; double *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__ntrans = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nc = NULL; + double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dormr2_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dormr3_)(const char *side, const char *trans, int *m, int *n, int *k, int *l, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormr3K(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jint l, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nc = NULL; double *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__ntrans = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nc = NULL; + double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dormr3_(__nside, __ntrans, &m, &n, &k, &l, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dormrq_)(const char *side, const char *trans, int *m, int *n, int *k, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormrqK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nc = NULL; double *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__ntrans = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nc = NULL; + double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dormrq_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dormrz_)(const char *side, const char *trans, int *m, int *n, int *k, int *l, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormrzK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jint l, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nc = NULL; double *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__ntrans = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nc = NULL; + double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dormrz_(__nside, __ntrans, &m, &n, &k, &l, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dormtr_)(const char *side, const char *uplo, const char *trans, int *m, int *n, double *a, int *lda, double *tau, double *c, int *Ldc, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dormtrK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring uplo, jstring trans, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__nuplo = NULL; const char *__ntrans = NULL; int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nc = NULL; double *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nc = NULL; + double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dormtr_(__nside, __nuplo, __ntrans, &m, &n, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dpbcon_)(const char *uplo, int *n, int *kd, double *ab, int *ldab, double *anorm, double *rcond, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbconK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; double __nrcond = 0; int __ninfo = 0; double *__nab = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + double __nrcond = 0; + int __ninfo = 0; + double *__nab = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dpbcon_(__nuplo, &n, &kd, __nab + offsetab, &ldab, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dpbequ_)(const char *uplo, int *n, int *kd, double *ab, int *ldab, double *s, double *scond, double *amax, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbequK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray s, jint offsets, jobject scond, jobject amax, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; double __nscond = 0; double __namax = 0; int __ninfo = 0; double *__nab = NULL; double *__ns = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + double __nscond = 0; + double __namax = 0; + int __ninfo = 0; + double *__nab = NULL; + double *__ns = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nscond = (*env)->GetDoubleField(env, scond, doubleW_val_fieldID); __namax = (*env)->GetDoubleField(env, amax, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } dpbequ_(__nuplo, &n, &kd, __nab + offsetab, &ldab, __ns + offsets, &__nscond, &__namax, &__ninfo); done: - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, amax, doubleW_val_fieldID, __namax); - if (!failed) (*env)->SetDoubleField(env, scond, doubleW_val_fieldID, __nscond); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, amax, doubleW_val_fieldID, __namax); + if (!__failed) (*env)->SetDoubleField(env, scond, doubleW_val_fieldID, __nscond); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dpbrfs_)(const char *uplo, int *n, int *kd, int *nrhs, double *ab, int *ldab, double *afb, int *ldafb, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbrfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray afb, jint offsetafb, jint ldafb, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__nab = NULL; double *__nafb = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nafb = (*env)->GetPrimitiveArrayCritical(env, afb, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__nab = NULL; + double *__nafb = NULL; + double *__nb = NULL; + double *__nx = NULL; + double *__nferr = NULL; + double *__nberr = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nafb = (*env)->GetPrimitiveArrayCritical(env, afb, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dpbrfs_(__nuplo, &n, &kd, &nrhs, __nab + offsetab, &ldab, __nafb + offsetafb, &ldafb, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nafb) (*env)->ReleasePrimitiveArrayCritical(env, afb, __nafb, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nafb) (*env)->ReleasePrimitiveArrayCritical(env, afb, __nafb, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dpbstf_)(const char *uplo, int *n, int *kd, double *ab, int *ldab, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbstfK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__nab = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__nab = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } dpbstf_(__nuplo, &n, &kd, __nab + offsetab, &ldab, &__ninfo); done: - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dpbsv_)(const char *uplo, int *n, int *kd, int *nrhs, double *ab, int *ldab, double *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbsvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__nab = NULL; double *__nb = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__nab = NULL; + double *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } dpbsv_(__nuplo, &n, &kd, &nrhs, __nab + offsetab, &ldab, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dpbsvx_)(const char *fact, const char *uplo, int *n, int *kd, int *nrhs, double *ab, int *ldab, double *afb, int *ldafb, char *equed, double *s, double *b, int *ldb, double *x, int *ldx, double *rcond, double *ferr, double *berr, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbsvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring uplo, jint n, jint kd, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray afb, jint offsetafb, jint ldafb, jobject equed, jdoubleArray s, jint offsets, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nfact = NULL; const char *__nuplo = NULL; char *__nequed = NULL; jstring __jequed = NULL;; double __nrcond = 0; int __ninfo = 0; double *__nab = NULL; double *__nafb = NULL; double *__ns = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nfact = NULL; + const char *__nuplo = NULL; + char *__nequed = NULL; jstring __jequed = NULL; + double __nrcond = 0; + int __ninfo = 0; + double *__nab = NULL; + double *__nafb = NULL; + double *__ns = NULL; + double *__nb = NULL; + double *__nx = NULL; + double *__nferr = NULL; + double *__nberr = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nafb = (*env)->GetPrimitiveArrayCritical(env, afb, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nafb = (*env)->GetPrimitiveArrayCritical(env, afb, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dpbsvx_(__nfact, __nuplo, &n, &kd, &nrhs, __nab + offsetab, &ldab, __nafb + offsetafb, &ldafb, __nequed, __ns + offsets, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nafb) (*env)->ReleasePrimitiveArrayCritical(env, afb, __nafb, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); - if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nafb) (*env)->ReleasePrimitiveArrayCritical(env, afb, __nafb, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!__failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dpbtf2_)(const char *uplo, int *n, int *kd, double *ab, int *ldab, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbtf2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__nab = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__nab = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } dpbtf2_(__nuplo, &n, &kd, __nab + offsetab, &ldab, &__ninfo); done: - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dpbtrf_)(const char *uplo, int *n, int *kd, double *ab, int *ldab, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbtrfK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__nab = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__nab = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } dpbtrf_(__nuplo, &n, &kd, __nab + offsetab, &ldab, &__ninfo); done: - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dpbtrs_)(const char *uplo, int *n, int *kd, int *nrhs, double *ab, int *ldab, double *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpbtrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__nab = NULL; double *__nb = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__nab = NULL; + double *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } dpbtrs_(__nuplo, &n, &kd, &nrhs, __nab + offsetab, &ldab, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dpocon_)(const char *uplo, int *n, double *a, int *lda, double *anorm, double *rcond, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpoconK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; double __nrcond = 0; int __ninfo = 0; double *__na = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + double __nrcond = 0; + int __ninfo = 0; + double *__na = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dpocon_(__nuplo, &n, __na + offseta, &lda, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dpoequ_)(int *n, double *a, int *lda, double *s, double *scond, double *amax, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpoequK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray s, jint offsets, jobject scond, jobject amax, jobject info) { - jboolean failed = FALSE; - double __nscond = 0; double __namax = 0; int __ninfo = 0; double *__na = NULL; double *__ns = NULL; + jboolean __failed = FALSE; + double __nscond = 0; + double __namax = 0; + int __ninfo = 0; + double *__na = NULL; + double *__ns = NULL; __nscond = (*env)->GetDoubleField(env, scond, doubleW_val_fieldID); __namax = (*env)->GetDoubleField(env, amax, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } dpoequ_(&n, __na + offseta, &lda, __ns + offsets, &__nscond, &__namax, &__ninfo); done: - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, amax, doubleW_val_fieldID, __namax); - if (!failed) (*env)->SetDoubleField(env, scond, doubleW_val_fieldID, __nscond); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, amax, doubleW_val_fieldID, __namax); + if (!__failed) (*env)->SetDoubleField(env, scond, doubleW_val_fieldID, __nscond); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dporfs_)(const char *uplo, int *n, int *nrhs, double *a, int *lda, double *af, int *ldaf, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dporfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray af, jint offsetaf, jint ldaf, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; double *__naf = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__naf = NULL; + double *__nb = NULL; + double *__nx = NULL; + double *__nferr = NULL; + double *__nberr = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dporfs_(__nuplo, &n, &nrhs, __na + offseta, &lda, __naf + offsetaf, &ldaf, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dposv_)(const char *uplo, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dposvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } dposv_(__nuplo, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dposvx_)(const char *fact, const char *uplo, int *n, int *nrhs, double *a, int *lda, double *af, int *ldaf, char *equed, double *s, double *b, int *ldb, double *x, int *ldx, double *rcond, double *ferr, double *berr, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dposvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray af, jint offsetaf, jint ldaf, jobject equed, jdoubleArray s, jint offsets, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nfact = NULL; const char *__nuplo = NULL; char *__nequed = NULL; jstring __jequed = NULL;; double __nrcond = 0; int __ninfo = 0; double *__na = NULL; double *__naf = NULL; double *__ns = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nfact = NULL; + const char *__nuplo = NULL; + char *__nequed = NULL; jstring __jequed = NULL; + double __nrcond = 0; + int __ninfo = 0; + double *__na = NULL; + double *__naf = NULL; + double *__ns = NULL; + double *__nb = NULL; + double *__nx = NULL; + double *__nferr = NULL; + double *__nberr = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dposvx_(__nfact, __nuplo, &n, &nrhs, __na + offseta, &lda, __naf + offsetaf, &ldaf, __nequed, __ns + offsets, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); - if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!__failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dpotf2_)(const char *uplo, int *n, double *a, int *lda, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpotf2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } dpotf2_(__nuplo, &n, __na + offseta, &lda, &__ninfo); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dpotrf_)(const char *uplo, int *n, double *a, int *lda, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpotrfK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } dpotrf_(__nuplo, &n, __na + offseta, &lda, &__ninfo); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dpotri_)(const char *uplo, int *n, double *a, int *lda, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpotriK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } dpotri_(__nuplo, &n, __na + offseta, &lda, &__ninfo); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dpotrs_)(const char *uplo, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpotrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } dpotrs_(__nuplo, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dppcon_)(const char *uplo, int *n, double *ap, double *anorm, double *rcond, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dppconK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; double __nrcond = 0; int __ninfo = 0; double *__nap = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + double __nrcond = 0; + int __ninfo = 0; + double *__nap = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dppcon_(__nuplo, &n, __nap + offsetap, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dppequ_)(const char *uplo, int *n, double *ap, double *s, double *scond, double *amax, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dppequK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray s, jint offsets, jobject scond, jobject amax, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; double __nscond = 0; double __namax = 0; int __ninfo = 0; double *__nap = NULL; double *__ns = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + double __nscond = 0; + double __namax = 0; + int __ninfo = 0; + double *__nap = NULL; + double *__ns = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nscond = (*env)->GetDoubleField(env, scond, doubleW_val_fieldID); __namax = (*env)->GetDoubleField(env, amax, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } dppequ_(__nuplo, &n, __nap + offsetap, __ns + offsets, &__nscond, &__namax, &__ninfo); done: - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, amax, doubleW_val_fieldID, __namax); - if (!failed) (*env)->SetDoubleField(env, scond, doubleW_val_fieldID, __nscond); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, amax, doubleW_val_fieldID, __namax); + if (!__failed) (*env)->SetDoubleField(env, scond, doubleW_val_fieldID, __nscond); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dpprfs_)(const char *uplo, int *n, int *nrhs, double *ap, double *afp, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpprfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray afp, jint offsetafp, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; double *__nafp = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nafp = (*env)->GetPrimitiveArrayCritical(env, afp, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__nap = NULL; + double *__nafp = NULL; + double *__nb = NULL; + double *__nx = NULL; + double *__nferr = NULL; + double *__nberr = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nafp = (*env)->GetPrimitiveArrayCritical(env, afp, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dpprfs_(__nuplo, &n, &nrhs, __nap + offsetap, __nafp + offsetafp, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nafp) (*env)->ReleasePrimitiveArrayCritical(env, afp, __nafp, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nafp) (*env)->ReleasePrimitiveArrayCritical(env, afp, __nafp, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dppsv_)(const char *uplo, int *n, int *nrhs, double *ap, double *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dppsvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; double *__nb = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__nap = NULL; + double *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } dppsv_(__nuplo, &n, &nrhs, __nap + offsetap, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dppsvx_)(const char *fact, const char *uplo, int *n, int *nrhs, double *ap, double *afp, char *equed, double *s, double *b, int *ldb, double *x, int *ldx, double *rcond, double *ferr, double *berr, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dppsvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray afp, jint offsetafp, jobject equed, jdoubleArray s, jint offsets, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nfact = NULL; const char *__nuplo = NULL; char *__nequed = NULL; jstring __jequed = NULL;; double __nrcond = 0; int __ninfo = 0; double *__nap = NULL; double *__nafp = NULL; double *__ns = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nfact = NULL; + const char *__nuplo = NULL; + char *__nequed = NULL; jstring __jequed = NULL; + double __nrcond = 0; + int __ninfo = 0; + double *__nap = NULL; + double *__nafp = NULL; + double *__ns = NULL; + double *__nb = NULL; + double *__nx = NULL; + double *__nferr = NULL; + double *__nberr = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nafp = (*env)->GetPrimitiveArrayCritical(env, afp, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nafp = (*env)->GetPrimitiveArrayCritical(env, afp, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dppsvx_(__nfact, __nuplo, &n, &nrhs, __nap + offsetap, __nafp + offsetafp, __nequed, __ns + offsets, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nafp) (*env)->ReleasePrimitiveArrayCritical(env, afp, __nafp, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); - if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nafp) (*env)->ReleasePrimitiveArrayCritical(env, afp, __nafp, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!__failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dpptrf_)(const char *uplo, int *n, double *ap, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpptrfK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__nap = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } dpptrf_(__nuplo, &n, __nap + offsetap, &__ninfo); done: - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dpptri_)(const char *uplo, int *n, double *ap, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpptriK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__nap = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } dpptri_(__nuplo, &n, __nap + offsetap, &__ninfo); done: - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dpptrs_)(const char *uplo, int *n, int *nrhs, double *ap, double *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpptrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; double *__nb = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__nap = NULL; + double *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } dpptrs_(__nuplo, &n, &nrhs, __nap + offsetap, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dptcon_)(int *n, double *d, double *e, double *anorm, double *rcond, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dptconK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - double __nrcond = 0; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nwork = NULL; + jboolean __failed = FALSE; + double __nrcond = 0; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; + double *__nwork = NULL; __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dptcon_(&n, __nd + offsetd, __ne + offsete, &anorm, &__nrcond, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dpteqr_)(const char *compz, int *n, double *d, double *e, double *z, int *ldz, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpteqrK(JNIEnv *env, UNUSED jobject obj, jstring compz, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__ncompz = NULL; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nz = NULL; double *__nwork = NULL; - if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ncompz = NULL; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; + double *__nz = NULL; + double *__nwork = NULL; + if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dpteqr_(__ncompz, &n, __nd + offsetd, __ne + offsete, __nz + offsetz, &ldz, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ncompz) (*env)->ReleaseStringUTFChars(env, compz, __ncompz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dptrfs_)(int *n, int *nrhs, double *d, double *e, double *df, double *ef, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dptrfsK(JNIEnv *env, UNUSED jobject obj, jint n, jint nrhs, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray df, jint offsetdf, jdoubleArray ef, jint offsetef, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__ndf = NULL; double *__nef = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__ndf = (*env)->GetPrimitiveArrayCritical(env, df, NULL))) goto fail; - if (!(__nef = (*env)->GetPrimitiveArrayCritical(env, ef, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; + double *__ndf = NULL; + double *__nef = NULL; + double *__nb = NULL; + double *__nx = NULL; + double *__nferr = NULL; + double *__nberr = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__ndf = (*env)->GetPrimitiveArrayCritical(env, df, NULL))) { __failed = TRUE; goto done; } + if (!(__nef = (*env)->GetPrimitiveArrayCritical(env, ef, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dptrfs_(&n, &nrhs, __nd + offsetd, __ne + offsete, __ndf + offsetdf, __nef + offsetef, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nef) (*env)->ReleasePrimitiveArrayCritical(env, ef, __nef, failed ? JNI_ABORT : 0); - if (__ndf) (*env)->ReleasePrimitiveArrayCritical(env, df, __ndf, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nef) (*env)->ReleasePrimitiveArrayCritical(env, ef, __nef, __failed ? JNI_ABORT : 0); + if (__ndf) (*env)->ReleasePrimitiveArrayCritical(env, df, __ndf, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dptsv_)(int *n, int *nrhs, double *d, double *e, double *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dptsvK(JNIEnv *env, UNUSED jobject obj, jint n, jint nrhs, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nb = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; + double *__nb = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } dptsv_(&n, &nrhs, __nd + offsetd, __ne + offsete, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dptsvx_)(const char *fact, int *n, int *nrhs, double *d, double *e, double *df, double *ef, double *b, int *ldb, double *x, int *ldx, double *rcond, double *ferr, double *berr, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dptsvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jint n, jint nrhs, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray df, jint offsetdf, jdoubleArray ef, jint offsetef, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nfact = NULL; double __nrcond = 0; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__ndf = NULL; double *__nef = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; - if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nfact = NULL; + double __nrcond = 0; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; + double *__ndf = NULL; + double *__nef = NULL; + double *__nb = NULL; + double *__nx = NULL; + double *__nferr = NULL; + double *__nberr = NULL; + double *__nwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__ndf = (*env)->GetPrimitiveArrayCritical(env, df, NULL))) goto fail; - if (!(__nef = (*env)->GetPrimitiveArrayCritical(env, ef, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__ndf = (*env)->GetPrimitiveArrayCritical(env, df, NULL))) { __failed = TRUE; goto done; } + if (!(__nef = (*env)->GetPrimitiveArrayCritical(env, ef, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dptsvx_(__nfact, &n, &nrhs, __nd + offsetd, __ne + offsete, __ndf + offsetdf, __nef + offsetef, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nef) (*env)->ReleasePrimitiveArrayCritical(env, ef, __nef, failed ? JNI_ABORT : 0); - if (__ndf) (*env)->ReleasePrimitiveArrayCritical(env, df, __ndf, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nef) (*env)->ReleasePrimitiveArrayCritical(env, ef, __nef, __failed ? JNI_ABORT : 0); + if (__ndf) (*env)->ReleasePrimitiveArrayCritical(env, df, __ndf, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dpttrf_)(int *n, double *d, double *e, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpttrfK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } dpttrf_(&n, __nd + offsetd, __ne + offsete, &__ninfo); done: - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dpttrs_)(int *n, int *nrhs, double *d, double *e, double *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dpttrsK(JNIEnv *env, UNUSED jobject obj, jint n, jint nrhs, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nb = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; + double *__nb = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } dpttrs_(&n, &nrhs, __nd + offsetd, __ne + offsete, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dptts2_)(int *n, int *nrhs, double *d, double *e, double *b, int *ldb); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dptts2K(JNIEnv *env, UNUSED jobject obj, jint n, jint nrhs, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray b, jint offsetb, jint ldb) { - jboolean failed = FALSE; - double *__nd = NULL; double *__ne = NULL; double *__nb = NULL; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + double *__nd = NULL; + double *__ne = NULL; + double *__nb = NULL; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } dptts2_(&n, &nrhs, __nd + offsetd, __ne + offsete, __nb + offsetb, &ldb); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*drscl_)(int *n, double *sa, double *sx, int *incx); void Java_dev_ludovic_netlib_lapack_JNILAPACK_drsclK(JNIEnv *env, UNUSED jobject obj, jint n, jdouble sa, jdoubleArray sx, jint offsetsx, jint incx) { - jboolean failed = FALSE; + jboolean __failed = FALSE; double *__nsx = NULL; - if (!(__nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto fail; + if (!(__nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) { __failed = TRUE; goto done; } drscl_(&n, &sa, __nsx + offsetsx, &incx); done: - if (__nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, __nsx, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, __nsx, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsbev_)(const char *jobz, const char *uplo, int *n, int *kd, double *ab, int *ldab, double *w, double *z, int *ldz, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbevK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; double *__nab = NULL; double *__nw = NULL; double *__nz = NULL; double *__nwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__nab = NULL; + double *__nw = NULL; + double *__nz = NULL; + double *__nwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dsbev_(__njobz, __nuplo, &n, &kd, __nab + offsetab, &ldab, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsbevd_)(const char *jobz, const char *uplo, int *n, int *kd, double *ab, int *ldab, double *w, double *z, int *ldz, double *work, int *lwork, int *iwork, int *liwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbevdK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; double *__nab = NULL; double *__nw = NULL; double *__nz = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__nab = NULL; + double *__nw = NULL; + double *__nz = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dsbevd_(__njobz, __nuplo, &n, &kd, __nab + offsetab, &ldab, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsbevx_)(const char *jobz, const char *range, const char *uplo, int *n, int *kd, double *ab, int *ldab, double *q, int *ldq, double *vl, double *vu, int *il, int *iu, double *abstol, int *m, double *w, double *z, int *ldz, double *work, int *iwork, int *ifail, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbevxK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray q, jint offsetq, jint ldq, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nrange = NULL; const char *__nuplo = NULL; int __nm = 0; int __ninfo = 0; double *__nab = NULL; double *__nq = NULL; double *__nw = NULL; double *__nz = NULL; double *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nrange = NULL; + const char *__nuplo = NULL; + int __nm = 0; + int __ninfo = 0; + double *__nab = NULL; + double *__nq = NULL; + double *__nw = NULL; + double *__nz = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + int *__nifail = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; - if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) { __failed = TRUE; goto done; } dsbevx_(__njobz, __nrange, __nuplo, &n, &kd, __nab + offsetab, &ldab, __nq + offsetq, &ldq, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); done: - if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, __failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsbgst_)(const char *vect, const char *uplo, int *n, int *ka, int *kb, double *ab, int *ldab, double *bb, int *ldbb, double *x, int *ldx, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbgstK(JNIEnv *env, UNUSED jobject obj, jstring vect, jstring uplo, jint n, jint ka, jint kb, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray bb, jint offsetbb, jint ldbb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nvect = NULL; const char *__nuplo = NULL; int __ninfo = 0; double *__nab = NULL; double *__nbb = NULL; double *__nx = NULL; double *__nwork = NULL; - if (!(__nvect = (*env)->GetStringUTFChars(env, vect, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nbb = (*env)->GetPrimitiveArrayCritical(env, bb, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nvect = NULL; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__nab = NULL; + double *__nbb = NULL; + double *__nx = NULL; + double *__nwork = NULL; + if (!(__nvect = (*env)->GetStringUTFChars(env, vect, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nbb = (*env)->GetPrimitiveArrayCritical(env, bb, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dsbgst_(__nvect, __nuplo, &n, &ka, &kb, __nab + offsetab, &ldab, __nbb + offsetbb, &ldbb, __nx + offsetx, &ldx, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nbb) (*env)->ReleasePrimitiveArrayCritical(env, bb, __nbb, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nbb) (*env)->ReleasePrimitiveArrayCritical(env, bb, __nbb, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nvect) (*env)->ReleaseStringUTFChars(env, vect, __nvect); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsbgv_)(const char *jobz, const char *uplo, int *n, int *ka, int *kb, double *ab, int *ldab, double *bb, int *ldbb, double *w, double *z, int *ldz, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbgvK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jint ka, jint kb, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray bb, jint offsetbb, jint ldbb, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; double *__nab = NULL; double *__nbb = NULL; double *__nw = NULL; double *__nz = NULL; double *__nwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nbb = (*env)->GetPrimitiveArrayCritical(env, bb, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__nab = NULL; + double *__nbb = NULL; + double *__nw = NULL; + double *__nz = NULL; + double *__nwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nbb = (*env)->GetPrimitiveArrayCritical(env, bb, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dsbgv_(__njobz, __nuplo, &n, &ka, &kb, __nab + offsetab, &ldab, __nbb + offsetbb, &ldbb, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nbb) (*env)->ReleasePrimitiveArrayCritical(env, bb, __nbb, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nbb) (*env)->ReleasePrimitiveArrayCritical(env, bb, __nbb, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsbgvd_)(const char *jobz, const char *uplo, int *n, int *ka, int *kb, double *ab, int *ldab, double *bb, int *ldbb, double *w, double *z, int *ldz, double *work, int *lwork, int *iwork, int *liwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbgvdK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jint ka, jint kb, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray bb, jint offsetbb, jint ldbb, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; double *__nab = NULL; double *__nbb = NULL; double *__nw = NULL; double *__nz = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nbb = (*env)->GetPrimitiveArrayCritical(env, bb, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__nab = NULL; + double *__nbb = NULL; + double *__nw = NULL; + double *__nz = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nbb = (*env)->GetPrimitiveArrayCritical(env, bb, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dsbgvd_(__njobz, __nuplo, &n, &ka, &kb, __nab + offsetab, &ldab, __nbb + offsetbb, &ldbb, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nbb) (*env)->ReleasePrimitiveArrayCritical(env, bb, __nbb, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nbb) (*env)->ReleasePrimitiveArrayCritical(env, bb, __nbb, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsbgvx_)(const char *jobz, const char *range, const char *uplo, int *n, int *ka, int *kb, double *ab, int *ldab, double *bb, int *ldbb, double *q, int *ldq, double *vl, double *vu, int *il, int *iu, double *abstol, int *m, double *w, double *z, int *ldz, double *work, int *iwork, int *ifail, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbgvxK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jstring uplo, jint n, jint ka, jint kb, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray bb, jint offsetbb, jint ldbb, jdoubleArray q, jint offsetq, jint ldq, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nrange = NULL; const char *__nuplo = NULL; int __nm = 0; int __ninfo = 0; double *__nab = NULL; double *__nbb = NULL; double *__nq = NULL; double *__nw = NULL; double *__nz = NULL; double *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nrange = NULL; + const char *__nuplo = NULL; + int __nm = 0; + int __ninfo = 0; + double *__nab = NULL; + double *__nbb = NULL; + double *__nq = NULL; + double *__nw = NULL; + double *__nz = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + int *__nifail = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nbb = (*env)->GetPrimitiveArrayCritical(env, bb, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; - if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nbb = (*env)->GetPrimitiveArrayCritical(env, bb, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) { __failed = TRUE; goto done; } dsbgvx_(__njobz, __nrange, __nuplo, &n, &ka, &kb, __nab + offsetab, &ldab, __nbb + offsetbb, &ldbb, __nq + offsetq, &ldq, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); done: - if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nbb) (*env)->ReleasePrimitiveArrayCritical(env, bb, __nbb, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, __failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nbb) (*env)->ReleasePrimitiveArrayCritical(env, bb, __nbb, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsbtrd_)(const char *vect, const char *uplo, int *n, int *kd, double *ab, int *ldab, double *d, double *e, double *q, int *ldq, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsbtrdK(JNIEnv *env, UNUSED jobject obj, jstring vect, jstring uplo, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nvect = NULL; const char *__nuplo = NULL; int __ninfo = 0; double *__nab = NULL; double *__nd = NULL; double *__ne = NULL; double *__nq = NULL; double *__nwork = NULL; - if (!(__nvect = (*env)->GetStringUTFChars(env, vect, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nvect = NULL; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__nab = NULL; + double *__nd = NULL; + double *__ne = NULL; + double *__nq = NULL; + double *__nwork = NULL; + if (!(__nvect = (*env)->GetStringUTFChars(env, vect, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dsbtrd_(__nvect, __nuplo, &n, &kd, __nab + offsetab, &ldab, __nd + offsetd, __ne + offsete, __nq + offsetq, &ldq, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nvect) (*env)->ReleaseStringUTFChars(env, vect, __nvect); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsgesv_)(int *n, int *nrhs, double *a, int *lda, int *ipiv, double *b, int *ldb, double *x, int *ldx, double *work, float *swork, int *iter, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsgesvK(JNIEnv *env, UNUSED jobject obj, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray work, jint offsetwork, jfloatArray swork, jint offsetswork, jobject iter, jobject info) { - jboolean failed = FALSE; - int __niter = 0; int __ninfo = 0; double *__na = NULL; int *__nipiv = NULL; double *__nb = NULL; double *__nx = NULL; double *__nwork = NULL; float *__nswork = NULL; + jboolean __failed = FALSE; + int __niter = 0; + int __ninfo = 0; + double *__na = NULL; + int *__nipiv = NULL; + double *__nb = NULL; + double *__nx = NULL; + double *__nwork = NULL; + float *__nswork = NULL; __niter = (*env)->GetIntField(env, iter, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__nswork = (*env)->GetPrimitiveArrayCritical(env, swork, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__nswork = (*env)->GetPrimitiveArrayCritical(env, swork, NULL))) { __failed = TRUE; goto done; } dsgesv_(&n, &nrhs, __na + offseta, &lda, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nwork + offsetwork, __nswork + offsetswork, &__niter, &__ninfo); done: - if (__nswork) (*env)->ReleasePrimitiveArrayCritical(env, swork, __nswork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, iter, intW_val_fieldID, __niter); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nswork) (*env)->ReleasePrimitiveArrayCritical(env, swork, __nswork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, iter, intW_val_fieldID, __niter); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dspcon_)(const char *uplo, int *n, double *ap, int *ipiv, double *anorm, double *rcond, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspconK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; double __nrcond = 0; int __ninfo = 0; double *__nap = NULL; int *__nipiv = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + double __nrcond = 0; + int __ninfo = 0; + double *__nap = NULL; + int *__nipiv = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dspcon_(__nuplo, &n, __nap + offsetap, __nipiv + offsetipiv, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dspev_)(const char *jobz, const char *uplo, int *n, double *ap, double *w, double *z, int *ldz, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspevK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; double *__nw = NULL; double *__nz = NULL; double *__nwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__nap = NULL; + double *__nw = NULL; + double *__nz = NULL; + double *__nwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dspev_(__njobz, __nuplo, &n, __nap + offsetap, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dspevd_)(const char *jobz, const char *uplo, int *n, double *ap, double *w, double *z, int *ldz, double *work, int *lwork, int *iwork, int *liwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspevdK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; double *__nw = NULL; double *__nz = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__nap = NULL; + double *__nw = NULL; + double *__nz = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dspevd_(__njobz, __nuplo, &n, __nap + offsetap, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dspevx_)(const char *jobz, const char *range, const char *uplo, int *n, double *ap, double *vl, double *vu, int *il, int *iu, double *abstol, int *m, double *w, double *z, int *ldz, double *work, int *iwork, int *ifail, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspevxK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nrange = NULL; const char *__nuplo = NULL; int __nm = 0; int __ninfo = 0; double *__nap = NULL; double *__nw = NULL; double *__nz = NULL; double *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nrange = NULL; + const char *__nuplo = NULL; + int __nm = 0; + int __ninfo = 0; + double *__nap = NULL; + double *__nw = NULL; + double *__nz = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + int *__nifail = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; - if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) { __failed = TRUE; goto done; } dspevx_(__njobz, __nrange, __nuplo, &n, __nap + offsetap, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); done: - if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, __failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dspgst_)(int *itype, const char *uplo, int *n, double *ap, double *bp, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspgstK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray bp, jint offsetbp, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; double *__nbp = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nbp = (*env)->GetPrimitiveArrayCritical(env, bp, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__nap = NULL; + double *__nbp = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nbp = (*env)->GetPrimitiveArrayCritical(env, bp, NULL))) { __failed = TRUE; goto done; } dspgst_(&itype, __nuplo, &n, __nap + offsetap, __nbp + offsetbp, &__ninfo); done: - if (__nbp) (*env)->ReleasePrimitiveArrayCritical(env, bp, __nbp, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nbp) (*env)->ReleasePrimitiveArrayCritical(env, bp, __nbp, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dspgv_)(int *itype, const char *jobz, const char *uplo, int *n, double *ap, double *bp, double *w, double *z, int *ldz, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspgvK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring jobz, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray bp, jint offsetbp, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; double *__nbp = NULL; double *__nw = NULL; double *__nz = NULL; double *__nwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nbp = (*env)->GetPrimitiveArrayCritical(env, bp, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__nap = NULL; + double *__nbp = NULL; + double *__nw = NULL; + double *__nz = NULL; + double *__nwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nbp = (*env)->GetPrimitiveArrayCritical(env, bp, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dspgv_(&itype, __njobz, __nuplo, &n, __nap + offsetap, __nbp + offsetbp, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nbp) (*env)->ReleasePrimitiveArrayCritical(env, bp, __nbp, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nbp) (*env)->ReleasePrimitiveArrayCritical(env, bp, __nbp, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dspgvd_)(int *itype, const char *jobz, const char *uplo, int *n, double *ap, double *bp, double *w, double *z, int *ldz, double *work, int *lwork, int *iwork, int *liwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspgvdK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring jobz, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray bp, jint offsetbp, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; double *__nbp = NULL; double *__nw = NULL; double *__nz = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nbp = (*env)->GetPrimitiveArrayCritical(env, bp, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__nap = NULL; + double *__nbp = NULL; + double *__nw = NULL; + double *__nz = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nbp = (*env)->GetPrimitiveArrayCritical(env, bp, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dspgvd_(&itype, __njobz, __nuplo, &n, __nap + offsetap, __nbp + offsetbp, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nbp) (*env)->ReleasePrimitiveArrayCritical(env, bp, __nbp, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nbp) (*env)->ReleasePrimitiveArrayCritical(env, bp, __nbp, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dspgvx_)(int *itype, const char *jobz, const char *range, const char *uplo, int *n, double *ap, double *bp, double *vl, double *vu, int *il, int *iu, double *abstol, int *m, double *w, double *z, int *ldz, double *work, int *iwork, int *ifail, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspgvxK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring jobz, jstring range, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray bp, jint offsetbp, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nrange = NULL; const char *__nuplo = NULL; int __nm = 0; int __ninfo = 0; double *__nap = NULL; double *__nbp = NULL; double *__nw = NULL; double *__nz = NULL; double *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nrange = NULL; + const char *__nuplo = NULL; + int __nm = 0; + int __ninfo = 0; + double *__nap = NULL; + double *__nbp = NULL; + double *__nw = NULL; + double *__nz = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + int *__nifail = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nbp = (*env)->GetPrimitiveArrayCritical(env, bp, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; - if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nbp = (*env)->GetPrimitiveArrayCritical(env, bp, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) { __failed = TRUE; goto done; } dspgvx_(&itype, __njobz, __nrange, __nuplo, &n, __nap + offsetap, __nbp + offsetbp, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); done: - if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nbp) (*env)->ReleasePrimitiveArrayCritical(env, bp, __nbp, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, __failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nbp) (*env)->ReleasePrimitiveArrayCritical(env, bp, __nbp, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsprfs_)(const char *uplo, int *n, int *nrhs, double *ap, double *afp, int *ipiv, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsprfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray afp, jint offsetafp, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; double *__nafp = NULL; int *__nipiv = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nafp = (*env)->GetPrimitiveArrayCritical(env, afp, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__nap = NULL; + double *__nafp = NULL; + int *__nipiv = NULL; + double *__nb = NULL; + double *__nx = NULL; + double *__nferr = NULL; + double *__nberr = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nafp = (*env)->GetPrimitiveArrayCritical(env, afp, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dsprfs_(__nuplo, &n, &nrhs, __nap + offsetap, __nafp + offsetafp, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nafp) (*env)->ReleasePrimitiveArrayCritical(env, afp, __nafp, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nafp) (*env)->ReleasePrimitiveArrayCritical(env, afp, __nafp, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dspsv_)(const char *uplo, int *n, int *nrhs, double *ap, int *ipiv, double *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspsvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; int *__nipiv = NULL; double *__nb = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__nap = NULL; + int *__nipiv = NULL; + double *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } dspsv_(__nuplo, &n, &nrhs, __nap + offsetap, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dspsvx_)(const char *fact, const char *uplo, int *n, int *nrhs, double *ap, double *afp, int *ipiv, double *b, int *ldb, double *x, int *ldx, double *rcond, double *ferr, double *berr, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dspsvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray afp, jint offsetafp, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nfact = NULL; const char *__nuplo = NULL; double __nrcond = 0; int __ninfo = 0; double *__nap = NULL; double *__nafp = NULL; int *__nipiv = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nfact = NULL; + const char *__nuplo = NULL; + double __nrcond = 0; + int __ninfo = 0; + double *__nap = NULL; + double *__nafp = NULL; + int *__nipiv = NULL; + double *__nb = NULL; + double *__nx = NULL; + double *__nferr = NULL; + double *__nberr = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nafp = (*env)->GetPrimitiveArrayCritical(env, afp, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nafp = (*env)->GetPrimitiveArrayCritical(env, afp, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dspsvx_(__nfact, __nuplo, &n, &nrhs, __nap + offsetap, __nafp + offsetafp, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nafp) (*env)->ReleasePrimitiveArrayCritical(env, afp, __nafp, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nafp) (*env)->ReleasePrimitiveArrayCritical(env, afp, __nafp, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsptrd_)(const char *uplo, int *n, double *ap, double *d, double *e, double *tau, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsptrdK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray tau, jint offsettau, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; double *__nd = NULL; double *__ne = NULL; double *__ntau = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__nap = NULL; + double *__nd = NULL; + double *__ne = NULL; + double *__ntau = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } dsptrd_(__nuplo, &n, __nap + offsetap, __nd + offsetd, __ne + offsete, __ntau + offsettau, &__ninfo); done: - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsptrf_)(const char *uplo, int *n, double *ap, int *ipiv, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsptrfK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; int *__nipiv = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__nap = NULL; + int *__nipiv = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } dsptrf_(__nuplo, &n, __nap + offsetap, __nipiv + offsetipiv, &__ninfo); done: - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsptri_)(const char *uplo, int *n, double *ap, int *ipiv, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsptriK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; int *__nipiv = NULL; double *__nwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__nap = NULL; + int *__nipiv = NULL; + double *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dsptri_(__nuplo, &n, __nap + offsetap, __nipiv + offsetipiv, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsptrs_)(const char *uplo, int *n, int *nrhs, double *ap, int *ipiv, double *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsptrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__nap = NULL; int *__nipiv = NULL; double *__nb = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__nap = NULL; + int *__nipiv = NULL; + double *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } dsptrs_(__nuplo, &n, &nrhs, __nap + offsetap, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dstebz_)(const char *range, const char *order, int *n, double *vl, double *vu, int *il, int *iu, double *abstol, double *d, double *e, int *m, int *nsplit, double *w, int *iblock, int *isplit, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstebzK(JNIEnv *env, UNUSED jobject obj, jstring range, jstring order, jint n, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jobject m, jobject nsplit, jdoubleArray w, jint offsetw, jintArray iblock, jint offsetiblock, jintArray isplit, jint offsetisplit, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nrange = NULL; const char *__norder = NULL; int __nm = 0; int __nnsplit = 0; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nw = NULL; int *__niblock = NULL; int *__nisplit = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; - if (!(__norder = (*env)->GetStringUTFChars(env, order, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nrange = NULL; + const char *__norder = NULL; + int __nm = 0; + int __nnsplit = 0; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; + double *__nw = NULL; + int *__niblock = NULL; + int *__nisplit = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) { __failed = TRUE; goto done; } + if (!(__norder = (*env)->GetStringUTFChars(env, order, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __nnsplit = (*env)->GetIntField(env, nsplit, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__niblock = (*env)->GetPrimitiveArrayCritical(env, iblock, NULL))) goto fail; - if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__niblock = (*env)->GetPrimitiveArrayCritical(env, iblock, NULL))) { __failed = TRUE; goto done; } + if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dstebz_(__nrange, __norder, &n, &vl, &vu, &il, &iu, &abstol, __nd + offsetd, __ne + offsete, &__nm, &__nnsplit, __nw + offsetw, __niblock + offsetiblock, __nisplit + offsetisplit, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, failed ? JNI_ABORT : 0); - if (__niblock) (*env)->ReleasePrimitiveArrayCritical(env, iblock, __niblock, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, nsplit, intW_val_fieldID, __nnsplit); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, __failed ? JNI_ABORT : 0); + if (__niblock) (*env)->ReleasePrimitiveArrayCritical(env, iblock, __niblock, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, nsplit, intW_val_fieldID, __nnsplit); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__norder) (*env)->ReleaseStringUTFChars(env, order, __norder); if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dstedc_)(const char *compz, int *n, double *d, double *e, double *z, int *ldz, double *work, int *lwork, int *iwork, int *liwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstedcK(JNIEnv *env, UNUSED jobject obj, jstring compz, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - jboolean failed = FALSE; - const char *__ncompz = NULL; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nz = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ncompz = NULL; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; + double *__nz = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dstedc_(__ncompz, &n, __nd + offsetd, __ne + offsete, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ncompz) (*env)->ReleaseStringUTFChars(env, compz, __ncompz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dstegr_)(const char *jobz, const char *range, int *n, double *d, double *e, double *vl, double *vu, int *il, int *iu, double *abstol, int *m, double *w, double *z, int *ldz, int *isuppz, double *work, int *lwork, int *iwork, int *liwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstegrK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nrange = NULL; int __nm = 0; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nw = NULL; double *__nz = NULL; int *__nisuppz = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nrange = NULL; + int __nm = 0; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; + double *__nw = NULL; + double *__nz = NULL; + int *__nisuppz = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dstegr_(__njobz, __nrange, &n, __nd + offsetd, __ne + offsete, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nisuppz + offsetisuppz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dstein_)(int *n, double *d, double *e, int *m, double *w, int *iblock, int *isplit, double *z, int *ldz, double *work, int *iwork, int *ifail, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsteinK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jint m, jdoubleArray w, jint offsetw, jintArray iblock, jint offsetiblock, jintArray isplit, jint offsetisplit, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nw = NULL; int *__niblock = NULL; int *__nisplit = NULL; double *__nz = NULL; double *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__niblock = (*env)->GetPrimitiveArrayCritical(env, iblock, NULL))) goto fail; - if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; - if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; + double *__nw = NULL; + int *__niblock = NULL; + int *__nisplit = NULL; + double *__nz = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + int *__nifail = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__niblock = (*env)->GetPrimitiveArrayCritical(env, iblock, NULL))) { __failed = TRUE; goto done; } + if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) { __failed = TRUE; goto done; } dstein_(&n, __nd + offsetd, __ne + offsete, &m, __nw + offsetw, __niblock + offsetiblock, __nisplit + offsetisplit, __nz + offsetz, &ldz, __nwork + offsetwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); done: - if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, failed ? JNI_ABORT : 0); - if (__niblock) (*env)->ReleasePrimitiveArrayCritical(env, iblock, __niblock, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, __failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, __failed ? JNI_ABORT : 0); + if (__niblock) (*env)->ReleasePrimitiveArrayCritical(env, iblock, __niblock, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dstemr_)(const char *jobz, const char *range, int *n, double *d, double *e, double *vl, double *vu, int *il, int *iu, int *m, double *w, double *z, int *ldz, int *nzc, int *isuppz, int *tryrac, double *work, int *lwork, int *iwork, int *liwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstemrK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdouble vl, jdouble vu, jint il, jint iu, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jint nzc, jintArray isuppz, jint offsetisuppz, jobject tryrac, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nrange = NULL; int __nm = 0; int __ntryrac = 0; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nw = NULL; double *__nz = NULL; int *__nisuppz = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nrange = NULL; + int __nm = 0; + int __ntryrac = 0; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; + double *__nw = NULL; + double *__nz = NULL; + int *__nisuppz = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ntryrac = (*env)->GetBooleanField(env, tryrac, booleanW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dstemr_(__njobz, __nrange, &n, __nd + offsetd, __ne + offsete, &vl, &vu, &il, &iu, &__nm, __nw + offsetw, __nz + offsetz, &ldz, &nzc, __nisuppz + offsetisuppz, &__ntryrac, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetBooleanField(env, tryrac, booleanW_val_fieldID, __ntryrac); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetBooleanField(env, tryrac, booleanW_val_fieldID, __ntryrac); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsteqr_)(const char *compz, int *n, double *d, double *e, double *z, int *ldz, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsteqrK(JNIEnv *env, UNUSED jobject obj, jstring compz, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__ncompz = NULL; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nz = NULL; double *__nwork = NULL; - if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ncompz = NULL; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; + double *__nz = NULL; + double *__nwork = NULL; + if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dsteqr_(__ncompz, &n, __nd + offsetd, __ne + offsete, __nz + offsetz, &ldz, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ncompz) (*env)->ReleaseStringUTFChars(env, compz, __ncompz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsterf_)(int *n, double *d, double *e, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsterfK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } dsterf_(&n, __nd + offsetd, __ne + offsete, &__ninfo); done: - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dstev_)(const char *jobz, int *n, double *d, double *e, double *z, int *ldz, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstevK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nz = NULL; double *__nwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; + double *__nz = NULL; + double *__nwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dstev_(__njobz, &n, __nd + offsetd, __ne + offsete, __nz + offsetz, &ldz, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dstevd_)(const char *jobz, int *n, double *d, double *e, double *z, int *ldz, double *work, int *lwork, int *iwork, int *liwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstevdK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nz = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; + double *__nz = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dstevd_(__njobz, &n, __nd + offsetd, __ne + offsete, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dstevr_)(const char *jobz, const char *range, int *n, double *d, double *e, double *vl, double *vu, int *il, int *iu, double *abstol, int *m, double *w, double *z, int *ldz, int *isuppz, double *work, int *lwork, int *iwork, int *liwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstevrK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nrange = NULL; int __nm = 0; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nw = NULL; double *__nz = NULL; int *__nisuppz = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nrange = NULL; + int __nm = 0; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; + double *__nw = NULL; + double *__nz = NULL; + int *__nisuppz = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dstevr_(__njobz, __nrange, &n, __nd + offsetd, __ne + offsete, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nisuppz + offsetisuppz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dstevx_)(const char *jobz, const char *range, int *n, double *d, double *e, double *vl, double *vu, int *il, int *iu, double *abstol, int *m, double *w, double *z, int *ldz, double *work, int *iwork, int *ifail, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dstevxK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nrange = NULL; int __nm = 0; int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nw = NULL; double *__nz = NULL; double *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nrange = NULL; + int __nm = 0; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; + double *__nw = NULL; + double *__nz = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + int *__nifail = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; - if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) { __failed = TRUE; goto done; } dstevx_(__njobz, __nrange, &n, __nd + offsetd, __ne + offsete, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); done: - if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, __failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsycon_)(const char *uplo, int *n, double *a, int *lda, int *ipiv, double *anorm, double *rcond, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyconK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdouble anorm, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; double __nrcond = 0; int __ninfo = 0; double *__na = NULL; int *__nipiv = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + double __nrcond = 0; + int __ninfo = 0; + double *__na = NULL; + int *__nipiv = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dsycon_(__nuplo, &n, __na + offseta, &lda, __nipiv + offsetipiv, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsyev_)(const char *jobz, const char *uplo, int *n, double *a, int *lda, double *w, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyevK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray w, jint offsetw, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; double *__nw = NULL; double *__nwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__nw = NULL; + double *__nwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dsyev_(__njobz, __nuplo, &n, __na + offseta, &lda, __nw + offsetw, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsyevd_)(const char *jobz, const char *uplo, int *n, double *a, int *lda, double *w, double *work, int *lwork, int *iwork, int *liwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyevdK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray w, jint offsetw, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; double *__nw = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__nw = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dsyevd_(__njobz, __nuplo, &n, __na + offseta, &lda, __nw + offsetw, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsyevr_)(const char *jobz, const char *range, const char *uplo, int *n, double *a, int *lda, double *vl, double *vu, int *il, int *iu, double *abstol, int *m, double *w, double *z, int *ldz, int *isuppz, double *work, int *lwork, int *iwork, int *liwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyevrK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nrange = NULL; const char *__nuplo = NULL; int __nm = 0; int __ninfo = 0; double *__na = NULL; double *__nw = NULL; double *__nz = NULL; int *__nisuppz = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nrange = NULL; + const char *__nuplo = NULL; + int __nm = 0; + int __ninfo = 0; + double *__na = NULL; + double *__nw = NULL; + double *__nz = NULL; + int *__nisuppz = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dsyevr_(__njobz, __nrange, __nuplo, &n, __na + offseta, &lda, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nisuppz + offsetisuppz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsyevx_)(const char *jobz, const char *range, const char *uplo, int *n, double *a, int *lda, double *vl, double *vu, int *il, int *iu, double *abstol, int *m, double *w, double *z, int *ldz, double *work, int *lwork, int *iwork, int *ifail, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyevxK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nrange = NULL; const char *__nuplo = NULL; int __nm = 0; int __ninfo = 0; double *__na = NULL; double *__nw = NULL; double *__nz = NULL; double *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nrange = NULL; + const char *__nuplo = NULL; + int __nm = 0; + int __ninfo = 0; + double *__na = NULL; + double *__nw = NULL; + double *__nz = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + int *__nifail = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; - if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) { __failed = TRUE; goto done; } dsyevx_(__njobz, __nrange, __nuplo, &n, __na + offseta, &lda, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); done: - if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, __failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsygs2_)(int *itype, const char *uplo, int *n, double *a, int *lda, double *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsygs2K(JNIEnv *env, UNUSED jobject obj, jint itype, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } dsygs2_(&itype, __nuplo, &n, __na + offseta, &lda, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsygst_)(int *itype, const char *uplo, int *n, double *a, int *lda, double *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsygstK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } dsygst_(&itype, __nuplo, &n, __na + offseta, &lda, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsygv_)(int *itype, const char *jobz, const char *uplo, int *n, double *a, int *lda, double *b, int *ldb, double *w, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsygvK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring jobz, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray w, jint offsetw, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nw = NULL; double *__nwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + double *__nw = NULL; + double *__nwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dsygv_(&itype, __njobz, __nuplo, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nw + offsetw, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsygvd_)(int *itype, const char *jobz, const char *uplo, int *n, double *a, int *lda, double *b, int *ldb, double *w, double *work, int *lwork, int *iwork, int *liwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsygvdK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring jobz, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray w, jint offsetw, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nw = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + double *__nw = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dsygvd_(&itype, __njobz, __nuplo, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nw + offsetw, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsygvx_)(int *itype, const char *jobz, const char *range, const char *uplo, int *n, double *a, int *lda, double *b, int *ldb, double *vl, double *vu, int *il, int *iu, double *abstol, int *m, double *w, double *z, int *ldz, double *work, int *lwork, int *iwork, int *ifail, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsygvxK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring jobz, jstring range, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble vl, jdouble vu, jint il, jint iu, jdouble abstol, jobject m, jdoubleArray w, jint offsetw, jdoubleArray z, jint offsetz, jint ldz, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nrange = NULL; const char *__nuplo = NULL; int __nm = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nw = NULL; double *__nz = NULL; double *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nrange = NULL; + const char *__nuplo = NULL; + int __nm = 0; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + double *__nw = NULL; + double *__nz = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + int *__nifail = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; - if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) { __failed = TRUE; goto done; } dsygvx_(&itype, __njobz, __nrange, __nuplo, &n, __na + offseta, &lda, __nb + offsetb, &ldb, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); done: - if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, __failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsyrfs_)(const char *uplo, int *n, int *nrhs, double *a, int *lda, double *af, int *ldaf, int *ipiv, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsyrfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; double *__naf = NULL; int *__nipiv = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__naf = NULL; + int *__nipiv = NULL; + double *__nb = NULL; + double *__nx = NULL; + double *__nferr = NULL; + double *__nberr = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dsyrfs_(__nuplo, &n, &nrhs, __na + offseta, &lda, __naf + offsetaf, &ldaf, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsysv_)(const char *uplo, int *n, int *nrhs, double *a, int *lda, int *ipiv, double *b, int *ldb, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsysvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; int *__nipiv = NULL; double *__nb = NULL; double *__nwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__na = NULL; + int *__nipiv = NULL; + double *__nb = NULL; + double *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dsysv_(__nuplo, &n, &nrhs, __na + offseta, &lda, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsysvx_)(const char *fact, const char *uplo, int *n, int *nrhs, double *a, int *lda, double *af, int *ldaf, int *ipiv, double *b, int *ldb, double *x, int *ldx, double *rcond, double *ferr, double *berr, double *work, int *lwork, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsysvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jobject rcond, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nfact = NULL; const char *__nuplo = NULL; double __nrcond = 0; int __ninfo = 0; double *__na = NULL; double *__naf = NULL; int *__nipiv = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nfact = NULL; + const char *__nuplo = NULL; + double __nrcond = 0; + int __ninfo = 0; + double *__na = NULL; + double *__naf = NULL; + int *__nipiv = NULL; + double *__nb = NULL; + double *__nx = NULL; + double *__nferr = NULL; + double *__nberr = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dsysvx_(__nfact, __nuplo, &n, &nrhs, __na + offseta, &lda, __naf + offsetaf, &ldaf, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsytd2_)(const char *uplo, int *n, double *a, int *lda, double *d, double *e, double *tau, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytd2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray tau, jint offsettau, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; double *__nd = NULL; double *__ne = NULL; double *__ntau = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__nd = NULL; + double *__ne = NULL; + double *__ntau = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } dsytd2_(__nuplo, &n, __na + offseta, &lda, __nd + offsetd, __ne + offsete, __ntau + offsettau, &__ninfo); done: - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsytf2_)(const char *uplo, int *n, double *a, int *lda, int *ipiv, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytf2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; int *__nipiv = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__na = NULL; + int *__nipiv = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } dsytf2_(__nuplo, &n, __na + offseta, &lda, __nipiv + offsetipiv, &__ninfo); done: - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsytrd_)(const char *uplo, int *n, double *a, int *lda, double *d, double *e, double *tau, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytrdK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; double *__nd = NULL; double *__ne = NULL; double *__ntau = NULL; double *__nwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__nd = NULL; + double *__ne = NULL; + double *__ntau = NULL; + double *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dsytrd_(__nuplo, &n, __na + offseta, &lda, __nd + offsetd, __ne + offsete, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsytrf_)(const char *uplo, int *n, double *a, int *lda, int *ipiv, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytrfK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; int *__nipiv = NULL; double *__nwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__na = NULL; + int *__nipiv = NULL; + double *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dsytrf_(__nuplo, &n, __na + offseta, &lda, __nipiv + offsetipiv, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsytri_)(const char *uplo, int *n, double *a, int *lda, int *ipiv, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytriK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; int *__nipiv = NULL; double *__nwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__na = NULL; + int *__nipiv = NULL; + double *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dsytri_(__nuplo, &n, __na + offseta, &lda, __nipiv + offsetipiv, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsytrs_)(const char *uplo, int *n, int *nrhs, double *a, int *lda, int *ipiv, double *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dsytrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; double *__na = NULL; int *__nipiv = NULL; double *__nb = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + double *__na = NULL; + int *__nipiv = NULL; + double *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } dsytrs_(__nuplo, &n, &nrhs, __na + offseta, &lda, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtbcon_)(const char *norm, const char *uplo, const char *diag, int *n, int *kd, double *ab, int *ldab, double *rcond, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtbconK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jstring diag, jint n, jint kd, jdoubleArray ab, jint offsetab, jint ldab, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nnorm = NULL; const char *__nuplo = NULL; const char *__ndiag = NULL; double __nrcond = 0; int __ninfo = 0; double *__nab = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + const char *__nuplo = NULL; + const char *__ndiag = NULL; + double __nrcond = 0; + int __ninfo = 0; + double *__nab = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dtbcon_(__nnorm, __nuplo, __ndiag, &n, &kd, __nab + offsetab, &ldab, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtbrfs_)(const char *uplo, const char *trans, const char *diag, int *n, int *kd, int *nrhs, double *ab, int *ldab, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtbrfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint kd, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; int __ninfo = 0; double *__nab = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + const char *__ndiag = NULL; + int __ninfo = 0; + double *__nab = NULL; + double *__nb = NULL; + double *__nx = NULL; + double *__nferr = NULL; + double *__nberr = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dtbrfs_(__nuplo, __ntrans, __ndiag, &n, &kd, &nrhs, __nab + offsetab, &ldab, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtbtrs_)(const char *uplo, const char *trans, const char *diag, int *n, int *kd, int *nrhs, double *ab, int *ldab, double *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtbtrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint kd, jint nrhs, jdoubleArray ab, jint offsetab, jint ldab, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; int __ninfo = 0; double *__nab = NULL; double *__nb = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + const char *__ndiag = NULL; + int __ninfo = 0; + double *__nab = NULL; + double *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } dtbtrs_(__nuplo, __ntrans, __ndiag, &n, &kd, &nrhs, __nab + offsetab, &ldab, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtgevc_)(const char *side, const char *howmny, int *select, int *n, double *s, int *lds, double *p, int *ldp, double *vl, int *ldvl, double *vr, int *ldvr, int *mm, int *m, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgevcK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jdoubleArray s, jint offsets, jint lds, jdoubleArray p, jint offsetp, jint ldp, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jint mm, jobject m, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__nhowmny = NULL; int __nm = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; double *__ns = NULL; double *__np = NULL; double *__nvl = NULL; double *__nvr = NULL; double *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__nhowmny = NULL; + int __nm = 0; + int __ninfo = 0; + int *__nselect = NULL; jboolean *__jselect = NULL; + double *__ns = NULL; + double *__np = NULL; + double *__nvl = NULL; + double *__nvr = NULL; + double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; - if (!(__np = (*env)->GetPrimitiveArrayCritical(env, p, NULL))) goto fail; - if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; - if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { __failed = TRUE; goto done; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) { __failed = TRUE; goto done; } if (!(__nselect = malloc(sizeof(jboolean) * length))) { __failed = TRUE; goto done; } for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } + if (!(__np = (*env)->GetPrimitiveArrayCritical(env, p, NULL))) { __failed = TRUE; goto done; } + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) { __failed = TRUE; goto done; } + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dtgevc_(__nside, __nhowmny, __nselect + offsetselect, &n, __ns + offsets, &lds, __np + offsetp, &ldp, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, &mm, &__nm, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); - if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); - if (__np) (*env)->ReleasePrimitiveArrayCritical(env, p, __np, failed ? JNI_ABORT : 0); - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, __failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, __failed ? JNI_ABORT : 0); + if (__np) (*env)->ReleasePrimitiveArrayCritical(env, p, __np, __failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__nhowmny) (*env)->ReleaseStringUTFChars(env, howmny, __nhowmny); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtgex2_)(int *wantq, int *wantz, int *n, double *a, int *lda, double *b, int *ldb, double *q, int *ldq, double *z, int *ldz, int *j1, int *n1, int *n2, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgex2K(JNIEnv *env, UNUSED jobject obj, jboolean wantq, jboolean wantz, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray z, jint offsetz, jint ldz, jint j1, jint n1, jint n2, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __nwantq; int __nwantz; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nq = NULL; double *__nz = NULL; double *__nwork = NULL; + jboolean __failed = FALSE; + int __nwantq; + int __nwantz; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + double *__nq = NULL; + double *__nz = NULL; + double *__nwork = NULL; __nwantq = wantq; __nwantz = wantz; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dtgex2_(&__nwantq, &__nwantz, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nq + offsetq, &ldq, __nz + offsetz, &ldz, &j1, &n1, &n2, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) wantz = __nwantz; - if (!failed) wantq = __nwantq; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) wantz = __nwantz; + if (!__failed) wantq = __nwantq; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtgexc_)(int *wantq, int *wantz, int *n, double *a, int *lda, double *b, int *ldb, double *q, int *ldq, double *z, int *ldz, int *ifst, int *ilst, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgexcK(JNIEnv *env, UNUSED jobject obj, jboolean wantq, jboolean wantz, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray z, jint offsetz, jint ldz, jobject ifst, jobject ilst, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __nwantq; int __nwantz; int __nifst = 0; int __nilst = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nq = NULL; double *__nz = NULL; double *__nwork = NULL; + jboolean __failed = FALSE; + int __nwantq; + int __nwantz; + int __nifst = 0; + int __nilst = 0; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + double *__nq = NULL; + double *__nz = NULL; + double *__nwork = NULL; __nwantq = wantq; __nwantz = wantz; __nifst = (*env)->GetIntField(env, ifst, intW_val_fieldID); __nilst = (*env)->GetIntField(env, ilst, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dtgexc_(&__nwantq, &__nwantz, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nq + offsetq, &ldq, __nz + offsetz, &ldz, &__nifst, &__nilst, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, ilst, intW_val_fieldID, __nilst); - if (!failed) (*env)->SetIntField(env, ifst, intW_val_fieldID, __nifst); - if (!failed) wantz = __nwantz; - if (!failed) wantq = __nwantq; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, ilst, intW_val_fieldID, __nilst); + if (!__failed) (*env)->SetIntField(env, ifst, intW_val_fieldID, __nifst); + if (!__failed) wantz = __nwantz; + if (!__failed) wantq = __nwantq; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtgsen_)(int *ijob, int *wantq, int *wantz, int *select, int *n, double *a, int *lda, double *b, int *ldb, double *alphar, double *alphai, double *beta, double *q, int *ldq, double *z, int *ldz, int *m, double *pl, double *pr, double *dif, double *work, int *lwork, int *iwork, int *liwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgsenK(JNIEnv *env, UNUSED jobject obj, jint ijob, jboolean wantq, jboolean wantz, jbooleanArray select, jint offsetselect, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray z, jint offsetz, jint ldz, jobject m, jobject pl, jobject pr, jdoubleArray dif, jint offsetdif, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - jboolean failed = FALSE; - int __nwantq; int __nwantz; int __nm = 0; double __npl = 0; double __npr = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; double *__na = NULL; double *__nb = NULL; double *__nalphar = NULL; double *__nalphai = NULL; double *__nbeta = NULL; double *__nq = NULL; double *__nz = NULL; double *__ndif = NULL; double *__nwork = NULL; int *__niwork = NULL; + jboolean __failed = FALSE; + int __nwantq; + int __nwantz; + int __nm = 0; + double __npl = 0; + double __npr = 0; + int __ninfo = 0; + int *__nselect = NULL; jboolean *__jselect = NULL; + double *__na = NULL; + double *__nb = NULL; + double *__nalphar = NULL; + double *__nalphai = NULL; + double *__nbeta = NULL; + double *__nq = NULL; + double *__nz = NULL; + double *__ndif = NULL; + double *__nwork = NULL; + int *__niwork = NULL; __nwantq = wantq; __nwantz = wantz; __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __npl = (*env)->GetDoubleField(env, pl, doubleW_val_fieldID); __npr = (*env)->GetDoubleField(env, pr, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) goto fail; - if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) goto fail; - if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__ndif = (*env)->GetPrimitiveArrayCritical(env, dif, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { __failed = TRUE; goto done; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) { __failed = TRUE; goto done; } if (!(__nselect = malloc(sizeof(jboolean) * length))) { __failed = TRUE; goto done; } for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) { __failed = TRUE; goto done; } + if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) { __failed = TRUE; goto done; } + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__ndif = (*env)->GetPrimitiveArrayCritical(env, dif, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dtgsen_(&ijob, &__nwantq, &__nwantz, __nselect + offsetselect, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nalphar + offsetalphar, __nalphai + offsetalphai, __nbeta + offsetbeta, __nq + offsetq, &ldq, __nz + offsetz, &ldz, &__nm, &__npl, &__npr, __ndif + offsetdif, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ndif) (*env)->ReleasePrimitiveArrayCritical(env, dif, __ndif, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); - if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, failed ? JNI_ABORT : 0); - if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ndif) (*env)->ReleasePrimitiveArrayCritical(env, dif, __ndif, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, __failed ? JNI_ABORT : 0); + if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, __failed ? JNI_ABORT : 0); + if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, pr, doubleW_val_fieldID, __npr); - if (!failed) (*env)->SetDoubleField(env, pl, doubleW_val_fieldID, __npl); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); - if (!failed) wantz = __nwantz; - if (!failed) wantq = __nwantq; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, pr, doubleW_val_fieldID, __npr); + if (!__failed) (*env)->SetDoubleField(env, pl, doubleW_val_fieldID, __npl); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (!__failed) wantz = __nwantz; + if (!__failed) wantq = __nwantq; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtgsja_)(const char *jobu, const char *jobv, const char *jobq, int *m, int *p, int *n, int *k, int *l, double *a, int *lda, double *b, int *ldb, double *tola, double *tolb, double *alpha, double *beta, double *u, int *ldu, double *v, int *ldv, double *q, int *ldq, double *work, int *ncycle, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgsjaK(JNIEnv *env, UNUSED jobject obj, jstring jobu, jstring jobv, jstring jobq, jint m, jint p, jint n, jint k, jint l, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble tola, jdouble tolb, jdoubleArray alpha, jint offsetalpha, jdoubleArray beta, jint offsetbeta, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray work, jint offsetwork, jobject ncycle, jobject info) { - jboolean failed = FALSE; - const char *__njobu = NULL; const char *__njobv = NULL; const char *__njobq = NULL; int __nncycle = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nalpha = NULL; double *__nbeta = NULL; double *__nu = NULL; double *__nv = NULL; double *__nq = NULL; double *__nwork = NULL; - if (!(__njobu = (*env)->GetStringUTFChars(env, jobu, NULL))) goto fail; - if (!(__njobv = (*env)->GetStringUTFChars(env, jobv, NULL))) goto fail; - if (!(__njobq = (*env)->GetStringUTFChars(env, jobq, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobu = NULL; + const char *__njobv = NULL; + const char *__njobq = NULL; + int __nncycle = 0; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + double *__nalpha = NULL; + double *__nbeta = NULL; + double *__nu = NULL; + double *__nv = NULL; + double *__nq = NULL; + double *__nwork = NULL; + if (!(__njobu = (*env)->GetStringUTFChars(env, jobu, NULL))) { __failed = TRUE; goto done; } + if (!(__njobv = (*env)->GetStringUTFChars(env, jobv, NULL))) { __failed = TRUE; goto done; } + if (!(__njobq = (*env)->GetStringUTFChars(env, jobq, NULL))) { __failed = TRUE; goto done; } __nncycle = (*env)->GetIntField(env, ncycle, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nalpha = (*env)->GetPrimitiveArrayCritical(env, alpha, NULL))) goto fail; - if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; - if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nalpha = (*env)->GetPrimitiveArrayCritical(env, alpha, NULL))) { __failed = TRUE; goto done; } + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) { __failed = TRUE; goto done; } + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dtgsja_(__njobu, __njobv, __njobq, &m, &p, &n, &k, &l, __na + offseta, &lda, __nb + offsetb, &ldb, &tola, &tolb, __nalpha + offsetalpha, __nbeta + offsetbeta, __nu + offsetu, &ldu, __nv + offsetv, &ldv, __nq + offsetq, &ldq, __nwork + offsetwork, &__nncycle, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); - if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); - if (__nalpha) (*env)->ReleasePrimitiveArrayCritical(env, alpha, __nalpha, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, ncycle, intW_val_fieldID, __nncycle); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, __failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, __failed ? JNI_ABORT : 0); + if (__nalpha) (*env)->ReleasePrimitiveArrayCritical(env, alpha, __nalpha, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, ncycle, intW_val_fieldID, __nncycle); if (__njobq) (*env)->ReleaseStringUTFChars(env, jobq, __njobq); if (__njobv) (*env)->ReleaseStringUTFChars(env, jobv, __njobv); if (__njobu) (*env)->ReleaseStringUTFChars(env, jobu, __njobu); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtgsna_)(const char *job, const char *howmny, int *select, int *n, double *a, int *lda, double *b, int *ldb, double *vl, int *ldvl, double *vr, int *ldvr, double *s, double *dif, int *mm, int *m, double *work, int *lwork, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgsnaK(JNIEnv *env, UNUSED jobject obj, jstring job, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jdoubleArray s, jint offsets, jdoubleArray dif, jint offsetdif, jint mm, jobject m, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__njob = NULL; const char *__nhowmny = NULL; int __nm = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; double *__na = NULL; double *__nb = NULL; double *__nvl = NULL; double *__nvr = NULL; double *__ns = NULL; double *__ndif = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; - if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njob = NULL; + const char *__nhowmny = NULL; + int __nm = 0; + int __ninfo = 0; + int *__nselect = NULL; jboolean *__jselect = NULL; + double *__na = NULL; + double *__nb = NULL; + double *__nvl = NULL; + double *__nvr = NULL; + double *__ns = NULL; + double *__ndif = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) { __failed = TRUE; goto done; } + if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; - if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; - if (!(__ndif = (*env)->GetPrimitiveArrayCritical(env, dif, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { __failed = TRUE; goto done; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) { __failed = TRUE; goto done; } if (!(__nselect = malloc(sizeof(jboolean) * length))) { __failed = TRUE; goto done; } for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) { __failed = TRUE; goto done; } + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } + if (!(__ndif = (*env)->GetPrimitiveArrayCritical(env, dif, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dtgsna_(__njob, __nhowmny, __nselect + offsetselect, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, __ns + offsets, __ndif + offsetdif, &mm, &__nm, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ndif) (*env)->ReleasePrimitiveArrayCritical(env, dif, __ndif, failed ? JNI_ABORT : 0); - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); - if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ndif) (*env)->ReleasePrimitiveArrayCritical(env, dif, __ndif, __failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, __failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__nhowmny) (*env)->ReleaseStringUTFChars(env, howmny, __nhowmny); if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtgsy2_)(const char *trans, int *ijob, int *m, int *n, double *a, int *lda, double *b, int *ldb, double *c, int *Ldc, double *d, int *ldd, double *e, int *lde, double *f, int *ldf, double *scale, double *rdsum, double *rdscal, int *iwork, int *pq, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgsy2K(JNIEnv *env, UNUSED jobject obj, jstring trans, jint ijob, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray d, jint offsetd, jint ldd, jdoubleArray e, jint offsete, jint lde, jdoubleArray f, jint offsetf, jint ldf, jobject scale, jobject rdsum, jobject rdscal, jintArray iwork, jint offsetiwork, jobject pq, jobject info) { - jboolean failed = FALSE; - const char *__ntrans = NULL; double __nscale = 0; double __nrdsum = 0; double __nrdscal = 0; int __npq = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nc = NULL; double *__nd = NULL; double *__ne = NULL; double *__nf = NULL; int *__niwork = NULL; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ntrans = NULL; + double __nscale = 0; + double __nrdsum = 0; + double __nrdscal = 0; + int __npq = 0; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + double *__nc = NULL; + double *__nd = NULL; + double *__ne = NULL; + double *__nf = NULL; + int *__niwork = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } __nscale = (*env)->GetDoubleField(env, scale, doubleW_val_fieldID); __nrdsum = (*env)->GetDoubleField(env, rdsum, doubleW_val_fieldID); __nrdscal = (*env)->GetDoubleField(env, rdscal, doubleW_val_fieldID); __npq = (*env)->GetIntField(env, pq, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nf = (*env)->GetPrimitiveArrayCritical(env, f, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nf = (*env)->GetPrimitiveArrayCritical(env, f, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dtgsy2_(__ntrans, &ijob, &m, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nc + offsetc, &Ldc, __nd + offsetd, &ldd, __ne + offsete, &lde, __nf + offsetf, &ldf, &__nscale, &__nrdsum, &__nrdscal, __niwork + offsetiwork, &__npq, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nf) (*env)->ReleasePrimitiveArrayCritical(env, f, __nf, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, pq, intW_val_fieldID, __npq); - if (!failed) (*env)->SetDoubleField(env, rdscal, doubleW_val_fieldID, __nrdscal); - if (!failed) (*env)->SetDoubleField(env, rdsum, doubleW_val_fieldID, __nrdsum); - if (!failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nf) (*env)->ReleasePrimitiveArrayCritical(env, f, __nf, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, pq, intW_val_fieldID, __npq); + if (!__failed) (*env)->SetDoubleField(env, rdscal, doubleW_val_fieldID, __nrdscal); + if (!__failed) (*env)->SetDoubleField(env, rdsum, doubleW_val_fieldID, __nrdsum); + if (!__failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtgsyl_)(const char *trans, int *ijob, int *m, int *n, double *a, int *lda, double *b, int *ldb, double *c, int *Ldc, double *d, int *ldd, double *e, int *lde, double *f, int *ldf, double *scale, double *dif, double *work, int *lwork, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtgsylK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint ijob, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray c, jint offsetc, jint Ldc, jdoubleArray d, jint offsetd, jint ldd, jdoubleArray e, jint offsete, jint lde, jdoubleArray f, jint offsetf, jint ldf, jobject scale, jobject dif, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__ntrans = NULL; double __nscale = 0; double __ndif = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nc = NULL; double *__nd = NULL; double *__ne = NULL; double *__nf = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ntrans = NULL; + double __nscale = 0; + double __ndif = 0; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + double *__nc = NULL; + double *__nd = NULL; + double *__ne = NULL; + double *__nf = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } __nscale = (*env)->GetDoubleField(env, scale, doubleW_val_fieldID); __ndif = (*env)->GetDoubleField(env, dif, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nf = (*env)->GetPrimitiveArrayCritical(env, f, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nf = (*env)->GetPrimitiveArrayCritical(env, f, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dtgsyl_(__ntrans, &ijob, &m, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nc + offsetc, &Ldc, __nd + offsetd, &ldd, __ne + offsete, &lde, __nf + offsetf, &ldf, &__nscale, &__ndif, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nf) (*env)->ReleasePrimitiveArrayCritical(env, f, __nf, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, dif, doubleW_val_fieldID, __ndif); - if (!failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nf) (*env)->ReleasePrimitiveArrayCritical(env, f, __nf, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, dif, doubleW_val_fieldID, __ndif); + if (!__failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtpcon_)(const char *norm, const char *uplo, const char *diag, int *n, double *ap, double *rcond, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtpconK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jstring diag, jint n, jdoubleArray ap, jint offsetap, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nnorm = NULL; const char *__nuplo = NULL; const char *__ndiag = NULL; double __nrcond = 0; int __ninfo = 0; double *__nap = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + const char *__nuplo = NULL; + const char *__ndiag = NULL; + double __nrcond = 0; + int __ninfo = 0; + double *__nap = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dtpcon_(__nnorm, __nuplo, __ndiag, &n, __nap + offsetap, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtprfs_)(const char *uplo, const char *trans, const char *diag, int *n, int *nrhs, double *ap, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtprfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; int __ninfo = 0; double *__nap = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + const char *__ndiag = NULL; + int __ninfo = 0; + double *__nap = NULL; + double *__nb = NULL; + double *__nx = NULL; + double *__nferr = NULL; + double *__nberr = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dtprfs_(__nuplo, __ntrans, __ndiag, &n, &nrhs, __nap + offsetap, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtptri_)(const char *uplo, const char *diag, int *n, double *ap, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtptriK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring diag, jint n, jdoubleArray ap, jint offsetap, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ndiag = NULL; int __ninfo = 0; double *__nap = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ndiag = NULL; + int __ninfo = 0; + double *__nap = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } dtptri_(__nuplo, __ndiag, &n, __nap + offsetap, &__ninfo); done: - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtptrs_)(const char *uplo, const char *trans, const char *diag, int *n, int *nrhs, double *ap, double *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtptrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jdoubleArray ap, jint offsetap, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; int __ninfo = 0; double *__nap = NULL; double *__nb = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + const char *__ndiag = NULL; + int __ninfo = 0; + double *__nap = NULL; + double *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } dtptrs_(__nuplo, __ntrans, __ndiag, &n, &nrhs, __nap + offsetap, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtrcon_)(const char *norm, const char *uplo, const char *diag, int *n, double *a, int *lda, double *rcond, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrconK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jstring diag, jint n, jdoubleArray a, jint offseta, jint lda, jobject rcond, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nnorm = NULL; const char *__nuplo = NULL; const char *__ndiag = NULL; double __nrcond = 0; int __ninfo = 0; double *__na = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + const char *__nuplo = NULL; + const char *__ndiag = NULL; + double __nrcond = 0; + int __ninfo = 0; + double *__na = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetDoubleField(env, rcond, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dtrcon_(__nnorm, __nuplo, __ndiag, &n, __na + offseta, &lda, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, rcond, doubleW_val_fieldID, __nrcond); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtrevc_)(const char *side, const char *howmny, int *select, int *n, double *t, int *ldt, double *vl, int *ldvl, double *vr, int *ldvr, int *mm, int *m, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrevcK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jdoubleArray t, jint offsett, jint ldt, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jint mm, jobject m, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__nhowmny = NULL; int __nm = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; double *__nt = NULL; double *__nvl = NULL; double *__nvr = NULL; double *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__nhowmny = NULL; + int __nm = 0; + int __ninfo = 0; + int *__nselect = NULL; jboolean *__jselect = NULL; + double *__nt = NULL; + double *__nvl = NULL; + double *__nvr = NULL; + double *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); - if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; - if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; - if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { __failed = TRUE; goto done; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) { __failed = TRUE; goto done; } if (!(__nselect = malloc(sizeof(jboolean) * length))) { __failed = TRUE; goto done; } for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) { __failed = TRUE; goto done; } + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) { __failed = TRUE; goto done; } + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dtrevc_(__nside, __nhowmny, __nselect + offsetselect, &n, __nt + offsett, &ldt, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, &mm, &__nm, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); - if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); - if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, __failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, __failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, __failed ? JNI_ABORT : 0); if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__nhowmny) (*env)->ReleaseStringUTFChars(env, howmny, __nhowmny); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtrexc_)(const char *compq, int *n, double *t, int *ldt, double *q, int *ldq, int *ifst, int *ilst, double *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrexcK(JNIEnv *env, UNUSED jobject obj, jstring compq, jint n, jdoubleArray t, jint offsett, jint ldt, jdoubleArray q, jint offsetq, jint ldq, jobject ifst, jobject ilst, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__ncompq = NULL; int __nifst = 0; int __nilst = 0; int __ninfo = 0; double *__nt = NULL; double *__nq = NULL; double *__nwork = NULL; - if (!(__ncompq = (*env)->GetStringUTFChars(env, compq, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ncompq = NULL; + int __nifst = 0; + int __nilst = 0; + int __ninfo = 0; + double *__nt = NULL; + double *__nq = NULL; + double *__nwork = NULL; + if (!(__ncompq = (*env)->GetStringUTFChars(env, compq, NULL))) { __failed = TRUE; goto done; } __nifst = (*env)->GetIntField(env, ifst, intW_val_fieldID); __nilst = (*env)->GetIntField(env, ilst, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dtrexc_(__ncompq, &n, __nt + offsett, &ldt, __nq + offsetq, &ldq, &__nifst, &__nilst, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, ilst, intW_val_fieldID, __nilst); - if (!failed) (*env)->SetIntField(env, ifst, intW_val_fieldID, __nifst); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, ilst, intW_val_fieldID, __nilst); + if (!__failed) (*env)->SetIntField(env, ifst, intW_val_fieldID, __nifst); if (__ncompq) (*env)->ReleaseStringUTFChars(env, compq, __ncompq); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtrrfs_)(const char *uplo, const char *trans, const char *diag, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrrfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray x, jint offsetx, jint ldx, jdoubleArray ferr, jint offsetferr, jdoubleArray berr, jint offsetberr, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nx = NULL; double *__nferr = NULL; double *__nberr = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + const char *__ndiag = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + double *__nx = NULL; + double *__nferr = NULL; + double *__nberr = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dtrrfs_(__nuplo, __ntrans, __ndiag, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtrsen_)(const char *job, const char *compq, int *select, int *n, double *t, int *ldt, double *q, int *ldq, double *wr, double *wi, int *m, double *s, double *sep, double *work, int *lwork, int *iwork, int *liwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrsenK(JNIEnv *env, UNUSED jobject obj, jstring job, jstring compq, jbooleanArray select, jint offsetselect, jint n, jdoubleArray t, jint offsett, jint ldt, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jobject m, jobject s, jobject sep, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - jboolean failed = FALSE; - const char *__njob = NULL; const char *__ncompq = NULL; int __nm = 0; double __ns = 0; double __nsep = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; double *__nt = NULL; double *__nq = NULL; double *__nwr = NULL; double *__nwi = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; - if (!(__ncompq = (*env)->GetStringUTFChars(env, compq, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njob = NULL; + const char *__ncompq = NULL; + int __nm = 0; + double __ns = 0; + double __nsep = 0; + int __ninfo = 0; + int *__nselect = NULL; jboolean *__jselect = NULL; + double *__nt = NULL; + double *__nq = NULL; + double *__nwr = NULL; + double *__nwi = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) { __failed = TRUE; goto done; } + if (!(__ncompq = (*env)->GetStringUTFChars(env, compq, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ns = (*env)->GetDoubleField(env, s, doubleW_val_fieldID); __nsep = (*env)->GetDoubleField(env, sep, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); - if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; - if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { __failed = TRUE; goto done; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) { __failed = TRUE; goto done; } if (!(__nselect = malloc(sizeof(jboolean) * length))) { __failed = TRUE; goto done; } for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dtrsen_(__njob, __ncompq, __nselect + offsetselect, &n, __nt + offsett, &ldt, __nq + offsetq, &ldq, __nwr + offsetwr, __nwi + offsetwi, &__nm, &__ns, &__nsep, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); - if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, __failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, __failed ? JNI_ABORT : 0); if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, sep, doubleW_val_fieldID, __nsep); - if (!failed) (*env)->SetDoubleField(env, s, doubleW_val_fieldID, __ns); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, sep, doubleW_val_fieldID, __nsep); + if (!__failed) (*env)->SetDoubleField(env, s, doubleW_val_fieldID, __ns); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__ncompq) (*env)->ReleaseStringUTFChars(env, compq, __ncompq); if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtrsna_)(const char *job, const char *howmny, int *select, int *n, double *t, int *ldt, double *vl, int *ldvl, double *vr, int *ldvr, double *s, double *sep, int *mm, int *m, double *work, int *ldwork, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrsnaK(JNIEnv *env, UNUSED jobject obj, jstring job, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jdoubleArray t, jint offsett, jint ldt, jdoubleArray vl, jint offsetvl, jint ldvl, jdoubleArray vr, jint offsetvr, jint ldvr, jdoubleArray s, jint offsets, jdoubleArray sep, jint offsetsep, jint mm, jobject m, jdoubleArray work, jint offsetwork, jint ldwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__njob = NULL; const char *__nhowmny = NULL; int __nm = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; double *__nt = NULL; double *__nvl = NULL; double *__nvr = NULL; double *__ns = NULL; double *__nsep = NULL; double *__nwork = NULL; int *__niwork = NULL; - if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; - if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njob = NULL; + const char *__nhowmny = NULL; + int __nm = 0; + int __ninfo = 0; + int *__nselect = NULL; jboolean *__jselect = NULL; + double *__nt = NULL; + double *__nvl = NULL; + double *__nvr = NULL; + double *__ns = NULL; + double *__nsep = NULL; + double *__nwork = NULL; + int *__niwork = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) { __failed = TRUE; goto done; } + if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); - if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; - if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; - if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; - if (!(__nsep = (*env)->GetPrimitiveArrayCritical(env, sep, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { __failed = TRUE; goto done; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) { __failed = TRUE; goto done; } if (!(__nselect = malloc(sizeof(jboolean) * length))) { __failed = TRUE; goto done; } for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) { __failed = TRUE; goto done; } + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) { __failed = TRUE; goto done; } + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } + if (!(__nsep = (*env)->GetPrimitiveArrayCritical(env, sep, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } dtrsna_(__njob, __nhowmny, __nselect + offsetselect, &n, __nt + offsett, &ldt, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, __ns + offsets, __nsep + offsetsep, &mm, &__nm, __nwork + offsetwork, &ldwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nsep) (*env)->ReleasePrimitiveArrayCritical(env, sep, __nsep, failed ? JNI_ABORT : 0); - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); - if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); - if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nsep) (*env)->ReleasePrimitiveArrayCritical(env, sep, __nsep, __failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, __failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, __failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, __failed ? JNI_ABORT : 0); if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__nhowmny) (*env)->ReleaseStringUTFChars(env, howmny, __nhowmny); if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtrsyl_)(const char *trana, const char *tranb, int *isgn, int *m, int *n, double *a, int *lda, double *b, int *ldb, double *c, int *Ldc, double *scale, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrsylK(JNIEnv *env, UNUSED jobject obj, jstring trana, jstring tranb, jint isgn, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdoubleArray c, jint offsetc, jint Ldc, jobject scale, jobject info) { - jboolean failed = FALSE; - const char *__ntrana = NULL; const char *__ntranb = NULL; double __nscale = 0; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; double *__nc = NULL; - if (!(__ntrana = (*env)->GetStringUTFChars(env, trana, NULL))) goto fail; - if (!(__ntranb = (*env)->GetStringUTFChars(env, tranb, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ntrana = NULL; + const char *__ntranb = NULL; + double __nscale = 0; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + double *__nc = NULL; + if (!(__ntrana = (*env)->GetStringUTFChars(env, trana, NULL))) { __failed = TRUE; goto done; } + if (!(__ntranb = (*env)->GetStringUTFChars(env, tranb, NULL))) { __failed = TRUE; goto done; } __nscale = (*env)->GetDoubleField(env, scale, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } dtrsyl_(__ntrana, __ntranb, &isgn, &m, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nc + offsetc, &Ldc, &__nscale, &__ninfo); done: - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, scale, doubleW_val_fieldID, __nscale); if (__ntranb) (*env)->ReleaseStringUTFChars(env, tranb, __ntranb); if (__ntrana) (*env)->ReleaseStringUTFChars(env, trana, __ntrana); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtrti2_)(const char *uplo, const char *diag, int *n, double *a, int *lda, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrti2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring diag, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ndiag = NULL; int __ninfo = 0; double *__na = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ndiag = NULL; + int __ninfo = 0; + double *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } dtrti2_(__nuplo, __ndiag, &n, __na + offseta, &lda, &__ninfo); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtrtri_)(const char *uplo, const char *diag, int *n, double *a, int *lda, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrtriK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring diag, jint n, jdoubleArray a, jint offseta, jint lda, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ndiag = NULL; int __ninfo = 0; double *__na = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ndiag = NULL; + int __ninfo = 0; + double *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } dtrtri_(__nuplo, __ndiag, &n, __na + offseta, &lda, &__ninfo); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtrtrs_)(const char *uplo, const char *trans, const char *diag, int *n, int *nrhs, double *a, int *lda, double *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtrtrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; int __ninfo = 0; double *__na = NULL; double *__nb = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + const char *__ndiag = NULL; + int __ninfo = 0; + double *__na = NULL; + double *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } dtrtrs_(__nuplo, __ntrans, __ndiag, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtzrqf_)(int *m, int *n, double *a, int *lda, double *tau, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtzrqfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } dtzrqf_(&m, &n, __na + offseta, &lda, __ntau + offsettau, &__ninfo); done: - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtzrzf_)(int *m, int *n, double *a, int *lda, double *tau, double *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dtzrzfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray tau, jint offsettau, jdoubleArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__na = NULL; double *__ntau = NULL; double *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__na = NULL; + double *__ntau = NULL; + double *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dtzrzf_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static int (*ieeeck_)(int *ispec, float *zero, float *one); jint Java_dev_ludovic_netlib_lapack_JNILAPACK_ieeeckK(JNIEnv *env, UNUSED jobject obj, jint ispec, jfloat zero, jfloat one) { - jint __ret; - jboolean failed = FALSE; - - + jint __ret = 0; + jboolean __failed = FALSE; __ret = ieeeck_(&ispec, &zero, &one); done: - - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static int (*ilaenv_)(int *ispec, const char *name, const char *opts, int *n1, int *n2, int *n3, int *n4); jint Java_dev_ludovic_netlib_lapack_JNILAPACK_ilaenvK(JNIEnv *env, UNUSED jobject obj, jint ispec, jstring name, jstring opts, jint n1, jint n2, jint n3, jint n4) { - jint __ret; - jboolean failed = FALSE; - const char *__nname = NULL; const char *__nopts = NULL; - if (!(__nname = (*env)->GetStringUTFChars(env, name, NULL))) goto fail; - if (!(__nopts = (*env)->GetStringUTFChars(env, opts, NULL))) goto fail; + jint __ret = 0; + jboolean __failed = FALSE; + const char *__nname = NULL; + const char *__nopts = NULL; + if (!(__nname = (*env)->GetStringUTFChars(env, name, NULL))) { __failed = TRUE; goto done; } + if (!(__nopts = (*env)->GetStringUTFChars(env, opts, NULL))) { __failed = TRUE; goto done; } __ret = ilaenv_(&ispec, __nname, __nopts, &n1, &n2, &n3, &n4); done: if (__nopts) (*env)->ReleaseStringUTFChars(env, opts, __nopts); if (__nname) (*env)->ReleaseStringUTFChars(env, name, __nname); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static void (*ilaver_)(int *vers_major, int *vers_minor, int *vers_patch); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ilaverK(JNIEnv *env, UNUSED jobject obj, jobject vers_major, jobject vers_minor, jobject vers_patch) { - jboolean failed = FALSE; - int __nvers_major = 0; int __nvers_minor = 0; int __nvers_patch = 0; + jboolean __failed = FALSE; + int __nvers_major = 0; + int __nvers_minor = 0; + int __nvers_patch = 0; __nvers_major = (*env)->GetIntField(env, vers_major, intW_val_fieldID); __nvers_minor = (*env)->GetIntField(env, vers_minor, intW_val_fieldID); __nvers_patch = (*env)->GetIntField(env, vers_patch, intW_val_fieldID); ilaver_(&__nvers_major, &__nvers_minor, &__nvers_patch); done: - if (!failed) (*env)->SetIntField(env, vers_patch, intW_val_fieldID, __nvers_patch); - if (!failed) (*env)->SetIntField(env, vers_minor, intW_val_fieldID, __nvers_minor); - if (!failed) (*env)->SetIntField(env, vers_major, intW_val_fieldID, __nvers_major); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetIntField(env, vers_patch, intW_val_fieldID, __nvers_patch); + if (!__failed) (*env)->SetIntField(env, vers_minor, intW_val_fieldID, __nvers_minor); + if (!__failed) (*env)->SetIntField(env, vers_major, intW_val_fieldID, __nvers_major); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static int (*iparmq_)(int *ispec, const char *name, const char *opts, int *n, int *ilo, int *ihi, int *lwork); jint Java_dev_ludovic_netlib_lapack_JNILAPACK_iparmqK(JNIEnv *env, UNUSED jobject obj, jint ispec, jstring name, jstring opts, jint n, jint ilo, jint ihi, jint lwork) { - jint __ret; - jboolean failed = FALSE; - const char *__nname = NULL; const char *__nopts = NULL; - if (!(__nname = (*env)->GetStringUTFChars(env, name, NULL))) goto fail; - if (!(__nopts = (*env)->GetStringUTFChars(env, opts, NULL))) goto fail; + jint __ret = 0; + jboolean __failed = FALSE; + const char *__nname = NULL; + const char *__nopts = NULL; + if (!(__nname = (*env)->GetStringUTFChars(env, name, NULL))) { __failed = TRUE; goto done; } + if (!(__nopts = (*env)->GetStringUTFChars(env, opts, NULL))) { __failed = TRUE; goto done; } __ret = iparmq_(&ispec, __nname, __nopts, &n, &ilo, &ihi, &lwork); done: if (__nopts) (*env)->ReleaseStringUTFChars(env, opts, __nopts); if (__nname) (*env)->ReleaseStringUTFChars(env, name, __nname); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static int (*lsamen_)(int *n, const char *ca, const char *cb); jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_lsamenK(JNIEnv *env, UNUSED jobject obj, jint n, jstring ca, jstring cb) { - jboolean __ret; - jboolean failed = FALSE; - const char *__nca = NULL; const char *__ncb = NULL; - if (!(__nca = (*env)->GetStringUTFChars(env, ca, NULL))) goto fail; - if (!(__ncb = (*env)->GetStringUTFChars(env, cb, NULL))) goto fail; + jboolean __ret = 0; + jboolean __failed = FALSE; + const char *__nca = NULL; + const char *__ncb = NULL; + if (!(__nca = (*env)->GetStringUTFChars(env, ca, NULL))) { __failed = TRUE; goto done; } + if (!(__ncb = (*env)->GetStringUTFChars(env, cb, NULL))) { __failed = TRUE; goto done; } __ret = lsamen_(&n, __nca, __ncb); done: if (__ncb) (*env)->ReleaseStringUTFChars(env, cb, __ncb); if (__nca) (*env)->ReleaseStringUTFChars(env, ca, __nca); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static void (*sbdsdc_)(const char *uplo, const char *compq, int *n, float *d, float *e, float *u, int *ldu, float *vt, int *ldvt, float *q, int *iq, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sbdsdcK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring compq, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jint ldvt, jfloatArray q, jint offsetq, jintArray iq, jint offsetiq, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ncompq = NULL; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nu = NULL; float *__nvt = NULL; float *__nq = NULL; int *__niq = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ncompq = (*env)->GetStringUTFChars(env, compq, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; - if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__niq = (*env)->GetPrimitiveArrayCritical(env, iq, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ncompq = NULL; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; + float *__nu = NULL; + float *__nvt = NULL; + float *__nq = NULL; + int *__niq = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ncompq = (*env)->GetStringUTFChars(env, compq, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) { __failed = TRUE; goto done; } + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__niq = (*env)->GetPrimitiveArrayCritical(env, iq, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } sbdsdc_(__nuplo, __ncompq, &n, __nd + offsetd, __ne + offsete, __nu + offsetu, &ldu, __nvt + offsetvt, &ldvt, __nq + offsetq, __niq + offsetiq, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__niq) (*env)->ReleasePrimitiveArrayCritical(env, iq, __niq, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); - if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__niq) (*env)->ReleasePrimitiveArrayCritical(env, iq, __niq, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, __failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ncompq) (*env)->ReleaseStringUTFChars(env, compq, __ncompq); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sbdsqr_)(const char *uplo, int *n, int *ncvt, int *nru, int *ncc, float *d, float *e, float *vt, int *ldvt, float *u, int *ldu, float *c, int *Ldc, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sbdsqrK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint ncvt, jint nru, jint ncc, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray vt, jint offsetvt, jint ldvt, jfloatArray u, jint offsetu, jint ldu, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nvt = NULL; float *__nu = NULL; float *__nc = NULL; float *__nwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; - if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; + float *__nvt = NULL; + float *__nu = NULL; + float *__nc = NULL; + float *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) { __failed = TRUE; goto done; } + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sbdsqr_(__nuplo, &n, &ncvt, &nru, &ncc, __nd + offsetd, __ne + offsete, __nvt + offsetvt, &ldvt, __nu + offsetu, &ldu, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); - if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, __failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sdisna_)(const char *job, int *m, int *n, float *d, float *sep, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sdisnaK(JNIEnv *env, UNUSED jobject obj, jstring job, jint m, jint n, jfloatArray d, jint offsetd, jfloatArray sep, jint offsetsep, jobject info) { - jboolean failed = FALSE; - const char *__njob = NULL; int __ninfo = 0; float *__nd = NULL; float *__nsep = NULL; - if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nsep = (*env)->GetPrimitiveArrayCritical(env, sep, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njob = NULL; + int __ninfo = 0; + float *__nd = NULL; + float *__nsep = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nsep = (*env)->GetPrimitiveArrayCritical(env, sep, NULL))) { __failed = TRUE; goto done; } sdisna_(__njob, &m, &n, __nd + offsetd, __nsep + offsetsep, &__ninfo); done: - if (__nsep) (*env)->ReleasePrimitiveArrayCritical(env, sep, __nsep, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nsep) (*env)->ReleasePrimitiveArrayCritical(env, sep, __nsep, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgbbrd_)(const char *vect, int *m, int *n, int *ncc, int *kl, int *ku, float *ab, int *ldab, float *d, float *e, float *q, int *ldq, float *pt, int *ldpt, float *c, int *Ldc, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbbrdK(JNIEnv *env, UNUSED jobject obj, jstring vect, jint m, jint n, jint ncc, jint kl, jint ku, jfloatArray ab, jint offsetab, jint ldab, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray q, jint offsetq, jint ldq, jfloatArray pt, jint offsetpt, jint ldpt, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nvect = NULL; int __ninfo = 0; float *__nab = NULL; float *__nd = NULL; float *__ne = NULL; float *__nq = NULL; float *__npt = NULL; float *__nc = NULL; float *__nwork = NULL; - if (!(__nvect = (*env)->GetStringUTFChars(env, vect, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__npt = (*env)->GetPrimitiveArrayCritical(env, pt, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nvect = NULL; + int __ninfo = 0; + float *__nab = NULL; + float *__nd = NULL; + float *__ne = NULL; + float *__nq = NULL; + float *__npt = NULL; + float *__nc = NULL; + float *__nwork = NULL; + if (!(__nvect = (*env)->GetStringUTFChars(env, vect, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__npt = (*env)->GetPrimitiveArrayCritical(env, pt, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sgbbrd_(__nvect, &m, &n, &ncc, &kl, &ku, __nab + offsetab, &ldab, __nd + offsetd, __ne + offsete, __nq + offsetq, &ldq, __npt + offsetpt, &ldpt, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__npt) (*env)->ReleasePrimitiveArrayCritical(env, pt, __npt, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__npt) (*env)->ReleasePrimitiveArrayCritical(env, pt, __npt, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nvect) (*env)->ReleaseStringUTFChars(env, vect, __nvect); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgbcon_)(const char *norm, int *n, int *kl, int *ku, float *ab, int *ldab, int *ipiv, float *anorm, float *rcond, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbconK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jint kl, jint ku, jfloatArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nnorm = NULL; float __nrcond = 0; int __ninfo = 0; float *__nab = NULL; int *__nipiv = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + float __nrcond = 0; + int __ninfo = 0; + float *__nab = NULL; + int *__nipiv = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } sgbcon_(__nnorm, &n, &kl, &ku, __nab + offsetab, &ldab, __nipiv + offsetipiv, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgbequ_)(int *m, int *n, int *kl, int *ku, float *ab, int *ldab, float *r, float *c, float *rowcnd, float *colcnd, float *amax, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbequK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint kl, jint ku, jfloatArray ab, jint offsetab, jint ldab, jfloatArray r, jint offsetr, jfloatArray c, jint offsetc, jobject rowcnd, jobject colcnd, jobject amax, jobject info) { - jboolean failed = FALSE; - float __nrowcnd = 0; float __ncolcnd = 0; float __namax = 0; int __ninfo = 0; float *__nab = NULL; float *__nr = NULL; float *__nc = NULL; + jboolean __failed = FALSE; + float __nrowcnd = 0; + float __ncolcnd = 0; + float __namax = 0; + int __ninfo = 0; + float *__nab = NULL; + float *__nr = NULL; + float *__nc = NULL; __nrowcnd = (*env)->GetFloatField(env, rowcnd, floatW_val_fieldID); __ncolcnd = (*env)->GetFloatField(env, colcnd, floatW_val_fieldID); __namax = (*env)->GetFloatField(env, amax, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } sgbequ_(&m, &n, &kl, &ku, __nab + offsetab, &ldab, __nr + offsetr, __nc + offsetc, &__nrowcnd, &__ncolcnd, &__namax, &__ninfo); done: - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, amax, floatW_val_fieldID, __namax); - if (!failed) (*env)->SetFloatField(env, colcnd, floatW_val_fieldID, __ncolcnd); - if (!failed) (*env)->SetFloatField(env, rowcnd, floatW_val_fieldID, __nrowcnd); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, amax, floatW_val_fieldID, __namax); + if (!__failed) (*env)->SetFloatField(env, colcnd, floatW_val_fieldID, __ncolcnd); + if (!__failed) (*env)->SetFloatField(env, rowcnd, floatW_val_fieldID, __nrowcnd); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgbrfs_)(const char *trans, int *n, int *kl, int *ku, int *nrhs, float *ab, int *ldab, float *afb, int *ldafb, int *ipiv, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbrfsK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint n, jint kl, jint ku, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray afb, jint offsetafb, jint ldafb, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__ntrans = NULL; int __ninfo = 0; float *__nab = NULL; float *__nafb = NULL; int *__nipiv = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nafb = (*env)->GetPrimitiveArrayCritical(env, afb, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ntrans = NULL; + int __ninfo = 0; + float *__nab = NULL; + float *__nafb = NULL; + int *__nipiv = NULL; + float *__nb = NULL; + float *__nx = NULL; + float *__nferr = NULL; + float *__nberr = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nafb = (*env)->GetPrimitiveArrayCritical(env, afb, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } sgbrfs_(__ntrans, &n, &kl, &ku, &nrhs, __nab + offsetab, &ldab, __nafb + offsetafb, &ldafb, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nafb) (*env)->ReleasePrimitiveArrayCritical(env, afb, __nafb, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nafb) (*env)->ReleasePrimitiveArrayCritical(env, afb, __nafb, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgbsv_)(int *n, int *kl, int *ku, int *nrhs, float *ab, int *ldab, int *ipiv, float *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbsvK(JNIEnv *env, UNUSED jobject obj, jint n, jint kl, jint ku, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__nab = NULL; int *__nipiv = NULL; float *__nb = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__nab = NULL; + int *__nipiv = NULL; + float *__nb = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } sgbsv_(&n, &kl, &ku, &nrhs, __nab + offsetab, &ldab, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgbsvx_)(const char *fact, const char *trans, int *n, int *kl, int *ku, int *nrhs, float *ab, int *ldab, float *afb, int *ldafb, int *ipiv, char *equed, float *r, float *c, float *b, int *ldb, float *x, int *ldx, float *rcond, float *ferr, float *berr, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbsvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring trans, jint n, jint kl, jint ku, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray afb, jint offsetafb, jint ldafb, jintArray ipiv, jint offsetipiv, jobject equed, jfloatArray r, jint offsetr, jfloatArray c, jint offsetc, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nfact = NULL; const char *__ntrans = NULL; char *__nequed = NULL; jstring __jequed = NULL;; float __nrcond = 0; int __ninfo = 0; float *__nab = NULL; float *__nafb = NULL; int *__nipiv = NULL; float *__nr = NULL; float *__nc = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nfact = NULL; + const char *__ntrans = NULL; + char *__nequed = NULL; jstring __jequed = NULL; + float __nrcond = 0; + int __ninfo = 0; + float *__nab = NULL; + float *__nafb = NULL; + int *__nipiv = NULL; + float *__nr = NULL; + float *__nc = NULL; + float *__nb = NULL; + float *__nx = NULL; + float *__nferr = NULL; + float *__nberr = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nafb = (*env)->GetPrimitiveArrayCritical(env, afb, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nafb = (*env)->GetPrimitiveArrayCritical(env, afb, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } sgbsvx_(__nfact, __ntrans, &n, &kl, &ku, &nrhs, __nab + offsetab, &ldab, __nafb + offsetafb, &ldafb, __nipiv + offsetipiv, __nequed, __nr + offsetr, __nc + offsetc, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nafb) (*env)->ReleasePrimitiveArrayCritical(env, afb, __nafb, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); - if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nafb) (*env)->ReleasePrimitiveArrayCritical(env, afb, __nafb, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!__failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgbtf2_)(int *m, int *n, int *kl, int *ku, float *ab, int *ldab, int *ipiv, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbtf2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint kl, jint ku, jfloatArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__nab = NULL; int *__nipiv = NULL; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__nab = NULL; + int *__nipiv = NULL; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } sgbtf2_(&m, &n, &kl, &ku, __nab + offsetab, &ldab, __nipiv + offsetipiv, &__ninfo); done: - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgbtrf_)(int *m, int *n, int *kl, int *ku, float *ab, int *ldab, int *ipiv, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbtrfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint kl, jint ku, jfloatArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__nab = NULL; int *__nipiv = NULL; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__nab = NULL; + int *__nipiv = NULL; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } sgbtrf_(&m, &n, &kl, &ku, __nab + offsetab, &ldab, __nipiv + offsetipiv, &__ninfo); done: - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgbtrs_)(const char *trans, int *n, int *kl, int *ku, int *nrhs, float *ab, int *ldab, int *ipiv, float *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgbtrsK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint n, jint kl, jint ku, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__ntrans = NULL; int __ninfo = 0; float *__nab = NULL; int *__nipiv = NULL; float *__nb = NULL; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ntrans = NULL; + int __ninfo = 0; + float *__nab = NULL; + int *__nipiv = NULL; + float *__nb = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } sgbtrs_(__ntrans, &n, &kl, &ku, &nrhs, __nab + offsetab, &ldab, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgebak_)(const char *job, const char *side, int *n, int *ilo, int *ihi, float *scale, int *m, float *v, int *ldv, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgebakK(JNIEnv *env, UNUSED jobject obj, jstring job, jstring side, jint n, jint ilo, jint ihi, jfloatArray scale, jint offsetscale, jint m, jfloatArray v, jint offsetv, jint ldv, jobject info) { - jboolean failed = FALSE; - const char *__njob = NULL; const char *__nside = NULL; int __ninfo = 0; float *__nscale = NULL; float *__nv = NULL; - if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nscale = (*env)->GetPrimitiveArrayCritical(env, scale, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njob = NULL; + const char *__nside = NULL; + int __ninfo = 0; + float *__nscale = NULL; + float *__nv = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) { __failed = TRUE; goto done; } + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nscale = (*env)->GetPrimitiveArrayCritical(env, scale, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } sgebak_(__njob, __nside, &n, &ilo, &ihi, __nscale + offsetscale, &m, __nv + offsetv, &ldv, &__ninfo); done: - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nscale) (*env)->ReleasePrimitiveArrayCritical(env, scale, __nscale, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nscale) (*env)->ReleasePrimitiveArrayCritical(env, scale, __nscale, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgebal_)(const char *job, int *n, float *a, int *lda, int *ilo, int *ihi, float *scale, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgebalK(JNIEnv *env, UNUSED jobject obj, jstring job, jint n, jfloatArray a, jint offseta, jint lda, jobject ilo, jobject ihi, jfloatArray scale, jint offsetscale, jobject info) { - jboolean failed = FALSE; - const char *__njob = NULL; int __nilo = 0; int __nihi = 0; int __ninfo = 0; float *__na = NULL; float *__nscale = NULL; - if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njob = NULL; + int __nilo = 0; + int __nihi = 0; + int __ninfo = 0; + float *__na = NULL; + float *__nscale = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) { __failed = TRUE; goto done; } __nilo = (*env)->GetIntField(env, ilo, intW_val_fieldID); __nihi = (*env)->GetIntField(env, ihi, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nscale = (*env)->GetPrimitiveArrayCritical(env, scale, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nscale = (*env)->GetPrimitiveArrayCritical(env, scale, NULL))) { __failed = TRUE; goto done; } sgebal_(__njob, &n, __na + offseta, &lda, &__nilo, &__nihi, __nscale + offsetscale, &__ninfo); done: - if (__nscale) (*env)->ReleasePrimitiveArrayCritical(env, scale, __nscale, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, ihi, intW_val_fieldID, __nihi); - if (!failed) (*env)->SetIntField(env, ilo, intW_val_fieldID, __nilo); + if (__nscale) (*env)->ReleasePrimitiveArrayCritical(env, scale, __nscale, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, ihi, intW_val_fieldID, __nihi); + if (!__failed) (*env)->SetIntField(env, ilo, intW_val_fieldID, __nilo); if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgebd2_)(int *m, int *n, float *a, int *lda, float *d, float *e, float *tauq, float *taup, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgebd2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray tauq, jint offsettauq, jfloatArray taup, jint offsettaup, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; float *__nd = NULL; float *__ne = NULL; float *__ntauq = NULL; float *__ntaup = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__ntauq = (*env)->GetPrimitiveArrayCritical(env, tauq, NULL))) goto fail; - if (!(__ntaup = (*env)->GetPrimitiveArrayCritical(env, taup, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + float *__nd = NULL; + float *__ne = NULL; + float *__ntauq = NULL; + float *__ntaup = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__ntauq = (*env)->GetPrimitiveArrayCritical(env, tauq, NULL))) { __failed = TRUE; goto done; } + if (!(__ntaup = (*env)->GetPrimitiveArrayCritical(env, taup, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sgebd2_(&m, &n, __na + offseta, &lda, __nd + offsetd, __ne + offsete, __ntauq + offsettauq, __ntaup + offsettaup, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntaup) (*env)->ReleasePrimitiveArrayCritical(env, taup, __ntaup, failed ? JNI_ABORT : 0); - if (__ntauq) (*env)->ReleasePrimitiveArrayCritical(env, tauq, __ntauq, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntaup) (*env)->ReleasePrimitiveArrayCritical(env, taup, __ntaup, __failed ? JNI_ABORT : 0); + if (__ntauq) (*env)->ReleasePrimitiveArrayCritical(env, tauq, __ntauq, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgebrd_)(int *m, int *n, float *a, int *lda, float *d, float *e, float *tauq, float *taup, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgebrdK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray tauq, jint offsettauq, jfloatArray taup, jint offsettaup, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; float *__nd = NULL; float *__ne = NULL; float *__ntauq = NULL; float *__ntaup = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__ntauq = (*env)->GetPrimitiveArrayCritical(env, tauq, NULL))) goto fail; - if (!(__ntaup = (*env)->GetPrimitiveArrayCritical(env, taup, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + float *__nd = NULL; + float *__ne = NULL; + float *__ntauq = NULL; + float *__ntaup = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__ntauq = (*env)->GetPrimitiveArrayCritical(env, tauq, NULL))) { __failed = TRUE; goto done; } + if (!(__ntaup = (*env)->GetPrimitiveArrayCritical(env, taup, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sgebrd_(&m, &n, __na + offseta, &lda, __nd + offsetd, __ne + offsete, __ntauq + offsettauq, __ntaup + offsettaup, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntaup) (*env)->ReleasePrimitiveArrayCritical(env, taup, __ntaup, failed ? JNI_ABORT : 0); - if (__ntauq) (*env)->ReleasePrimitiveArrayCritical(env, tauq, __ntauq, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntaup) (*env)->ReleasePrimitiveArrayCritical(env, taup, __ntaup, __failed ? JNI_ABORT : 0); + if (__ntauq) (*env)->ReleasePrimitiveArrayCritical(env, tauq, __ntauq, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgecon_)(const char *norm, int *n, float *a, int *lda, float *anorm, float *rcond, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeconK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jfloatArray a, jint offseta, jint lda, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nnorm = NULL; float __nrcond = 0; int __ninfo = 0; float *__na = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + float __nrcond = 0; + int __ninfo = 0; + float *__na = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } sgecon_(__nnorm, &n, __na + offseta, &lda, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgeequ_)(int *m, int *n, float *a, int *lda, float *r, float *c, float *rowcnd, float *colcnd, float *amax, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeequK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray r, jint offsetr, jfloatArray c, jint offsetc, jobject rowcnd, jobject colcnd, jobject amax, jobject info) { - jboolean failed = FALSE; - float __nrowcnd = 0; float __ncolcnd = 0; float __namax = 0; int __ninfo = 0; float *__na = NULL; float *__nr = NULL; float *__nc = NULL; + jboolean __failed = FALSE; + float __nrowcnd = 0; + float __ncolcnd = 0; + float __namax = 0; + int __ninfo = 0; + float *__na = NULL; + float *__nr = NULL; + float *__nc = NULL; __nrowcnd = (*env)->GetFloatField(env, rowcnd, floatW_val_fieldID); __ncolcnd = (*env)->GetFloatField(env, colcnd, floatW_val_fieldID); __namax = (*env)->GetFloatField(env, amax, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } sgeequ_(&m, &n, __na + offseta, &lda, __nr + offsetr, __nc + offsetc, &__nrowcnd, &__ncolcnd, &__namax, &__ninfo); done: - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, amax, floatW_val_fieldID, __namax); - if (!failed) (*env)->SetFloatField(env, colcnd, floatW_val_fieldID, __ncolcnd); - if (!failed) (*env)->SetFloatField(env, rowcnd, floatW_val_fieldID, __nrowcnd); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, amax, floatW_val_fieldID, __namax); + if (!__failed) (*env)->SetFloatField(env, colcnd, floatW_val_fieldID, __ncolcnd); + if (!__failed) (*env)->SetFloatField(env, rowcnd, floatW_val_fieldID, __nrowcnd); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); +} + +// static void (*sgees_)(const char *jobvs, const char *sort, const char *select, int *n, float *a, int *lda, int *sdim, float *wr, float *wi, float *vs, int *ldvs, float *work, int *lwork, int *bwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeesK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring jobvs, UNUSED jstring sort, UNUSED jstring select, UNUSED jint n, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jobject sdim, UNUSED jfloatArray wr, UNUSED jint offsetwr, UNUSED jfloatArray wi, UNUSED jint offsetwi, UNUSED jfloatArray vs, UNUSED jint offsetvs, UNUSED jint ldvs, UNUSED jfloatArray work, UNUSED jint offsetwork, UNUSED jint lwork, UNUSED jbooleanArray bwork, UNUSED jint offsetbwork, UNUSED jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +// static void (*sgeesx_)(const char *jobvs, const char *sort, const char *select, const char *sense, int *n, float *a, int *lda, int *sdim, float *wr, float *wi, float *vs, int *ldvs, float *rconde, float *rcondv, float *work, int *lwork, int *iwork, int *liwork, int *bwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeesxK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring jobvs, UNUSED jstring sort, UNUSED jstring select, UNUSED jstring sense, UNUSED jint n, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jobject sdim, UNUSED jfloatArray wr, UNUSED jint offsetwr, UNUSED jfloatArray wi, UNUSED jint offsetwi, UNUSED jfloatArray vs, UNUSED jint offsetvs, UNUSED jint ldvs, UNUSED jobject rconde, UNUSED jobject rcondv, UNUSED jfloatArray work, UNUSED jint offsetwork, UNUSED jint lwork, UNUSED jintArray iwork, UNUSED jint offsetiwork, UNUSED jint liwork, UNUSED jbooleanArray bwork, UNUSED jint offsetbwork, UNUSED jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } static void (*sgeev_)(const char *jobvl, const char *jobvr, int *n, float *a, int *lda, float *wr, float *wi, float *vl, int *ldvl, float *vr, int *ldvr, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeevK(JNIEnv *env, UNUSED jobject obj, jstring jobvl, jstring jobvr, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__njobvl = NULL; const char *__njobvr = NULL; int __ninfo = 0; float *__na = NULL; float *__nwr = NULL; float *__nwi = NULL; float *__nvl = NULL; float *__nvr = NULL; float *__nwork = NULL; - if (!(__njobvl = (*env)->GetStringUTFChars(env, jobvl, NULL))) goto fail; - if (!(__njobvr = (*env)->GetStringUTFChars(env, jobvr, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; - if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; - if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; - if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobvl = NULL; + const char *__njobvr = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__nwr = NULL; + float *__nwi = NULL; + float *__nvl = NULL; + float *__nvr = NULL; + float *__nwork = NULL; + if (!(__njobvl = (*env)->GetStringUTFChars(env, jobvl, NULL))) { __failed = TRUE; goto done; } + if (!(__njobvr = (*env)->GetStringUTFChars(env, jobvr, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) { __failed = TRUE; goto done; } + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) { __failed = TRUE; goto done; } + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sgeev_(__njobvl, __njobvr, &n, __na + offseta, &lda, __nwr + offsetwr, __nwi + offsetwi, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); - if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); - if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); - if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, __failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, __failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, __failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__njobvr) (*env)->ReleaseStringUTFChars(env, jobvr, __njobvr); if (__njobvl) (*env)->ReleaseStringUTFChars(env, jobvl, __njobvl); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgeevx_)(const char *balanc, const char *jobvl, const char *jobvr, const char *sense, int *n, float *a, int *lda, float *wr, float *wi, float *vl, int *ldvl, float *vr, int *ldvr, int *ilo, int *ihi, float *scale, float *abnrm, float *rconde, float *rcondv, float *work, int *lwork, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeevxK(JNIEnv *env, UNUSED jobject obj, jstring balanc, jstring jobvl, jstring jobvr, jstring sense, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jobject ilo, jobject ihi, jfloatArray scale, jint offsetscale, jobject abnrm, jfloatArray rconde, jint offsetrconde, jfloatArray rcondv, jint offsetrcondv, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nbalanc = NULL; const char *__njobvl = NULL; const char *__njobvr = NULL; const char *__nsense = NULL; int __nilo = 0; int __nihi = 0; float __nabnrm = 0; int __ninfo = 0; float *__na = NULL; float *__nwr = NULL; float *__nwi = NULL; float *__nvl = NULL; float *__nvr = NULL; float *__nscale = NULL; float *__nrconde = NULL; float *__nrcondv = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nbalanc = (*env)->GetStringUTFChars(env, balanc, NULL))) goto fail; - if (!(__njobvl = (*env)->GetStringUTFChars(env, jobvl, NULL))) goto fail; - if (!(__njobvr = (*env)->GetStringUTFChars(env, jobvr, NULL))) goto fail; - if (!(__nsense = (*env)->GetStringUTFChars(env, sense, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nbalanc = NULL; + const char *__njobvl = NULL; + const char *__njobvr = NULL; + const char *__nsense = NULL; + int __nilo = 0; + int __nihi = 0; + float __nabnrm = 0; + int __ninfo = 0; + float *__na = NULL; + float *__nwr = NULL; + float *__nwi = NULL; + float *__nvl = NULL; + float *__nvr = NULL; + float *__nscale = NULL; + float *__nrconde = NULL; + float *__nrcondv = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nbalanc = (*env)->GetStringUTFChars(env, balanc, NULL))) { __failed = TRUE; goto done; } + if (!(__njobvl = (*env)->GetStringUTFChars(env, jobvl, NULL))) { __failed = TRUE; goto done; } + if (!(__njobvr = (*env)->GetStringUTFChars(env, jobvr, NULL))) { __failed = TRUE; goto done; } + if (!(__nsense = (*env)->GetStringUTFChars(env, sense, NULL))) { __failed = TRUE; goto done; } __nilo = (*env)->GetIntField(env, ilo, intW_val_fieldID); __nihi = (*env)->GetIntField(env, ihi, intW_val_fieldID); __nabnrm = (*env)->GetFloatField(env, abnrm, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; - if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; - if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; - if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; - if (!(__nscale = (*env)->GetPrimitiveArrayCritical(env, scale, NULL))) goto fail; - if (!(__nrconde = (*env)->GetPrimitiveArrayCritical(env, rconde, NULL))) goto fail; - if (!(__nrcondv = (*env)->GetPrimitiveArrayCritical(env, rcondv, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) { __failed = TRUE; goto done; } + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) { __failed = TRUE; goto done; } + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) { __failed = TRUE; goto done; } + if (!(__nscale = (*env)->GetPrimitiveArrayCritical(env, scale, NULL))) { __failed = TRUE; goto done; } + if (!(__nrconde = (*env)->GetPrimitiveArrayCritical(env, rconde, NULL))) { __failed = TRUE; goto done; } + if (!(__nrcondv = (*env)->GetPrimitiveArrayCritical(env, rcondv, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } sgeevx_(__nbalanc, __njobvl, __njobvr, __nsense, &n, __na + offseta, &lda, __nwr + offsetwr, __nwi + offsetwi, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, &__nilo, &__nihi, __nscale + offsetscale, &__nabnrm, __nrconde + offsetrconde, __nrcondv + offsetrcondv, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nrcondv) (*env)->ReleasePrimitiveArrayCritical(env, rcondv, __nrcondv, failed ? JNI_ABORT : 0); - if (__nrconde) (*env)->ReleasePrimitiveArrayCritical(env, rconde, __nrconde, failed ? JNI_ABORT : 0); - if (__nscale) (*env)->ReleasePrimitiveArrayCritical(env, scale, __nscale, failed ? JNI_ABORT : 0); - if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); - if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); - if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); - if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, abnrm, floatW_val_fieldID, __nabnrm); - if (!failed) (*env)->SetIntField(env, ihi, intW_val_fieldID, __nihi); - if (!failed) (*env)->SetIntField(env, ilo, intW_val_fieldID, __nilo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nrcondv) (*env)->ReleasePrimitiveArrayCritical(env, rcondv, __nrcondv, __failed ? JNI_ABORT : 0); + if (__nrconde) (*env)->ReleasePrimitiveArrayCritical(env, rconde, __nrconde, __failed ? JNI_ABORT : 0); + if (__nscale) (*env)->ReleasePrimitiveArrayCritical(env, scale, __nscale, __failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, __failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, __failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, __failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, abnrm, floatW_val_fieldID, __nabnrm); + if (!__failed) (*env)->SetIntField(env, ihi, intW_val_fieldID, __nihi); + if (!__failed) (*env)->SetIntField(env, ilo, intW_val_fieldID, __nilo); if (__nsense) (*env)->ReleaseStringUTFChars(env, sense, __nsense); if (__njobvr) (*env)->ReleaseStringUTFChars(env, jobvr, __njobvr); if (__njobvl) (*env)->ReleaseStringUTFChars(env, jobvl, __njobvl); if (__nbalanc) (*env)->ReleaseStringUTFChars(env, balanc, __nbalanc); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgegs_)(const char *jobvsl, const char *jobvsr, int *n, float *a, int *lda, float *b, int *ldb, float *alphar, float *alphai, float *beta, float *vsl, int *ldvsl, float *vsr, int *ldvsr, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgegsK(JNIEnv *env, UNUSED jobject obj, jstring jobvsl, jstring jobvsr, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray vsl, jint offsetvsl, jint ldvsl, jfloatArray vsr, jint offsetvsr, jint ldvsr, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__njobvsl = NULL; const char *__njobvsr = NULL; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nalphar = NULL; float *__nalphai = NULL; float *__nbeta = NULL; float *__nvsl = NULL; float *__nvsr = NULL; float *__nwork = NULL; - if (!(__njobvsl = (*env)->GetStringUTFChars(env, jobvsl, NULL))) goto fail; - if (!(__njobvsr = (*env)->GetStringUTFChars(env, jobvsr, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) goto fail; - if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) goto fail; - if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; - if (!(__nvsl = (*env)->GetPrimitiveArrayCritical(env, vsl, NULL))) goto fail; - if (!(__nvsr = (*env)->GetPrimitiveArrayCritical(env, vsr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobvsl = NULL; + const char *__njobvsr = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + float *__nalphar = NULL; + float *__nalphai = NULL; + float *__nbeta = NULL; + float *__nvsl = NULL; + float *__nvsr = NULL; + float *__nwork = NULL; + if (!(__njobvsl = (*env)->GetStringUTFChars(env, jobvsl, NULL))) { __failed = TRUE; goto done; } + if (!(__njobvsr = (*env)->GetStringUTFChars(env, jobvsr, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) { __failed = TRUE; goto done; } + if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) { __failed = TRUE; goto done; } + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) { __failed = TRUE; goto done; } + if (!(__nvsl = (*env)->GetPrimitiveArrayCritical(env, vsl, NULL))) { __failed = TRUE; goto done; } + if (!(__nvsr = (*env)->GetPrimitiveArrayCritical(env, vsr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sgegs_(__njobvsl, __njobvsr, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nalphar + offsetalphar, __nalphai + offsetalphai, __nbeta + offsetbeta, __nvsl + offsetvsl, &ldvsl, __nvsr + offsetvsr, &ldvsr, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nvsr) (*env)->ReleasePrimitiveArrayCritical(env, vsr, __nvsr, failed ? JNI_ABORT : 0); - if (__nvsl) (*env)->ReleasePrimitiveArrayCritical(env, vsl, __nvsl, failed ? JNI_ABORT : 0); - if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); - if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, failed ? JNI_ABORT : 0); - if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nvsr) (*env)->ReleasePrimitiveArrayCritical(env, vsr, __nvsr, __failed ? JNI_ABORT : 0); + if (__nvsl) (*env)->ReleasePrimitiveArrayCritical(env, vsl, __nvsl, __failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, __failed ? JNI_ABORT : 0); + if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, __failed ? JNI_ABORT : 0); + if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__njobvsr) (*env)->ReleaseStringUTFChars(env, jobvsr, __njobvsr); if (__njobvsl) (*env)->ReleaseStringUTFChars(env, jobvsl, __njobvsl); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgegv_)(const char *jobvl, const char *jobvr, int *n, float *a, int *lda, float *b, int *ldb, float *alphar, float *alphai, float *beta, float *vl, int *ldvl, float *vr, int *ldvr, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgegvK(JNIEnv *env, UNUSED jobject obj, jstring jobvl, jstring jobvr, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__njobvl = NULL; const char *__njobvr = NULL; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nalphar = NULL; float *__nalphai = NULL; float *__nbeta = NULL; float *__nvl = NULL; float *__nvr = NULL; float *__nwork = NULL; - if (!(__njobvl = (*env)->GetStringUTFChars(env, jobvl, NULL))) goto fail; - if (!(__njobvr = (*env)->GetStringUTFChars(env, jobvr, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) goto fail; - if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) goto fail; - if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; - if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; - if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobvl = NULL; + const char *__njobvr = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + float *__nalphar = NULL; + float *__nalphai = NULL; + float *__nbeta = NULL; + float *__nvl = NULL; + float *__nvr = NULL; + float *__nwork = NULL; + if (!(__njobvl = (*env)->GetStringUTFChars(env, jobvl, NULL))) { __failed = TRUE; goto done; } + if (!(__njobvr = (*env)->GetStringUTFChars(env, jobvr, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) { __failed = TRUE; goto done; } + if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) { __failed = TRUE; goto done; } + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) { __failed = TRUE; goto done; } + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) { __failed = TRUE; goto done; } + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sgegv_(__njobvl, __njobvr, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nalphar + offsetalphar, __nalphai + offsetalphai, __nbeta + offsetbeta, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); - if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); - if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); - if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, failed ? JNI_ABORT : 0); - if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, __failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, __failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, __failed ? JNI_ABORT : 0); + if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, __failed ? JNI_ABORT : 0); + if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__njobvr) (*env)->ReleaseStringUTFChars(env, jobvr, __njobvr); if (__njobvl) (*env)->ReleaseStringUTFChars(env, jobvl, __njobvl); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgehd2_)(int *n, int *ilo, int *ihi, float *a, int *lda, float *tau, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgehd2K(JNIEnv *env, UNUSED jobject obj, jint n, jint ilo, jint ihi, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sgehd2_(&n, &ilo, &ihi, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgehrd_)(int *n, int *ilo, int *ihi, float *a, int *lda, float *tau, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgehrdK(JNIEnv *env, UNUSED jobject obj, jint n, jint ilo, jint ihi, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sgehrd_(&n, &ilo, &ihi, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgelq2_)(int *m, int *n, float *a, int *lda, float *tau, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelq2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sgelq2_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgelqf_)(int *m, int *n, float *a, int *lda, float *tau, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelqfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sgelqf_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgels_)(const char *trans, int *m, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelsK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint m, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nwork = NULL; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ntrans = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + float *__nwork = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sgels_(__ntrans, &m, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgelsd_)(int *m, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, float *s, float *rcond, int *rank, float *work, int *lwork, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelsdK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray s, jint offsets, jfloat rcond, jobject rank, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - int __nrank = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__ns = NULL; float *__nwork = NULL; int *__niwork = NULL; + jboolean __failed = FALSE; + int __nrank = 0; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + float *__ns = NULL; + float *__nwork = NULL; + int *__niwork = NULL; __nrank = (*env)->GetIntField(env, rank, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } sgelsd_(&m, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, __ns + offsets, &rcond, &__nrank, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, rank, intW_val_fieldID, __nrank); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, rank, intW_val_fieldID, __nrank); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgelss_)(int *m, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, float *s, float *rcond, int *rank, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelssK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray s, jint offsets, jfloat rcond, jobject rank, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __nrank = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__ns = NULL; float *__nwork = NULL; + jboolean __failed = FALSE; + int __nrank = 0; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + float *__ns = NULL; + float *__nwork = NULL; __nrank = (*env)->GetIntField(env, rank, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sgelss_(&m, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, __ns + offsets, &rcond, &__nrank, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, rank, intW_val_fieldID, __nrank); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, rank, intW_val_fieldID, __nrank); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgelsx_)(int *m, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, int *jpvt, float *rcond, int *rank, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelsxK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jintArray jpvt, jint offsetjpvt, jfloat rcond, jobject rank, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __nrank = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; int *__njpvt = NULL; float *__nwork = NULL; + jboolean __failed = FALSE; + int __nrank = 0; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + int *__njpvt = NULL; + float *__nwork = NULL; __nrank = (*env)->GetIntField(env, rank, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sgelsx_(&m, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, __njpvt + offsetjpvt, &rcond, &__nrank, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, rank, intW_val_fieldID, __nrank); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, rank, intW_val_fieldID, __nrank); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgelsy_)(int *m, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, int *jpvt, float *rcond, int *rank, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgelsyK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jintArray jpvt, jint offsetjpvt, jfloat rcond, jobject rank, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __nrank = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; int *__njpvt = NULL; float *__nwork = NULL; + jboolean __failed = FALSE; + int __nrank = 0; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + int *__njpvt = NULL; + float *__nwork = NULL; __nrank = (*env)->GetIntField(env, rank, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sgelsy_(&m, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, __njpvt + offsetjpvt, &rcond, &__nrank, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, rank, intW_val_fieldID, __nrank); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, rank, intW_val_fieldID, __nrank); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgeql2_)(int *m, int *n, float *a, int *lda, float *tau, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeql2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sgeql2_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgeqlf_)(int *m, int *n, float *a, int *lda, float *tau, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeqlfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sgeqlf_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgeqp3_)(int *m, int *n, float *a, int *lda, int *jpvt, float *tau, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeqp3K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; int *__njpvt = NULL; float *__ntau = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + int *__njpvt = NULL; + float *__ntau = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sgeqp3_(&m, &n, __na + offseta, &lda, __njpvt + offsetjpvt, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgeqpf_)(int *m, int *n, float *a, int *lda, int *jpvt, float *tau, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeqpfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; int *__njpvt = NULL; float *__ntau = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + int *__njpvt = NULL; + float *__ntau = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sgeqpf_(&m, &n, __na + offseta, &lda, __njpvt + offsetjpvt, __ntau + offsettau, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgeqr2_)(int *m, int *n, float *a, int *lda, float *tau, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeqr2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sgeqr2_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgeqrf_)(int *m, int *n, float *a, int *lda, float *tau, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeqrfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sgeqrf_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgerfs_)(const char *trans, int *n, int *nrhs, float *a, int *lda, float *af, int *ldaf, int *ipiv, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgerfsK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; float *__naf = NULL; int *__nipiv = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ntrans = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__naf = NULL; + int *__nipiv = NULL; + float *__nb = NULL; + float *__nx = NULL; + float *__nferr = NULL; + float *__nberr = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } sgerfs_(__ntrans, &n, &nrhs, __na + offseta, &lda, __naf + offsetaf, &ldaf, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgerq2_)(int *m, int *n, float *a, int *lda, float *tau, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgerq2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sgerq2_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgerqf_)(int *m, int *n, float *a, int *lda, float *tau, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgerqfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sgerqf_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgesc2_)(int *n, float *a, int *lda, float *rhs, int *ipiv, int *jpiv, float *scale); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgesc2K(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray rhs, jint offsetrhs, jintArray ipiv, jint offsetipiv, jintArray jpiv, jint offsetjpiv, jobject scale) { - jboolean failed = FALSE; - float __nscale = 0; float *__na = NULL; float *__nrhs = NULL; int *__nipiv = NULL; int *__njpiv = NULL; + jboolean __failed = FALSE; + float __nscale = 0; + float *__na = NULL; + float *__nrhs = NULL; + int *__nipiv = NULL; + int *__njpiv = NULL; __nscale = (*env)->GetFloatField(env, scale, floatW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nrhs = (*env)->GetPrimitiveArrayCritical(env, rhs, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__njpiv = (*env)->GetPrimitiveArrayCritical(env, jpiv, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nrhs = (*env)->GetPrimitiveArrayCritical(env, rhs, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__njpiv = (*env)->GetPrimitiveArrayCritical(env, jpiv, NULL))) { __failed = TRUE; goto done; } sgesc2_(&n, __na + offseta, &lda, __nrhs + offsetrhs, __nipiv + offsetipiv, __njpiv + offsetjpiv, &__nscale); done: - if (__njpiv) (*env)->ReleasePrimitiveArrayCritical(env, jpiv, __njpiv, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nrhs) (*env)->ReleasePrimitiveArrayCritical(env, rhs, __nrhs, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__njpiv) (*env)->ReleasePrimitiveArrayCritical(env, jpiv, __njpiv, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nrhs) (*env)->ReleasePrimitiveArrayCritical(env, rhs, __nrhs, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgesdd_)(const char *jobz, int *m, int *n, float *a, int *lda, float *s, float *u, int *ldu, float *vt, int *ldvt, float *work, int *lwork, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgesddK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray s, jint offsets, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jint ldvt, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; int __ninfo = 0; float *__na = NULL; float *__ns = NULL; float *__nu = NULL; float *__nvt = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; - if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; - if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__ns = NULL; + float *__nu = NULL; + float *__nvt = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) { __failed = TRUE; goto done; } + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } sgesdd_(__njobz, &m, &n, __na + offseta, &lda, __ns + offsets, __nu + offsetu, &ldu, __nvt + offsetvt, &ldvt, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); - if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, __failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, __failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgesv_)(int *n, int *nrhs, float *a, int *lda, int *ipiv, float *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgesvK(JNIEnv *env, UNUSED jobject obj, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; int *__nipiv = NULL; float *__nb = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + int *__nipiv = NULL; + float *__nb = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } sgesv_(&n, &nrhs, __na + offseta, &lda, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgesvd_)(const char *jobu, const char *jobvt, int *m, int *n, float *a, int *lda, float *s, float *u, int *ldu, float *vt, int *ldvt, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgesvdK(JNIEnv *env, UNUSED jobject obj, jstring jobu, jstring jobvt, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray s, jint offsets, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jint ldvt, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__njobu = NULL; const char *__njobvt = NULL; int __ninfo = 0; float *__na = NULL; float *__ns = NULL; float *__nu = NULL; float *__nvt = NULL; float *__nwork = NULL; - if (!(__njobu = (*env)->GetStringUTFChars(env, jobu, NULL))) goto fail; - if (!(__njobvt = (*env)->GetStringUTFChars(env, jobvt, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; - if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; - if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobu = NULL; + const char *__njobvt = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__ns = NULL; + float *__nu = NULL; + float *__nvt = NULL; + float *__nwork = NULL; + if (!(__njobu = (*env)->GetStringUTFChars(env, jobu, NULL))) { __failed = TRUE; goto done; } + if (!(__njobvt = (*env)->GetStringUTFChars(env, jobvt, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) { __failed = TRUE; goto done; } + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sgesvd_(__njobu, __njobvt, &m, &n, __na + offseta, &lda, __ns + offsets, __nu + offsetu, &ldu, __nvt + offsetvt, &ldvt, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); - if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, __failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, __failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__njobvt) (*env)->ReleaseStringUTFChars(env, jobvt, __njobvt); if (__njobu) (*env)->ReleaseStringUTFChars(env, jobu, __njobu); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgesvx_)(const char *fact, const char *trans, int *n, int *nrhs, float *a, int *lda, float *af, int *ldaf, int *ipiv, char *equed, float *r, float *c, float *b, int *ldb, float *x, int *ldx, float *rcond, float *ferr, float *berr, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgesvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring trans, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jobject equed, jfloatArray r, jint offsetr, jfloatArray c, jint offsetc, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nfact = NULL; const char *__ntrans = NULL; char *__nequed = NULL; jstring __jequed = NULL;; float __nrcond = 0; int __ninfo = 0; float *__na = NULL; float *__naf = NULL; int *__nipiv = NULL; float *__nr = NULL; float *__nc = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nfact = NULL; + const char *__ntrans = NULL; + char *__nequed = NULL; jstring __jequed = NULL; + float __nrcond = 0; + int __ninfo = 0; + float *__na = NULL; + float *__naf = NULL; + int *__nipiv = NULL; + float *__nr = NULL; + float *__nc = NULL; + float *__nb = NULL; + float *__nx = NULL; + float *__nferr = NULL; + float *__nberr = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } sgesvx_(__nfact, __ntrans, &n, &nrhs, __na + offseta, &lda, __naf + offsetaf, &ldaf, __nipiv + offsetipiv, __nequed, __nr + offsetr, __nc + offsetc, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); - if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!__failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgetc2_)(int *n, float *a, int *lda, int *ipiv, int *jpiv, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgetc2K(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jintArray jpiv, jint offsetjpiv, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; int *__nipiv = NULL; int *__njpiv = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__njpiv = (*env)->GetPrimitiveArrayCritical(env, jpiv, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + int *__nipiv = NULL; + int *__njpiv = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__njpiv = (*env)->GetPrimitiveArrayCritical(env, jpiv, NULL))) { __failed = TRUE; goto done; } sgetc2_(&n, __na + offseta, &lda, __nipiv + offsetipiv, __njpiv + offsetjpiv, &__ninfo); done: - if (__njpiv) (*env)->ReleasePrimitiveArrayCritical(env, jpiv, __njpiv, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__njpiv) (*env)->ReleasePrimitiveArrayCritical(env, jpiv, __njpiv, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgetf2_)(int *m, int *n, float *a, int *lda, int *ipiv, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgetf2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; int *__nipiv = NULL; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + int *__nipiv = NULL; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } sgetf2_(&m, &n, __na + offseta, &lda, __nipiv + offsetipiv, &__ninfo); done: - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgetrf_)(int *m, int *n, float *a, int *lda, int *ipiv, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgetrfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; int *__nipiv = NULL; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + int *__nipiv = NULL; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } sgetrf_(&m, &n, __na + offseta, &lda, __nipiv + offsetipiv, &__ninfo); done: - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgetri_)(int *n, float *a, int *lda, int *ipiv, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgetriK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; int *__nipiv = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + int *__nipiv = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sgetri_(&n, __na + offseta, &lda, __nipiv + offsetipiv, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgetrs_)(const char *trans, int *n, int *nrhs, float *a, int *lda, int *ipiv, float *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgetrsK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; int *__nipiv = NULL; float *__nb = NULL; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ntrans = NULL; + int __ninfo = 0; + float *__na = NULL; + int *__nipiv = NULL; + float *__nb = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } sgetrs_(__ntrans, &n, &nrhs, __na + offseta, &lda, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sggbak_)(const char *job, const char *side, int *n, int *ilo, int *ihi, float *lscale, float *rscale, int *m, float *v, int *ldv, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggbakK(JNIEnv *env, UNUSED jobject obj, jstring job, jstring side, jint n, jint ilo, jint ihi, jfloatArray lscale, jint offsetlscale, jfloatArray rscale, jint offsetrscale, jint m, jfloatArray v, jint offsetv, jint ldv, jobject info) { - jboolean failed = FALSE; - const char *__njob = NULL; const char *__nside = NULL; int __ninfo = 0; float *__nlscale = NULL; float *__nrscale = NULL; float *__nv = NULL; - if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nlscale = (*env)->GetPrimitiveArrayCritical(env, lscale, NULL))) goto fail; - if (!(__nrscale = (*env)->GetPrimitiveArrayCritical(env, rscale, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njob = NULL; + const char *__nside = NULL; + int __ninfo = 0; + float *__nlscale = NULL; + float *__nrscale = NULL; + float *__nv = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) { __failed = TRUE; goto done; } + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nlscale = (*env)->GetPrimitiveArrayCritical(env, lscale, NULL))) { __failed = TRUE; goto done; } + if (!(__nrscale = (*env)->GetPrimitiveArrayCritical(env, rscale, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } sggbak_(__njob, __nside, &n, &ilo, &ihi, __nlscale + offsetlscale, __nrscale + offsetrscale, &m, __nv + offsetv, &ldv, &__ninfo); done: - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nrscale) (*env)->ReleasePrimitiveArrayCritical(env, rscale, __nrscale, failed ? JNI_ABORT : 0); - if (__nlscale) (*env)->ReleasePrimitiveArrayCritical(env, lscale, __nlscale, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nrscale) (*env)->ReleasePrimitiveArrayCritical(env, rscale, __nrscale, __failed ? JNI_ABORT : 0); + if (__nlscale) (*env)->ReleasePrimitiveArrayCritical(env, lscale, __nlscale, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sggbal_)(const char *job, int *n, float *a, int *lda, float *b, int *ldb, int *ilo, int *ihi, float *lscale, float *rscale, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggbalK(JNIEnv *env, UNUSED jobject obj, jstring job, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject ilo, jobject ihi, jfloatArray lscale, jint offsetlscale, jfloatArray rscale, jint offsetrscale, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__njob = NULL; int __nilo = 0; int __nihi = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nlscale = NULL; float *__nrscale = NULL; float *__nwork = NULL; - if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njob = NULL; + int __nilo = 0; + int __nihi = 0; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + float *__nlscale = NULL; + float *__nrscale = NULL; + float *__nwork = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) { __failed = TRUE; goto done; } __nilo = (*env)->GetIntField(env, ilo, intW_val_fieldID); __nihi = (*env)->GetIntField(env, ihi, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nlscale = (*env)->GetPrimitiveArrayCritical(env, lscale, NULL))) goto fail; - if (!(__nrscale = (*env)->GetPrimitiveArrayCritical(env, rscale, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nlscale = (*env)->GetPrimitiveArrayCritical(env, lscale, NULL))) { __failed = TRUE; goto done; } + if (!(__nrscale = (*env)->GetPrimitiveArrayCritical(env, rscale, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sggbal_(__njob, &n, __na + offseta, &lda, __nb + offsetb, &ldb, &__nilo, &__nihi, __nlscale + offsetlscale, __nrscale + offsetrscale, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nrscale) (*env)->ReleasePrimitiveArrayCritical(env, rscale, __nrscale, failed ? JNI_ABORT : 0); - if (__nlscale) (*env)->ReleasePrimitiveArrayCritical(env, lscale, __nlscale, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, ihi, intW_val_fieldID, __nihi); - if (!failed) (*env)->SetIntField(env, ilo, intW_val_fieldID, __nilo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nrscale) (*env)->ReleasePrimitiveArrayCritical(env, rscale, __nrscale, __failed ? JNI_ABORT : 0); + if (__nlscale) (*env)->ReleasePrimitiveArrayCritical(env, lscale, __nlscale, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, ihi, intW_val_fieldID, __nihi); + if (!__failed) (*env)->SetIntField(env, ilo, intW_val_fieldID, __nilo); if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); +} + +// static void (*sgges_)(const char *jobvsl, const char *jobvsr, const char *sort, const char *selctg, int *n, float *a, int *lda, float *b, int *ldb, int *sdim, float *alphar, float *alphai, float *beta, float *vsl, int *ldvsl, float *vsr, int *ldvsr, float *work, int *lwork, int *bwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggesK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring jobvsl, UNUSED jstring jobvsr, UNUSED jstring sort, UNUSED jstring selctg, UNUSED jint n, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jfloatArray b, UNUSED jint offsetb, UNUSED jint ldb, UNUSED jobject sdim, UNUSED jfloatArray alphar, UNUSED jint offsetalphar, UNUSED jfloatArray alphai, UNUSED jint offsetalphai, UNUSED jfloatArray beta, UNUSED jint offsetbeta, UNUSED jfloatArray vsl, UNUSED jint offsetvsl, UNUSED jint ldvsl, UNUSED jfloatArray vsr, UNUSED jint offsetvsr, UNUSED jint ldvsr, UNUSED jfloatArray work, UNUSED jint offsetwork, UNUSED jint lwork, UNUSED jbooleanArray bwork, UNUSED jint offsetbwork, UNUSED jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +// static void (*sggesx_)(const char *jobvsl, const char *jobvsr, const char *sort, const char *selctg, const char *sense, int *n, float *a, int *lda, float *b, int *ldb, int *sdim, float *alphar, float *alphai, float *beta, float *vsl, int *ldvsl, float *vsr, int *ldvsr, float *rconde, float *rcondv, float *work, int *lwork, int *iwork, int *liwork, int *bwork, int *info); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggesxK(JNIEnv *env, UNUSED jobject obj, UNUSED jstring jobvsl, UNUSED jstring jobvsr, UNUSED jstring sort, UNUSED jstring selctg, UNUSED jstring sense, UNUSED jint n, UNUSED jfloatArray a, UNUSED jint offseta, UNUSED jint lda, UNUSED jfloatArray b, UNUSED jint offsetb, UNUSED jint ldb, UNUSED jobject sdim, UNUSED jfloatArray alphar, UNUSED jint offsetalphar, UNUSED jfloatArray alphai, UNUSED jint offsetalphai, UNUSED jfloatArray beta, UNUSED jint offsetbeta, UNUSED jfloatArray vsl, UNUSED jint offsetvsl, UNUSED jint ldvsl, UNUSED jfloatArray vsr, UNUSED jint offsetvsr, UNUSED jint ldvsr, UNUSED jfloatArray rconde, UNUSED jint offsetrconde, UNUSED jfloatArray rcondv, UNUSED jint offsetrcondv, UNUSED jfloatArray work, UNUSED jint offsetwork, UNUSED jint lwork, UNUSED jintArray iwork, UNUSED jint offsetiwork, UNUSED jint liwork, UNUSED jbooleanArray bwork, UNUSED jint offsetbwork, UNUSED jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } static void (*sggev_)(const char *jobvl, const char *jobvr, int *n, float *a, int *lda, float *b, int *ldb, float *alphar, float *alphai, float *beta, float *vl, int *ldvl, float *vr, int *ldvr, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggevK(JNIEnv *env, UNUSED jobject obj, jstring jobvl, jstring jobvr, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__njobvl = NULL; const char *__njobvr = NULL; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nalphar = NULL; float *__nalphai = NULL; float *__nbeta = NULL; float *__nvl = NULL; float *__nvr = NULL; float *__nwork = NULL; - if (!(__njobvl = (*env)->GetStringUTFChars(env, jobvl, NULL))) goto fail; - if (!(__njobvr = (*env)->GetStringUTFChars(env, jobvr, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) goto fail; - if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) goto fail; - if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; - if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; - if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobvl = NULL; + const char *__njobvr = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + float *__nalphar = NULL; + float *__nalphai = NULL; + float *__nbeta = NULL; + float *__nvl = NULL; + float *__nvr = NULL; + float *__nwork = NULL; + if (!(__njobvl = (*env)->GetStringUTFChars(env, jobvl, NULL))) { __failed = TRUE; goto done; } + if (!(__njobvr = (*env)->GetStringUTFChars(env, jobvr, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) { __failed = TRUE; goto done; } + if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) { __failed = TRUE; goto done; } + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) { __failed = TRUE; goto done; } + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) { __failed = TRUE; goto done; } + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sggev_(__njobvl, __njobvr, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nalphar + offsetalphar, __nalphai + offsetalphai, __nbeta + offsetbeta, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); - if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); - if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); - if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, failed ? JNI_ABORT : 0); - if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, __failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, __failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, __failed ? JNI_ABORT : 0); + if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, __failed ? JNI_ABORT : 0); + if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__njobvr) (*env)->ReleaseStringUTFChars(env, jobvr, __njobvr); if (__njobvl) (*env)->ReleaseStringUTFChars(env, jobvl, __njobvl); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sggevx_)(const char *balanc, const char *jobvl, const char *jobvr, const char *sense, int *n, float *a, int *lda, float *b, int *ldb, float *alphar, float *alphai, float *beta, float *vl, int *ldvl, float *vr, int *ldvr, int *ilo, int *ihi, float *lscale, float *rscale, float *abnrm, float *bbnrm, float *rconde, float *rcondv, float *work, int *lwork, int *iwork, int *bwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggevxK(JNIEnv *env, UNUSED jobject obj, jstring balanc, jstring jobvl, jstring jobvr, jstring sense, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jobject ilo, jobject ihi, jfloatArray lscale, jint offsetlscale, jfloatArray rscale, jint offsetrscale, jobject abnrm, jobject bbnrm, jfloatArray rconde, jint offsetrconde, jfloatArray rcondv, jint offsetrcondv, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jbooleanArray bwork, jint offsetbwork, jobject info) { - jboolean failed = FALSE; - const char *__nbalanc = NULL; const char *__njobvl = NULL; const char *__njobvr = NULL; const char *__nsense = NULL; int __nilo = 0; int __nihi = 0; float __nabnrm = 0; float __nbbnrm = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nalphar = NULL; float *__nalphai = NULL; float *__nbeta = NULL; float *__nvl = NULL; float *__nvr = NULL; float *__nlscale = NULL; float *__nrscale = NULL; float *__nrconde = NULL; float *__nrcondv = NULL; float *__nwork = NULL; int *__niwork = NULL; jboolean *__jbwork = NULL; int *__nbwork = NULL; - if (!(__nbalanc = (*env)->GetStringUTFChars(env, balanc, NULL))) goto fail; - if (!(__njobvl = (*env)->GetStringUTFChars(env, jobvl, NULL))) goto fail; - if (!(__njobvr = (*env)->GetStringUTFChars(env, jobvr, NULL))) goto fail; - if (!(__nsense = (*env)->GetStringUTFChars(env, sense, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nbalanc = NULL; + const char *__njobvl = NULL; + const char *__njobvr = NULL; + const char *__nsense = NULL; + int __nilo = 0; + int __nihi = 0; + float __nabnrm = 0; + float __nbbnrm = 0; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + float *__nalphar = NULL; + float *__nalphai = NULL; + float *__nbeta = NULL; + float *__nvl = NULL; + float *__nvr = NULL; + float *__nlscale = NULL; + float *__nrscale = NULL; + float *__nrconde = NULL; + float *__nrcondv = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + int *__nbwork = NULL; jboolean *__jbwork = NULL; + if (!(__nbalanc = (*env)->GetStringUTFChars(env, balanc, NULL))) { __failed = TRUE; goto done; } + if (!(__njobvl = (*env)->GetStringUTFChars(env, jobvl, NULL))) { __failed = TRUE; goto done; } + if (!(__njobvr = (*env)->GetStringUTFChars(env, jobvr, NULL))) { __failed = TRUE; goto done; } + if (!(__nsense = (*env)->GetStringUTFChars(env, sense, NULL))) { __failed = TRUE; goto done; } __nilo = (*env)->GetIntField(env, ilo, intW_val_fieldID); __nihi = (*env)->GetIntField(env, ihi, intW_val_fieldID); __nabnrm = (*env)->GetFloatField(env, abnrm, floatW_val_fieldID); __nbbnrm = (*env)->GetFloatField(env, bbnrm, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) goto fail; - if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) goto fail; - if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; - if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; - if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; - if (!(__nlscale = (*env)->GetPrimitiveArrayCritical(env, lscale, NULL))) goto fail; - if (!(__nrscale = (*env)->GetPrimitiveArrayCritical(env, rscale, NULL))) goto fail; - if (!(__nrconde = (*env)->GetPrimitiveArrayCritical(env, rconde, NULL))) goto fail; - if (!(__nrcondv = (*env)->GetPrimitiveArrayCritical(env, rcondv, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; - if (!(__jbwork = (*env)->GetPrimitiveArrayCritical(env, bwork, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, bwork); if (length <= 0) goto fail; if (!(__nbwork = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nbwork[i] = __jbwork[i]; } } while(0); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) { __failed = TRUE; goto done; } + if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) { __failed = TRUE; goto done; } + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) { __failed = TRUE; goto done; } + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) { __failed = TRUE; goto done; } + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) { __failed = TRUE; goto done; } + if (!(__nlscale = (*env)->GetPrimitiveArrayCritical(env, lscale, NULL))) { __failed = TRUE; goto done; } + if (!(__nrscale = (*env)->GetPrimitiveArrayCritical(env, rscale, NULL))) { __failed = TRUE; goto done; } + if (!(__nrconde = (*env)->GetPrimitiveArrayCritical(env, rconde, NULL))) { __failed = TRUE; goto done; } + if (!(__nrcondv = (*env)->GetPrimitiveArrayCritical(env, rcondv, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } + if (!(__jbwork = (*env)->GetPrimitiveArrayCritical(env, bwork, NULL))) { __failed = TRUE; goto done; } do { int length = (*env)->GetArrayLength(env, bwork); if (length <= 0) { __failed = TRUE; goto done; } if (!(__nbwork = malloc(sizeof(jboolean) * length))) { __failed = TRUE; goto done; } for (int i = 0; i < length; i++) { __nbwork[i] = __jbwork[i]; } } while(0); sggevx_(__nbalanc, __njobvl, __njobvr, __nsense, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nalphar + offsetalphar, __nalphai + offsetalphai, __nbeta + offsetbeta, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, &__nilo, &__nihi, __nlscale + offsetlscale, __nrscale + offsetrscale, &__nabnrm, &__nbbnrm, __nrconde + offsetrconde, __nrcondv + offsetrcondv, __nwork + offsetwork, &lwork, __niwork + offsetiwork, __nbwork + offsetbwork, &__ninfo); done: if (__nbwork) { free(__nbwork); } if (__jbwork) (*env)->ReleasePrimitiveArrayCritical(env, bwork, __nbwork, JNI_ABORT); - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nrcondv) (*env)->ReleasePrimitiveArrayCritical(env, rcondv, __nrcondv, failed ? JNI_ABORT : 0); - if (__nrconde) (*env)->ReleasePrimitiveArrayCritical(env, rconde, __nrconde, failed ? JNI_ABORT : 0); - if (__nrscale) (*env)->ReleasePrimitiveArrayCritical(env, rscale, __nrscale, failed ? JNI_ABORT : 0); - if (__nlscale) (*env)->ReleasePrimitiveArrayCritical(env, lscale, __nlscale, failed ? JNI_ABORT : 0); - if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); - if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); - if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); - if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, failed ? JNI_ABORT : 0); - if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, bbnrm, floatW_val_fieldID, __nbbnrm); - if (!failed) (*env)->SetFloatField(env, abnrm, floatW_val_fieldID, __nabnrm); - if (!failed) (*env)->SetIntField(env, ihi, intW_val_fieldID, __nihi); - if (!failed) (*env)->SetIntField(env, ilo, intW_val_fieldID, __nilo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nrcondv) (*env)->ReleasePrimitiveArrayCritical(env, rcondv, __nrcondv, __failed ? JNI_ABORT : 0); + if (__nrconde) (*env)->ReleasePrimitiveArrayCritical(env, rconde, __nrconde, __failed ? JNI_ABORT : 0); + if (__nrscale) (*env)->ReleasePrimitiveArrayCritical(env, rscale, __nrscale, __failed ? JNI_ABORT : 0); + if (__nlscale) (*env)->ReleasePrimitiveArrayCritical(env, lscale, __nlscale, __failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, __failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, __failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, __failed ? JNI_ABORT : 0); + if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, __failed ? JNI_ABORT : 0); + if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, bbnrm, floatW_val_fieldID, __nbbnrm); + if (!__failed) (*env)->SetFloatField(env, abnrm, floatW_val_fieldID, __nabnrm); + if (!__failed) (*env)->SetIntField(env, ihi, intW_val_fieldID, __nihi); + if (!__failed) (*env)->SetIntField(env, ilo, intW_val_fieldID, __nilo); if (__nsense) (*env)->ReleaseStringUTFChars(env, sense, __nsense); if (__njobvr) (*env)->ReleaseStringUTFChars(env, jobvr, __njobvr); if (__njobvl) (*env)->ReleaseStringUTFChars(env, jobvl, __njobvl); if (__nbalanc) (*env)->ReleaseStringUTFChars(env, balanc, __nbalanc); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sggglm_)(int *n, int *m, int *p, float *a, int *lda, float *b, int *ldb, float *d, float *x, float *y, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggglmK(JNIEnv *env, UNUSED jobject obj, jint n, jint m, jint p, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray d, jint offsetd, jfloatArray x, jint offsetx, jfloatArray y, jint offsety, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nd = NULL; float *__nx = NULL; float *__ny = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + float *__nd = NULL; + float *__nx = NULL; + float *__ny = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sggglm_(&n, &m, &p, __na + offseta, &lda, __nb + offsetb, &ldb, __nd + offsetd, __nx + offsetx, __ny + offsety, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgghrd_)(const char *compq, const char *compz, int *n, int *ilo, int *ihi, float *a, int *lda, float *b, int *ldb, float *q, int *ldq, float *z, int *ldz, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgghrdK(JNIEnv *env, UNUSED jobject obj, jstring compq, jstring compz, jint n, jint ilo, jint ihi, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray q, jint offsetq, jint ldq, jfloatArray z, jint offsetz, jint ldz, jobject info) { - jboolean failed = FALSE; - const char *__ncompq = NULL; const char *__ncompz = NULL; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nq = NULL; float *__nz = NULL; - if (!(__ncompq = (*env)->GetStringUTFChars(env, compq, NULL))) goto fail; - if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ncompq = NULL; + const char *__ncompz = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + float *__nq = NULL; + float *__nz = NULL; + if (!(__ncompq = (*env)->GetStringUTFChars(env, compq, NULL))) { __failed = TRUE; goto done; } + if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } sgghrd_(__ncompq, __ncompz, &n, &ilo, &ihi, __na + offseta, &lda, __nb + offsetb, &ldb, __nq + offsetq, &ldq, __nz + offsetz, &ldz, &__ninfo); done: - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ncompz) (*env)->ReleaseStringUTFChars(env, compz, __ncompz); if (__ncompq) (*env)->ReleaseStringUTFChars(env, compq, __ncompq); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgglse_)(int *m, int *n, int *p, float *a, int *lda, float *b, int *ldb, float *c, float *d, float *x, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgglseK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint p, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray c, jint offsetc, jfloatArray d, jint offsetd, jfloatArray x, jint offsetx, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nc = NULL; float *__nd = NULL; float *__nx = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + float *__nc = NULL; + float *__nd = NULL; + float *__nx = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sgglse_(&m, &n, &p, __na + offseta, &lda, __nb + offsetb, &ldb, __nc + offsetc, __nd + offsetd, __nx + offsetx, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sggqrf_)(int *n, int *m, int *p, float *a, int *lda, float *taua, float *b, int *ldb, float *taub, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggqrfK(JNIEnv *env, UNUSED jobject obj, jint n, jint m, jint p, jfloatArray a, jint offseta, jint lda, jfloatArray taua, jint offsettaua, jfloatArray b, jint offsetb, jint ldb, jfloatArray taub, jint offsettaub, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; float *__ntaua = NULL; float *__nb = NULL; float *__ntaub = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntaua = (*env)->GetPrimitiveArrayCritical(env, taua, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__ntaub = (*env)->GetPrimitiveArrayCritical(env, taub, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + float *__ntaua = NULL; + float *__nb = NULL; + float *__ntaub = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntaua = (*env)->GetPrimitiveArrayCritical(env, taua, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__ntaub = (*env)->GetPrimitiveArrayCritical(env, taub, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sggqrf_(&n, &m, &p, __na + offseta, &lda, __ntaua + offsettaua, __nb + offsetb, &ldb, __ntaub + offsettaub, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntaub) (*env)->ReleasePrimitiveArrayCritical(env, taub, __ntaub, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__ntaua) (*env)->ReleasePrimitiveArrayCritical(env, taua, __ntaua, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntaub) (*env)->ReleasePrimitiveArrayCritical(env, taub, __ntaub, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__ntaua) (*env)->ReleasePrimitiveArrayCritical(env, taua, __ntaua, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sggrqf_)(int *m, int *p, int *n, float *a, int *lda, float *taua, float *b, int *ldb, float *taub, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggrqfK(JNIEnv *env, UNUSED jobject obj, jint m, jint p, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray taua, jint offsettaua, jfloatArray b, jint offsetb, jint ldb, jfloatArray taub, jint offsettaub, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; float *__ntaua = NULL; float *__nb = NULL; float *__ntaub = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntaua = (*env)->GetPrimitiveArrayCritical(env, taua, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__ntaub = (*env)->GetPrimitiveArrayCritical(env, taub, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + float *__ntaua = NULL; + float *__nb = NULL; + float *__ntaub = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntaua = (*env)->GetPrimitiveArrayCritical(env, taua, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__ntaub = (*env)->GetPrimitiveArrayCritical(env, taub, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sggrqf_(&m, &p, &n, __na + offseta, &lda, __ntaua + offsettaua, __nb + offsetb, &ldb, __ntaub + offsettaub, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntaub) (*env)->ReleasePrimitiveArrayCritical(env, taub, __ntaub, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__ntaua) (*env)->ReleasePrimitiveArrayCritical(env, taua, __ntaua, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntaub) (*env)->ReleasePrimitiveArrayCritical(env, taub, __ntaub, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__ntaua) (*env)->ReleasePrimitiveArrayCritical(env, taua, __ntaua, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sggsvd_)(const char *jobu, const char *jobv, const char *jobq, int *m, int *n, int *p, int *k, int *l, float *a, int *lda, float *b, int *ldb, float *alpha, float *beta, float *u, int *ldu, float *v, int *ldv, float *q, int *ldq, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggsvdK(JNIEnv *env, UNUSED jobject obj, jstring jobu, jstring jobv, jstring jobq, jint m, jint n, jint p, jobject k, jobject l, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray alpha, jint offsetalpha, jfloatArray beta, jint offsetbeta, jfloatArray u, jint offsetu, jint ldu, jfloatArray v, jint offsetv, jint ldv, jfloatArray q, jint offsetq, jint ldq, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__njobu = NULL; const char *__njobv = NULL; const char *__njobq = NULL; int __nk = 0; int __nl = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nalpha = NULL; float *__nbeta = NULL; float *__nu = NULL; float *__nv = NULL; float *__nq = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__njobu = (*env)->GetStringUTFChars(env, jobu, NULL))) goto fail; - if (!(__njobv = (*env)->GetStringUTFChars(env, jobv, NULL))) goto fail; - if (!(__njobq = (*env)->GetStringUTFChars(env, jobq, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobu = NULL; + const char *__njobv = NULL; + const char *__njobq = NULL; + int __nk = 0; + int __nl = 0; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + float *__nalpha = NULL; + float *__nbeta = NULL; + float *__nu = NULL; + float *__nv = NULL; + float *__nq = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__njobu = (*env)->GetStringUTFChars(env, jobu, NULL))) { __failed = TRUE; goto done; } + if (!(__njobv = (*env)->GetStringUTFChars(env, jobv, NULL))) { __failed = TRUE; goto done; } + if (!(__njobq = (*env)->GetStringUTFChars(env, jobq, NULL))) { __failed = TRUE; goto done; } __nk = (*env)->GetIntField(env, k, intW_val_fieldID); __nl = (*env)->GetIntField(env, l, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nalpha = (*env)->GetPrimitiveArrayCritical(env, alpha, NULL))) goto fail; - if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; - if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nalpha = (*env)->GetPrimitiveArrayCritical(env, alpha, NULL))) { __failed = TRUE; goto done; } + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) { __failed = TRUE; goto done; } + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } sggsvd_(__njobu, __njobv, __njobq, &m, &n, &p, &__nk, &__nl, __na + offseta, &lda, __nb + offsetb, &ldb, __nalpha + offsetalpha, __nbeta + offsetbeta, __nu + offsetu, &ldu, __nv + offsetv, &ldv, __nq + offsetq, &ldq, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); - if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); - if (__nalpha) (*env)->ReleasePrimitiveArrayCritical(env, alpha, __nalpha, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, l, intW_val_fieldID, __nl); - if (!failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, __failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, __failed ? JNI_ABORT : 0); + if (__nalpha) (*env)->ReleasePrimitiveArrayCritical(env, alpha, __nalpha, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, l, intW_val_fieldID, __nl); + if (!__failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); if (__njobq) (*env)->ReleaseStringUTFChars(env, jobq, __njobq); if (__njobv) (*env)->ReleaseStringUTFChars(env, jobv, __njobv); if (__njobu) (*env)->ReleaseStringUTFChars(env, jobu, __njobu); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sggsvp_)(const char *jobu, const char *jobv, const char *jobq, int *m, int *p, int *n, float *a, int *lda, float *b, int *ldb, float *tola, float *tolb, int *k, int *l, float *u, int *ldu, float *v, int *ldv, float *q, int *ldq, int *iwork, float *tau, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggsvpK(JNIEnv *env, UNUSED jobject obj, jstring jobu, jstring jobv, jstring jobq, jint m, jint p, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat tola, jfloat tolb, jobject k, jobject l, jfloatArray u, jint offsetu, jint ldu, jfloatArray v, jint offsetv, jint ldv, jfloatArray q, jint offsetq, jint ldq, jintArray iwork, jint offsetiwork, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__njobu = NULL; const char *__njobv = NULL; const char *__njobq = NULL; int __nk = 0; int __nl = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nu = NULL; float *__nv = NULL; float *__nq = NULL; int *__niwork = NULL; float *__ntau = NULL; float *__nwork = NULL; - if (!(__njobu = (*env)->GetStringUTFChars(env, jobu, NULL))) goto fail; - if (!(__njobv = (*env)->GetStringUTFChars(env, jobv, NULL))) goto fail; - if (!(__njobq = (*env)->GetStringUTFChars(env, jobq, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobu = NULL; + const char *__njobv = NULL; + const char *__njobq = NULL; + int __nk = 0; + int __nl = 0; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + float *__nu = NULL; + float *__nv = NULL; + float *__nq = NULL; + int *__niwork = NULL; + float *__ntau = NULL; + float *__nwork = NULL; + if (!(__njobu = (*env)->GetStringUTFChars(env, jobu, NULL))) { __failed = TRUE; goto done; } + if (!(__njobv = (*env)->GetStringUTFChars(env, jobv, NULL))) { __failed = TRUE; goto done; } + if (!(__njobq = (*env)->GetStringUTFChars(env, jobq, NULL))) { __failed = TRUE; goto done; } __nk = (*env)->GetIntField(env, k, intW_val_fieldID); __nl = (*env)->GetIntField(env, l, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sggsvp_(__njobu, __njobv, __njobq, &m, &p, &n, __na + offseta, &lda, __nb + offsetb, &ldb, &tola, &tolb, &__nk, &__nl, __nu + offsetu, &ldu, __nv + offsetv, &ldv, __nq + offsetq, &ldq, __niwork + offsetiwork, __ntau + offsettau, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, l, intW_val_fieldID, __nl); - if (!failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, l, intW_val_fieldID, __nl); + if (!__failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); if (__njobq) (*env)->ReleaseStringUTFChars(env, jobq, __njobq); if (__njobv) (*env)->ReleaseStringUTFChars(env, jobv, __njobv); if (__njobu) (*env)->ReleaseStringUTFChars(env, jobu, __njobu); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgtcon_)(const char *norm, int *n, float *dl, float *d, float *du, float *du2, int *ipiv, float *anorm, float *rcond, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgtconK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nnorm = NULL; float __nrcond = 0; int __ninfo = 0; float *__ndl = NULL; float *__nd = NULL; float *__ndu = NULL; float *__ndu2 = NULL; int *__nipiv = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + float __nrcond = 0; + int __ninfo = 0; + float *__ndl = NULL; + float *__nd = NULL; + float *__ndu = NULL; + float *__ndu2 = NULL; + int *__nipiv = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; - if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) { __failed = TRUE; goto done; } + if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } sgtcon_(__nnorm, &n, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __ndu2 + offsetdu2, __nipiv + offsetipiv, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, failed ? JNI_ABORT : 0); - if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, __failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgtrfs_)(const char *trans, int *n, int *nrhs, float *dl, float *d, float *du, float *dlf, float *df, float *duf, float *du2, int *ipiv, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgtrfsK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint n, jint nrhs, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray dlf, jint offsetdlf, jfloatArray df, jint offsetdf, jfloatArray duf, jint offsetduf, jfloatArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__ntrans = NULL; int __ninfo = 0; float *__ndl = NULL; float *__nd = NULL; float *__ndu = NULL; float *__ndlf = NULL; float *__ndf = NULL; float *__nduf = NULL; float *__ndu2 = NULL; int *__nipiv = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; - if (!(__ndlf = (*env)->GetPrimitiveArrayCritical(env, dlf, NULL))) goto fail; - if (!(__ndf = (*env)->GetPrimitiveArrayCritical(env, df, NULL))) goto fail; - if (!(__nduf = (*env)->GetPrimitiveArrayCritical(env, duf, NULL))) goto fail; - if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ntrans = NULL; + int __ninfo = 0; + float *__ndl = NULL; + float *__nd = NULL; + float *__ndu = NULL; + float *__ndlf = NULL; + float *__ndf = NULL; + float *__nduf = NULL; + float *__ndu2 = NULL; + int *__nipiv = NULL; + float *__nb = NULL; + float *__nx = NULL; + float *__nferr = NULL; + float *__nberr = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) { __failed = TRUE; goto done; } + if (!(__ndlf = (*env)->GetPrimitiveArrayCritical(env, dlf, NULL))) { __failed = TRUE; goto done; } + if (!(__ndf = (*env)->GetPrimitiveArrayCritical(env, df, NULL))) { __failed = TRUE; goto done; } + if (!(__nduf = (*env)->GetPrimitiveArrayCritical(env, duf, NULL))) { __failed = TRUE; goto done; } + if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } sgtrfs_(__ntrans, &n, &nrhs, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __ndlf + offsetdlf, __ndf + offsetdf, __nduf + offsetduf, __ndu2 + offsetdu2, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, failed ? JNI_ABORT : 0); - if (__nduf) (*env)->ReleasePrimitiveArrayCritical(env, duf, __nduf, failed ? JNI_ABORT : 0); - if (__ndf) (*env)->ReleasePrimitiveArrayCritical(env, df, __ndf, failed ? JNI_ABORT : 0); - if (__ndlf) (*env)->ReleasePrimitiveArrayCritical(env, dlf, __ndlf, failed ? JNI_ABORT : 0); - if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, __failed ? JNI_ABORT : 0); + if (__nduf) (*env)->ReleasePrimitiveArrayCritical(env, duf, __nduf, __failed ? JNI_ABORT : 0); + if (__ndf) (*env)->ReleasePrimitiveArrayCritical(env, df, __ndf, __failed ? JNI_ABORT : 0); + if (__ndlf) (*env)->ReleasePrimitiveArrayCritical(env, dlf, __ndlf, __failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgtsv_)(int *n, int *nrhs, float *dl, float *d, float *du, float *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgtsvK(JNIEnv *env, UNUSED jobject obj, jint n, jint nrhs, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__ndl = NULL; float *__nd = NULL; float *__ndu = NULL; float *__nb = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__ndl = NULL; + float *__nd = NULL; + float *__ndu = NULL; + float *__nb = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } sgtsv_(&n, &nrhs, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgtsvx_)(const char *fact, const char *trans, int *n, int *nrhs, float *dl, float *d, float *du, float *dlf, float *df, float *duf, float *du2, int *ipiv, float *b, int *ldb, float *x, int *ldx, float *rcond, float *ferr, float *berr, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgtsvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring trans, jint n, jint nrhs, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray dlf, jint offsetdlf, jfloatArray df, jint offsetdf, jfloatArray duf, jint offsetduf, jfloatArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nfact = NULL; const char *__ntrans = NULL; float __nrcond = 0; int __ninfo = 0; float *__ndl = NULL; float *__nd = NULL; float *__ndu = NULL; float *__ndlf = NULL; float *__ndf = NULL; float *__nduf = NULL; float *__ndu2 = NULL; int *__nipiv = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nfact = NULL; + const char *__ntrans = NULL; + float __nrcond = 0; + int __ninfo = 0; + float *__ndl = NULL; + float *__nd = NULL; + float *__ndu = NULL; + float *__ndlf = NULL; + float *__ndf = NULL; + float *__nduf = NULL; + float *__ndu2 = NULL; + int *__nipiv = NULL; + float *__nb = NULL; + float *__nx = NULL; + float *__nferr = NULL; + float *__nberr = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; - if (!(__ndlf = (*env)->GetPrimitiveArrayCritical(env, dlf, NULL))) goto fail; - if (!(__ndf = (*env)->GetPrimitiveArrayCritical(env, df, NULL))) goto fail; - if (!(__nduf = (*env)->GetPrimitiveArrayCritical(env, duf, NULL))) goto fail; - if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) { __failed = TRUE; goto done; } + if (!(__ndlf = (*env)->GetPrimitiveArrayCritical(env, dlf, NULL))) { __failed = TRUE; goto done; } + if (!(__ndf = (*env)->GetPrimitiveArrayCritical(env, df, NULL))) { __failed = TRUE; goto done; } + if (!(__nduf = (*env)->GetPrimitiveArrayCritical(env, duf, NULL))) { __failed = TRUE; goto done; } + if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } sgtsvx_(__nfact, __ntrans, &n, &nrhs, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __ndlf + offsetdlf, __ndf + offsetdf, __nduf + offsetduf, __ndu2 + offsetdu2, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, failed ? JNI_ABORT : 0); - if (__nduf) (*env)->ReleasePrimitiveArrayCritical(env, duf, __nduf, failed ? JNI_ABORT : 0); - if (__ndf) (*env)->ReleasePrimitiveArrayCritical(env, df, __ndf, failed ? JNI_ABORT : 0); - if (__ndlf) (*env)->ReleasePrimitiveArrayCritical(env, dlf, __ndlf, failed ? JNI_ABORT : 0); - if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, __failed ? JNI_ABORT : 0); + if (__nduf) (*env)->ReleasePrimitiveArrayCritical(env, duf, __nduf, __failed ? JNI_ABORT : 0); + if (__ndf) (*env)->ReleasePrimitiveArrayCritical(env, df, __ndf, __failed ? JNI_ABORT : 0); + if (__ndlf) (*env)->ReleasePrimitiveArrayCritical(env, dlf, __ndlf, __failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgttrf_)(int *n, float *dl, float *d, float *du, float *du2, int *ipiv, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgttrfK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__ndl = NULL; float *__nd = NULL; float *__ndu = NULL; float *__ndu2 = NULL; int *__nipiv = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; - if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__ndl = NULL; + float *__nd = NULL; + float *__ndu = NULL; + float *__ndu2 = NULL; + int *__nipiv = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) { __failed = TRUE; goto done; } + if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } sgttrf_(&n, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __ndu2 + offsetdu2, __nipiv + offsetipiv, &__ninfo); done: - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, failed ? JNI_ABORT : 0); - if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, __failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgttrs_)(const char *trans, int *n, int *nrhs, float *dl, float *d, float *du, float *du2, int *ipiv, float *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgttrsK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint n, jint nrhs, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__ntrans = NULL; int __ninfo = 0; float *__ndl = NULL; float *__nd = NULL; float *__ndu = NULL; float *__ndu2 = NULL; int *__nipiv = NULL; float *__nb = NULL; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; - if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ntrans = NULL; + int __ninfo = 0; + float *__ndl = NULL; + float *__nd = NULL; + float *__ndu = NULL; + float *__ndu2 = NULL; + int *__nipiv = NULL; + float *__nb = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) { __failed = TRUE; goto done; } + if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } sgttrs_(__ntrans, &n, &nrhs, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __ndu2 + offsetdu2, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, failed ? JNI_ABORT : 0); - if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, __failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgtts2_)(int *itrans, int *n, int *nrhs, float *dl, float *d, float *du, float *du2, int *ipiv, float *b, int *ldb); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgtts2K(JNIEnv *env, UNUSED jobject obj, jint itrans, jint n, jint nrhs, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray du2, jint offsetdu2, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb) { - jboolean failed = FALSE; - float *__ndl = NULL; float *__nd = NULL; float *__ndu = NULL; float *__ndu2 = NULL; int *__nipiv = NULL; float *__nb = NULL; - if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; - if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + float *__ndl = NULL; + float *__nd = NULL; + float *__ndu = NULL; + float *__ndu2 = NULL; + int *__nipiv = NULL; + float *__nb = NULL; + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) { __failed = TRUE; goto done; } + if (!(__ndu2 = (*env)->GetPrimitiveArrayCritical(env, du2, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } sgtts2_(&itrans, &n, &nrhs, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __ndu2 + offsetdu2, __nipiv + offsetipiv, __nb + offsetb, &ldb); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, failed ? JNI_ABORT : 0); - if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__ndu2) (*env)->ReleasePrimitiveArrayCritical(env, du2, __ndu2, __failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*shgeqz_)(const char *job, const char *compq, const char *compz, int *n, int *ilo, int *ihi, float *h, int *ldh, float *t, int *ldt, float *alphar, float *alphai, float *beta, float *q, int *ldq, float *z, int *ldz, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_shgeqzK(JNIEnv *env, UNUSED jobject obj, jstring job, jstring compq, jstring compz, jint n, jint ilo, jint ihi, jfloatArray h, jint offseth, jint ldh, jfloatArray t, jint offsett, jint ldt, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray q, jint offsetq, jint ldq, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__njob = NULL; const char *__ncompq = NULL; const char *__ncompz = NULL; int __ninfo = 0; float *__nh = NULL; float *__nt = NULL; float *__nalphar = NULL; float *__nalphai = NULL; float *__nbeta = NULL; float *__nq = NULL; float *__nz = NULL; float *__nwork = NULL; - if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; - if (!(__ncompq = (*env)->GetStringUTFChars(env, compq, NULL))) goto fail; - if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; - if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) goto fail; - if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) goto fail; - if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njob = NULL; + const char *__ncompq = NULL; + const char *__ncompz = NULL; + int __ninfo = 0; + float *__nh = NULL; + float *__nt = NULL; + float *__nalphar = NULL; + float *__nalphai = NULL; + float *__nbeta = NULL; + float *__nq = NULL; + float *__nz = NULL; + float *__nwork = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) { __failed = TRUE; goto done; } + if (!(__ncompq = (*env)->GetStringUTFChars(env, compq, NULL))) { __failed = TRUE; goto done; } + if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) { __failed = TRUE; goto done; } + if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) { __failed = TRUE; goto done; } + if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) { __failed = TRUE; goto done; } + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } shgeqz_(__njob, __ncompq, __ncompz, &n, &ilo, &ihi, __nh + offseth, &ldh, __nt + offsett, &ldt, __nalphar + offsetalphar, __nalphai + offsetalphai, __nbeta + offsetbeta, __nq + offsetq, &ldq, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); - if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, failed ? JNI_ABORT : 0); - if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, failed ? JNI_ABORT : 0); - if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, __failed ? JNI_ABORT : 0); + if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, __failed ? JNI_ABORT : 0); + if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, __failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ncompz) (*env)->ReleaseStringUTFChars(env, compz, __ncompz); if (__ncompq) (*env)->ReleaseStringUTFChars(env, compq, __ncompq); if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*shsein_)(const char *side, const char *eigsrc, const char *initv, int *select, int *n, float *h, int *ldh, float *wr, float *wi, float *vl, int *ldvl, float *vr, int *ldvr, int *mm, int *m, float *work, int *ifaill, int *ifailr, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_shseinK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring eigsrc, jstring initv, jbooleanArray select, jint offsetselect, jint n, jfloatArray h, jint offseth, jint ldh, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jint mm, jobject m, jfloatArray work, jint offsetwork, jintArray ifaill, jint offsetifaill, jintArray ifailr, jint offsetifailr, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__neigsrc = NULL; const char *__ninitv = NULL; int __nm = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; float *__nh = NULL; float *__nwr = NULL; float *__nwi = NULL; float *__nvl = NULL; float *__nvr = NULL; float *__nwork = NULL; int *__nifaill = NULL; int *__nifailr = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__neigsrc = (*env)->GetStringUTFChars(env, eigsrc, NULL))) goto fail; - if (!(__ninitv = (*env)->GetStringUTFChars(env, initv, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__neigsrc = NULL; + const char *__ninitv = NULL; + int __nm = 0; + int __ninfo = 0; + int *__nselect = NULL; jboolean *__jselect = NULL; + float *__nh = NULL; + float *__nwr = NULL; + float *__nwi = NULL; + float *__nvl = NULL; + float *__nvr = NULL; + float *__nwork = NULL; + int *__nifaill = NULL; + int *__nifailr = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__neigsrc = (*env)->GetStringUTFChars(env, eigsrc, NULL))) { __failed = TRUE; goto done; } + if (!(__ninitv = (*env)->GetStringUTFChars(env, initv, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; - if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; - if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; - if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__nifaill = (*env)->GetPrimitiveArrayCritical(env, ifaill, NULL))) goto fail; - if (!(__nifailr = (*env)->GetPrimitiveArrayCritical(env, ifailr, NULL))) goto fail; + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { __failed = TRUE; goto done; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) { __failed = TRUE; goto done; } if (!(__nselect = malloc(sizeof(jboolean) * length))) { __failed = TRUE; goto done; } for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) { __failed = TRUE; goto done; } + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) { __failed = TRUE; goto done; } + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__nifaill = (*env)->GetPrimitiveArrayCritical(env, ifaill, NULL))) { __failed = TRUE; goto done; } + if (!(__nifailr = (*env)->GetPrimitiveArrayCritical(env, ifailr, NULL))) { __failed = TRUE; goto done; } shsein_(__nside, __neigsrc, __ninitv, __nselect + offsetselect, &n, __nh + offseth, &ldh, __nwr + offsetwr, __nwi + offsetwi, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, &mm, &__nm, __nwork + offsetwork, __nifaill + offsetifaill, __nifailr + offsetifailr, &__ninfo); done: - if (__nifailr) (*env)->ReleasePrimitiveArrayCritical(env, ifailr, __nifailr, failed ? JNI_ABORT : 0); - if (__nifaill) (*env)->ReleasePrimitiveArrayCritical(env, ifaill, __nifaill, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); - if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); - if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); - if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); + if (__nifailr) (*env)->ReleasePrimitiveArrayCritical(env, ifailr, __nifailr, __failed ? JNI_ABORT : 0); + if (__nifaill) (*env)->ReleasePrimitiveArrayCritical(env, ifaill, __nifaill, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, __failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, __failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, __failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__ninitv) (*env)->ReleaseStringUTFChars(env, initv, __ninitv); if (__neigsrc) (*env)->ReleaseStringUTFChars(env, eigsrc, __neigsrc); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*shseqr_)(const char *job, const char *compz, int *n, int *ilo, int *ihi, float *h, int *ldh, float *wr, float *wi, float *z, int *ldz, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_shseqrK(JNIEnv *env, UNUSED jobject obj, jstring job, jstring compz, jint n, jint ilo, jint ihi, jfloatArray h, jint offseth, jint ldh, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__njob = NULL; const char *__ncompz = NULL; int __ninfo = 0; float *__nh = NULL; float *__nwr = NULL; float *__nwi = NULL; float *__nz = NULL; float *__nwork = NULL; - if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; - if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; - if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njob = NULL; + const char *__ncompz = NULL; + int __ninfo = 0; + float *__nh = NULL; + float *__nwr = NULL; + float *__nwi = NULL; + float *__nz = NULL; + float *__nwork = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) { __failed = TRUE; goto done; } + if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } shseqr_(__njob, __ncompz, &n, &ilo, &ihi, __nh + offseth, &ldh, __nwr + offsetwr, __nwi + offsetwi, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); - if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, __failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ncompz) (*env)->ReleaseStringUTFChars(env, compz, __ncompz); if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static int (*sisnan_)(float *sin); jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_sisnanK(JNIEnv *env, UNUSED jobject obj, jfloat sin) { - jboolean __ret; - jboolean failed = FALSE; - - + jboolean __ret = 0; + jboolean __failed = FALSE; __ret = sisnan_(&sin); done: - - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static void (*slabad_)(float *small, float *large); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slabadK(JNIEnv *env, UNUSED jobject obj, jobject small, jobject large) { - jboolean failed = FALSE; - float __nsmall = 0; float __nlarge = 0; + jboolean __failed = FALSE; + float __nsmall = 0; + float __nlarge = 0; __nsmall = (*env)->GetFloatField(env, small, floatW_val_fieldID); __nlarge = (*env)->GetFloatField(env, large, floatW_val_fieldID); slabad_(&__nsmall, &__nlarge); done: - if (!failed) (*env)->SetFloatField(env, large, floatW_val_fieldID, __nlarge); - if (!failed) (*env)->SetFloatField(env, small, floatW_val_fieldID, __nsmall); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetFloatField(env, large, floatW_val_fieldID, __nlarge); + if (!__failed) (*env)->SetFloatField(env, small, floatW_val_fieldID, __nsmall); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slabrd_)(int *m, int *n, int *nb, float *a, int *lda, float *d, float *e, float *tauq, float *taup, float *x, int *ldx, float *y, int *ldy); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slabrdK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint nb, jfloatArray a, jint offseta, jint lda, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray tauq, jint offsettauq, jfloatArray taup, jint offsettaup, jfloatArray x, jint offsetx, jint ldx, jfloatArray y, jint offsety, jint ldy) { - jboolean failed = FALSE; - float *__na = NULL; float *__nd = NULL; float *__ne = NULL; float *__ntauq = NULL; float *__ntaup = NULL; float *__nx = NULL; float *__ny = NULL; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__ntauq = (*env)->GetPrimitiveArrayCritical(env, tauq, NULL))) goto fail; - if (!(__ntaup = (*env)->GetPrimitiveArrayCritical(env, taup, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + jboolean __failed = FALSE; + float *__na = NULL; + float *__nd = NULL; + float *__ne = NULL; + float *__ntauq = NULL; + float *__ntaup = NULL; + float *__nx = NULL; + float *__ny = NULL; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__ntauq = (*env)->GetPrimitiveArrayCritical(env, tauq, NULL))) { __failed = TRUE; goto done; } + if (!(__ntaup = (*env)->GetPrimitiveArrayCritical(env, taup, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } slabrd_(&m, &n, &nb, __na + offseta, &lda, __nd + offsetd, __ne + offsete, __ntauq + offsettauq, __ntaup + offsettaup, __nx + offsetx, &ldx, __ny + offsety, &ldy); done: - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__ntaup) (*env)->ReleasePrimitiveArrayCritical(env, taup, __ntaup, failed ? JNI_ABORT : 0); - if (__ntauq) (*env)->ReleasePrimitiveArrayCritical(env, tauq, __ntauq, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__ntaup) (*env)->ReleasePrimitiveArrayCritical(env, taup, __ntaup, __failed ? JNI_ABORT : 0); + if (__ntauq) (*env)->ReleasePrimitiveArrayCritical(env, tauq, __ntauq, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slacn2_)(int *n, float *v, float *x, int *isgn, float *est, int *kase, int *isave); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slacn2K(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray v, jint offsetv, jfloatArray x, jint offsetx, jintArray isgn, jint offsetisgn, jobject est, jobject kase, jintArray isave, jint offsetisave) { - jboolean failed = FALSE; - float __nest = 0; int __nkase = 0; float *__nv = NULL; float *__nx = NULL; int *__nisgn = NULL; int *__nisave = NULL; + jboolean __failed = FALSE; + float __nest = 0; + int __nkase = 0; + float *__nv = NULL; + float *__nx = NULL; + int *__nisgn = NULL; + int *__nisave = NULL; __nest = (*env)->GetFloatField(env, est, floatW_val_fieldID); __nkase = (*env)->GetIntField(env, kase, intW_val_fieldID); - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nisgn = (*env)->GetPrimitiveArrayCritical(env, isgn, NULL))) goto fail; - if (!(__nisave = (*env)->GetPrimitiveArrayCritical(env, isave, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nisgn = (*env)->GetPrimitiveArrayCritical(env, isgn, NULL))) { __failed = TRUE; goto done; } + if (!(__nisave = (*env)->GetPrimitiveArrayCritical(env, isave, NULL))) { __failed = TRUE; goto done; } slacn2_(&n, __nv + offsetv, __nx + offsetx, __nisgn + offsetisgn, &__nest, &__nkase, __nisave + offsetisave); done: - if (__nisave) (*env)->ReleasePrimitiveArrayCritical(env, isave, __nisave, failed ? JNI_ABORT : 0); - if (__nisgn) (*env)->ReleasePrimitiveArrayCritical(env, isgn, __nisgn, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, kase, intW_val_fieldID, __nkase); - if (!failed) (*env)->SetFloatField(env, est, floatW_val_fieldID, __nest); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nisave) (*env)->ReleasePrimitiveArrayCritical(env, isave, __nisave, __failed ? JNI_ABORT : 0); + if (__nisgn) (*env)->ReleasePrimitiveArrayCritical(env, isgn, __nisgn, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, kase, intW_val_fieldID, __nkase); + if (!__failed) (*env)->SetFloatField(env, est, floatW_val_fieldID, __nest); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slacon_)(int *n, float *v, float *x, int *isgn, float *est, int *kase); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaconK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray v, jint offsetv, jfloatArray x, jint offsetx, jintArray isgn, jint offsetisgn, jobject est, jobject kase) { - jboolean failed = FALSE; - float __nest = 0; int __nkase = 0; float *__nv = NULL; float *__nx = NULL; int *__nisgn = NULL; + jboolean __failed = FALSE; + float __nest = 0; + int __nkase = 0; + float *__nv = NULL; + float *__nx = NULL; + int *__nisgn = NULL; __nest = (*env)->GetFloatField(env, est, floatW_val_fieldID); __nkase = (*env)->GetIntField(env, kase, intW_val_fieldID); - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nisgn = (*env)->GetPrimitiveArrayCritical(env, isgn, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nisgn = (*env)->GetPrimitiveArrayCritical(env, isgn, NULL))) { __failed = TRUE; goto done; } slacon_(&n, __nv + offsetv, __nx + offsetx, __nisgn + offsetisgn, &__nest, &__nkase); done: - if (__nisgn) (*env)->ReleasePrimitiveArrayCritical(env, isgn, __nisgn, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, kase, intW_val_fieldID, __nkase); - if (!failed) (*env)->SetFloatField(env, est, floatW_val_fieldID, __nest); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nisgn) (*env)->ReleasePrimitiveArrayCritical(env, isgn, __nisgn, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, kase, intW_val_fieldID, __nkase); + if (!__failed) (*env)->SetFloatField(env, est, floatW_val_fieldID, __nest); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slacpy_)(const char *uplo, int *m, int *n, float *a, int *lda, float *b, int *ldb); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slacpyK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb) { - jboolean failed = FALSE; - const char *__nuplo = NULL; float *__na = NULL; float *__nb = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + float *__na = NULL; + float *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } slacpy_(__nuplo, &m, &n, __na + offseta, &lda, __nb + offsetb, &ldb); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sladiv_)(float *a, float *b, float *c, float *d, float *p, float *q); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sladivK(JNIEnv *env, UNUSED jobject obj, jfloat a, jfloat b, jfloat c, jfloat d, jobject p, jobject q) { - jboolean failed = FALSE; - float __np = 0; float __nq = 0; + jboolean __failed = FALSE; + float __np = 0; + float __nq = 0; __np = (*env)->GetFloatField(env, p, floatW_val_fieldID); __nq = (*env)->GetFloatField(env, q, floatW_val_fieldID); sladiv_(&a, &b, &c, &d, &__np, &__nq); done: - if (!failed) (*env)->SetFloatField(env, q, floatW_val_fieldID, __nq); - if (!failed) (*env)->SetFloatField(env, p, floatW_val_fieldID, __np); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetFloatField(env, q, floatW_val_fieldID, __nq); + if (!__failed) (*env)->SetFloatField(env, p, floatW_val_fieldID, __np); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slae2_)(float *a, float *b, float *c, float *rt1, float *rt2); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slae2K(JNIEnv *env, UNUSED jobject obj, jfloat a, jfloat b, jfloat c, jobject rt1, jobject rt2) { - jboolean failed = FALSE; - float __nrt1 = 0; float __nrt2 = 0; + jboolean __failed = FALSE; + float __nrt1 = 0; + float __nrt2 = 0; __nrt1 = (*env)->GetFloatField(env, rt1, floatW_val_fieldID); __nrt2 = (*env)->GetFloatField(env, rt2, floatW_val_fieldID); slae2_(&a, &b, &c, &__nrt1, &__nrt2); done: - if (!failed) (*env)->SetFloatField(env, rt2, floatW_val_fieldID, __nrt2); - if (!failed) (*env)->SetFloatField(env, rt1, floatW_val_fieldID, __nrt1); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetFloatField(env, rt2, floatW_val_fieldID, __nrt2); + if (!__failed) (*env)->SetFloatField(env, rt1, floatW_val_fieldID, __nrt1); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaebz_)(int *ijob, int *nitmax, int *n, int *mmax, int *minp, int *nbmin, float *abstol, float *reltol, float *pivmin, float *d, float *e, float *e2, int *nval, float *ab, float *c, int *mout, int *nab, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaebzK(JNIEnv *env, UNUSED jobject obj, jint ijob, jint nitmax, jint n, jint mmax, jint minp, jint nbmin, jfloat abstol, jfloat reltol, jfloat pivmin, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray e2, jint offsete2, jintArray nval, jint offsetnval, jfloatArray ab, jint offsetab, jfloatArray c, jint offsetc, jobject mout, jintArray nab, jint offsetnab, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - int __nmout = 0; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__ne2 = NULL; int *__nnval = NULL; float *__nab = NULL; float *__nc = NULL; int *__nnab = NULL; float *__nwork = NULL; int *__niwork = NULL; + jboolean __failed = FALSE; + int __nmout = 0; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; + float *__ne2 = NULL; + int *__nnval = NULL; + float *__nab = NULL; + float *__nc = NULL; + int *__nnab = NULL; + float *__nwork = NULL; + int *__niwork = NULL; __nmout = (*env)->GetIntField(env, mout, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) goto fail; - if (!(__nnval = (*env)->GetPrimitiveArrayCritical(env, nval, NULL))) goto fail; - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nnab = (*env)->GetPrimitiveArrayCritical(env, nab, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) { __failed = TRUE; goto done; } + if (!(__nnval = (*env)->GetPrimitiveArrayCritical(env, nval, NULL))) { __failed = TRUE; goto done; } + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nnab = (*env)->GetPrimitiveArrayCritical(env, nab, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } slaebz_(&ijob, &nitmax, &n, &mmax, &minp, &nbmin, &abstol, &reltol, &pivmin, __nd + offsetd, __ne + offsete, __ne2 + offsete2, __nnval + offsetnval, __nab + offsetab, __nc + offsetc, &__nmout, __nnab + offsetnab, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nnab) (*env)->ReleasePrimitiveArrayCritical(env, nab, __nnab, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (__nnval) (*env)->ReleasePrimitiveArrayCritical(env, nval, __nnval, failed ? JNI_ABORT : 0); - if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, mout, intW_val_fieldID, __nmout); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nnab) (*env)->ReleasePrimitiveArrayCritical(env, nab, __nnab, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (__nnval) (*env)->ReleasePrimitiveArrayCritical(env, nval, __nnval, __failed ? JNI_ABORT : 0); + if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, mout, intW_val_fieldID, __nmout); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaed0_)(int *icompq, int *qsiz, int *n, float *d, float *e, float *q, int *ldq, float *qstore, int *ldqs, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed0K(JNIEnv *env, UNUSED jobject obj, jint icompq, jint qsiz, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray q, jint offsetq, jint ldq, jfloatArray qstore, jint offsetqstore, jint ldqs, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nq = NULL; float *__nqstore = NULL; float *__nwork = NULL; int *__niwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nqstore = (*env)->GetPrimitiveArrayCritical(env, qstore, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; + float *__nq = NULL; + float *__nqstore = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nqstore = (*env)->GetPrimitiveArrayCritical(env, qstore, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } slaed0_(&icompq, &qsiz, &n, __nd + offsetd, __ne + offsete, __nq + offsetq, &ldq, __nqstore + offsetqstore, &ldqs, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nqstore) (*env)->ReleasePrimitiveArrayCritical(env, qstore, __nqstore, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nqstore) (*env)->ReleasePrimitiveArrayCritical(env, qstore, __nqstore, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaed1_)(int *n, float *d, float *q, int *ldq, int *indxq, float *rho, int *cutpnt, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed1K(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray d, jint offsetd, jfloatArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jint cutpnt, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - float __nrho = 0; int __ninfo = 0; float *__nd = NULL; float *__nq = NULL; int *__nindxq = NULL; float *__nwork = NULL; int *__niwork = NULL; + jboolean __failed = FALSE; + float __nrho = 0; + int __ninfo = 0; + float *__nd = NULL; + float *__nq = NULL; + int *__nindxq = NULL; + float *__nwork = NULL; + int *__niwork = NULL; __nrho = (*env)->GetFloatField(env, rho, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nindxq = (*env)->GetPrimitiveArrayCritical(env, indxq, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nindxq = (*env)->GetPrimitiveArrayCritical(env, indxq, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } slaed1_(&n, __nd + offsetd, __nq + offsetq, &ldq, __nindxq + offsetindxq, &__nrho, &cutpnt, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nindxq) (*env)->ReleasePrimitiveArrayCritical(env, indxq, __nindxq, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, rho, floatW_val_fieldID, __nrho); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nindxq) (*env)->ReleasePrimitiveArrayCritical(env, indxq, __nindxq, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, rho, floatW_val_fieldID, __nrho); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaed2_)(int *k, int *n, int *n1, float *d, float *q, int *ldq, int *indxq, float *rho, float *z, float *dlamda, float *w, float *q2, int *indx, int *indxc, int *indxp, int *coltyp, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed2K(JNIEnv *env, UNUSED jobject obj, jobject k, jint n, jint n1, jfloatArray d, jint offsetd, jfloatArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jfloatArray z, jint offsetz, jfloatArray dlamda, jint offsetdlamda, jfloatArray w, jint offsetw, jfloatArray q2, jint offsetq2, jintArray indx, jint offsetindx, jintArray indxc, jint offsetindxc, jintArray indxp, jint offsetindxp, jintArray coltyp, jint offsetcoltyp, jobject info) { - jboolean failed = FALSE; - int __nk = 0; float __nrho = 0; int __ninfo = 0; float *__nd = NULL; float *__nq = NULL; int *__nindxq = NULL; float *__nz = NULL; float *__ndlamda = NULL; float *__nw = NULL; float *__nq2 = NULL; int *__nindx = NULL; int *__nindxc = NULL; int *__nindxp = NULL; int *__ncoltyp = NULL; + jboolean __failed = FALSE; + int __nk = 0; + float __nrho = 0; + int __ninfo = 0; + float *__nd = NULL; + float *__nq = NULL; + int *__nindxq = NULL; + float *__nz = NULL; + float *__ndlamda = NULL; + float *__nw = NULL; + float *__nq2 = NULL; + int *__nindx = NULL; + int *__nindxc = NULL; + int *__nindxp = NULL; + int *__ncoltyp = NULL; __nk = (*env)->GetIntField(env, k, intW_val_fieldID); __nrho = (*env)->GetFloatField(env, rho, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nindxq = (*env)->GetPrimitiveArrayCritical(env, indxq, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__ndlamda = (*env)->GetPrimitiveArrayCritical(env, dlamda, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nq2 = (*env)->GetPrimitiveArrayCritical(env, q2, NULL))) goto fail; - if (!(__nindx = (*env)->GetPrimitiveArrayCritical(env, indx, NULL))) goto fail; - if (!(__nindxc = (*env)->GetPrimitiveArrayCritical(env, indxc, NULL))) goto fail; - if (!(__nindxp = (*env)->GetPrimitiveArrayCritical(env, indxp, NULL))) goto fail; - if (!(__ncoltyp = (*env)->GetPrimitiveArrayCritical(env, coltyp, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nindxq = (*env)->GetPrimitiveArrayCritical(env, indxq, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__ndlamda = (*env)->GetPrimitiveArrayCritical(env, dlamda, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nq2 = (*env)->GetPrimitiveArrayCritical(env, q2, NULL))) { __failed = TRUE; goto done; } + if (!(__nindx = (*env)->GetPrimitiveArrayCritical(env, indx, NULL))) { __failed = TRUE; goto done; } + if (!(__nindxc = (*env)->GetPrimitiveArrayCritical(env, indxc, NULL))) { __failed = TRUE; goto done; } + if (!(__nindxp = (*env)->GetPrimitiveArrayCritical(env, indxp, NULL))) { __failed = TRUE; goto done; } + if (!(__ncoltyp = (*env)->GetPrimitiveArrayCritical(env, coltyp, NULL))) { __failed = TRUE; goto done; } slaed2_(&__nk, &n, &n1, __nd + offsetd, __nq + offsetq, &ldq, __nindxq + offsetindxq, &__nrho, __nz + offsetz, __ndlamda + offsetdlamda, __nw + offsetw, __nq2 + offsetq2, __nindx + offsetindx, __nindxc + offsetindxc, __nindxp + offsetindxp, __ncoltyp + offsetcoltyp, &__ninfo); done: - if (__ncoltyp) (*env)->ReleasePrimitiveArrayCritical(env, coltyp, __ncoltyp, failed ? JNI_ABORT : 0); - if (__nindxp) (*env)->ReleasePrimitiveArrayCritical(env, indxp, __nindxp, failed ? JNI_ABORT : 0); - if (__nindxc) (*env)->ReleasePrimitiveArrayCritical(env, indxc, __nindxc, failed ? JNI_ABORT : 0); - if (__nindx) (*env)->ReleasePrimitiveArrayCritical(env, indx, __nindx, failed ? JNI_ABORT : 0); - if (__nq2) (*env)->ReleasePrimitiveArrayCritical(env, q2, __nq2, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__ndlamda) (*env)->ReleasePrimitiveArrayCritical(env, dlamda, __ndlamda, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nindxq) (*env)->ReleasePrimitiveArrayCritical(env, indxq, __nindxq, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, rho, floatW_val_fieldID, __nrho); - if (!failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ncoltyp) (*env)->ReleasePrimitiveArrayCritical(env, coltyp, __ncoltyp, __failed ? JNI_ABORT : 0); + if (__nindxp) (*env)->ReleasePrimitiveArrayCritical(env, indxp, __nindxp, __failed ? JNI_ABORT : 0); + if (__nindxc) (*env)->ReleasePrimitiveArrayCritical(env, indxc, __nindxc, __failed ? JNI_ABORT : 0); + if (__nindx) (*env)->ReleasePrimitiveArrayCritical(env, indx, __nindx, __failed ? JNI_ABORT : 0); + if (__nq2) (*env)->ReleasePrimitiveArrayCritical(env, q2, __nq2, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__ndlamda) (*env)->ReleasePrimitiveArrayCritical(env, dlamda, __ndlamda, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nindxq) (*env)->ReleasePrimitiveArrayCritical(env, indxq, __nindxq, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, rho, floatW_val_fieldID, __nrho); + if (!__failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaed3_)(int *k, int *n, int *n1, float *d, float *q, int *ldq, float *rho, float *dlamda, float *q2, int *indx, int *ctot, float *w, float *s, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed3K(JNIEnv *env, UNUSED jobject obj, jint k, jint n, jint n1, jfloatArray d, jint offsetd, jfloatArray q, jint offsetq, jint ldq, jfloat rho, jfloatArray dlamda, jint offsetdlamda, jfloatArray q2, jint offsetq2, jintArray indx, jint offsetindx, jintArray ctot, jint offsetctot, jfloatArray w, jint offsetw, jfloatArray s, jint offsets, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__nd = NULL; float *__nq = NULL; float *__ndlamda = NULL; float *__nq2 = NULL; int *__nindx = NULL; int *__nctot = NULL; float *__nw = NULL; float *__ns = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__ndlamda = (*env)->GetPrimitiveArrayCritical(env, dlamda, NULL))) goto fail; - if (!(__nq2 = (*env)->GetPrimitiveArrayCritical(env, q2, NULL))) goto fail; - if (!(__nindx = (*env)->GetPrimitiveArrayCritical(env, indx, NULL))) goto fail; - if (!(__nctot = (*env)->GetPrimitiveArrayCritical(env, ctot, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__nd = NULL; + float *__nq = NULL; + float *__ndlamda = NULL; + float *__nq2 = NULL; + int *__nindx = NULL; + int *__nctot = NULL; + float *__nw = NULL; + float *__ns = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__ndlamda = (*env)->GetPrimitiveArrayCritical(env, dlamda, NULL))) { __failed = TRUE; goto done; } + if (!(__nq2 = (*env)->GetPrimitiveArrayCritical(env, q2, NULL))) { __failed = TRUE; goto done; } + if (!(__nindx = (*env)->GetPrimitiveArrayCritical(env, indx, NULL))) { __failed = TRUE; goto done; } + if (!(__nctot = (*env)->GetPrimitiveArrayCritical(env, ctot, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } slaed3_(&k, &n, &n1, __nd + offsetd, __nq + offsetq, &ldq, &rho, __ndlamda + offsetdlamda, __nq2 + offsetq2, __nindx + offsetindx, __nctot + offsetctot, __nw + offsetw, __ns + offsets, &__ninfo); done: - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nctot) (*env)->ReleasePrimitiveArrayCritical(env, ctot, __nctot, failed ? JNI_ABORT : 0); - if (__nindx) (*env)->ReleasePrimitiveArrayCritical(env, indx, __nindx, failed ? JNI_ABORT : 0); - if (__nq2) (*env)->ReleasePrimitiveArrayCritical(env, q2, __nq2, failed ? JNI_ABORT : 0); - if (__ndlamda) (*env)->ReleasePrimitiveArrayCritical(env, dlamda, __ndlamda, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nctot) (*env)->ReleasePrimitiveArrayCritical(env, ctot, __nctot, __failed ? JNI_ABORT : 0); + if (__nindx) (*env)->ReleasePrimitiveArrayCritical(env, indx, __nindx, __failed ? JNI_ABORT : 0); + if (__nq2) (*env)->ReleasePrimitiveArrayCritical(env, q2, __nq2, __failed ? JNI_ABORT : 0); + if (__ndlamda) (*env)->ReleasePrimitiveArrayCritical(env, dlamda, __ndlamda, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaed4_)(int *n, int *i, float *d, float *z, float *delta, float *rho, float *dlam, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed4K(JNIEnv *env, UNUSED jobject obj, jint n, jint i, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloatArray delta, jint offsetdelta, jfloat rho, jobject dlam, jobject info) { - jboolean failed = FALSE; - float __ndlam = 0; int __ninfo = 0; float *__nd = NULL; float *__nz = NULL; float *__ndelta = NULL; + jboolean __failed = FALSE; + float __ndlam = 0; + int __ninfo = 0; + float *__nd = NULL; + float *__nz = NULL; + float *__ndelta = NULL; __ndlam = (*env)->GetFloatField(env, dlam, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__ndelta = (*env)->GetPrimitiveArrayCritical(env, delta, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__ndelta = (*env)->GetPrimitiveArrayCritical(env, delta, NULL))) { __failed = TRUE; goto done; } slaed4_(&n, &i, __nd + offsetd, __nz + offsetz, __ndelta + offsetdelta, &rho, &__ndlam, &__ninfo); done: - if (__ndelta) (*env)->ReleasePrimitiveArrayCritical(env, delta, __ndelta, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, dlam, floatW_val_fieldID, __ndlam); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ndelta) (*env)->ReleasePrimitiveArrayCritical(env, delta, __ndelta, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, dlam, floatW_val_fieldID, __ndlam); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaed5_)(int *i, float *d, float *z, float *delta, float *rho, float *dlam); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed5K(JNIEnv *env, UNUSED jobject obj, jint i, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloatArray delta, jint offsetdelta, jfloat rho, jobject dlam) { - jboolean failed = FALSE; - float __ndlam = 0; float *__nd = NULL; float *__nz = NULL; float *__ndelta = NULL; + jboolean __failed = FALSE; + float __ndlam = 0; + float *__nd = NULL; + float *__nz = NULL; + float *__ndelta = NULL; __ndlam = (*env)->GetFloatField(env, dlam, floatW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__ndelta = (*env)->GetPrimitiveArrayCritical(env, delta, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__ndelta = (*env)->GetPrimitiveArrayCritical(env, delta, NULL))) { __failed = TRUE; goto done; } slaed5_(&i, __nd + offsetd, __nz + offsetz, __ndelta + offsetdelta, &rho, &__ndlam); done: - if (__ndelta) (*env)->ReleasePrimitiveArrayCritical(env, delta, __ndelta, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetFloatField(env, dlam, floatW_val_fieldID, __ndlam); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ndelta) (*env)->ReleasePrimitiveArrayCritical(env, delta, __ndelta, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetFloatField(env, dlam, floatW_val_fieldID, __ndlam); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaed6_)(int *kniter, int *orgati, float *rho, float *d, float *z, float *finit, float *tau, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed6K(JNIEnv *env, UNUSED jobject obj, jint kniter, jboolean orgati, jfloat rho, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloat finit, jobject tau, jobject info) { - jboolean failed = FALSE; - int __norgati; float __ntau = 0; int __ninfo = 0; float *__nd = NULL; float *__nz = NULL; + jboolean __failed = FALSE; + int __norgati; + float __ntau = 0; + int __ninfo = 0; + float *__nd = NULL; + float *__nz = NULL; __norgati = orgati; __ntau = (*env)->GetFloatField(env, tau, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } slaed6_(&kniter, &__norgati, &rho, __nd + offsetd, __nz + offsetz, &finit, &__ntau, &__ninfo); done: - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, tau, floatW_val_fieldID, __ntau); - if (!failed) orgati = __norgati; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, tau, floatW_val_fieldID, __ntau); + if (!__failed) orgati = __norgati; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaed7_)(int *icompq, int *n, int *qsiz, int *tlvls, int *curlvl, int *curpbm, float *d, float *q, int *ldq, int *indxq, float *rho, int *cutpnt, float *qstore, int *qptr, int *prmptr, int *perm, int *givptr, int *givcol, float *givnum, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed7K(JNIEnv *env, UNUSED jobject obj, jint icompq, jint n, jint qsiz, jint tlvls, jint curlvl, jint curpbm, jfloatArray d, jint offsetd, jfloatArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jint cutpnt, jfloatArray qstore, jint offsetqstore, jintArray qptr, jint offsetqptr, jintArray prmptr, jint offsetprmptr, jintArray perm, jint offsetperm, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jfloatArray givnum, jint offsetgivnum, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - float __nrho = 0; int __ninfo = 0; float *__nd = NULL; float *__nq = NULL; int *__nindxq = NULL; float *__nqstore = NULL; int *__nqptr = NULL; int *__nprmptr = NULL; int *__nperm = NULL; int *__ngivptr = NULL; int *__ngivcol = NULL; float *__ngivnum = NULL; float *__nwork = NULL; int *__niwork = NULL; + jboolean __failed = FALSE; + float __nrho = 0; + int __ninfo = 0; + float *__nd = NULL; + float *__nq = NULL; + int *__nindxq = NULL; + float *__nqstore = NULL; + int *__nqptr = NULL; + int *__nprmptr = NULL; + int *__nperm = NULL; + int *__ngivptr = NULL; + int *__ngivcol = NULL; + float *__ngivnum = NULL; + float *__nwork = NULL; + int *__niwork = NULL; __nrho = (*env)->GetFloatField(env, rho, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nindxq = (*env)->GetPrimitiveArrayCritical(env, indxq, NULL))) goto fail; - if (!(__nqstore = (*env)->GetPrimitiveArrayCritical(env, qstore, NULL))) goto fail; - if (!(__nqptr = (*env)->GetPrimitiveArrayCritical(env, qptr, NULL))) goto fail; - if (!(__nprmptr = (*env)->GetPrimitiveArrayCritical(env, prmptr, NULL))) goto fail; - if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; - if (!(__ngivptr = (*env)->GetPrimitiveArrayCritical(env, givptr, NULL))) goto fail; - if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; - if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nindxq = (*env)->GetPrimitiveArrayCritical(env, indxq, NULL))) { __failed = TRUE; goto done; } + if (!(__nqstore = (*env)->GetPrimitiveArrayCritical(env, qstore, NULL))) { __failed = TRUE; goto done; } + if (!(__nqptr = (*env)->GetPrimitiveArrayCritical(env, qptr, NULL))) { __failed = TRUE; goto done; } + if (!(__nprmptr = (*env)->GetPrimitiveArrayCritical(env, prmptr, NULL))) { __failed = TRUE; goto done; } + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivptr = (*env)->GetPrimitiveArrayCritical(env, givptr, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } slaed7_(&icompq, &n, &qsiz, &tlvls, &curlvl, &curpbm, __nd + offsetd, __nq + offsetq, &ldq, __nindxq + offsetindxq, &__nrho, &cutpnt, __nqstore + offsetqstore, __nqptr + offsetqptr, __nprmptr + offsetprmptr, __nperm + offsetperm, __ngivptr + offsetgivptr, __ngivcol + offsetgivcol, __ngivnum + offsetgivnum, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); - if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); - if (__ngivptr) (*env)->ReleasePrimitiveArrayCritical(env, givptr, __ngivptr, failed ? JNI_ABORT : 0); - if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); - if (__nprmptr) (*env)->ReleasePrimitiveArrayCritical(env, prmptr, __nprmptr, failed ? JNI_ABORT : 0); - if (__nqptr) (*env)->ReleasePrimitiveArrayCritical(env, qptr, __nqptr, failed ? JNI_ABORT : 0); - if (__nqstore) (*env)->ReleasePrimitiveArrayCritical(env, qstore, __nqstore, failed ? JNI_ABORT : 0); - if (__nindxq) (*env)->ReleasePrimitiveArrayCritical(env, indxq, __nindxq, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, rho, floatW_val_fieldID, __nrho); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, __failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, __failed ? JNI_ABORT : 0); + if (__ngivptr) (*env)->ReleasePrimitiveArrayCritical(env, givptr, __ngivptr, __failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, __failed ? JNI_ABORT : 0); + if (__nprmptr) (*env)->ReleasePrimitiveArrayCritical(env, prmptr, __nprmptr, __failed ? JNI_ABORT : 0); + if (__nqptr) (*env)->ReleasePrimitiveArrayCritical(env, qptr, __nqptr, __failed ? JNI_ABORT : 0); + if (__nqstore) (*env)->ReleasePrimitiveArrayCritical(env, qstore, __nqstore, __failed ? JNI_ABORT : 0); + if (__nindxq) (*env)->ReleasePrimitiveArrayCritical(env, indxq, __nindxq, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, rho, floatW_val_fieldID, __nrho); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaed8_)(int *icompq, int *k, int *n, int *qsiz, float *d, float *q, int *ldq, int *indxq, float *rho, int *cutpnt, float *z, float *dlamda, float *q2, int *ldq2, float *w, int *perm, int *givptr, int *givcol, float *givnum, int *indxp, int *indx, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed8K(JNIEnv *env, UNUSED jobject obj, jint icompq, jobject k, jint n, jint qsiz, jfloatArray d, jint offsetd, jfloatArray q, jint offsetq, jint ldq, jintArray indxq, jint offsetindxq, jobject rho, jint cutpnt, jfloatArray z, jint offsetz, jfloatArray dlamda, jint offsetdlamda, jfloatArray q2, jint offsetq2, jint ldq2, jfloatArray w, jint offsetw, jintArray perm, jint offsetperm, jobject givptr, jintArray givcol, jint offsetgivcol, jfloatArray givnum, jint offsetgivnum, jintArray indxp, jint offsetindxp, jintArray indx, jint offsetindx, jobject info) { - jboolean failed = FALSE; - int __nk = 0; float __nrho = 0; int __ngivptr = 0; int __ninfo = 0; float *__nd = NULL; float *__nq = NULL; int *__nindxq = NULL; float *__nz = NULL; float *__ndlamda = NULL; float *__nq2 = NULL; float *__nw = NULL; int *__nperm = NULL; int *__ngivcol = NULL; float *__ngivnum = NULL; int *__nindxp = NULL; int *__nindx = NULL; + jboolean __failed = FALSE; + int __nk = 0; + float __nrho = 0; + int __ngivptr = 0; + int __ninfo = 0; + float *__nd = NULL; + float *__nq = NULL; + int *__nindxq = NULL; + float *__nz = NULL; + float *__ndlamda = NULL; + float *__nq2 = NULL; + float *__nw = NULL; + int *__nperm = NULL; + int *__ngivcol = NULL; + float *__ngivnum = NULL; + int *__nindxp = NULL; + int *__nindx = NULL; __nk = (*env)->GetIntField(env, k, intW_val_fieldID); __nrho = (*env)->GetFloatField(env, rho, floatW_val_fieldID); __ngivptr = (*env)->GetIntField(env, givptr, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nindxq = (*env)->GetPrimitiveArrayCritical(env, indxq, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__ndlamda = (*env)->GetPrimitiveArrayCritical(env, dlamda, NULL))) goto fail; - if (!(__nq2 = (*env)->GetPrimitiveArrayCritical(env, q2, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; - if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; - if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; - if (!(__nindxp = (*env)->GetPrimitiveArrayCritical(env, indxp, NULL))) goto fail; - if (!(__nindx = (*env)->GetPrimitiveArrayCritical(env, indx, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nindxq = (*env)->GetPrimitiveArrayCritical(env, indxq, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__ndlamda = (*env)->GetPrimitiveArrayCritical(env, dlamda, NULL))) { __failed = TRUE; goto done; } + if (!(__nq2 = (*env)->GetPrimitiveArrayCritical(env, q2, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) { __failed = TRUE; goto done; } + if (!(__nindxp = (*env)->GetPrimitiveArrayCritical(env, indxp, NULL))) { __failed = TRUE; goto done; } + if (!(__nindx = (*env)->GetPrimitiveArrayCritical(env, indx, NULL))) { __failed = TRUE; goto done; } slaed8_(&icompq, &__nk, &n, &qsiz, __nd + offsetd, __nq + offsetq, &ldq, __nindxq + offsetindxq, &__nrho, &cutpnt, __nz + offsetz, __ndlamda + offsetdlamda, __nq2 + offsetq2, &ldq2, __nw + offsetw, __nperm + offsetperm, &__ngivptr, __ngivcol + offsetgivcol, __ngivnum + offsetgivnum, __nindxp + offsetindxp, __nindx + offsetindx, &__ninfo); done: - if (__nindx) (*env)->ReleasePrimitiveArrayCritical(env, indx, __nindx, failed ? JNI_ABORT : 0); - if (__nindxp) (*env)->ReleasePrimitiveArrayCritical(env, indxp, __nindxp, failed ? JNI_ABORT : 0); - if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); - if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); - if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nq2) (*env)->ReleasePrimitiveArrayCritical(env, q2, __nq2, failed ? JNI_ABORT : 0); - if (__ndlamda) (*env)->ReleasePrimitiveArrayCritical(env, dlamda, __ndlamda, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nindxq) (*env)->ReleasePrimitiveArrayCritical(env, indxq, __nindxq, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, givptr, intW_val_fieldID, __ngivptr); - if (!failed) (*env)->SetFloatField(env, rho, floatW_val_fieldID, __nrho); - if (!failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nindx) (*env)->ReleasePrimitiveArrayCritical(env, indx, __nindx, __failed ? JNI_ABORT : 0); + if (__nindxp) (*env)->ReleasePrimitiveArrayCritical(env, indxp, __nindxp, __failed ? JNI_ABORT : 0); + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, __failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, __failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nq2) (*env)->ReleasePrimitiveArrayCritical(env, q2, __nq2, __failed ? JNI_ABORT : 0); + if (__ndlamda) (*env)->ReleasePrimitiveArrayCritical(env, dlamda, __ndlamda, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nindxq) (*env)->ReleasePrimitiveArrayCritical(env, indxq, __nindxq, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, givptr, intW_val_fieldID, __ngivptr); + if (!__failed) (*env)->SetFloatField(env, rho, floatW_val_fieldID, __nrho); + if (!__failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaed9_)(int *k, int *kstart, int *kstop, int *n, float *d, float *q, int *ldq, float *rho, float *dlamda, float *w, float *s, int *lds, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaed9K(JNIEnv *env, UNUSED jobject obj, jint k, jint kstart, jint kstop, jint n, jfloatArray d, jint offsetd, jfloatArray q, jint offsetq, jint ldq, jfloat rho, jfloatArray dlamda, jint offsetdlamda, jfloatArray w, jint offsetw, jfloatArray s, jint offsets, jint lds, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__nd = NULL; float *__nq = NULL; float *__ndlamda = NULL; float *__nw = NULL; float *__ns = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__ndlamda = (*env)->GetPrimitiveArrayCritical(env, dlamda, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__nd = NULL; + float *__nq = NULL; + float *__ndlamda = NULL; + float *__nw = NULL; + float *__ns = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__ndlamda = (*env)->GetPrimitiveArrayCritical(env, dlamda, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } slaed9_(&k, &kstart, &kstop, &n, __nd + offsetd, __nq + offsetq, &ldq, &rho, __ndlamda + offsetdlamda, __nw + offsetw, __ns + offsets, &lds, &__ninfo); done: - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__ndlamda) (*env)->ReleasePrimitiveArrayCritical(env, dlamda, __ndlamda, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__ndlamda) (*env)->ReleasePrimitiveArrayCritical(env, dlamda, __ndlamda, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaeda_)(int *n, int *tlvls, int *curlvl, int *curpbm, int *prmptr, int *perm, int *givptr, int *givcol, float *givnum, float *q, int *qptr, float *z, float *ztemp, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaedaK(JNIEnv *env, UNUSED jobject obj, jint n, jint tlvls, jint curlvl, jint curpbm, jintArray prmptr, jint offsetprmptr, jintArray perm, jint offsetperm, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jfloatArray givnum, jint offsetgivnum, jfloatArray q, jint offsetq, jintArray qptr, jint offsetqptr, jfloatArray z, jint offsetz, jfloatArray ztemp, jint offsetztemp, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; int *__nprmptr = NULL; int *__nperm = NULL; int *__ngivptr = NULL; int *__ngivcol = NULL; float *__ngivnum = NULL; float *__nq = NULL; int *__nqptr = NULL; float *__nz = NULL; float *__nztemp = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nprmptr = (*env)->GetPrimitiveArrayCritical(env, prmptr, NULL))) goto fail; - if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; - if (!(__ngivptr = (*env)->GetPrimitiveArrayCritical(env, givptr, NULL))) goto fail; - if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; - if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nqptr = (*env)->GetPrimitiveArrayCritical(env, qptr, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nztemp = (*env)->GetPrimitiveArrayCritical(env, ztemp, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + int *__nprmptr = NULL; + int *__nperm = NULL; + int *__ngivptr = NULL; + int *__ngivcol = NULL; + float *__ngivnum = NULL; + float *__nq = NULL; + int *__nqptr = NULL; + float *__nz = NULL; + float *__nztemp = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nprmptr = (*env)->GetPrimitiveArrayCritical(env, prmptr, NULL))) { __failed = TRUE; goto done; } + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivptr = (*env)->GetPrimitiveArrayCritical(env, givptr, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nqptr = (*env)->GetPrimitiveArrayCritical(env, qptr, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nztemp = (*env)->GetPrimitiveArrayCritical(env, ztemp, NULL))) { __failed = TRUE; goto done; } slaeda_(&n, &tlvls, &curlvl, &curpbm, __nprmptr + offsetprmptr, __nperm + offsetperm, __ngivptr + offsetgivptr, __ngivcol + offsetgivcol, __ngivnum + offsetgivnum, __nq + offsetq, __nqptr + offsetqptr, __nz + offsetz, __nztemp + offsetztemp, &__ninfo); done: - if (__nztemp) (*env)->ReleasePrimitiveArrayCritical(env, ztemp, __nztemp, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nqptr) (*env)->ReleasePrimitiveArrayCritical(env, qptr, __nqptr, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); - if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); - if (__ngivptr) (*env)->ReleasePrimitiveArrayCritical(env, givptr, __ngivptr, failed ? JNI_ABORT : 0); - if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); - if (__nprmptr) (*env)->ReleasePrimitiveArrayCritical(env, prmptr, __nprmptr, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nztemp) (*env)->ReleasePrimitiveArrayCritical(env, ztemp, __nztemp, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nqptr) (*env)->ReleasePrimitiveArrayCritical(env, qptr, __nqptr, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, __failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, __failed ? JNI_ABORT : 0); + if (__ngivptr) (*env)->ReleasePrimitiveArrayCritical(env, givptr, __ngivptr, __failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, __failed ? JNI_ABORT : 0); + if (__nprmptr) (*env)->ReleasePrimitiveArrayCritical(env, prmptr, __nprmptr, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaein_)(int *rightv, int *noinit, int *n, float *h, int *ldh, float *wr, float *wi, float *vr, float *vi, float *b, int *ldb, float *work, float *eps3, float *smlnum, float *bignum, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaeinK(JNIEnv *env, UNUSED jobject obj, jboolean rightv, jboolean noinit, jint n, jfloatArray h, jint offseth, jint ldh, jfloat wr, jfloat wi, jfloatArray vr, jint offsetvr, jfloatArray vi, jint offsetvi, jfloatArray b, jint offsetb, jint ldb, jfloatArray work, jint offsetwork, jfloat eps3, jfloat smlnum, jfloat bignum, jobject info) { - jboolean failed = FALSE; - int __nrightv; int __nnoinit; int __ninfo = 0; float *__nh = NULL; float *__nvr = NULL; float *__nvi = NULL; float *__nb = NULL; float *__nwork = NULL; + jboolean __failed = FALSE; + int __nrightv; + int __nnoinit; + int __ninfo = 0; + float *__nh = NULL; + float *__nvr = NULL; + float *__nvi = NULL; + float *__nb = NULL; + float *__nwork = NULL; __nrightv = rightv; __nnoinit = noinit; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; - if (!(__nvi = (*env)->GetPrimitiveArrayCritical(env, vi, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) { __failed = TRUE; goto done; } + if (!(__nvi = (*env)->GetPrimitiveArrayCritical(env, vi, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } slaein_(&__nrightv, &__nnoinit, &n, __nh + offseth, &ldh, &wr, &wi, __nvr + offsetvr, __nvi + offsetvi, __nb + offsetb, &ldb, __nwork + offsetwork, &eps3, &smlnum, &bignum, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nvi) (*env)->ReleasePrimitiveArrayCritical(env, vi, __nvi, failed ? JNI_ABORT : 0); - if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) noinit = __nnoinit; - if (!failed) rightv = __nrightv; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nvi) (*env)->ReleasePrimitiveArrayCritical(env, vi, __nvi, __failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) noinit = __nnoinit; + if (!__failed) rightv = __nrightv; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaev2_)(float *a, float *b, float *c, float *rt1, float *rt2, float *cs1, float *sn1); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaev2K(JNIEnv *env, UNUSED jobject obj, jfloat a, jfloat b, jfloat c, jobject rt1, jobject rt2, jobject cs1, jobject sn1) { - jboolean failed = FALSE; - float __nrt1 = 0; float __nrt2 = 0; float __ncs1 = 0; float __nsn1 = 0; + jboolean __failed = FALSE; + float __nrt1 = 0; + float __nrt2 = 0; + float __ncs1 = 0; + float __nsn1 = 0; __nrt1 = (*env)->GetFloatField(env, rt1, floatW_val_fieldID); __nrt2 = (*env)->GetFloatField(env, rt2, floatW_val_fieldID); __ncs1 = (*env)->GetFloatField(env, cs1, floatW_val_fieldID); __nsn1 = (*env)->GetFloatField(env, sn1, floatW_val_fieldID); slaev2_(&a, &b, &c, &__nrt1, &__nrt2, &__ncs1, &__nsn1); done: - if (!failed) (*env)->SetFloatField(env, sn1, floatW_val_fieldID, __nsn1); - if (!failed) (*env)->SetFloatField(env, cs1, floatW_val_fieldID, __ncs1); - if (!failed) (*env)->SetFloatField(env, rt2, floatW_val_fieldID, __nrt2); - if (!failed) (*env)->SetFloatField(env, rt1, floatW_val_fieldID, __nrt1); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetFloatField(env, sn1, floatW_val_fieldID, __nsn1); + if (!__failed) (*env)->SetFloatField(env, cs1, floatW_val_fieldID, __ncs1); + if (!__failed) (*env)->SetFloatField(env, rt2, floatW_val_fieldID, __nrt2); + if (!__failed) (*env)->SetFloatField(env, rt1, floatW_val_fieldID, __nrt1); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaexc_)(int *wantq, int *n, float *t, int *ldt, float *q, int *ldq, int *j1, int *n1, int *n2, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaexcK(JNIEnv *env, UNUSED jobject obj, jboolean wantq, jint n, jfloatArray t, jint offsett, jint ldt, jfloatArray q, jint offsetq, jint ldq, jint j1, jint n1, jint n2, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __nwantq; int __ninfo = 0; float *__nt = NULL; float *__nq = NULL; float *__nwork = NULL; + jboolean __failed = FALSE; + int __nwantq; + int __ninfo = 0; + float *__nt = NULL; + float *__nq = NULL; + float *__nwork = NULL; __nwantq = wantq; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } slaexc_(&__nwantq, &n, __nt + offsett, &ldt, __nq + offsetq, &ldq, &j1, &n1, &n2, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) wantq = __nwantq; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) wantq = __nwantq; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slag2_)(float *a, int *lda, float *b, int *ldb, float *safmin, float *scale1, float *scale2, float *wr1, float *wr2, float *wi); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slag2K(JNIEnv *env, UNUSED jobject obj, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat safmin, jobject scale1, jobject scale2, jobject wr1, jobject wr2, jobject wi) { - jboolean failed = FALSE; - float __nscale1 = 0; float __nscale2 = 0; float __nwr1 = 0; float __nwr2 = 0; float __nwi = 0; float *__na = NULL; float *__nb = NULL; + jboolean __failed = FALSE; + float __nscale1 = 0; + float __nscale2 = 0; + float __nwr1 = 0; + float __nwr2 = 0; + float __nwi = 0; + float *__na = NULL; + float *__nb = NULL; __nscale1 = (*env)->GetFloatField(env, scale1, floatW_val_fieldID); __nscale2 = (*env)->GetFloatField(env, scale2, floatW_val_fieldID); __nwr1 = (*env)->GetFloatField(env, wr1, floatW_val_fieldID); __nwr2 = (*env)->GetFloatField(env, wr2, floatW_val_fieldID); __nwi = (*env)->GetFloatField(env, wi, floatW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } slag2_(__na + offseta, &lda, __nb + offsetb, &ldb, &safmin, &__nscale1, &__nscale2, &__nwr1, &__nwr2, &__nwi); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetFloatField(env, wi, floatW_val_fieldID, __nwi); - if (!failed) (*env)->SetFloatField(env, wr2, floatW_val_fieldID, __nwr2); - if (!failed) (*env)->SetFloatField(env, wr1, floatW_val_fieldID, __nwr1); - if (!failed) (*env)->SetFloatField(env, scale2, floatW_val_fieldID, __nscale2); - if (!failed) (*env)->SetFloatField(env, scale1, floatW_val_fieldID, __nscale1); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetFloatField(env, wi, floatW_val_fieldID, __nwi); + if (!__failed) (*env)->SetFloatField(env, wr2, floatW_val_fieldID, __nwr2); + if (!__failed) (*env)->SetFloatField(env, wr1, floatW_val_fieldID, __nwr1); + if (!__failed) (*env)->SetFloatField(env, scale2, floatW_val_fieldID, __nscale2); + if (!__failed) (*env)->SetFloatField(env, scale1, floatW_val_fieldID, __nscale1); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slag2d_)(int *m, int *n, float *sa, int *ldsa, double *a, int *lda, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slag2dK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray sa, jint offsetsa, jint ldsa, jdoubleArray a, jint offseta, jint lda, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__nsa = NULL; double *__na = NULL; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__nsa = NULL; + double *__na = NULL; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nsa = (*env)->GetPrimitiveArrayCritical(env, sa, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nsa = (*env)->GetPrimitiveArrayCritical(env, sa, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } slag2d_(&m, &n, __nsa + offsetsa, &ldsa, __na + offseta, &lda, &__ninfo); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (__nsa) (*env)->ReleasePrimitiveArrayCritical(env, sa, __nsa, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (__nsa) (*env)->ReleasePrimitiveArrayCritical(env, sa, __nsa, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slags2_)(int *upper, float *a1, float *a2, float *a3, float *b1, float *b2, float *b3, float *csu, float *snu, float *csv, float *snv, float *csq, float *snq); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slags2K(JNIEnv *env, UNUSED jobject obj, jboolean upper, jfloat a1, jfloat a2, jfloat a3, jfloat b1, jfloat b2, jfloat b3, jobject csu, jobject snu, jobject csv, jobject snv, jobject csq, jobject snq) { - jboolean failed = FALSE; - int __nupper; float __ncsu = 0; float __nsnu = 0; float __ncsv = 0; float __nsnv = 0; float __ncsq = 0; float __nsnq = 0; + jboolean __failed = FALSE; + int __nupper; + float __ncsu = 0; + float __nsnu = 0; + float __ncsv = 0; + float __nsnv = 0; + float __ncsq = 0; + float __nsnq = 0; __nupper = upper; __ncsu = (*env)->GetFloatField(env, csu, floatW_val_fieldID); __nsnu = (*env)->GetFloatField(env, snu, floatW_val_fieldID); @@ -12605,684 +13568,710 @@ void Java_dev_ludovic_netlib_lapack_JNILAPACK_slags2K(JNIEnv *env, UNUSED jobjec __nsnq = (*env)->GetFloatField(env, snq, floatW_val_fieldID); slags2_(&__nupper, &a1, &a2, &a3, &b1, &b2, &b3, &__ncsu, &__nsnu, &__ncsv, &__nsnv, &__ncsq, &__nsnq); done: - if (!failed) (*env)->SetFloatField(env, snq, floatW_val_fieldID, __nsnq); - if (!failed) (*env)->SetFloatField(env, csq, floatW_val_fieldID, __ncsq); - if (!failed) (*env)->SetFloatField(env, snv, floatW_val_fieldID, __nsnv); - if (!failed) (*env)->SetFloatField(env, csv, floatW_val_fieldID, __ncsv); - if (!failed) (*env)->SetFloatField(env, snu, floatW_val_fieldID, __nsnu); - if (!failed) (*env)->SetFloatField(env, csu, floatW_val_fieldID, __ncsu); - if (!failed) upper = __nupper; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetFloatField(env, snq, floatW_val_fieldID, __nsnq); + if (!__failed) (*env)->SetFloatField(env, csq, floatW_val_fieldID, __ncsq); + if (!__failed) (*env)->SetFloatField(env, snv, floatW_val_fieldID, __nsnv); + if (!__failed) (*env)->SetFloatField(env, csv, floatW_val_fieldID, __ncsv); + if (!__failed) (*env)->SetFloatField(env, snu, floatW_val_fieldID, __nsnu); + if (!__failed) (*env)->SetFloatField(env, csu, floatW_val_fieldID, __ncsu); + if (!__failed) upper = __nupper; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slagtf_)(int *n, float *a, float *lambda, float *b, float *c, float *tol, float *d, int *in, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slagtfK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray a, jint offseta, jfloat lambda, jfloatArray b, jint offsetb, jfloatArray c, jint offsetc, jfloat tol, jfloatArray d, jint offsetd, jintArray in, jint offsetin, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nc = NULL; float *__nd = NULL; int *__nin = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nin = (*env)->GetPrimitiveArrayCritical(env, in, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + float *__nc = NULL; + float *__nd = NULL; + int *__nin = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nin = (*env)->GetPrimitiveArrayCritical(env, in, NULL))) { __failed = TRUE; goto done; } slagtf_(&n, __na + offseta, &lambda, __nb + offsetb, __nc + offsetc, &tol, __nd + offsetd, __nin + offsetin, &__ninfo); done: - if (__nin) (*env)->ReleasePrimitiveArrayCritical(env, in, __nin, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nin) (*env)->ReleasePrimitiveArrayCritical(env, in, __nin, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slagtm_)(const char *trans, int *n, int *nrhs, float *alpha, float *dl, float *d, float *du, float *x, int *ldx, float *beta, float *b, int *ldb); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slagtmK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint n, jint nrhs, jfloat alpha, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu, jfloatArray x, jint offsetx, jint ldx, jfloat beta, jfloatArray b, jint offsetb, jint ldb) { - jboolean failed = FALSE; - const char *__ntrans = NULL; float *__ndl = NULL; float *__nd = NULL; float *__ndu = NULL; float *__nx = NULL; float *__nb = NULL; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ntrans = NULL; + float *__ndl = NULL; + float *__nd = NULL; + float *__ndu = NULL; + float *__nx = NULL; + float *__nb = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } slagtm_(__ntrans, &n, &nrhs, &alpha, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu, __nx + offsetx, &ldx, &beta, __nb + offsetb, &ldb); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, __failed ? JNI_ABORT : 0); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slagts_)(int *job, int *n, float *a, float *b, float *c, float *d, int *in, float *y, float *tol, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slagtsK(JNIEnv *env, UNUSED jobject obj, jint job, jint n, jfloatArray a, jint offseta, jfloatArray b, jint offsetb, jfloatArray c, jint offsetc, jfloatArray d, jint offsetd, jintArray in, jint offsetin, jfloatArray y, jint offsety, jobject tol, jobject info) { - jboolean failed = FALSE; - float __ntol = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nc = NULL; float *__nd = NULL; int *__nin = NULL; float *__ny = NULL; + jboolean __failed = FALSE; + float __ntol = 0; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + float *__nc = NULL; + float *__nd = NULL; + int *__nin = NULL; + float *__ny = NULL; __ntol = (*env)->GetFloatField(env, tol, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nin = (*env)->GetPrimitiveArrayCritical(env, in, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nin = (*env)->GetPrimitiveArrayCritical(env, in, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } slagts_(&job, &n, __na + offseta, __nb + offsetb, __nc + offsetc, __nd + offsetd, __nin + offsetin, __ny + offsety, &__ntol, &__ninfo); done: - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); - if (__nin) (*env)->ReleasePrimitiveArrayCritical(env, in, __nin, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, tol, floatW_val_fieldID, __ntol); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); + if (__nin) (*env)->ReleasePrimitiveArrayCritical(env, in, __nin, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, tol, floatW_val_fieldID, __ntol); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slagv2_)(float *a, int *lda, float *b, int *ldb, float *alphar, float *alphai, float *beta, float *csl, float *snl, float *csr, float *snr); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slagv2K(JNIEnv *env, UNUSED jobject obj, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jobject csl, jobject snl, jobject csr, jobject snr) { - jboolean failed = FALSE; - float __ncsl = 0; float __nsnl = 0; float __ncsr = 0; float __nsnr = 0; float *__na = NULL; float *__nb = NULL; float *__nalphar = NULL; float *__nalphai = NULL; float *__nbeta = NULL; + jboolean __failed = FALSE; + float __ncsl = 0; + float __nsnl = 0; + float __ncsr = 0; + float __nsnr = 0; + float *__na = NULL; + float *__nb = NULL; + float *__nalphar = NULL; + float *__nalphai = NULL; + float *__nbeta = NULL; __ncsl = (*env)->GetFloatField(env, csl, floatW_val_fieldID); __nsnl = (*env)->GetFloatField(env, snl, floatW_val_fieldID); __ncsr = (*env)->GetFloatField(env, csr, floatW_val_fieldID); __nsnr = (*env)->GetFloatField(env, snr, floatW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) goto fail; - if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) goto fail; - if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) { __failed = TRUE; goto done; } + if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) { __failed = TRUE; goto done; } + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) { __failed = TRUE; goto done; } slagv2_(__na + offseta, &lda, __nb + offsetb, &ldb, __nalphar + offsetalphar, __nalphai + offsetalphai, __nbeta + offsetbeta, &__ncsl, &__nsnl, &__ncsr, &__nsnr); done: - if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); - if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, failed ? JNI_ABORT : 0); - if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetFloatField(env, snr, floatW_val_fieldID, __nsnr); - if (!failed) (*env)->SetFloatField(env, csr, floatW_val_fieldID, __ncsr); - if (!failed) (*env)->SetFloatField(env, snl, floatW_val_fieldID, __nsnl); - if (!failed) (*env)->SetFloatField(env, csl, floatW_val_fieldID, __ncsl); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, __failed ? JNI_ABORT : 0); + if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, __failed ? JNI_ABORT : 0); + if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetFloatField(env, snr, floatW_val_fieldID, __nsnr); + if (!__failed) (*env)->SetFloatField(env, csr, floatW_val_fieldID, __ncsr); + if (!__failed) (*env)->SetFloatField(env, snl, floatW_val_fieldID, __nsnl); + if (!__failed) (*env)->SetFloatField(env, csl, floatW_val_fieldID, __ncsl); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slahqr_)(int *wantt, int *wantz, int *n, int *ilo, int *ihi, float *h, int *ldh, float *wr, float *wi, int *iloz, int *ihiz, float *z, int *ldz, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slahqrK(JNIEnv *env, UNUSED jobject obj, jboolean wantt, jboolean wantz, jint n, jint ilo, jint ihi, jfloatArray h, jint offseth, jint ldh, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jint iloz, jint ihiz, jfloatArray z, jint offsetz, jint ldz, jobject info) { - jboolean failed = FALSE; - int __nwantt; int __nwantz; int __ninfo = 0; float *__nh = NULL; float *__nwr = NULL; float *__nwi = NULL; float *__nz = NULL; + jboolean __failed = FALSE; + int __nwantt; + int __nwantz; + int __ninfo = 0; + float *__nh = NULL; + float *__nwr = NULL; + float *__nwi = NULL; + float *__nz = NULL; __nwantt = wantt; __nwantz = wantz; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; - if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } slahqr_(&__nwantt, &__nwantz, &n, &ilo, &ihi, __nh + offseth, &ldh, __nwr + offsetwr, __nwi + offsetwi, &iloz, &ihiz, __nz + offsetz, &ldz, &__ninfo); done: - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); - if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) wantz = __nwantz; - if (!failed) wantt = __nwantt; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, __failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) wantz = __nwantz; + if (!__failed) wantt = __nwantt; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slahr2_)(int *n, int *k, int *nb, float *a, int *lda, float *tau, float *t, int *ldt, float *y, int *ldy); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slahr2K(JNIEnv *env, UNUSED jobject obj, jint n, jint k, jint nb, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray t, jint offsett, jint ldt, jfloatArray y, jint offsety, jint ldy) { - jboolean failed = FALSE; - float *__na = NULL; float *__ntau = NULL; float *__nt = NULL; float *__ny = NULL; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + jboolean __failed = FALSE; + float *__na = NULL; + float *__ntau = NULL; + float *__nt = NULL; + float *__ny = NULL; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } slahr2_(&n, &k, &nb, __na + offseta, &lda, __ntau + offsettau, __nt + offsett, &ldt, __ny + offsety, &ldy); done: - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); - if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slahrd_)(int *n, int *k, int *nb, float *a, int *lda, float *tau, float *t, int *ldt, float *y, int *ldy); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slahrdK(JNIEnv *env, UNUSED jobject obj, jint n, jint k, jint nb, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray t, jint offsett, jint ldt, jfloatArray y, jint offsety, jint ldy) { - jboolean failed = FALSE; - float *__na = NULL; float *__ntau = NULL; float *__nt = NULL; float *__ny = NULL; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + jboolean __failed = FALSE; + float *__na = NULL; + float *__ntau = NULL; + float *__nt = NULL; + float *__ny = NULL; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } slahrd_(&n, &k, &nb, __na + offseta, &lda, __ntau + offsettau, __nt + offsett, &ldt, __ny + offsety, &ldy); done: - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); - if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaic1_)(int *job, int *j, float *x, float *sest, float *w, float *gamma, float *sestpr, float *s, float *c); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaic1K(JNIEnv *env, UNUSED jobject obj, jint job, jint j, jfloatArray x, jint offsetx, jfloat sest, jfloatArray w, jint offsetw, jfloat gamma, jobject sestpr, jobject s, jobject c) { - jboolean failed = FALSE; - float __nsestpr = 0; float __ns = 0; float __nc = 0; float *__nx = NULL; float *__nw = NULL; + jboolean __failed = FALSE; + float __nsestpr = 0; + float __ns = 0; + float __nc = 0; + float *__nx = NULL; + float *__nw = NULL; __nsestpr = (*env)->GetFloatField(env, sestpr, floatW_val_fieldID); __ns = (*env)->GetFloatField(env, s, floatW_val_fieldID); __nc = (*env)->GetFloatField(env, c, floatW_val_fieldID); - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } slaic1_(&job, &j, __nx + offsetx, &sest, __nw + offsetw, &gamma, &__nsestpr, &__ns, &__nc); done: - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetFloatField(env, c, floatW_val_fieldID, __nc); - if (!failed) (*env)->SetFloatField(env, s, floatW_val_fieldID, __ns); - if (!failed) (*env)->SetFloatField(env, sestpr, floatW_val_fieldID, __nsestpr); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetFloatField(env, c, floatW_val_fieldID, __nc); + if (!__failed) (*env)->SetFloatField(env, s, floatW_val_fieldID, __ns); + if (!__failed) (*env)->SetFloatField(env, sestpr, floatW_val_fieldID, __nsestpr); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static int (*slaisnan_)(float *sin1, float *sin2); jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_slaisnanK(JNIEnv *env, UNUSED jobject obj, jfloat sin1, jfloat sin2) { - jboolean __ret; - jboolean failed = FALSE; - - + jboolean __ret = 0; + jboolean __failed = FALSE; __ret = slaisnan_(&sin1, &sin2); done: - - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static void (*slaln2_)(int *ltrans, int *na, int *nw, float *smin, float *ca, float *a, int *lda, float *d1, float *d2, float *b, int *ldb, float *wr, float *wi, float *x, int *ldx, float *scale, float *xnorm, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaln2K(JNIEnv *env, UNUSED jobject obj, jboolean ltrans, jint na, jint nw, jfloat smin, jfloat ca, jfloatArray a, jint offseta, jint lda, jfloat d1, jfloat d2, jfloatArray b, jint offsetb, jint ldb, jfloat wr, jfloat wi, jfloatArray x, jint offsetx, jint ldx, jobject scale, jobject xnorm, jobject info) { - jboolean failed = FALSE; - int __nltrans; float __nscale = 0; float __nxnorm = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nx = NULL; + jboolean __failed = FALSE; + int __nltrans; + float __nscale = 0; + float __nxnorm = 0; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + float *__nx = NULL; __nltrans = ltrans; __nscale = (*env)->GetFloatField(env, scale, floatW_val_fieldID); __nxnorm = (*env)->GetFloatField(env, xnorm, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } slaln2_(&__nltrans, &na, &nw, &smin, &ca, __na + offseta, &lda, &d1, &d2, __nb + offsetb, &ldb, &wr, &wi, __nx + offsetx, &ldx, &__nscale, &__nxnorm, &__ninfo); done: - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, xnorm, floatW_val_fieldID, __nxnorm); - if (!failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); - if (!failed) ltrans = __nltrans; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, xnorm, floatW_val_fieldID, __nxnorm); + if (!__failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); + if (!__failed) ltrans = __nltrans; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slals0_)(int *icompq, int *nl, int *nr, int *sqre, int *nrhs, float *b, int *ldb, float *bx, int *ldbx, int *perm, int *givptr, int *givcol, int *ldgcol, float *givnum, int *ldgnum, float *poles, float *difl, float *difr, float *z, int *k, float *c, float *s, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slals0K(JNIEnv *env, UNUSED jobject obj, jint icompq, jint nl, jint nr, jint sqre, jint nrhs, jfloatArray b, jint offsetb, jint ldb, jfloatArray bx, jint offsetbx, jint ldbx, jintArray perm, jint offsetperm, jint givptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jfloatArray givnum, jint offsetgivnum, jint ldgnum, jfloatArray poles, jint offsetpoles, jfloatArray difl, jint offsetdifl, jfloatArray difr, jint offsetdifr, jfloatArray z, jint offsetz, jint k, jfloat c, jfloat s, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__nb = NULL; float *__nbx = NULL; int *__nperm = NULL; int *__ngivcol = NULL; float *__ngivnum = NULL; float *__npoles = NULL; float *__ndifl = NULL; float *__ndifr = NULL; float *__nz = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nbx = (*env)->GetPrimitiveArrayCritical(env, bx, NULL))) goto fail; - if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; - if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; - if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; - if (!(__npoles = (*env)->GetPrimitiveArrayCritical(env, poles, NULL))) goto fail; - if (!(__ndifl = (*env)->GetPrimitiveArrayCritical(env, difl, NULL))) goto fail; - if (!(__ndifr = (*env)->GetPrimitiveArrayCritical(env, difr, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__nb = NULL; + float *__nbx = NULL; + int *__nperm = NULL; + int *__ngivcol = NULL; + float *__ngivnum = NULL; + float *__npoles = NULL; + float *__ndifl = NULL; + float *__ndifr = NULL; + float *__nz = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nbx = (*env)->GetPrimitiveArrayCritical(env, bx, NULL))) { __failed = TRUE; goto done; } + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) { __failed = TRUE; goto done; } + if (!(__npoles = (*env)->GetPrimitiveArrayCritical(env, poles, NULL))) { __failed = TRUE; goto done; } + if (!(__ndifl = (*env)->GetPrimitiveArrayCritical(env, difl, NULL))) { __failed = TRUE; goto done; } + if (!(__ndifr = (*env)->GetPrimitiveArrayCritical(env, difr, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } slals0_(&icompq, &nl, &nr, &sqre, &nrhs, __nb + offsetb, &ldb, __nbx + offsetbx, &ldbx, __nperm + offsetperm, &givptr, __ngivcol + offsetgivcol, &ldgcol, __ngivnum + offsetgivnum, &ldgnum, __npoles + offsetpoles, __ndifl + offsetdifl, __ndifr + offsetdifr, __nz + offsetz, &k, &c, &s, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__ndifr) (*env)->ReleasePrimitiveArrayCritical(env, difr, __ndifr, failed ? JNI_ABORT : 0); - if (__ndifl) (*env)->ReleasePrimitiveArrayCritical(env, difl, __ndifl, failed ? JNI_ABORT : 0); - if (__npoles) (*env)->ReleasePrimitiveArrayCritical(env, poles, __npoles, failed ? JNI_ABORT : 0); - if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); - if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); - if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); - if (__nbx) (*env)->ReleasePrimitiveArrayCritical(env, bx, __nbx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__ndifr) (*env)->ReleasePrimitiveArrayCritical(env, difr, __ndifr, __failed ? JNI_ABORT : 0); + if (__ndifl) (*env)->ReleasePrimitiveArrayCritical(env, difl, __ndifl, __failed ? JNI_ABORT : 0); + if (__npoles) (*env)->ReleasePrimitiveArrayCritical(env, poles, __npoles, __failed ? JNI_ABORT : 0); + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, __failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, __failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, __failed ? JNI_ABORT : 0); + if (__nbx) (*env)->ReleasePrimitiveArrayCritical(env, bx, __nbx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slalsa_)(int *icompq, int *smlsiz, int *n, int *nrhs, float *b, int *ldb, float *bx, int *ldbx, float *u, int *ldu, float *vt, int *k, float *difl, float *difr, float *z, float *poles, int *givptr, int *givcol, int *ldgcol, int *perm, float *givnum, float *c, float *s, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slalsaK(JNIEnv *env, UNUSED jobject obj, jint icompq, jint smlsiz, jint n, jint nrhs, jfloatArray b, jint offsetb, jint ldb, jfloatArray bx, jint offsetbx, jint ldbx, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jintArray k, jint offsetk, jfloatArray difl, jint offsetdifl, jfloatArray difr, jint offsetdifr, jfloatArray z, jint offsetz, jfloatArray poles, jint offsetpoles, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jintArray perm, jint offsetperm, jfloatArray givnum, jint offsetgivnum, jfloatArray c, jint offsetc, jfloatArray s, jint offsets, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__nb = NULL; float *__nbx = NULL; float *__nu = NULL; float *__nvt = NULL; int *__nk = NULL; float *__ndifl = NULL; float *__ndifr = NULL; float *__nz = NULL; float *__npoles = NULL; int *__ngivptr = NULL; int *__ngivcol = NULL; int *__nperm = NULL; float *__ngivnum = NULL; float *__nc = NULL; float *__ns = NULL; float *__nwork = NULL; int *__niwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nbx = (*env)->GetPrimitiveArrayCritical(env, bx, NULL))) goto fail; - if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; - if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; - if (!(__nk = (*env)->GetPrimitiveArrayCritical(env, k, NULL))) goto fail; - if (!(__ndifl = (*env)->GetPrimitiveArrayCritical(env, difl, NULL))) goto fail; - if (!(__ndifr = (*env)->GetPrimitiveArrayCritical(env, difr, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__npoles = (*env)->GetPrimitiveArrayCritical(env, poles, NULL))) goto fail; - if (!(__ngivptr = (*env)->GetPrimitiveArrayCritical(env, givptr, NULL))) goto fail; - if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; - if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; - if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__nb = NULL; + float *__nbx = NULL; + float *__nu = NULL; + float *__nvt = NULL; + int *__nk = NULL; + float *__ndifl = NULL; + float *__ndifr = NULL; + float *__nz = NULL; + float *__npoles = NULL; + int *__ngivptr = NULL; + int *__ngivcol = NULL; + int *__nperm = NULL; + float *__ngivnum = NULL; + float *__nc = NULL; + float *__ns = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nbx = (*env)->GetPrimitiveArrayCritical(env, bx, NULL))) { __failed = TRUE; goto done; } + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) { __failed = TRUE; goto done; } + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) { __failed = TRUE; goto done; } + if (!(__nk = (*env)->GetPrimitiveArrayCritical(env, k, NULL))) { __failed = TRUE; goto done; } + if (!(__ndifl = (*env)->GetPrimitiveArrayCritical(env, difl, NULL))) { __failed = TRUE; goto done; } + if (!(__ndifr = (*env)->GetPrimitiveArrayCritical(env, difr, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__npoles = (*env)->GetPrimitiveArrayCritical(env, poles, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivptr = (*env)->GetPrimitiveArrayCritical(env, givptr, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) { __failed = TRUE; goto done; } + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } slalsa_(&icompq, &smlsiz, &n, &nrhs, __nb + offsetb, &ldb, __nbx + offsetbx, &ldbx, __nu + offsetu, &ldu, __nvt + offsetvt, __nk + offsetk, __ndifl + offsetdifl, __ndifr + offsetdifr, __nz + offsetz, __npoles + offsetpoles, __ngivptr + offsetgivptr, __ngivcol + offsetgivcol, &ldgcol, __nperm + offsetperm, __ngivnum + offsetgivnum, __nc + offsetc, __ns + offsets, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); - if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); - if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); - if (__ngivptr) (*env)->ReleasePrimitiveArrayCritical(env, givptr, __ngivptr, failed ? JNI_ABORT : 0); - if (__npoles) (*env)->ReleasePrimitiveArrayCritical(env, poles, __npoles, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__ndifr) (*env)->ReleasePrimitiveArrayCritical(env, difr, __ndifr, failed ? JNI_ABORT : 0); - if (__ndifl) (*env)->ReleasePrimitiveArrayCritical(env, difl, __ndifl, failed ? JNI_ABORT : 0); - if (__nk) (*env)->ReleasePrimitiveArrayCritical(env, k, __nk, failed ? JNI_ABORT : 0); - if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); - if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); - if (__nbx) (*env)->ReleasePrimitiveArrayCritical(env, bx, __nbx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, __failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, __failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, __failed ? JNI_ABORT : 0); + if (__ngivptr) (*env)->ReleasePrimitiveArrayCritical(env, givptr, __ngivptr, __failed ? JNI_ABORT : 0); + if (__npoles) (*env)->ReleasePrimitiveArrayCritical(env, poles, __npoles, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__ndifr) (*env)->ReleasePrimitiveArrayCritical(env, difr, __ndifr, __failed ? JNI_ABORT : 0); + if (__ndifl) (*env)->ReleasePrimitiveArrayCritical(env, difl, __ndifl, __failed ? JNI_ABORT : 0); + if (__nk) (*env)->ReleasePrimitiveArrayCritical(env, k, __nk, __failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, __failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, __failed ? JNI_ABORT : 0); + if (__nbx) (*env)->ReleasePrimitiveArrayCritical(env, bx, __nbx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slalsd_)(const char *uplo, int *smlsiz, int *n, int *nrhs, float *d, float *e, float *b, int *ldb, float *rcond, int *rank, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slalsdK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint smlsiz, jint n, jint nrhs, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray b, jint offsetb, jint ldb, jfloat rcond, jobject rank, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __nrank = 0; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nb = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __nrank = 0; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; + float *__nb = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nrank = (*env)->GetIntField(env, rank, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } slalsd_(__nuplo, &smlsiz, &n, &nrhs, __nd + offsetd, __ne + offsete, __nb + offsetb, &ldb, &rcond, &__nrank, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, rank, intW_val_fieldID, __nrank); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, rank, intW_val_fieldID, __nrank); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slamrg_)(int *n1, int *n2, float *a, int *strd1, int *strd2, int *index); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slamrgK(JNIEnv *env, UNUSED jobject obj, jint n1, jint n2, jfloatArray a, jint offseta, jint strd1, jint strd2, jintArray index, jint offsetindex) { - jboolean failed = FALSE; - float *__na = NULL; int *__nindex = NULL; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nindex = (*env)->GetPrimitiveArrayCritical(env, index, NULL))) goto fail; + jboolean __failed = FALSE; + float *__na = NULL; + int *__nindex = NULL; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nindex = (*env)->GetPrimitiveArrayCritical(env, index, NULL))) { __failed = TRUE; goto done; } slamrg_(&n1, &n2, __na + offseta, &strd1, &strd2, __nindex + offsetindex); done: - if (__nindex) (*env)->ReleasePrimitiveArrayCritical(env, index, __nindex, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nindex) (*env)->ReleasePrimitiveArrayCritical(env, index, __nindex, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static int (*slaneg_)(int *n, float *d, float *lld, float *sigma, float *pivmin, int *r); jint Java_dev_ludovic_netlib_lapack_JNILAPACK_slanegK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray d, jint offsetd, jfloatArray lld, jint offsetlld, jfloat sigma, jfloat pivmin, jint r) { - jint __ret; - jboolean failed = FALSE; - float *__nd = NULL; float *__nlld = NULL; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nlld = (*env)->GetPrimitiveArrayCritical(env, lld, NULL))) goto fail; + jint __ret = 0; + jboolean __failed = FALSE; + float *__nd = NULL; + float *__nlld = NULL; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nlld = (*env)->GetPrimitiveArrayCritical(env, lld, NULL))) { __failed = TRUE; goto done; } __ret = slaneg_(&n, __nd + offsetd, __nlld + offsetlld, &sigma, &pivmin, &r); done: - if (__nlld) (*env)->ReleasePrimitiveArrayCritical(env, lld, __nlld, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); + if (__nlld) (*env)->ReleasePrimitiveArrayCritical(env, lld, __nlld, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static float (*slangb_)(const char *norm, int *n, int *kl, int *ku, float *ab, int *ldab, float *work); jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slangbK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jint kl, jint ku, jfloatArray ab, jint offsetab, jint ldab, jfloatArray work, jint offsetwork) { - jfloat __ret; - jboolean failed = FALSE; - const char *__nnorm = NULL; float *__nab = NULL; float *__nwork = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jfloat __ret = 0; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + float *__nab = NULL; + float *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } __ret = slangb_(__nnorm, &n, &kl, &ku, __nab + offsetab, &ldab, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static float (*slange_)(const char *norm, int *m, int *n, float *a, int *lda, float *work); jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slangeK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray work, jint offsetwork) { - jfloat __ret; - jboolean failed = FALSE; - const char *__nnorm = NULL; float *__na = NULL; float *__nwork = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jfloat __ret = 0; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + float *__na = NULL; + float *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } __ret = slange_(__nnorm, &m, &n, __na + offseta, &lda, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static float (*slangt_)(const char *norm, int *n, float *dl, float *d, float *du); jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slangtK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jfloatArray dl, jint offsetdl, jfloatArray d, jint offsetd, jfloatArray du, jint offsetdu) { - jfloat __ret; - jboolean failed = FALSE; - const char *__nnorm = NULL; float *__ndl = NULL; float *__nd = NULL; float *__ndu = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; - if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) goto fail; + jfloat __ret = 0; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + float *__ndl = NULL; + float *__nd = NULL; + float *__ndu = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } + if (!(__ndl = (*env)->GetPrimitiveArrayCritical(env, dl, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ndu = (*env)->GetPrimitiveArrayCritical(env, du, NULL))) { __failed = TRUE; goto done; } __ret = slangt_(__nnorm, &n, __ndl + offsetdl, __nd + offsetd, __ndu + offsetdu); done: - if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, failed ? JNI_ABORT : 0); + if (__ndu) (*env)->ReleasePrimitiveArrayCritical(env, du, __ndu, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__ndl) (*env)->ReleasePrimitiveArrayCritical(env, dl, __ndl, __failed ? JNI_ABORT : 0); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static float (*slanhs_)(const char *norm, int *n, float *a, int *lda, float *work); jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slanhsK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray work, jint offsetwork) { - jfloat __ret; - jboolean failed = FALSE; - const char *__nnorm = NULL; float *__na = NULL; float *__nwork = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jfloat __ret = 0; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + float *__na = NULL; + float *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } __ret = slanhs_(__nnorm, &n, __na + offseta, &lda, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static float (*slansb_)(const char *norm, const char *uplo, int *n, int *k, float *ab, int *ldab, float *work); jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slansbK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jint n, jint k, jfloatArray ab, jint offsetab, jint ldab, jfloatArray work, jint offsetwork) { - jfloat __ret; - jboolean failed = FALSE; - const char *__nnorm = NULL; const char *__nuplo = NULL; float *__nab = NULL; float *__nwork = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jfloat __ret = 0; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + const char *__nuplo = NULL; + float *__nab = NULL; + float *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } __ret = slansb_(__nnorm, __nuplo, &n, &k, __nab + offsetab, &ldab, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static float (*slansp_)(const char *norm, const char *uplo, int *n, float *ap, float *work); jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slanspK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray work, jint offsetwork) { - jfloat __ret; - jboolean failed = FALSE; - const char *__nnorm = NULL; const char *__nuplo = NULL; float *__nap = NULL; float *__nwork = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jfloat __ret = 0; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + const char *__nuplo = NULL; + float *__nap = NULL; + float *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } __ret = slansp_(__nnorm, __nuplo, &n, __nap + offsetap, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static float (*slanst_)(const char *norm, int *n, float *d, float *e); jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slanstK(JNIEnv *env, UNUSED jobject obj, jstring norm, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete) { - jfloat __ret; - jboolean failed = FALSE; - const char *__nnorm = NULL; float *__nd = NULL; float *__ne = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + jfloat __ret = 0; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + float *__nd = NULL; + float *__ne = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } __ret = slanst_(__nnorm, &n, __nd + offsetd, __ne + offsete); done: - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static float (*slansy_)(const char *norm, const char *uplo, int *n, float *a, int *lda, float *work); jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slansyK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray work, jint offsetwork) { - jfloat __ret; - jboolean failed = FALSE; - const char *__nnorm = NULL; const char *__nuplo = NULL; float *__na = NULL; float *__nwork = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jfloat __ret = 0; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + const char *__nuplo = NULL; + float *__na = NULL; + float *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } __ret = slansy_(__nnorm, __nuplo, &n, __na + offseta, &lda, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static float (*slantb_)(const char *norm, const char *uplo, const char *diag, int *n, int *k, float *ab, int *ldab, float *work); jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slantbK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jstring diag, jint n, jint k, jfloatArray ab, jint offsetab, jint ldab, jfloatArray work, jint offsetwork) { - jfloat __ret; - jboolean failed = FALSE; - const char *__nnorm = NULL; const char *__nuplo = NULL; const char *__ndiag = NULL; float *__nab = NULL; float *__nwork = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jfloat __ret = 0; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + const char *__nuplo = NULL; + const char *__ndiag = NULL; + float *__nab = NULL; + float *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } __ret = slantb_(__nnorm, __nuplo, __ndiag, &n, &k, __nab + offsetab, &ldab, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static float (*slantp_)(const char *norm, const char *uplo, const char *diag, int *n, float *ap, float *work); jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slantpK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jstring diag, jint n, jfloatArray ap, jint offsetap, jfloatArray work, jint offsetwork) { - jfloat __ret; - jboolean failed = FALSE; - const char *__nnorm = NULL; const char *__nuplo = NULL; const char *__ndiag = NULL; float *__nap = NULL; float *__nwork = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jfloat __ret = 0; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + const char *__nuplo = NULL; + const char *__ndiag = NULL; + float *__nap = NULL; + float *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } __ret = slantp_(__nnorm, __nuplo, __ndiag, &n, __nap + offsetap, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static float (*slantr_)(const char *norm, const char *uplo, const char *diag, int *m, int *n, float *a, int *lda, float *work); jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slantrK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jstring diag, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray work, jint offsetwork) { - jfloat __ret; - jboolean failed = FALSE; - const char *__nnorm = NULL; const char *__nuplo = NULL; const char *__ndiag = NULL; float *__na = NULL; float *__nwork = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jfloat __ret = 0; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + const char *__nuplo = NULL; + const char *__ndiag = NULL; + float *__na = NULL; + float *__nwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } __ret = slantr_(__nnorm, __nuplo, __ndiag, &m, &n, __na + offseta, &lda, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static void (*slanv2_)(float *a, float *b, float *c, float *d, float *rt1r, float *rt1i, float *rt2r, float *rt2i, float *cs, float *sn); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slanv2K(JNIEnv *env, UNUSED jobject obj, jobject a, jobject b, jobject c, jobject d, jobject rt1r, jobject rt1i, jobject rt2r, jobject rt2i, jobject cs, jobject sn) { - jboolean failed = FALSE; - float __na = 0; float __nb = 0; float __nc = 0; float __nd = 0; float __nrt1r = 0; float __nrt1i = 0; float __nrt2r = 0; float __nrt2i = 0; float __ncs = 0; float __nsn = 0; + jboolean __failed = FALSE; + float __na = 0; + float __nb = 0; + float __nc = 0; + float __nd = 0; + float __nrt1r = 0; + float __nrt1i = 0; + float __nrt2r = 0; + float __nrt2i = 0; + float __ncs = 0; + float __nsn = 0; __na = (*env)->GetFloatField(env, a, floatW_val_fieldID); __nb = (*env)->GetFloatField(env, b, floatW_val_fieldID); __nc = (*env)->GetFloatField(env, c, floatW_val_fieldID); @@ -13295,486 +14284,504 @@ void Java_dev_ludovic_netlib_lapack_JNILAPACK_slanv2K(JNIEnv *env, UNUSED jobjec __nsn = (*env)->GetFloatField(env, sn, floatW_val_fieldID); slanv2_(&__na, &__nb, &__nc, &__nd, &__nrt1r, &__nrt1i, &__nrt2r, &__nrt2i, &__ncs, &__nsn); done: - if (!failed) (*env)->SetFloatField(env, sn, floatW_val_fieldID, __nsn); - if (!failed) (*env)->SetFloatField(env, cs, floatW_val_fieldID, __ncs); - if (!failed) (*env)->SetFloatField(env, rt2i, floatW_val_fieldID, __nrt2i); - if (!failed) (*env)->SetFloatField(env, rt2r, floatW_val_fieldID, __nrt2r); - if (!failed) (*env)->SetFloatField(env, rt1i, floatW_val_fieldID, __nrt1i); - if (!failed) (*env)->SetFloatField(env, rt1r, floatW_val_fieldID, __nrt1r); - if (!failed) (*env)->SetFloatField(env, d, floatW_val_fieldID, __nd); - if (!failed) (*env)->SetFloatField(env, c, floatW_val_fieldID, __nc); - if (!failed) (*env)->SetFloatField(env, b, floatW_val_fieldID, __nb); - if (!failed) (*env)->SetFloatField(env, a, floatW_val_fieldID, __na); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetFloatField(env, sn, floatW_val_fieldID, __nsn); + if (!__failed) (*env)->SetFloatField(env, cs, floatW_val_fieldID, __ncs); + if (!__failed) (*env)->SetFloatField(env, rt2i, floatW_val_fieldID, __nrt2i); + if (!__failed) (*env)->SetFloatField(env, rt2r, floatW_val_fieldID, __nrt2r); + if (!__failed) (*env)->SetFloatField(env, rt1i, floatW_val_fieldID, __nrt1i); + if (!__failed) (*env)->SetFloatField(env, rt1r, floatW_val_fieldID, __nrt1r); + if (!__failed) (*env)->SetFloatField(env, d, floatW_val_fieldID, __nd); + if (!__failed) (*env)->SetFloatField(env, c, floatW_val_fieldID, __nc); + if (!__failed) (*env)->SetFloatField(env, b, floatW_val_fieldID, __nb); + if (!__failed) (*env)->SetFloatField(env, a, floatW_val_fieldID, __na); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slapll_)(int *n, float *x, int *incx, float *y, int *incy, float *ssmin); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slapllK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy, jobject ssmin) { - jboolean failed = FALSE; - float __nssmin = 0; float *__nx = NULL; float *__ny = NULL; + jboolean __failed = FALSE; + float __nssmin = 0; + float *__nx = NULL; + float *__ny = NULL; __nssmin = (*env)->GetFloatField(env, ssmin, floatW_val_fieldID); - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } slapll_(&n, __nx + offsetx, &incx, __ny + offsety, &incy, &__nssmin); done: - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetFloatField(env, ssmin, floatW_val_fieldID, __nssmin); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetFloatField(env, ssmin, floatW_val_fieldID, __nssmin); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slapmt_)(int *forwrd, int *m, int *n, float *x, int *ldx, int *k); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slapmtK(JNIEnv *env, UNUSED jobject obj, jboolean forwrd, jint m, jint n, jfloatArray x, jint offsetx, jint ldx, jintArray k, jint offsetk) { - jboolean failed = FALSE; - int __nforwrd; float *__nx = NULL; int *__nk = NULL; + jboolean __failed = FALSE; + int __nforwrd; + float *__nx = NULL; + int *__nk = NULL; __nforwrd = forwrd; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nk = (*env)->GetPrimitiveArrayCritical(env, k, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nk = (*env)->GetPrimitiveArrayCritical(env, k, NULL))) { __failed = TRUE; goto done; } slapmt_(&__nforwrd, &m, &n, __nx + offsetx, &ldx, __nk + offsetk); done: - if (__nk) (*env)->ReleasePrimitiveArrayCritical(env, k, __nk, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (!failed) forwrd = __nforwrd; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nk) (*env)->ReleasePrimitiveArrayCritical(env, k, __nk, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (!__failed) forwrd = __nforwrd; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static float (*slapy2_)(float *x, float *y); jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slapy2K(JNIEnv *env, UNUSED jobject obj, jfloat x, jfloat y) { - jfloat __ret; - jboolean failed = FALSE; - - + jfloat __ret = 0; + jboolean __failed = FALSE; __ret = slapy2_(&x, &y); done: - - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static float (*slapy3_)(float *x, float *y, float *z); jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slapy3K(JNIEnv *env, UNUSED jobject obj, jfloat x, jfloat y, jfloat z) { - jfloat __ret; - jboolean failed = FALSE; - - + jfloat __ret = 0; + jboolean __failed = FALSE; __ret = slapy3_(&x, &y, &z); done: - - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static void (*slaqgb_)(int *m, int *n, int *kl, int *ku, float *ab, int *ldab, float *r, float *c, float *rowcnd, float *colcnd, float *amax, char *equed); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqgbK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint kl, jint ku, jfloatArray ab, jint offsetab, jint ldab, jfloatArray r, jint offsetr, jfloatArray c, jint offsetc, jfloat rowcnd, jfloat colcnd, jfloat amax, jobject equed) { - jboolean failed = FALSE; - char *__nequed = NULL; jstring __jequed = NULL;; float *__nab = NULL; float *__nr = NULL; float *__nc = NULL; - __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + jboolean __failed = FALSE; + char *__nequed = NULL; jstring __jequed = NULL; + float *__nab = NULL; + float *__nr = NULL; + float *__nc = NULL; + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) { __failed = TRUE; goto done; } + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } slaqgb_(&m, &n, &kl, &ku, __nab + offsetab, &ldab, __nr + offsetr, __nc + offsetc, &rowcnd, &colcnd, &amax, __nequed); done: - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!__failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaqge_)(int *m, int *n, float *a, int *lda, float *r, float *c, float *rowcnd, float *colcnd, float *amax, char *equed); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqgeK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray r, jint offsetr, jfloatArray c, jint offsetc, jfloat rowcnd, jfloat colcnd, jfloat amax, jobject equed) { - jboolean failed = FALSE; - char *__nequed = NULL; jstring __jequed = NULL;; float *__na = NULL; float *__nr = NULL; float *__nc = NULL; - __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + jboolean __failed = FALSE; + char *__nequed = NULL; jstring __jequed = NULL; + float *__na = NULL; + float *__nr = NULL; + float *__nc = NULL; + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nr = (*env)->GetPrimitiveArrayCritical(env, r, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } slaqge_(&m, &n, __na + offseta, &lda, __nr + offsetr, __nc + offsetc, &rowcnd, &colcnd, &amax, __nequed); done: - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nr) (*env)->ReleasePrimitiveArrayCritical(env, r, __nr, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!__failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaqp2_)(int *m, int *n, int *offset, float *a, int *lda, int *jpvt, float *tau, float *vn1, float *vn2, float *work); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqp2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint offset, jfloatArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jfloatArray tau, jint offsettau, jfloatArray vn1, jint offsetvn1, jfloatArray vn2, jint offsetvn2, jfloatArray work, jint offsetwork) { - jboolean failed = FALSE; - float *__na = NULL; int *__njpvt = NULL; float *__ntau = NULL; float *__nvn1 = NULL; float *__nvn2 = NULL; float *__nwork = NULL; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nvn1 = (*env)->GetPrimitiveArrayCritical(env, vn1, NULL))) goto fail; - if (!(__nvn2 = (*env)->GetPrimitiveArrayCritical(env, vn2, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + float *__na = NULL; + int *__njpvt = NULL; + float *__ntau = NULL; + float *__nvn1 = NULL; + float *__nvn2 = NULL; + float *__nwork = NULL; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nvn1 = (*env)->GetPrimitiveArrayCritical(env, vn1, NULL))) { __failed = TRUE; goto done; } + if (!(__nvn2 = (*env)->GetPrimitiveArrayCritical(env, vn2, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } slaqp2_(&m, &n, &offset, __na + offseta, &lda, __njpvt + offsetjpvt, __ntau + offsettau, __nvn1 + offsetvn1, __nvn2 + offsetvn2, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nvn2) (*env)->ReleasePrimitiveArrayCritical(env, vn2, __nvn2, failed ? JNI_ABORT : 0); - if (__nvn1) (*env)->ReleasePrimitiveArrayCritical(env, vn1, __nvn1, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nvn2) (*env)->ReleasePrimitiveArrayCritical(env, vn2, __nvn2, __failed ? JNI_ABORT : 0); + if (__nvn1) (*env)->ReleasePrimitiveArrayCritical(env, vn1, __nvn1, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaqps_)(int *m, int *n, int *offset, int *nb, int *kb, float *a, int *lda, int *jpvt, float *tau, float *vn1, float *vn2, float *auxv, float *f, int *ldf); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqpsK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint offset, jint nb, jobject kb, jfloatArray a, jint offseta, jint lda, jintArray jpvt, jint offsetjpvt, jfloatArray tau, jint offsettau, jfloatArray vn1, jint offsetvn1, jfloatArray vn2, jint offsetvn2, jfloatArray auxv, jint offsetauxv, jfloatArray f, jint offsetf, jint ldf) { - jboolean failed = FALSE; - int __nkb = 0; float *__na = NULL; int *__njpvt = NULL; float *__ntau = NULL; float *__nvn1 = NULL; float *__nvn2 = NULL; float *__nauxv = NULL; float *__nf = NULL; + jboolean __failed = FALSE; + int __nkb = 0; + float *__na = NULL; + int *__njpvt = NULL; + float *__ntau = NULL; + float *__nvn1 = NULL; + float *__nvn2 = NULL; + float *__nauxv = NULL; + float *__nf = NULL; __nkb = (*env)->GetIntField(env, kb, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nvn1 = (*env)->GetPrimitiveArrayCritical(env, vn1, NULL))) goto fail; - if (!(__nvn2 = (*env)->GetPrimitiveArrayCritical(env, vn2, NULL))) goto fail; - if (!(__nauxv = (*env)->GetPrimitiveArrayCritical(env, auxv, NULL))) goto fail; - if (!(__nf = (*env)->GetPrimitiveArrayCritical(env, f, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__njpvt = (*env)->GetPrimitiveArrayCritical(env, jpvt, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nvn1 = (*env)->GetPrimitiveArrayCritical(env, vn1, NULL))) { __failed = TRUE; goto done; } + if (!(__nvn2 = (*env)->GetPrimitiveArrayCritical(env, vn2, NULL))) { __failed = TRUE; goto done; } + if (!(__nauxv = (*env)->GetPrimitiveArrayCritical(env, auxv, NULL))) { __failed = TRUE; goto done; } + if (!(__nf = (*env)->GetPrimitiveArrayCritical(env, f, NULL))) { __failed = TRUE; goto done; } slaqps_(&m, &n, &offset, &nb, &__nkb, __na + offseta, &lda, __njpvt + offsetjpvt, __ntau + offsettau, __nvn1 + offsetvn1, __nvn2 + offsetvn2, __nauxv + offsetauxv, __nf + offsetf, &ldf); done: - if (__nf) (*env)->ReleasePrimitiveArrayCritical(env, f, __nf, failed ? JNI_ABORT : 0); - if (__nauxv) (*env)->ReleasePrimitiveArrayCritical(env, auxv, __nauxv, failed ? JNI_ABORT : 0); - if (__nvn2) (*env)->ReleasePrimitiveArrayCritical(env, vn2, __nvn2, failed ? JNI_ABORT : 0); - if (__nvn1) (*env)->ReleasePrimitiveArrayCritical(env, vn1, __nvn1, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, kb, intW_val_fieldID, __nkb); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nf) (*env)->ReleasePrimitiveArrayCritical(env, f, __nf, __failed ? JNI_ABORT : 0); + if (__nauxv) (*env)->ReleasePrimitiveArrayCritical(env, auxv, __nauxv, __failed ? JNI_ABORT : 0); + if (__nvn2) (*env)->ReleasePrimitiveArrayCritical(env, vn2, __nvn2, __failed ? JNI_ABORT : 0); + if (__nvn1) (*env)->ReleasePrimitiveArrayCritical(env, vn1, __nvn1, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__njpvt) (*env)->ReleasePrimitiveArrayCritical(env, jpvt, __njpvt, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, kb, intW_val_fieldID, __nkb); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaqr0_)(int *wantt, int *wantz, int *n, int *ilo, int *ihi, float *h, int *ldh, float *wr, float *wi, int *iloz, int *ihiz, float *z, int *ldz, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr0K(JNIEnv *env, UNUSED jobject obj, jboolean wantt, jboolean wantz, jint n, jint ilo, jint ihi, jfloatArray h, jint offseth, jint ldh, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jint iloz, jint ihiz, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __nwantt; int __nwantz; int __ninfo = 0; float *__nh = NULL; float *__nwr = NULL; float *__nwi = NULL; float *__nz = NULL; float *__nwork = NULL; + jboolean __failed = FALSE; + int __nwantt; + int __nwantz; + int __ninfo = 0; + float *__nh = NULL; + float *__nwr = NULL; + float *__nwi = NULL; + float *__nz = NULL; + float *__nwork = NULL; __nwantt = wantt; __nwantz = wantz; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; - if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } slaqr0_(&__nwantt, &__nwantz, &n, &ilo, &ihi, __nh + offseth, &ldh, __nwr + offsetwr, __nwi + offsetwi, &iloz, &ihiz, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); - if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) wantz = __nwantz; - if (!failed) wantt = __nwantt; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, __failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) wantz = __nwantz; + if (!__failed) wantt = __nwantt; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaqr1_)(int *n, float *h, int *ldh, float *sr1, float *si1, float *sr2, float *si2, float *v); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr1K(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray h, jint offseth, jint ldh, jfloat sr1, jfloat si1, jfloat sr2, jfloat si2, jfloatArray v, jint offsetv) { - jboolean failed = FALSE; - float *__nh = NULL; float *__nv = NULL; - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; + jboolean __failed = FALSE; + float *__nh = NULL; + float *__nv = NULL; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } slaqr1_(&n, __nh + offseth, &ldh, &sr1, &si1, &sr2, &si2, __nv + offsetv); done: - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaqr2_)(int *wantt, int *wantz, int *n, int *ktop, int *kbot, int *nw, float *h, int *ldh, int *iloz, int *ihiz, float *z, int *ldz, int *ns, int *nd, float *sr, float *si, float *v, int *ldv, int *nh, float *t, int *ldt, int *nv, float *wv, int *ldwv, float *work, int *lwork); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr2K(JNIEnv *env, UNUSED jobject obj, jboolean wantt, jboolean wantz, jint n, jint ktop, jint kbot, jint nw, jfloatArray h, jint offseth, jint ldh, jint iloz, jint ihiz, jfloatArray z, jint offsetz, jint ldz, jobject ns, jobject nd, jfloatArray sr, jint offsetsr, jfloatArray si, jint offsetsi, jfloatArray v, jint offsetv, jint ldv, jint nh, jfloatArray t, jint offsett, jint ldt, jint nv, jfloatArray wv, jint offsetwv, jint ldwv, jfloatArray work, jint offsetwork, jint lwork) { - jboolean failed = FALSE; - int __nwantt; int __nwantz; int __nns = 0; int __nnd = 0; float *__nh = NULL; float *__nz = NULL; float *__nsr = NULL; float *__nsi = NULL; float *__nv = NULL; float *__nt = NULL; float *__nwv = NULL; float *__nwork = NULL; + jboolean __failed = FALSE; + int __nwantt; + int __nwantz; + int __nns = 0; + int __nnd = 0; + float *__nh = NULL; + float *__nz = NULL; + float *__nsr = NULL; + float *__nsi = NULL; + float *__nv = NULL; + float *__nt = NULL; + float *__nwv = NULL; + float *__nwork = NULL; __nwantt = wantt; __nwantz = wantz; __nns = (*env)->GetIntField(env, ns, intW_val_fieldID); __nnd = (*env)->GetIntField(env, nd, intW_val_fieldID); - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nsr = (*env)->GetPrimitiveArrayCritical(env, sr, NULL))) goto fail; - if (!(__nsi = (*env)->GetPrimitiveArrayCritical(env, si, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; - if (!(__nwv = (*env)->GetPrimitiveArrayCritical(env, wv, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nsr = (*env)->GetPrimitiveArrayCritical(env, sr, NULL))) { __failed = TRUE; goto done; } + if (!(__nsi = (*env)->GetPrimitiveArrayCritical(env, si, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) { __failed = TRUE; goto done; } + if (!(__nwv = (*env)->GetPrimitiveArrayCritical(env, wv, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } slaqr2_(&__nwantt, &__nwantz, &n, &ktop, &kbot, &nw, __nh + offseth, &ldh, &iloz, &ihiz, __nz + offsetz, &ldz, &__nns, &__nnd, __nsr + offsetsr, __nsi + offsetsi, __nv + offsetv, &ldv, &nh, __nt + offsett, &ldt, &nv, __nwv + offsetwv, &ldwv, __nwork + offsetwork, &lwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nwv) (*env)->ReleasePrimitiveArrayCritical(env, wv, __nwv, failed ? JNI_ABORT : 0); - if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nsi) (*env)->ReleasePrimitiveArrayCritical(env, si, __nsi, failed ? JNI_ABORT : 0); - if (__nsr) (*env)->ReleasePrimitiveArrayCritical(env, sr, __nsr, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, nd, intW_val_fieldID, __nnd); - if (!failed) (*env)->SetIntField(env, ns, intW_val_fieldID, __nns); - if (!failed) wantz = __nwantz; - if (!failed) wantt = __nwantt; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nwv) (*env)->ReleasePrimitiveArrayCritical(env, wv, __nwv, __failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nsi) (*env)->ReleasePrimitiveArrayCritical(env, si, __nsi, __failed ? JNI_ABORT : 0); + if (__nsr) (*env)->ReleasePrimitiveArrayCritical(env, sr, __nsr, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, nd, intW_val_fieldID, __nnd); + if (!__failed) (*env)->SetIntField(env, ns, intW_val_fieldID, __nns); + if (!__failed) wantz = __nwantz; + if (!__failed) wantt = __nwantt; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaqr3_)(int *wantt, int *wantz, int *n, int *ktop, int *kbot, int *nw, float *h, int *ldh, int *iloz, int *ihiz, float *z, int *ldz, int *ns, int *nd, float *sr, float *si, float *v, int *ldv, int *nh, float *t, int *ldt, int *nv, float *wv, int *ldwv, float *work, int *lwork); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr3K(JNIEnv *env, UNUSED jobject obj, jboolean wantt, jboolean wantz, jint n, jint ktop, jint kbot, jint nw, jfloatArray h, jint offseth, jint ldh, jint iloz, jint ihiz, jfloatArray z, jint offsetz, jint ldz, jobject ns, jobject nd, jfloatArray sr, jint offsetsr, jfloatArray si, jint offsetsi, jfloatArray v, jint offsetv, jint ldv, jint nh, jfloatArray t, jint offsett, jint ldt, jint nv, jfloatArray wv, jint offsetwv, jint ldwv, jfloatArray work, jint offsetwork, jint lwork) { - jboolean failed = FALSE; - int __nwantt; int __nwantz; int __nns = 0; int __nnd = 0; float *__nh = NULL; float *__nz = NULL; float *__nsr = NULL; float *__nsi = NULL; float *__nv = NULL; float *__nt = NULL; float *__nwv = NULL; float *__nwork = NULL; + jboolean __failed = FALSE; + int __nwantt; + int __nwantz; + int __nns = 0; + int __nnd = 0; + float *__nh = NULL; + float *__nz = NULL; + float *__nsr = NULL; + float *__nsi = NULL; + float *__nv = NULL; + float *__nt = NULL; + float *__nwv = NULL; + float *__nwork = NULL; __nwantt = wantt; __nwantz = wantz; __nns = (*env)->GetIntField(env, ns, intW_val_fieldID); __nnd = (*env)->GetIntField(env, nd, intW_val_fieldID); - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nsr = (*env)->GetPrimitiveArrayCritical(env, sr, NULL))) goto fail; - if (!(__nsi = (*env)->GetPrimitiveArrayCritical(env, si, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; - if (!(__nwv = (*env)->GetPrimitiveArrayCritical(env, wv, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nsr = (*env)->GetPrimitiveArrayCritical(env, sr, NULL))) { __failed = TRUE; goto done; } + if (!(__nsi = (*env)->GetPrimitiveArrayCritical(env, si, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) { __failed = TRUE; goto done; } + if (!(__nwv = (*env)->GetPrimitiveArrayCritical(env, wv, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } slaqr3_(&__nwantt, &__nwantz, &n, &ktop, &kbot, &nw, __nh + offseth, &ldh, &iloz, &ihiz, __nz + offsetz, &ldz, &__nns, &__nnd, __nsr + offsetsr, __nsi + offsetsi, __nv + offsetv, &ldv, &nh, __nt + offsett, &ldt, &nv, __nwv + offsetwv, &ldwv, __nwork + offsetwork, &lwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nwv) (*env)->ReleasePrimitiveArrayCritical(env, wv, __nwv, failed ? JNI_ABORT : 0); - if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nsi) (*env)->ReleasePrimitiveArrayCritical(env, si, __nsi, failed ? JNI_ABORT : 0); - if (__nsr) (*env)->ReleasePrimitiveArrayCritical(env, sr, __nsr, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, nd, intW_val_fieldID, __nnd); - if (!failed) (*env)->SetIntField(env, ns, intW_val_fieldID, __nns); - if (!failed) wantz = __nwantz; - if (!failed) wantt = __nwantt; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nwv) (*env)->ReleasePrimitiveArrayCritical(env, wv, __nwv, __failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nsi) (*env)->ReleasePrimitiveArrayCritical(env, si, __nsi, __failed ? JNI_ABORT : 0); + if (__nsr) (*env)->ReleasePrimitiveArrayCritical(env, sr, __nsr, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, nd, intW_val_fieldID, __nnd); + if (!__failed) (*env)->SetIntField(env, ns, intW_val_fieldID, __nns); + if (!__failed) wantz = __nwantz; + if (!__failed) wantt = __nwantt; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaqr4_)(int *wantt, int *wantz, int *n, int *ilo, int *ihi, float *h, int *ldh, float *wr, float *wi, int *iloz, int *ihiz, float *z, int *ldz, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr4K(JNIEnv *env, UNUSED jobject obj, jboolean wantt, jboolean wantz, jint n, jint ilo, jint ihi, jfloatArray h, jint offseth, jint ldh, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jint iloz, jint ihiz, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __nwantt; int __nwantz; int __ninfo = 0; float *__nh = NULL; float *__nwr = NULL; float *__nwi = NULL; float *__nz = NULL; float *__nwork = NULL; + jboolean __failed = FALSE; + int __nwantt; + int __nwantz; + int __ninfo = 0; + float *__nh = NULL; + float *__nwr = NULL; + float *__nwi = NULL; + float *__nz = NULL; + float *__nwork = NULL; __nwantt = wantt; __nwantz = wantz; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; - if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } slaqr4_(&__nwantt, &__nwantz, &n, &ilo, &ihi, __nh + offseth, &ldh, __nwr + offsetwr, __nwi + offsetwi, &iloz, &ihiz, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); - if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) wantz = __nwantz; - if (!failed) wantt = __nwantt; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, __failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) wantz = __nwantz; + if (!__failed) wantt = __nwantt; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaqr5_)(int *wantt, int *wantz, int *kacc22, int *n, int *ktop, int *kbot, int *nshfts, float *sr, float *si, float *h, int *ldh, int *iloz, int *ihiz, float *z, int *ldz, float *v, int *ldv, float *u, int *ldu, int *nv, float *wv, int *ldwv, int *nh, float *wh, int *ldwh); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqr5K(JNIEnv *env, UNUSED jobject obj, jboolean wantt, jboolean wantz, jint kacc22, jint n, jint ktop, jint kbot, jint nshfts, jfloatArray sr, jint offsetsr, jfloatArray si, jint offsetsi, jfloatArray h, jint offseth, jint ldh, jint iloz, jint ihiz, jfloatArray z, jint offsetz, jint ldz, jfloatArray v, jint offsetv, jint ldv, jfloatArray u, jint offsetu, jint ldu, jint nv, jfloatArray wv, jint offsetwv, jint ldwv, jint nh, jfloatArray wh, jint offsetwh, jint ldwh) { - jboolean failed = FALSE; - int __nwantt; int __nwantz; float *__nsr = NULL; float *__nsi = NULL; float *__nh = NULL; float *__nz = NULL; float *__nv = NULL; float *__nu = NULL; float *__nwv = NULL; float *__nwh = NULL; + jboolean __failed = FALSE; + int __nwantt; + int __nwantz; + float *__nsr = NULL; + float *__nsi = NULL; + float *__nh = NULL; + float *__nz = NULL; + float *__nv = NULL; + float *__nu = NULL; + float *__nwv = NULL; + float *__nwh = NULL; __nwantt = wantt; __nwantz = wantz; - if (!(__nsr = (*env)->GetPrimitiveArrayCritical(env, sr, NULL))) goto fail; - if (!(__nsi = (*env)->GetPrimitiveArrayCritical(env, si, NULL))) goto fail; - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; - if (!(__nwv = (*env)->GetPrimitiveArrayCritical(env, wv, NULL))) goto fail; - if (!(__nwh = (*env)->GetPrimitiveArrayCritical(env, wh, NULL))) goto fail; + if (!(__nsr = (*env)->GetPrimitiveArrayCritical(env, sr, NULL))) { __failed = TRUE; goto done; } + if (!(__nsi = (*env)->GetPrimitiveArrayCritical(env, si, NULL))) { __failed = TRUE; goto done; } + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) { __failed = TRUE; goto done; } + if (!(__nwv = (*env)->GetPrimitiveArrayCritical(env, wv, NULL))) { __failed = TRUE; goto done; } + if (!(__nwh = (*env)->GetPrimitiveArrayCritical(env, wh, NULL))) { __failed = TRUE; goto done; } slaqr5_(&__nwantt, &__nwantz, &kacc22, &n, &ktop, &kbot, &nshfts, __nsr + offsetsr, __nsi + offsetsi, __nh + offseth, &ldh, &iloz, &ihiz, __nz + offsetz, &ldz, __nv + offsetv, &ldv, __nu + offsetu, &ldu, &nv, __nwv + offsetwv, &ldwv, &nh, __nwh + offsetwh, &ldwh); done: - if (__nwh) (*env)->ReleasePrimitiveArrayCritical(env, wh, __nwh, failed ? JNI_ABORT : 0); - if (__nwv) (*env)->ReleasePrimitiveArrayCritical(env, wv, __nwv, failed ? JNI_ABORT : 0); - if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (__nsi) (*env)->ReleasePrimitiveArrayCritical(env, si, __nsi, failed ? JNI_ABORT : 0); - if (__nsr) (*env)->ReleasePrimitiveArrayCritical(env, sr, __nsr, failed ? JNI_ABORT : 0); - if (!failed) wantz = __nwantz; - if (!failed) wantt = __nwantt; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwh) (*env)->ReleasePrimitiveArrayCritical(env, wh, __nwh, __failed ? JNI_ABORT : 0); + if (__nwv) (*env)->ReleasePrimitiveArrayCritical(env, wv, __nwv, __failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (__nsi) (*env)->ReleasePrimitiveArrayCritical(env, si, __nsi, __failed ? JNI_ABORT : 0); + if (__nsr) (*env)->ReleasePrimitiveArrayCritical(env, sr, __nsr, __failed ? JNI_ABORT : 0); + if (!__failed) wantz = __nwantz; + if (!__failed) wantt = __nwantt; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaqsb_)(const char *uplo, int *n, int *kd, float *ab, int *ldab, float *s, float *scond, float *amax, char *equed); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqsbK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloatArray s, jint offsets, jfloat scond, jfloat amax, jobject equed) { - jboolean failed = FALSE; - const char *__nuplo = NULL; char *__nequed = NULL; jstring __jequed = NULL;; float *__nab = NULL; float *__ns = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + char *__nequed = NULL; jstring __jequed = NULL; + float *__nab = NULL; + float *__ns = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) { __failed = TRUE; goto done; } + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } slaqsb_(__nuplo, &n, &kd, __nab + offsetab, &ldab, __ns + offsets, &scond, &amax, __nequed); done: - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!__failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaqsp_)(const char *uplo, int *n, float *ap, float *s, float *scond, float *amax, char *equed); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqspK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray s, jint offsets, jfloat scond, jfloat amax, jobject equed) { - jboolean failed = FALSE; - const char *__nuplo = NULL; char *__nequed = NULL; jstring __jequed = NULL;; float *__nap = NULL; float *__ns = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + char *__nequed = NULL; jstring __jequed = NULL; + float *__nap = NULL; + float *__ns = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) { __failed = TRUE; goto done; } + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } slaqsp_(__nuplo, &n, __nap + offsetap, __ns + offsets, &scond, &amax, __nequed); done: - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!__failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaqsy_)(const char *uplo, int *n, float *a, int *lda, float *s, float *scond, float *amax, char *equed); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqsyK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray s, jint offsets, jfloat scond, jfloat amax, jobject equed) { - jboolean failed = FALSE; - const char *__nuplo = NULL; char *__nequed = NULL; jstring __jequed = NULL;; float *__na = NULL; float *__ns = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + char *__nequed = NULL; jstring __jequed = NULL; + float *__na = NULL; + float *__ns = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } slaqsy_(__nuplo, &n, __na + offseta, &lda, __ns + offsets, &scond, &amax, __nequed); done: - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!__failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaqtr_)(int *ltran, int *lreal, int *n, float *t, int *ldt, float *b, float *w, float *scale, float *x, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaqtrK(JNIEnv *env, UNUSED jobject obj, jboolean ltran, jboolean lreal, jint n, jfloatArray t, jint offsett, jint ldt, jfloatArray b, jint offsetb, jfloat w, jobject scale, jfloatArray x, jint offsetx, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __nltran; int __nlreal; float __nscale = 0; int __ninfo = 0; float *__nt = NULL; float *__nb = NULL; float *__nx = NULL; float *__nwork = NULL; + jboolean __failed = FALSE; + int __nltran; + int __nlreal; + float __nscale = 0; + int __ninfo = 0; + float *__nt = NULL; + float *__nb = NULL; + float *__nx = NULL; + float *__nwork = NULL; __nltran = ltran; __nlreal = lreal; __nscale = (*env)->GetFloatField(env, scale, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } slaqtr_(&__nltran, &__nlreal, &n, __nt + offsett, &ldt, __nb + offsetb, &w, &__nscale, __nx + offsetx, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); - if (!failed) lreal = __nlreal; - if (!failed) ltran = __nltran; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); + if (!__failed) lreal = __nlreal; + if (!__failed) ltran = __nltran; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slar1v_)(int *n, int *b1, int *bn, float *lambda, float *d, float *l, float *ld, float *lld, float *pivmin, float *gaptol, float *z, int *wantnc, int *negcnt, float *ztz, float *mingma, int *r, int *isuppz, float *nrminv, float *resid, float *rqcorr, float *work); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slar1vK(JNIEnv *env, UNUSED jobject obj, jint n, jint b1, jint bn, jfloat lambda, jfloatArray d, jint offsetd, jfloatArray l, jint offsetl, jfloatArray ld, jint offsetld, jfloatArray lld, jint offsetlld, jfloat pivmin, jfloat gaptol, jfloatArray z, jint offsetz, jboolean wantnc, jobject negcnt, jobject ztz, jobject mingma, jobject r, jintArray isuppz, jint offsetisuppz, jobject nrminv, jobject resid, jobject rqcorr, jfloatArray work, jint offsetwork) { - jboolean failed = FALSE; - int __nwantnc; int __nnegcnt = 0; float __nztz = 0; float __nmingma = 0; int __nr = 0; float __nnrminv = 0; float __nresid = 0; float __nrqcorr = 0; float *__nd = NULL; float *__nl = NULL; float *__nld = NULL; float *__nlld = NULL; float *__nz = NULL; int *__nisuppz = NULL; float *__nwork = NULL; + jboolean __failed = FALSE; + int __nwantnc; + int __nnegcnt = 0; + float __nztz = 0; + float __nmingma = 0; + int __nr = 0; + float __nnrminv = 0; + float __nresid = 0; + float __nrqcorr = 0; + float *__nd = NULL; + float *__nl = NULL; + float *__nld = NULL; + float *__nlld = NULL; + float *__nz = NULL; + int *__nisuppz = NULL; + float *__nwork = NULL; __nwantnc = wantnc; __nnegcnt = (*env)->GetIntField(env, negcnt, intW_val_fieldID); __nztz = (*env)->GetFloatField(env, ztz, floatW_val_fieldID); @@ -13783,922 +14790,993 @@ void Java_dev_ludovic_netlib_lapack_JNILAPACK_slar1vK(JNIEnv *env, UNUSED jobjec __nnrminv = (*env)->GetFloatField(env, nrminv, floatW_val_fieldID); __nresid = (*env)->GetFloatField(env, resid, floatW_val_fieldID); __nrqcorr = (*env)->GetFloatField(env, rqcorr, floatW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nl = (*env)->GetPrimitiveArrayCritical(env, l, NULL))) goto fail; - if (!(__nld = (*env)->GetPrimitiveArrayCritical(env, ld, NULL))) goto fail; - if (!(__nlld = (*env)->GetPrimitiveArrayCritical(env, lld, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nl = (*env)->GetPrimitiveArrayCritical(env, l, NULL))) { __failed = TRUE; goto done; } + if (!(__nld = (*env)->GetPrimitiveArrayCritical(env, ld, NULL))) { __failed = TRUE; goto done; } + if (!(__nlld = (*env)->GetPrimitiveArrayCritical(env, lld, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } slar1v_(&n, &b1, &bn, &lambda, __nd + offsetd, __nl + offsetl, __nld + offsetld, __nlld + offsetlld, &pivmin, &gaptol, __nz + offsetz, &__nwantnc, &__nnegcnt, &__nztz, &__nmingma, &__nr, __nisuppz + offsetisuppz, &__nnrminv, &__nresid, &__nrqcorr, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nlld) (*env)->ReleasePrimitiveArrayCritical(env, lld, __nlld, failed ? JNI_ABORT : 0); - if (__nld) (*env)->ReleasePrimitiveArrayCritical(env, ld, __nld, failed ? JNI_ABORT : 0); - if (__nl) (*env)->ReleasePrimitiveArrayCritical(env, l, __nl, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetFloatField(env, rqcorr, floatW_val_fieldID, __nrqcorr); - if (!failed) (*env)->SetFloatField(env, resid, floatW_val_fieldID, __nresid); - if (!failed) (*env)->SetFloatField(env, nrminv, floatW_val_fieldID, __nnrminv); - if (!failed) (*env)->SetIntField(env, r, intW_val_fieldID, __nr); - if (!failed) (*env)->SetFloatField(env, mingma, floatW_val_fieldID, __nmingma); - if (!failed) (*env)->SetFloatField(env, ztz, floatW_val_fieldID, __nztz); - if (!failed) (*env)->SetIntField(env, negcnt, intW_val_fieldID, __nnegcnt); - if (!failed) wantnc = __nwantnc; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nlld) (*env)->ReleasePrimitiveArrayCritical(env, lld, __nlld, __failed ? JNI_ABORT : 0); + if (__nld) (*env)->ReleasePrimitiveArrayCritical(env, ld, __nld, __failed ? JNI_ABORT : 0); + if (__nl) (*env)->ReleasePrimitiveArrayCritical(env, l, __nl, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetFloatField(env, rqcorr, floatW_val_fieldID, __nrqcorr); + if (!__failed) (*env)->SetFloatField(env, resid, floatW_val_fieldID, __nresid); + if (!__failed) (*env)->SetFloatField(env, nrminv, floatW_val_fieldID, __nnrminv); + if (!__failed) (*env)->SetIntField(env, r, intW_val_fieldID, __nr); + if (!__failed) (*env)->SetFloatField(env, mingma, floatW_val_fieldID, __nmingma); + if (!__failed) (*env)->SetFloatField(env, ztz, floatW_val_fieldID, __nztz); + if (!__failed) (*env)->SetIntField(env, negcnt, intW_val_fieldID, __nnegcnt); + if (!__failed) wantnc = __nwantnc; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slar2v_)(int *n, float *x, float *y, float *z, int *incx, float *c, float *s, int *incc); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slar2vK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray x, jint offsetx, jfloatArray y, jint offsety, jfloatArray z, jint offsetz, jint incx, jfloatArray c, jint offsetc, jfloatArray s, jint offsets, jint incc) { - jboolean failed = FALSE; - float *__nx = NULL; float *__ny = NULL; float *__nz = NULL; float *__nc = NULL; float *__ns = NULL; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + jboolean __failed = FALSE; + float *__nx = NULL; + float *__ny = NULL; + float *__nz = NULL; + float *__nc = NULL; + float *__ns = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } slar2v_(&n, __nx + offsetx, __ny + offsety, __nz + offsetz, &incx, __nc + offsetc, __ns + offsets, &incc); done: - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slarf_)(const char *side, int *m, int *n, float *v, int *incv, float *tau, float *c, int *Ldc, float *work); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarfK(JNIEnv *env, UNUSED jobject obj, jstring side, jint m, jint n, jfloatArray v, jint offsetv, jint incv, jfloat tau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork) { - jboolean failed = FALSE; - const char *__nside = NULL; float *__nv = NULL; float *__nc = NULL; float *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + float *__nv = NULL; + float *__nc = NULL; + float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } slarf_(__nside, &m, &n, __nv + offsetv, &incv, &tau, __nc + offsetc, &Ldc, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slarfb_)(const char *side, const char *trans, const char *direct, const char *storev, int *m, int *n, int *k, float *v, int *ldv, float *t, int *ldt, float *c, int *Ldc, float *work, int *ldwork); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarfbK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jstring direct, jstring storev, jint m, jint n, jint k, jfloatArray v, jint offsetv, jint ldv, jfloatArray t, jint offsett, jint ldt, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint ldwork) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__ntrans = NULL; const char *__ndirect = NULL; const char *__nstorev = NULL; float *__nv = NULL; float *__nt = NULL; float *__nc = NULL; float *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndirect = (*env)->GetStringUTFChars(env, direct, NULL))) goto fail; - if (!(__nstorev = (*env)->GetStringUTFChars(env, storev, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__ntrans = NULL; + const char *__ndirect = NULL; + const char *__nstorev = NULL; + float *__nv = NULL; + float *__nt = NULL; + float *__nc = NULL; + float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndirect = (*env)->GetStringUTFChars(env, direct, NULL))) { __failed = TRUE; goto done; } + if (!(__nstorev = (*env)->GetStringUTFChars(env, storev, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } slarfb_(__nside, __ntrans, __ndirect, __nstorev, &m, &n, &k, __nv + offsetv, &ldv, __nt + offsett, &ldt, __nc + offsetc, &Ldc, __nwork + offsetwork, &ldwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); if (__nstorev) (*env)->ReleaseStringUTFChars(env, storev, __nstorev); if (__ndirect) (*env)->ReleaseStringUTFChars(env, direct, __ndirect); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slarfg_)(int *n, float *alpha, float *x, int *incx, float *tau); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarfgK(JNIEnv *env, UNUSED jobject obj, jint n, jobject alpha, jfloatArray x, jint offsetx, jint incx, jobject tau) { - jboolean failed = FALSE; - float __nalpha = 0; float __ntau = 0; float *__nx = NULL; + jboolean __failed = FALSE; + float __nalpha = 0; + float __ntau = 0; + float *__nx = NULL; __nalpha = (*env)->GetFloatField(env, alpha, floatW_val_fieldID); __ntau = (*env)->GetFloatField(env, tau, floatW_val_fieldID); - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } slarfg_(&n, &__nalpha, __nx + offsetx, &incx, &__ntau); done: - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetFloatField(env, tau, floatW_val_fieldID, __ntau); - if (!failed) (*env)->SetFloatField(env, alpha, floatW_val_fieldID, __nalpha); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetFloatField(env, tau, floatW_val_fieldID, __ntau); + if (!__failed) (*env)->SetFloatField(env, alpha, floatW_val_fieldID, __nalpha); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slarft_)(const char *direct, const char *storev, int *n, int *k, float *v, int *ldv, float *tau, float *t, int *ldt); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarftK(JNIEnv *env, UNUSED jobject obj, jstring direct, jstring storev, jint n, jint k, jfloatArray v, jint offsetv, jint ldv, jfloatArray tau, jint offsettau, jfloatArray t, jint offsett, jint ldt) { - jboolean failed = FALSE; - const char *__ndirect = NULL; const char *__nstorev = NULL; float *__nv = NULL; float *__ntau = NULL; float *__nt = NULL; - if (!(__ndirect = (*env)->GetStringUTFChars(env, direct, NULL))) goto fail; - if (!(__nstorev = (*env)->GetStringUTFChars(env, storev, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ndirect = NULL; + const char *__nstorev = NULL; + float *__nv = NULL; + float *__ntau = NULL; + float *__nt = NULL; + if (!(__ndirect = (*env)->GetStringUTFChars(env, direct, NULL))) { __failed = TRUE; goto done; } + if (!(__nstorev = (*env)->GetStringUTFChars(env, storev, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) { __failed = TRUE; goto done; } slarft_(__ndirect, __nstorev, &n, &k, __nv + offsetv, &ldv, __ntau + offsettau, __nt + offsett, &ldt); done: - if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); if (__nstorev) (*env)->ReleaseStringUTFChars(env, storev, __nstorev); if (__ndirect) (*env)->ReleaseStringUTFChars(env, direct, __ndirect); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slarfx_)(const char *side, int *m, int *n, float *v, float *tau, float *c, int *Ldc, float *work); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarfxK(JNIEnv *env, UNUSED jobject obj, jstring side, jint m, jint n, jfloatArray v, jint offsetv, jfloat tau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork) { - jboolean failed = FALSE; - const char *__nside = NULL; float *__nv = NULL; float *__nc = NULL; float *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + float *__nv = NULL; + float *__nc = NULL; + float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } slarfx_(__nside, &m, &n, __nv + offsetv, &tau, __nc + offsetc, &Ldc, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slargv_)(int *n, float *x, int *incx, float *y, int *incy, float *c, int *incc); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slargvK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy, jfloatArray c, jint offsetc, jint incc) { - jboolean failed = FALSE; - float *__nx = NULL; float *__ny = NULL; float *__nc = NULL; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + jboolean __failed = FALSE; + float *__nx = NULL; + float *__ny = NULL; + float *__nc = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } slargv_(&n, __nx + offsetx, &incx, __ny + offsety, &incy, __nc + offsetc, &incc); done: - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slarnv_)(int *idist, int *iseed, int *n, float *x); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarnvK(JNIEnv *env, UNUSED jobject obj, jint idist, jintArray iseed, jint offsetiseed, jint n, jfloatArray x, jint offsetx) { - jboolean failed = FALSE; - int *__niseed = NULL; float *__nx = NULL; - if (!(__niseed = (*env)->GetPrimitiveArrayCritical(env, iseed, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + jboolean __failed = FALSE; + int *__niseed = NULL; + float *__nx = NULL; + if (!(__niseed = (*env)->GetPrimitiveArrayCritical(env, iseed, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } slarnv_(&idist, __niseed + offsetiseed, &n, __nx + offsetx); done: - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__niseed) (*env)->ReleasePrimitiveArrayCritical(env, iseed, __niseed, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__niseed) (*env)->ReleasePrimitiveArrayCritical(env, iseed, __niseed, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slarra_)(int *n, float *d, float *e, float *e2, float *spltol, float *tnrm, int *nsplit, int *isplit, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarraK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray e2, jint offsete2, jfloat spltol, jfloat tnrm, jobject nsplit, jintArray isplit, jint offsetisplit, jobject info) { - jboolean failed = FALSE; - int __nnsplit = 0; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__ne2 = NULL; int *__nisplit = NULL; + jboolean __failed = FALSE; + int __nnsplit = 0; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; + float *__ne2 = NULL; + int *__nisplit = NULL; __nnsplit = (*env)->GetIntField(env, nsplit, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) goto fail; - if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) { __failed = TRUE; goto done; } + if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) { __failed = TRUE; goto done; } slarra_(&n, __nd + offsetd, __ne + offsete, __ne2 + offsete2, &spltol, &tnrm, &__nnsplit, __nisplit + offsetisplit, &__ninfo); done: - if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, failed ? JNI_ABORT : 0); - if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, nsplit, intW_val_fieldID, __nnsplit); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, __failed ? JNI_ABORT : 0); + if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, nsplit, intW_val_fieldID, __nnsplit); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slarrb_)(int *n, float *d, float *lld, int *ifirst, int *ilast, float *rtol1, float *rtol2, int *offset, float *w, float *wgap, float *werr, float *work, int *iwork, float *pivmin, float *spdiam, int *twist, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrbK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray d, jint offsetd, jfloatArray lld, jint offsetlld, jint ifirst, jint ilast, jfloat rtol1, jfloat rtol2, jint offset, jfloatArray w, jint offsetw, jfloatArray wgap, jint offsetwgap, jfloatArray werr, jint offsetwerr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jfloat pivmin, jfloat spdiam, jint twist, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__nd = NULL; float *__nlld = NULL; float *__nw = NULL; float *__nwgap = NULL; float *__nwerr = NULL; float *__nwork = NULL; int *__niwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nlld = (*env)->GetPrimitiveArrayCritical(env, lld, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nwgap = (*env)->GetPrimitiveArrayCritical(env, wgap, NULL))) goto fail; - if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__nd = NULL; + float *__nlld = NULL; + float *__nw = NULL; + float *__nwgap = NULL; + float *__nwerr = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nlld = (*env)->GetPrimitiveArrayCritical(env, lld, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nwgap = (*env)->GetPrimitiveArrayCritical(env, wgap, NULL))) { __failed = TRUE; goto done; } + if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } slarrb_(&n, __nd + offsetd, __nlld + offsetlld, &ifirst, &ilast, &rtol1, &rtol2, &offset, __nw + offsetw, __nwgap + offsetwgap, __nwerr + offsetwerr, __nwork + offsetwork, __niwork + offsetiwork, &pivmin, &spdiam, &twist, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, failed ? JNI_ABORT : 0); - if (__nwgap) (*env)->ReleasePrimitiveArrayCritical(env, wgap, __nwgap, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nlld) (*env)->ReleasePrimitiveArrayCritical(env, lld, __nlld, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, __failed ? JNI_ABORT : 0); + if (__nwgap) (*env)->ReleasePrimitiveArrayCritical(env, wgap, __nwgap, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nlld) (*env)->ReleasePrimitiveArrayCritical(env, lld, __nlld, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slarrc_)(const char *jobt, int *n, float *vl, float *vu, float *d, float *e, float *pivmin, int *eigcnt, int *lcnt, int *rcnt, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrcK(JNIEnv *env, UNUSED jobject obj, jstring jobt, jint n, jfloat vl, jfloat vu, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloat pivmin, jobject eigcnt, jobject lcnt, jobject rcnt, jobject info) { - jboolean failed = FALSE; - const char *__njobt = NULL; int __neigcnt = 0; int __nlcnt = 0; int __nrcnt = 0; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; - if (!(__njobt = (*env)->GetStringUTFChars(env, jobt, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobt = NULL; + int __neigcnt = 0; + int __nlcnt = 0; + int __nrcnt = 0; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; + if (!(__njobt = (*env)->GetStringUTFChars(env, jobt, NULL))) { __failed = TRUE; goto done; } __neigcnt = (*env)->GetIntField(env, eigcnt, intW_val_fieldID); __nlcnt = (*env)->GetIntField(env, lcnt, intW_val_fieldID); __nrcnt = (*env)->GetIntField(env, rcnt, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } slarrc_(__njobt, &n, &vl, &vu, __nd + offsetd, __ne + offsete, &pivmin, &__neigcnt, &__nlcnt, &__nrcnt, &__ninfo); done: - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, rcnt, intW_val_fieldID, __nrcnt); - if (!failed) (*env)->SetIntField(env, lcnt, intW_val_fieldID, __nlcnt); - if (!failed) (*env)->SetIntField(env, eigcnt, intW_val_fieldID, __neigcnt); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, rcnt, intW_val_fieldID, __nrcnt); + if (!__failed) (*env)->SetIntField(env, lcnt, intW_val_fieldID, __nlcnt); + if (!__failed) (*env)->SetIntField(env, eigcnt, intW_val_fieldID, __neigcnt); if (__njobt) (*env)->ReleaseStringUTFChars(env, jobt, __njobt); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slarrd_)(const char *range, const char *order, int *n, float *vl, float *vu, int *il, int *iu, float *gers, float *reltol, float *d, float *e, float *e2, float *pivmin, int *nsplit, int *isplit, int *m, float *w, float *werr, float *wl, float *wu, int *iblock, int *indexw, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrdK(JNIEnv *env, UNUSED jobject obj, jstring range, jstring order, jint n, jfloat vl, jfloat vu, jint il, jint iu, jfloatArray gers, jint offsetgers, jfloat reltol, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray e2, jint offsete2, jfloat pivmin, jint nsplit, jintArray isplit, jint offsetisplit, jobject m, jfloatArray w, jint offsetw, jfloatArray werr, jint offsetwerr, jobject wl, jobject wu, jintArray iblock, jint offsetiblock, jintArray indexw, jint offsetindexw, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nrange = NULL; const char *__norder = NULL; int __nm = 0; float __nwl = 0; float __nwu = 0; int __ninfo = 0; float *__ngers = NULL; float *__nd = NULL; float *__ne = NULL; float *__ne2 = NULL; int *__nisplit = NULL; float *__nw = NULL; float *__nwerr = NULL; int *__niblock = NULL; int *__nindexw = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; - if (!(__norder = (*env)->GetStringUTFChars(env, order, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nrange = NULL; + const char *__norder = NULL; + int __nm = 0; + float __nwl = 0; + float __nwu = 0; + int __ninfo = 0; + float *__ngers = NULL; + float *__nd = NULL; + float *__ne = NULL; + float *__ne2 = NULL; + int *__nisplit = NULL; + float *__nw = NULL; + float *__nwerr = NULL; + int *__niblock = NULL; + int *__nindexw = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) { __failed = TRUE; goto done; } + if (!(__norder = (*env)->GetStringUTFChars(env, order, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __nwl = (*env)->GetFloatField(env, wl, floatW_val_fieldID); __nwu = (*env)->GetFloatField(env, wu, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__ngers = (*env)->GetPrimitiveArrayCritical(env, gers, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) goto fail; - if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) goto fail; - if (!(__niblock = (*env)->GetPrimitiveArrayCritical(env, iblock, NULL))) goto fail; - if (!(__nindexw = (*env)->GetPrimitiveArrayCritical(env, indexw, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__ngers = (*env)->GetPrimitiveArrayCritical(env, gers, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) { __failed = TRUE; goto done; } + if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) { __failed = TRUE; goto done; } + if (!(__niblock = (*env)->GetPrimitiveArrayCritical(env, iblock, NULL))) { __failed = TRUE; goto done; } + if (!(__nindexw = (*env)->GetPrimitiveArrayCritical(env, indexw, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } slarrd_(__nrange, __norder, &n, &vl, &vu, &il, &iu, __ngers + offsetgers, &reltol, __nd + offsetd, __ne + offsete, __ne2 + offsete2, &pivmin, &nsplit, __nisplit + offsetisplit, &__nm, __nw + offsetw, __nwerr + offsetwerr, &__nwl, &__nwu, __niblock + offsetiblock, __nindexw + offsetindexw, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nindexw) (*env)->ReleasePrimitiveArrayCritical(env, indexw, __nindexw, failed ? JNI_ABORT : 0); - if (__niblock) (*env)->ReleasePrimitiveArrayCritical(env, iblock, __niblock, failed ? JNI_ABORT : 0); - if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, failed ? JNI_ABORT : 0); - if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__ngers) (*env)->ReleasePrimitiveArrayCritical(env, gers, __ngers, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, wu, floatW_val_fieldID, __nwu); - if (!failed) (*env)->SetFloatField(env, wl, floatW_val_fieldID, __nwl); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nindexw) (*env)->ReleasePrimitiveArrayCritical(env, indexw, __nindexw, __failed ? JNI_ABORT : 0); + if (__niblock) (*env)->ReleasePrimitiveArrayCritical(env, iblock, __niblock, __failed ? JNI_ABORT : 0); + if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, __failed ? JNI_ABORT : 0); + if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__ngers) (*env)->ReleasePrimitiveArrayCritical(env, gers, __ngers, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, wu, floatW_val_fieldID, __nwu); + if (!__failed) (*env)->SetFloatField(env, wl, floatW_val_fieldID, __nwl); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__norder) (*env)->ReleaseStringUTFChars(env, order, __norder); if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slarre_)(const char *range, int *n, float *vl, float *vu, int *il, int *iu, float *d, float *e, float *e2, float *rtol1, float *rtol2, float *spltol, int *nsplit, int *isplit, int *m, float *w, float *werr, float *wgap, int *iblock, int *indexw, float *gers, float *pivmin, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarreK(JNIEnv *env, UNUSED jobject obj, jstring range, jint n, jobject vl, jobject vu, jint il, jint iu, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray e2, jint offsete2, jfloat rtol1, jfloat rtol2, jfloat spltol, jobject nsplit, jintArray isplit, jint offsetisplit, jobject m, jfloatArray w, jint offsetw, jfloatArray werr, jint offsetwerr, jfloatArray wgap, jint offsetwgap, jintArray iblock, jint offsetiblock, jintArray indexw, jint offsetindexw, jfloatArray gers, jint offsetgers, jobject pivmin, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nrange = NULL; float __nvl = 0; float __nvu = 0; int __nnsplit = 0; int __nm = 0; float __npivmin = 0; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__ne2 = NULL; int *__nisplit = NULL; float *__nw = NULL; float *__nwerr = NULL; float *__nwgap = NULL; int *__niblock = NULL; int *__nindexw = NULL; float *__ngers = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nrange = NULL; + float __nvl = 0; + float __nvu = 0; + int __nnsplit = 0; + int __nm = 0; + float __npivmin = 0; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; + float *__ne2 = NULL; + int *__nisplit = NULL; + float *__nw = NULL; + float *__nwerr = NULL; + float *__nwgap = NULL; + int *__niblock = NULL; + int *__nindexw = NULL; + float *__ngers = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) { __failed = TRUE; goto done; } __nvl = (*env)->GetFloatField(env, vl, floatW_val_fieldID); __nvu = (*env)->GetFloatField(env, vu, floatW_val_fieldID); __nnsplit = (*env)->GetIntField(env, nsplit, intW_val_fieldID); __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __npivmin = (*env)->GetFloatField(env, pivmin, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) goto fail; - if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) goto fail; - if (!(__nwgap = (*env)->GetPrimitiveArrayCritical(env, wgap, NULL))) goto fail; - if (!(__niblock = (*env)->GetPrimitiveArrayCritical(env, iblock, NULL))) goto fail; - if (!(__nindexw = (*env)->GetPrimitiveArrayCritical(env, indexw, NULL))) goto fail; - if (!(__ngers = (*env)->GetPrimitiveArrayCritical(env, gers, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) { __failed = TRUE; goto done; } + if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwgap = (*env)->GetPrimitiveArrayCritical(env, wgap, NULL))) { __failed = TRUE; goto done; } + if (!(__niblock = (*env)->GetPrimitiveArrayCritical(env, iblock, NULL))) { __failed = TRUE; goto done; } + if (!(__nindexw = (*env)->GetPrimitiveArrayCritical(env, indexw, NULL))) { __failed = TRUE; goto done; } + if (!(__ngers = (*env)->GetPrimitiveArrayCritical(env, gers, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } slarre_(__nrange, &n, &__nvl, &__nvu, &il, &iu, __nd + offsetd, __ne + offsete, __ne2 + offsete2, &rtol1, &rtol2, &spltol, &__nnsplit, __nisplit + offsetisplit, &__nm, __nw + offsetw, __nwerr + offsetwerr, __nwgap + offsetwgap, __niblock + offsetiblock, __nindexw + offsetindexw, __ngers + offsetgers, &__npivmin, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ngers) (*env)->ReleasePrimitiveArrayCritical(env, gers, __ngers, failed ? JNI_ABORT : 0); - if (__nindexw) (*env)->ReleasePrimitiveArrayCritical(env, indexw, __nindexw, failed ? JNI_ABORT : 0); - if (__niblock) (*env)->ReleasePrimitiveArrayCritical(env, iblock, __niblock, failed ? JNI_ABORT : 0); - if (__nwgap) (*env)->ReleasePrimitiveArrayCritical(env, wgap, __nwgap, failed ? JNI_ABORT : 0); - if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, failed ? JNI_ABORT : 0); - if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, pivmin, floatW_val_fieldID, __npivmin); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); - if (!failed) (*env)->SetIntField(env, nsplit, intW_val_fieldID, __nnsplit); - if (!failed) (*env)->SetFloatField(env, vu, floatW_val_fieldID, __nvu); - if (!failed) (*env)->SetFloatField(env, vl, floatW_val_fieldID, __nvl); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ngers) (*env)->ReleasePrimitiveArrayCritical(env, gers, __ngers, __failed ? JNI_ABORT : 0); + if (__nindexw) (*env)->ReleasePrimitiveArrayCritical(env, indexw, __nindexw, __failed ? JNI_ABORT : 0); + if (__niblock) (*env)->ReleasePrimitiveArrayCritical(env, iblock, __niblock, __failed ? JNI_ABORT : 0); + if (__nwgap) (*env)->ReleasePrimitiveArrayCritical(env, wgap, __nwgap, __failed ? JNI_ABORT : 0); + if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, __failed ? JNI_ABORT : 0); + if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, pivmin, floatW_val_fieldID, __npivmin); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (!__failed) (*env)->SetIntField(env, nsplit, intW_val_fieldID, __nnsplit); + if (!__failed) (*env)->SetFloatField(env, vu, floatW_val_fieldID, __nvu); + if (!__failed) (*env)->SetFloatField(env, vl, floatW_val_fieldID, __nvl); if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slarrf_)(int *n, float *d, float *l, float *ld, int *clstrt, int *clend, float *w, float *wgap, float *werr, float *spdiam, float *clgapl, float *clgapr, float *pivmin, float *sigma, float *dplus, float *lplus, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrfK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray d, jint offsetd, jfloatArray l, jint offsetl, jfloatArray ld, jint offsetld, jint clstrt, jint clend, jfloatArray w, jint offsetw, jfloatArray wgap, jint offsetwgap, jfloatArray werr, jint offsetwerr, jfloat spdiam, jfloat clgapl, jfloat clgapr, jfloat pivmin, jobject sigma, jfloatArray dplus, jint offsetdplus, jfloatArray lplus, jint offsetlplus, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - float __nsigma = 0; int __ninfo = 0; float *__nd = NULL; float *__nl = NULL; float *__nld = NULL; float *__nw = NULL; float *__nwgap = NULL; float *__nwerr = NULL; float *__ndplus = NULL; float *__nlplus = NULL; float *__nwork = NULL; + jboolean __failed = FALSE; + float __nsigma = 0; + int __ninfo = 0; + float *__nd = NULL; + float *__nl = NULL; + float *__nld = NULL; + float *__nw = NULL; + float *__nwgap = NULL; + float *__nwerr = NULL; + float *__ndplus = NULL; + float *__nlplus = NULL; + float *__nwork = NULL; __nsigma = (*env)->GetFloatField(env, sigma, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nl = (*env)->GetPrimitiveArrayCritical(env, l, NULL))) goto fail; - if (!(__nld = (*env)->GetPrimitiveArrayCritical(env, ld, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nwgap = (*env)->GetPrimitiveArrayCritical(env, wgap, NULL))) goto fail; - if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) goto fail; - if (!(__ndplus = (*env)->GetPrimitiveArrayCritical(env, dplus, NULL))) goto fail; - if (!(__nlplus = (*env)->GetPrimitiveArrayCritical(env, lplus, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nl = (*env)->GetPrimitiveArrayCritical(env, l, NULL))) { __failed = TRUE; goto done; } + if (!(__nld = (*env)->GetPrimitiveArrayCritical(env, ld, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nwgap = (*env)->GetPrimitiveArrayCritical(env, wgap, NULL))) { __failed = TRUE; goto done; } + if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) { __failed = TRUE; goto done; } + if (!(__ndplus = (*env)->GetPrimitiveArrayCritical(env, dplus, NULL))) { __failed = TRUE; goto done; } + if (!(__nlplus = (*env)->GetPrimitiveArrayCritical(env, lplus, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } slarrf_(&n, __nd + offsetd, __nl + offsetl, __nld + offsetld, &clstrt, &clend, __nw + offsetw, __nwgap + offsetwgap, __nwerr + offsetwerr, &spdiam, &clgapl, &clgapr, &pivmin, &__nsigma, __ndplus + offsetdplus, __nlplus + offsetlplus, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nlplus) (*env)->ReleasePrimitiveArrayCritical(env, lplus, __nlplus, failed ? JNI_ABORT : 0); - if (__ndplus) (*env)->ReleasePrimitiveArrayCritical(env, dplus, __ndplus, failed ? JNI_ABORT : 0); - if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, failed ? JNI_ABORT : 0); - if (__nwgap) (*env)->ReleasePrimitiveArrayCritical(env, wgap, __nwgap, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nld) (*env)->ReleasePrimitiveArrayCritical(env, ld, __nld, failed ? JNI_ABORT : 0); - if (__nl) (*env)->ReleasePrimitiveArrayCritical(env, l, __nl, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, sigma, floatW_val_fieldID, __nsigma); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nlplus) (*env)->ReleasePrimitiveArrayCritical(env, lplus, __nlplus, __failed ? JNI_ABORT : 0); + if (__ndplus) (*env)->ReleasePrimitiveArrayCritical(env, dplus, __ndplus, __failed ? JNI_ABORT : 0); + if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, __failed ? JNI_ABORT : 0); + if (__nwgap) (*env)->ReleasePrimitiveArrayCritical(env, wgap, __nwgap, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nld) (*env)->ReleasePrimitiveArrayCritical(env, ld, __nld, __failed ? JNI_ABORT : 0); + if (__nl) (*env)->ReleasePrimitiveArrayCritical(env, l, __nl, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, sigma, floatW_val_fieldID, __nsigma); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slarrj_)(int *n, float *d, float *e2, int *ifirst, int *ilast, float *rtol, int *offset, float *w, float *werr, float *work, int *iwork, float *pivmin, float *spdiam, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrjK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray d, jint offsetd, jfloatArray e2, jint offsete2, jint ifirst, jint ilast, jfloat rtol, jint offset, jfloatArray w, jint offsetw, jfloatArray werr, jint offsetwerr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jfloat pivmin, jfloat spdiam, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__nd = NULL; float *__ne2 = NULL; float *__nw = NULL; float *__nwerr = NULL; float *__nwork = NULL; int *__niwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__nd = NULL; + float *__ne2 = NULL; + float *__nw = NULL; + float *__nwerr = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } slarrj_(&n, __nd + offsetd, __ne2 + offsete2, &ifirst, &ilast, &rtol, &offset, __nw + offsetw, __nwerr + offsetwerr, __nwork + offsetwork, __niwork + offsetiwork, &pivmin, &spdiam, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slarrk_)(int *n, int *iw, float *gl, float *gu, float *d, float *e2, float *pivmin, float *reltol, float *w, float *werr, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrkK(JNIEnv *env, UNUSED jobject obj, jint n, jint iw, jfloat gl, jfloat gu, jfloatArray d, jint offsetd, jfloatArray e2, jint offsete2, jfloat pivmin, jfloat reltol, jobject w, jobject werr, jobject info) { - jboolean failed = FALSE; - float __nw = 0; float __nwerr = 0; int __ninfo = 0; float *__nd = NULL; float *__ne2 = NULL; + jboolean __failed = FALSE; + float __nw = 0; + float __nwerr = 0; + int __ninfo = 0; + float *__nd = NULL; + float *__ne2 = NULL; __nw = (*env)->GetFloatField(env, w, floatW_val_fieldID); __nwerr = (*env)->GetFloatField(env, werr, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne2 = (*env)->GetPrimitiveArrayCritical(env, e2, NULL))) { __failed = TRUE; goto done; } slarrk_(&n, &iw, &gl, &gu, __nd + offsetd, __ne2 + offsete2, &pivmin, &reltol, &__nw, &__nwerr, &__ninfo); done: - if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, werr, floatW_val_fieldID, __nwerr); - if (!failed) (*env)->SetFloatField(env, w, floatW_val_fieldID, __nw); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ne2) (*env)->ReleasePrimitiveArrayCritical(env, e2, __ne2, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, werr, floatW_val_fieldID, __nwerr); + if (!__failed) (*env)->SetFloatField(env, w, floatW_val_fieldID, __nw); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slarrr_)(int *n, float *d, float *e, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrrK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } slarrr_(&n, __nd + offsetd, __ne + offsete, &__ninfo); done: - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slarrv_)(int *n, float *vl, float *vu, float *d, float *l, float *pivmin, int *isplit, int *m, int *dol, int *dou, float *minrgp, float *rtol1, float *rtol2, float *w, float *werr, float *wgap, int *iblock, int *indexw, float *gers, float *z, int *ldz, int *isuppz, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarrvK(JNIEnv *env, UNUSED jobject obj, jint n, jfloat vl, jfloat vu, jfloatArray d, jint offsetd, jfloatArray l, jint offsetl, jfloat pivmin, jintArray isplit, jint offsetisplit, jint m, jint dol, jint dou, jfloat minrgp, jobject rtol1, jobject rtol2, jfloatArray w, jint offsetw, jfloatArray werr, jint offsetwerr, jfloatArray wgap, jint offsetwgap, jintArray iblock, jint offsetiblock, jintArray indexw, jint offsetindexw, jfloatArray gers, jint offsetgers, jfloatArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - float __nrtol1 = 0; float __nrtol2 = 0; int __ninfo = 0; float *__nd = NULL; float *__nl = NULL; int *__nisplit = NULL; float *__nw = NULL; float *__nwerr = NULL; float *__nwgap = NULL; int *__niblock = NULL; int *__nindexw = NULL; float *__ngers = NULL; float *__nz = NULL; int *__nisuppz = NULL; float *__nwork = NULL; int *__niwork = NULL; + jboolean __failed = FALSE; + float __nrtol1 = 0; + float __nrtol2 = 0; + int __ninfo = 0; + float *__nd = NULL; + float *__nl = NULL; + int *__nisplit = NULL; + float *__nw = NULL; + float *__nwerr = NULL; + float *__nwgap = NULL; + int *__niblock = NULL; + int *__nindexw = NULL; + float *__ngers = NULL; + float *__nz = NULL; + int *__nisuppz = NULL; + float *__nwork = NULL; + int *__niwork = NULL; __nrtol1 = (*env)->GetFloatField(env, rtol1, floatW_val_fieldID); __nrtol2 = (*env)->GetFloatField(env, rtol2, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nl = (*env)->GetPrimitiveArrayCritical(env, l, NULL))) goto fail; - if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) goto fail; - if (!(__nwgap = (*env)->GetPrimitiveArrayCritical(env, wgap, NULL))) goto fail; - if (!(__niblock = (*env)->GetPrimitiveArrayCritical(env, iblock, NULL))) goto fail; - if (!(__nindexw = (*env)->GetPrimitiveArrayCritical(env, indexw, NULL))) goto fail; - if (!(__ngers = (*env)->GetPrimitiveArrayCritical(env, gers, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nl = (*env)->GetPrimitiveArrayCritical(env, l, NULL))) { __failed = TRUE; goto done; } + if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nwerr = (*env)->GetPrimitiveArrayCritical(env, werr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwgap = (*env)->GetPrimitiveArrayCritical(env, wgap, NULL))) { __failed = TRUE; goto done; } + if (!(__niblock = (*env)->GetPrimitiveArrayCritical(env, iblock, NULL))) { __failed = TRUE; goto done; } + if (!(__nindexw = (*env)->GetPrimitiveArrayCritical(env, indexw, NULL))) { __failed = TRUE; goto done; } + if (!(__ngers = (*env)->GetPrimitiveArrayCritical(env, gers, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } slarrv_(&n, &vl, &vu, __nd + offsetd, __nl + offsetl, &pivmin, __nisplit + offsetisplit, &m, &dol, &dou, &minrgp, &__nrtol1, &__nrtol2, __nw + offsetw, __nwerr + offsetwerr, __nwgap + offsetwgap, __niblock + offsetiblock, __nindexw + offsetindexw, __ngers + offsetgers, __nz + offsetz, &ldz, __nisuppz + offsetisuppz, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__ngers) (*env)->ReleasePrimitiveArrayCritical(env, gers, __ngers, failed ? JNI_ABORT : 0); - if (__nindexw) (*env)->ReleasePrimitiveArrayCritical(env, indexw, __nindexw, failed ? JNI_ABORT : 0); - if (__niblock) (*env)->ReleasePrimitiveArrayCritical(env, iblock, __niblock, failed ? JNI_ABORT : 0); - if (__nwgap) (*env)->ReleasePrimitiveArrayCritical(env, wgap, __nwgap, failed ? JNI_ABORT : 0); - if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, failed ? JNI_ABORT : 0); - if (__nl) (*env)->ReleasePrimitiveArrayCritical(env, l, __nl, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, rtol2, floatW_val_fieldID, __nrtol2); - if (!failed) (*env)->SetFloatField(env, rtol1, floatW_val_fieldID, __nrtol1); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__ngers) (*env)->ReleasePrimitiveArrayCritical(env, gers, __ngers, __failed ? JNI_ABORT : 0); + if (__nindexw) (*env)->ReleasePrimitiveArrayCritical(env, indexw, __nindexw, __failed ? JNI_ABORT : 0); + if (__niblock) (*env)->ReleasePrimitiveArrayCritical(env, iblock, __niblock, __failed ? JNI_ABORT : 0); + if (__nwgap) (*env)->ReleasePrimitiveArrayCritical(env, wgap, __nwgap, __failed ? JNI_ABORT : 0); + if (__nwerr) (*env)->ReleasePrimitiveArrayCritical(env, werr, __nwerr, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, __failed ? JNI_ABORT : 0); + if (__nl) (*env)->ReleasePrimitiveArrayCritical(env, l, __nl, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, rtol2, floatW_val_fieldID, __nrtol2); + if (!__failed) (*env)->SetFloatField(env, rtol1, floatW_val_fieldID, __nrtol1); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slartg_)(float *f, float *g, float *cs, float *sn, float *r); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slartgK(JNIEnv *env, UNUSED jobject obj, jfloat f, jfloat g, jobject cs, jobject sn, jobject r) { - jboolean failed = FALSE; - float __ncs = 0; float __nsn = 0; float __nr = 0; + jboolean __failed = FALSE; + float __ncs = 0; + float __nsn = 0; + float __nr = 0; __ncs = (*env)->GetFloatField(env, cs, floatW_val_fieldID); __nsn = (*env)->GetFloatField(env, sn, floatW_val_fieldID); __nr = (*env)->GetFloatField(env, r, floatW_val_fieldID); slartg_(&f, &g, &__ncs, &__nsn, &__nr); done: - if (!failed) (*env)->SetFloatField(env, r, floatW_val_fieldID, __nr); - if (!failed) (*env)->SetFloatField(env, sn, floatW_val_fieldID, __nsn); - if (!failed) (*env)->SetFloatField(env, cs, floatW_val_fieldID, __ncs); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetFloatField(env, r, floatW_val_fieldID, __nr); + if (!__failed) (*env)->SetFloatField(env, sn, floatW_val_fieldID, __nsn); + if (!__failed) (*env)->SetFloatField(env, cs, floatW_val_fieldID, __ncs); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slartv_)(int *n, float *x, int *incx, float *y, int *incy, float *c, float *s, int *incc); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slartvK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy, jfloatArray c, jint offsetc, jfloatArray s, jint offsets, jint incc) { - jboolean failed = FALSE; - float *__nx = NULL; float *__ny = NULL; float *__nc = NULL; float *__ns = NULL; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + jboolean __failed = FALSE; + float *__nx = NULL; + float *__ny = NULL; + float *__nc = NULL; + float *__ns = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } slartv_(&n, __nx + offsetx, &incx, __ny + offsety, &incy, __nc + offsetc, __ns + offsets, &incc); done: - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaruv_)(int *iseed, int *n, float *x); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaruvK(JNIEnv *env, UNUSED jobject obj, jintArray iseed, jint offsetiseed, jint n, jfloatArray x, jint offsetx) { - jboolean failed = FALSE; - int *__niseed = NULL; float *__nx = NULL; - if (!(__niseed = (*env)->GetPrimitiveArrayCritical(env, iseed, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + jboolean __failed = FALSE; + int *__niseed = NULL; + float *__nx = NULL; + if (!(__niseed = (*env)->GetPrimitiveArrayCritical(env, iseed, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } slaruv_(__niseed + offsetiseed, &n, __nx + offsetx); done: - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__niseed) (*env)->ReleasePrimitiveArrayCritical(env, iseed, __niseed, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__niseed) (*env)->ReleasePrimitiveArrayCritical(env, iseed, __niseed, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slarz_)(const char *side, int *m, int *n, int *l, float *v, int *incv, float *tau, float *c, int *Ldc, float *work); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarzK(JNIEnv *env, UNUSED jobject obj, jstring side, jint m, jint n, jint l, jfloatArray v, jint offsetv, jint incv, jfloat tau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork) { - jboolean failed = FALSE; - const char *__nside = NULL; float *__nv = NULL; float *__nc = NULL; float *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + float *__nv = NULL; + float *__nc = NULL; + float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } slarz_(__nside, &m, &n, &l, __nv + offsetv, &incv, &tau, __nc + offsetc, &Ldc, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slarzb_)(const char *side, const char *trans, const char *direct, const char *storev, int *m, int *n, int *k, int *l, float *v, int *ldv, float *t, int *ldt, float *c, int *Ldc, float *work, int *ldwork); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarzbK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jstring direct, jstring storev, jint m, jint n, jint k, jint l, jfloatArray v, jint offsetv, jint ldv, jfloatArray t, jint offsett, jint ldt, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint ldwork) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__ntrans = NULL; const char *__ndirect = NULL; const char *__nstorev = NULL; float *__nv = NULL; float *__nt = NULL; float *__nc = NULL; float *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndirect = (*env)->GetStringUTFChars(env, direct, NULL))) goto fail; - if (!(__nstorev = (*env)->GetStringUTFChars(env, storev, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__ntrans = NULL; + const char *__ndirect = NULL; + const char *__nstorev = NULL; + float *__nv = NULL; + float *__nt = NULL; + float *__nc = NULL; + float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndirect = (*env)->GetStringUTFChars(env, direct, NULL))) { __failed = TRUE; goto done; } + if (!(__nstorev = (*env)->GetStringUTFChars(env, storev, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } slarzb_(__nside, __ntrans, __ndirect, __nstorev, &m, &n, &k, &l, __nv + offsetv, &ldv, __nt + offsett, &ldt, __nc + offsetc, &Ldc, __nwork + offsetwork, &ldwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); if (__nstorev) (*env)->ReleaseStringUTFChars(env, storev, __nstorev); if (__ndirect) (*env)->ReleaseStringUTFChars(env, direct, __ndirect); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slarzt_)(const char *direct, const char *storev, int *n, int *k, float *v, int *ldv, float *tau, float *t, int *ldt); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slarztK(JNIEnv *env, UNUSED jobject obj, jstring direct, jstring storev, jint n, jint k, jfloatArray v, jint offsetv, jint ldv, jfloatArray tau, jint offsettau, jfloatArray t, jint offsett, jint ldt) { - jboolean failed = FALSE; - const char *__ndirect = NULL; const char *__nstorev = NULL; float *__nv = NULL; float *__ntau = NULL; float *__nt = NULL; - if (!(__ndirect = (*env)->GetStringUTFChars(env, direct, NULL))) goto fail; - if (!(__nstorev = (*env)->GetStringUTFChars(env, storev, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ndirect = NULL; + const char *__nstorev = NULL; + float *__nv = NULL; + float *__ntau = NULL; + float *__nt = NULL; + if (!(__ndirect = (*env)->GetStringUTFChars(env, direct, NULL))) { __failed = TRUE; goto done; } + if (!(__nstorev = (*env)->GetStringUTFChars(env, storev, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) { __failed = TRUE; goto done; } slarzt_(__ndirect, __nstorev, &n, &k, __nv + offsetv, &ldv, __ntau + offsettau, __nt + offsett, &ldt); done: - if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); if (__nstorev) (*env)->ReleaseStringUTFChars(env, storev, __nstorev); if (__ndirect) (*env)->ReleaseStringUTFChars(env, direct, __ndirect); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slas2_)(float *f, float *g, float *h, float *ssmin, float *ssmax); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slas2K(JNIEnv *env, UNUSED jobject obj, jfloat f, jfloat g, jfloat h, jobject ssmin, jobject ssmax) { - jboolean failed = FALSE; - float __nssmin = 0; float __nssmax = 0; + jboolean __failed = FALSE; + float __nssmin = 0; + float __nssmax = 0; __nssmin = (*env)->GetFloatField(env, ssmin, floatW_val_fieldID); __nssmax = (*env)->GetFloatField(env, ssmax, floatW_val_fieldID); slas2_(&f, &g, &h, &__nssmin, &__nssmax); done: - if (!failed) (*env)->SetFloatField(env, ssmax, floatW_val_fieldID, __nssmax); - if (!failed) (*env)->SetFloatField(env, ssmin, floatW_val_fieldID, __nssmin); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetFloatField(env, ssmax, floatW_val_fieldID, __nssmax); + if (!__failed) (*env)->SetFloatField(env, ssmin, floatW_val_fieldID, __nssmin); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slascl_)(const char *type, int *kl, int *ku, float *cfrom, float *cto, int *m, int *n, float *a, int *lda, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasclK(JNIEnv *env, UNUSED jobject obj, jstring type, jint kl, jint ku, jfloat cfrom, jfloat cto, jint m, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { - jboolean failed = FALSE; - const char *__ntype = NULL; int __ninfo = 0; float *__na = NULL; - if (!(__ntype = (*env)->GetStringUTFChars(env, type, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ntype = NULL; + int __ninfo = 0; + float *__na = NULL; + if (!(__ntype = (*env)->GetStringUTFChars(env, type, NULL))) { __failed = TRUE; goto done; } __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } slascl_(__ntype, &kl, &ku, &cfrom, &cto, &m, &n, __na + offseta, &lda, &__ninfo); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntype) (*env)->ReleaseStringUTFChars(env, type, __ntype); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slasd0_)(int *n, int *sqre, float *d, float *e, float *u, int *ldu, float *vt, int *ldvt, int *smlsiz, int *iwork, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd0K(JNIEnv *env, UNUSED jobject obj, jint n, jint sqre, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jint ldvt, jint smlsiz, jintArray iwork, jint offsetiwork, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nu = NULL; float *__nvt = NULL; int *__niwork = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; - if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; + float *__nu = NULL; + float *__nvt = NULL; + int *__niwork = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) { __failed = TRUE; goto done; } + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } slasd0_(&n, &sqre, __nd + offsetd, __ne + offsete, __nu + offsetu, &ldu, __nvt + offsetvt, &ldvt, &smlsiz, __niwork + offsetiwork, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); - if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, __failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slasd1_)(int *nl, int *nr, int *sqre, float *d, float *alpha, float *beta, float *u, int *ldu, float *vt, int *ldvt, int *idxq, int *iwork, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd1K(JNIEnv *env, UNUSED jobject obj, jint nl, jint nr, jint sqre, jfloatArray d, jint offsetd, jobject alpha, jobject beta, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jint ldvt, jintArray idxq, jint offsetidxq, jintArray iwork, jint offsetiwork, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - float __nalpha = 0; float __nbeta = 0; int __ninfo = 0; float *__nd = NULL; float *__nu = NULL; float *__nvt = NULL; int *__nidxq = NULL; int *__niwork = NULL; float *__nwork = NULL; + jboolean __failed = FALSE; + float __nalpha = 0; + float __nbeta = 0; + int __ninfo = 0; + float *__nd = NULL; + float *__nu = NULL; + float *__nvt = NULL; + int *__nidxq = NULL; + int *__niwork = NULL; + float *__nwork = NULL; __nalpha = (*env)->GetFloatField(env, alpha, floatW_val_fieldID); __nbeta = (*env)->GetFloatField(env, beta, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; - if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; - if (!(__nidxq = (*env)->GetPrimitiveArrayCritical(env, idxq, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) { __failed = TRUE; goto done; } + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) { __failed = TRUE; goto done; } + if (!(__nidxq = (*env)->GetPrimitiveArrayCritical(env, idxq, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } slasd1_(&nl, &nr, &sqre, __nd + offsetd, &__nalpha, &__nbeta, __nu + offsetu, &ldu, __nvt + offsetvt, &ldvt, __nidxq + offsetidxq, __niwork + offsetiwork, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nidxq) (*env)->ReleasePrimitiveArrayCritical(env, idxq, __nidxq, failed ? JNI_ABORT : 0); - if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); - if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, beta, floatW_val_fieldID, __nbeta); - if (!failed) (*env)->SetFloatField(env, alpha, floatW_val_fieldID, __nalpha); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nidxq) (*env)->ReleasePrimitiveArrayCritical(env, idxq, __nidxq, __failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, __failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, beta, floatW_val_fieldID, __nbeta); + if (!__failed) (*env)->SetFloatField(env, alpha, floatW_val_fieldID, __nalpha); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slasd2_)(int *nl, int *nr, int *sqre, int *k, float *d, float *z, float *alpha, float *beta, float *u, int *ldu, float *vt, int *ldvt, float *dsigma, float *u2, int *ldu2, float *vt2, int *ldvt2, int *idxp, int *idx, int *idxc, int *idxq, int *coltyp, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd2K(JNIEnv *env, UNUSED jobject obj, jint nl, jint nr, jint sqre, jobject k, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloat alpha, jfloat beta, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jint ldvt, jfloatArray dsigma, jint offsetdsigma, jfloatArray u2, jint offsetu2, jint ldu2, jfloatArray vt2, jint offsetvt2, jint ldvt2, jintArray idxp, jint offsetidxp, jintArray idx, jint offsetidx, jintArray idxc, jint offsetidxc, jintArray idxq, jint offsetidxq, jintArray coltyp, jint offsetcoltyp, jobject info) { - jboolean failed = FALSE; - int __nk = 0; int __ninfo = 0; float *__nd = NULL; float *__nz = NULL; float *__nu = NULL; float *__nvt = NULL; float *__ndsigma = NULL; float *__nu2 = NULL; float *__nvt2 = NULL; int *__nidxp = NULL; int *__nidx = NULL; int *__nidxc = NULL; int *__nidxq = NULL; int *__ncoltyp = NULL; + jboolean __failed = FALSE; + int __nk = 0; + int __ninfo = 0; + float *__nd = NULL; + float *__nz = NULL; + float *__nu = NULL; + float *__nvt = NULL; + float *__ndsigma = NULL; + float *__nu2 = NULL; + float *__nvt2 = NULL; + int *__nidxp = NULL; + int *__nidx = NULL; + int *__nidxc = NULL; + int *__nidxq = NULL; + int *__ncoltyp = NULL; __nk = (*env)->GetIntField(env, k, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; - if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; - if (!(__ndsigma = (*env)->GetPrimitiveArrayCritical(env, dsigma, NULL))) goto fail; - if (!(__nu2 = (*env)->GetPrimitiveArrayCritical(env, u2, NULL))) goto fail; - if (!(__nvt2 = (*env)->GetPrimitiveArrayCritical(env, vt2, NULL))) goto fail; - if (!(__nidxp = (*env)->GetPrimitiveArrayCritical(env, idxp, NULL))) goto fail; - if (!(__nidx = (*env)->GetPrimitiveArrayCritical(env, idx, NULL))) goto fail; - if (!(__nidxc = (*env)->GetPrimitiveArrayCritical(env, idxc, NULL))) goto fail; - if (!(__nidxq = (*env)->GetPrimitiveArrayCritical(env, idxq, NULL))) goto fail; - if (!(__ncoltyp = (*env)->GetPrimitiveArrayCritical(env, coltyp, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) { __failed = TRUE; goto done; } + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) { __failed = TRUE; goto done; } + if (!(__ndsigma = (*env)->GetPrimitiveArrayCritical(env, dsigma, NULL))) { __failed = TRUE; goto done; } + if (!(__nu2 = (*env)->GetPrimitiveArrayCritical(env, u2, NULL))) { __failed = TRUE; goto done; } + if (!(__nvt2 = (*env)->GetPrimitiveArrayCritical(env, vt2, NULL))) { __failed = TRUE; goto done; } + if (!(__nidxp = (*env)->GetPrimitiveArrayCritical(env, idxp, NULL))) { __failed = TRUE; goto done; } + if (!(__nidx = (*env)->GetPrimitiveArrayCritical(env, idx, NULL))) { __failed = TRUE; goto done; } + if (!(__nidxc = (*env)->GetPrimitiveArrayCritical(env, idxc, NULL))) { __failed = TRUE; goto done; } + if (!(__nidxq = (*env)->GetPrimitiveArrayCritical(env, idxq, NULL))) { __failed = TRUE; goto done; } + if (!(__ncoltyp = (*env)->GetPrimitiveArrayCritical(env, coltyp, NULL))) { __failed = TRUE; goto done; } slasd2_(&nl, &nr, &sqre, &__nk, __nd + offsetd, __nz + offsetz, &alpha, &beta, __nu + offsetu, &ldu, __nvt + offsetvt, &ldvt, __ndsigma + offsetdsigma, __nu2 + offsetu2, &ldu2, __nvt2 + offsetvt2, &ldvt2, __nidxp + offsetidxp, __nidx + offsetidx, __nidxc + offsetidxc, __nidxq + offsetidxq, __ncoltyp + offsetcoltyp, &__ninfo); done: - if (__ncoltyp) (*env)->ReleasePrimitiveArrayCritical(env, coltyp, __ncoltyp, failed ? JNI_ABORT : 0); - if (__nidxq) (*env)->ReleasePrimitiveArrayCritical(env, idxq, __nidxq, failed ? JNI_ABORT : 0); - if (__nidxc) (*env)->ReleasePrimitiveArrayCritical(env, idxc, __nidxc, failed ? JNI_ABORT : 0); - if (__nidx) (*env)->ReleasePrimitiveArrayCritical(env, idx, __nidx, failed ? JNI_ABORT : 0); - if (__nidxp) (*env)->ReleasePrimitiveArrayCritical(env, idxp, __nidxp, failed ? JNI_ABORT : 0); - if (__nvt2) (*env)->ReleasePrimitiveArrayCritical(env, vt2, __nvt2, failed ? JNI_ABORT : 0); - if (__nu2) (*env)->ReleasePrimitiveArrayCritical(env, u2, __nu2, failed ? JNI_ABORT : 0); - if (__ndsigma) (*env)->ReleasePrimitiveArrayCritical(env, dsigma, __ndsigma, failed ? JNI_ABORT : 0); - if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); - if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ncoltyp) (*env)->ReleasePrimitiveArrayCritical(env, coltyp, __ncoltyp, __failed ? JNI_ABORT : 0); + if (__nidxq) (*env)->ReleasePrimitiveArrayCritical(env, idxq, __nidxq, __failed ? JNI_ABORT : 0); + if (__nidxc) (*env)->ReleasePrimitiveArrayCritical(env, idxc, __nidxc, __failed ? JNI_ABORT : 0); + if (__nidx) (*env)->ReleasePrimitiveArrayCritical(env, idx, __nidx, __failed ? JNI_ABORT : 0); + if (__nidxp) (*env)->ReleasePrimitiveArrayCritical(env, idxp, __nidxp, __failed ? JNI_ABORT : 0); + if (__nvt2) (*env)->ReleasePrimitiveArrayCritical(env, vt2, __nvt2, __failed ? JNI_ABORT : 0); + if (__nu2) (*env)->ReleasePrimitiveArrayCritical(env, u2, __nu2, __failed ? JNI_ABORT : 0); + if (__ndsigma) (*env)->ReleasePrimitiveArrayCritical(env, dsigma, __ndsigma, __failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, __failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slasd3_)(int *nl, int *nr, int *sqre, int *k, float *d, float *q, int *ldq, float *dsigma, float *u, int *ldu, float *u2, int *ldu2, float *vt, int *ldvt, float *vt2, int *ldvt2, int *idxc, int *ctot, float *z, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd3K(JNIEnv *env, UNUSED jobject obj, jint nl, jint nr, jint sqre, jint k, jfloatArray d, jint offsetd, jfloatArray q, jint offsetq, jint ldq, jfloatArray dsigma, jint offsetdsigma, jfloatArray u, jint offsetu, jint ldu, jfloatArray u2, jint offsetu2, jint ldu2, jfloatArray vt, jint offsetvt, jint ldvt, jfloatArray vt2, jint offsetvt2, jint ldvt2, jintArray idxc, jint offsetidxc, jintArray ctot, jint offsetctot, jfloatArray z, jint offsetz, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__nd = NULL; float *__nq = NULL; float *__ndsigma = NULL; float *__nu = NULL; float *__nu2 = NULL; float *__nvt = NULL; float *__nvt2 = NULL; int *__nidxc = NULL; int *__nctot = NULL; float *__nz = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__ndsigma = (*env)->GetPrimitiveArrayCritical(env, dsigma, NULL))) goto fail; - if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; - if (!(__nu2 = (*env)->GetPrimitiveArrayCritical(env, u2, NULL))) goto fail; - if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; - if (!(__nvt2 = (*env)->GetPrimitiveArrayCritical(env, vt2, NULL))) goto fail; - if (!(__nidxc = (*env)->GetPrimitiveArrayCritical(env, idxc, NULL))) goto fail; - if (!(__nctot = (*env)->GetPrimitiveArrayCritical(env, ctot, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__nd = NULL; + float *__nq = NULL; + float *__ndsigma = NULL; + float *__nu = NULL; + float *__nu2 = NULL; + float *__nvt = NULL; + float *__nvt2 = NULL; + int *__nidxc = NULL; + int *__nctot = NULL; + float *__nz = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__ndsigma = (*env)->GetPrimitiveArrayCritical(env, dsigma, NULL))) { __failed = TRUE; goto done; } + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) { __failed = TRUE; goto done; } + if (!(__nu2 = (*env)->GetPrimitiveArrayCritical(env, u2, NULL))) { __failed = TRUE; goto done; } + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) { __failed = TRUE; goto done; } + if (!(__nvt2 = (*env)->GetPrimitiveArrayCritical(env, vt2, NULL))) { __failed = TRUE; goto done; } + if (!(__nidxc = (*env)->GetPrimitiveArrayCritical(env, idxc, NULL))) { __failed = TRUE; goto done; } + if (!(__nctot = (*env)->GetPrimitiveArrayCritical(env, ctot, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } slasd3_(&nl, &nr, &sqre, &k, __nd + offsetd, __nq + offsetq, &ldq, __ndsigma + offsetdsigma, __nu + offsetu, &ldu, __nu2 + offsetu2, &ldu2, __nvt + offsetvt, &ldvt, __nvt2 + offsetvt2, &ldvt2, __nidxc + offsetidxc, __nctot + offsetctot, __nz + offsetz, &__ninfo); done: - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nctot) (*env)->ReleasePrimitiveArrayCritical(env, ctot, __nctot, failed ? JNI_ABORT : 0); - if (__nidxc) (*env)->ReleasePrimitiveArrayCritical(env, idxc, __nidxc, failed ? JNI_ABORT : 0); - if (__nvt2) (*env)->ReleasePrimitiveArrayCritical(env, vt2, __nvt2, failed ? JNI_ABORT : 0); - if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); - if (__nu2) (*env)->ReleasePrimitiveArrayCritical(env, u2, __nu2, failed ? JNI_ABORT : 0); - if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); - if (__ndsigma) (*env)->ReleasePrimitiveArrayCritical(env, dsigma, __ndsigma, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nctot) (*env)->ReleasePrimitiveArrayCritical(env, ctot, __nctot, __failed ? JNI_ABORT : 0); + if (__nidxc) (*env)->ReleasePrimitiveArrayCritical(env, idxc, __nidxc, __failed ? JNI_ABORT : 0); + if (__nvt2) (*env)->ReleasePrimitiveArrayCritical(env, vt2, __nvt2, __failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, __failed ? JNI_ABORT : 0); + if (__nu2) (*env)->ReleasePrimitiveArrayCritical(env, u2, __nu2, __failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, __failed ? JNI_ABORT : 0); + if (__ndsigma) (*env)->ReleasePrimitiveArrayCritical(env, dsigma, __ndsigma, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slasd4_)(int *n, int *i, float *d, float *z, float *delta, float *rho, float *sigma, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd4K(JNIEnv *env, UNUSED jobject obj, jint n, jint i, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloatArray delta, jint offsetdelta, jfloat rho, jobject sigma, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - float __nsigma = 0; int __ninfo = 0; float *__nd = NULL; float *__nz = NULL; float *__ndelta = NULL; float *__nwork = NULL; + jboolean __failed = FALSE; + float __nsigma = 0; + int __ninfo = 0; + float *__nd = NULL; + float *__nz = NULL; + float *__ndelta = NULL; + float *__nwork = NULL; __nsigma = (*env)->GetFloatField(env, sigma, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__ndelta = (*env)->GetPrimitiveArrayCritical(env, delta, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__ndelta = (*env)->GetPrimitiveArrayCritical(env, delta, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } slasd4_(&n, &i, __nd + offsetd, __nz + offsetz, __ndelta + offsetdelta, &rho, &__nsigma, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ndelta) (*env)->ReleasePrimitiveArrayCritical(env, delta, __ndelta, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, sigma, floatW_val_fieldID, __nsigma); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ndelta) (*env)->ReleasePrimitiveArrayCritical(env, delta, __ndelta, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, sigma, floatW_val_fieldID, __nsigma); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slasd5_)(int *i, float *d, float *z, float *delta, float *rho, float *dsigma, float *work); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd5K(JNIEnv *env, UNUSED jobject obj, jint i, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloatArray delta, jint offsetdelta, jfloat rho, jobject dsigma, jfloatArray work, jint offsetwork) { - jboolean failed = FALSE; - float __ndsigma = 0; float *__nd = NULL; float *__nz = NULL; float *__ndelta = NULL; float *__nwork = NULL; + jboolean __failed = FALSE; + float __ndsigma = 0; + float *__nd = NULL; + float *__nz = NULL; + float *__ndelta = NULL; + float *__nwork = NULL; __ndsigma = (*env)->GetFloatField(env, dsigma, floatW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__ndelta = (*env)->GetPrimitiveArrayCritical(env, delta, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__ndelta = (*env)->GetPrimitiveArrayCritical(env, delta, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } slasd5_(&i, __nd + offsetd, __nz + offsetz, __ndelta + offsetdelta, &rho, &__ndsigma, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ndelta) (*env)->ReleasePrimitiveArrayCritical(env, delta, __ndelta, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetFloatField(env, dsigma, floatW_val_fieldID, __ndsigma); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ndelta) (*env)->ReleasePrimitiveArrayCritical(env, delta, __ndelta, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetFloatField(env, dsigma, floatW_val_fieldID, __ndsigma); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slasd6_)(int *icompq, int *nl, int *nr, int *sqre, float *d, float *vf, float *vl, float *alpha, float *beta, int *idxq, int *perm, int *givptr, int *givcol, int *ldgcol, float *givnum, int *ldgnum, float *poles, float *difl, float *difr, float *z, int *k, float *c, float *s, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd6K(JNIEnv *env, UNUSED jobject obj, jint icompq, jint nl, jint nr, jint sqre, jfloatArray d, jint offsetd, jfloatArray vf, jint offsetvf, jfloatArray vl, jint offsetvl, jobject alpha, jobject beta, jintArray idxq, jint offsetidxq, jintArray perm, jint offsetperm, jobject givptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jfloatArray givnum, jint offsetgivnum, jint ldgnum, jfloatArray poles, jint offsetpoles, jfloatArray difl, jint offsetdifl, jfloatArray difr, jint offsetdifr, jfloatArray z, jint offsetz, jobject k, jobject c, jobject s, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - float __nalpha = 0; float __nbeta = 0; int __ngivptr = 0; int __nk = 0; float __nc = 0; float __ns = 0; int __ninfo = 0; float *__nd = NULL; float *__nvf = NULL; float *__nvl = NULL; int *__nidxq = NULL; int *__nperm = NULL; int *__ngivcol = NULL; float *__ngivnum = NULL; float *__npoles = NULL; float *__ndifl = NULL; float *__ndifr = NULL; float *__nz = NULL; float *__nwork = NULL; int *__niwork = NULL; + jboolean __failed = FALSE; + float __nalpha = 0; + float __nbeta = 0; + int __ngivptr = 0; + int __nk = 0; + float __nc = 0; + float __ns = 0; + int __ninfo = 0; + float *__nd = NULL; + float *__nvf = NULL; + float *__nvl = NULL; + int *__nidxq = NULL; + int *__nperm = NULL; + int *__ngivcol = NULL; + float *__ngivnum = NULL; + float *__npoles = NULL; + float *__ndifl = NULL; + float *__ndifr = NULL; + float *__nz = NULL; + float *__nwork = NULL; + int *__niwork = NULL; __nalpha = (*env)->GetFloatField(env, alpha, floatW_val_fieldID); __nbeta = (*env)->GetFloatField(env, beta, floatW_val_fieldID); __ngivptr = (*env)->GetIntField(env, givptr, intW_val_fieldID); @@ -14706,299 +15784,331 @@ void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd6K(JNIEnv *env, UNUSED jobjec __nc = (*env)->GetFloatField(env, c, floatW_val_fieldID); __ns = (*env)->GetFloatField(env, s, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nvf = (*env)->GetPrimitiveArrayCritical(env, vf, NULL))) goto fail; - if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; - if (!(__nidxq = (*env)->GetPrimitiveArrayCritical(env, idxq, NULL))) goto fail; - if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; - if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; - if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; - if (!(__npoles = (*env)->GetPrimitiveArrayCritical(env, poles, NULL))) goto fail; - if (!(__ndifl = (*env)->GetPrimitiveArrayCritical(env, difl, NULL))) goto fail; - if (!(__ndifr = (*env)->GetPrimitiveArrayCritical(env, difr, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nvf = (*env)->GetPrimitiveArrayCritical(env, vf, NULL))) { __failed = TRUE; goto done; } + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) { __failed = TRUE; goto done; } + if (!(__nidxq = (*env)->GetPrimitiveArrayCritical(env, idxq, NULL))) { __failed = TRUE; goto done; } + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) { __failed = TRUE; goto done; } + if (!(__npoles = (*env)->GetPrimitiveArrayCritical(env, poles, NULL))) { __failed = TRUE; goto done; } + if (!(__ndifl = (*env)->GetPrimitiveArrayCritical(env, difl, NULL))) { __failed = TRUE; goto done; } + if (!(__ndifr = (*env)->GetPrimitiveArrayCritical(env, difr, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } slasd6_(&icompq, &nl, &nr, &sqre, __nd + offsetd, __nvf + offsetvf, __nvl + offsetvl, &__nalpha, &__nbeta, __nidxq + offsetidxq, __nperm + offsetperm, &__ngivptr, __ngivcol + offsetgivcol, &ldgcol, __ngivnum + offsetgivnum, &ldgnum, __npoles + offsetpoles, __ndifl + offsetdifl, __ndifr + offsetdifr, __nz + offsetz, &__nk, &__nc, &__ns, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__ndifr) (*env)->ReleasePrimitiveArrayCritical(env, difr, __ndifr, failed ? JNI_ABORT : 0); - if (__ndifl) (*env)->ReleasePrimitiveArrayCritical(env, difl, __ndifl, failed ? JNI_ABORT : 0); - if (__npoles) (*env)->ReleasePrimitiveArrayCritical(env, poles, __npoles, failed ? JNI_ABORT : 0); - if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); - if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); - if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); - if (__nidxq) (*env)->ReleasePrimitiveArrayCritical(env, idxq, __nidxq, failed ? JNI_ABORT : 0); - if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); - if (__nvf) (*env)->ReleasePrimitiveArrayCritical(env, vf, __nvf, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, s, floatW_val_fieldID, __ns); - if (!failed) (*env)->SetFloatField(env, c, floatW_val_fieldID, __nc); - if (!failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); - if (!failed) (*env)->SetIntField(env, givptr, intW_val_fieldID, __ngivptr); - if (!failed) (*env)->SetFloatField(env, beta, floatW_val_fieldID, __nbeta); - if (!failed) (*env)->SetFloatField(env, alpha, floatW_val_fieldID, __nalpha); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__ndifr) (*env)->ReleasePrimitiveArrayCritical(env, difr, __ndifr, __failed ? JNI_ABORT : 0); + if (__ndifl) (*env)->ReleasePrimitiveArrayCritical(env, difl, __ndifl, __failed ? JNI_ABORT : 0); + if (__npoles) (*env)->ReleasePrimitiveArrayCritical(env, poles, __npoles, __failed ? JNI_ABORT : 0); + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, __failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, __failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, __failed ? JNI_ABORT : 0); + if (__nidxq) (*env)->ReleasePrimitiveArrayCritical(env, idxq, __nidxq, __failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, __failed ? JNI_ABORT : 0); + if (__nvf) (*env)->ReleasePrimitiveArrayCritical(env, vf, __nvf, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, s, floatW_val_fieldID, __ns); + if (!__failed) (*env)->SetFloatField(env, c, floatW_val_fieldID, __nc); + if (!__failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); + if (!__failed) (*env)->SetIntField(env, givptr, intW_val_fieldID, __ngivptr); + if (!__failed) (*env)->SetFloatField(env, beta, floatW_val_fieldID, __nbeta); + if (!__failed) (*env)->SetFloatField(env, alpha, floatW_val_fieldID, __nalpha); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slasd7_)(int *icompq, int *nl, int *nr, int *sqre, int *k, float *d, float *z, float *zw, float *vf, float *vfw, float *vl, float *vlw, float *alpha, float *beta, float *dsigma, int *idx, int *idxp, int *idxq, int *perm, int *givptr, int *givcol, int *ldgcol, float *givnum, int *ldgnum, float *c, float *s, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd7K(JNIEnv *env, UNUSED jobject obj, jint icompq, jint nl, jint nr, jint sqre, jobject k, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloatArray zw, jint offsetzw, jfloatArray vf, jint offsetvf, jfloatArray vfw, jint offsetvfw, jfloatArray vl, jint offsetvl, jfloatArray vlw, jint offsetvlw, jfloat alpha, jfloat beta, jfloatArray dsigma, jint offsetdsigma, jintArray idx, jint offsetidx, jintArray idxp, jint offsetidxp, jintArray idxq, jint offsetidxq, jintArray perm, jint offsetperm, jobject givptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jfloatArray givnum, jint offsetgivnum, jint ldgnum, jobject c, jobject s, jobject info) { - jboolean failed = FALSE; - int __nk = 0; int __ngivptr = 0; float __nc = 0; float __ns = 0; int __ninfo = 0; float *__nd = NULL; float *__nz = NULL; float *__nzw = NULL; float *__nvf = NULL; float *__nvfw = NULL; float *__nvl = NULL; float *__nvlw = NULL; float *__ndsigma = NULL; int *__nidx = NULL; int *__nidxp = NULL; int *__nidxq = NULL; int *__nperm = NULL; int *__ngivcol = NULL; float *__ngivnum = NULL; + jboolean __failed = FALSE; + int __nk = 0; + int __ngivptr = 0; + float __nc = 0; + float __ns = 0; + int __ninfo = 0; + float *__nd = NULL; + float *__nz = NULL; + float *__nzw = NULL; + float *__nvf = NULL; + float *__nvfw = NULL; + float *__nvl = NULL; + float *__nvlw = NULL; + float *__ndsigma = NULL; + int *__nidx = NULL; + int *__nidxp = NULL; + int *__nidxq = NULL; + int *__nperm = NULL; + int *__ngivcol = NULL; + float *__ngivnum = NULL; __nk = (*env)->GetIntField(env, k, intW_val_fieldID); __ngivptr = (*env)->GetIntField(env, givptr, intW_val_fieldID); __nc = (*env)->GetFloatField(env, c, floatW_val_fieldID); __ns = (*env)->GetFloatField(env, s, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nzw = (*env)->GetPrimitiveArrayCritical(env, zw, NULL))) goto fail; - if (!(__nvf = (*env)->GetPrimitiveArrayCritical(env, vf, NULL))) goto fail; - if (!(__nvfw = (*env)->GetPrimitiveArrayCritical(env, vfw, NULL))) goto fail; - if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; - if (!(__nvlw = (*env)->GetPrimitiveArrayCritical(env, vlw, NULL))) goto fail; - if (!(__ndsigma = (*env)->GetPrimitiveArrayCritical(env, dsigma, NULL))) goto fail; - if (!(__nidx = (*env)->GetPrimitiveArrayCritical(env, idx, NULL))) goto fail; - if (!(__nidxp = (*env)->GetPrimitiveArrayCritical(env, idxp, NULL))) goto fail; - if (!(__nidxq = (*env)->GetPrimitiveArrayCritical(env, idxq, NULL))) goto fail; - if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; - if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; - if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nzw = (*env)->GetPrimitiveArrayCritical(env, zw, NULL))) { __failed = TRUE; goto done; } + if (!(__nvf = (*env)->GetPrimitiveArrayCritical(env, vf, NULL))) { __failed = TRUE; goto done; } + if (!(__nvfw = (*env)->GetPrimitiveArrayCritical(env, vfw, NULL))) { __failed = TRUE; goto done; } + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) { __failed = TRUE; goto done; } + if (!(__nvlw = (*env)->GetPrimitiveArrayCritical(env, vlw, NULL))) { __failed = TRUE; goto done; } + if (!(__ndsigma = (*env)->GetPrimitiveArrayCritical(env, dsigma, NULL))) { __failed = TRUE; goto done; } + if (!(__nidx = (*env)->GetPrimitiveArrayCritical(env, idx, NULL))) { __failed = TRUE; goto done; } + if (!(__nidxp = (*env)->GetPrimitiveArrayCritical(env, idxp, NULL))) { __failed = TRUE; goto done; } + if (!(__nidxq = (*env)->GetPrimitiveArrayCritical(env, idxq, NULL))) { __failed = TRUE; goto done; } + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) { __failed = TRUE; goto done; } slasd7_(&icompq, &nl, &nr, &sqre, &__nk, __nd + offsetd, __nz + offsetz, __nzw + offsetzw, __nvf + offsetvf, __nvfw + offsetvfw, __nvl + offsetvl, __nvlw + offsetvlw, &alpha, &beta, __ndsigma + offsetdsigma, __nidx + offsetidx, __nidxp + offsetidxp, __nidxq + offsetidxq, __nperm + offsetperm, &__ngivptr, __ngivcol + offsetgivcol, &ldgcol, __ngivnum + offsetgivnum, &ldgnum, &__nc, &__ns, &__ninfo); done: - if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); - if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); - if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); - if (__nidxq) (*env)->ReleasePrimitiveArrayCritical(env, idxq, __nidxq, failed ? JNI_ABORT : 0); - if (__nidxp) (*env)->ReleasePrimitiveArrayCritical(env, idxp, __nidxp, failed ? JNI_ABORT : 0); - if (__nidx) (*env)->ReleasePrimitiveArrayCritical(env, idx, __nidx, failed ? JNI_ABORT : 0); - if (__ndsigma) (*env)->ReleasePrimitiveArrayCritical(env, dsigma, __ndsigma, failed ? JNI_ABORT : 0); - if (__nvlw) (*env)->ReleasePrimitiveArrayCritical(env, vlw, __nvlw, failed ? JNI_ABORT : 0); - if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); - if (__nvfw) (*env)->ReleasePrimitiveArrayCritical(env, vfw, __nvfw, failed ? JNI_ABORT : 0); - if (__nvf) (*env)->ReleasePrimitiveArrayCritical(env, vf, __nvf, failed ? JNI_ABORT : 0); - if (__nzw) (*env)->ReleasePrimitiveArrayCritical(env, zw, __nzw, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, s, floatW_val_fieldID, __ns); - if (!failed) (*env)->SetFloatField(env, c, floatW_val_fieldID, __nc); - if (!failed) (*env)->SetIntField(env, givptr, intW_val_fieldID, __ngivptr); - if (!failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, __failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, __failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, __failed ? JNI_ABORT : 0); + if (__nidxq) (*env)->ReleasePrimitiveArrayCritical(env, idxq, __nidxq, __failed ? JNI_ABORT : 0); + if (__nidxp) (*env)->ReleasePrimitiveArrayCritical(env, idxp, __nidxp, __failed ? JNI_ABORT : 0); + if (__nidx) (*env)->ReleasePrimitiveArrayCritical(env, idx, __nidx, __failed ? JNI_ABORT : 0); + if (__ndsigma) (*env)->ReleasePrimitiveArrayCritical(env, dsigma, __ndsigma, __failed ? JNI_ABORT : 0); + if (__nvlw) (*env)->ReleasePrimitiveArrayCritical(env, vlw, __nvlw, __failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, __failed ? JNI_ABORT : 0); + if (__nvfw) (*env)->ReleasePrimitiveArrayCritical(env, vfw, __nvfw, __failed ? JNI_ABORT : 0); + if (__nvf) (*env)->ReleasePrimitiveArrayCritical(env, vf, __nvf, __failed ? JNI_ABORT : 0); + if (__nzw) (*env)->ReleasePrimitiveArrayCritical(env, zw, __nzw, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, s, floatW_val_fieldID, __ns); + if (!__failed) (*env)->SetFloatField(env, c, floatW_val_fieldID, __nc); + if (!__failed) (*env)->SetIntField(env, givptr, intW_val_fieldID, __ngivptr); + if (!__failed) (*env)->SetIntField(env, k, intW_val_fieldID, __nk); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slasd8_)(int *icompq, int *k, float *d, float *z, float *vf, float *vl, float *difl, float *difr, int *lddifr, float *dsigma, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasd8K(JNIEnv *env, UNUSED jobject obj, jint icompq, jint k, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jfloatArray vf, jint offsetvf, jfloatArray vl, jint offsetvl, jfloatArray difl, jint offsetdifl, jfloatArray difr, jint offsetdifr, jint lddifr, jfloatArray dsigma, jint offsetdsigma, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__nd = NULL; float *__nz = NULL; float *__nvf = NULL; float *__nvl = NULL; float *__ndifl = NULL; float *__ndifr = NULL; float *__ndsigma = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nvf = (*env)->GetPrimitiveArrayCritical(env, vf, NULL))) goto fail; - if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; - if (!(__ndifl = (*env)->GetPrimitiveArrayCritical(env, difl, NULL))) goto fail; - if (!(__ndifr = (*env)->GetPrimitiveArrayCritical(env, difr, NULL))) goto fail; - if (!(__ndsigma = (*env)->GetPrimitiveArrayCritical(env, dsigma, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__nd = NULL; + float *__nz = NULL; + float *__nvf = NULL; + float *__nvl = NULL; + float *__ndifl = NULL; + float *__ndifr = NULL; + float *__ndsigma = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nvf = (*env)->GetPrimitiveArrayCritical(env, vf, NULL))) { __failed = TRUE; goto done; } + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) { __failed = TRUE; goto done; } + if (!(__ndifl = (*env)->GetPrimitiveArrayCritical(env, difl, NULL))) { __failed = TRUE; goto done; } + if (!(__ndifr = (*env)->GetPrimitiveArrayCritical(env, difr, NULL))) { __failed = TRUE; goto done; } + if (!(__ndsigma = (*env)->GetPrimitiveArrayCritical(env, dsigma, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } slasd8_(&icompq, &k, __nd + offsetd, __nz + offsetz, __nvf + offsetvf, __nvl + offsetvl, __ndifl + offsetdifl, __ndifr + offsetdifr, &lddifr, __ndsigma + offsetdsigma, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ndsigma) (*env)->ReleasePrimitiveArrayCritical(env, dsigma, __ndsigma, failed ? JNI_ABORT : 0); - if (__ndifr) (*env)->ReleasePrimitiveArrayCritical(env, difr, __ndifr, failed ? JNI_ABORT : 0); - if (__ndifl) (*env)->ReleasePrimitiveArrayCritical(env, difl, __ndifl, failed ? JNI_ABORT : 0); - if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); - if (__nvf) (*env)->ReleasePrimitiveArrayCritical(env, vf, __nvf, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ndsigma) (*env)->ReleasePrimitiveArrayCritical(env, dsigma, __ndsigma, __failed ? JNI_ABORT : 0); + if (__ndifr) (*env)->ReleasePrimitiveArrayCritical(env, difr, __ndifr, __failed ? JNI_ABORT : 0); + if (__ndifl) (*env)->ReleasePrimitiveArrayCritical(env, difl, __ndifl, __failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, __failed ? JNI_ABORT : 0); + if (__nvf) (*env)->ReleasePrimitiveArrayCritical(env, vf, __nvf, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slasda_)(int *icompq, int *smlsiz, int *n, int *sqre, float *d, float *e, float *u, int *ldu, float *vt, int *k, float *difl, float *difr, float *z, float *poles, int *givptr, int *givcol, int *ldgcol, int *perm, float *givnum, float *c, float *s, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasdaK(JNIEnv *env, UNUSED jobject obj, jint icompq, jint smlsiz, jint n, jint sqre, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray u, jint offsetu, jint ldu, jfloatArray vt, jint offsetvt, jintArray k, jint offsetk, jfloatArray difl, jint offsetdifl, jfloatArray difr, jint offsetdifr, jfloatArray z, jint offsetz, jfloatArray poles, jint offsetpoles, jintArray givptr, jint offsetgivptr, jintArray givcol, jint offsetgivcol, jint ldgcol, jintArray perm, jint offsetperm, jfloatArray givnum, jint offsetgivnum, jfloatArray c, jint offsetc, jfloatArray s, jint offsets, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nu = NULL; float *__nvt = NULL; int *__nk = NULL; float *__ndifl = NULL; float *__ndifr = NULL; float *__nz = NULL; float *__npoles = NULL; int *__ngivptr = NULL; int *__ngivcol = NULL; int *__nperm = NULL; float *__ngivnum = NULL; float *__nc = NULL; float *__ns = NULL; float *__nwork = NULL; int *__niwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; - if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; - if (!(__nk = (*env)->GetPrimitiveArrayCritical(env, k, NULL))) goto fail; - if (!(__ndifl = (*env)->GetPrimitiveArrayCritical(env, difl, NULL))) goto fail; - if (!(__ndifr = (*env)->GetPrimitiveArrayCritical(env, difr, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__npoles = (*env)->GetPrimitiveArrayCritical(env, poles, NULL))) goto fail; - if (!(__ngivptr = (*env)->GetPrimitiveArrayCritical(env, givptr, NULL))) goto fail; - if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) goto fail; - if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) goto fail; - if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; + float *__nu = NULL; + float *__nvt = NULL; + int *__nk = NULL; + float *__ndifl = NULL; + float *__ndifr = NULL; + float *__nz = NULL; + float *__npoles = NULL; + int *__ngivptr = NULL; + int *__ngivcol = NULL; + int *__nperm = NULL; + float *__ngivnum = NULL; + float *__nc = NULL; + float *__ns = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) { __failed = TRUE; goto done; } + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) { __failed = TRUE; goto done; } + if (!(__nk = (*env)->GetPrimitiveArrayCritical(env, k, NULL))) { __failed = TRUE; goto done; } + if (!(__ndifl = (*env)->GetPrimitiveArrayCritical(env, difl, NULL))) { __failed = TRUE; goto done; } + if (!(__ndifr = (*env)->GetPrimitiveArrayCritical(env, difr, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__npoles = (*env)->GetPrimitiveArrayCritical(env, poles, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivptr = (*env)->GetPrimitiveArrayCritical(env, givptr, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivcol = (*env)->GetPrimitiveArrayCritical(env, givcol, NULL))) { __failed = TRUE; goto done; } + if (!(__nperm = (*env)->GetPrimitiveArrayCritical(env, perm, NULL))) { __failed = TRUE; goto done; } + if (!(__ngivnum = (*env)->GetPrimitiveArrayCritical(env, givnum, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } slasda_(&icompq, &smlsiz, &n, &sqre, __nd + offsetd, __ne + offsete, __nu + offsetu, &ldu, __nvt + offsetvt, __nk + offsetk, __ndifl + offsetdifl, __ndifr + offsetdifr, __nz + offsetz, __npoles + offsetpoles, __ngivptr + offsetgivptr, __ngivcol + offsetgivcol, &ldgcol, __nperm + offsetperm, __ngivnum + offsetgivnum, __nc + offsetc, __ns + offsets, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, failed ? JNI_ABORT : 0); - if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, failed ? JNI_ABORT : 0); - if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, failed ? JNI_ABORT : 0); - if (__ngivptr) (*env)->ReleasePrimitiveArrayCritical(env, givptr, __ngivptr, failed ? JNI_ABORT : 0); - if (__npoles) (*env)->ReleasePrimitiveArrayCritical(env, poles, __npoles, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__ndifr) (*env)->ReleasePrimitiveArrayCritical(env, difr, __ndifr, failed ? JNI_ABORT : 0); - if (__ndifl) (*env)->ReleasePrimitiveArrayCritical(env, difl, __ndifl, failed ? JNI_ABORT : 0); - if (__nk) (*env)->ReleasePrimitiveArrayCritical(env, k, __nk, failed ? JNI_ABORT : 0); - if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); - if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ngivnum) (*env)->ReleasePrimitiveArrayCritical(env, givnum, __ngivnum, __failed ? JNI_ABORT : 0); + if (__nperm) (*env)->ReleasePrimitiveArrayCritical(env, perm, __nperm, __failed ? JNI_ABORT : 0); + if (__ngivcol) (*env)->ReleasePrimitiveArrayCritical(env, givcol, __ngivcol, __failed ? JNI_ABORT : 0); + if (__ngivptr) (*env)->ReleasePrimitiveArrayCritical(env, givptr, __ngivptr, __failed ? JNI_ABORT : 0); + if (__npoles) (*env)->ReleasePrimitiveArrayCritical(env, poles, __npoles, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__ndifr) (*env)->ReleasePrimitiveArrayCritical(env, difr, __ndifr, __failed ? JNI_ABORT : 0); + if (__ndifl) (*env)->ReleasePrimitiveArrayCritical(env, difl, __ndifl, __failed ? JNI_ABORT : 0); + if (__nk) (*env)->ReleasePrimitiveArrayCritical(env, k, __nk, __failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, __failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slasdq_)(const char *uplo, int *sqre, int *n, int *ncvt, int *nru, int *ncc, float *d, float *e, float *vt, int *ldvt, float *u, int *ldu, float *c, int *Ldc, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasdqK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint sqre, jint n, jint ncvt, jint nru, jint ncc, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray vt, jint offsetvt, jint ldvt, jfloatArray u, jint offsetu, jint ldu, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nvt = NULL; float *__nu = NULL; float *__nc = NULL; float *__nwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) goto fail; - if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; + float *__nvt = NULL; + float *__nu = NULL; + float *__nc = NULL; + float *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nvt = (*env)->GetPrimitiveArrayCritical(env, vt, NULL))) { __failed = TRUE; goto done; } + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } slasdq_(__nuplo, &sqre, &n, &ncvt, &nru, &ncc, __nd + offsetd, __ne + offsete, __nvt + offsetvt, &ldvt, __nu + offsetu, &ldu, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); - if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, __failed ? JNI_ABORT : 0); + if (__nvt) (*env)->ReleasePrimitiveArrayCritical(env, vt, __nvt, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slasdt_)(int *n, int *lvl, int *nd, int *inode, int *ndiml, int *ndimr, int *msub); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasdtK(JNIEnv *env, UNUSED jobject obj, jint n, jobject lvl, jobject nd, jintArray inode, jint offsetinode, jintArray ndiml, jint offsetndiml, jintArray ndimr, jint offsetndimr, jint msub) { - jboolean failed = FALSE; - int __nlvl = 0; int __nnd = 0; int *__ninode = NULL; int *__nndiml = NULL; int *__nndimr = NULL; + jboolean __failed = FALSE; + int __nlvl = 0; + int __nnd = 0; + int *__ninode = NULL; + int *__nndiml = NULL; + int *__nndimr = NULL; __nlvl = (*env)->GetIntField(env, lvl, intW_val_fieldID); __nnd = (*env)->GetIntField(env, nd, intW_val_fieldID); - if (!(__ninode = (*env)->GetPrimitiveArrayCritical(env, inode, NULL))) goto fail; - if (!(__nndiml = (*env)->GetPrimitiveArrayCritical(env, ndiml, NULL))) goto fail; - if (!(__nndimr = (*env)->GetPrimitiveArrayCritical(env, ndimr, NULL))) goto fail; + if (!(__ninode = (*env)->GetPrimitiveArrayCritical(env, inode, NULL))) { __failed = TRUE; goto done; } + if (!(__nndiml = (*env)->GetPrimitiveArrayCritical(env, ndiml, NULL))) { __failed = TRUE; goto done; } + if (!(__nndimr = (*env)->GetPrimitiveArrayCritical(env, ndimr, NULL))) { __failed = TRUE; goto done; } slasdt_(&n, &__nlvl, &__nnd, __ninode + offsetinode, __nndiml + offsetndiml, __nndimr + offsetndimr, &msub); done: - if (__nndimr) (*env)->ReleasePrimitiveArrayCritical(env, ndimr, __nndimr, failed ? JNI_ABORT : 0); - if (__nndiml) (*env)->ReleasePrimitiveArrayCritical(env, ndiml, __nndiml, failed ? JNI_ABORT : 0); - if (__ninode) (*env)->ReleasePrimitiveArrayCritical(env, inode, __ninode, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, nd, intW_val_fieldID, __nnd); - if (!failed) (*env)->SetIntField(env, lvl, intW_val_fieldID, __nlvl); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nndimr) (*env)->ReleasePrimitiveArrayCritical(env, ndimr, __nndimr, __failed ? JNI_ABORT : 0); + if (__nndiml) (*env)->ReleasePrimitiveArrayCritical(env, ndiml, __nndiml, __failed ? JNI_ABORT : 0); + if (__ninode) (*env)->ReleasePrimitiveArrayCritical(env, inode, __ninode, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, nd, intW_val_fieldID, __nnd); + if (!__failed) (*env)->SetIntField(env, lvl, intW_val_fieldID, __nlvl); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaset_)(const char *uplo, int *m, int *n, float *alpha, float *beta, float *a, int *lda); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasetK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint m, jint n, jfloat alpha, jfloat beta, jfloatArray a, jint offseta, jint lda) { - jboolean failed = FALSE; - const char *__nuplo = NULL; float *__na = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + float *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } slaset_(__nuplo, &m, &n, &alpha, &beta, __na + offseta, &lda); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slasq1_)(int *n, float *d, float *e, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq1K(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } slasq1_(&n, __nd + offsetd, __ne + offsete, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slasq2_)(int *n, float *z, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq2K(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray z, jint offsetz, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__nz = NULL; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__nz = NULL; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } slasq2_(&n, __nz + offsetz, &__ninfo); done: - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slasq3_)(int *i0, int *n0, float *z, int *pp, float *dmin, float *sigma, float *desig, float *qmax, int *nfail, int *iter, int *ndiv, int *ieee); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq3K(JNIEnv *env, UNUSED jobject obj, jint i0, jobject n0, jfloatArray z, jint offsetz, jint pp, jobject dmin, jobject sigma, jobject desig, jobject qmax, jobject nfail, jobject iter, jobject ndiv, jboolean ieee) { - jboolean failed = FALSE; - int __nn0 = 0; float __ndmin = 0; float __nsigma = 0; float __ndesig = 0; float __nqmax = 0; int __nnfail = 0; int __niter = 0; int __nndiv = 0; int __nieee; float *__nz = NULL; + jboolean __failed = FALSE; + int __nn0 = 0; + float __ndmin = 0; + float __nsigma = 0; + float __ndesig = 0; + float __nqmax = 0; + int __nnfail = 0; + int __niter = 0; + int __nndiv = 0; + int __nieee; + float *__nz = NULL; __nn0 = (*env)->GetIntField(env, n0, intW_val_fieldID); __ndmin = (*env)->GetFloatField(env, dmin, floatW_val_fieldID); __nsigma = (*env)->GetFloatField(env, sigma, floatW_val_fieldID); @@ -15008,51 +16118,52 @@ void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq3K(JNIEnv *env, UNUSED jobjec __niter = (*env)->GetIntField(env, iter, intW_val_fieldID); __nndiv = (*env)->GetIntField(env, ndiv, intW_val_fieldID); __nieee = ieee; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } slasq3_(&i0, &__nn0, __nz + offsetz, &pp, &__ndmin, &__nsigma, &__ndesig, &__nqmax, &__nnfail, &__niter, &__nndiv, &__nieee); done: - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (!failed) ieee = __nieee; - if (!failed) (*env)->SetIntField(env, ndiv, intW_val_fieldID, __nndiv); - if (!failed) (*env)->SetIntField(env, iter, intW_val_fieldID, __niter); - if (!failed) (*env)->SetIntField(env, nfail, intW_val_fieldID, __nnfail); - if (!failed) (*env)->SetFloatField(env, qmax, floatW_val_fieldID, __nqmax); - if (!failed) (*env)->SetFloatField(env, desig, floatW_val_fieldID, __ndesig); - if (!failed) (*env)->SetFloatField(env, sigma, floatW_val_fieldID, __nsigma); - if (!failed) (*env)->SetFloatField(env, dmin, floatW_val_fieldID, __ndmin); - if (!failed) (*env)->SetIntField(env, n0, intW_val_fieldID, __nn0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (!__failed) ieee = __nieee; + if (!__failed) (*env)->SetIntField(env, ndiv, intW_val_fieldID, __nndiv); + if (!__failed) (*env)->SetIntField(env, iter, intW_val_fieldID, __niter); + if (!__failed) (*env)->SetIntField(env, nfail, intW_val_fieldID, __nnfail); + if (!__failed) (*env)->SetFloatField(env, qmax, floatW_val_fieldID, __nqmax); + if (!__failed) (*env)->SetFloatField(env, desig, floatW_val_fieldID, __ndesig); + if (!__failed) (*env)->SetFloatField(env, sigma, floatW_val_fieldID, __nsigma); + if (!__failed) (*env)->SetFloatField(env, dmin, floatW_val_fieldID, __ndmin); + if (!__failed) (*env)->SetIntField(env, n0, intW_val_fieldID, __nn0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slasq4_)(int *i0, int *n0, float *z, int *pp, int *n0in, float *dmin, float *dmin1, float *dmin2, float *dn, float *dn1, float *dn2, float *tau, int *ttype); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq4K(JNIEnv *env, UNUSED jobject obj, jint i0, jint n0, jfloatArray z, jint offsetz, jint pp, jint n0in, jfloat dmin, jfloat dmin1, jfloat dmin2, jfloat dn, jfloat dn1, jfloat dn2, jobject tau, jobject ttype) { - jboolean failed = FALSE; - float __ntau = 0; int __nttype = 0; float *__nz = NULL; + jboolean __failed = FALSE; + float __ntau = 0; + int __nttype = 0; + float *__nz = NULL; __ntau = (*env)->GetFloatField(env, tau, floatW_val_fieldID); __nttype = (*env)->GetIntField(env, ttype, intW_val_fieldID); - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } slasq4_(&i0, &n0, __nz + offsetz, &pp, &n0in, &dmin, &dmin1, &dmin2, &dn, &dn1, &dn2, &__ntau, &__nttype); done: - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, ttype, intW_val_fieldID, __nttype); - if (!failed) (*env)->SetFloatField(env, tau, floatW_val_fieldID, __ntau); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, ttype, intW_val_fieldID, __nttype); + if (!__failed) (*env)->SetFloatField(env, tau, floatW_val_fieldID, __ntau); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slasq5_)(int *i0, int *n0, float *z, int *pp, float *tau, float *dmin, float *dmin1, float *dmin2, float *dn, float *dnm1, float *dnm2, int *ieee); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq5K(JNIEnv *env, UNUSED jobject obj, jint i0, jint n0, jfloatArray z, jint offsetz, jint pp, jfloat tau, jobject dmin, jobject dmin1, jobject dmin2, jobject dn, jobject dnm1, jobject dnm2, jboolean ieee) { - jboolean failed = FALSE; - float __ndmin = 0; float __ndmin1 = 0; float __ndmin2 = 0; float __ndn = 0; float __ndnm1 = 0; float __ndnm2 = 0; int __nieee; float *__nz = NULL; + jboolean __failed = FALSE; + float __ndmin = 0; + float __ndmin1 = 0; + float __ndmin2 = 0; + float __ndn = 0; + float __ndnm1 = 0; + float __ndnm2 = 0; + int __nieee; + float *__nz = NULL; __ndmin = (*env)->GetFloatField(env, dmin, floatW_val_fieldID); __ndmin1 = (*env)->GetFloatField(env, dmin1, floatW_val_fieldID); __ndmin2 = (*env)->GetFloatField(env, dmin2, floatW_val_fieldID); @@ -15060,123 +16171,123 @@ void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq5K(JNIEnv *env, UNUSED jobjec __ndnm1 = (*env)->GetFloatField(env, dnm1, floatW_val_fieldID); __ndnm2 = (*env)->GetFloatField(env, dnm2, floatW_val_fieldID); __nieee = ieee; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } slasq5_(&i0, &n0, __nz + offsetz, &pp, &tau, &__ndmin, &__ndmin1, &__ndmin2, &__ndn, &__ndnm1, &__ndnm2, &__nieee); done: - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (!failed) ieee = __nieee; - if (!failed) (*env)->SetFloatField(env, dnm2, floatW_val_fieldID, __ndnm2); - if (!failed) (*env)->SetFloatField(env, dnm1, floatW_val_fieldID, __ndnm1); - if (!failed) (*env)->SetFloatField(env, dn, floatW_val_fieldID, __ndn); - if (!failed) (*env)->SetFloatField(env, dmin2, floatW_val_fieldID, __ndmin2); - if (!failed) (*env)->SetFloatField(env, dmin1, floatW_val_fieldID, __ndmin1); - if (!failed) (*env)->SetFloatField(env, dmin, floatW_val_fieldID, __ndmin); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (!__failed) ieee = __nieee; + if (!__failed) (*env)->SetFloatField(env, dnm2, floatW_val_fieldID, __ndnm2); + if (!__failed) (*env)->SetFloatField(env, dnm1, floatW_val_fieldID, __ndnm1); + if (!__failed) (*env)->SetFloatField(env, dn, floatW_val_fieldID, __ndn); + if (!__failed) (*env)->SetFloatField(env, dmin2, floatW_val_fieldID, __ndmin2); + if (!__failed) (*env)->SetFloatField(env, dmin1, floatW_val_fieldID, __ndmin1); + if (!__failed) (*env)->SetFloatField(env, dmin, floatW_val_fieldID, __ndmin); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slasq6_)(int *i0, int *n0, float *z, int *pp, float *dmin, float *dmin1, float *dmin2, float *dn, float *dnm1, float *dnm2); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasq6K(JNIEnv *env, UNUSED jobject obj, jint i0, jint n0, jfloatArray z, jint offsetz, jint pp, jobject dmin, jobject dmin1, jobject dmin2, jobject dn, jobject dnm1, jobject dnm2) { - jboolean failed = FALSE; - float __ndmin = 0; float __ndmin1 = 0; float __ndmin2 = 0; float __ndn = 0; float __ndnm1 = 0; float __ndnm2 = 0; float *__nz = NULL; + jboolean __failed = FALSE; + float __ndmin = 0; + float __ndmin1 = 0; + float __ndmin2 = 0; + float __ndn = 0; + float __ndnm1 = 0; + float __ndnm2 = 0; + float *__nz = NULL; __ndmin = (*env)->GetFloatField(env, dmin, floatW_val_fieldID); __ndmin1 = (*env)->GetFloatField(env, dmin1, floatW_val_fieldID); __ndmin2 = (*env)->GetFloatField(env, dmin2, floatW_val_fieldID); __ndn = (*env)->GetFloatField(env, dn, floatW_val_fieldID); __ndnm1 = (*env)->GetFloatField(env, dnm1, floatW_val_fieldID); __ndnm2 = (*env)->GetFloatField(env, dnm2, floatW_val_fieldID); - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } slasq6_(&i0, &n0, __nz + offsetz, &pp, &__ndmin, &__ndmin1, &__ndmin2, &__ndn, &__ndnm1, &__ndnm2); done: - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetFloatField(env, dnm2, floatW_val_fieldID, __ndnm2); - if (!failed) (*env)->SetFloatField(env, dnm1, floatW_val_fieldID, __ndnm1); - if (!failed) (*env)->SetFloatField(env, dn, floatW_val_fieldID, __ndn); - if (!failed) (*env)->SetFloatField(env, dmin2, floatW_val_fieldID, __ndmin2); - if (!failed) (*env)->SetFloatField(env, dmin1, floatW_val_fieldID, __ndmin1); - if (!failed) (*env)->SetFloatField(env, dmin, floatW_val_fieldID, __ndmin); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetFloatField(env, dnm2, floatW_val_fieldID, __ndnm2); + if (!__failed) (*env)->SetFloatField(env, dnm1, floatW_val_fieldID, __ndnm1); + if (!__failed) (*env)->SetFloatField(env, dn, floatW_val_fieldID, __ndn); + if (!__failed) (*env)->SetFloatField(env, dmin2, floatW_val_fieldID, __ndmin2); + if (!__failed) (*env)->SetFloatField(env, dmin1, floatW_val_fieldID, __ndmin1); + if (!__failed) (*env)->SetFloatField(env, dmin, floatW_val_fieldID, __ndmin); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slasr_)(const char *side, const char *pivot, const char *direct, int *m, int *n, float *c, float *s, float *a, int *lda); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasrK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring pivot, jstring direct, jint m, jint n, jfloatArray c, jint offsetc, jfloatArray s, jint offsets, jfloatArray a, jint offseta, jint lda) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__npivot = NULL; const char *__ndirect = NULL; float *__nc = NULL; float *__ns = NULL; float *__na = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__npivot = (*env)->GetStringUTFChars(env, pivot, NULL))) goto fail; - if (!(__ndirect = (*env)->GetStringUTFChars(env, direct, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__npivot = NULL; + const char *__ndirect = NULL; + float *__nc = NULL; + float *__ns = NULL; + float *__na = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__npivot = (*env)->GetStringUTFChars(env, pivot, NULL))) { __failed = TRUE; goto done; } + if (!(__ndirect = (*env)->GetStringUTFChars(env, direct, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } slasr_(__nside, __npivot, __ndirect, &m, &n, __nc + offsetc, __ns + offsets, __na + offseta, &lda); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); if (__ndirect) (*env)->ReleaseStringUTFChars(env, direct, __ndirect); if (__npivot) (*env)->ReleaseStringUTFChars(env, pivot, __npivot); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slasrt_)(const char *id, int *n, float *d, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasrtK(JNIEnv *env, UNUSED jobject obj, jstring id, jint n, jfloatArray d, jint offsetd, jobject info) { - jboolean failed = FALSE; - const char *__nid = NULL; int __ninfo = 0; float *__nd = NULL; - if (!(__nid = (*env)->GetStringUTFChars(env, id, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nid = NULL; + int __ninfo = 0; + float *__nd = NULL; + if (!(__nid = (*env)->GetStringUTFChars(env, id, NULL))) { __failed = TRUE; goto done; } __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } slasrt_(__nid, &n, __nd + offsetd, &__ninfo); done: - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nid) (*env)->ReleaseStringUTFChars(env, id, __nid); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slassq_)(int *n, float *x, int *incx, float *scale, float *sumsq); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slassqK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray x, jint offsetx, jint incx, jobject scale, jobject sumsq) { - jboolean failed = FALSE; - float __nscale = 0; float __nsumsq = 0; float *__nx = NULL; + jboolean __failed = FALSE; + float __nscale = 0; + float __nsumsq = 0; + float *__nx = NULL; __nscale = (*env)->GetFloatField(env, scale, floatW_val_fieldID); __nsumsq = (*env)->GetFloatField(env, sumsq, floatW_val_fieldID); - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } slassq_(&n, __nx + offsetx, &incx, &__nscale, &__nsumsq); done: - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetFloatField(env, sumsq, floatW_val_fieldID, __nsumsq); - if (!failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetFloatField(env, sumsq, floatW_val_fieldID, __nsumsq); + if (!__failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slasv2_)(float *f, float *g, float *h, float *ssmin, float *ssmax, float *snr, float *csr, float *snl, float *csl); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasv2K(JNIEnv *env, UNUSED jobject obj, jfloat f, jfloat g, jfloat h, jobject ssmin, jobject ssmax, jobject snr, jobject csr, jobject snl, jobject csl) { - jboolean failed = FALSE; - float __nssmin = 0; float __nssmax = 0; float __nsnr = 0; float __ncsr = 0; float __nsnl = 0; float __ncsl = 0; + jboolean __failed = FALSE; + float __nssmin = 0; + float __nssmax = 0; + float __nsnr = 0; + float __ncsr = 0; + float __nsnl = 0; + float __ncsl = 0; __nssmin = (*env)->GetFloatField(env, ssmin, floatW_val_fieldID); __nssmax = (*env)->GetFloatField(env, ssmax, floatW_val_fieldID); __nsnr = (*env)->GetFloatField(env, snr, floatW_val_fieldID); @@ -15185,4599 +16296,4793 @@ void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasv2K(JNIEnv *env, UNUSED jobjec __ncsl = (*env)->GetFloatField(env, csl, floatW_val_fieldID); slasv2_(&f, &g, &h, &__nssmin, &__nssmax, &__nsnr, &__ncsr, &__nsnl, &__ncsl); done: - if (!failed) (*env)->SetFloatField(env, csl, floatW_val_fieldID, __ncsl); - if (!failed) (*env)->SetFloatField(env, snl, floatW_val_fieldID, __nsnl); - if (!failed) (*env)->SetFloatField(env, csr, floatW_val_fieldID, __ncsr); - if (!failed) (*env)->SetFloatField(env, snr, floatW_val_fieldID, __nsnr); - if (!failed) (*env)->SetFloatField(env, ssmax, floatW_val_fieldID, __nssmax); - if (!failed) (*env)->SetFloatField(env, ssmin, floatW_val_fieldID, __nssmin); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetFloatField(env, csl, floatW_val_fieldID, __ncsl); + if (!__failed) (*env)->SetFloatField(env, snl, floatW_val_fieldID, __nsnl); + if (!__failed) (*env)->SetFloatField(env, csr, floatW_val_fieldID, __ncsr); + if (!__failed) (*env)->SetFloatField(env, snr, floatW_val_fieldID, __nsnr); + if (!__failed) (*env)->SetFloatField(env, ssmax, floatW_val_fieldID, __nssmax); + if (!__failed) (*env)->SetFloatField(env, ssmin, floatW_val_fieldID, __nssmin); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slaswp_)(int *n, float *a, int *lda, int *k1, int *k2, int *ipiv, int *incx); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slaswpK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray a, jint offseta, jint lda, jint k1, jint k2, jintArray ipiv, jint offsetipiv, jint incx) { - jboolean failed = FALSE; - float *__na = NULL; int *__nipiv = NULL; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + jboolean __failed = FALSE; + float *__na = NULL; + int *__nipiv = NULL; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } slaswp_(&n, __na + offseta, &lda, &k1, &k2, __nipiv + offsetipiv, &incx); done: - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slasy2_)(int *ltranl, int *ltranr, int *isgn, int *n1, int *n2, float *tl, int *ldtl, float *tr, int *ldtr, float *b, int *ldb, float *scale, float *x, int *ldx, float *xnorm, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasy2K(JNIEnv *env, UNUSED jobject obj, jboolean ltranl, jboolean ltranr, jint isgn, jint n1, jint n2, jfloatArray tl, jint offsettl, jint ldtl, jfloatArray tr, jint offsettr, jint ldtr, jfloatArray b, jint offsetb, jint ldb, jobject scale, jfloatArray x, jint offsetx, jint ldx, jobject xnorm, jobject info) { - jboolean failed = FALSE; - int __nltranl; int __nltranr; float __nscale = 0; float __nxnorm = 0; int __ninfo = 0; float *__ntl = NULL; float *__ntr = NULL; float *__nb = NULL; float *__nx = NULL; + jboolean __failed = FALSE; + int __nltranl; + int __nltranr; + float __nscale = 0; + float __nxnorm = 0; + int __ninfo = 0; + float *__ntl = NULL; + float *__ntr = NULL; + float *__nb = NULL; + float *__nx = NULL; __nltranl = ltranl; __nltranr = ltranr; __nscale = (*env)->GetFloatField(env, scale, floatW_val_fieldID); __nxnorm = (*env)->GetFloatField(env, xnorm, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__ntl = (*env)->GetPrimitiveArrayCritical(env, tl, NULL))) goto fail; - if (!(__ntr = (*env)->GetPrimitiveArrayCritical(env, tr, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__ntl = (*env)->GetPrimitiveArrayCritical(env, tl, NULL))) { __failed = TRUE; goto done; } + if (!(__ntr = (*env)->GetPrimitiveArrayCritical(env, tr, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } slasy2_(&__nltranl, &__nltranr, &isgn, &n1, &n2, __ntl + offsettl, &ldtl, __ntr + offsettr, &ldtr, __nb + offsetb, &ldb, &__nscale, __nx + offsetx, &ldx, &__nxnorm, &__ninfo); done: - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__ntr) (*env)->ReleasePrimitiveArrayCritical(env, tr, __ntr, failed ? JNI_ABORT : 0); - if (__ntl) (*env)->ReleasePrimitiveArrayCritical(env, tl, __ntl, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, xnorm, floatW_val_fieldID, __nxnorm); - if (!failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); - if (!failed) ltranr = __nltranr; - if (!failed) ltranl = __nltranl; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__ntr) (*env)->ReleasePrimitiveArrayCritical(env, tr, __ntr, __failed ? JNI_ABORT : 0); + if (__ntl) (*env)->ReleasePrimitiveArrayCritical(env, tl, __ntl, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, xnorm, floatW_val_fieldID, __nxnorm); + if (!__failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); + if (!__failed) ltranr = __nltranr; + if (!__failed) ltranl = __nltranl; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slasyf_)(const char *uplo, int *n, int *nb, int *kb, float *a, int *lda, int *ipiv, float *w, int *ldw, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slasyfK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nb, jobject kb, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray w, jint offsetw, jint ldw, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __nkb = 0; int __ninfo = 0; float *__na = NULL; int *__nipiv = NULL; float *__nw = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __nkb = 0; + int __ninfo = 0; + float *__na = NULL; + int *__nipiv = NULL; + float *__nw = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nkb = (*env)->GetIntField(env, kb, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } slasyf_(__nuplo, &n, &nb, &__nkb, __na + offseta, &lda, __nipiv + offsetipiv, __nw + offsetw, &ldw, &__ninfo); done: - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, kb, intW_val_fieldID, __nkb); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, kb, intW_val_fieldID, __nkb); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slatbs_)(const char *uplo, const char *trans, const char *diag, const char *normin, int *n, int *kd, float *ab, int *ldab, float *x, float *scale, float *cnorm, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatbsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jstring normin, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloatArray x, jint offsetx, jobject scale, jfloatArray cnorm, jint offsetcnorm, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; const char *__nnormin = NULL; float __nscale = 0; int __ninfo = 0; float *__nab = NULL; float *__nx = NULL; float *__ncnorm = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(__nnormin = (*env)->GetStringUTFChars(env, normin, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + const char *__ndiag = NULL; + const char *__nnormin = NULL; + float __nscale = 0; + int __ninfo = 0; + float *__nab = NULL; + float *__nx = NULL; + float *__ncnorm = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + if (!(__nnormin = (*env)->GetStringUTFChars(env, normin, NULL))) { __failed = TRUE; goto done; } __nscale = (*env)->GetFloatField(env, scale, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ncnorm = (*env)->GetPrimitiveArrayCritical(env, cnorm, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ncnorm = (*env)->GetPrimitiveArrayCritical(env, cnorm, NULL))) { __failed = TRUE; goto done; } slatbs_(__nuplo, __ntrans, __ndiag, __nnormin, &n, &kd, __nab + offsetab, &ldab, __nx + offsetx, &__nscale, __ncnorm + offsetcnorm, &__ninfo); done: - if (__ncnorm) (*env)->ReleasePrimitiveArrayCritical(env, cnorm, __ncnorm, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); + if (__ncnorm) (*env)->ReleasePrimitiveArrayCritical(env, cnorm, __ncnorm, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); if (__nnormin) (*env)->ReleaseStringUTFChars(env, normin, __nnormin); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slatdf_)(int *ijob, int *n, float *z, int *ldz, float *rhs, float *rdsum, float *rdscal, int *ipiv, int *jpiv); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatdfK(JNIEnv *env, UNUSED jobject obj, jint ijob, jint n, jfloatArray z, jint offsetz, jint ldz, jfloatArray rhs, jint offsetrhs, jobject rdsum, jobject rdscal, jintArray ipiv, jint offsetipiv, jintArray jpiv, jint offsetjpiv) { - jboolean failed = FALSE; - float __nrdsum = 0; float __nrdscal = 0; float *__nz = NULL; float *__nrhs = NULL; int *__nipiv = NULL; int *__njpiv = NULL; + jboolean __failed = FALSE; + float __nrdsum = 0; + float __nrdscal = 0; + float *__nz = NULL; + float *__nrhs = NULL; + int *__nipiv = NULL; + int *__njpiv = NULL; __nrdsum = (*env)->GetFloatField(env, rdsum, floatW_val_fieldID); __nrdscal = (*env)->GetFloatField(env, rdscal, floatW_val_fieldID); - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nrhs = (*env)->GetPrimitiveArrayCritical(env, rhs, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__njpiv = (*env)->GetPrimitiveArrayCritical(env, jpiv, NULL))) goto fail; + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nrhs = (*env)->GetPrimitiveArrayCritical(env, rhs, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__njpiv = (*env)->GetPrimitiveArrayCritical(env, jpiv, NULL))) { __failed = TRUE; goto done; } slatdf_(&ijob, &n, __nz + offsetz, &ldz, __nrhs + offsetrhs, &__nrdsum, &__nrdscal, __nipiv + offsetipiv, __njpiv + offsetjpiv); done: - if (__njpiv) (*env)->ReleasePrimitiveArrayCritical(env, jpiv, __njpiv, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nrhs) (*env)->ReleasePrimitiveArrayCritical(env, rhs, __nrhs, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetFloatField(env, rdscal, floatW_val_fieldID, __nrdscal); - if (!failed) (*env)->SetFloatField(env, rdsum, floatW_val_fieldID, __nrdsum); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__njpiv) (*env)->ReleasePrimitiveArrayCritical(env, jpiv, __njpiv, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nrhs) (*env)->ReleasePrimitiveArrayCritical(env, rhs, __nrhs, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetFloatField(env, rdscal, floatW_val_fieldID, __nrdscal); + if (!__failed) (*env)->SetFloatField(env, rdsum, floatW_val_fieldID, __nrdsum); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slatps_)(const char *uplo, const char *trans, const char *diag, const char *normin, int *n, float *ap, float *x, float *scale, float *cnorm, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatpsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jstring normin, jint n, jfloatArray ap, jint offsetap, jfloatArray x, jint offsetx, jobject scale, jfloatArray cnorm, jint offsetcnorm, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; const char *__nnormin = NULL; float __nscale = 0; int __ninfo = 0; float *__nap = NULL; float *__nx = NULL; float *__ncnorm = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(__nnormin = (*env)->GetStringUTFChars(env, normin, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + const char *__ndiag = NULL; + const char *__nnormin = NULL; + float __nscale = 0; + int __ninfo = 0; + float *__nap = NULL; + float *__nx = NULL; + float *__ncnorm = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + if (!(__nnormin = (*env)->GetStringUTFChars(env, normin, NULL))) { __failed = TRUE; goto done; } __nscale = (*env)->GetFloatField(env, scale, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ncnorm = (*env)->GetPrimitiveArrayCritical(env, cnorm, NULL))) goto fail; + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ncnorm = (*env)->GetPrimitiveArrayCritical(env, cnorm, NULL))) { __failed = TRUE; goto done; } slatps_(__nuplo, __ntrans, __ndiag, __nnormin, &n, __nap + offsetap, __nx + offsetx, &__nscale, __ncnorm + offsetcnorm, &__ninfo); done: - if (__ncnorm) (*env)->ReleasePrimitiveArrayCritical(env, cnorm, __ncnorm, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); + if (__ncnorm) (*env)->ReleasePrimitiveArrayCritical(env, cnorm, __ncnorm, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); if (__nnormin) (*env)->ReleaseStringUTFChars(env, normin, __nnormin); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slatrd_)(const char *uplo, int *n, int *nb, float *a, int *lda, float *e, float *tau, float *w, int *ldw); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatrdK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nb, jfloatArray a, jint offseta, jint lda, jfloatArray e, jint offsete, jfloatArray tau, jint offsettau, jfloatArray w, jint offsetw, jint ldw) { - jboolean failed = FALSE; - const char *__nuplo = NULL; float *__na = NULL; float *__ne = NULL; float *__ntau = NULL; float *__nw = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + float *__na = NULL; + float *__ne = NULL; + float *__ntau = NULL; + float *__nw = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } slatrd_(__nuplo, &n, &nb, __na + offseta, &lda, __ne + offsete, __ntau + offsettau, __nw + offsetw, &ldw); done: - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slatrs_)(const char *uplo, const char *trans, const char *diag, const char *normin, int *n, float *a, int *lda, float *x, float *scale, float *cnorm, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jstring normin, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jobject scale, jfloatArray cnorm, jint offsetcnorm, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; const char *__nnormin = NULL; float __nscale = 0; int __ninfo = 0; float *__na = NULL; float *__nx = NULL; float *__ncnorm = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(__nnormin = (*env)->GetStringUTFChars(env, normin, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + const char *__ndiag = NULL; + const char *__nnormin = NULL; + float __nscale = 0; + int __ninfo = 0; + float *__na = NULL; + float *__nx = NULL; + float *__ncnorm = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + if (!(__nnormin = (*env)->GetStringUTFChars(env, normin, NULL))) { __failed = TRUE; goto done; } __nscale = (*env)->GetFloatField(env, scale, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ncnorm = (*env)->GetPrimitiveArrayCritical(env, cnorm, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ncnorm = (*env)->GetPrimitiveArrayCritical(env, cnorm, NULL))) { __failed = TRUE; goto done; } slatrs_(__nuplo, __ntrans, __ndiag, __nnormin, &n, __na + offseta, &lda, __nx + offsetx, &__nscale, __ncnorm + offsetcnorm, &__ninfo); done: - if (__ncnorm) (*env)->ReleasePrimitiveArrayCritical(env, cnorm, __ncnorm, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); + if (__ncnorm) (*env)->ReleasePrimitiveArrayCritical(env, cnorm, __ncnorm, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); if (__nnormin) (*env)->ReleaseStringUTFChars(env, normin, __nnormin); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slatrz_)(int *m, int *n, int *l, float *a, int *lda, float *tau, float *work); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatrzK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint l, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork) { - jboolean failed = FALSE; - float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + float *__na = NULL; + float *__ntau = NULL; + float *__nwork = NULL; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } slatrz_(&m, &n, &l, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slatzm_)(const char *side, int *m, int *n, float *v, int *incv, float *tau, float *c1, float *c2, int *Ldc, float *work); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slatzmK(JNIEnv *env, UNUSED jobject obj, jstring side, jint m, jint n, jfloatArray v, jint offsetv, jint incv, jfloat tau, jfloatArray c1, jint offsetc1, jfloatArray c2, jint offsetc2, jint Ldc, jfloatArray work, jint offsetwork) { - jboolean failed = FALSE; - const char *__nside = NULL; float *__nv = NULL; float *__nc1 = NULL; float *__nc2 = NULL; float *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nc1 = (*env)->GetPrimitiveArrayCritical(env, c1, NULL))) goto fail; - if (!(__nc2 = (*env)->GetPrimitiveArrayCritical(env, c2, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + float *__nv = NULL; + float *__nc1 = NULL; + float *__nc2 = NULL; + float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nc1 = (*env)->GetPrimitiveArrayCritical(env, c1, NULL))) { __failed = TRUE; goto done; } + if (!(__nc2 = (*env)->GetPrimitiveArrayCritical(env, c2, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } slatzm_(__nside, &m, &n, __nv + offsetv, &incv, &tau, __nc1 + offsetc1, __nc2 + offsetc2, &Ldc, __nwork + offsetwork); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc2) (*env)->ReleasePrimitiveArrayCritical(env, c2, __nc2, failed ? JNI_ABORT : 0); - if (__nc1) (*env)->ReleasePrimitiveArrayCritical(env, c1, __nc1, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc2) (*env)->ReleasePrimitiveArrayCritical(env, c2, __nc2, __failed ? JNI_ABORT : 0); + if (__nc1) (*env)->ReleasePrimitiveArrayCritical(env, c1, __nc1, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slauu2_)(const char *uplo, int *n, float *a, int *lda, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slauu2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } slauu2_(__nuplo, &n, __na + offseta, &lda, &__ninfo); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*slauum_)(const char *uplo, int *n, float *a, int *lda, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_slauumK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } slauum_(__nuplo, &n, __na + offseta, &lda, &__ninfo); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); +} + +// static void (*slazq3_)(int *i0, int *n0, float *z, int *pp, float *dmin, float *sigma, float *desig, float *qmax, int *nfail, int *iter, int *ndiv, int *ieee, int *ttype, float *dmin1, float *dmin2, float *dn, float *dn1, float *dn2, float *tau); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slazq3K(JNIEnv *env, UNUSED jobject obj, UNUSED jint i0, UNUSED jobject n0, UNUSED jfloatArray z, UNUSED jint offsetz, UNUSED jint pp, UNUSED jobject dmin, UNUSED jobject sigma, UNUSED jobject desig, UNUSED jobject qmax, UNUSED jobject nfail, UNUSED jobject iter, UNUSED jobject ndiv, UNUSED jboolean ieee, UNUSED jobject ttype, UNUSED jobject dmin1, UNUSED jobject dmin2, UNUSED jobject dn, UNUSED jobject dn1, UNUSED jobject dn2, UNUSED jobject tau) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +// static void (*slazq4_)(int *i0, int *n0, float *z, int *pp, int *n0in, float *dmin, float *dmin1, float *dmin2, float *dn, float *dn1, float *dn2, float *tau, int *ttype, float *g); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slazq4K(JNIEnv *env, UNUSED jobject obj, UNUSED jint i0, UNUSED jint n0, UNUSED jfloatArray z, UNUSED jint offsetz, UNUSED jint pp, UNUSED jint n0in, UNUSED jfloat dmin, UNUSED jfloat dmin1, UNUSED jfloat dmin2, UNUSED jfloat dn, UNUSED jfloat dn1, UNUSED jfloat dn2, UNUSED jobject tau, UNUSED jobject ttype, UNUSED jobject g) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } static void (*sopgtr_)(const char *uplo, int *n, float *ap, float *tau, float *q, int *ldq, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sopgtrK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray tau, jint offsettau, jfloatArray q, jint offsetq, jint ldq, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; float *__ntau = NULL; float *__nq = NULL; float *__nwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__nap = NULL; + float *__ntau = NULL; + float *__nq = NULL; + float *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sopgtr_(__nuplo, &n, __nap + offsetap, __ntau + offsettau, __nq + offsetq, &ldq, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sopmtr_)(const char *side, const char *uplo, const char *trans, int *m, int *n, float *ap, float *tau, float *c, int *Ldc, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sopmtrK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring uplo, jstring trans, jint m, jint n, jfloatArray ap, jint offsetap, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__nuplo = NULL; const char *__ntrans = NULL; int __ninfo = 0; float *__nap = NULL; float *__ntau = NULL; float *__nc = NULL; float *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + int __ninfo = 0; + float *__nap = NULL; + float *__ntau = NULL; + float *__nc = NULL; + float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sopmtr_(__nside, __nuplo, __ntrans, &m, &n, __nap + offsetap, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sorg2l_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorg2lK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sorg2l_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sorg2r_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorg2rK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sorg2r_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sorgbr_)(const char *vect, int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgbrK(JNIEnv *env, UNUSED jobject obj, jstring vect, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__nvect = NULL; int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; - if (!(__nvect = (*env)->GetStringUTFChars(env, vect, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nvect = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nwork = NULL; + if (!(__nvect = (*env)->GetStringUTFChars(env, vect, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sorgbr_(__nvect, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nvect) (*env)->ReleaseStringUTFChars(env, vect, __nvect); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sorghr_)(int *n, int *ilo, int *ihi, float *a, int *lda, float *tau, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorghrK(JNIEnv *env, UNUSED jobject obj, jint n, jint ilo, jint ihi, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sorghr_(&n, &ilo, &ihi, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sorgl2_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgl2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sorgl2_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sorglq_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorglqK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sorglq_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sorgql_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgqlK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sorgql_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sorgqr_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgqrK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sorgqr_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sorgr2_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgr2K(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sorgr2_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sorgrq_)(int *m, int *n, int *k, float *a, int *lda, float *tau, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgrqK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sorgrq_(&m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sorgtr_)(const char *uplo, int *n, float *a, int *lda, float *tau, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorgtrK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sorgtr_(__nuplo, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sorm2l_)(const char *side, const char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorm2lK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nc = NULL; float *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__ntrans = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nc = NULL; + float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sorm2l_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sorm2r_)(const char *side, const char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorm2rK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nc = NULL; float *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__ntrans = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nc = NULL; + float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sorm2r_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sormbr_)(const char *vect, const char *side, const char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormbrK(JNIEnv *env, UNUSED jobject obj, jstring vect, jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__nvect = NULL; const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nc = NULL; float *__nwork = NULL; - if (!(__nvect = (*env)->GetStringUTFChars(env, vect, NULL))) goto fail; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nvect = NULL; + const char *__nside = NULL; + const char *__ntrans = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nc = NULL; + float *__nwork = NULL; + if (!(__nvect = (*env)->GetStringUTFChars(env, vect, NULL))) { __failed = TRUE; goto done; } + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sormbr_(__nvect, __nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); if (__nvect) (*env)->ReleaseStringUTFChars(env, vect, __nvect); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sormhr_)(const char *side, const char *trans, int *m, int *n, int *ilo, int *ihi, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormhrK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint ilo, jint ihi, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nc = NULL; float *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__ntrans = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nc = NULL; + float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sormhr_(__nside, __ntrans, &m, &n, &ilo, &ihi, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sorml2_)(const char *side, const char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sorml2K(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nc = NULL; float *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__ntrans = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nc = NULL; + float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sorml2_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sormlq_)(const char *side, const char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormlqK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nc = NULL; float *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__ntrans = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nc = NULL; + float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sormlq_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sormql_)(const char *side, const char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormqlK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nc = NULL; float *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__ntrans = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nc = NULL; + float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sormql_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sormqr_)(const char *side, const char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormqrK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nc = NULL; float *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__ntrans = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nc = NULL; + float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sormqr_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sormr2_)(const char *side, const char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormr2K(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nc = NULL; float *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__ntrans = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nc = NULL; + float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sormr2_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sormr3_)(const char *side, const char *trans, int *m, int *n, int *k, int *l, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormr3K(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jint l, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nc = NULL; float *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__ntrans = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nc = NULL; + float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sormr3_(__nside, __ntrans, &m, &n, &k, &l, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sormrq_)(const char *side, const char *trans, int *m, int *n, int *k, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormrqK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nc = NULL; float *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__ntrans = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nc = NULL; + float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sormrq_(__nside, __ntrans, &m, &n, &k, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sormrz_)(const char *side, const char *trans, int *m, int *n, int *k, int *l, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormrzK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring trans, jint m, jint n, jint k, jint l, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nc = NULL; float *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__ntrans = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nc = NULL; + float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sormrz_(__nside, __ntrans, &m, &n, &k, &l, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sormtr_)(const char *side, const char *uplo, const char *trans, int *m, int *n, float *a, int *lda, float *tau, float *c, int *Ldc, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sormtrK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring uplo, jstring trans, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray c, jint offsetc, jint Ldc, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__nuplo = NULL; const char *__ntrans = NULL; int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nc = NULL; float *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nc = NULL; + float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sormtr_(__nside, __nuplo, __ntrans, &m, &n, __na + offseta, &lda, __ntau + offsettau, __nc + offsetc, &Ldc, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*spbcon_)(const char *uplo, int *n, int *kd, float *ab, int *ldab, float *anorm, float *rcond, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbconK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; float __nrcond = 0; int __ninfo = 0; float *__nab = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + float __nrcond = 0; + int __ninfo = 0; + float *__nab = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } spbcon_(__nuplo, &n, &kd, __nab + offsetab, &ldab, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*spbequ_)(const char *uplo, int *n, int *kd, float *ab, int *ldab, float *s, float *scond, float *amax, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbequK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloatArray s, jint offsets, jobject scond, jobject amax, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; float __nscond = 0; float __namax = 0; int __ninfo = 0; float *__nab = NULL; float *__ns = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + float __nscond = 0; + float __namax = 0; + int __ninfo = 0; + float *__nab = NULL; + float *__ns = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nscond = (*env)->GetFloatField(env, scond, floatW_val_fieldID); __namax = (*env)->GetFloatField(env, amax, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } spbequ_(__nuplo, &n, &kd, __nab + offsetab, &ldab, __ns + offsets, &__nscond, &__namax, &__ninfo); done: - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, amax, floatW_val_fieldID, __namax); - if (!failed) (*env)->SetFloatField(env, scond, floatW_val_fieldID, __nscond); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, amax, floatW_val_fieldID, __namax); + if (!__failed) (*env)->SetFloatField(env, scond, floatW_val_fieldID, __nscond); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*spbrfs_)(const char *uplo, int *n, int *kd, int *nrhs, float *ab, int *ldab, float *afb, int *ldafb, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbrfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray afb, jint offsetafb, jint ldafb, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__nab = NULL; float *__nafb = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nafb = (*env)->GetPrimitiveArrayCritical(env, afb, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__nab = NULL; + float *__nafb = NULL; + float *__nb = NULL; + float *__nx = NULL; + float *__nferr = NULL; + float *__nberr = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nafb = (*env)->GetPrimitiveArrayCritical(env, afb, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } spbrfs_(__nuplo, &n, &kd, &nrhs, __nab + offsetab, &ldab, __nafb + offsetafb, &ldafb, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nafb) (*env)->ReleasePrimitiveArrayCritical(env, afb, __nafb, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nafb) (*env)->ReleasePrimitiveArrayCritical(env, afb, __nafb, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*spbstf_)(const char *uplo, int *n, int *kd, float *ab, int *ldab, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbstfK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__nab = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__nab = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } spbstf_(__nuplo, &n, &kd, __nab + offsetab, &ldab, &__ninfo); done: - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*spbsv_)(const char *uplo, int *n, int *kd, int *nrhs, float *ab, int *ldab, float *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbsvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__nab = NULL; float *__nb = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__nab = NULL; + float *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } spbsv_(__nuplo, &n, &kd, &nrhs, __nab + offsetab, &ldab, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*spbsvx_)(const char *fact, const char *uplo, int *n, int *kd, int *nrhs, float *ab, int *ldab, float *afb, int *ldafb, char *equed, float *s, float *b, int *ldb, float *x, int *ldx, float *rcond, float *ferr, float *berr, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbsvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring uplo, jint n, jint kd, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray afb, jint offsetafb, jint ldafb, jobject equed, jfloatArray s, jint offsets, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nfact = NULL; const char *__nuplo = NULL; char *__nequed = NULL; jstring __jequed = NULL;; float __nrcond = 0; int __ninfo = 0; float *__nab = NULL; float *__nafb = NULL; float *__ns = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nfact = NULL; + const char *__nuplo = NULL; + char *__nequed = NULL; jstring __jequed = NULL; + float __nrcond = 0; + int __ninfo = 0; + float *__nab = NULL; + float *__nafb = NULL; + float *__ns = NULL; + float *__nb = NULL; + float *__nx = NULL; + float *__nferr = NULL; + float *__nberr = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nafb = (*env)->GetPrimitiveArrayCritical(env, afb, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nafb = (*env)->GetPrimitiveArrayCritical(env, afb, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } spbsvx_(__nfact, __nuplo, &n, &kd, &nrhs, __nab + offsetab, &ldab, __nafb + offsetafb, &ldafb, __nequed, __ns + offsets, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nafb) (*env)->ReleasePrimitiveArrayCritical(env, afb, __nafb, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); - if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nafb) (*env)->ReleasePrimitiveArrayCritical(env, afb, __nafb, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!__failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*spbtf2_)(const char *uplo, int *n, int *kd, float *ab, int *ldab, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbtf2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__nab = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__nab = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } spbtf2_(__nuplo, &n, &kd, __nab + offsetab, &ldab, &__ninfo); done: - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*spbtrf_)(const char *uplo, int *n, int *kd, float *ab, int *ldab, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbtrfK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__nab = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__nab = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } spbtrf_(__nuplo, &n, &kd, __nab + offsetab, &ldab, &__ninfo); done: - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*spbtrs_)(const char *uplo, int *n, int *kd, int *nrhs, float *ab, int *ldab, float *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_spbtrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint kd, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__nab = NULL; float *__nb = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__nab = NULL; + float *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } spbtrs_(__nuplo, &n, &kd, &nrhs, __nab + offsetab, &ldab, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*spocon_)(const char *uplo, int *n, float *a, int *lda, float *anorm, float *rcond, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_spoconK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; float __nrcond = 0; int __ninfo = 0; float *__na = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + float __nrcond = 0; + int __ninfo = 0; + float *__na = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } spocon_(__nuplo, &n, __na + offseta, &lda, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*spoequ_)(int *n, float *a, int *lda, float *s, float *scond, float *amax, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_spoequK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray s, jint offsets, jobject scond, jobject amax, jobject info) { - jboolean failed = FALSE; - float __nscond = 0; float __namax = 0; int __ninfo = 0; float *__na = NULL; float *__ns = NULL; + jboolean __failed = FALSE; + float __nscond = 0; + float __namax = 0; + int __ninfo = 0; + float *__na = NULL; + float *__ns = NULL; __nscond = (*env)->GetFloatField(env, scond, floatW_val_fieldID); __namax = (*env)->GetFloatField(env, amax, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } spoequ_(&n, __na + offseta, &lda, __ns + offsets, &__nscond, &__namax, &__ninfo); done: - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, amax, floatW_val_fieldID, __namax); - if (!failed) (*env)->SetFloatField(env, scond, floatW_val_fieldID, __nscond); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, amax, floatW_val_fieldID, __namax); + if (!__failed) (*env)->SetFloatField(env, scond, floatW_val_fieldID, __nscond); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sporfs_)(const char *uplo, int *n, int *nrhs, float *a, int *lda, float *af, int *ldaf, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sporfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray af, jint offsetaf, jint ldaf, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; float *__naf = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__naf = NULL; + float *__nb = NULL; + float *__nx = NULL; + float *__nferr = NULL; + float *__nberr = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } sporfs_(__nuplo, &n, &nrhs, __na + offseta, &lda, __naf + offsetaf, &ldaf, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sposv_)(const char *uplo, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sposvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } sposv_(__nuplo, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sposvx_)(const char *fact, const char *uplo, int *n, int *nrhs, float *a, int *lda, float *af, int *ldaf, char *equed, float *s, float *b, int *ldb, float *x, int *ldx, float *rcond, float *ferr, float *berr, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sposvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray af, jint offsetaf, jint ldaf, jobject equed, jfloatArray s, jint offsets, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nfact = NULL; const char *__nuplo = NULL; char *__nequed = NULL; jstring __jequed = NULL;; float __nrcond = 0; int __ninfo = 0; float *__na = NULL; float *__naf = NULL; float *__ns = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nfact = NULL; + const char *__nuplo = NULL; + char *__nequed = NULL; jstring __jequed = NULL; + float __nrcond = 0; + int __ninfo = 0; + float *__na = NULL; + float *__naf = NULL; + float *__ns = NULL; + float *__nb = NULL; + float *__nx = NULL; + float *__nferr = NULL; + float *__nberr = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } sposvx_(__nfact, __nuplo, &n, &nrhs, __na + offseta, &lda, __naf + offsetaf, &ldaf, __nequed, __ns + offsets, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); - if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!__failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*spotf2_)(const char *uplo, int *n, float *a, int *lda, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_spotf2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } spotf2_(__nuplo, &n, __na + offseta, &lda, &__ninfo); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*spotrf_)(const char *uplo, int *n, float *a, int *lda, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_spotrfK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } spotrf_(__nuplo, &n, __na + offseta, &lda, &__ninfo); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*spotri_)(const char *uplo, int *n, float *a, int *lda, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_spotriK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } spotri_(__nuplo, &n, __na + offseta, &lda, &__ninfo); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*spotrs_)(const char *uplo, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_spotrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } spotrs_(__nuplo, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sppcon_)(const char *uplo, int *n, float *ap, float *anorm, float *rcond, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sppconK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; float __nrcond = 0; int __ninfo = 0; float *__nap = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + float __nrcond = 0; + int __ninfo = 0; + float *__nap = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } sppcon_(__nuplo, &n, __nap + offsetap, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sppequ_)(const char *uplo, int *n, float *ap, float *s, float *scond, float *amax, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sppequK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray s, jint offsets, jobject scond, jobject amax, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; float __nscond = 0; float __namax = 0; int __ninfo = 0; float *__nap = NULL; float *__ns = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + float __nscond = 0; + float __namax = 0; + int __ninfo = 0; + float *__nap = NULL; + float *__ns = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nscond = (*env)->GetFloatField(env, scond, floatW_val_fieldID); __namax = (*env)->GetFloatField(env, amax, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } sppequ_(__nuplo, &n, __nap + offsetap, __ns + offsets, &__nscond, &__namax, &__ninfo); done: - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, amax, floatW_val_fieldID, __namax); - if (!failed) (*env)->SetFloatField(env, scond, floatW_val_fieldID, __nscond); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, amax, floatW_val_fieldID, __namax); + if (!__failed) (*env)->SetFloatField(env, scond, floatW_val_fieldID, __nscond); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*spprfs_)(const char *uplo, int *n, int *nrhs, float *ap, float *afp, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_spprfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray afp, jint offsetafp, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; float *__nafp = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nafp = (*env)->GetPrimitiveArrayCritical(env, afp, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__nap = NULL; + float *__nafp = NULL; + float *__nb = NULL; + float *__nx = NULL; + float *__nferr = NULL; + float *__nberr = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nafp = (*env)->GetPrimitiveArrayCritical(env, afp, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } spprfs_(__nuplo, &n, &nrhs, __nap + offsetap, __nafp + offsetafp, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nafp) (*env)->ReleasePrimitiveArrayCritical(env, afp, __nafp, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nafp) (*env)->ReleasePrimitiveArrayCritical(env, afp, __nafp, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sppsv_)(const char *uplo, int *n, int *nrhs, float *ap, float *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sppsvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; float *__nb = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__nap = NULL; + float *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } sppsv_(__nuplo, &n, &nrhs, __nap + offsetap, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sppsvx_)(const char *fact, const char *uplo, int *n, int *nrhs, float *ap, float *afp, char *equed, float *s, float *b, int *ldb, float *x, int *ldx, float *rcond, float *ferr, float *berr, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sppsvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray afp, jint offsetafp, jobject equed, jfloatArray s, jint offsets, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nfact = NULL; const char *__nuplo = NULL; char *__nequed = NULL; jstring __jequed = NULL;; float __nrcond = 0; int __ninfo = 0; float *__nap = NULL; float *__nafp = NULL; float *__ns = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nfact = NULL; + const char *__nuplo = NULL; + char *__nequed = NULL; jstring __jequed = NULL; + float __nrcond = 0; + int __ninfo = 0; + float *__nap = NULL; + float *__nafp = NULL; + float *__ns = NULL; + float *__nb = NULL; + float *__nx = NULL; + float *__nferr = NULL; + float *__nberr = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __jequed = (jstring)(*env)->GetObjectField(env, equed, StringW_val_fieldID); if (!(__nequed = (char*)(*env)->GetStringUTFChars(env, equed, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nafp = (*env)->GetPrimitiveArrayCritical(env, afp, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nafp = (*env)->GetPrimitiveArrayCritical(env, afp, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } sppsvx_(__nfact, __nuplo, &n, &nrhs, __nap + offsetap, __nafp + offsetafp, __nequed, __ns + offsets, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nafp) (*env)->ReleasePrimitiveArrayCritical(env, afp, __nafp, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); - if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nafp) (*env)->ReleasePrimitiveArrayCritical(env, afp, __nafp, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__nequed) { (*env)->ReleaseStringUTFChars(env, __jequed, (const char*)__nequed); if (!__failed) (*env)->SetObjectField(env, equed, StringW_val_fieldID, __jequed); } if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*spptrf_)(const char *uplo, int *n, float *ap, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_spptrfK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray ap, jint offsetap, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__nap = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } spptrf_(__nuplo, &n, __nap + offsetap, &__ninfo); done: - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*spptri_)(const char *uplo, int *n, float *ap, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_spptriK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray ap, jint offsetap, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__nap = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } spptri_(__nuplo, &n, __nap + offsetap, &__ninfo); done: - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*spptrs_)(const char *uplo, int *n, int *nrhs, float *ap, float *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_spptrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; float *__nb = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__nap = NULL; + float *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } spptrs_(__nuplo, &n, &nrhs, __nap + offsetap, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sptcon_)(int *n, float *d, float *e, float *anorm, float *rcond, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sptconK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - float __nrcond = 0; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nwork = NULL; + jboolean __failed = FALSE; + float __nrcond = 0; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; + float *__nwork = NULL; __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sptcon_(&n, __nd + offsetd, __ne + offsete, &anorm, &__nrcond, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*spteqr_)(const char *compz, int *n, float *d, float *e, float *z, int *ldz, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_spteqrK(JNIEnv *env, UNUSED jobject obj, jstring compz, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__ncompz = NULL; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nz = NULL; float *__nwork = NULL; - if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ncompz = NULL; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; + float *__nz = NULL; + float *__nwork = NULL; + if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } spteqr_(__ncompz, &n, __nd + offsetd, __ne + offsete, __nz + offsetz, &ldz, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ncompz) (*env)->ReleaseStringUTFChars(env, compz, __ncompz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sptrfs_)(int *n, int *nrhs, float *d, float *e, float *df, float *ef, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sptrfsK(JNIEnv *env, UNUSED jobject obj, jint n, jint nrhs, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray df, jint offsetdf, jfloatArray ef, jint offsetef, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__ndf = NULL; float *__nef = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__ndf = (*env)->GetPrimitiveArrayCritical(env, df, NULL))) goto fail; - if (!(__nef = (*env)->GetPrimitiveArrayCritical(env, ef, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; + float *__ndf = NULL; + float *__nef = NULL; + float *__nb = NULL; + float *__nx = NULL; + float *__nferr = NULL; + float *__nberr = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__ndf = (*env)->GetPrimitiveArrayCritical(env, df, NULL))) { __failed = TRUE; goto done; } + if (!(__nef = (*env)->GetPrimitiveArrayCritical(env, ef, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sptrfs_(&n, &nrhs, __nd + offsetd, __ne + offsete, __ndf + offsetdf, __nef + offsetef, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nef) (*env)->ReleasePrimitiveArrayCritical(env, ef, __nef, failed ? JNI_ABORT : 0); - if (__ndf) (*env)->ReleasePrimitiveArrayCritical(env, df, __ndf, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nef) (*env)->ReleasePrimitiveArrayCritical(env, ef, __nef, __failed ? JNI_ABORT : 0); + if (__ndf) (*env)->ReleasePrimitiveArrayCritical(env, df, __ndf, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sptsv_)(int *n, int *nrhs, float *d, float *e, float *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sptsvK(JNIEnv *env, UNUSED jobject obj, jint n, jint nrhs, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nb = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; + float *__nb = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } sptsv_(&n, &nrhs, __nd + offsetd, __ne + offsete, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sptsvx_)(const char *fact, int *n, int *nrhs, float *d, float *e, float *df, float *ef, float *b, int *ldb, float *x, int *ldx, float *rcond, float *ferr, float *berr, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sptsvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jint n, jint nrhs, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray df, jint offsetdf, jfloatArray ef, jint offsetef, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nfact = NULL; float __nrcond = 0; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__ndf = NULL; float *__nef = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; - if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nfact = NULL; + float __nrcond = 0; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; + float *__ndf = NULL; + float *__nef = NULL; + float *__nb = NULL; + float *__nx = NULL; + float *__nferr = NULL; + float *__nberr = NULL; + float *__nwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__ndf = (*env)->GetPrimitiveArrayCritical(env, df, NULL))) goto fail; - if (!(__nef = (*env)->GetPrimitiveArrayCritical(env, ef, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__ndf = (*env)->GetPrimitiveArrayCritical(env, df, NULL))) { __failed = TRUE; goto done; } + if (!(__nef = (*env)->GetPrimitiveArrayCritical(env, ef, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sptsvx_(__nfact, &n, &nrhs, __nd + offsetd, __ne + offsete, __ndf + offsetdf, __nef + offsetef, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nef) (*env)->ReleasePrimitiveArrayCritical(env, ef, __nef, failed ? JNI_ABORT : 0); - if (__ndf) (*env)->ReleasePrimitiveArrayCritical(env, df, __ndf, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nef) (*env)->ReleasePrimitiveArrayCritical(env, ef, __nef, __failed ? JNI_ABORT : 0); + if (__ndf) (*env)->ReleasePrimitiveArrayCritical(env, df, __ndf, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*spttrf_)(int *n, float *d, float *e, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_spttrfK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } spttrf_(&n, __nd + offsetd, __ne + offsete, &__ninfo); done: - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*spttrs_)(int *n, int *nrhs, float *d, float *e, float *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_spttrsK(JNIEnv *env, UNUSED jobject obj, jint n, jint nrhs, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nb = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; + float *__nb = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } spttrs_(&n, &nrhs, __nd + offsetd, __ne + offsete, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sptts2_)(int *n, int *nrhs, float *d, float *e, float *b, int *ldb); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sptts2K(JNIEnv *env, UNUSED jobject obj, jint n, jint nrhs, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray b, jint offsetb, jint ldb) { - jboolean failed = FALSE; - float *__nd = NULL; float *__ne = NULL; float *__nb = NULL; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + float *__nd = NULL; + float *__ne = NULL; + float *__nb = NULL; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } sptts2_(&n, &nrhs, __nd + offsetd, __ne + offsete, __nb + offsetb, &ldb); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*srscl_)(int *n, float *sa, float *sx, int *incx); void Java_dev_ludovic_netlib_lapack_JNILAPACK_srsclK(JNIEnv *env, UNUSED jobject obj, jint n, jfloat sa, jfloatArray sx, jint offsetsx, jint incx) { - jboolean failed = FALSE; + jboolean __failed = FALSE; float *__nsx = NULL; - if (!(__nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto fail; + if (!(__nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) { __failed = TRUE; goto done; } srscl_(&n, &sa, __nsx + offsetsx, &incx); done: - if (__nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, __nsx, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, __nsx, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssbev_)(const char *jobz, const char *uplo, int *n, int *kd, float *ab, int *ldab, float *w, float *z, int *ldz, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbevK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; float *__nab = NULL; float *__nw = NULL; float *__nz = NULL; float *__nwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__nab = NULL; + float *__nw = NULL; + float *__nz = NULL; + float *__nwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } ssbev_(__njobz, __nuplo, &n, &kd, __nab + offsetab, &ldab, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssbevd_)(const char *jobz, const char *uplo, int *n, int *kd, float *ab, int *ldab, float *w, float *z, int *ldz, float *work, int *lwork, int *iwork, int *liwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbevdK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; float *__nab = NULL; float *__nw = NULL; float *__nz = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__nab = NULL; + float *__nw = NULL; + float *__nz = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } ssbevd_(__njobz, __nuplo, &n, &kd, __nab + offsetab, &ldab, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssbevx_)(const char *jobz, const char *range, const char *uplo, int *n, int *kd, float *ab, int *ldab, float *q, int *ldq, float *vl, float *vu, int *il, int *iu, float *abstol, int *m, float *w, float *z, int *ldz, float *work, int *iwork, int *ifail, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbevxK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloatArray q, jint offsetq, jint ldq, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nrange = NULL; const char *__nuplo = NULL; int __nm = 0; int __ninfo = 0; float *__nab = NULL; float *__nq = NULL; float *__nw = NULL; float *__nz = NULL; float *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nrange = NULL; + const char *__nuplo = NULL; + int __nm = 0; + int __ninfo = 0; + float *__nab = NULL; + float *__nq = NULL; + float *__nw = NULL; + float *__nz = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + int *__nifail = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; - if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) { __failed = TRUE; goto done; } ssbevx_(__njobz, __nrange, __nuplo, &n, &kd, __nab + offsetab, &ldab, __nq + offsetq, &ldq, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); done: - if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, __failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssbgst_)(const char *vect, const char *uplo, int *n, int *ka, int *kb, float *ab, int *ldab, float *bb, int *ldbb, float *x, int *ldx, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbgstK(JNIEnv *env, UNUSED jobject obj, jstring vect, jstring uplo, jint n, jint ka, jint kb, jfloatArray ab, jint offsetab, jint ldab, jfloatArray bb, jint offsetbb, jint ldbb, jfloatArray x, jint offsetx, jint ldx, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nvect = NULL; const char *__nuplo = NULL; int __ninfo = 0; float *__nab = NULL; float *__nbb = NULL; float *__nx = NULL; float *__nwork = NULL; - if (!(__nvect = (*env)->GetStringUTFChars(env, vect, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nbb = (*env)->GetPrimitiveArrayCritical(env, bb, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nvect = NULL; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__nab = NULL; + float *__nbb = NULL; + float *__nx = NULL; + float *__nwork = NULL; + if (!(__nvect = (*env)->GetStringUTFChars(env, vect, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nbb = (*env)->GetPrimitiveArrayCritical(env, bb, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } ssbgst_(__nvect, __nuplo, &n, &ka, &kb, __nab + offsetab, &ldab, __nbb + offsetbb, &ldbb, __nx + offsetx, &ldx, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nbb) (*env)->ReleasePrimitiveArrayCritical(env, bb, __nbb, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nbb) (*env)->ReleasePrimitiveArrayCritical(env, bb, __nbb, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nvect) (*env)->ReleaseStringUTFChars(env, vect, __nvect); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssbgv_)(const char *jobz, const char *uplo, int *n, int *ka, int *kb, float *ab, int *ldab, float *bb, int *ldbb, float *w, float *z, int *ldz, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbgvK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jint ka, jint kb, jfloatArray ab, jint offsetab, jint ldab, jfloatArray bb, jint offsetbb, jint ldbb, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; float *__nab = NULL; float *__nbb = NULL; float *__nw = NULL; float *__nz = NULL; float *__nwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nbb = (*env)->GetPrimitiveArrayCritical(env, bb, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__nab = NULL; + float *__nbb = NULL; + float *__nw = NULL; + float *__nz = NULL; + float *__nwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nbb = (*env)->GetPrimitiveArrayCritical(env, bb, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } ssbgv_(__njobz, __nuplo, &n, &ka, &kb, __nab + offsetab, &ldab, __nbb + offsetbb, &ldbb, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nbb) (*env)->ReleasePrimitiveArrayCritical(env, bb, __nbb, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nbb) (*env)->ReleasePrimitiveArrayCritical(env, bb, __nbb, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssbgvd_)(const char *jobz, const char *uplo, int *n, int *ka, int *kb, float *ab, int *ldab, float *bb, int *ldbb, float *w, float *z, int *ldz, float *work, int *lwork, int *iwork, int *liwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbgvdK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jint ka, jint kb, jfloatArray ab, jint offsetab, jint ldab, jfloatArray bb, jint offsetbb, jint ldbb, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; float *__nab = NULL; float *__nbb = NULL; float *__nw = NULL; float *__nz = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nbb = (*env)->GetPrimitiveArrayCritical(env, bb, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__nab = NULL; + float *__nbb = NULL; + float *__nw = NULL; + float *__nz = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nbb = (*env)->GetPrimitiveArrayCritical(env, bb, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } ssbgvd_(__njobz, __nuplo, &n, &ka, &kb, __nab + offsetab, &ldab, __nbb + offsetbb, &ldbb, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nbb) (*env)->ReleasePrimitiveArrayCritical(env, bb, __nbb, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nbb) (*env)->ReleasePrimitiveArrayCritical(env, bb, __nbb, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssbgvx_)(const char *jobz, const char *range, const char *uplo, int *n, int *ka, int *kb, float *ab, int *ldab, float *bb, int *ldbb, float *q, int *ldq, float *vl, float *vu, int *il, int *iu, float *abstol, int *m, float *w, float *z, int *ldz, float *work, int *iwork, int *ifail, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbgvxK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jstring uplo, jint n, jint ka, jint kb, jfloatArray ab, jint offsetab, jint ldab, jfloatArray bb, jint offsetbb, jint ldbb, jfloatArray q, jint offsetq, jint ldq, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nrange = NULL; const char *__nuplo = NULL; int __nm = 0; int __ninfo = 0; float *__nab = NULL; float *__nbb = NULL; float *__nq = NULL; float *__nw = NULL; float *__nz = NULL; float *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nrange = NULL; + const char *__nuplo = NULL; + int __nm = 0; + int __ninfo = 0; + float *__nab = NULL; + float *__nbb = NULL; + float *__nq = NULL; + float *__nw = NULL; + float *__nz = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + int *__nifail = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nbb = (*env)->GetPrimitiveArrayCritical(env, bb, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; - if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nbb = (*env)->GetPrimitiveArrayCritical(env, bb, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) { __failed = TRUE; goto done; } ssbgvx_(__njobz, __nrange, __nuplo, &n, &ka, &kb, __nab + offsetab, &ldab, __nbb + offsetbb, &ldbb, __nq + offsetq, &ldq, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); done: - if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nbb) (*env)->ReleasePrimitiveArrayCritical(env, bb, __nbb, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, __failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nbb) (*env)->ReleasePrimitiveArrayCritical(env, bb, __nbb, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssbtrd_)(const char *vect, const char *uplo, int *n, int *kd, float *ab, int *ldab, float *d, float *e, float *q, int *ldq, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssbtrdK(JNIEnv *env, UNUSED jobject obj, jstring vect, jstring uplo, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray q, jint offsetq, jint ldq, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nvect = NULL; const char *__nuplo = NULL; int __ninfo = 0; float *__nab = NULL; float *__nd = NULL; float *__ne = NULL; float *__nq = NULL; float *__nwork = NULL; - if (!(__nvect = (*env)->GetStringUTFChars(env, vect, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nvect = NULL; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__nab = NULL; + float *__nd = NULL; + float *__ne = NULL; + float *__nq = NULL; + float *__nwork = NULL; + if (!(__nvect = (*env)->GetStringUTFChars(env, vect, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } ssbtrd_(__nvect, __nuplo, &n, &kd, __nab + offsetab, &ldab, __nd + offsetd, __ne + offsete, __nq + offsetq, &ldq, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nvect) (*env)->ReleaseStringUTFChars(env, vect, __nvect); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sspcon_)(const char *uplo, int *n, float *ap, int *ipiv, float *anorm, float *rcond, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspconK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; float __nrcond = 0; int __ninfo = 0; float *__nap = NULL; int *__nipiv = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + float __nrcond = 0; + int __ninfo = 0; + float *__nap = NULL; + int *__nipiv = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } sspcon_(__nuplo, &n, __nap + offsetap, __nipiv + offsetipiv, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sspev_)(const char *jobz, const char *uplo, int *n, float *ap, float *w, float *z, int *ldz, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspevK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; float *__nw = NULL; float *__nz = NULL; float *__nwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__nap = NULL; + float *__nw = NULL; + float *__nz = NULL; + float *__nwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sspev_(__njobz, __nuplo, &n, __nap + offsetap, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sspevd_)(const char *jobz, const char *uplo, int *n, float *ap, float *w, float *z, int *ldz, float *work, int *lwork, int *iwork, int *liwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspevdK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; float *__nw = NULL; float *__nz = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__nap = NULL; + float *__nw = NULL; + float *__nz = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } sspevd_(__njobz, __nuplo, &n, __nap + offsetap, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sspevx_)(const char *jobz, const char *range, const char *uplo, int *n, float *ap, float *vl, float *vu, int *il, int *iu, float *abstol, int *m, float *w, float *z, int *ldz, float *work, int *iwork, int *ifail, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspevxK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nrange = NULL; const char *__nuplo = NULL; int __nm = 0; int __ninfo = 0; float *__nap = NULL; float *__nw = NULL; float *__nz = NULL; float *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nrange = NULL; + const char *__nuplo = NULL; + int __nm = 0; + int __ninfo = 0; + float *__nap = NULL; + float *__nw = NULL; + float *__nz = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + int *__nifail = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; - if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) { __failed = TRUE; goto done; } sspevx_(__njobz, __nrange, __nuplo, &n, __nap + offsetap, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); done: - if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, __failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sspgst_)(int *itype, const char *uplo, int *n, float *ap, float *bp, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspgstK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray bp, jint offsetbp, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; float *__nbp = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nbp = (*env)->GetPrimitiveArrayCritical(env, bp, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__nap = NULL; + float *__nbp = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nbp = (*env)->GetPrimitiveArrayCritical(env, bp, NULL))) { __failed = TRUE; goto done; } sspgst_(&itype, __nuplo, &n, __nap + offsetap, __nbp + offsetbp, &__ninfo); done: - if (__nbp) (*env)->ReleasePrimitiveArrayCritical(env, bp, __nbp, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nbp) (*env)->ReleasePrimitiveArrayCritical(env, bp, __nbp, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sspgv_)(int *itype, const char *jobz, const char *uplo, int *n, float *ap, float *bp, float *w, float *z, int *ldz, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspgvK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring jobz, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray bp, jint offsetbp, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; float *__nbp = NULL; float *__nw = NULL; float *__nz = NULL; float *__nwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nbp = (*env)->GetPrimitiveArrayCritical(env, bp, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__nap = NULL; + float *__nbp = NULL; + float *__nw = NULL; + float *__nz = NULL; + float *__nwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nbp = (*env)->GetPrimitiveArrayCritical(env, bp, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sspgv_(&itype, __njobz, __nuplo, &n, __nap + offsetap, __nbp + offsetbp, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nbp) (*env)->ReleasePrimitiveArrayCritical(env, bp, __nbp, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nbp) (*env)->ReleasePrimitiveArrayCritical(env, bp, __nbp, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sspgvd_)(int *itype, const char *jobz, const char *uplo, int *n, float *ap, float *bp, float *w, float *z, int *ldz, float *work, int *lwork, int *iwork, int *liwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspgvdK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring jobz, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray bp, jint offsetbp, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; float *__nbp = NULL; float *__nw = NULL; float *__nz = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nbp = (*env)->GetPrimitiveArrayCritical(env, bp, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__nap = NULL; + float *__nbp = NULL; + float *__nw = NULL; + float *__nz = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nbp = (*env)->GetPrimitiveArrayCritical(env, bp, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } sspgvd_(&itype, __njobz, __nuplo, &n, __nap + offsetap, __nbp + offsetbp, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nbp) (*env)->ReleasePrimitiveArrayCritical(env, bp, __nbp, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nbp) (*env)->ReleasePrimitiveArrayCritical(env, bp, __nbp, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sspgvx_)(int *itype, const char *jobz, const char *range, const char *uplo, int *n, float *ap, float *bp, float *vl, float *vu, int *il, int *iu, float *abstol, int *m, float *w, float *z, int *ldz, float *work, int *iwork, int *ifail, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspgvxK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring jobz, jstring range, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray bp, jint offsetbp, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nrange = NULL; const char *__nuplo = NULL; int __nm = 0; int __ninfo = 0; float *__nap = NULL; float *__nbp = NULL; float *__nw = NULL; float *__nz = NULL; float *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nrange = NULL; + const char *__nuplo = NULL; + int __nm = 0; + int __ninfo = 0; + float *__nap = NULL; + float *__nbp = NULL; + float *__nw = NULL; + float *__nz = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + int *__nifail = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nbp = (*env)->GetPrimitiveArrayCritical(env, bp, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; - if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nbp = (*env)->GetPrimitiveArrayCritical(env, bp, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) { __failed = TRUE; goto done; } sspgvx_(&itype, __njobz, __nrange, __nuplo, &n, __nap + offsetap, __nbp + offsetbp, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); done: - if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nbp) (*env)->ReleasePrimitiveArrayCritical(env, bp, __nbp, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, __failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nbp) (*env)->ReleasePrimitiveArrayCritical(env, bp, __nbp, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssprfs_)(const char *uplo, int *n, int *nrhs, float *ap, float *afp, int *ipiv, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssprfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray afp, jint offsetafp, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; float *__nafp = NULL; int *__nipiv = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nafp = (*env)->GetPrimitiveArrayCritical(env, afp, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__nap = NULL; + float *__nafp = NULL; + int *__nipiv = NULL; + float *__nb = NULL; + float *__nx = NULL; + float *__nferr = NULL; + float *__nberr = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nafp = (*env)->GetPrimitiveArrayCritical(env, afp, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } ssprfs_(__nuplo, &n, &nrhs, __nap + offsetap, __nafp + offsetafp, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nafp) (*env)->ReleasePrimitiveArrayCritical(env, afp, __nafp, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nafp) (*env)->ReleasePrimitiveArrayCritical(env, afp, __nafp, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sspsv_)(const char *uplo, int *n, int *nrhs, float *ap, int *ipiv, float *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspsvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; int *__nipiv = NULL; float *__nb = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__nap = NULL; + int *__nipiv = NULL; + float *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } sspsv_(__nuplo, &n, &nrhs, __nap + offsetap, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sspsvx_)(const char *fact, const char *uplo, int *n, int *nrhs, float *ap, float *afp, int *ipiv, float *b, int *ldb, float *x, int *ldx, float *rcond, float *ferr, float *berr, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sspsvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray afp, jint offsetafp, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nfact = NULL; const char *__nuplo = NULL; float __nrcond = 0; int __ninfo = 0; float *__nap = NULL; float *__nafp = NULL; int *__nipiv = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nfact = NULL; + const char *__nuplo = NULL; + float __nrcond = 0; + int __ninfo = 0; + float *__nap = NULL; + float *__nafp = NULL; + int *__nipiv = NULL; + float *__nb = NULL; + float *__nx = NULL; + float *__nferr = NULL; + float *__nberr = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nafp = (*env)->GetPrimitiveArrayCritical(env, afp, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nafp = (*env)->GetPrimitiveArrayCritical(env, afp, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } sspsvx_(__nfact, __nuplo, &n, &nrhs, __nap + offsetap, __nafp + offsetafp, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nafp) (*env)->ReleasePrimitiveArrayCritical(env, afp, __nafp, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nafp) (*env)->ReleasePrimitiveArrayCritical(env, afp, __nafp, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssptrd_)(const char *uplo, int *n, float *ap, float *d, float *e, float *tau, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssptrdK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray ap, jint offsetap, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray tau, jint offsettau, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; float *__nd = NULL; float *__ne = NULL; float *__ntau = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__nap = NULL; + float *__nd = NULL; + float *__ne = NULL; + float *__ntau = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } ssptrd_(__nuplo, &n, __nap + offsetap, __nd + offsetd, __ne + offsete, __ntau + offsettau, &__ninfo); done: - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssptrf_)(const char *uplo, int *n, float *ap, int *ipiv, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssptrfK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; int *__nipiv = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__nap = NULL; + int *__nipiv = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } ssptrf_(__nuplo, &n, __nap + offsetap, __nipiv + offsetipiv, &__ninfo); done: - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssptri_)(const char *uplo, int *n, float *ap, int *ipiv, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssptriK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; int *__nipiv = NULL; float *__nwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__nap = NULL; + int *__nipiv = NULL; + float *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } ssptri_(__nuplo, &n, __nap + offsetap, __nipiv + offsetipiv, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssptrs_)(const char *uplo, int *n, int *nrhs, float *ap, int *ipiv, float *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssptrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jfloatArray ap, jint offsetap, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__nap = NULL; int *__nipiv = NULL; float *__nb = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__nap = NULL; + int *__nipiv = NULL; + float *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } ssptrs_(__nuplo, &n, &nrhs, __nap + offsetap, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sstebz_)(const char *range, const char *order, int *n, float *vl, float *vu, int *il, int *iu, float *abstol, float *d, float *e, int *m, int *nsplit, float *w, int *iblock, int *isplit, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstebzK(JNIEnv *env, UNUSED jobject obj, jstring range, jstring order, jint n, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jobject m, jobject nsplit, jfloatArray w, jint offsetw, jintArray iblock, jint offsetiblock, jintArray isplit, jint offsetisplit, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nrange = NULL; const char *__norder = NULL; int __nm = 0; int __nnsplit = 0; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nw = NULL; int *__niblock = NULL; int *__nisplit = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; - if (!(__norder = (*env)->GetStringUTFChars(env, order, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nrange = NULL; + const char *__norder = NULL; + int __nm = 0; + int __nnsplit = 0; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; + float *__nw = NULL; + int *__niblock = NULL; + int *__nisplit = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) { __failed = TRUE; goto done; } + if (!(__norder = (*env)->GetStringUTFChars(env, order, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __nnsplit = (*env)->GetIntField(env, nsplit, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__niblock = (*env)->GetPrimitiveArrayCritical(env, iblock, NULL))) goto fail; - if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__niblock = (*env)->GetPrimitiveArrayCritical(env, iblock, NULL))) { __failed = TRUE; goto done; } + if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } sstebz_(__nrange, __norder, &n, &vl, &vu, &il, &iu, &abstol, __nd + offsetd, __ne + offsete, &__nm, &__nnsplit, __nw + offsetw, __niblock + offsetiblock, __nisplit + offsetisplit, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, failed ? JNI_ABORT : 0); - if (__niblock) (*env)->ReleasePrimitiveArrayCritical(env, iblock, __niblock, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, nsplit, intW_val_fieldID, __nnsplit); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, __failed ? JNI_ABORT : 0); + if (__niblock) (*env)->ReleasePrimitiveArrayCritical(env, iblock, __niblock, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, nsplit, intW_val_fieldID, __nnsplit); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__norder) (*env)->ReleaseStringUTFChars(env, order, __norder); if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sstedc_)(const char *compz, int *n, float *d, float *e, float *z, int *ldz, float *work, int *lwork, int *iwork, int *liwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstedcK(JNIEnv *env, UNUSED jobject obj, jstring compz, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - jboolean failed = FALSE; - const char *__ncompz = NULL; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nz = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ncompz = NULL; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; + float *__nz = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } sstedc_(__ncompz, &n, __nd + offsetd, __ne + offsete, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ncompz) (*env)->ReleaseStringUTFChars(env, compz, __ncompz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sstegr_)(const char *jobz, const char *range, int *n, float *d, float *e, float *vl, float *vu, int *il, int *iu, float *abstol, int *m, float *w, float *z, int *ldz, int *isuppz, float *work, int *lwork, int *iwork, int *liwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstegrK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nrange = NULL; int __nm = 0; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nw = NULL; float *__nz = NULL; int *__nisuppz = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nrange = NULL; + int __nm = 0; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; + float *__nw = NULL; + float *__nz = NULL; + int *__nisuppz = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } sstegr_(__njobz, __nrange, &n, __nd + offsetd, __ne + offsete, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nisuppz + offsetisuppz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sstein_)(int *n, float *d, float *e, int *m, float *w, int *iblock, int *isplit, float *z, int *ldz, float *work, int *iwork, int *ifail, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssteinK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jint m, jfloatArray w, jint offsetw, jintArray iblock, jint offsetiblock, jintArray isplit, jint offsetisplit, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nw = NULL; int *__niblock = NULL; int *__nisplit = NULL; float *__nz = NULL; float *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__niblock = (*env)->GetPrimitiveArrayCritical(env, iblock, NULL))) goto fail; - if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; - if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; + float *__nw = NULL; + int *__niblock = NULL; + int *__nisplit = NULL; + float *__nz = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + int *__nifail = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__niblock = (*env)->GetPrimitiveArrayCritical(env, iblock, NULL))) { __failed = TRUE; goto done; } + if (!(__nisplit = (*env)->GetPrimitiveArrayCritical(env, isplit, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) { __failed = TRUE; goto done; } sstein_(&n, __nd + offsetd, __ne + offsete, &m, __nw + offsetw, __niblock + offsetiblock, __nisplit + offsetisplit, __nz + offsetz, &ldz, __nwork + offsetwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); done: - if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, failed ? JNI_ABORT : 0); - if (__niblock) (*env)->ReleasePrimitiveArrayCritical(env, iblock, __niblock, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, __failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nisplit) (*env)->ReleasePrimitiveArrayCritical(env, isplit, __nisplit, __failed ? JNI_ABORT : 0); + if (__niblock) (*env)->ReleasePrimitiveArrayCritical(env, iblock, __niblock, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sstemr_)(const char *jobz, const char *range, int *n, float *d, float *e, float *vl, float *vu, int *il, int *iu, int *m, float *w, float *z, int *ldz, int *nzc, int *isuppz, int *tryrac, float *work, int *lwork, int *iwork, int *liwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstemrK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloat vl, jfloat vu, jint il, jint iu, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jint nzc, jintArray isuppz, jint offsetisuppz, jobject tryrac, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nrange = NULL; int __nm = 0; int __ntryrac = 0; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nw = NULL; float *__nz = NULL; int *__nisuppz = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nrange = NULL; + int __nm = 0; + int __ntryrac = 0; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; + float *__nw = NULL; + float *__nz = NULL; + int *__nisuppz = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ntryrac = (*env)->GetBooleanField(env, tryrac, booleanW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } sstemr_(__njobz, __nrange, &n, __nd + offsetd, __ne + offsete, &vl, &vu, &il, &iu, &__nm, __nw + offsetw, __nz + offsetz, &ldz, &nzc, __nisuppz + offsetisuppz, &__ntryrac, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetBooleanField(env, tryrac, booleanW_val_fieldID, __ntryrac); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetBooleanField(env, tryrac, booleanW_val_fieldID, __ntryrac); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssteqr_)(const char *compz, int *n, float *d, float *e, float *z, int *ldz, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssteqrK(JNIEnv *env, UNUSED jobject obj, jstring compz, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__ncompz = NULL; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nz = NULL; float *__nwork = NULL; - if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ncompz = NULL; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; + float *__nz = NULL; + float *__nwork = NULL; + if (!(__ncompz = (*env)->GetStringUTFChars(env, compz, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } ssteqr_(__ncompz, &n, __nd + offsetd, __ne + offsete, __nz + offsetz, &ldz, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ncompz) (*env)->ReleaseStringUTFChars(env, compz, __ncompz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssterf_)(int *n, float *d, float *e, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssterfK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } ssterf_(&n, __nd + offsetd, __ne + offsete, &__ninfo); done: - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sstev_)(const char *jobz, int *n, float *d, float *e, float *z, int *ldz, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstevK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nz = NULL; float *__nwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; + float *__nz = NULL; + float *__nwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sstev_(__njobz, &n, __nd + offsetd, __ne + offsete, __nz + offsetz, &ldz, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sstevd_)(const char *jobz, int *n, float *d, float *e, float *z, int *ldz, float *work, int *lwork, int *iwork, int *liwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstevdK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nz = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; + float *__nz = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } sstevd_(__njobz, &n, __nd + offsetd, __ne + offsete, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sstevr_)(const char *jobz, const char *range, int *n, float *d, float *e, float *vl, float *vu, int *il, int *iu, float *abstol, int *m, float *w, float *z, int *ldz, int *isuppz, float *work, int *lwork, int *iwork, int *liwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstevrK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nrange = NULL; int __nm = 0; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nw = NULL; float *__nz = NULL; int *__nisuppz = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nrange = NULL; + int __nm = 0; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; + float *__nw = NULL; + float *__nz = NULL; + int *__nisuppz = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } sstevr_(__njobz, __nrange, &n, __nd + offsetd, __ne + offsete, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nisuppz + offsetisuppz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sstevx_)(const char *jobz, const char *range, int *n, float *d, float *e, float *vl, float *vu, int *il, int *iu, float *abstol, int *m, float *w, float *z, int *ldz, float *work, int *iwork, int *ifail, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_sstevxK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nrange = NULL; int __nm = 0; int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nw = NULL; float *__nz = NULL; float *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nrange = NULL; + int __nm = 0; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; + float *__nw = NULL; + float *__nz = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + int *__nifail = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; - if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) { __failed = TRUE; goto done; } sstevx_(__njobz, __nrange, &n, __nd + offsetd, __ne + offsete, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); done: - if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, __failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssycon_)(const char *uplo, int *n, float *a, int *lda, int *ipiv, float *anorm, float *rcond, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyconK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloat anorm, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; float __nrcond = 0; int __ninfo = 0; float *__na = NULL; int *__nipiv = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + float __nrcond = 0; + int __ninfo = 0; + float *__na = NULL; + int *__nipiv = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } ssycon_(__nuplo, &n, __na + offseta, &lda, __nipiv + offsetipiv, &anorm, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssyev_)(const char *jobz, const char *uplo, int *n, float *a, int *lda, float *w, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyevK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray w, jint offsetw, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; float *__nw = NULL; float *__nwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__nw = NULL; + float *__nwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } ssyev_(__njobz, __nuplo, &n, __na + offseta, &lda, __nw + offsetw, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssyevd_)(const char *jobz, const char *uplo, int *n, float *a, int *lda, float *w, float *work, int *lwork, int *iwork, int *liwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyevdK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray w, jint offsetw, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; float *__nw = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__nw = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } ssyevd_(__njobz, __nuplo, &n, __na + offseta, &lda, __nw + offsetw, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssyevr_)(const char *jobz, const char *range, const char *uplo, int *n, float *a, int *lda, float *vl, float *vu, int *il, int *iu, float *abstol, int *m, float *w, float *z, int *ldz, int *isuppz, float *work, int *lwork, int *iwork, int *liwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyevrK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jintArray isuppz, jint offsetisuppz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nrange = NULL; const char *__nuplo = NULL; int __nm = 0; int __ninfo = 0; float *__na = NULL; float *__nw = NULL; float *__nz = NULL; int *__nisuppz = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nrange = NULL; + const char *__nuplo = NULL; + int __nm = 0; + int __ninfo = 0; + float *__na = NULL; + float *__nw = NULL; + float *__nz = NULL; + int *__nisuppz = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nisuppz = (*env)->GetPrimitiveArrayCritical(env, isuppz, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } ssyevr_(__njobz, __nrange, __nuplo, &n, __na + offseta, &lda, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nisuppz + offsetisuppz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nisuppz) (*env)->ReleasePrimitiveArrayCritical(env, isuppz, __nisuppz, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssyevx_)(const char *jobz, const char *range, const char *uplo, int *n, float *a, int *lda, float *vl, float *vu, int *il, int *iu, float *abstol, int *m, float *w, float *z, int *ldz, float *work, int *lwork, int *iwork, int *ifail, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyevxK(JNIEnv *env, UNUSED jobject obj, jstring jobz, jstring range, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nrange = NULL; const char *__nuplo = NULL; int __nm = 0; int __ninfo = 0; float *__na = NULL; float *__nw = NULL; float *__nz = NULL; float *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nrange = NULL; + const char *__nuplo = NULL; + int __nm = 0; + int __ninfo = 0; + float *__na = NULL; + float *__nw = NULL; + float *__nz = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + int *__nifail = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; - if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) { __failed = TRUE; goto done; } ssyevx_(__njobz, __nrange, __nuplo, &n, __na + offseta, &lda, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); done: - if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, __failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssygs2_)(int *itype, const char *uplo, int *n, float *a, int *lda, float *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssygs2K(JNIEnv *env, UNUSED jobject obj, jint itype, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } ssygs2_(&itype, __nuplo, &n, __na + offseta, &lda, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssygst_)(int *itype, const char *uplo, int *n, float *a, int *lda, float *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssygstK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } ssygst_(&itype, __nuplo, &n, __na + offseta, &lda, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssygv_)(int *itype, const char *jobz, const char *uplo, int *n, float *a, int *lda, float *b, int *ldb, float *w, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssygvK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring jobz, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray w, jint offsetw, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nw = NULL; float *__nwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + float *__nw = NULL; + float *__nwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } ssygv_(&itype, __njobz, __nuplo, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nw + offsetw, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssygvd_)(int *itype, const char *jobz, const char *uplo, int *n, float *a, int *lda, float *b, int *ldb, float *w, float *work, int *lwork, int *iwork, int *liwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssygvdK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring jobz, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray w, jint offsetw, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nw = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + float *__nw = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } ssygvd_(&itype, __njobz, __nuplo, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nw + offsetw, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssygvx_)(int *itype, const char *jobz, const char *range, const char *uplo, int *n, float *a, int *lda, float *b, int *ldb, float *vl, float *vu, int *il, int *iu, float *abstol, int *m, float *w, float *z, int *ldz, float *work, int *lwork, int *iwork, int *ifail, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssygvxK(JNIEnv *env, UNUSED jobject obj, jint itype, jstring jobz, jstring range, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat vl, jfloat vu, jint il, jint iu, jfloat abstol, jobject m, jfloatArray w, jint offsetw, jfloatArray z, jint offsetz, jint ldz, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jintArray ifail, jint offsetifail, jobject info) { - jboolean failed = FALSE; - const char *__njobz = NULL; const char *__nrange = NULL; const char *__nuplo = NULL; int __nm = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nw = NULL; float *__nz = NULL; float *__nwork = NULL; int *__niwork = NULL; int *__nifail = NULL; - if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) goto fail; - if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobz = NULL; + const char *__nrange = NULL; + const char *__nuplo = NULL; + int __nm = 0; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + float *__nw = NULL; + float *__nz = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + int *__nifail = NULL; + if (!(__njobz = (*env)->GetStringUTFChars(env, jobz, NULL))) { __failed = TRUE; goto done; } + if (!(__nrange = (*env)->GetStringUTFChars(env, range, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; - if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nw = (*env)->GetPrimitiveArrayCritical(env, w, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } + if (!(__nifail = (*env)->GetPrimitiveArrayCritical(env, ifail, NULL))) { __failed = TRUE; goto done; } ssygvx_(&itype, __njobz, __nrange, __nuplo, &n, __na + offseta, &lda, __nb + offsetb, &ldb, &vl, &vu, &il, &iu, &abstol, &__nm, __nw + offsetw, __nz + offsetz, &ldz, __nwork + offsetwork, &lwork, __niwork + offsetiwork, __nifail + offsetifail, &__ninfo); done: - if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, failed ? JNI_ABORT : 0); - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (__nifail) (*env)->ReleasePrimitiveArrayCritical(env, ifail, __nifail, __failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nw) (*env)->ReleasePrimitiveArrayCritical(env, w, __nw, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nrange) (*env)->ReleaseStringUTFChars(env, range, __nrange); if (__njobz) (*env)->ReleaseStringUTFChars(env, jobz, __njobz); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssyrfs_)(const char *uplo, int *n, int *nrhs, float *a, int *lda, float *af, int *ldaf, int *ipiv, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssyrfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; float *__naf = NULL; int *__nipiv = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__naf = NULL; + int *__nipiv = NULL; + float *__nb = NULL; + float *__nx = NULL; + float *__nferr = NULL; + float *__nberr = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } ssyrfs_(__nuplo, &n, &nrhs, __na + offseta, &lda, __naf + offsetaf, &ldaf, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssysv_)(const char *uplo, int *n, int *nrhs, float *a, int *lda, int *ipiv, float *b, int *ldb, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssysvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; int *__nipiv = NULL; float *__nb = NULL; float *__nwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__na = NULL; + int *__nipiv = NULL; + float *__nb = NULL; + float *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } ssysv_(__nuplo, &n, &nrhs, __na + offseta, &lda, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssysvx_)(const char *fact, const char *uplo, int *n, int *nrhs, float *a, int *lda, float *af, int *ldaf, int *ipiv, float *b, int *ldb, float *x, int *ldx, float *rcond, float *ferr, float *berr, float *work, int *lwork, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssysvxK(JNIEnv *env, UNUSED jobject obj, jstring fact, jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray af, jint offsetaf, jint ldaf, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jobject rcond, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nfact = NULL; const char *__nuplo = NULL; float __nrcond = 0; int __ninfo = 0; float *__na = NULL; float *__naf = NULL; int *__nipiv = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nfact = NULL; + const char *__nuplo = NULL; + float __nrcond = 0; + int __ninfo = 0; + float *__na = NULL; + float *__naf = NULL; + int *__nipiv = NULL; + float *__nb = NULL; + float *__nx = NULL; + float *__nferr = NULL; + float *__nberr = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nfact = (*env)->GetStringUTFChars(env, fact, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__naf = (*env)->GetPrimitiveArrayCritical(env, af, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } ssysvx_(__nfact, __nuplo, &n, &nrhs, __na + offseta, &lda, __naf + offsetaf, &ldaf, __nipiv + offsetipiv, __nb + offsetb, &ldb, __nx + offsetx, &ldx, &__nrcond, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__naf) (*env)->ReleasePrimitiveArrayCritical(env, af, __naf, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nfact) (*env)->ReleaseStringUTFChars(env, fact, __nfact); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssytd2_)(const char *uplo, int *n, float *a, int *lda, float *d, float *e, float *tau, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytd2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray tau, jint offsettau, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; float *__nd = NULL; float *__ne = NULL; float *__ntau = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__nd = NULL; + float *__ne = NULL; + float *__ntau = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } ssytd2_(__nuplo, &n, __na + offseta, &lda, __nd + offsetd, __ne + offsete, __ntau + offsettau, &__ninfo); done: - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssytf2_)(const char *uplo, int *n, float *a, int *lda, int *ipiv, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytf2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; int *__nipiv = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__na = NULL; + int *__nipiv = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } ssytf2_(__nuplo, &n, __na + offseta, &lda, __nipiv + offsetipiv, &__ninfo); done: - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssytrd_)(const char *uplo, int *n, float *a, int *lda, float *d, float *e, float *tau, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytrdK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; float *__nd = NULL; float *__ne = NULL; float *__ntau = NULL; float *__nwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__nd = NULL; + float *__ne = NULL; + float *__ntau = NULL; + float *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } ssytrd_(__nuplo, &n, __na + offseta, &lda, __nd + offsetd, __ne + offsete, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssytrf_)(const char *uplo, int *n, float *a, int *lda, int *ipiv, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytrfK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; int *__nipiv = NULL; float *__nwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__na = NULL; + int *__nipiv = NULL; + float *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } ssytrf_(__nuplo, &n, __na + offseta, &lda, __nipiv + offsetipiv, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssytri_)(const char *uplo, int *n, float *a, int *lda, int *ipiv, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytriK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; int *__nipiv = NULL; float *__nwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__na = NULL; + int *__nipiv = NULL; + float *__nwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } ssytri_(__nuplo, &n, __na + offseta, &lda, __nipiv + offsetipiv, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssytrs_)(const char *uplo, int *n, int *nrhs, float *a, int *lda, int *ipiv, float *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_ssytrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jintArray ipiv, jint offsetipiv, jfloatArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; int __ninfo = 0; float *__na = NULL; int *__nipiv = NULL; float *__nb = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + int __ninfo = 0; + float *__na = NULL; + int *__nipiv = NULL; + float *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nipiv = (*env)->GetPrimitiveArrayCritical(env, ipiv, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } ssytrs_(__nuplo, &n, &nrhs, __na + offseta, &lda, __nipiv + offsetipiv, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nipiv) (*env)->ReleasePrimitiveArrayCritical(env, ipiv, __nipiv, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*stbcon_)(const char *norm, const char *uplo, const char *diag, int *n, int *kd, float *ab, int *ldab, float *rcond, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_stbconK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jstring diag, jint n, jint kd, jfloatArray ab, jint offsetab, jint ldab, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nnorm = NULL; const char *__nuplo = NULL; const char *__ndiag = NULL; float __nrcond = 0; int __ninfo = 0; float *__nab = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + const char *__nuplo = NULL; + const char *__ndiag = NULL; + float __nrcond = 0; + int __ninfo = 0; + float *__nab = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } stbcon_(__nnorm, __nuplo, __ndiag, &n, &kd, __nab + offsetab, &ldab, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*stbrfs_)(const char *uplo, const char *trans, const char *diag, int *n, int *kd, int *nrhs, float *ab, int *ldab, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_stbrfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint kd, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; int __ninfo = 0; float *__nab = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + const char *__ndiag = NULL; + int __ninfo = 0; + float *__nab = NULL; + float *__nb = NULL; + float *__nx = NULL; + float *__nferr = NULL; + float *__nberr = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } stbrfs_(__nuplo, __ntrans, __ndiag, &n, &kd, &nrhs, __nab + offsetab, &ldab, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*stbtrs_)(const char *uplo, const char *trans, const char *diag, int *n, int *kd, int *nrhs, float *ab, int *ldab, float *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_stbtrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint kd, jint nrhs, jfloatArray ab, jint offsetab, jint ldab, jfloatArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; int __ninfo = 0; float *__nab = NULL; float *__nb = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + const char *__ndiag = NULL; + int __ninfo = 0; + float *__nab = NULL; + float *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nab = (*env)->GetPrimitiveArrayCritical(env, ab, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } stbtrs_(__nuplo, __ntrans, __ndiag, &n, &kd, &nrhs, __nab + offsetab, &ldab, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nab) (*env)->ReleasePrimitiveArrayCritical(env, ab, __nab, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*stgevc_)(const char *side, const char *howmny, int *select, int *n, float *s, int *lds, float *p, int *ldp, float *vl, int *ldvl, float *vr, int *ldvr, int *mm, int *m, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgevcK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jfloatArray s, jint offsets, jint lds, jfloatArray p, jint offsetp, jint ldp, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jint mm, jobject m, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__nhowmny = NULL; int __nm = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; float *__ns = NULL; float *__np = NULL; float *__nvl = NULL; float *__nvr = NULL; float *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__nhowmny = NULL; + int __nm = 0; + int __ninfo = 0; + int *__nselect = NULL; jboolean *__jselect = NULL; + float *__ns = NULL; + float *__np = NULL; + float *__nvl = NULL; + float *__nvr = NULL; + float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; - if (!(__np = (*env)->GetPrimitiveArrayCritical(env, p, NULL))) goto fail; - if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; - if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { __failed = TRUE; goto done; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) { __failed = TRUE; goto done; } if (!(__nselect = malloc(sizeof(jboolean) * length))) { __failed = TRUE; goto done; } for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } + if (!(__np = (*env)->GetPrimitiveArrayCritical(env, p, NULL))) { __failed = TRUE; goto done; } + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) { __failed = TRUE; goto done; } + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } stgevc_(__nside, __nhowmny, __nselect + offsetselect, &n, __ns + offsets, &lds, __np + offsetp, &ldp, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, &mm, &__nm, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); - if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); - if (__np) (*env)->ReleasePrimitiveArrayCritical(env, p, __np, failed ? JNI_ABORT : 0); - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, __failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, __failed ? JNI_ABORT : 0); + if (__np) (*env)->ReleasePrimitiveArrayCritical(env, p, __np, __failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__nhowmny) (*env)->ReleaseStringUTFChars(env, howmny, __nhowmny); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*stgex2_)(int *wantq, int *wantz, int *n, float *a, int *lda, float *b, int *ldb, float *q, int *ldq, float *z, int *ldz, int *j1, int *n1, int *n2, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgex2K(JNIEnv *env, UNUSED jobject obj, jboolean wantq, jboolean wantz, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray q, jint offsetq, jint ldq, jfloatArray z, jint offsetz, jint ldz, jint j1, jint n1, jint n2, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __nwantq; int __nwantz; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nq = NULL; float *__nz = NULL; float *__nwork = NULL; + jboolean __failed = FALSE; + int __nwantq; + int __nwantz; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + float *__nq = NULL; + float *__nz = NULL; + float *__nwork = NULL; __nwantq = wantq; __nwantz = wantz; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } stgex2_(&__nwantq, &__nwantz, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nq + offsetq, &ldq, __nz + offsetz, &ldz, &j1, &n1, &n2, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) wantz = __nwantz; - if (!failed) wantq = __nwantq; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) wantz = __nwantz; + if (!__failed) wantq = __nwantq; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*stgexc_)(int *wantq, int *wantz, int *n, float *a, int *lda, float *b, int *ldb, float *q, int *ldq, float *z, int *ldz, int *ifst, int *ilst, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgexcK(JNIEnv *env, UNUSED jobject obj, jboolean wantq, jboolean wantz, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray q, jint offsetq, jint ldq, jfloatArray z, jint offsetz, jint ldz, jobject ifst, jobject ilst, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __nwantq; int __nwantz; int __nifst = 0; int __nilst = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nq = NULL; float *__nz = NULL; float *__nwork = NULL; + jboolean __failed = FALSE; + int __nwantq; + int __nwantz; + int __nifst = 0; + int __nilst = 0; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + float *__nq = NULL; + float *__nz = NULL; + float *__nwork = NULL; __nwantq = wantq; __nwantz = wantz; __nifst = (*env)->GetIntField(env, ifst, intW_val_fieldID); __nilst = (*env)->GetIntField(env, ilst, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } stgexc_(&__nwantq, &__nwantz, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nq + offsetq, &ldq, __nz + offsetz, &ldz, &__nifst, &__nilst, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, ilst, intW_val_fieldID, __nilst); - if (!failed) (*env)->SetIntField(env, ifst, intW_val_fieldID, __nifst); - if (!failed) wantz = __nwantz; - if (!failed) wantq = __nwantq; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, ilst, intW_val_fieldID, __nilst); + if (!__failed) (*env)->SetIntField(env, ifst, intW_val_fieldID, __nifst); + if (!__failed) wantz = __nwantz; + if (!__failed) wantq = __nwantq; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*stgsen_)(int *ijob, int *wantq, int *wantz, int *select, int *n, float *a, int *lda, float *b, int *ldb, float *alphar, float *alphai, float *beta, float *q, int *ldq, float *z, int *ldz, int *m, float *pl, float *pr, float *dif, float *work, int *lwork, int *iwork, int *liwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgsenK(JNIEnv *env, UNUSED jobject obj, jint ijob, jboolean wantq, jboolean wantz, jbooleanArray select, jint offsetselect, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray q, jint offsetq, jint ldq, jfloatArray z, jint offsetz, jint ldz, jobject m, jobject pl, jobject pr, jfloatArray dif, jint offsetdif, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - jboolean failed = FALSE; - int __nwantq; int __nwantz; int __nm = 0; float __npl = 0; float __npr = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; float *__na = NULL; float *__nb = NULL; float *__nalphar = NULL; float *__nalphai = NULL; float *__nbeta = NULL; float *__nq = NULL; float *__nz = NULL; float *__ndif = NULL; float *__nwork = NULL; int *__niwork = NULL; + jboolean __failed = FALSE; + int __nwantq; + int __nwantz; + int __nm = 0; + float __npl = 0; + float __npr = 0; + int __ninfo = 0; + int *__nselect = NULL; jboolean *__jselect = NULL; + float *__na = NULL; + float *__nb = NULL; + float *__nalphar = NULL; + float *__nalphai = NULL; + float *__nbeta = NULL; + float *__nq = NULL; + float *__nz = NULL; + float *__ndif = NULL; + float *__nwork = NULL; + int *__niwork = NULL; __nwantq = wantq; __nwantz = wantz; __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __npl = (*env)->GetFloatField(env, pl, floatW_val_fieldID); __npr = (*env)->GetFloatField(env, pr, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) goto fail; - if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) goto fail; - if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__ndif = (*env)->GetPrimitiveArrayCritical(env, dif, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { __failed = TRUE; goto done; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) { __failed = TRUE; goto done; } if (!(__nselect = malloc(sizeof(jboolean) * length))) { __failed = TRUE; goto done; } for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nalphar = (*env)->GetPrimitiveArrayCritical(env, alphar, NULL))) { __failed = TRUE; goto done; } + if (!(__nalphai = (*env)->GetPrimitiveArrayCritical(env, alphai, NULL))) { __failed = TRUE; goto done; } + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__ndif = (*env)->GetPrimitiveArrayCritical(env, dif, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } stgsen_(&ijob, &__nwantq, &__nwantz, __nselect + offsetselect, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nalphar + offsetalphar, __nalphai + offsetalphai, __nbeta + offsetbeta, __nq + offsetq, &ldq, __nz + offsetz, &ldz, &__nm, &__npl, &__npr, __ndif + offsetdif, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ndif) (*env)->ReleasePrimitiveArrayCritical(env, dif, __ndif, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); - if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, failed ? JNI_ABORT : 0); - if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ndif) (*env)->ReleasePrimitiveArrayCritical(env, dif, __ndif, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, __failed ? JNI_ABORT : 0); + if (__nalphai) (*env)->ReleasePrimitiveArrayCritical(env, alphai, __nalphai, __failed ? JNI_ABORT : 0); + if (__nalphar) (*env)->ReleasePrimitiveArrayCritical(env, alphar, __nalphar, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, pr, floatW_val_fieldID, __npr); - if (!failed) (*env)->SetFloatField(env, pl, floatW_val_fieldID, __npl); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); - if (!failed) wantz = __nwantz; - if (!failed) wantq = __nwantq; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, pr, floatW_val_fieldID, __npr); + if (!__failed) (*env)->SetFloatField(env, pl, floatW_val_fieldID, __npl); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (!__failed) wantz = __nwantz; + if (!__failed) wantq = __nwantq; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*stgsja_)(const char *jobu, const char *jobv, const char *jobq, int *m, int *p, int *n, int *k, int *l, float *a, int *lda, float *b, int *ldb, float *tola, float *tolb, float *alpha, float *beta, float *u, int *ldu, float *v, int *ldv, float *q, int *ldq, float *work, int *ncycle, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgsjaK(JNIEnv *env, UNUSED jobject obj, jstring jobu, jstring jobv, jstring jobq, jint m, jint p, jint n, jint k, jint l, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat tola, jfloat tolb, jfloatArray alpha, jint offsetalpha, jfloatArray beta, jint offsetbeta, jfloatArray u, jint offsetu, jint ldu, jfloatArray v, jint offsetv, jint ldv, jfloatArray q, jint offsetq, jint ldq, jfloatArray work, jint offsetwork, jobject ncycle, jobject info) { - jboolean failed = FALSE; - const char *__njobu = NULL; const char *__njobv = NULL; const char *__njobq = NULL; int __nncycle = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nalpha = NULL; float *__nbeta = NULL; float *__nu = NULL; float *__nv = NULL; float *__nq = NULL; float *__nwork = NULL; - if (!(__njobu = (*env)->GetStringUTFChars(env, jobu, NULL))) goto fail; - if (!(__njobv = (*env)->GetStringUTFChars(env, jobv, NULL))) goto fail; - if (!(__njobq = (*env)->GetStringUTFChars(env, jobq, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njobu = NULL; + const char *__njobv = NULL; + const char *__njobq = NULL; + int __nncycle = 0; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + float *__nalpha = NULL; + float *__nbeta = NULL; + float *__nu = NULL; + float *__nv = NULL; + float *__nq = NULL; + float *__nwork = NULL; + if (!(__njobu = (*env)->GetStringUTFChars(env, jobu, NULL))) { __failed = TRUE; goto done; } + if (!(__njobv = (*env)->GetStringUTFChars(env, jobv, NULL))) { __failed = TRUE; goto done; } + if (!(__njobq = (*env)->GetStringUTFChars(env, jobq, NULL))) { __failed = TRUE; goto done; } __nncycle = (*env)->GetIntField(env, ncycle, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nalpha = (*env)->GetPrimitiveArrayCritical(env, alpha, NULL))) goto fail; - if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) goto fail; - if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nalpha = (*env)->GetPrimitiveArrayCritical(env, alpha, NULL))) { __failed = TRUE; goto done; } + if (!(__nbeta = (*env)->GetPrimitiveArrayCritical(env, beta, NULL))) { __failed = TRUE; goto done; } + if (!(__nu = (*env)->GetPrimitiveArrayCritical(env, u, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } stgsja_(__njobu, __njobv, __njobq, &m, &p, &n, &k, &l, __na + offseta, &lda, __nb + offsetb, &ldb, &tola, &tolb, __nalpha + offsetalpha, __nbeta + offsetbeta, __nu + offsetu, &ldu, __nv + offsetv, &ldv, __nq + offsetq, &ldq, __nwork + offsetwork, &__nncycle, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, failed ? JNI_ABORT : 0); - if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, failed ? JNI_ABORT : 0); - if (__nalpha) (*env)->ReleasePrimitiveArrayCritical(env, alpha, __nalpha, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, ncycle, intW_val_fieldID, __nncycle); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nu) (*env)->ReleasePrimitiveArrayCritical(env, u, __nu, __failed ? JNI_ABORT : 0); + if (__nbeta) (*env)->ReleasePrimitiveArrayCritical(env, beta, __nbeta, __failed ? JNI_ABORT : 0); + if (__nalpha) (*env)->ReleasePrimitiveArrayCritical(env, alpha, __nalpha, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, ncycle, intW_val_fieldID, __nncycle); if (__njobq) (*env)->ReleaseStringUTFChars(env, jobq, __njobq); if (__njobv) (*env)->ReleaseStringUTFChars(env, jobv, __njobv); if (__njobu) (*env)->ReleaseStringUTFChars(env, jobu, __njobu); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*stgsna_)(const char *job, const char *howmny, int *select, int *n, float *a, int *lda, float *b, int *ldb, float *vl, int *ldvl, float *vr, int *ldvr, float *s, float *dif, int *mm, int *m, float *work, int *lwork, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgsnaK(JNIEnv *env, UNUSED jobject obj, jstring job, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jfloatArray s, jint offsets, jfloatArray dif, jint offsetdif, jint mm, jobject m, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__njob = NULL; const char *__nhowmny = NULL; int __nm = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; float *__na = NULL; float *__nb = NULL; float *__nvl = NULL; float *__nvr = NULL; float *__ns = NULL; float *__ndif = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; - if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njob = NULL; + const char *__nhowmny = NULL; + int __nm = 0; + int __ninfo = 0; + int *__nselect = NULL; jboolean *__jselect = NULL; + float *__na = NULL; + float *__nb = NULL; + float *__nvl = NULL; + float *__nvr = NULL; + float *__ns = NULL; + float *__ndif = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) { __failed = TRUE; goto done; } + if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; - if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; - if (!(__ndif = (*env)->GetPrimitiveArrayCritical(env, dif, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { __failed = TRUE; goto done; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) { __failed = TRUE; goto done; } if (!(__nselect = malloc(sizeof(jboolean) * length))) { __failed = TRUE; goto done; } for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) { __failed = TRUE; goto done; } + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } + if (!(__ndif = (*env)->GetPrimitiveArrayCritical(env, dif, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } stgsna_(__njob, __nhowmny, __nselect + offsetselect, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, __ns + offsets, __ndif + offsetdif, &mm, &__nm, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ndif) (*env)->ReleasePrimitiveArrayCritical(env, dif, __ndif, failed ? JNI_ABORT : 0); - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); - if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ndif) (*env)->ReleasePrimitiveArrayCritical(env, dif, __ndif, __failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, __failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__nhowmny) (*env)->ReleaseStringUTFChars(env, howmny, __nhowmny); if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*stgsy2_)(const char *trans, int *ijob, int *m, int *n, float *a, int *lda, float *b, int *ldb, float *c, int *Ldc, float *d, int *ldd, float *e, int *lde, float *f, int *ldf, float *scale, float *rdsum, float *rdscal, int *iwork, int *pq, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgsy2K(JNIEnv *env, UNUSED jobject obj, jstring trans, jint ijob, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray c, jint offsetc, jint Ldc, jfloatArray d, jint offsetd, jint ldd, jfloatArray e, jint offsete, jint lde, jfloatArray f, jint offsetf, jint ldf, jobject scale, jobject rdsum, jobject rdscal, jintArray iwork, jint offsetiwork, jobject pq, jobject info) { - jboolean failed = FALSE; - const char *__ntrans = NULL; float __nscale = 0; float __nrdsum = 0; float __nrdscal = 0; int __npq = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nc = NULL; float *__nd = NULL; float *__ne = NULL; float *__nf = NULL; int *__niwork = NULL; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ntrans = NULL; + float __nscale = 0; + float __nrdsum = 0; + float __nrdscal = 0; + int __npq = 0; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + float *__nc = NULL; + float *__nd = NULL; + float *__ne = NULL; + float *__nf = NULL; + int *__niwork = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } __nscale = (*env)->GetFloatField(env, scale, floatW_val_fieldID); __nrdsum = (*env)->GetFloatField(env, rdsum, floatW_val_fieldID); __nrdscal = (*env)->GetFloatField(env, rdscal, floatW_val_fieldID); __npq = (*env)->GetIntField(env, pq, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nf = (*env)->GetPrimitiveArrayCritical(env, f, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nf = (*env)->GetPrimitiveArrayCritical(env, f, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } stgsy2_(__ntrans, &ijob, &m, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nc + offsetc, &Ldc, __nd + offsetd, &ldd, __ne + offsete, &lde, __nf + offsetf, &ldf, &__nscale, &__nrdsum, &__nrdscal, __niwork + offsetiwork, &__npq, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nf) (*env)->ReleasePrimitiveArrayCritical(env, f, __nf, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, pq, intW_val_fieldID, __npq); - if (!failed) (*env)->SetFloatField(env, rdscal, floatW_val_fieldID, __nrdscal); - if (!failed) (*env)->SetFloatField(env, rdsum, floatW_val_fieldID, __nrdsum); - if (!failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nf) (*env)->ReleasePrimitiveArrayCritical(env, f, __nf, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, pq, intW_val_fieldID, __npq); + if (!__failed) (*env)->SetFloatField(env, rdscal, floatW_val_fieldID, __nrdscal); + if (!__failed) (*env)->SetFloatField(env, rdsum, floatW_val_fieldID, __nrdsum); + if (!__failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*stgsyl_)(const char *trans, int *ijob, int *m, int *n, float *a, int *lda, float *b, int *ldb, float *c, int *Ldc, float *d, int *ldd, float *e, int *lde, float *f, int *ldf, float *scale, float *dif, float *work, int *lwork, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_stgsylK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint ijob, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray c, jint offsetc, jint Ldc, jfloatArray d, jint offsetd, jint ldd, jfloatArray e, jint offsete, jint lde, jfloatArray f, jint offsetf, jint ldf, jobject scale, jobject dif, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__ntrans = NULL; float __nscale = 0; float __ndif = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nc = NULL; float *__nd = NULL; float *__ne = NULL; float *__nf = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ntrans = NULL; + float __nscale = 0; + float __ndif = 0; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + float *__nc = NULL; + float *__nd = NULL; + float *__ne = NULL; + float *__nf = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } __nscale = (*env)->GetFloatField(env, scale, floatW_val_fieldID); __ndif = (*env)->GetFloatField(env, dif, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nf = (*env)->GetPrimitiveArrayCritical(env, f, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nf = (*env)->GetPrimitiveArrayCritical(env, f, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } stgsyl_(__ntrans, &ijob, &m, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nc + offsetc, &Ldc, __nd + offsetd, &ldd, __ne + offsete, &lde, __nf + offsetf, &ldf, &__nscale, &__ndif, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nf) (*env)->ReleasePrimitiveArrayCritical(env, f, __nf, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, dif, floatW_val_fieldID, __ndif); - if (!failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nf) (*env)->ReleasePrimitiveArrayCritical(env, f, __nf, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, dif, floatW_val_fieldID, __ndif); + if (!__failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*stpcon_)(const char *norm, const char *uplo, const char *diag, int *n, float *ap, float *rcond, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_stpconK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jstring diag, jint n, jfloatArray ap, jint offsetap, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nnorm = NULL; const char *__nuplo = NULL; const char *__ndiag = NULL; float __nrcond = 0; int __ninfo = 0; float *__nap = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + const char *__nuplo = NULL; + const char *__ndiag = NULL; + float __nrcond = 0; + int __ninfo = 0; + float *__nap = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } stpcon_(__nnorm, __nuplo, __ndiag, &n, __nap + offsetap, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*stprfs_)(const char *uplo, const char *trans, const char *diag, int *n, int *nrhs, float *ap, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_stprfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; int __ninfo = 0; float *__nap = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + const char *__ndiag = NULL; + int __ninfo = 0; + float *__nap = NULL; + float *__nb = NULL; + float *__nx = NULL; + float *__nferr = NULL; + float *__nberr = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } stprfs_(__nuplo, __ntrans, __ndiag, &n, &nrhs, __nap + offsetap, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*stptri_)(const char *uplo, const char *diag, int *n, float *ap, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_stptriK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring diag, jint n, jfloatArray ap, jint offsetap, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ndiag = NULL; int __ninfo = 0; float *__nap = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ndiag = NULL; + int __ninfo = 0; + float *__nap = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } stptri_(__nuplo, __ndiag, &n, __nap + offsetap, &__ninfo); done: - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*stptrs_)(const char *uplo, const char *trans, const char *diag, int *n, int *nrhs, float *ap, float *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_stptrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jfloatArray ap, jint offsetap, jfloatArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; int __ninfo = 0; float *__nap = NULL; float *__nb = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + const char *__ndiag = NULL; + int __ninfo = 0; + float *__nap = NULL; + float *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__nap = (*env)->GetPrimitiveArrayCritical(env, ap, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } stptrs_(__nuplo, __ntrans, __ndiag, &n, &nrhs, __nap + offsetap, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__nap) (*env)->ReleasePrimitiveArrayCritical(env, ap, __nap, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*strcon_)(const char *norm, const char *uplo, const char *diag, int *n, float *a, int *lda, float *rcond, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_strconK(JNIEnv *env, UNUSED jobject obj, jstring norm, jstring uplo, jstring diag, jint n, jfloatArray a, jint offseta, jint lda, jobject rcond, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nnorm = NULL; const char *__nuplo = NULL; const char *__ndiag = NULL; float __nrcond = 0; int __ninfo = 0; float *__na = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nnorm = NULL; + const char *__nuplo = NULL; + const char *__ndiag = NULL; + float __nrcond = 0; + int __ninfo = 0; + float *__na = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nnorm = (*env)->GetStringUTFChars(env, norm, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } __nrcond = (*env)->GetFloatField(env, rcond, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } strcon_(__nnorm, __nuplo, __ndiag, &n, __na + offseta, &lda, &__nrcond, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, rcond, floatW_val_fieldID, __nrcond); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nnorm) (*env)->ReleaseStringUTFChars(env, norm, __nnorm); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*strevc_)(const char *side, const char *howmny, int *select, int *n, float *t, int *ldt, float *vl, int *ldvl, float *vr, int *ldvr, int *mm, int *m, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_strevcK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jfloatArray t, jint offsett, jint ldt, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jint mm, jobject m, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__nhowmny = NULL; int __nm = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; float *__nt = NULL; float *__nvl = NULL; float *__nvr = NULL; float *__nwork = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__nhowmny = NULL; + int __nm = 0; + int __ninfo = 0; + int *__nselect = NULL; jboolean *__jselect = NULL; + float *__nt = NULL; + float *__nvl = NULL; + float *__nvr = NULL; + float *__nwork = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); - if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; - if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; - if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { __failed = TRUE; goto done; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) { __failed = TRUE; goto done; } if (!(__nselect = malloc(sizeof(jboolean) * length))) { __failed = TRUE; goto done; } for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) { __failed = TRUE; goto done; } + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) { __failed = TRUE; goto done; } + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } strevc_(__nside, __nhowmny, __nselect + offsetselect, &n, __nt + offsett, &ldt, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, &mm, &__nm, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); - if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); - if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, __failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, __failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, __failed ? JNI_ABORT : 0); if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__nhowmny) (*env)->ReleaseStringUTFChars(env, howmny, __nhowmny); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*strexc_)(const char *compq, int *n, float *t, int *ldt, float *q, int *ldq, int *ifst, int *ilst, float *work, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_strexcK(JNIEnv *env, UNUSED jobject obj, jstring compq, jint n, jfloatArray t, jint offsett, jint ldt, jfloatArray q, jint offsetq, jint ldq, jobject ifst, jobject ilst, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - const char *__ncompq = NULL; int __nifst = 0; int __nilst = 0; int __ninfo = 0; float *__nt = NULL; float *__nq = NULL; float *__nwork = NULL; - if (!(__ncompq = (*env)->GetStringUTFChars(env, compq, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ncompq = NULL; + int __nifst = 0; + int __nilst = 0; + int __ninfo = 0; + float *__nt = NULL; + float *__nq = NULL; + float *__nwork = NULL; + if (!(__ncompq = (*env)->GetStringUTFChars(env, compq, NULL))) { __failed = TRUE; goto done; } __nifst = (*env)->GetIntField(env, ifst, intW_val_fieldID); __nilst = (*env)->GetIntField(env, ilst, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } strexc_(__ncompq, &n, __nt + offsett, &ldt, __nq + offsetq, &ldq, &__nifst, &__nilst, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, ilst, intW_val_fieldID, __nilst); - if (!failed) (*env)->SetIntField(env, ifst, intW_val_fieldID, __nifst); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, ilst, intW_val_fieldID, __nilst); + if (!__failed) (*env)->SetIntField(env, ifst, intW_val_fieldID, __nifst); if (__ncompq) (*env)->ReleaseStringUTFChars(env, compq, __ncompq); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*strrfs_)(const char *uplo, const char *trans, const char *diag, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_strrfsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray x, jint offsetx, jint ldx, jfloatArray ferr, jint offsetferr, jfloatArray berr, jint offsetberr, jfloatArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nx = NULL; float *__nferr = NULL; float *__nberr = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) goto fail; - if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + const char *__ndiag = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + float *__nx = NULL; + float *__nferr = NULL; + float *__nberr = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__nferr = (*env)->GetPrimitiveArrayCritical(env, ferr, NULL))) { __failed = TRUE; goto done; } + if (!(__nberr = (*env)->GetPrimitiveArrayCritical(env, berr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } strrfs_(__nuplo, __ntrans, __ndiag, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, __nx + offsetx, &ldx, __nferr + offsetferr, __nberr + offsetberr, __nwork + offsetwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, failed ? JNI_ABORT : 0); - if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nberr) (*env)->ReleasePrimitiveArrayCritical(env, berr, __nberr, __failed ? JNI_ABORT : 0); + if (__nferr) (*env)->ReleasePrimitiveArrayCritical(env, ferr, __nferr, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*strsen_)(const char *job, const char *compq, int *select, int *n, float *t, int *ldt, float *q, int *ldq, float *wr, float *wi, int *m, float *s, float *sep, float *work, int *lwork, int *iwork, int *liwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_strsenK(JNIEnv *env, UNUSED jobject obj, jstring job, jstring compq, jbooleanArray select, jint offsetselect, jint n, jfloatArray t, jint offsett, jint ldt, jfloatArray q, jint offsetq, jint ldq, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jobject m, jobject s, jobject sep, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jobject info) { - jboolean failed = FALSE; - const char *__njob = NULL; const char *__ncompq = NULL; int __nm = 0; float __ns = 0; float __nsep = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; float *__nt = NULL; float *__nq = NULL; float *__nwr = NULL; float *__nwi = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; - if (!(__ncompq = (*env)->GetStringUTFChars(env, compq, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njob = NULL; + const char *__ncompq = NULL; + int __nm = 0; + float __ns = 0; + float __nsep = 0; + int __ninfo = 0; + int *__nselect = NULL; jboolean *__jselect = NULL; + float *__nt = NULL; + float *__nq = NULL; + float *__nwr = NULL; + float *__nwi = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) { __failed = TRUE; goto done; } + if (!(__ncompq = (*env)->GetStringUTFChars(env, compq, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ns = (*env)->GetFloatField(env, s, floatW_val_fieldID); __nsep = (*env)->GetFloatField(env, sep, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); - if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) goto fail; - if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { __failed = TRUE; goto done; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) { __failed = TRUE; goto done; } if (!(__nselect = malloc(sizeof(jboolean) * length))) { __failed = TRUE; goto done; } for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nwr = (*env)->GetPrimitiveArrayCritical(env, wr, NULL))) { __failed = TRUE; goto done; } + if (!(__nwi = (*env)->GetPrimitiveArrayCritical(env, wi, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } strsen_(__njob, __ncompq, __nselect + offsetselect, &n, __nt + offsett, &ldt, __nq + offsetq, &ldq, __nwr + offsetwr, __nwi + offsetwi, &__nm, &__ns, &__nsep, __nwork + offsetwork, &lwork, __niwork + offsetiwork, &liwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, failed ? JNI_ABORT : 0); - if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nwi) (*env)->ReleasePrimitiveArrayCritical(env, wi, __nwi, __failed ? JNI_ABORT : 0); + if (__nwr) (*env)->ReleasePrimitiveArrayCritical(env, wr, __nwr, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, __failed ? JNI_ABORT : 0); if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, sep, floatW_val_fieldID, __nsep); - if (!failed) (*env)->SetFloatField(env, s, floatW_val_fieldID, __ns); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, sep, floatW_val_fieldID, __nsep); + if (!__failed) (*env)->SetFloatField(env, s, floatW_val_fieldID, __ns); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__ncompq) (*env)->ReleaseStringUTFChars(env, compq, __ncompq); if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*strsna_)(const char *job, const char *howmny, int *select, int *n, float *t, int *ldt, float *vl, int *ldvl, float *vr, int *ldvr, float *s, float *sep, int *mm, int *m, float *work, int *ldwork, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_strsnaK(JNIEnv *env, UNUSED jobject obj, jstring job, jstring howmny, jbooleanArray select, jint offsetselect, jint n, jfloatArray t, jint offsett, jint ldt, jfloatArray vl, jint offsetvl, jint ldvl, jfloatArray vr, jint offsetvr, jint ldvr, jfloatArray s, jint offsets, jfloatArray sep, jint offsetsep, jint mm, jobject m, jfloatArray work, jint offsetwork, jint ldwork, jintArray iwork, jint offsetiwork, jobject info) { - jboolean failed = FALSE; - const char *__njob = NULL; const char *__nhowmny = NULL; int __nm = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; float *__nt = NULL; float *__nvl = NULL; float *__nvr = NULL; float *__ns = NULL; float *__nsep = NULL; float *__nwork = NULL; int *__niwork = NULL; - if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) goto fail; - if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__njob = NULL; + const char *__nhowmny = NULL; + int __nm = 0; + int __ninfo = 0; + int *__nselect = NULL; jboolean *__jselect = NULL; + float *__nt = NULL; + float *__nvl = NULL; + float *__nvr = NULL; + float *__ns = NULL; + float *__nsep = NULL; + float *__nwork = NULL; + int *__niwork = NULL; + if (!(__njob = (*env)->GetStringUTFChars(env, job, NULL))) { __failed = TRUE; goto done; } + if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) { __failed = TRUE; goto done; } __nm = (*env)->GetIntField(env, m, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); - if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) goto fail; - if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) goto fail; - if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) goto fail; - if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) goto fail; - if (!(__nsep = (*env)->GetPrimitiveArrayCritical(env, sep, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; - if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) goto fail; + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { __failed = TRUE; goto done; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) { __failed = TRUE; goto done; } if (!(__nselect = malloc(sizeof(jboolean) * length))) { __failed = TRUE; goto done; } for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__nt = (*env)->GetPrimitiveArrayCritical(env, t, NULL))) { __failed = TRUE; goto done; } + if (!(__nvl = (*env)->GetPrimitiveArrayCritical(env, vl, NULL))) { __failed = TRUE; goto done; } + if (!(__nvr = (*env)->GetPrimitiveArrayCritical(env, vr, NULL))) { __failed = TRUE; goto done; } + if (!(__ns = (*env)->GetPrimitiveArrayCritical(env, s, NULL))) { __failed = TRUE; goto done; } + if (!(__nsep = (*env)->GetPrimitiveArrayCritical(env, sep, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } + if (!(__niwork = (*env)->GetPrimitiveArrayCritical(env, iwork, NULL))) { __failed = TRUE; goto done; } strsna_(__njob, __nhowmny, __nselect + offsetselect, &n, __nt + offsett, &ldt, __nvl + offsetvl, &ldvl, __nvr + offsetvr, &ldvr, __ns + offsets, __nsep + offsetsep, &mm, &__nm, __nwork + offsetwork, &ldwork, __niwork + offsetiwork, &__ninfo); done: - if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, failed ? JNI_ABORT : 0); - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nsep) (*env)->ReleasePrimitiveArrayCritical(env, sep, __nsep, failed ? JNI_ABORT : 0); - if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, failed ? JNI_ABORT : 0); - if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, failed ? JNI_ABORT : 0); - if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, failed ? JNI_ABORT : 0); - if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, failed ? JNI_ABORT : 0); + if (__niwork) (*env)->ReleasePrimitiveArrayCritical(env, iwork, __niwork, __failed ? JNI_ABORT : 0); + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nsep) (*env)->ReleasePrimitiveArrayCritical(env, sep, __nsep, __failed ? JNI_ABORT : 0); + if (__ns) (*env)->ReleasePrimitiveArrayCritical(env, s, __ns, __failed ? JNI_ABORT : 0); + if (__nvr) (*env)->ReleasePrimitiveArrayCritical(env, vr, __nvr, __failed ? JNI_ABORT : 0); + if (__nvl) (*env)->ReleasePrimitiveArrayCritical(env, vl, __nvl, __failed ? JNI_ABORT : 0); + if (__nt) (*env)->ReleasePrimitiveArrayCritical(env, t, __nt, __failed ? JNI_ABORT : 0); if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, m, intW_val_fieldID, __nm); if (__nhowmny) (*env)->ReleaseStringUTFChars(env, howmny, __nhowmny); if (__njob) (*env)->ReleaseStringUTFChars(env, job, __njob); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*strsyl_)(const char *trana, const char *tranb, int *isgn, int *m, int *n, float *a, int *lda, float *b, int *ldb, float *c, int *Ldc, float *scale, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_strsylK(JNIEnv *env, UNUSED jobject obj, jstring trana, jstring tranb, jint isgn, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloatArray c, jint offsetc, jint Ldc, jobject scale, jobject info) { - jboolean failed = FALSE; - const char *__ntrana = NULL; const char *__ntranb = NULL; float __nscale = 0; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; float *__nc = NULL; - if (!(__ntrana = (*env)->GetStringUTFChars(env, trana, NULL))) goto fail; - if (!(__ntranb = (*env)->GetStringUTFChars(env, tranb, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ntrana = NULL; + const char *__ntranb = NULL; + float __nscale = 0; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + float *__nc = NULL; + if (!(__ntrana = (*env)->GetStringUTFChars(env, trana, NULL))) { __failed = TRUE; goto done; } + if (!(__ntranb = (*env)->GetStringUTFChars(env, tranb, NULL))) { __failed = TRUE; goto done; } __nscale = (*env)->GetFloatField(env, scale, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } strsyl_(__ntrana, __ntranb, &isgn, &m, &n, __na + offseta, &lda, __nb + offsetb, &ldb, __nc + offsetc, &Ldc, &__nscale, &__ninfo); done: - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, scale, floatW_val_fieldID, __nscale); if (__ntranb) (*env)->ReleaseStringUTFChars(env, tranb, __ntranb); if (__ntrana) (*env)->ReleaseStringUTFChars(env, trana, __ntrana); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*strti2_)(const char *uplo, const char *diag, int *n, float *a, int *lda, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_strti2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring diag, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ndiag = NULL; int __ninfo = 0; float *__na = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ndiag = NULL; + int __ninfo = 0; + float *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } strti2_(__nuplo, __ndiag, &n, __na + offseta, &lda, &__ninfo); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*strtri_)(const char *uplo, const char *diag, int *n, float *a, int *lda, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_strtriK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring diag, jint n, jfloatArray a, jint offseta, jint lda, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ndiag = NULL; int __ninfo = 0; float *__na = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ndiag = NULL; + int __ninfo = 0; + float *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } strtri_(__nuplo, __ndiag, &n, __na + offseta, &lda, &__ninfo); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*strtrs_)(const char *uplo, const char *trans, const char *diag, int *n, int *nrhs, float *a, int *lda, float *b, int *ldb, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_strtrsK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint nrhs, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject info) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; int __ninfo = 0; float *__na = NULL; float *__nb = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + const char *__ndiag = NULL; + int __ninfo = 0; + float *__na = NULL; + float *__nb = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } strtrs_(__nuplo, __ntrans, __ndiag, &n, &nrhs, __na + offseta, &lda, __nb + offsetb, &ldb, &__ninfo); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*stzrqf_)(int *m, int *n, float *a, int *lda, float *tau, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_stzrqfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } stzrqf_(&m, &n, __na + offseta, &lda, __ntau + offsettau, &__ninfo); done: - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*stzrzf_)(int *m, int *n, float *a, int *lda, float *tau, float *work, int *lwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_stzrzfK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray tau, jint offsettau, jfloatArray work, jint offsetwork, jint lwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__na = NULL; float *__ntau = NULL; float *__nwork = NULL; - __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__na = NULL; + float *__ntau = NULL; + float *__nwork = NULL; + __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__ntau = (*env)->GetPrimitiveArrayCritical(env, tau, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } stzrzf_(&m, &n, __na + offseta, &lda, __ntau + offsettau, __nwork + offsetwork, &lwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, failed ? JNI_ABORT : 0); - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__ntau) (*env)->ReleasePrimitiveArrayCritical(env, tau, __ntau, __failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static double (*dlamch_)(const char *cmach); jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamchK(JNIEnv *env, UNUSED jobject obj, jstring cmach) { - jdouble __ret; - jboolean failed = FALSE; + jdouble __ret = 0; + jboolean __failed = FALSE; const char *__ncmach = NULL; - if (!(__ncmach = (*env)->GetStringUTFChars(env, cmach, NULL))) goto fail; + if (!(__ncmach = (*env)->GetStringUTFChars(env, cmach, NULL))) { __failed = TRUE; goto done; } __ret = dlamch_(__ncmach); done: if (__ncmach) (*env)->ReleaseStringUTFChars(env, cmach, __ncmach); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; +} + +// static void (*dlamc1_)(int *beta, int *t, int *rnd, int *ieee1); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc1K(JNIEnv *env, UNUSED jobject obj, UNUSED jobject beta, UNUSED jobject t, UNUSED jobject rnd, UNUSED jobject ieee1) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +// static void (*dlamc2_)(int *beta, int *t, int *rnd, double *eps, int *emin, double *rmin, int *emax, double *rmax); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc2K(JNIEnv *env, UNUSED jobject obj, UNUSED jobject beta, UNUSED jobject t, UNUSED jobject rnd, UNUSED jobject eps, UNUSED jobject emin, UNUSED jobject rmin, UNUSED jobject emax, UNUSED jobject rmax) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } static double (*dlamc3_)(double *a, double *b); jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc3K(JNIEnv *env, UNUSED jobject obj, jdouble a, jdouble b) { - jdouble __ret; - jboolean failed = FALSE; - - + jdouble __ret = 0; + jboolean __failed = FALSE; __ret = dlamc3_(&a, &b); done: - - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; +} + +// static void (*dlamc4_)(int *emin, double *start, int *base); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc4K(JNIEnv *env, UNUSED jobject obj, UNUSED jobject emin, UNUSED jdouble start, UNUSED jint base) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +// static void (*dlamc5_)(int *beta, int *p, int *emin, int *ieee, int *emax, double *rmax); + +void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc5K(JNIEnv *env, UNUSED jobject obj, UNUSED jint beta, UNUSED jint p, UNUSED jint emin, UNUSED jboolean ieee, UNUSED jobject emax, UNUSED jobject rmax) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } static double (*dsecnd_)(); jdouble Java_dev_ludovic_netlib_lapack_JNILAPACK_dsecndK(JNIEnv *env, UNUSED jobject obj) { - jdouble __ret; - jboolean failed = FALSE; - + jdouble __ret = 0; + jboolean __failed = FALSE; __ret = dsecnd_(); done: - - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static int (*lsame_)(const char *ca, const char *cb); jboolean Java_dev_ludovic_netlib_lapack_JNILAPACK_lsameK(JNIEnv *env, UNUSED jobject obj, jstring ca, jstring cb) { - jboolean __ret; - jboolean failed = FALSE; - const char *__nca = NULL; const char *__ncb = NULL; - if (!(__nca = (*env)->GetStringUTFChars(env, ca, NULL))) goto fail; - if (!(__ncb = (*env)->GetStringUTFChars(env, cb, NULL))) goto fail; + jboolean __ret = 0; + jboolean __failed = FALSE; + const char *__nca = NULL; + const char *__ncb = NULL; + if (!(__nca = (*env)->GetStringUTFChars(env, ca, NULL))) { __failed = TRUE; goto done; } + if (!(__ncb = (*env)->GetStringUTFChars(env, cb, NULL))) { __failed = TRUE; goto done; } __ret = lsame_(__nca, __ncb); done: if (__ncb) (*env)->ReleaseStringUTFChars(env, cb, __ncb); if (__nca) (*env)->ReleaseStringUTFChars(env, ca, __nca); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static float (*second_)(); jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_secondK(JNIEnv *env, UNUSED jobject obj) { - jfloat __ret; - jboolean failed = FALSE; - + jfloat __ret = 0; + jboolean __failed = FALSE; __ret = second_(); done: - - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static float (*slamch_)(const char *cmach); jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slamchK(JNIEnv *env, UNUSED jobject obj, jstring cmach) { - jfloat __ret; - jboolean failed = FALSE; + jfloat __ret = 0; + jboolean __failed = FALSE; const char *__ncmach = NULL; - if (!(__ncmach = (*env)->GetStringUTFChars(env, cmach, NULL))) goto fail; + if (!(__ncmach = (*env)->GetStringUTFChars(env, cmach, NULL))) { __failed = TRUE; goto done; } __ret = slamch_(__ncmach); done: if (__ncmach) (*env)->ReleaseStringUTFChars(env, cmach, __ncmach); - if (failed) throwOOM(env); - return __ret; -fail: - failed = TRUE; - goto done; -} - -static float (*slamc3_)(float *a, float *b); - -jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc3K(JNIEnv *env, UNUSED jobject obj, jfloat a, jfloat b) { - jfloat __ret; - jboolean failed = FALSE; - - - __ret = slamc3_(&a, &b); -done: - - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; -} - -// static void (*dgges_)(char *jobvsl, char *jobvsr, char *sort, /*FIXME*/void *selctg, int *n, double *a, int *lda, double *b, int *ldb, /*FIXME*/void *sdim, double *alphar, double *alphai, double *beta, double *vsl, int *ldvsl, double *vsr, int *ldvsr, double *work, int *lwork, int *bwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggesK(JNIEnv *env, UNUSED jobject obj, - jstring jobvsl, jstring jobvsr, jstring sort, jobject selctg, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject sdim, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray vsl, jint offsetvsl, jint ldvsl, jdoubleArray vsr, jint offsetvsr, jint ldvsr, jdoubleArray work, jint offsetwork, jint lwork, jbooleanArray bwork, jint offsetbwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} - -// static void (*dggesx_)(char *jobvsl, char *jobvsr, char *sort, /*FIXME*/void *selctg, char *sense, int *n, double *a, int *lda, double *b, int *ldb, /*FIXME*/void *sdim, double *alphar, double *alphai, double *beta, double *vsl, int *ldvsl, double *vsr, int *ldvsr, double *rconde, double *rcondv, double *work, int *lwork, int * iwork, int *liwork, int *bwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dggesxK(JNIEnv *env, UNUSED jobject obj, - jstring jobvsl, jstring jobvsr, jstring sort, jobject selctg, jstring sense, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jobject sdim, jdoubleArray alphar, jint offsetalphar, jdoubleArray alphai, jint offsetalphai, jdoubleArray beta, jint offsetbeta, jdoubleArray vsl, jint offsetvsl, jint ldvsl, jdoubleArray vsr, jint offsetvsr, jint ldvsr, jdoubleArray rconde, jint offsetrconde, jdoubleArray rcondv, jint offsetrcondv, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jbooleanArray bwork, jint offsetbwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} - -// static void (*sgges_)(char *jobvsl, char *jobvsr, char *sort, /*FIXME*/void *selctg, int *n, float *a, int *lda, float *b, int *ldb, /*FIXME*/void *sdim, float *alphar, float *alphai, float *beta, float *vsl, int *ldvsl, float *vsr, int *ldvsr, float *work, int *lwork, int *bwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggesK(JNIEnv *env, UNUSED jobject obj, - jstring jobvsl, jstring jobvsr, jstring sort, jobject selctg, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject sdim, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray vsl, jint offsetvsl, jint ldvsl, jfloatArray vsr, jint offsetvsr, jint ldvsr, jfloatArray work, jint offsetwork, jint lwork, jbooleanArray bwork, jint offsetbwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -// static void (*sggesx_)(char *jobvsl, char *jobvsr, char *sort, /*FIXME*/void *selctg, char *sense, int *n, float *a, int *lda, float *b, int *ldb, /*FIXME*/void *sdim, float *alphar, float *alphai, float *beta, float *vsl, int *ldvsl, float *vsr, int *ldvsr, float *rconde, float *rcondv, float *work, int *lwork, int * iwork, int *liwork, int *bwork, /*FIXME*/void *info); +// static void (*slamc1_)(int *beta, int *t, int *rnd, int *ieee1); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sggesxK(JNIEnv *env, UNUSED jobject obj, - jstring jobvsl, jstring jobvsr, jstring sort, jobject selctg, jstring sense, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jobject sdim, jfloatArray alphar, jint offsetalphar, jfloatArray alphai, jint offsetalphai, jfloatArray beta, jint offsetbeta, jfloatArray vsl, jint offsetvsl, jint ldvsl, jfloatArray vsr, jint offsetvsr, jint ldvsr, jfloatArray rconde, jint offsetrconde, jfloatArray rcondv, jint offsetrcondv, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jbooleanArray bwork, jint offsetbwork, jobject info) { +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc1K(JNIEnv *env, UNUSED jobject obj, UNUSED jobject beta, UNUSED jobject t, UNUSED jobject rnd, UNUSED jobject ieee1) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -// static void (*sgees_)(char *jobvs, char *sort, /*FIXME*/void *select, int *n, float *a, int *lda, /*FIXME*/void *sdim, float *wr, float *wi, float *vs, int *ldvs, float *work, int *lwork, int *bwork, int *info); +// static void (*slamc2_)(int *beta, int *t, int *rnd, float *eps, int *emin, float *rmin, int *emax, float *rmax); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeesK(JNIEnv *env, UNUSED jobject obj, - jstring jobvs, jstring sort, jobject select, jint n, jfloatArray a, jint offseta, jint lda, jobject sdim, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jfloatArray vs, jint offsetvs, jint ldvs, jfloatArray work, jint offsetwork, jint lwork, jbooleanArray bwork, jint offsetbwork, jobject info) { +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc2K(JNIEnv *env, UNUSED jobject obj, UNUSED jobject beta, UNUSED jobject t, UNUSED jobject rnd, UNUSED jobject eps, UNUSED jobject emin, UNUSED jobject rmin, UNUSED jobject emax, UNUSED jobject rmax) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } -// static void (*sgeesx_)(char *jobvs, char *sort, /*FIXME*/void *select, char *sense, int *n, float *a, int *lda, /*FIXME*/void *sdim, float *wr, float *wi, float *vs, int *ldvs, /*FIXME*/void *rconde, /*FIXME*/void *rcondv, float *work, int *lwork, int * iwork, int *liwork, int *bwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_sgeesxK(JNIEnv *env, UNUSED jobject obj, - jstring jobvs, jstring sort, jobject select, jstring sense, jint n, jfloatArray a, jint offseta, jint lda, jobject sdim, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jfloatArray vs, jint offsetvs, jint ldvs, jobject rconde, jobject rcondv, jfloatArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jbooleanArray bwork, jint offsetbwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} - -// static void (*dgees_)(char *jobvs, char *sort, /*FIXME*/void *select, int *n, double *a, int *lda, /*FIXME*/void *sdim, double *wr, double *wi, double *vs, int *ldvs, double *work, int *lwork, int *bwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeesK(JNIEnv *env, UNUSED jobject obj, - jstring jobvs, jstring sort, jobject select, jint n, jdoubleArray a, jint offseta, jint lda, jobject sdim, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jdoubleArray vs, jint offsetvs, jint ldvs, jdoubleArray work, jint offsetwork, jint lwork, jbooleanArray bwork, jint offsetbwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} - - -// static void (*dgeesx_)(char *jobvs, char *sort, /*FIXME*/void *select, char *sense, int *n, double *a, int *lda, /*FIXME*/void *sdim, double *wr, double *wi, double *vs, int *ldvs, /*FIXME*/void *rconde, /*FIXME*/void *rcondv, double *work, int *lwork, int * iwork, int *liwork, int *bwork, /*FIXME*/void *info); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dgeesxK(JNIEnv *env, UNUSED jobject obj, - jstring jobvs, jstring sort, jobject select, jstring sense, jint n, jdoubleArray a, jint offseta, jint lda, jobject sdim, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jdoubleArray vs, jint offsetvs, jint ldvs, jobject rconde, jobject rcondv, jdoubleArray work, jint offsetwork, jint lwork, jintArray iwork, jint offsetiwork, jint liwork, jbooleanArray bwork, jint offsetbwork, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} - -// static void (*dlazq3_)(int *i0, /*FIXME*/void *n0, double *z, int *pp, /*FIXME*/void *dmin, /*FIXME*/void *sigma, /*FIXME*/void *desig, /*FIXME*/void *qmax, /*FIXME*/void *nfail, /*FIXME*/void *iter, /*FIXME*/void *ndiv, int *ieee, /*FIXME*/void *ttype, /*FIXME*/void *dmin1, /*FIXME*/void *dmin2, /*FIXME*/void *dn, /*FIXME*/void *dn1, /*FIXME*/void *dn2, /*FIXME*/void *tau); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlazq3K(JNIEnv *env, UNUSED jobject obj, - jint i0, jobject n0, jdoubleArray z, jint offsetz, jint pp, jobject dmin, jobject sigma, jobject desig, jobject qmax, jobject nfail, jobject iter, jobject ndiv, jboolean ieee, jobject ttype, jobject dmin1, jobject dmin2, jobject dn, jobject dn1, jobject dn2, jobject tau) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} - - -// static void (*dlazq4_)(int *i0, int *n0, double *z, int *pp, int *n0in, double *dmin, double *dmin1, double *dmin2, double *dn, double *dn1, double *dn2, /*FIXME*/void *tau, /*FIXME*/void *ttype, /*FIXME*/void *g); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlazq4K(JNIEnv *env, UNUSED jobject obj, - jint i0, jint n0, jdoubleArray z, jint offsetz, jint pp, jint n0in, jdouble dmin, jdouble dmin1, jdouble dmin2, jdouble dn, jdouble dn1, jdouble dn2, jobject tau, jobject ttype, jobject g) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} - - -// static void (*slazq3_)(int *i0, /*FIXME*/void *n0, float *z, int *pp, /*FIXME*/void *dmin, /*FIXME*/void *sigma, /*FIXME*/void *desig, /*FIXME*/void *qmax, /*FIXME*/void *nfail, /*FIXME*/void *iter, /*FIXME*/void *ndiv, int *ieee, /*FIXME*/void *ttype, /*FIXME*/void *dmin1, /*FIXME*/void *dmin2, /*FIXME*/void *dn, /*FIXME*/void *dn1, /*FIXME*/void *dn2, /*FIXME*/void *tau); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slazq3K(JNIEnv *env, UNUSED jobject obj, - jint i0, jobject n0, jfloatArray z, jint offsetz, jint pp, jobject dmin, jobject sigma, jobject desig, jobject qmax, jobject nfail, jobject iter, jobject ndiv, jboolean ieee, jobject ttype, jobject dmin1, jobject dmin2, jobject dn, jobject dn1, jobject dn2, jobject tau) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} - - -// static void (*slazq4_)(int *i0, int *n0, float *z, int *pp, int *n0in, float *dmin, float *dmin1, float *dmin2, float *dn, float *dn1, float *dn2, /*FIXME*/void *tau, /*FIXME*/void *ttype, /*FIXME*/void *g); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slazq4K(JNIEnv *env, UNUSED jobject obj, - jint i0, jint n0, jfloatArray z, jint offsetz, jint pp, jint n0in, jfloat dmin, jfloat dmin1, jfloat dmin2, jfloat dn, jfloat dn1, jfloat dn2, jobject tau, jobject ttype, jobject g) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} - - -// static void (*dlamc1_)(/*FIXME*/void *beta, /*FIXME*/void *t, /*FIXME*/void *rnd, /*FIXME*/void *ieee1); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc1K(JNIEnv *env, UNUSED jobject obj, - jobject beta, jobject t, jobject rnd, jobject ieee1) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} - - -// static void (*dlamc2_)(/*FIXME*/void *beta, /*FIXME*/void *t, /*FIXME*/void *rnd, /*FIXME*/void *eps, /*FIXME*/void *emin, /*FIXME*/void *rmin, /*FIXME*/void *emax, /*FIXME*/void *rmax); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc2K(JNIEnv *env, UNUSED jobject obj, - jobject beta, jobject t, jobject rnd, jobject eps, jobject emin, jobject rmin, jobject emax, jobject rmax) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} - - -// static void (*dlamc4_)(/*FIXME*/void *emin, double *start, int *base); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc4K(JNIEnv *env, UNUSED jobject obj, - jobject emin, jdouble start, jint base) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} - - -// static void (*dlamc5_)(int *beta, int *p, int *emin, int *ieee, /*FIXME*/void *emax, /*FIXME*/void *rmax); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_dlamc5K(JNIEnv *env, UNUSED jobject obj, - jint beta, jint p, jint emin, jboolean ieee, jobject emax, jobject rmax) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} - - -// static void (*slamc1_)(/*FIXME*/void *beta, /*FIXME*/void *t, /*FIXME*/void *rnd, /*FIXME*/void *ieee1); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc1K(JNIEnv *env, UNUSED jobject obj, - jobject beta, jobject t, jobject rnd, jobject ieee1) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} - - -// static void (*slamc2_)(/*FIXME*/void *beta, /*FIXME*/void *t, /*FIXME*/void *rnd, /*FIXME*/void *eps, /*FIXME*/void *emin, /*FIXME*/void *rmin, /*FIXME*/void *emax, /*FIXME*/void *rmax); +static float (*slamc3_)(float *a, float *b); -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc2K(JNIEnv *env, UNUSED jobject obj, - jobject beta, jobject t, jobject rnd, jobject eps, jobject emin, jobject rmin, jobject emax, jobject rmax) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +jfloat Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc3K(JNIEnv *env, UNUSED jobject obj, jfloat a, jfloat b) { + jfloat __ret = 0; + jboolean __failed = FALSE; + __ret = slamc3_(&a, &b); +done: + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); + return __ret; } +// static void (*slamc4_)(int *emin, float *start, int *base); -// static void (*slamc4_)(/*FIXME*/void *emin, float *start, int *base); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc4K(JNIEnv *env, UNUSED jobject obj, - jobject emin, jfloat start, jint base) { +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc4K(JNIEnv *env, UNUSED jobject obj, UNUSED jobject emin, UNUSED jfloat start, UNUSED jint base) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } +// static void (*slamc5_)(int *beta, int *p, int *emin, int *ieee, int *emax, float *rmax); -// static void (*slamc5_)(int *beta, int *p, int *emin, int *ieee, /*FIXME*/void *emax, /*FIXME*/void *rmax); - -void Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc5K(JNIEnv *env, UNUSED jobject obj, - jint beta, jint p, jint emin, jboolean ieee, jobject emax, jobject rmax) { +void Java_dev_ludovic_netlib_lapack_JNILAPACK_slamc5K(JNIEnv *env, UNUSED jobject obj, UNUSED jint beta, UNUSED jint p, UNUSED jint emin, UNUSED jboolean ieee, UNUSED jobject emax, UNUSED jobject rmax) { (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } diff --git a/pom.xml b/pom.xml index 779d0665..0cbe2dcf 100644 --- a/pom.xml +++ b/pom.xml @@ -242,7 +242,7 @@ information or have any questions. - + @@ -252,7 +252,7 @@ information or have any questions. - + From 9c29b6d7fea043ebd2675ad250329fe08163c8a7 Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Sun, 2 May 2021 12:27:36 +0200 Subject: [PATCH 34/42] Generate the totality of jni.c for BLAS, ARPACK, and LAPACK It makes it much much easier to manager --- arpack/src/main/native/jni.c | 2287 +++++++++-------- .../dev/ludovic/netlib/blas/AbstractBLAS.java | 6 +- .../java/dev/ludovic/netlib/blas/F2jBLAS.java | 6 +- .../netlib/blas/ForeignLinkerBLAS.java | 4 +- .../dev/ludovic/netlib/blas/Java8BLAS.java | 6 +- blas/src/main/native/jni.c | 1621 ++++++------ generator.py | 1982 +++++++------- lapack/src/main/native/jni.c | 1483 +++++------ 8 files changed, 3822 insertions(+), 3573 deletions(-) diff --git a/arpack/src/main/native/jni.c b/arpack/src/main/native/jni.c index 585a48ef..65232011 100644 --- a/arpack/src/main/native/jni.c +++ b/arpack/src/main/native/jni.c @@ -40,1569 +40,1659 @@ static jfieldID floatW_val_fieldID; static jfieldID doubleW_val_fieldID; static jfieldID StringW_val_fieldID; -static void *arpack; - -static void throwOOM(JNIEnv *env) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); -} - static void (*dmout_)(int *lout, int *m, int *n, double *a, int *lda, int *idigit, const char *ifmt); void Java_dev_ludovic_netlib_arpack_JNIARPACK_dmoutK(JNIEnv *env, UNUSED jobject obj, jint lout, jint m, jint n, jdoubleArray a, jint offseta, jint lda, jint idigit, jstring ifmt) { - jboolean failed = FALSE; - const char *__nifmt = NULL; double *__na = NULL; - if (!(__nifmt = (*env)->GetStringUTFChars(env, ifmt, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nifmt = NULL; + double *__na = NULL; + if (!(__nifmt = (*env)->GetStringUTFChars(env, ifmt, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } dmout_(&lout, &m, &n, __na + offseta, &lda, &idigit, __nifmt); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); if (__nifmt) (*env)->ReleaseStringUTFChars(env, ifmt, __nifmt); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*smout_)(int *lout, int *m, int *n, float *a, int *lda, int *idigit, const char *ifmt); void Java_dev_ludovic_netlib_arpack_JNIARPACK_smoutK(JNIEnv *env, UNUSED jobject obj, jint lout, jint m, jint n, jfloatArray a, jint offseta, jint lda, jint idigit, jstring ifmt) { - jboolean failed = FALSE; - const char *__nifmt = NULL; float *__na = NULL; - if (!(__nifmt = (*env)->GetStringUTFChars(env, ifmt, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nifmt = NULL; + float *__na = NULL; + if (!(__nifmt = (*env)->GetStringUTFChars(env, ifmt, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } smout_(&lout, &m, &n, __na + offseta, &lda, &idigit, __nifmt); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); if (__nifmt) (*env)->ReleaseStringUTFChars(env, ifmt, __nifmt); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dvout_)(int *lout, int *n, double *sx, int *idigit, const char *ifmt); void Java_dev_ludovic_netlib_arpack_JNIARPACK_dvoutK(JNIEnv *env, UNUSED jobject obj, jint lout, jint n, jdoubleArray sx, jint offsetsx, jint idigit, jstring ifmt) { - jboolean failed = FALSE; - const char *__nifmt = NULL; double *__nsx = NULL; - if (!(__nifmt = (*env)->GetStringUTFChars(env, ifmt, NULL))) goto fail; - if (!(__nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nifmt = NULL; + double *__nsx = NULL; + if (!(__nifmt = (*env)->GetStringUTFChars(env, ifmt, NULL))) { __failed = TRUE; goto done; } + if (!(__nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) { __failed = TRUE; goto done; } dvout_(&lout, &n, __nsx + offsetsx, &idigit, __nifmt); done: - if (__nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, __nsx, failed ? JNI_ABORT : 0); + if (__nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, __nsx, __failed ? JNI_ABORT : 0); if (__nifmt) (*env)->ReleaseStringUTFChars(env, ifmt, __nifmt); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*svout_)(int *lout, int *n, float *sx, int *idigit, const char *ifmt); void Java_dev_ludovic_netlib_arpack_JNIARPACK_svoutK(JNIEnv *env, UNUSED jobject obj, jint lout, jint n, jfloatArray sx, jint offsetsx, jint idigit, jstring ifmt) { - jboolean failed = FALSE; - const char *__nifmt = NULL; float *__nsx = NULL; - if (!(__nifmt = (*env)->GetStringUTFChars(env, ifmt, NULL))) goto fail; - if (!(__nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nifmt = NULL; + float *__nsx = NULL; + if (!(__nifmt = (*env)->GetStringUTFChars(env, ifmt, NULL))) { __failed = TRUE; goto done; } + if (!(__nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) { __failed = TRUE; goto done; } svout_(&lout, &n, __nsx + offsetsx, &idigit, __nifmt); done: - if (__nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, __nsx, failed ? JNI_ABORT : 0); + if (__nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, __nsx, __failed ? JNI_ABORT : 0); if (__nifmt) (*env)->ReleaseStringUTFChars(env, ifmt, __nifmt); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ivout_)(int *lout, int *n, int *ix, int *idigit, const char *ifmt); void Java_dev_ludovic_netlib_arpack_JNIARPACK_ivoutK(JNIEnv *env, UNUSED jobject obj, jint lout, jint n, jintArray ix, jint offsetix, jint idigit, jstring ifmt) { - jboolean failed = FALSE; - const char *__nifmt = NULL; int *__nix = NULL; - if (!(__nifmt = (*env)->GetStringUTFChars(env, ifmt, NULL))) goto fail; - if (!(__nix = (*env)->GetPrimitiveArrayCritical(env, ix, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nifmt = NULL; + int *__nix = NULL; + if (!(__nifmt = (*env)->GetStringUTFChars(env, ifmt, NULL))) { __failed = TRUE; goto done; } + if (!(__nix = (*env)->GetPrimitiveArrayCritical(env, ix, NULL))) { __failed = TRUE; goto done; } ivout_(&lout, &n, __nix + offsetix, &idigit, __nifmt); done: - if (__nix) (*env)->ReleasePrimitiveArrayCritical(env, ix, __nix, failed ? JNI_ABORT : 0); + if (__nix) (*env)->ReleasePrimitiveArrayCritical(env, ix, __nix, __failed ? JNI_ABORT : 0); if (__nifmt) (*env)->ReleaseStringUTFChars(env, ifmt, __nifmt); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgetv0_)(int *ido, const char *bmat, int *itry, int *initv, int *n, int *j, double *v, int *ldv, double *resid, double *rnorm, int *ipntr, double *workd, int *ierr); void Java_dev_ludovic_netlib_arpack_JNIARPACK_dgetv0K(JNIEnv *env, UNUSED jobject obj, jobject ido, jstring bmat, jint itry, jboolean initv, jint n, jint j, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray resid, jint offsetresid, jobject rnorm, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jobject ierr) { - jboolean failed = FALSE; - int __nido = 0; const char *__nbmat = NULL; int __ninitv; double __nrnorm = 0; int __nierr = 0; double *__nv = NULL; double *__nresid = NULL; int *__nipntr = NULL; double *__nworkd = NULL; + jboolean __failed = FALSE; + int __nido = 0; + const char *__nbmat = NULL; + int __ninitv; + double __nrnorm = 0; + int __nierr = 0; + double *__nv = NULL; + double *__nresid = NULL; + int *__nipntr = NULL; + double *__nworkd = NULL; __nido = (*env)->GetIntField(env, ido, intW_val_fieldID); - if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) { __failed = TRUE; goto done; } __ninitv = initv; __nrnorm = (*env)->GetDoubleField(env, rnorm, doubleW_val_fieldID); __nierr = (*env)->GetIntField(env, ierr, intW_val_fieldID); - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; - if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; - if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) { __failed = TRUE; goto done; } + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) { __failed = TRUE; goto done; } dgetv0_(&__nido, __nbmat, &itry, &__ninitv, &n, &j, __nv + offsetv, &ldv, __nresid + offsetresid, &__nrnorm, __nipntr + offsetipntr, __nworkd + offsetworkd, &__nierr); done: - if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); - if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); - if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, ierr, intW_val_fieldID, __nierr); - if (!failed) (*env)->SetDoubleField(env, rnorm, doubleW_val_fieldID, __nrnorm); - if (!failed) initv = __ninitv; + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, __failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, __failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, ierr, intW_val_fieldID, __nierr); + if (!__failed) (*env)->SetDoubleField(env, rnorm, doubleW_val_fieldID, __nrnorm); + if (!__failed) initv = __ninitv; if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); - if (!failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgetv0_)(int *ido, const char *bmat, int *itry, int *initv, int *n, int *j, float *v, int *ldv, float *resid, float *rnorm, int *ipntr, float *workd, int *ierr); void Java_dev_ludovic_netlib_arpack_JNIARPACK_sgetv0K(JNIEnv *env, UNUSED jobject obj, jobject ido, jstring bmat, jint itry, jboolean initv, jint n, jint j, jfloatArray v, jint offsetv, jint ldv, jfloatArray resid, jint offsetresid, jobject rnorm, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jobject ierr) { - jboolean failed = FALSE; - int __nido = 0; const char *__nbmat = NULL; int __ninitv; float __nrnorm = 0; int __nierr = 0; float *__nv = NULL; float *__nresid = NULL; int *__nipntr = NULL; float *__nworkd = NULL; + jboolean __failed = FALSE; + int __nido = 0; + const char *__nbmat = NULL; + int __ninitv; + float __nrnorm = 0; + int __nierr = 0; + float *__nv = NULL; + float *__nresid = NULL; + int *__nipntr = NULL; + float *__nworkd = NULL; __nido = (*env)->GetIntField(env, ido, intW_val_fieldID); - if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) { __failed = TRUE; goto done; } __ninitv = initv; __nrnorm = (*env)->GetFloatField(env, rnorm, floatW_val_fieldID); __nierr = (*env)->GetIntField(env, ierr, intW_val_fieldID); - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; - if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; - if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) { __failed = TRUE; goto done; } + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) { __failed = TRUE; goto done; } sgetv0_(&__nido, __nbmat, &itry, &__ninitv, &n, &j, __nv + offsetv, &ldv, __nresid + offsetresid, &__nrnorm, __nipntr + offsetipntr, __nworkd + offsetworkd, &__nierr); done: - if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); - if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); - if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, ierr, intW_val_fieldID, __nierr); - if (!failed) (*env)->SetFloatField(env, rnorm, floatW_val_fieldID, __nrnorm); - if (!failed) initv = __ninitv; + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, __failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, __failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, ierr, intW_val_fieldID, __nierr); + if (!__failed) (*env)->SetFloatField(env, rnorm, floatW_val_fieldID, __nrnorm); + if (!__failed) initv = __ninitv; if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); - if (!failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); +} + +// static void (*dlaqrb_)(int *wantt, int *n, int *ilo, int *ihi, double *h, int *ldh, double *wr, double *wi, double *z, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_dlaqrbK(JNIEnv *env, UNUSED jobject obj, UNUSED jboolean wantt, UNUSED jint n, UNUSED jint ilo, UNUSED jint ihi, UNUSED jdoubleArray h, UNUSED jint offseth, UNUSED jint ldh, UNUSED jdoubleArray wr, UNUSED jint offsetwr, UNUSED jdoubleArray wi, UNUSED jint offsetwi, UNUSED jdoubleArray z, UNUSED jint offsetz, UNUSED jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); +} + +// static void (*slaqrb_)(int *wantt, int *n, int *ilo, int *ihi, float *h, int *ldh, float *wr, float *wi, float *z, int *info); + +void Java_dev_ludovic_netlib_arpack_JNIARPACK_slaqrbK(JNIEnv *env, UNUSED jobject obj, UNUSED jboolean wantt, UNUSED jint n, UNUSED jint ilo, UNUSED jint ihi, UNUSED jfloatArray h, UNUSED jint offseth, UNUSED jint ldh, UNUSED jfloatArray wr, UNUSED jint offsetwr, UNUSED jfloatArray wi, UNUSED jint offsetwi, UNUSED jfloatArray z, UNUSED jint offsetz, UNUSED jobject info) { + (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); } static void (*dnaitr_)(int *ido, const char *bmat, int *n, int *k, int *np, int *nb, double *resid, double *rnorm, double *v, int *ldv, double *h, int *ldh, int *ipntr, double *workd, int *info); void Java_dev_ludovic_netlib_arpack_JNIARPACK_dnaitrK(JNIEnv *env, UNUSED jobject obj, jobject ido, jstring bmat, jint n, jint k, jint np, jint nb, jdoubleArray resid, jint offsetresid, jobject rnorm, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray h, jint offseth, jint ldh, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jobject info) { - jboolean failed = FALSE; - int __nido = 0; const char *__nbmat = NULL; double __nrnorm = 0; int __ninfo = 0; double *__nresid = NULL; double *__nv = NULL; double *__nh = NULL; int *__nipntr = NULL; double *__nworkd = NULL; + jboolean __failed = FALSE; + int __nido = 0; + const char *__nbmat = NULL; + double __nrnorm = 0; + int __ninfo = 0; + double *__nresid = NULL; + double *__nv = NULL; + double *__nh = NULL; + int *__nipntr = NULL; + double *__nworkd = NULL; __nido = (*env)->GetIntField(env, ido, intW_val_fieldID); - if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) { __failed = TRUE; goto done; } __nrnorm = (*env)->GetDoubleField(env, rnorm, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; - if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) { __failed = TRUE; goto done; } dnaitr_(&__nido, __nbmat, &n, &k, &np, &nb, __nresid + offsetresid, &__nrnorm, __nv + offsetv, &ldv, __nh + offseth, &ldh, __nipntr + offsetipntr, __nworkd + offsetworkd, &__ninfo); done: - if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); - if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, rnorm, doubleW_val_fieldID, __nrnorm); + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, __failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, rnorm, doubleW_val_fieldID, __nrnorm); if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); - if (!failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*snaitr_)(int *ido, const char *bmat, int *n, int *k, int *np, int *nb, float *resid, float *rnorm, float *v, int *ldv, float *h, int *ldh, int *ipntr, float *workd, int *info); void Java_dev_ludovic_netlib_arpack_JNIARPACK_snaitrK(JNIEnv *env, UNUSED jobject obj, jobject ido, jstring bmat, jint n, jint k, jint np, jint nb, jfloatArray resid, jint offsetresid, jobject rnorm, jfloatArray v, jint offsetv, jint ldv, jfloatArray h, jint offseth, jint ldh, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jobject info) { - jboolean failed = FALSE; - int __nido = 0; const char *__nbmat = NULL; float __nrnorm = 0; int __ninfo = 0; float *__nresid = NULL; float *__nv = NULL; float *__nh = NULL; int *__nipntr = NULL; float *__nworkd = NULL; + jboolean __failed = FALSE; + int __nido = 0; + const char *__nbmat = NULL; + float __nrnorm = 0; + int __ninfo = 0; + float *__nresid = NULL; + float *__nv = NULL; + float *__nh = NULL; + int *__nipntr = NULL; + float *__nworkd = NULL; __nido = (*env)->GetIntField(env, ido, intW_val_fieldID); - if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) { __failed = TRUE; goto done; } __nrnorm = (*env)->GetFloatField(env, rnorm, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; - if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) { __failed = TRUE; goto done; } snaitr_(&__nido, __nbmat, &n, &k, &np, &nb, __nresid + offsetresid, &__nrnorm, __nv + offsetv, &ldv, __nh + offseth, &ldh, __nipntr + offsetipntr, __nworkd + offsetworkd, &__ninfo); done: - if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); - if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, rnorm, floatW_val_fieldID, __nrnorm); + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, __failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, rnorm, floatW_val_fieldID, __nrnorm); if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); - if (!failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dnapps_)(int *n, int *kev, int *np, double *shiftr, double *shifti, double *v, int *ldv, double *h, int *ldh, double *resid, double *q, int *ldq, double *workl, double *workd); void Java_dev_ludovic_netlib_arpack_JNIARPACK_dnappsK(JNIEnv *env, UNUSED jobject obj, jint n, jobject kev, jint np, jdoubleArray shiftr, jint offsetshiftr, jdoubleArray shifti, jint offsetshifti, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray h, jint offseth, jint ldh, jdoubleArray resid, jint offsetresid, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray workl, jint offsetworkl, jdoubleArray workd, jint offsetworkd) { - jboolean failed = FALSE; - int __nkev = 0; double *__nshiftr = NULL; double *__nshifti = NULL; double *__nv = NULL; double *__nh = NULL; double *__nresid = NULL; double *__nq = NULL; double *__nworkl = NULL; double *__nworkd = NULL; + jboolean __failed = FALSE; + int __nkev = 0; + double *__nshiftr = NULL; + double *__nshifti = NULL; + double *__nv = NULL; + double *__nh = NULL; + double *__nresid = NULL; + double *__nq = NULL; + double *__nworkl = NULL; + double *__nworkd = NULL; __nkev = (*env)->GetIntField(env, kev, intW_val_fieldID); - if (!(__nshiftr = (*env)->GetPrimitiveArrayCritical(env, shiftr, NULL))) goto fail; - if (!(__nshifti = (*env)->GetPrimitiveArrayCritical(env, shifti, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; - if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + if (!(__nshiftr = (*env)->GetPrimitiveArrayCritical(env, shiftr, NULL))) { __failed = TRUE; goto done; } + if (!(__nshifti = (*env)->GetPrimitiveArrayCritical(env, shifti, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) { __failed = TRUE; goto done; } dnapps_(&n, &__nkev, &np, __nshiftr + offsetshiftr, __nshifti + offsetshifti, __nv + offsetv, &ldv, __nh + offseth, &ldh, __nresid + offsetresid, __nq + offsetq, &ldq, __nworkl + offsetworkl, __nworkd + offsetworkd); done: - if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); - if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nshifti) (*env)->ReleasePrimitiveArrayCritical(env, shifti, __nshifti, failed ? JNI_ABORT : 0); - if (__nshiftr) (*env)->ReleasePrimitiveArrayCritical(env, shiftr, __nshiftr, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, kev, intW_val_fieldID, __nkev); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, __failed ? JNI_ABORT : 0); + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nshifti) (*env)->ReleasePrimitiveArrayCritical(env, shifti, __nshifti, __failed ? JNI_ABORT : 0); + if (__nshiftr) (*env)->ReleasePrimitiveArrayCritical(env, shiftr, __nshiftr, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, kev, intW_val_fieldID, __nkev); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*snapps_)(int *n, int *kev, int *np, float *shiftr, float *shifti, float *v, int *ldv, float *h, int *ldh, float *resid, float *q, int *ldq, float *workl, float *workd); void Java_dev_ludovic_netlib_arpack_JNIARPACK_snappsK(JNIEnv *env, UNUSED jobject obj, jint n, jobject kev, jint np, jfloatArray shiftr, jint offsetshiftr, jfloatArray shifti, jint offsetshifti, jfloatArray v, jint offsetv, jint ldv, jfloatArray h, jint offseth, jint ldh, jfloatArray resid, jint offsetresid, jfloatArray q, jint offsetq, jint ldq, jfloatArray workl, jint offsetworkl, jfloatArray workd, jint offsetworkd) { - jboolean failed = FALSE; - int __nkev = 0; float *__nshiftr = NULL; float *__nshifti = NULL; float *__nv = NULL; float *__nh = NULL; float *__nresid = NULL; float *__nq = NULL; float *__nworkl = NULL; float *__nworkd = NULL; + jboolean __failed = FALSE; + int __nkev = 0; + float *__nshiftr = NULL; + float *__nshifti = NULL; + float *__nv = NULL; + float *__nh = NULL; + float *__nresid = NULL; + float *__nq = NULL; + float *__nworkl = NULL; + float *__nworkd = NULL; __nkev = (*env)->GetIntField(env, kev, intW_val_fieldID); - if (!(__nshiftr = (*env)->GetPrimitiveArrayCritical(env, shiftr, NULL))) goto fail; - if (!(__nshifti = (*env)->GetPrimitiveArrayCritical(env, shifti, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; - if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + if (!(__nshiftr = (*env)->GetPrimitiveArrayCritical(env, shiftr, NULL))) { __failed = TRUE; goto done; } + if (!(__nshifti = (*env)->GetPrimitiveArrayCritical(env, shifti, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) { __failed = TRUE; goto done; } snapps_(&n, &__nkev, &np, __nshiftr + offsetshiftr, __nshifti + offsetshifti, __nv + offsetv, &ldv, __nh + offseth, &ldh, __nresid + offsetresid, __nq + offsetq, &ldq, __nworkl + offsetworkl, __nworkd + offsetworkd); done: - if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); - if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nshifti) (*env)->ReleasePrimitiveArrayCritical(env, shifti, __nshifti, failed ? JNI_ABORT : 0); - if (__nshiftr) (*env)->ReleasePrimitiveArrayCritical(env, shiftr, __nshiftr, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, kev, intW_val_fieldID, __nkev); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, __failed ? JNI_ABORT : 0); + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nshifti) (*env)->ReleasePrimitiveArrayCritical(env, shifti, __nshifti, __failed ? JNI_ABORT : 0); + if (__nshiftr) (*env)->ReleasePrimitiveArrayCritical(env, shiftr, __nshiftr, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, kev, intW_val_fieldID, __nkev); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dnaup2_)(int *ido, const char *bmat, int *n, const char *which, int *nev, int *np, double *tol, double *resid, int *mode, int *iupd, int *ishift, int *mxiter, double *v, int *ldv, double *h, int *ldh, double *ritzr, double *ritzi, double *bounds, double *q, int *ldq, double *workl, int *ipntr, double *workd, int *info); void Java_dev_ludovic_netlib_arpack_JNIARPACK_dnaup2K(JNIEnv *env, UNUSED jobject obj, jobject ido, jstring bmat, jint n, jstring which, jobject nev, jobject np, jdouble tol, jdoubleArray resid, jint offsetresid, jint mode, jint iupd, jint ishift, jobject mxiter, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray h, jint offseth, jint ldh, jdoubleArray ritzr, jint offsetritzr, jdoubleArray ritzi, jint offsetritzi, jdoubleArray bounds, jint offsetbounds, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray workl, jint offsetworkl, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jobject info) { - jboolean failed = FALSE; - int __nido = 0; const char *__nbmat = NULL; const char *__nwhich = NULL; int __nnev = 0; int __nnp = 0; int __nmxiter = 0; int __ninfo = 0; double *__nresid = NULL; double *__nv = NULL; double *__nh = NULL; double *__nritzr = NULL; double *__nritzi = NULL; double *__nbounds = NULL; double *__nq = NULL; double *__nworkl = NULL; int *__nipntr = NULL; double *__nworkd = NULL; + jboolean __failed = FALSE; + int __nido = 0; + const char *__nbmat = NULL; + const char *__nwhich = NULL; + int __nnev = 0; + int __nnp = 0; + int __nmxiter = 0; + int __ninfo = 0; + double *__nresid = NULL; + double *__nv = NULL; + double *__nh = NULL; + double *__nritzr = NULL; + double *__nritzi = NULL; + double *__nbounds = NULL; + double *__nq = NULL; + double *__nworkl = NULL; + int *__nipntr = NULL; + double *__nworkd = NULL; __nido = (*env)->GetIntField(env, ido, intW_val_fieldID); - if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; - if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) { __failed = TRUE; goto done; } + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) { __failed = TRUE; goto done; } __nnev = (*env)->GetIntField(env, nev, intW_val_fieldID); __nnp = (*env)->GetIntField(env, np, intW_val_fieldID); __nmxiter = (*env)->GetIntField(env, mxiter, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nritzr = (*env)->GetPrimitiveArrayCritical(env, ritzr, NULL))) goto fail; - if (!(__nritzi = (*env)->GetPrimitiveArrayCritical(env, ritzi, NULL))) goto fail; - if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; - if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; - if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nritzr = (*env)->GetPrimitiveArrayCritical(env, ritzr, NULL))) { __failed = TRUE; goto done; } + if (!(__nritzi = (*env)->GetPrimitiveArrayCritical(env, ritzi, NULL))) { __failed = TRUE; goto done; } + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) { __failed = TRUE; goto done; } + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) { __failed = TRUE; goto done; } dnaup2_(&__nido, __nbmat, &n, __nwhich, &__nnev, &__nnp, &tol, __nresid + offsetresid, &mode, &iupd, &ishift, &__nmxiter, __nv + offsetv, &ldv, __nh + offseth, &ldh, __nritzr + offsetritzr, __nritzi + offsetritzi, __nbounds + offsetbounds, __nq + offsetq, &ldq, __nworkl + offsetworkl, __nipntr + offsetipntr, __nworkd + offsetworkd, &__ninfo); done: - if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); - if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); - if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); - if (__nritzi) (*env)->ReleasePrimitiveArrayCritical(env, ritzi, __nritzi, failed ? JNI_ABORT : 0); - if (__nritzr) (*env)->ReleasePrimitiveArrayCritical(env, ritzr, __nritzr, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, mxiter, intW_val_fieldID, __nmxiter); - if (!failed) (*env)->SetIntField(env, np, intW_val_fieldID, __nnp); - if (!failed) (*env)->SetIntField(env, nev, intW_val_fieldID, __nnev); + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, __failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, __failed ? JNI_ABORT : 0); + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, __failed ? JNI_ABORT : 0); + if (__nritzi) (*env)->ReleasePrimitiveArrayCritical(env, ritzi, __nritzi, __failed ? JNI_ABORT : 0); + if (__nritzr) (*env)->ReleasePrimitiveArrayCritical(env, ritzr, __nritzr, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, mxiter, intW_val_fieldID, __nmxiter); + if (!__failed) (*env)->SetIntField(env, np, intW_val_fieldID, __nnp); + if (!__failed) (*env)->SetIntField(env, nev, intW_val_fieldID, __nnev); if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); - if (!failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*snaup2_)(int *ido, const char *bmat, int *n, const char *which, int *nev, int *np, float *tol, float *resid, int *mode, int *iupd, int *ishift, int *mxiter, float *v, int *ldv, float *h, int *ldh, float *ritzr, float *ritzi, float *bounds, float *q, int *ldq, float *workl, int *ipntr, float *workd, int *info); void Java_dev_ludovic_netlib_arpack_JNIARPACK_snaup2K(JNIEnv *env, UNUSED jobject obj, jobject ido, jstring bmat, jint n, jstring which, jobject nev, jobject np, jfloat tol, jfloatArray resid, jint offsetresid, jint mode, jint iupd, jint ishift, jobject mxiter, jfloatArray v, jint offsetv, jint ldv, jfloatArray h, jint offseth, jint ldh, jfloatArray ritzr, jint offsetritzr, jfloatArray ritzi, jint offsetritzi, jfloatArray bounds, jint offsetbounds, jfloatArray q, jint offsetq, jint ldq, jfloatArray workl, jint offsetworkl, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jobject info) { - jboolean failed = FALSE; - int __nido = 0; const char *__nbmat = NULL; const char *__nwhich = NULL; int __nnev = 0; int __nnp = 0; int __nmxiter = 0; int __ninfo = 0; float *__nresid = NULL; float *__nv = NULL; float *__nh = NULL; float *__nritzr = NULL; float *__nritzi = NULL; float *__nbounds = NULL; float *__nq = NULL; float *__nworkl = NULL; int *__nipntr = NULL; float *__nworkd = NULL; + jboolean __failed = FALSE; + int __nido = 0; + const char *__nbmat = NULL; + const char *__nwhich = NULL; + int __nnev = 0; + int __nnp = 0; + int __nmxiter = 0; + int __ninfo = 0; + float *__nresid = NULL; + float *__nv = NULL; + float *__nh = NULL; + float *__nritzr = NULL; + float *__nritzi = NULL; + float *__nbounds = NULL; + float *__nq = NULL; + float *__nworkl = NULL; + int *__nipntr = NULL; + float *__nworkd = NULL; __nido = (*env)->GetIntField(env, ido, intW_val_fieldID); - if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; - if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) { __failed = TRUE; goto done; } + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) { __failed = TRUE; goto done; } __nnev = (*env)->GetIntField(env, nev, intW_val_fieldID); __nnp = (*env)->GetIntField(env, np, intW_val_fieldID); __nmxiter = (*env)->GetIntField(env, mxiter, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nritzr = (*env)->GetPrimitiveArrayCritical(env, ritzr, NULL))) goto fail; - if (!(__nritzi = (*env)->GetPrimitiveArrayCritical(env, ritzi, NULL))) goto fail; - if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; - if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; - if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nritzr = (*env)->GetPrimitiveArrayCritical(env, ritzr, NULL))) { __failed = TRUE; goto done; } + if (!(__nritzi = (*env)->GetPrimitiveArrayCritical(env, ritzi, NULL))) { __failed = TRUE; goto done; } + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) { __failed = TRUE; goto done; } + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) { __failed = TRUE; goto done; } snaup2_(&__nido, __nbmat, &n, __nwhich, &__nnev, &__nnp, &tol, __nresid + offsetresid, &mode, &iupd, &ishift, &__nmxiter, __nv + offsetv, &ldv, __nh + offseth, &ldh, __nritzr + offsetritzr, __nritzi + offsetritzi, __nbounds + offsetbounds, __nq + offsetq, &ldq, __nworkl + offsetworkl, __nipntr + offsetipntr, __nworkd + offsetworkd, &__ninfo); done: - if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); - if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); - if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); - if (__nritzi) (*env)->ReleasePrimitiveArrayCritical(env, ritzi, __nritzi, failed ? JNI_ABORT : 0); - if (__nritzr) (*env)->ReleasePrimitiveArrayCritical(env, ritzr, __nritzr, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, mxiter, intW_val_fieldID, __nmxiter); - if (!failed) (*env)->SetIntField(env, np, intW_val_fieldID, __nnp); - if (!failed) (*env)->SetIntField(env, nev, intW_val_fieldID, __nnev); + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, __failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, __failed ? JNI_ABORT : 0); + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, __failed ? JNI_ABORT : 0); + if (__nritzi) (*env)->ReleasePrimitiveArrayCritical(env, ritzi, __nritzi, __failed ? JNI_ABORT : 0); + if (__nritzr) (*env)->ReleasePrimitiveArrayCritical(env, ritzr, __nritzr, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, mxiter, intW_val_fieldID, __nmxiter); + if (!__failed) (*env)->SetIntField(env, np, intW_val_fieldID, __nnp); + if (!__failed) (*env)->SetIntField(env, nev, intW_val_fieldID, __nnev); if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); - if (!failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dnaupd_)(int *ido, const char *bmat, int *n, const char *which, int *nev, double *tol, double *resid, int *ncv, double *v, int *ldv, int *iparam, int *ipntr, double *workd, double *workl, int *lworkl, int *info); void Java_dev_ludovic_netlib_arpack_JNIARPACK_dnaupdK(JNIEnv *env, UNUSED jobject obj, jobject ido, jstring bmat, jint n, jstring which, jint nev, jobject tol, jdoubleArray resid, jint offsetresid, jint ncv, jdoubleArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jdoubleArray workl, jint offsetworkl, jint lworkl, jobject info) { - jboolean failed = FALSE; - int __nido = 0; const char *__nbmat = NULL; const char *__nwhich = NULL; double __ntol = 0; int __ninfo = 0; double *__nresid = NULL; double *__nv = NULL; int *__niparam = NULL; int *__nipntr = NULL; double *__nworkd = NULL; double *__nworkl = NULL; + jboolean __failed = FALSE; + int __nido = 0; + const char *__nbmat = NULL; + const char *__nwhich = NULL; + double __ntol = 0; + int __ninfo = 0; + double *__nresid = NULL; + double *__nv = NULL; + int *__niparam = NULL; + int *__nipntr = NULL; + double *__nworkd = NULL; + double *__nworkl = NULL; __nido = (*env)->GetIntField(env, ido, intW_val_fieldID); - if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; - if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) { __failed = TRUE; goto done; } + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) { __failed = TRUE; goto done; } __ntol = (*env)->GetDoubleField(env, tol, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__niparam = (*env)->GetPrimitiveArrayCritical(env, iparam, NULL))) goto fail; - if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; - if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; - if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__niparam = (*env)->GetPrimitiveArrayCritical(env, iparam, NULL))) { __failed = TRUE; goto done; } + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) { __failed = TRUE; goto done; } dnaupd_(&__nido, __nbmat, &n, __nwhich, &nev, &__ntol, __nresid + offsetresid, &ncv, __nv + offsetv, &ldv, __niparam + offsetiparam, __nipntr + offsetipntr, __nworkd + offsetworkd, __nworkl + offsetworkl, &lworkl, &__ninfo); done: - if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); - if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); - if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); - if (__niparam) (*env)->ReleasePrimitiveArrayCritical(env, iparam, __niparam, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, tol, doubleW_val_fieldID, __ntol); + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, __failed ? JNI_ABORT : 0); + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, __failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, __failed ? JNI_ABORT : 0); + if (__niparam) (*env)->ReleasePrimitiveArrayCritical(env, iparam, __niparam, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, tol, doubleW_val_fieldID, __ntol); if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); - if (!failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*snaupd_)(int *ido, const char *bmat, int *n, const char *which, int *nev, float *tol, float *resid, int *ncv, float *v, int *ldv, int *iparam, int *ipntr, float *workd, float *workl, int *lworkl, int *info); void Java_dev_ludovic_netlib_arpack_JNIARPACK_snaupdK(JNIEnv *env, UNUSED jobject obj, jobject ido, jstring bmat, jint n, jstring which, jint nev, jobject tol, jfloatArray resid, jint offsetresid, jint ncv, jfloatArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jfloatArray workl, jint offsetworkl, jint lworkl, jobject info) { - jboolean failed = FALSE; - int __nido = 0; const char *__nbmat = NULL; const char *__nwhich = NULL; float __ntol = 0; int __ninfo = 0; float *__nresid = NULL; float *__nv = NULL; int *__niparam = NULL; int *__nipntr = NULL; float *__nworkd = NULL; float *__nworkl = NULL; + jboolean __failed = FALSE; + int __nido = 0; + const char *__nbmat = NULL; + const char *__nwhich = NULL; + float __ntol = 0; + int __ninfo = 0; + float *__nresid = NULL; + float *__nv = NULL; + int *__niparam = NULL; + int *__nipntr = NULL; + float *__nworkd = NULL; + float *__nworkl = NULL; __nido = (*env)->GetIntField(env, ido, intW_val_fieldID); - if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; - if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) { __failed = TRUE; goto done; } + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) { __failed = TRUE; goto done; } __ntol = (*env)->GetFloatField(env, tol, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__niparam = (*env)->GetPrimitiveArrayCritical(env, iparam, NULL))) goto fail; - if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; - if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; - if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__niparam = (*env)->GetPrimitiveArrayCritical(env, iparam, NULL))) { __failed = TRUE; goto done; } + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) { __failed = TRUE; goto done; } snaupd_(&__nido, __nbmat, &n, __nwhich, &nev, &__ntol, __nresid + offsetresid, &ncv, __nv + offsetv, &ldv, __niparam + offsetiparam, __nipntr + offsetipntr, __nworkd + offsetworkd, __nworkl + offsetworkl, &lworkl, &__ninfo); done: - if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); - if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); - if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); - if (__niparam) (*env)->ReleasePrimitiveArrayCritical(env, iparam, __niparam, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, tol, floatW_val_fieldID, __ntol); + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, __failed ? JNI_ABORT : 0); + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, __failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, __failed ? JNI_ABORT : 0); + if (__niparam) (*env)->ReleasePrimitiveArrayCritical(env, iparam, __niparam, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, tol, floatW_val_fieldID, __ntol); if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); - if (!failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dnconv_)(int *n, double *ritzr, double *ritzi, double *bounds, double *tol, int *nconv); void Java_dev_ludovic_netlib_arpack_JNIARPACK_dnconvK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray ritzr, jint offsetritzr, jdoubleArray ritzi, jint offsetritzi, jdoubleArray bounds, jint offsetbounds, jdouble tol, jobject nconv) { - jboolean failed = FALSE; - int __nnconv = 0; double *__nritzr = NULL; double *__nritzi = NULL; double *__nbounds = NULL; + jboolean __failed = FALSE; + int __nnconv = 0; + double *__nritzr = NULL; + double *__nritzi = NULL; + double *__nbounds = NULL; __nnconv = (*env)->GetIntField(env, nconv, intW_val_fieldID); - if (!(__nritzr = (*env)->GetPrimitiveArrayCritical(env, ritzr, NULL))) goto fail; - if (!(__nritzi = (*env)->GetPrimitiveArrayCritical(env, ritzi, NULL))) goto fail; - if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; + if (!(__nritzr = (*env)->GetPrimitiveArrayCritical(env, ritzr, NULL))) { __failed = TRUE; goto done; } + if (!(__nritzi = (*env)->GetPrimitiveArrayCritical(env, ritzi, NULL))) { __failed = TRUE; goto done; } + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) { __failed = TRUE; goto done; } dnconv_(&n, __nritzr + offsetritzr, __nritzi + offsetritzi, __nbounds + offsetbounds, &tol, &__nnconv); done: - if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); - if (__nritzi) (*env)->ReleasePrimitiveArrayCritical(env, ritzi, __nritzi, failed ? JNI_ABORT : 0); - if (__nritzr) (*env)->ReleasePrimitiveArrayCritical(env, ritzr, __nritzr, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, nconv, intW_val_fieldID, __nnconv); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, __failed ? JNI_ABORT : 0); + if (__nritzi) (*env)->ReleasePrimitiveArrayCritical(env, ritzi, __nritzi, __failed ? JNI_ABORT : 0); + if (__nritzr) (*env)->ReleasePrimitiveArrayCritical(env, ritzr, __nritzr, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, nconv, intW_val_fieldID, __nnconv); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*snconv_)(int *n, float *ritzr, float *ritzi, float *bounds, float *tol, int *nconv); void Java_dev_ludovic_netlib_arpack_JNIARPACK_snconvK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray ritzr, jint offsetritzr, jfloatArray ritzi, jint offsetritzi, jfloatArray bounds, jint offsetbounds, jfloat tol, jobject nconv) { - jboolean failed = FALSE; - int __nnconv = 0; float *__nritzr = NULL; float *__nritzi = NULL; float *__nbounds = NULL; + jboolean __failed = FALSE; + int __nnconv = 0; + float *__nritzr = NULL; + float *__nritzi = NULL; + float *__nbounds = NULL; __nnconv = (*env)->GetIntField(env, nconv, intW_val_fieldID); - if (!(__nritzr = (*env)->GetPrimitiveArrayCritical(env, ritzr, NULL))) goto fail; - if (!(__nritzi = (*env)->GetPrimitiveArrayCritical(env, ritzi, NULL))) goto fail; - if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; + if (!(__nritzr = (*env)->GetPrimitiveArrayCritical(env, ritzr, NULL))) { __failed = TRUE; goto done; } + if (!(__nritzi = (*env)->GetPrimitiveArrayCritical(env, ritzi, NULL))) { __failed = TRUE; goto done; } + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) { __failed = TRUE; goto done; } snconv_(&n, __nritzr + offsetritzr, __nritzi + offsetritzi, __nbounds + offsetbounds, &tol, &__nnconv); done: - if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); - if (__nritzi) (*env)->ReleasePrimitiveArrayCritical(env, ritzi, __nritzi, failed ? JNI_ABORT : 0); - if (__nritzr) (*env)->ReleasePrimitiveArrayCritical(env, ritzr, __nritzr, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, nconv, intW_val_fieldID, __nnconv); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, __failed ? JNI_ABORT : 0); + if (__nritzi) (*env)->ReleasePrimitiveArrayCritical(env, ritzi, __nritzi, __failed ? JNI_ABORT : 0); + if (__nritzr) (*env)->ReleasePrimitiveArrayCritical(env, ritzr, __nritzr, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, nconv, intW_val_fieldID, __nnconv); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsconv_)(int *n, double *ritz, double *bounds, double *tol, int *nconv); void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsconvK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray ritz, jint offsetritz, jdoubleArray bounds, jint offsetbounds, jdouble tol, jobject nconv) { - jboolean failed = FALSE; - int __nnconv = 0; double *__nritz = NULL; double *__nbounds = NULL; + jboolean __failed = FALSE; + int __nnconv = 0; + double *__nritz = NULL; + double *__nbounds = NULL; __nnconv = (*env)->GetIntField(env, nconv, intW_val_fieldID); - if (!(__nritz = (*env)->GetPrimitiveArrayCritical(env, ritz, NULL))) goto fail; - if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; + if (!(__nritz = (*env)->GetPrimitiveArrayCritical(env, ritz, NULL))) { __failed = TRUE; goto done; } + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) { __failed = TRUE; goto done; } dsconv_(&n, __nritz + offsetritz, __nbounds + offsetbounds, &tol, &__nnconv); done: - if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); - if (__nritz) (*env)->ReleasePrimitiveArrayCritical(env, ritz, __nritz, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, nconv, intW_val_fieldID, __nnconv); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, __failed ? JNI_ABORT : 0); + if (__nritz) (*env)->ReleasePrimitiveArrayCritical(env, ritz, __nritz, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, nconv, intW_val_fieldID, __nnconv); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssconv_)(int *n, float *ritz, float *bounds, float *tol, int *nconv); void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssconvK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray ritz, jint offsetritz, jfloatArray bounds, jint offsetbounds, jfloat tol, jobject nconv) { - jboolean failed = FALSE; - int __nnconv = 0; float *__nritz = NULL; float *__nbounds = NULL; + jboolean __failed = FALSE; + int __nnconv = 0; + float *__nritz = NULL; + float *__nbounds = NULL; __nnconv = (*env)->GetIntField(env, nconv, intW_val_fieldID); - if (!(__nritz = (*env)->GetPrimitiveArrayCritical(env, ritz, NULL))) goto fail; - if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; + if (!(__nritz = (*env)->GetPrimitiveArrayCritical(env, ritz, NULL))) { __failed = TRUE; goto done; } + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) { __failed = TRUE; goto done; } ssconv_(&n, __nritz + offsetritz, __nbounds + offsetbounds, &tol, &__nnconv); done: - if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); - if (__nritz) (*env)->ReleasePrimitiveArrayCritical(env, ritz, __nritz, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, nconv, intW_val_fieldID, __nnconv); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, __failed ? JNI_ABORT : 0); + if (__nritz) (*env)->ReleasePrimitiveArrayCritical(env, ritz, __nritz, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, nconv, intW_val_fieldID, __nnconv); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dneigh_)(double *rnorm, int *n, double *h, int *ldh, double *ritzr, double *ritzi, double *bounds, double *q, int *ldq, double *workl, int *ierr); void Java_dev_ludovic_netlib_arpack_JNIARPACK_dneighK(JNIEnv *env, UNUSED jobject obj, jdouble rnorm, jobject n, jdoubleArray h, jint offseth, jint ldh, jdoubleArray ritzr, jint offsetritzr, jdoubleArray ritzi, jint offsetritzi, jdoubleArray bounds, jint offsetbounds, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray workl, jint offsetworkl, jobject ierr) { - jboolean failed = FALSE; - int __nn = 0; int __nierr = 0; double *__nh = NULL; double *__nritzr = NULL; double *__nritzi = NULL; double *__nbounds = NULL; double *__nq = NULL; double *__nworkl = NULL; + jboolean __failed = FALSE; + int __nn = 0; + int __nierr = 0; + double *__nh = NULL; + double *__nritzr = NULL; + double *__nritzi = NULL; + double *__nbounds = NULL; + double *__nq = NULL; + double *__nworkl = NULL; __nn = (*env)->GetIntField(env, n, intW_val_fieldID); __nierr = (*env)->GetIntField(env, ierr, intW_val_fieldID); - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nritzr = (*env)->GetPrimitiveArrayCritical(env, ritzr, NULL))) goto fail; - if (!(__nritzi = (*env)->GetPrimitiveArrayCritical(env, ritzi, NULL))) goto fail; - if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nritzr = (*env)->GetPrimitiveArrayCritical(env, ritzr, NULL))) { __failed = TRUE; goto done; } + if (!(__nritzi = (*env)->GetPrimitiveArrayCritical(env, ritzi, NULL))) { __failed = TRUE; goto done; } + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) { __failed = TRUE; goto done; } dneigh_(&rnorm, &__nn, __nh + offseth, &ldh, __nritzr + offsetritzr, __nritzi + offsetritzi, __nbounds + offsetbounds, __nq + offsetq, &ldq, __nworkl + offsetworkl, &__nierr); done: - if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); - if (__nritzi) (*env)->ReleasePrimitiveArrayCritical(env, ritzi, __nritzi, failed ? JNI_ABORT : 0); - if (__nritzr) (*env)->ReleasePrimitiveArrayCritical(env, ritzr, __nritzr, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, ierr, intW_val_fieldID, __nierr); - if (!failed) (*env)->SetIntField(env, n, intW_val_fieldID, __nn); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, __failed ? JNI_ABORT : 0); + if (__nritzi) (*env)->ReleasePrimitiveArrayCritical(env, ritzi, __nritzi, __failed ? JNI_ABORT : 0); + if (__nritzr) (*env)->ReleasePrimitiveArrayCritical(env, ritzr, __nritzr, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, ierr, intW_val_fieldID, __nierr); + if (!__failed) (*env)->SetIntField(env, n, intW_val_fieldID, __nn); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sneigh_)(float *rnorm, int *n, float *h, int *ldh, float *ritzr, float *ritzi, float *bounds, float *q, int *ldq, float *workl, int *ierr); void Java_dev_ludovic_netlib_arpack_JNIARPACK_sneighK(JNIEnv *env, UNUSED jobject obj, jfloat rnorm, jobject n, jfloatArray h, jint offseth, jint ldh, jfloatArray ritzr, jint offsetritzr, jfloatArray ritzi, jint offsetritzi, jfloatArray bounds, jint offsetbounds, jfloatArray q, jint offsetq, jint ldq, jfloatArray workl, jint offsetworkl, jobject ierr) { - jboolean failed = FALSE; - int __nn = 0; int __nierr = 0; float *__nh = NULL; float *__nritzr = NULL; float *__nritzi = NULL; float *__nbounds = NULL; float *__nq = NULL; float *__nworkl = NULL; + jboolean __failed = FALSE; + int __nn = 0; + int __nierr = 0; + float *__nh = NULL; + float *__nritzr = NULL; + float *__nritzi = NULL; + float *__nbounds = NULL; + float *__nq = NULL; + float *__nworkl = NULL; __nn = (*env)->GetIntField(env, n, intW_val_fieldID); __nierr = (*env)->GetIntField(env, ierr, intW_val_fieldID); - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nritzr = (*env)->GetPrimitiveArrayCritical(env, ritzr, NULL))) goto fail; - if (!(__nritzi = (*env)->GetPrimitiveArrayCritical(env, ritzi, NULL))) goto fail; - if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nritzr = (*env)->GetPrimitiveArrayCritical(env, ritzr, NULL))) { __failed = TRUE; goto done; } + if (!(__nritzi = (*env)->GetPrimitiveArrayCritical(env, ritzi, NULL))) { __failed = TRUE; goto done; } + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) { __failed = TRUE; goto done; } sneigh_(&rnorm, &__nn, __nh + offseth, &ldh, __nritzr + offsetritzr, __nritzi + offsetritzi, __nbounds + offsetbounds, __nq + offsetq, &ldq, __nworkl + offsetworkl, &__nierr); done: - if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); - if (__nritzi) (*env)->ReleasePrimitiveArrayCritical(env, ritzi, __nritzi, failed ? JNI_ABORT : 0); - if (__nritzr) (*env)->ReleasePrimitiveArrayCritical(env, ritzr, __nritzr, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, ierr, intW_val_fieldID, __nierr); - if (!failed) (*env)->SetIntField(env, n, intW_val_fieldID, __nn); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, __failed ? JNI_ABORT : 0); + if (__nritzi) (*env)->ReleasePrimitiveArrayCritical(env, ritzi, __nritzi, __failed ? JNI_ABORT : 0); + if (__nritzr) (*env)->ReleasePrimitiveArrayCritical(env, ritzr, __nritzr, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, ierr, intW_val_fieldID, __nierr); + if (!__failed) (*env)->SetIntField(env, n, intW_val_fieldID, __nn); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dneupd_)(int *rvec, const char *howmny, int *select, double *dr, double *di, double *z, int *ldz, double *sigmar, double *sigmai, double *workev, const char *bmat, int *n, const char *which, int *nev, double *tol, double *resid, int *ncv, double *v, int *ldv, int *iparam, int *ipntr, double *workd, double *workl, int *lworkl, int *info); void Java_dev_ludovic_netlib_arpack_JNIARPACK_dneupdK(JNIEnv *env, UNUSED jobject obj, jboolean rvec, jstring howmny, jbooleanArray select, jint offsetselect, jdoubleArray dr, jint offsetdr, jdoubleArray di, jint offsetdi, jdoubleArray z, jint offsetz, jint ldz, jdouble sigmar, jdouble sigmai, jdoubleArray workev, jint offsetworkev, jstring bmat, jint n, jstring which, jobject nev, jdouble tol, jdoubleArray resid, jint offsetresid, jint ncv, jdoubleArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jdoubleArray workl, jint offsetworkl, jint lworkl, jobject info) { - jboolean failed = FALSE; - int __nrvec; const char *__nhowmny = NULL; const char *__nbmat = NULL; const char *__nwhich = NULL; int __nnev = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; double *__ndr = NULL; double *__ndi = NULL; double *__nz = NULL; double *__nworkev = NULL; double *__nresid = NULL; double *__nv = NULL; int *__niparam = NULL; int *__nipntr = NULL; double *__nworkd = NULL; double *__nworkl = NULL; + jboolean __failed = FALSE; + int __nrvec; + const char *__nhowmny = NULL; + const char *__nbmat = NULL; + const char *__nwhich = NULL; + int __nnev = 0; + int __ninfo = 0; + int *__nselect = NULL; jboolean *__jselect = NULL; + double *__ndr = NULL; + double *__ndi = NULL; + double *__nz = NULL; + double *__nworkev = NULL; + double *__nresid = NULL; + double *__nv = NULL; + int *__niparam = NULL; + int *__nipntr = NULL; + double *__nworkd = NULL; + double *__nworkl = NULL; __nrvec = rvec; - if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) goto fail; - if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; - if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) { __failed = TRUE; goto done; } + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) { __failed = TRUE; goto done; } + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) { __failed = TRUE; goto done; } __nnev = (*env)->GetIntField(env, nev, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); - if (!(__ndr = (*env)->GetPrimitiveArrayCritical(env, dr, NULL))) goto fail; - if (!(__ndi = (*env)->GetPrimitiveArrayCritical(env, di, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nworkev = (*env)->GetPrimitiveArrayCritical(env, workev, NULL))) goto fail; - if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__niparam = (*env)->GetPrimitiveArrayCritical(env, iparam, NULL))) goto fail; - if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; - if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; - if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { __failed = TRUE; goto done; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) { __failed = TRUE; goto done; } if (!(__nselect = malloc(sizeof(jboolean) * length))) { __failed = TRUE; goto done; } for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__ndr = (*env)->GetPrimitiveArrayCritical(env, dr, NULL))) { __failed = TRUE; goto done; } + if (!(__ndi = (*env)->GetPrimitiveArrayCritical(env, di, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkev = (*env)->GetPrimitiveArrayCritical(env, workev, NULL))) { __failed = TRUE; goto done; } + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__niparam = (*env)->GetPrimitiveArrayCritical(env, iparam, NULL))) { __failed = TRUE; goto done; } + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) { __failed = TRUE; goto done; } dneupd_(&__nrvec, __nhowmny, __nselect + offsetselect, __ndr + offsetdr, __ndi + offsetdi, __nz + offsetz, &ldz, &sigmar, &sigmai, __nworkev + offsetworkev, __nbmat, &n, __nwhich, &__nnev, &tol, __nresid + offsetresid, &ncv, __nv + offsetv, &ldv, __niparam + offsetiparam, __nipntr + offsetipntr, __nworkd + offsetworkd, __nworkl + offsetworkl, &lworkl, &__ninfo); done: - if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); - if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); - if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); - if (__niparam) (*env)->ReleasePrimitiveArrayCritical(env, iparam, __niparam, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); - if (__nworkev) (*env)->ReleasePrimitiveArrayCritical(env, workev, __nworkev, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__ndi) (*env)->ReleasePrimitiveArrayCritical(env, di, __ndi, failed ? JNI_ABORT : 0); - if (__ndr) (*env)->ReleasePrimitiveArrayCritical(env, dr, __ndr, failed ? JNI_ABORT : 0); + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, __failed ? JNI_ABORT : 0); + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, __failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, __failed ? JNI_ABORT : 0); + if (__niparam) (*env)->ReleasePrimitiveArrayCritical(env, iparam, __niparam, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, __failed ? JNI_ABORT : 0); + if (__nworkev) (*env)->ReleasePrimitiveArrayCritical(env, workev, __nworkev, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__ndi) (*env)->ReleasePrimitiveArrayCritical(env, di, __ndi, __failed ? JNI_ABORT : 0); + if (__ndr) (*env)->ReleasePrimitiveArrayCritical(env, dr, __ndr, __failed ? JNI_ABORT : 0); if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, nev, intW_val_fieldID, __nnev); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, nev, intW_val_fieldID, __nnev); if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); if (__nhowmny) (*env)->ReleaseStringUTFChars(env, howmny, __nhowmny); - if (!failed) rvec = __nrvec; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) rvec = __nrvec; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sneupd_)(int *rvec, const char *howmny, int *select, float *dr, float *di, float *z, int *ldz, float *sigmar, float *sigmai, float *workev, const char *bmat, int *n, const char *which, int *nev, float *tol, float *resid, int *ncv, float *v, int *ldv, int *iparam, int *ipntr, float *workd, float *workl, int *lworkl, int *info); void Java_dev_ludovic_netlib_arpack_JNIARPACK_sneupdK(JNIEnv *env, UNUSED jobject obj, jboolean rvec, jstring howmny, jbooleanArray select, jint offsetselect, jfloatArray dr, jint offsetdr, jfloatArray di, jint offsetdi, jfloatArray z, jint offsetz, jint ldz, jfloat sigmar, jfloat sigmai, jfloatArray workev, jint offsetworkev, jstring bmat, jint n, jstring which, jobject nev, jfloat tol, jfloatArray resid, jint offsetresid, jint ncv, jfloatArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jfloatArray workl, jint offsetworkl, jint lworkl, jobject info) { - jboolean failed = FALSE; - int __nrvec; const char *__nhowmny = NULL; const char *__nbmat = NULL; const char *__nwhich = NULL; int __nnev = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; float *__ndr = NULL; float *__ndi = NULL; float *__nz = NULL; float *__nworkev = NULL; float *__nresid = NULL; float *__nv = NULL; int *__niparam = NULL; int *__nipntr = NULL; float *__nworkd = NULL; float *__nworkl = NULL; + jboolean __failed = FALSE; + int __nrvec; + const char *__nhowmny = NULL; + const char *__nbmat = NULL; + const char *__nwhich = NULL; + int __nnev = 0; + int __ninfo = 0; + int *__nselect = NULL; jboolean *__jselect = NULL; + float *__ndr = NULL; + float *__ndi = NULL; + float *__nz = NULL; + float *__nworkev = NULL; + float *__nresid = NULL; + float *__nv = NULL; + int *__niparam = NULL; + int *__nipntr = NULL; + float *__nworkd = NULL; + float *__nworkl = NULL; __nrvec = rvec; - if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) goto fail; - if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; - if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) { __failed = TRUE; goto done; } + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) { __failed = TRUE; goto done; } + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) { __failed = TRUE; goto done; } __nnev = (*env)->GetIntField(env, nev, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); - if (!(__ndr = (*env)->GetPrimitiveArrayCritical(env, dr, NULL))) goto fail; - if (!(__ndi = (*env)->GetPrimitiveArrayCritical(env, di, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nworkev = (*env)->GetPrimitiveArrayCritical(env, workev, NULL))) goto fail; - if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__niparam = (*env)->GetPrimitiveArrayCritical(env, iparam, NULL))) goto fail; - if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; - if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; - if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { __failed = TRUE; goto done; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) { __failed = TRUE; goto done; } if (!(__nselect = malloc(sizeof(jboolean) * length))) { __failed = TRUE; goto done; } for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__ndr = (*env)->GetPrimitiveArrayCritical(env, dr, NULL))) { __failed = TRUE; goto done; } + if (!(__ndi = (*env)->GetPrimitiveArrayCritical(env, di, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkev = (*env)->GetPrimitiveArrayCritical(env, workev, NULL))) { __failed = TRUE; goto done; } + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__niparam = (*env)->GetPrimitiveArrayCritical(env, iparam, NULL))) { __failed = TRUE; goto done; } + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) { __failed = TRUE; goto done; } sneupd_(&__nrvec, __nhowmny, __nselect + offsetselect, __ndr + offsetdr, __ndi + offsetdi, __nz + offsetz, &ldz, &sigmar, &sigmai, __nworkev + offsetworkev, __nbmat, &n, __nwhich, &__nnev, &tol, __nresid + offsetresid, &ncv, __nv + offsetv, &ldv, __niparam + offsetiparam, __nipntr + offsetipntr, __nworkd + offsetworkd, __nworkl + offsetworkl, &lworkl, &__ninfo); done: - if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); - if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); - if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); - if (__niparam) (*env)->ReleasePrimitiveArrayCritical(env, iparam, __niparam, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); - if (__nworkev) (*env)->ReleasePrimitiveArrayCritical(env, workev, __nworkev, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__ndi) (*env)->ReleasePrimitiveArrayCritical(env, di, __ndi, failed ? JNI_ABORT : 0); - if (__ndr) (*env)->ReleasePrimitiveArrayCritical(env, dr, __ndr, failed ? JNI_ABORT : 0); + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, __failed ? JNI_ABORT : 0); + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, __failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, __failed ? JNI_ABORT : 0); + if (__niparam) (*env)->ReleasePrimitiveArrayCritical(env, iparam, __niparam, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, __failed ? JNI_ABORT : 0); + if (__nworkev) (*env)->ReleasePrimitiveArrayCritical(env, workev, __nworkev, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__ndi) (*env)->ReleasePrimitiveArrayCritical(env, di, __ndi, __failed ? JNI_ABORT : 0); + if (__ndr) (*env)->ReleasePrimitiveArrayCritical(env, dr, __ndr, __failed ? JNI_ABORT : 0); if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, nev, intW_val_fieldID, __nnev); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, nev, intW_val_fieldID, __nnev); if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); if (__nhowmny) (*env)->ReleaseStringUTFChars(env, howmny, __nhowmny); - if (!failed) rvec = __nrvec; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) rvec = __nrvec; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dngets_)(int *ishift, const char *which, int *kev, int *np, double *ritzr, double *ritzi, double *bounds, double *shiftr, double *shifti); void Java_dev_ludovic_netlib_arpack_JNIARPACK_dngetsK(JNIEnv *env, UNUSED jobject obj, jint ishift, jstring which, jobject kev, jobject np, jdoubleArray ritzr, jint offsetritzr, jdoubleArray ritzi, jint offsetritzi, jdoubleArray bounds, jint offsetbounds, jdoubleArray shiftr, jint offsetshiftr, jdoubleArray shifti, jint offsetshifti) { - jboolean failed = FALSE; - const char *__nwhich = NULL; int __nkev = 0; int __nnp = 0; double *__nritzr = NULL; double *__nritzi = NULL; double *__nbounds = NULL; double *__nshiftr = NULL; double *__nshifti = NULL; - if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nwhich = NULL; + int __nkev = 0; + int __nnp = 0; + double *__nritzr = NULL; + double *__nritzi = NULL; + double *__nbounds = NULL; + double *__nshiftr = NULL; + double *__nshifti = NULL; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) { __failed = TRUE; goto done; } __nkev = (*env)->GetIntField(env, kev, intW_val_fieldID); __nnp = (*env)->GetIntField(env, np, intW_val_fieldID); - if (!(__nritzr = (*env)->GetPrimitiveArrayCritical(env, ritzr, NULL))) goto fail; - if (!(__nritzi = (*env)->GetPrimitiveArrayCritical(env, ritzi, NULL))) goto fail; - if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; - if (!(__nshiftr = (*env)->GetPrimitiveArrayCritical(env, shiftr, NULL))) goto fail; - if (!(__nshifti = (*env)->GetPrimitiveArrayCritical(env, shifti, NULL))) goto fail; + if (!(__nritzr = (*env)->GetPrimitiveArrayCritical(env, ritzr, NULL))) { __failed = TRUE; goto done; } + if (!(__nritzi = (*env)->GetPrimitiveArrayCritical(env, ritzi, NULL))) { __failed = TRUE; goto done; } + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) { __failed = TRUE; goto done; } + if (!(__nshiftr = (*env)->GetPrimitiveArrayCritical(env, shiftr, NULL))) { __failed = TRUE; goto done; } + if (!(__nshifti = (*env)->GetPrimitiveArrayCritical(env, shifti, NULL))) { __failed = TRUE; goto done; } dngets_(&ishift, __nwhich, &__nkev, &__nnp, __nritzr + offsetritzr, __nritzi + offsetritzi, __nbounds + offsetbounds, __nshiftr + offsetshiftr, __nshifti + offsetshifti); done: - if (__nshifti) (*env)->ReleasePrimitiveArrayCritical(env, shifti, __nshifti, failed ? JNI_ABORT : 0); - if (__nshiftr) (*env)->ReleasePrimitiveArrayCritical(env, shiftr, __nshiftr, failed ? JNI_ABORT : 0); - if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); - if (__nritzi) (*env)->ReleasePrimitiveArrayCritical(env, ritzi, __nritzi, failed ? JNI_ABORT : 0); - if (__nritzr) (*env)->ReleasePrimitiveArrayCritical(env, ritzr, __nritzr, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, np, intW_val_fieldID, __nnp); - if (!failed) (*env)->SetIntField(env, kev, intW_val_fieldID, __nkev); + if (__nshifti) (*env)->ReleasePrimitiveArrayCritical(env, shifti, __nshifti, __failed ? JNI_ABORT : 0); + if (__nshiftr) (*env)->ReleasePrimitiveArrayCritical(env, shiftr, __nshiftr, __failed ? JNI_ABORT : 0); + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, __failed ? JNI_ABORT : 0); + if (__nritzi) (*env)->ReleasePrimitiveArrayCritical(env, ritzi, __nritzi, __failed ? JNI_ABORT : 0); + if (__nritzr) (*env)->ReleasePrimitiveArrayCritical(env, ritzr, __nritzr, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, np, intW_val_fieldID, __nnp); + if (!__failed) (*env)->SetIntField(env, kev, intW_val_fieldID, __nkev); if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sngets_)(int *ishift, const char *which, int *kev, int *np, float *ritzr, float *ritzi, float *bounds, float *shiftr, float *shifti); void Java_dev_ludovic_netlib_arpack_JNIARPACK_sngetsK(JNIEnv *env, UNUSED jobject obj, jint ishift, jstring which, jobject kev, jobject np, jfloatArray ritzr, jint offsetritzr, jfloatArray ritzi, jint offsetritzi, jfloatArray bounds, jint offsetbounds, jfloatArray shiftr, jint offsetshiftr, jfloatArray shifti, jint offsetshifti) { - jboolean failed = FALSE; - const char *__nwhich = NULL; int __nkev = 0; int __nnp = 0; float *__nritzr = NULL; float *__nritzi = NULL; float *__nbounds = NULL; float *__nshiftr = NULL; float *__nshifti = NULL; - if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nwhich = NULL; + int __nkev = 0; + int __nnp = 0; + float *__nritzr = NULL; + float *__nritzi = NULL; + float *__nbounds = NULL; + float *__nshiftr = NULL; + float *__nshifti = NULL; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) { __failed = TRUE; goto done; } __nkev = (*env)->GetIntField(env, kev, intW_val_fieldID); __nnp = (*env)->GetIntField(env, np, intW_val_fieldID); - if (!(__nritzr = (*env)->GetPrimitiveArrayCritical(env, ritzr, NULL))) goto fail; - if (!(__nritzi = (*env)->GetPrimitiveArrayCritical(env, ritzi, NULL))) goto fail; - if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; - if (!(__nshiftr = (*env)->GetPrimitiveArrayCritical(env, shiftr, NULL))) goto fail; - if (!(__nshifti = (*env)->GetPrimitiveArrayCritical(env, shifti, NULL))) goto fail; + if (!(__nritzr = (*env)->GetPrimitiveArrayCritical(env, ritzr, NULL))) { __failed = TRUE; goto done; } + if (!(__nritzi = (*env)->GetPrimitiveArrayCritical(env, ritzi, NULL))) { __failed = TRUE; goto done; } + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) { __failed = TRUE; goto done; } + if (!(__nshiftr = (*env)->GetPrimitiveArrayCritical(env, shiftr, NULL))) { __failed = TRUE; goto done; } + if (!(__nshifti = (*env)->GetPrimitiveArrayCritical(env, shifti, NULL))) { __failed = TRUE; goto done; } sngets_(&ishift, __nwhich, &__nkev, &__nnp, __nritzr + offsetritzr, __nritzi + offsetritzi, __nbounds + offsetbounds, __nshiftr + offsetshiftr, __nshifti + offsetshifti); done: - if (__nshifti) (*env)->ReleasePrimitiveArrayCritical(env, shifti, __nshifti, failed ? JNI_ABORT : 0); - if (__nshiftr) (*env)->ReleasePrimitiveArrayCritical(env, shiftr, __nshiftr, failed ? JNI_ABORT : 0); - if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); - if (__nritzi) (*env)->ReleasePrimitiveArrayCritical(env, ritzi, __nritzi, failed ? JNI_ABORT : 0); - if (__nritzr) (*env)->ReleasePrimitiveArrayCritical(env, ritzr, __nritzr, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, np, intW_val_fieldID, __nnp); - if (!failed) (*env)->SetIntField(env, kev, intW_val_fieldID, __nkev); + if (__nshifti) (*env)->ReleasePrimitiveArrayCritical(env, shifti, __nshifti, __failed ? JNI_ABORT : 0); + if (__nshiftr) (*env)->ReleasePrimitiveArrayCritical(env, shiftr, __nshiftr, __failed ? JNI_ABORT : 0); + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, __failed ? JNI_ABORT : 0); + if (__nritzi) (*env)->ReleasePrimitiveArrayCritical(env, ritzi, __nritzi, __failed ? JNI_ABORT : 0); + if (__nritzr) (*env)->ReleasePrimitiveArrayCritical(env, ritzr, __nritzr, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, np, intW_val_fieldID, __nnp); + if (!__failed) (*env)->SetIntField(env, kev, intW_val_fieldID, __nkev); if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsaitr_)(int *ido, const char *bmat, int *n, int *k, int *np, int *mode, double *resid, double *rnorm, double *v, int *ldv, double *h, int *ldh, int *ipntr, double *workd, int *info); void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsaitrK(JNIEnv *env, UNUSED jobject obj, jobject ido, jstring bmat, jint n, jint k, jint np, jint mode, jdoubleArray resid, jint offsetresid, jobject rnorm, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray h, jint offseth, jint ldh, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jobject info) { - jboolean failed = FALSE; - int __nido = 0; const char *__nbmat = NULL; double __nrnorm = 0; int __ninfo = 0; double *__nresid = NULL; double *__nv = NULL; double *__nh = NULL; int *__nipntr = NULL; double *__nworkd = NULL; + jboolean __failed = FALSE; + int __nido = 0; + const char *__nbmat = NULL; + double __nrnorm = 0; + int __ninfo = 0; + double *__nresid = NULL; + double *__nv = NULL; + double *__nh = NULL; + int *__nipntr = NULL; + double *__nworkd = NULL; __nido = (*env)->GetIntField(env, ido, intW_val_fieldID); - if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) { __failed = TRUE; goto done; } __nrnorm = (*env)->GetDoubleField(env, rnorm, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; - if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) { __failed = TRUE; goto done; } dsaitr_(&__nido, __nbmat, &n, &k, &np, &mode, __nresid + offsetresid, &__nrnorm, __nv + offsetv, &ldv, __nh + offseth, &ldh, __nipntr + offsetipntr, __nworkd + offsetworkd, &__ninfo); done: - if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); - if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, rnorm, doubleW_val_fieldID, __nrnorm); + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, __failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, rnorm, doubleW_val_fieldID, __nrnorm); if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); - if (!failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssaitr_)(int *ido, const char *bmat, int *n, int *k, int *np, int *mode, float *resid, float *rnorm, float *v, int *ldv, float *h, int *ldh, int *ipntr, float *workd, int *info); void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssaitrK(JNIEnv *env, UNUSED jobject obj, jobject ido, jstring bmat, jint n, jint k, jint np, jint mode, jfloatArray resid, jint offsetresid, jobject rnorm, jfloatArray v, jint offsetv, jint ldv, jfloatArray h, jint offseth, jint ldh, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jobject info) { - jboolean failed = FALSE; - int __nido = 0; const char *__nbmat = NULL; float __nrnorm = 0; int __ninfo = 0; float *__nresid = NULL; float *__nv = NULL; float *__nh = NULL; int *__nipntr = NULL; float *__nworkd = NULL; + jboolean __failed = FALSE; + int __nido = 0; + const char *__nbmat = NULL; + float __nrnorm = 0; + int __ninfo = 0; + float *__nresid = NULL; + float *__nv = NULL; + float *__nh = NULL; + int *__nipntr = NULL; + float *__nworkd = NULL; __nido = (*env)->GetIntField(env, ido, intW_val_fieldID); - if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) { __failed = TRUE; goto done; } __nrnorm = (*env)->GetFloatField(env, rnorm, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; - if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) { __failed = TRUE; goto done; } ssaitr_(&__nido, __nbmat, &n, &k, &np, &mode, __nresid + offsetresid, &__nrnorm, __nv + offsetv, &ldv, __nh + offseth, &ldh, __nipntr + offsetipntr, __nworkd + offsetworkd, &__ninfo); done: - if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); - if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, rnorm, floatW_val_fieldID, __nrnorm); + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, __failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, rnorm, floatW_val_fieldID, __nrnorm); if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); - if (!failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsapps_)(int *n, int *kev, int *np, double *shift, double *v, int *ldv, double *h, int *ldh, double *resid, double *q, int *ldq, double *workd); void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsappsK(JNIEnv *env, UNUSED jobject obj, jint n, jint kev, jint np, jdoubleArray shift, jint offsetshift, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray h, jint offseth, jint ldh, jdoubleArray resid, jint offsetresid, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray workd, jint offsetworkd) { - jboolean failed = FALSE; - double *__nshift = NULL; double *__nv = NULL; double *__nh = NULL; double *__nresid = NULL; double *__nq = NULL; double *__nworkd = NULL; - if (!(__nshift = (*env)->GetPrimitiveArrayCritical(env, shift, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + jboolean __failed = FALSE; + double *__nshift = NULL; + double *__nv = NULL; + double *__nh = NULL; + double *__nresid = NULL; + double *__nq = NULL; + double *__nworkd = NULL; + if (!(__nshift = (*env)->GetPrimitiveArrayCritical(env, shift, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) { __failed = TRUE; goto done; } dsapps_(&n, &kev, &np, __nshift + offsetshift, __nv + offsetv, &ldv, __nh + offseth, &ldh, __nresid + offsetresid, __nq + offsetq, &ldq, __nworkd + offsetworkd); done: - if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nshift) (*env)->ReleasePrimitiveArrayCritical(env, shift, __nshift, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nshift) (*env)->ReleasePrimitiveArrayCritical(env, shift, __nshift, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssapps_)(int *n, int *kev, int *np, float *shift, float *v, int *ldv, float *h, int *ldh, float *resid, float *q, int *ldq, float *workd); void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssappsK(JNIEnv *env, UNUSED jobject obj, jint n, jint kev, jint np, jfloatArray shift, jint offsetshift, jfloatArray v, jint offsetv, jint ldv, jfloatArray h, jint offseth, jint ldh, jfloatArray resid, jint offsetresid, jfloatArray q, jint offsetq, jint ldq, jfloatArray workd, jint offsetworkd) { - jboolean failed = FALSE; - float *__nshift = NULL; float *__nv = NULL; float *__nh = NULL; float *__nresid = NULL; float *__nq = NULL; float *__nworkd = NULL; - if (!(__nshift = (*env)->GetPrimitiveArrayCritical(env, shift, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + jboolean __failed = FALSE; + float *__nshift = NULL; + float *__nv = NULL; + float *__nh = NULL; + float *__nresid = NULL; + float *__nq = NULL; + float *__nworkd = NULL; + if (!(__nshift = (*env)->GetPrimitiveArrayCritical(env, shift, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) { __failed = TRUE; goto done; } ssapps_(&n, &kev, &np, __nshift + offsetshift, __nv + offsetv, &ldv, __nh + offseth, &ldh, __nresid + offsetresid, __nq + offsetq, &ldq, __nworkd + offsetworkd); done: - if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nshift) (*env)->ReleasePrimitiveArrayCritical(env, shift, __nshift, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nshift) (*env)->ReleasePrimitiveArrayCritical(env, shift, __nshift, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsaup2_)(int *ido, const char *bmat, int *n, const char *which, int *nev, int *np, double *tol, double *resid, int *mode, int *iupd, int *ishift, int *mxiter, double *v, int *ldv, double *h, int *ldh, double *ritz, double *bounds, double *q, int *ldq, double *workl, int *ipntr, double *workd, int *info); void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsaup2K(JNIEnv *env, UNUSED jobject obj, jobject ido, jstring bmat, jint n, jstring which, jobject nev, jobject np, jdouble tol, jdoubleArray resid, jint offsetresid, jint mode, jint iupd, jint ishift, jobject mxiter, jdoubleArray v, jint offsetv, jint ldv, jdoubleArray h, jint offseth, jint ldh, jdoubleArray ritz, jint offsetritz, jdoubleArray bounds, jint offsetbounds, jdoubleArray q, jint offsetq, jint ldq, jdoubleArray workl, jint offsetworkl, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jobject info) { - jboolean failed = FALSE; - int __nido = 0; const char *__nbmat = NULL; const char *__nwhich = NULL; int __nnev = 0; int __nnp = 0; int __nmxiter = 0; int __ninfo = 0; double *__nresid = NULL; double *__nv = NULL; double *__nh = NULL; double *__nritz = NULL; double *__nbounds = NULL; double *__nq = NULL; double *__nworkl = NULL; int *__nipntr = NULL; double *__nworkd = NULL; + jboolean __failed = FALSE; + int __nido = 0; + const char *__nbmat = NULL; + const char *__nwhich = NULL; + int __nnev = 0; + int __nnp = 0; + int __nmxiter = 0; + int __ninfo = 0; + double *__nresid = NULL; + double *__nv = NULL; + double *__nh = NULL; + double *__nritz = NULL; + double *__nbounds = NULL; + double *__nq = NULL; + double *__nworkl = NULL; + int *__nipntr = NULL; + double *__nworkd = NULL; __nido = (*env)->GetIntField(env, ido, intW_val_fieldID); - if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; - if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) { __failed = TRUE; goto done; } + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) { __failed = TRUE; goto done; } __nnev = (*env)->GetIntField(env, nev, intW_val_fieldID); __nnp = (*env)->GetIntField(env, np, intW_val_fieldID); __nmxiter = (*env)->GetIntField(env, mxiter, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nritz = (*env)->GetPrimitiveArrayCritical(env, ritz, NULL))) goto fail; - if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; - if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; - if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nritz = (*env)->GetPrimitiveArrayCritical(env, ritz, NULL))) { __failed = TRUE; goto done; } + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) { __failed = TRUE; goto done; } + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) { __failed = TRUE; goto done; } dsaup2_(&__nido, __nbmat, &n, __nwhich, &__nnev, &__nnp, &tol, __nresid + offsetresid, &mode, &iupd, &ishift, &__nmxiter, __nv + offsetv, &ldv, __nh + offseth, &ldh, __nritz + offsetritz, __nbounds + offsetbounds, __nq + offsetq, &ldq, __nworkl + offsetworkl, __nipntr + offsetipntr, __nworkd + offsetworkd, &__ninfo); done: - if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); - if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); - if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); - if (__nritz) (*env)->ReleasePrimitiveArrayCritical(env, ritz, __nritz, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, mxiter, intW_val_fieldID, __nmxiter); - if (!failed) (*env)->SetIntField(env, np, intW_val_fieldID, __nnp); - if (!failed) (*env)->SetIntField(env, nev, intW_val_fieldID, __nnev); + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, __failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, __failed ? JNI_ABORT : 0); + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, __failed ? JNI_ABORT : 0); + if (__nritz) (*env)->ReleasePrimitiveArrayCritical(env, ritz, __nritz, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, mxiter, intW_val_fieldID, __nmxiter); + if (!__failed) (*env)->SetIntField(env, np, intW_val_fieldID, __nnp); + if (!__failed) (*env)->SetIntField(env, nev, intW_val_fieldID, __nnev); if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); - if (!failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssaup2_)(int *ido, const char *bmat, int *n, const char *which, int *nev, int *np, float *tol, float *resid, int *mode, int *iupd, int *ishift, int *mxiter, float *v, int *ldv, float *h, int *ldh, float *ritz, float *bounds, float *q, int *ldq, float *workl, int *ipntr, float *workd, int *info); void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssaup2K(JNIEnv *env, UNUSED jobject obj, jobject ido, jstring bmat, jint n, jstring which, jobject nev, jobject np, jfloat tol, jfloatArray resid, jint offsetresid, jint mode, jint iupd, jint ishift, jobject mxiter, jfloatArray v, jint offsetv, jint ldv, jfloatArray h, jint offseth, jint ldh, jfloatArray ritz, jint offsetritz, jfloatArray bounds, jint offsetbounds, jfloatArray q, jint offsetq, jint ldq, jfloatArray workl, jint offsetworkl, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jobject info) { - jboolean failed = FALSE; - int __nido = 0; const char *__nbmat = NULL; const char *__nwhich = NULL; int __nnev = 0; int __nnp = 0; int __nmxiter = 0; int __ninfo = 0; float *__nresid = NULL; float *__nv = NULL; float *__nh = NULL; float *__nritz = NULL; float *__nbounds = NULL; float *__nq = NULL; float *__nworkl = NULL; int *__nipntr = NULL; float *__nworkd = NULL; + jboolean __failed = FALSE; + int __nido = 0; + const char *__nbmat = NULL; + const char *__nwhich = NULL; + int __nnev = 0; + int __nnp = 0; + int __nmxiter = 0; + int __ninfo = 0; + float *__nresid = NULL; + float *__nv = NULL; + float *__nh = NULL; + float *__nritz = NULL; + float *__nbounds = NULL; + float *__nq = NULL; + float *__nworkl = NULL; + int *__nipntr = NULL; + float *__nworkd = NULL; __nido = (*env)->GetIntField(env, ido, intW_val_fieldID); - if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; - if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) { __failed = TRUE; goto done; } + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) { __failed = TRUE; goto done; } __nnev = (*env)->GetIntField(env, nev, intW_val_fieldID); __nnp = (*env)->GetIntField(env, np, intW_val_fieldID); __nmxiter = (*env)->GetIntField(env, mxiter, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__nritz = (*env)->GetPrimitiveArrayCritical(env, ritz, NULL))) goto fail; - if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; - if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) goto fail; - if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; - if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; - if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__nritz = (*env)->GetPrimitiveArrayCritical(env, ritz, NULL))) { __failed = TRUE; goto done; } + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) { __failed = TRUE; goto done; } + if (!(__nq = (*env)->GetPrimitiveArrayCritical(env, q, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) { __failed = TRUE; goto done; } + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) { __failed = TRUE; goto done; } ssaup2_(&__nido, __nbmat, &n, __nwhich, &__nnev, &__nnp, &tol, __nresid + offsetresid, &mode, &iupd, &ishift, &__nmxiter, __nv + offsetv, &ldv, __nh + offseth, &ldh, __nritz + offsetritz, __nbounds + offsetbounds, __nq + offsetq, &ldq, __nworkl + offsetworkl, __nipntr + offsetipntr, __nworkd + offsetworkd, &__ninfo); done: - if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); - if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); - if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); - if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, failed ? JNI_ABORT : 0); - if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); - if (__nritz) (*env)->ReleasePrimitiveArrayCritical(env, ritz, __nritz, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, mxiter, intW_val_fieldID, __nmxiter); - if (!failed) (*env)->SetIntField(env, np, intW_val_fieldID, __nnp); - if (!failed) (*env)->SetIntField(env, nev, intW_val_fieldID, __nnev); + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, __failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, __failed ? JNI_ABORT : 0); + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, __failed ? JNI_ABORT : 0); + if (__nq) (*env)->ReleasePrimitiveArrayCritical(env, q, __nq, __failed ? JNI_ABORT : 0); + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, __failed ? JNI_ABORT : 0); + if (__nritz) (*env)->ReleasePrimitiveArrayCritical(env, ritz, __nritz, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, mxiter, intW_val_fieldID, __nmxiter); + if (!__failed) (*env)->SetIntField(env, np, intW_val_fieldID, __nnp); + if (!__failed) (*env)->SetIntField(env, nev, intW_val_fieldID, __nnev); if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); - if (!failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dseigt_)(double *rnorm, int *n, double *h, int *ldh, double *eig, double *bounds, double *workl, int *ierr); void Java_dev_ludovic_netlib_arpack_JNIARPACK_dseigtK(JNIEnv *env, UNUSED jobject obj, jdouble rnorm, jint n, jdoubleArray h, jint offseth, jint ldh, jdoubleArray eig, jint offseteig, jdoubleArray bounds, jint offsetbounds, jdoubleArray workl, jint offsetworkl, jobject ierr) { - jboolean failed = FALSE; - int __nierr = 0; double *__nh = NULL; double *__neig = NULL; double *__nbounds = NULL; double *__nworkl = NULL; + jboolean __failed = FALSE; + int __nierr = 0; + double *__nh = NULL; + double *__neig = NULL; + double *__nbounds = NULL; + double *__nworkl = NULL; __nierr = (*env)->GetIntField(env, ierr, intW_val_fieldID); - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__neig = (*env)->GetPrimitiveArrayCritical(env, eig, NULL))) goto fail; - if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; - if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__neig = (*env)->GetPrimitiveArrayCritical(env, eig, NULL))) { __failed = TRUE; goto done; } + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) { __failed = TRUE; goto done; } dseigt_(&rnorm, &n, __nh + offseth, &ldh, __neig + offseteig, __nbounds + offsetbounds, __nworkl + offsetworkl, &__nierr); done: - if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); - if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); - if (__neig) (*env)->ReleasePrimitiveArrayCritical(env, eig, __neig, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, ierr, intW_val_fieldID, __nierr); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, __failed ? JNI_ABORT : 0); + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, __failed ? JNI_ABORT : 0); + if (__neig) (*env)->ReleasePrimitiveArrayCritical(env, eig, __neig, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, ierr, intW_val_fieldID, __nierr); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sseigt_)(float *rnorm, int *n, float *h, int *ldh, float *eig, float *bounds, float *workl, int *ierr); void Java_dev_ludovic_netlib_arpack_JNIARPACK_sseigtK(JNIEnv *env, UNUSED jobject obj, jfloat rnorm, jint n, jfloatArray h, jint offseth, jint ldh, jfloatArray eig, jint offseteig, jfloatArray bounds, jint offsetbounds, jfloatArray workl, jint offsetworkl, jobject ierr) { - jboolean failed = FALSE; - int __nierr = 0; float *__nh = NULL; float *__neig = NULL; float *__nbounds = NULL; float *__nworkl = NULL; + jboolean __failed = FALSE; + int __nierr = 0; + float *__nh = NULL; + float *__neig = NULL; + float *__nbounds = NULL; + float *__nworkl = NULL; __nierr = (*env)->GetIntField(env, ierr, intW_val_fieldID); - if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) goto fail; - if (!(__neig = (*env)->GetPrimitiveArrayCritical(env, eig, NULL))) goto fail; - if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; - if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; + if (!(__nh = (*env)->GetPrimitiveArrayCritical(env, h, NULL))) { __failed = TRUE; goto done; } + if (!(__neig = (*env)->GetPrimitiveArrayCritical(env, eig, NULL))) { __failed = TRUE; goto done; } + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) { __failed = TRUE; goto done; } sseigt_(&rnorm, &n, __nh + offseth, &ldh, __neig + offseteig, __nbounds + offsetbounds, __nworkl + offsetworkl, &__nierr); done: - if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); - if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); - if (__neig) (*env)->ReleasePrimitiveArrayCritical(env, eig, __neig, failed ? JNI_ABORT : 0); - if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, ierr, intW_val_fieldID, __nierr); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, __failed ? JNI_ABORT : 0); + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, __failed ? JNI_ABORT : 0); + if (__neig) (*env)->ReleasePrimitiveArrayCritical(env, eig, __neig, __failed ? JNI_ABORT : 0); + if (__nh) (*env)->ReleasePrimitiveArrayCritical(env, h, __nh, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, ierr, intW_val_fieldID, __nierr); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsesrt_)(const char *which, int *apply, int *n, double *x, int *na, double *a, int *lda); void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsesrtK(JNIEnv *env, UNUSED jobject obj, jstring which, jboolean apply, jint n, jdoubleArray x, jint offsetx, jint na, jdoubleArray a, jint offseta, jint lda) { - jboolean failed = FALSE; - const char *__nwhich = NULL; int __napply; double *__nx = NULL; double *__na = NULL; - if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nwhich = NULL; + int __napply; + double *__nx = NULL; + double *__na = NULL; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) { __failed = TRUE; goto done; } __napply = apply; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } dsesrt_(__nwhich, &__napply, &n, __nx + offsetx, &na, __na + offseta, &lda); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (!failed) apply = __napply; + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (!__failed) apply = __napply; if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssesrt_)(const char *which, int *apply, int *n, float *x, int *na, float *a, int *lda); void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssesrtK(JNIEnv *env, UNUSED jobject obj, jstring which, jboolean apply, jint n, jfloatArray x, jint offsetx, jint na, jfloatArray a, jint offseta, jint lda) { - jboolean failed = FALSE; - const char *__nwhich = NULL; int __napply; float *__nx = NULL; float *__na = NULL; - if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nwhich = NULL; + int __napply; + float *__nx = NULL; + float *__na = NULL; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) { __failed = TRUE; goto done; } __napply = apply; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } ssesrt_(__nwhich, &__napply, &n, __nx + offsetx, &na, __na + offseta, &lda); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (!failed) apply = __napply; + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (!__failed) apply = __napply; if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsaupd_)(int *ido, const char *bmat, int *n, const char *which, int *nev, double *tol, double *resid, int *ncv, double *v, int *ldv, int *iparam, int *ipntr, double *workd, double *workl, int *lworkl, int *info); void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsaupdK(JNIEnv *env, UNUSED jobject obj, jobject ido, jstring bmat, jint n, jstring which, jint nev, jobject tol, jdoubleArray resid, jint offsetresid, jint ncv, jdoubleArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jdoubleArray workl, jint offsetworkl, jint lworkl, jobject info) { - jboolean failed = FALSE; - int __nido = 0; const char *__nbmat = NULL; const char *__nwhich = NULL; double __ntol = 0; int __ninfo = 0; double *__nresid = NULL; double *__nv = NULL; int *__niparam = NULL; int *__nipntr = NULL; double *__nworkd = NULL; double *__nworkl = NULL; + jboolean __failed = FALSE; + int __nido = 0; + const char *__nbmat = NULL; + const char *__nwhich = NULL; + double __ntol = 0; + int __ninfo = 0; + double *__nresid = NULL; + double *__nv = NULL; + int *__niparam = NULL; + int *__nipntr = NULL; + double *__nworkd = NULL; + double *__nworkl = NULL; __nido = (*env)->GetIntField(env, ido, intW_val_fieldID); - if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; - if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) { __failed = TRUE; goto done; } + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) { __failed = TRUE; goto done; } __ntol = (*env)->GetDoubleField(env, tol, doubleW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__niparam = (*env)->GetPrimitiveArrayCritical(env, iparam, NULL))) goto fail; - if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; - if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; - if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__niparam = (*env)->GetPrimitiveArrayCritical(env, iparam, NULL))) { __failed = TRUE; goto done; } + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) { __failed = TRUE; goto done; } dsaupd_(&__nido, __nbmat, &n, __nwhich, &nev, &__ntol, __nresid + offsetresid, &ncv, __nv + offsetv, &ldv, __niparam + offsetiparam, __nipntr + offsetipntr, __nworkd + offsetworkd, __nworkl + offsetworkl, &lworkl, &__ninfo); done: - if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); - if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); - if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); - if (__niparam) (*env)->ReleasePrimitiveArrayCritical(env, iparam, __niparam, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetDoubleField(env, tol, doubleW_val_fieldID, __ntol); + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, __failed ? JNI_ABORT : 0); + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, __failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, __failed ? JNI_ABORT : 0); + if (__niparam) (*env)->ReleasePrimitiveArrayCritical(env, iparam, __niparam, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetDoubleField(env, tol, doubleW_val_fieldID, __ntol); if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); - if (!failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssaupd_)(int *ido, const char *bmat, int *n, const char *which, int *nev, float *tol, float *resid, int *ncv, float *v, int *ldv, int *iparam, int *ipntr, float *workd, float *workl, int *lworkl, int *info); void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssaupdK(JNIEnv *env, UNUSED jobject obj, jobject ido, jstring bmat, jint n, jstring which, jint nev, jobject tol, jfloatArray resid, jint offsetresid, jint ncv, jfloatArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jfloatArray workl, jint offsetworkl, jint lworkl, jobject info) { - jboolean failed = FALSE; - int __nido = 0; const char *__nbmat = NULL; const char *__nwhich = NULL; float __ntol = 0; int __ninfo = 0; float *__nresid = NULL; float *__nv = NULL; int *__niparam = NULL; int *__nipntr = NULL; float *__nworkd = NULL; float *__nworkl = NULL; + jboolean __failed = FALSE; + int __nido = 0; + const char *__nbmat = NULL; + const char *__nwhich = NULL; + float __ntol = 0; + int __ninfo = 0; + float *__nresid = NULL; + float *__nv = NULL; + int *__niparam = NULL; + int *__nipntr = NULL; + float *__nworkd = NULL; + float *__nworkl = NULL; __nido = (*env)->GetIntField(env, ido, intW_val_fieldID); - if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; - if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) { __failed = TRUE; goto done; } + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) { __failed = TRUE; goto done; } __ntol = (*env)->GetFloatField(env, tol, floatW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__niparam = (*env)->GetPrimitiveArrayCritical(env, iparam, NULL))) goto fail; - if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; - if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; - if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__niparam = (*env)->GetPrimitiveArrayCritical(env, iparam, NULL))) { __failed = TRUE; goto done; } + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) { __failed = TRUE; goto done; } ssaupd_(&__nido, __nbmat, &n, __nwhich, &nev, &__ntol, __nresid + offsetresid, &ncv, __nv + offsetv, &ldv, __niparam + offsetiparam, __nipntr + offsetipntr, __nworkd + offsetworkd, __nworkl + offsetworkl, &lworkl, &__ninfo); done: - if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); - if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); - if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); - if (__niparam) (*env)->ReleasePrimitiveArrayCritical(env, iparam, __niparam, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetFloatField(env, tol, floatW_val_fieldID, __ntol); + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, __failed ? JNI_ABORT : 0); + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, __failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, __failed ? JNI_ABORT : 0); + if (__niparam) (*env)->ReleasePrimitiveArrayCritical(env, iparam, __niparam, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetFloatField(env, tol, floatW_val_fieldID, __ntol); if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); - if (!failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetIntField(env, ido, intW_val_fieldID, __nido); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dseupd_)(int *rvec, const char *howmny, int *select, double *d, double *z, int *ldz, double *sigma, const char *bmat, int *n, const char *which, int *nev, double *tol, double *resid, int *ncv, double *v, int *ldv, int *iparam, int *ipntr, double *workd, double *workl, int *lworkl, int *info); void Java_dev_ludovic_netlib_arpack_JNIARPACK_dseupdK(JNIEnv *env, UNUSED jobject obj, jboolean rvec, jstring howmny, jbooleanArray select, jint offsetselect, jdoubleArray d, jint offsetd, jdoubleArray z, jint offsetz, jint ldz, jdouble sigma, jstring bmat, jint n, jstring which, jobject nev, jdouble tol, jdoubleArray resid, jint offsetresid, jint ncv, jdoubleArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jdoubleArray workd, jint offsetworkd, jdoubleArray workl, jint offsetworkl, jint lworkl, jobject info) { - jboolean failed = FALSE; - int __nrvec; const char *__nhowmny = NULL; const char *__nbmat = NULL; const char *__nwhich = NULL; int __nnev = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; double *__nd = NULL; double *__nz = NULL; double *__nresid = NULL; double *__nv = NULL; int *__niparam = NULL; int *__nipntr = NULL; double *__nworkd = NULL; double *__nworkl = NULL; + jboolean __failed = FALSE; + int __nrvec; + const char *__nhowmny = NULL; + const char *__nbmat = NULL; + const char *__nwhich = NULL; + int __nnev = 0; + int __ninfo = 0; + int *__nselect = NULL; jboolean *__jselect = NULL; + double *__nd = NULL; + double *__nz = NULL; + double *__nresid = NULL; + double *__nv = NULL; + int *__niparam = NULL; + int *__nipntr = NULL; + double *__nworkd = NULL; + double *__nworkl = NULL; __nrvec = rvec; - if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) goto fail; - if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; - if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) { __failed = TRUE; goto done; } + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) { __failed = TRUE; goto done; } + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) { __failed = TRUE; goto done; } __nnev = (*env)->GetIntField(env, nev, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__niparam = (*env)->GetPrimitiveArrayCritical(env, iparam, NULL))) goto fail; - if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; - if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; - if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { __failed = TRUE; goto done; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) { __failed = TRUE; goto done; } if (!(__nselect = malloc(sizeof(jboolean) * length))) { __failed = TRUE; goto done; } for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__niparam = (*env)->GetPrimitiveArrayCritical(env, iparam, NULL))) { __failed = TRUE; goto done; } + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) { __failed = TRUE; goto done; } dseupd_(&__nrvec, __nhowmny, __nselect + offsetselect, __nd + offsetd, __nz + offsetz, &ldz, &sigma, __nbmat, &n, __nwhich, &__nnev, &tol, __nresid + offsetresid, &ncv, __nv + offsetv, &ldv, __niparam + offsetiparam, __nipntr + offsetipntr, __nworkd + offsetworkd, __nworkl + offsetworkl, &lworkl, &__ninfo); done: - if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); - if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); - if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); - if (__niparam) (*env)->ReleasePrimitiveArrayCritical(env, iparam, __niparam, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, __failed ? JNI_ABORT : 0); + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, __failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, __failed ? JNI_ABORT : 0); + if (__niparam) (*env)->ReleasePrimitiveArrayCritical(env, iparam, __niparam, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, nev, intW_val_fieldID, __nnev); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, nev, intW_val_fieldID, __nnev); if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); if (__nhowmny) (*env)->ReleaseStringUTFChars(env, howmny, __nhowmny); - if (!failed) rvec = __nrvec; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) rvec = __nrvec; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sseupd_)(int *rvec, const char *howmny, int *select, float *d, float *z, int *ldz, float *sigma, const char *bmat, int *n, const char *which, int *nev, float *tol, float *resid, int *ncv, float *v, int *ldv, int *iparam, int *ipntr, float *workd, float *workl, int *lworkl, int *info); void Java_dev_ludovic_netlib_arpack_JNIARPACK_sseupdK(JNIEnv *env, UNUSED jobject obj, jboolean rvec, jstring howmny, jbooleanArray select, jint offsetselect, jfloatArray d, jint offsetd, jfloatArray z, jint offsetz, jint ldz, jfloat sigma, jstring bmat, jint n, jstring which, jobject nev, jfloat tol, jfloatArray resid, jint offsetresid, jint ncv, jfloatArray v, jint offsetv, jint ldv, jintArray iparam, jint offsetiparam, jintArray ipntr, jint offsetipntr, jfloatArray workd, jint offsetworkd, jfloatArray workl, jint offsetworkl, jint lworkl, jobject info) { - jboolean failed = FALSE; - int __nrvec; const char *__nhowmny = NULL; const char *__nbmat = NULL; const char *__nwhich = NULL; int __nnev = 0; int __ninfo = 0; jboolean *__jselect = NULL; int *__nselect = NULL; float *__nd = NULL; float *__nz = NULL; float *__nresid = NULL; float *__nv = NULL; int *__niparam = NULL; int *__nipntr = NULL; float *__nworkd = NULL; float *__nworkl = NULL; + jboolean __failed = FALSE; + int __nrvec; + const char *__nhowmny = NULL; + const char *__nbmat = NULL; + const char *__nwhich = NULL; + int __nnev = 0; + int __ninfo = 0; + int *__nselect = NULL; jboolean *__jselect = NULL; + float *__nd = NULL; + float *__nz = NULL; + float *__nresid = NULL; + float *__nv = NULL; + int *__niparam = NULL; + int *__nipntr = NULL; + float *__nworkd = NULL; + float *__nworkl = NULL; __nrvec = rvec; - if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) goto fail; - if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) goto fail; - if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + if (!(__nhowmny = (*env)->GetStringUTFChars(env, howmny, NULL))) { __failed = TRUE; goto done; } + if (!(__nbmat = (*env)->GetStringUTFChars(env, bmat, NULL))) { __failed = TRUE; goto done; } + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) { __failed = TRUE; goto done; } __nnev = (*env)->GetIntField(env, nev, intW_val_fieldID); __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { goto fail; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) goto fail; if (!(__nselect = malloc(sizeof(jboolean) * length))) goto fail; for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) goto fail; - if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) goto fail; - if (!(__niparam = (*env)->GetPrimitiveArrayCritical(env, iparam, NULL))) goto fail; - if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) goto fail; - if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) goto fail; - if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) goto fail; + if (!(__jselect = (*env)->GetPrimitiveArrayCritical(env, select, NULL))) { __failed = TRUE; goto done; } do { int length = (*env)->GetArrayLength(env, select); if (length <= 0) { __failed = TRUE; goto done; } if (!(__nselect = malloc(sizeof(jboolean) * length))) { __failed = TRUE; goto done; } for (int i = 0; i < length; i++) { __nselect[i] = __jselect[i]; } } while(0); + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nresid = (*env)->GetPrimitiveArrayCritical(env, resid, NULL))) { __failed = TRUE; goto done; } + if (!(__nv = (*env)->GetPrimitiveArrayCritical(env, v, NULL))) { __failed = TRUE; goto done; } + if (!(__niparam = (*env)->GetPrimitiveArrayCritical(env, iparam, NULL))) { __failed = TRUE; goto done; } + if (!(__nipntr = (*env)->GetPrimitiveArrayCritical(env, ipntr, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkd = (*env)->GetPrimitiveArrayCritical(env, workd, NULL))) { __failed = TRUE; goto done; } + if (!(__nworkl = (*env)->GetPrimitiveArrayCritical(env, workl, NULL))) { __failed = TRUE; goto done; } sseupd_(&__nrvec, __nhowmny, __nselect + offsetselect, __nd + offsetd, __nz + offsetz, &ldz, &sigma, __nbmat, &n, __nwhich, &__nnev, &tol, __nresid + offsetresid, &ncv, __nv + offsetv, &ldv, __niparam + offsetiparam, __nipntr + offsetipntr, __nworkd + offsetworkd, __nworkl + offsetworkl, &lworkl, &__ninfo); done: - if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, failed ? JNI_ABORT : 0); - if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, failed ? JNI_ABORT : 0); - if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, failed ? JNI_ABORT : 0); - if (__niparam) (*env)->ReleasePrimitiveArrayCritical(env, iparam, __niparam, failed ? JNI_ABORT : 0); - if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, failed ? JNI_ABORT : 0); - if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); + if (__nworkl) (*env)->ReleasePrimitiveArrayCritical(env, workl, __nworkl, __failed ? JNI_ABORT : 0); + if (__nworkd) (*env)->ReleasePrimitiveArrayCritical(env, workd, __nworkd, __failed ? JNI_ABORT : 0); + if (__nipntr) (*env)->ReleasePrimitiveArrayCritical(env, ipntr, __nipntr, __failed ? JNI_ABORT : 0); + if (__niparam) (*env)->ReleasePrimitiveArrayCritical(env, iparam, __niparam, __failed ? JNI_ABORT : 0); + if (__nv) (*env)->ReleasePrimitiveArrayCritical(env, v, __nv, __failed ? JNI_ABORT : 0); + if (__nresid) (*env)->ReleasePrimitiveArrayCritical(env, resid, __nresid, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); if (__nselect) { free(__nselect); } if (__jselect) (*env)->ReleasePrimitiveArrayCritical(env, select, __nselect, JNI_ABORT); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (!failed) (*env)->SetIntField(env, nev, intW_val_fieldID, __nnev); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (!__failed) (*env)->SetIntField(env, nev, intW_val_fieldID, __nnev); if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); if (__nbmat) (*env)->ReleaseStringUTFChars(env, bmat, __nbmat); if (__nhowmny) (*env)->ReleaseStringUTFChars(env, howmny, __nhowmny); - if (!failed) rvec = __nrvec; - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) rvec = __nrvec; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsgets_)(int *ishift, const char *which, int *kev, int *np, double *ritz, double *bounds, double *shifts); void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsgetsK(JNIEnv *env, UNUSED jobject obj, jint ishift, jstring which, jobject kev, jobject np, jdoubleArray ritz, jint offsetritz, jdoubleArray bounds, jint offsetbounds, jdoubleArray shifts, jint offsetshifts) { - jboolean failed = FALSE; - const char *__nwhich = NULL; int __nkev = 0; int __nnp = 0; double *__nritz = NULL; double *__nbounds = NULL; double *__nshifts = NULL; - if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nwhich = NULL; + int __nkev = 0; + int __nnp = 0; + double *__nritz = NULL; + double *__nbounds = NULL; + double *__nshifts = NULL; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) { __failed = TRUE; goto done; } __nkev = (*env)->GetIntField(env, kev, intW_val_fieldID); __nnp = (*env)->GetIntField(env, np, intW_val_fieldID); - if (!(__nritz = (*env)->GetPrimitiveArrayCritical(env, ritz, NULL))) goto fail; - if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; - if (!(__nshifts = (*env)->GetPrimitiveArrayCritical(env, shifts, NULL))) goto fail; + if (!(__nritz = (*env)->GetPrimitiveArrayCritical(env, ritz, NULL))) { __failed = TRUE; goto done; } + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) { __failed = TRUE; goto done; } + if (!(__nshifts = (*env)->GetPrimitiveArrayCritical(env, shifts, NULL))) { __failed = TRUE; goto done; } dsgets_(&ishift, __nwhich, &__nkev, &__nnp, __nritz + offsetritz, __nbounds + offsetbounds, __nshifts + offsetshifts); done: - if (__nshifts) (*env)->ReleasePrimitiveArrayCritical(env, shifts, __nshifts, failed ? JNI_ABORT : 0); - if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); - if (__nritz) (*env)->ReleasePrimitiveArrayCritical(env, ritz, __nritz, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, np, intW_val_fieldID, __nnp); - if (!failed) (*env)->SetIntField(env, kev, intW_val_fieldID, __nkev); + if (__nshifts) (*env)->ReleasePrimitiveArrayCritical(env, shifts, __nshifts, __failed ? JNI_ABORT : 0); + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, __failed ? JNI_ABORT : 0); + if (__nritz) (*env)->ReleasePrimitiveArrayCritical(env, ritz, __nritz, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, np, intW_val_fieldID, __nnp); + if (!__failed) (*env)->SetIntField(env, kev, intW_val_fieldID, __nkev); if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssgets_)(int *ishift, const char *which, int *kev, int *np, float *ritz, float *bounds, float *shifts); void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssgetsK(JNIEnv *env, UNUSED jobject obj, jint ishift, jstring which, jobject kev, jobject np, jfloatArray ritz, jint offsetritz, jfloatArray bounds, jint offsetbounds, jfloatArray shifts, jint offsetshifts) { - jboolean failed = FALSE; - const char *__nwhich = NULL; int __nkev = 0; int __nnp = 0; float *__nritz = NULL; float *__nbounds = NULL; float *__nshifts = NULL; - if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nwhich = NULL; + int __nkev = 0; + int __nnp = 0; + float *__nritz = NULL; + float *__nbounds = NULL; + float *__nshifts = NULL; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) { __failed = TRUE; goto done; } __nkev = (*env)->GetIntField(env, kev, intW_val_fieldID); __nnp = (*env)->GetIntField(env, np, intW_val_fieldID); - if (!(__nritz = (*env)->GetPrimitiveArrayCritical(env, ritz, NULL))) goto fail; - if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) goto fail; - if (!(__nshifts = (*env)->GetPrimitiveArrayCritical(env, shifts, NULL))) goto fail; + if (!(__nritz = (*env)->GetPrimitiveArrayCritical(env, ritz, NULL))) { __failed = TRUE; goto done; } + if (!(__nbounds = (*env)->GetPrimitiveArrayCritical(env, bounds, NULL))) { __failed = TRUE; goto done; } + if (!(__nshifts = (*env)->GetPrimitiveArrayCritical(env, shifts, NULL))) { __failed = TRUE; goto done; } ssgets_(&ishift, __nwhich, &__nkev, &__nnp, __nritz + offsetritz, __nbounds + offsetbounds, __nshifts + offsetshifts); done: - if (__nshifts) (*env)->ReleasePrimitiveArrayCritical(env, shifts, __nshifts, failed ? JNI_ABORT : 0); - if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, failed ? JNI_ABORT : 0); - if (__nritz) (*env)->ReleasePrimitiveArrayCritical(env, ritz, __nritz, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, np, intW_val_fieldID, __nnp); - if (!failed) (*env)->SetIntField(env, kev, intW_val_fieldID, __nkev); + if (__nshifts) (*env)->ReleasePrimitiveArrayCritical(env, shifts, __nshifts, __failed ? JNI_ABORT : 0); + if (__nbounds) (*env)->ReleasePrimitiveArrayCritical(env, bounds, __nbounds, __failed ? JNI_ABORT : 0); + if (__nritz) (*env)->ReleasePrimitiveArrayCritical(env, ritz, __nritz, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, np, intW_val_fieldID, __nnp); + if (!__failed) (*env)->SetIntField(env, kev, intW_val_fieldID, __nkev); if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsortc_)(const char *which, int *apply, int *n, double *xreal, double *ximag, double *y); void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsortcK(JNIEnv *env, UNUSED jobject obj, jstring which, jboolean apply, jint n, jdoubleArray xreal, jint offsetxreal, jdoubleArray ximag, jint offsetximag, jdoubleArray y, jint offsety) { - jboolean failed = FALSE; - const char *__nwhich = NULL; int __napply; double *__nxreal = NULL; double *__nximag = NULL; double *__ny = NULL; - if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nwhich = NULL; + int __napply; + double *__nxreal = NULL; + double *__nximag = NULL; + double *__ny = NULL; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) { __failed = TRUE; goto done; } __napply = apply; - if (!(__nxreal = (*env)->GetPrimitiveArrayCritical(env, xreal, NULL))) goto fail; - if (!(__nximag = (*env)->GetPrimitiveArrayCritical(env, ximag, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + if (!(__nxreal = (*env)->GetPrimitiveArrayCritical(env, xreal, NULL))) { __failed = TRUE; goto done; } + if (!(__nximag = (*env)->GetPrimitiveArrayCritical(env, ximag, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } dsortc_(__nwhich, &__napply, &n, __nxreal + offsetxreal, __nximag + offsetximag, __ny + offsety); done: - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); - if (__nximag) (*env)->ReleasePrimitiveArrayCritical(env, ximag, __nximag, failed ? JNI_ABORT : 0); - if (__nxreal) (*env)->ReleasePrimitiveArrayCritical(env, xreal, __nxreal, failed ? JNI_ABORT : 0); - if (!failed) apply = __napply; + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); + if (__nximag) (*env)->ReleasePrimitiveArrayCritical(env, ximag, __nximag, __failed ? JNI_ABORT : 0); + if (__nxreal) (*env)->ReleasePrimitiveArrayCritical(env, xreal, __nxreal, __failed ? JNI_ABORT : 0); + if (!__failed) apply = __napply; if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssortc_)(const char *which, int *apply, int *n, float *xreal, float *ximag, float *y); void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssortcK(JNIEnv *env, UNUSED jobject obj, jstring which, jboolean apply, jint n, jfloatArray xreal, jint offsetxreal, jfloatArray ximag, jint offsetximag, jfloatArray y, jint offsety) { - jboolean failed = FALSE; - const char *__nwhich = NULL; int __napply; float *__nxreal = NULL; float *__nximag = NULL; float *__ny = NULL; - if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nwhich = NULL; + int __napply; + float *__nxreal = NULL; + float *__nximag = NULL; + float *__ny = NULL; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) { __failed = TRUE; goto done; } __napply = apply; - if (!(__nxreal = (*env)->GetPrimitiveArrayCritical(env, xreal, NULL))) goto fail; - if (!(__nximag = (*env)->GetPrimitiveArrayCritical(env, ximag, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + if (!(__nxreal = (*env)->GetPrimitiveArrayCritical(env, xreal, NULL))) { __failed = TRUE; goto done; } + if (!(__nximag = (*env)->GetPrimitiveArrayCritical(env, ximag, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } ssortc_(__nwhich, &__napply, &n, __nxreal + offsetxreal, __nximag + offsetximag, __ny + offsety); done: - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); - if (__nximag) (*env)->ReleasePrimitiveArrayCritical(env, ximag, __nximag, failed ? JNI_ABORT : 0); - if (__nxreal) (*env)->ReleasePrimitiveArrayCritical(env, xreal, __nxreal, failed ? JNI_ABORT : 0); - if (!failed) apply = __napply; + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); + if (__nximag) (*env)->ReleasePrimitiveArrayCritical(env, ximag, __nximag, __failed ? JNI_ABORT : 0); + if (__nxreal) (*env)->ReleasePrimitiveArrayCritical(env, xreal, __nxreal, __failed ? JNI_ABORT : 0); + if (!__failed) apply = __napply; if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsortr_)(const char *which, int *apply, int *n, double *x1, double *x2); void Java_dev_ludovic_netlib_arpack_JNIARPACK_dsortrK(JNIEnv *env, UNUSED jobject obj, jstring which, jboolean apply, jint n, jdoubleArray x1, jint offsetx1, jdoubleArray x2, jint offsetx2) { - jboolean failed = FALSE; - const char *__nwhich = NULL; int __napply; double *__nx1 = NULL; double *__nx2 = NULL; - if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nwhich = NULL; + int __napply; + double *__nx1 = NULL; + double *__nx2 = NULL; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) { __failed = TRUE; goto done; } __napply = apply; - if (!(__nx1 = (*env)->GetPrimitiveArrayCritical(env, x1, NULL))) goto fail; - if (!(__nx2 = (*env)->GetPrimitiveArrayCritical(env, x2, NULL))) goto fail; + if (!(__nx1 = (*env)->GetPrimitiveArrayCritical(env, x1, NULL))) { __failed = TRUE; goto done; } + if (!(__nx2 = (*env)->GetPrimitiveArrayCritical(env, x2, NULL))) { __failed = TRUE; goto done; } dsortr_(__nwhich, &__napply, &n, __nx1 + offsetx1, __nx2 + offsetx2); done: - if (__nx2) (*env)->ReleasePrimitiveArrayCritical(env, x2, __nx2, failed ? JNI_ABORT : 0); - if (__nx1) (*env)->ReleasePrimitiveArrayCritical(env, x1, __nx1, failed ? JNI_ABORT : 0); - if (!failed) apply = __napply; + if (__nx2) (*env)->ReleasePrimitiveArrayCritical(env, x2, __nx2, __failed ? JNI_ABORT : 0); + if (__nx1) (*env)->ReleasePrimitiveArrayCritical(env, x1, __nx1, __failed ? JNI_ABORT : 0); + if (!__failed) apply = __napply; if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssortr_)(const char *which, int *apply, int *n, float *x1, float *x2); void Java_dev_ludovic_netlib_arpack_JNIARPACK_ssortrK(JNIEnv *env, UNUSED jobject obj, jstring which, jboolean apply, jint n, jfloatArray x1, jint offsetx1, jfloatArray x2, jint offsetx2) { - jboolean failed = FALSE; - const char *__nwhich = NULL; int __napply; float *__nx1 = NULL; float *__nx2 = NULL; - if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nwhich = NULL; + int __napply; + float *__nx1 = NULL; + float *__nx2 = NULL; + if (!(__nwhich = (*env)->GetStringUTFChars(env, which, NULL))) { __failed = TRUE; goto done; } __napply = apply; - if (!(__nx1 = (*env)->GetPrimitiveArrayCritical(env, x1, NULL))) goto fail; - if (!(__nx2 = (*env)->GetPrimitiveArrayCritical(env, x2, NULL))) goto fail; + if (!(__nx1 = (*env)->GetPrimitiveArrayCritical(env, x1, NULL))) { __failed = TRUE; goto done; } + if (!(__nx2 = (*env)->GetPrimitiveArrayCritical(env, x2, NULL))) { __failed = TRUE; goto done; } ssortr_(__nwhich, &__napply, &n, __nx1 + offsetx1, __nx2 + offsetx2); done: - if (__nx2) (*env)->ReleasePrimitiveArrayCritical(env, x2, __nx2, failed ? JNI_ABORT : 0); - if (__nx1) (*env)->ReleasePrimitiveArrayCritical(env, x1, __nx1, failed ? JNI_ABORT : 0); - if (!failed) apply = __napply; + if (__nx2) (*env)->ReleasePrimitiveArrayCritical(env, x2, __nx2, __failed ? JNI_ABORT : 0); + if (__nx1) (*env)->ReleasePrimitiveArrayCritical(env, x1, __nx1, __failed ? JNI_ABORT : 0); + if (!__failed) apply = __napply; if (__nwhich) (*env)->ReleaseStringUTFChars(env, which, __nwhich); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dstatn_)(); void Java_dev_ludovic_netlib_arpack_JNIARPACK_dstatnK(JNIEnv *env, UNUSED jobject obj) { - jboolean failed = FALSE; - + jboolean __failed = FALSE; dstatn_(); done: - - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sstatn_)(); void Java_dev_ludovic_netlib_arpack_JNIARPACK_sstatnK(JNIEnv *env, UNUSED jobject obj) { - jboolean failed = FALSE; - + jboolean __failed = FALSE; sstatn_(); done: - - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dstats_)(); void Java_dev_ludovic_netlib_arpack_JNIARPACK_dstatsK(JNIEnv *env, UNUSED jobject obj) { - jboolean failed = FALSE; - + jboolean __failed = FALSE; dstats_(); done: - - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sstats_)(); void Java_dev_ludovic_netlib_arpack_JNIARPACK_sstatsK(JNIEnv *env, UNUSED jobject obj) { - jboolean failed = FALSE; - + jboolean __failed = FALSE; sstats_(); done: - - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dstqrb_)(int *n, double *d, double *e, double *z, double *work, int *info); void Java_dev_ludovic_netlib_arpack_JNIARPACK_dstqrbK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray z, jint offsetz, jdoubleArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; double *__nd = NULL; double *__ne = NULL; double *__nz = NULL; double *__nwork = NULL; + jboolean __failed = FALSE; + int __ninfo = 0; + double *__nd = NULL; + double *__ne = NULL; + double *__nz = NULL; + double *__nwork = NULL; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } dstqrb_(&n, __nd + offsetd, __ne + offsete, __nz + offsetz, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sstqrb_)(int *n, float *d, float *e, float *z, float *work, int *info); void Java_dev_ludovic_netlib_arpack_JNIARPACK_sstqrbK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray d, jint offsetd, jfloatArray e, jint offsete, jfloatArray z, jint offsetz, jfloatArray work, jint offsetwork, jobject info) { - jboolean failed = FALSE; - int __ninfo = 0; float *__nd = NULL; float *__ne = NULL; float *__nz = NULL; float *__nwork = NULL; + jboolean __failed = FALSE; + int __ninfo = 0; + float *__nd = NULL; + float *__ne = NULL; + float *__nz = NULL; + float *__nwork = NULL; __ninfo = (*env)->GetIntField(env, info, intW_val_fieldID); - if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) goto fail; - if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) goto fail; - if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) goto fail; - if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) goto fail; + if (!(__nd = (*env)->GetPrimitiveArrayCritical(env, d, NULL))) { __failed = TRUE; goto done; } + if (!(__ne = (*env)->GetPrimitiveArrayCritical(env, e, NULL))) { __failed = TRUE; goto done; } + if (!(__nz = (*env)->GetPrimitiveArrayCritical(env, z, NULL))) { __failed = TRUE; goto done; } + if (!(__nwork = (*env)->GetPrimitiveArrayCritical(env, work, NULL))) { __failed = TRUE; goto done; } sstqrb_(&n, __nd + offsetd, __ne + offsete, __nz + offsetz, __nwork + offsetwork, &__ninfo); done: - if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, failed ? JNI_ABORT : 0); - if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, failed ? JNI_ABORT : 0); - if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, failed ? JNI_ABORT : 0); - if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, failed ? JNI_ABORT : 0); - if (!failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nwork) (*env)->ReleasePrimitiveArrayCritical(env, work, __nwork, __failed ? JNI_ABORT : 0); + if (__nz) (*env)->ReleasePrimitiveArrayCritical(env, z, __nz, __failed ? JNI_ABORT : 0); + if (__ne) (*env)->ReleasePrimitiveArrayCritical(env, e, __ne, __failed ? JNI_ABORT : 0); + if (__nd) (*env)->ReleasePrimitiveArrayCritical(env, d, __nd, __failed ? JNI_ABORT : 0); + if (!__failed) (*env)->SetIntField(env, info, intW_val_fieldID, __ninfo); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static int (*icnteq_)(int *n, int *array, int *value); jint Java_dev_ludovic_netlib_arpack_JNIARPACK_icnteqK(JNIEnv *env, UNUSED jobject obj, jint n, jintArray array, jint offsetarray, jint value) { - jint __ret; - jboolean failed = FALSE; + jint __ret = 0; + jboolean __failed = FALSE; int *__narray = NULL; - if (!(__narray = (*env)->GetPrimitiveArrayCritical(env, array, NULL))) goto fail; + if (!(__narray = (*env)->GetPrimitiveArrayCritical(env, array, NULL))) { __failed = TRUE; goto done; } __ret = icnteq_(&n, __narray + offsetarray, &value); done: - if (__narray) (*env)->ReleasePrimitiveArrayCritical(env, array, __narray, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); + if (__narray) (*env)->ReleasePrimitiveArrayCritical(env, array, __narray, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static void (*icopy_)(int *n, int *lx, int *incx, int *ly, int *incy); void Java_dev_ludovic_netlib_arpack_JNIARPACK_icopyK(JNIEnv *env, UNUSED jobject obj, jint n, jintArray lx, jint offsetlx, jint incx, jintArray ly, jint offsetly, jint incy) { - jboolean failed = FALSE; - int *__nlx = NULL; int *__nly = NULL; - if (!(__nlx = (*env)->GetPrimitiveArrayCritical(env, lx, NULL))) goto fail; - if (!(__nly = (*env)->GetPrimitiveArrayCritical(env, ly, NULL))) goto fail; + jboolean __failed = FALSE; + int *__nlx = NULL; + int *__nly = NULL; + if (!(__nlx = (*env)->GetPrimitiveArrayCritical(env, lx, NULL))) { __failed = TRUE; goto done; } + if (!(__nly = (*env)->GetPrimitiveArrayCritical(env, ly, NULL))) { __failed = TRUE; goto done; } icopy_(&n, __nlx + offsetlx, &incx, __nly + offsetly, &incy); done: - if (__nly) (*env)->ReleasePrimitiveArrayCritical(env, ly, __nly, failed ? JNI_ABORT : 0); - if (__nlx) (*env)->ReleasePrimitiveArrayCritical(env, lx, __nlx, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nly) (*env)->ReleasePrimitiveArrayCritical(env, ly, __nly, __failed ? JNI_ABORT : 0); + if (__nlx) (*env)->ReleasePrimitiveArrayCritical(env, lx, __nlx, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*iset_)(int *n, int *value, int *array, int *inc); void Java_dev_ludovic_netlib_arpack_JNIARPACK_isetK(JNIEnv *env, UNUSED jobject obj, jint n, jint value, jintArray array, jint offsetarray, jint inc) { - jboolean failed = FALSE; + jboolean __failed = FALSE; int *__narray = NULL; - if (!(__narray = (*env)->GetPrimitiveArrayCritical(env, array, NULL))) goto fail; + if (!(__narray = (*env)->GetPrimitiveArrayCritical(env, array, NULL))) { __failed = TRUE; goto done; } iset_(&n, &value, __narray + offsetarray, &inc); done: - if (__narray) (*env)->ReleasePrimitiveArrayCritical(env, array, __narray, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__narray) (*env)->ReleasePrimitiveArrayCritical(env, array, __narray, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*iswap_)(int *n, int *sx, int *incx, int *sy, int *incy); void Java_dev_ludovic_netlib_arpack_JNIARPACK_iswapK(JNIEnv *env, UNUSED jobject obj, jint n, jintArray sx, jint offsetsx, jint incx, jintArray sy, jint offsetsy, jint incy) { - jboolean failed = FALSE; - int *__nsx = NULL; int *__nsy = NULL; - if (!(__nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto fail; - if (!(__nsy = (*env)->GetPrimitiveArrayCritical(env, sy, NULL))) goto fail; + jboolean __failed = FALSE; + int *__nsx = NULL; + int *__nsy = NULL; + if (!(__nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) { __failed = TRUE; goto done; } + if (!(__nsy = (*env)->GetPrimitiveArrayCritical(env, sy, NULL))) { __failed = TRUE; goto done; } iswap_(&n, __nsx + offsetsx, &incx, __nsy + offsetsy, &incy); done: - if (__nsy) (*env)->ReleasePrimitiveArrayCritical(env, sy, __nsy, failed ? JNI_ABORT : 0); - if (__nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, __nsx, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nsy) (*env)->ReleasePrimitiveArrayCritical(env, sy, __nsy, __failed ? JNI_ABORT : 0); + if (__nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, __nsx, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*second_)(float *t); void Java_dev_ludovic_netlib_arpack_JNIARPACK_secondK(JNIEnv *env, UNUSED jobject obj, jobject t) { - jboolean failed = FALSE; + jboolean __failed = FALSE; float __nt = 0; __nt = (*env)->GetFloatField(env, t, floatW_val_fieldID); second_(&__nt); done: - if (!failed) (*env)->SetFloatField(env, t, floatW_val_fieldID, __nt); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; -} - -// static void (*dlaqrb_)(int *wantt, int *n, int *ilo, int *ihi, double *h, int *ldh, double *wr, double *wi, double *z, int *info); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_dlaqrbK(JNIEnv *env, UNUSED jobject obj, jboolean wantt, jint n, jint ilo, jint ihi, jdoubleArray h, jint offseth, jint ldh, jdoubleArray wr, jint offsetwr, jdoubleArray wi, jint offsetwi, jdoubleArray z, jint offsetz, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); -} - -// static void (*slaqrb_)(int *wantt, int *n, int *ilo, int *ihi, float *h, int *ldh, float *wr, float *wi, float *z, int *info); - -void Java_dev_ludovic_netlib_arpack_JNIARPACK_slaqrbK(JNIEnv *env, UNUSED jobject obj, jboolean wantt, jint n, jint ilo, jint ihi, jfloatArray h, jint offseth, jint ldh, jfloatArray wr, jint offsetwr, jfloatArray wi, jint offsetwi, jfloatArray z, jint offsetz, jobject info) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/UnsupportedOperationException"), "not implemented"); + if (!__failed) (*env)->SetFloatField(env, t, floatW_val_fieldID, __nt); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } jboolean get_system_property(JNIEnv *env, jstring key, jstring def, jstring *res) { @@ -1618,6 +1708,78 @@ jboolean get_system_property(JNIEnv *env, jstring key, jstring def, jstring *res return TRUE; } +static void *libhandle; + +jboolean load_symbols(void) { +#define LOAD_SYMBOL(name) \ + name = dlsym(libhandle, #name); \ + if (!name) { \ + return FALSE; \ + } + + LOAD_SYMBOL(dmout_); + LOAD_SYMBOL(smout_); + LOAD_SYMBOL(dvout_); + LOAD_SYMBOL(svout_); + LOAD_SYMBOL(ivout_); + LOAD_SYMBOL(dgetv0_); + LOAD_SYMBOL(sgetv0_); + // LOAD_SYMBOL(dlaqrb_); + // LOAD_SYMBOL(slaqrb_); + LOAD_SYMBOL(dnaitr_); + LOAD_SYMBOL(snaitr_); + LOAD_SYMBOL(dnapps_); + LOAD_SYMBOL(snapps_); + LOAD_SYMBOL(dnaup2_); + LOAD_SYMBOL(snaup2_); + LOAD_SYMBOL(dnaupd_); + LOAD_SYMBOL(snaupd_); + LOAD_SYMBOL(dnconv_); + LOAD_SYMBOL(snconv_); + LOAD_SYMBOL(dsconv_); + LOAD_SYMBOL(ssconv_); + LOAD_SYMBOL(dneigh_); + LOAD_SYMBOL(sneigh_); + LOAD_SYMBOL(dneupd_); + LOAD_SYMBOL(sneupd_); + LOAD_SYMBOL(dngets_); + LOAD_SYMBOL(sngets_); + LOAD_SYMBOL(dsaitr_); + LOAD_SYMBOL(ssaitr_); + LOAD_SYMBOL(dsapps_); + LOAD_SYMBOL(ssapps_); + LOAD_SYMBOL(dsaup2_); + LOAD_SYMBOL(ssaup2_); + LOAD_SYMBOL(dseigt_); + LOAD_SYMBOL(sseigt_); + LOAD_SYMBOL(dsesrt_); + LOAD_SYMBOL(ssesrt_); + LOAD_SYMBOL(dsaupd_); + LOAD_SYMBOL(ssaupd_); + LOAD_SYMBOL(dseupd_); + LOAD_SYMBOL(sseupd_); + LOAD_SYMBOL(dsgets_); + LOAD_SYMBOL(ssgets_); + LOAD_SYMBOL(dsortc_); + LOAD_SYMBOL(ssortc_); + LOAD_SYMBOL(dsortr_); + LOAD_SYMBOL(ssortr_); + LOAD_SYMBOL(dstatn_); + LOAD_SYMBOL(sstatn_); + LOAD_SYMBOL(dstats_); + LOAD_SYMBOL(sstats_); + LOAD_SYMBOL(dstqrb_); + LOAD_SYMBOL(sstqrb_); + LOAD_SYMBOL(icnteq_); + LOAD_SYMBOL(icopy_); + LOAD_SYMBOL(iset_); + LOAD_SYMBOL(iswap_); + LOAD_SYMBOL(second_); + +#undef LOAD_SYMBOL + return TRUE; +} + jint JNI_OnLoad(JavaVM *vm, UNUSED void *reserved) { JNIEnv *env; if ((*vm)->GetEnv(vm, (void**)&env, JNI_VERSION_1_6) != JNI_OK) { @@ -1678,95 +1840,32 @@ jint JNI_OnLoad(JavaVM *vm, UNUSED void *reserved) { return -1; } - char arpack_name[1024]; + char name[1024]; if (property_nativeLibPath) { const char *utf = (*env)->GetStringUTFChars(env, property_nativeLibPath, NULL); - snprintf(arpack_name, sizeof(arpack_name), "%s", utf); + snprintf(name, sizeof(name), "%s", utf); (*env)->ReleaseStringUTFChars(env, property_nativeLibPath, utf); } else if (property_nativeLib) { const char *utf = (*env)->GetStringUTFChars(env, property_nativeLib, NULL); - snprintf(arpack_name, sizeof(arpack_name), "lib%s.so", utf); + snprintf(name, sizeof(name), "lib%s.so", utf); (*env)->ReleaseStringUTFChars(env, property_nativeLib, utf); } else { /* either property_nativeLibPath or property_nativeLib should always be non-NULL */ return -1; } - arpack = dlopen(arpack_name, RTLD_LAZY); - if (!arpack) { + libhandle = dlopen(name, RTLD_LAZY); + if (!libhandle) { return -1; } -#define LOAD_SYMBOL(name) \ - name = dlsym(arpack, #name); \ - if (!name) { \ - return -1; \ + if (!load_symbols()) { + return -1; } - LOAD_SYMBOL(dmout_) - LOAD_SYMBOL(smout_) - LOAD_SYMBOL(dvout_) - LOAD_SYMBOL(svout_) - LOAD_SYMBOL(ivout_) - LOAD_SYMBOL(dgetv0_) - LOAD_SYMBOL(sgetv0_) - // LOAD_SYMBOL(dlaqrb_) - // LOAD_SYMBOL(slaqrb_) - LOAD_SYMBOL(dnaitr_) - LOAD_SYMBOL(snaitr_) - LOAD_SYMBOL(dnapps_) - LOAD_SYMBOL(snapps_) - LOAD_SYMBOL(dnaup2_) - LOAD_SYMBOL(snaup2_) - LOAD_SYMBOL(dnaupd_) - LOAD_SYMBOL(snaupd_) - LOAD_SYMBOL(dnconv_) - LOAD_SYMBOL(snconv_) - LOAD_SYMBOL(dsconv_) - LOAD_SYMBOL(ssconv_) - LOAD_SYMBOL(dneigh_) - LOAD_SYMBOL(sneigh_) - LOAD_SYMBOL(dneupd_) - LOAD_SYMBOL(sneupd_) - LOAD_SYMBOL(dngets_) - LOAD_SYMBOL(sngets_) - LOAD_SYMBOL(dsaitr_) - LOAD_SYMBOL(ssaitr_) - LOAD_SYMBOL(dsapps_) - LOAD_SYMBOL(ssapps_) - LOAD_SYMBOL(dsaup2_) - LOAD_SYMBOL(ssaup2_) - LOAD_SYMBOL(dseigt_) - LOAD_SYMBOL(sseigt_) - LOAD_SYMBOL(dsesrt_) - LOAD_SYMBOL(ssesrt_) - LOAD_SYMBOL(dsaupd_) - LOAD_SYMBOL(ssaupd_) - LOAD_SYMBOL(dseupd_) - LOAD_SYMBOL(sseupd_) - LOAD_SYMBOL(dsgets_) - LOAD_SYMBOL(ssgets_) - LOAD_SYMBOL(dsortc_) - LOAD_SYMBOL(ssortc_) - LOAD_SYMBOL(dsortr_) - LOAD_SYMBOL(ssortr_) - LOAD_SYMBOL(dstatn_) - LOAD_SYMBOL(sstatn_) - LOAD_SYMBOL(dstats_) - LOAD_SYMBOL(sstats_) - LOAD_SYMBOL(dstqrb_) - LOAD_SYMBOL(sstqrb_) - LOAD_SYMBOL(icnteq_) - LOAD_SYMBOL(icopy_) - LOAD_SYMBOL(iset_) - LOAD_SYMBOL(iswap_) - LOAD_SYMBOL(second_) - -#undef LOAD_SYMBOL - return JNI_VERSION_1_6; } void JNI_OnUnload(UNUSED JavaVM *vm, UNUSED void *reserved) { - dlclose(arpack); + dlclose(libhandle); } diff --git a/blas/src/main/java/dev/ludovic/netlib/blas/AbstractBLAS.java b/blas/src/main/java/dev/ludovic/netlib/blas/AbstractBLAS.java index 144dfbfe..f40d8719 100644 --- a/blas/src/main/java/dev/ludovic/netlib/blas/AbstractBLAS.java +++ b/blas/src/main/java/dev/ludovic/netlib/blas/AbstractBLAS.java @@ -1082,7 +1082,8 @@ public int idamax(int n, double[] x, int offsetx, int incx) { if (n == 1) { return 0; } - return idamaxK(n, x, offsetx, incx); + // Fortran arrays use 1-based index + return idamaxK(n, x, offsetx, incx) - 1; } protected abstract int idamaxK(int n, double[] x, int offsetx, int incx); @@ -1101,7 +1102,8 @@ public int isamax(int n, float[] x, int offsetx, int incx) { if (n == 1) { return 0; } - return isamaxK(n, x, offsetx, incx); + // Fortran arrays use 1-based index + return isamaxK(n, x, offsetx, incx) - 1; } protected abstract int isamaxK(int n, float[] x, int offsetx, int incx); diff --git a/blas/src/main/java/dev/ludovic/netlib/blas/F2jBLAS.java b/blas/src/main/java/dev/ludovic/netlib/blas/F2jBLAS.java index 3d9ca786..d0a8dab6 100644 --- a/blas/src/main/java/dev/ludovic/netlib/blas/F2jBLAS.java +++ b/blas/src/main/java/dev/ludovic/netlib/blas/F2jBLAS.java @@ -233,11 +233,9 @@ protected void strsvK(String uplo, String trans, String diag, int n, float[] a, org.netlib.blas.Strsv.strsv(uplo, trans, diag, n, a, offseta, lda, x, offsetx, incx); } protected int idamaxK(int n, double[] x, int offsetx, int incx) { - // F2j returns 1-based index because that's how Fortran works - return org.netlib.blas.Idamax.idamax(n, x, offsetx, incx) - 1; + return org.netlib.blas.Idamax.idamax(n, x, offsetx, incx); } protected int isamaxK(int n, float[] x, int offsetx, int incx) { - // F2j returns 1-based index because that's how Fortran works - return org.netlib.blas.Isamax.isamax(n, x, offsetx, incx) - 1; + return org.netlib.blas.Isamax.isamax(n, x, offsetx, incx); } } diff --git a/blas/src/main/java/dev/ludovic/netlib/blas/ForeignLinkerBLAS.java b/blas/src/main/java/dev/ludovic/netlib/blas/ForeignLinkerBLAS.java index 62560aa1..fb05172c 100644 --- a/blas/src/main/java/dev/ludovic/netlib/blas/ForeignLinkerBLAS.java +++ b/blas/src/main/java/dev/ludovic/netlib/blas/ForeignLinkerBLAS.java @@ -1051,7 +1051,7 @@ protected void strsvK(String uplo, String trans, String diag, int n, float[] a, protected int idamaxK(int n, double[] dx, int offsetdx, int incdx) { try (MemorySegment pdx = segment(dx, offsetdx); MemoryNativeCopy cpdx = copy(pdx)) { - return (int)idamaxHandle.invoke(n, cpdx.address(), incdx); + return (int)idamaxHandle.invoke(n, cpdx.address(), incdx) + 1; } catch (Throwable t) { throw new RuntimeException(t); } @@ -1064,7 +1064,7 @@ protected int idamaxK(int n, double[] dx, int offsetdx, int incdx) { protected int isamaxK(int n, float[] sx, int offsetsx, int incx) { try (MemorySegment psx = segment(sx, offsetsx); MemoryNativeCopy cpsx = copy(psx)) { - return (int)isamaxHandle.invoke(n, cpsx.address(), incx); + return (int)isamaxHandle.invoke(n, cpsx.address(), incx) + 1; } catch (Throwable t) { throw new RuntimeException(t); } diff --git a/blas/src/main/java/dev/ludovic/netlib/blas/Java8BLAS.java b/blas/src/main/java/dev/ludovic/netlib/blas/Java8BLAS.java index f4178558..76d64f8e 100644 --- a/blas/src/main/java/dev/ludovic/netlib/blas/Java8BLAS.java +++ b/blas/src/main/java/dev/ludovic/netlib/blas/Java8BLAS.java @@ -5148,12 +5148,10 @@ protected void strsvK(String uplo, String trans, String diag, int n, float[] a, } protected int idamaxK(int n, double[] x, int offsetx, int incx) { - //FIXME: figure out why f2j is faster than previous implementation - return org.netlib.blas.Idamax.idamax(n, x, offsetx, incx) - 1; + return org.netlib.blas.Idamax.idamax(n, x, offsetx, incx); } protected int isamaxK(int n, float[] x, int offsetx, int incx) { - //FIXME: figure out why f2j is faster than previous implementation - return org.netlib.blas.Isamax.isamax(n, x, offsetx, incx) - 1; + return org.netlib.blas.Isamax.isamax(n, x, offsetx, incx); } } diff --git a/blas/src/main/native/jni.c b/blas/src/main/native/jni.c index ba71ceda..911e7cc8 100644 --- a/blas/src/main/native/jni.c +++ b/blas/src/main/native/jni.c @@ -24,10 +24,8 @@ */ #include -#include - -#include #include +#include #include "dev_ludovic_netlib_blas_JNIBLAS.h" @@ -42,1439 +40,1345 @@ static jfieldID floatW_val_fieldID; static jfieldID doubleW_val_fieldID; static jfieldID StringW_val_fieldID; -static void *blas; - -static void throwOOM(JNIEnv *env) { - (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); -} - static double (*dasum_)(int *n, double *x, int *incx); jdouble Java_dev_ludovic_netlib_blas_JNIBLAS_dasumK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray x, jint offsetx, jint incx) { - jdouble __ret; - jboolean failed = FALSE; + jdouble __ret = 0; + jboolean __failed = FALSE; double *__nx = NULL; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } __ret = dasum_(&n, __nx + offsetx, &incx); done: if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static float (*sasum_)(int *n, float *x, int *incx); jfloat Java_dev_ludovic_netlib_blas_JNIBLAS_sasumK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray x, jint offsetx, jint incx) { - jfloat __ret; - jboolean failed = FALSE; + jfloat __ret = 0; + jboolean __failed = FALSE; float *__nx = NULL; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } __ret = sasum_(&n, __nx + offsetx, &incx); done: if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static void (*daxpy_)(int *n, double *alpha, double *x, int *incx, double *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_daxpyK(JNIEnv *env, UNUSED jobject obj, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy) { - jboolean failed = FALSE; - double *__nx = NULL; double *__ny = NULL; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + jboolean __failed = FALSE; + double *__nx = NULL; + double *__ny = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } daxpy_(&n, &alpha, __nx + offsetx, &incx, __ny + offsety, &incy); done: - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*saxpy_)(int *n, float *alpha, float *x, int *incx, float *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_saxpyK(JNIEnv *env, UNUSED jobject obj, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy) { - jboolean failed = FALSE; - float *__nx = NULL; float *__ny = NULL; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + jboolean __failed = FALSE; + float *__nx = NULL; + float *__ny = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } saxpy_(&n, &alpha, __nx + offsetx, &incx, __ny + offsety, &incy); done: - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dcopy_)(int *n, double *x, int *incx, double *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_dcopyK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy) { - jboolean failed = FALSE; - double *__nx = NULL; double *__ny = NULL; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + jboolean __failed = FALSE; + double *__nx = NULL; + double *__ny = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } dcopy_(&n, __nx + offsetx, &incx, __ny + offsety, &incy); done: - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*scopy_)(int *n, float *x, int *incx, float *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_scopyK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy) { - jboolean failed = FALSE; - float *__nx = NULL; float *__ny = NULL; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + jboolean __failed = FALSE; + float *__nx = NULL; + float *__ny = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } scopy_(&n, __nx + offsetx, &incx, __ny + offsety, &incy); done: - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static double (*ddot_)(int *n, double *x, int *incx, double *y, int *incy); jdouble Java_dev_ludovic_netlib_blas_JNIBLAS_ddotK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy) { - jdouble __ret; - jboolean failed = FALSE; - double *__nx = NULL; double *__ny = NULL; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + jdouble __ret = 0; + jboolean __failed = FALSE; + double *__nx = NULL; + double *__ny = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } __ret = ddot_(&n, __nx + offsetx, &incx, __ny + offsety, &incy); done: if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, JNI_ABORT); if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static float (*sdot_)(int *n, float *x, int *incx, float *y, int *incy); jfloat Java_dev_ludovic_netlib_blas_JNIBLAS_sdotK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy) { - jfloat __ret; - jboolean failed = FALSE; - float *__nx = NULL; float *__ny = NULL; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + jfloat __ret = 0; + jboolean __failed = FALSE; + float *__nx = NULL; + float *__ny = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } __ret = sdot_(&n, __nx + offsetx, &incx, __ny + offsety, &incy); done: if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, JNI_ABORT); if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static float (*sdsdot_)(int *n, float *sb, float *sx, int *incsx, float *sy, int *incsy); jfloat Java_dev_ludovic_netlib_blas_JNIBLAS_sdsdotK(JNIEnv *env, UNUSED jobject obj, jint n, jfloat sb, jfloatArray sx, jint offsetsx, jint incsx, jfloatArray sy, jint offsetsy, jint incsy) { - jfloat __ret; - jboolean failed = FALSE; - float *__nsx = NULL; float *__nsy = NULL; - if (!(__nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto fail; - if (!(__nsy = (*env)->GetPrimitiveArrayCritical(env, sy, NULL))) goto fail; + jfloat __ret = 0; + jboolean __failed = FALSE; + float *__nsx = NULL; + float *__nsy = NULL; + if (!(__nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) { __failed = TRUE; goto done; } + if (!(__nsy = (*env)->GetPrimitiveArrayCritical(env, sy, NULL))) { __failed = TRUE; goto done; } __ret = sdsdot_(&n, &sb, __nsx + offsetsx, &incsx, __nsy + offsetsy, &incsy); done: if (__nsy) (*env)->ReleasePrimitiveArrayCritical(env, sy, __nsy, JNI_ABORT); if (__nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, __nsx, JNI_ABORT); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static void (*dgbmv_)(const char *trans, int *m, int *n, int *kl, int *ku, double *alpha, double *a, int *lda, double *x, int *incx, double *beta, double *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_dgbmvK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint m, jint n, jint kl, jint ku, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx, jdouble beta, jdoubleArray y, jint offsety, jint incy) { - jboolean failed = FALSE; - const char *__ntrans = NULL; double *__na = NULL; double *__nx = NULL; double *__ny = NULL; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ntrans = NULL; + double *__na = NULL; + double *__nx = NULL; + double *__ny = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } dgbmv_(__ntrans, &m, &n, &kl, &ku, &alpha, __na + offseta, &lda, __nx + offsetx, &incx, &beta, __ny + offsety, &incy); done: - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgbmv_)(const char *trans, int *m, int *n, int *kl, int *ku, float *alpha, float *a, int *lda, float *x, int *incx, float *beta, float *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_sgbmvK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint m, jint n, jint kl, jint ku, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx, jfloat beta, jfloatArray y, jint offsety, jint incy) { - jboolean failed = FALSE; - const char *__ntrans = NULL; float *__na = NULL; float *__nx = NULL; float *__ny = NULL; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ntrans = NULL; + float *__na = NULL; + float *__nx = NULL; + float *__ny = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } sgbmv_(__ntrans, &m, &n, &kl, &ku, &alpha, __na + offseta, &lda, __nx + offsetx, &incx, &beta, __ny + offsety, &incy); done: - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgemm_)(const char *transa, const char *transb, int *m, int *n, int *k, double *alpha, double *a, int *lda, double *b, int *ldb, double *beta, double *c, int *ldc); void Java_dev_ludovic_netlib_blas_JNIBLAS_dgemmK(JNIEnv *env, UNUSED jobject obj, jstring transa, jstring transb, jint m, jint n, jint k, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble beta, jdoubleArray c, jint offsetc, jint ldc) { - jboolean failed = FALSE; - const char *__ntransa = NULL; const char *__ntransb = NULL; double *__na = NULL; double *__nb = NULL; double *__nc = NULL; - if (!(__ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) goto fail; - if (!(__ntransb = (*env)->GetStringUTFChars(env, transb, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ntransa = NULL; + const char *__ntransb = NULL; + double *__na = NULL; + double *__nb = NULL; + double *__nc = NULL; + if (!(__ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) { __failed = TRUE; goto done; } + if (!(__ntransb = (*env)->GetStringUTFChars(env, transb, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } dgemm_(__ntransa, __ntransb, &m, &n, &k, &alpha, __na + offseta, &lda, __nb + offsetb, &ldb, &beta, __nc + offsetc, &ldc); done: - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, JNI_ABORT); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__ntransb) (*env)->ReleaseStringUTFChars(env, transb, __ntransb); if (__ntransa) (*env)->ReleaseStringUTFChars(env, transa, __ntransa); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgemm_)(const char *transa, const char *transb, int *m, int *n, int *k, float *alpha, float *a, int *lda, float *b, int *ldb, float *beta, float *c, int *ldc); void Java_dev_ludovic_netlib_blas_JNIBLAS_sgemmK(JNIEnv *env, UNUSED jobject obj, jstring transa, jstring transb, jint m, jint n, jint k, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat beta, jfloatArray c, jint offsetc, jint ldc) { - jboolean failed = FALSE; - const char *__ntransa = NULL; const char *__ntransb = NULL; float *__na = NULL; float *__nb = NULL; float *__nc = NULL; - if (!(__ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) goto fail; - if (!(__ntransb = (*env)->GetStringUTFChars(env, transb, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ntransa = NULL; + const char *__ntransb = NULL; + float *__na = NULL; + float *__nb = NULL; + float *__nc = NULL; + if (!(__ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) { __failed = TRUE; goto done; } + if (!(__ntransb = (*env)->GetStringUTFChars(env, transb, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } sgemm_(__ntransa, __ntransb, &m, &n, &k, &alpha, __na + offseta, &lda, __nb + offsetb, &ldb, &beta, __nc + offsetc, &ldc); done: - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, JNI_ABORT); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__ntransb) (*env)->ReleaseStringUTFChars(env, transb, __ntransb); if (__ntransa) (*env)->ReleaseStringUTFChars(env, transa, __ntransa); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dgemv_)(const char *trans, int *m, int *n, double *alpha, double *a, int *lda, double *x, int *incx, double *beta, double *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_dgemvK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint m, jint n, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx, jdouble beta, jdoubleArray y, jint offsety, jint incy) { - jboolean failed = FALSE; - const char *__ntrans = NULL; double *__na = NULL; double *__nx = NULL; double *__ny = NULL; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ntrans = NULL; + double *__na = NULL; + double *__nx = NULL; + double *__ny = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } dgemv_(__ntrans, &m, &n, &alpha, __na + offseta, &lda, __nx + offsetx, &incx, &beta, __ny + offsety, &incy); done: - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sgemv_)(const char *trans, int *m, int *n, float *alpha, float *a, int *lda, float *x, int *incx, float *beta, float *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_sgemvK(JNIEnv *env, UNUSED jobject obj, jstring trans, jint m, jint n, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx, jfloat beta, jfloatArray y, jint offsety, jint incy) { - jboolean failed = FALSE; - const char *__ntrans = NULL; float *__na = NULL; float *__nx = NULL; float *__ny = NULL; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__ntrans = NULL; + float *__na = NULL; + float *__nx = NULL; + float *__ny = NULL; + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } sgemv_(__ntrans, &m, &n, &alpha, __na + offseta, &lda, __nx + offsetx, &incx, &beta, __ny + offsety, &incy); done: - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dger_)(int *m, int *n, double *alpha, double *x, int *incx, double *y, int *incy, double *a, int *lda); void Java_dev_ludovic_netlib_blas_JNIBLAS_dgerK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy, jdoubleArray a, jint offseta, jint lda) { - jboolean failed = FALSE; - double *__nx = NULL; double *__ny = NULL; double *__na = NULL; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + jboolean __failed = FALSE; + double *__nx = NULL; + double *__ny = NULL; + double *__na = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } dger_(&m, &n, &alpha, __nx + offsetx, &incx, __ny + offsety, &incy, __na + offseta, &lda); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, JNI_ABORT); if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sger_)(int *m, int *n, float *alpha, float *x, int *incx, float *y, int *incy, float *a, int *lda); void Java_dev_ludovic_netlib_blas_JNIBLAS_sgerK(JNIEnv *env, UNUSED jobject obj, jint m, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy, jfloatArray a, jint offseta, jint lda) { - jboolean failed = FALSE; - float *__nx = NULL; float *__ny = NULL; float *__na = NULL; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + jboolean __failed = FALSE; + float *__nx = NULL; + float *__ny = NULL; + float *__na = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } sger_(&m, &n, &alpha, __nx + offsetx, &incx, __ny + offsety, &incy, __na + offseta, &lda); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, JNI_ABORT); if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static double (*dnrm2_)(int *n, double *x, int *incx); jdouble Java_dev_ludovic_netlib_blas_JNIBLAS_dnrm2K(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray x, jint offsetx, jint incx) { - jdouble __ret; - jboolean failed = FALSE; + jdouble __ret = 0; + jboolean __failed = FALSE; double *__nx = NULL; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } __ret = dnrm2_(&n, __nx + offsetx, &incx); done: if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static float (*snrm2_)(int *n, float *x, int *incx); jfloat Java_dev_ludovic_netlib_blas_JNIBLAS_snrm2K(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray x, jint offsetx, jint incx) { - jfloat __ret; - jboolean failed = FALSE; + jfloat __ret = 0; + jboolean __failed = FALSE; float *__nx = NULL; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } __ret = snrm2_(&n, __nx + offsetx, &incx); done: if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static void (*drot_)(int *n, double *dx, int *incx, double *dy, int *incy, double *c, double *s); void Java_dev_ludovic_netlib_blas_JNIBLAS_drotK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray dx, jint offsetdx, jint incx, jdoubleArray dy, jint offsetdy, jint incy, jdouble c, jdouble s) { - jboolean failed = FALSE; - double *__ndx = NULL; double *__ndy = NULL; - if (!(__ndx = (*env)->GetPrimitiveArrayCritical(env, dx, NULL))) goto fail; - if (!(__ndy = (*env)->GetPrimitiveArrayCritical(env, dy, NULL))) goto fail; + jboolean __failed = FALSE; + double *__ndx = NULL; + double *__ndy = NULL; + if (!(__ndx = (*env)->GetPrimitiveArrayCritical(env, dx, NULL))) { __failed = TRUE; goto done; } + if (!(__ndy = (*env)->GetPrimitiveArrayCritical(env, dy, NULL))) { __failed = TRUE; goto done; } drot_(&n, __ndx + offsetdx, &incx, __ndy + offsetdy, &incy, &c, &s); done: - if (__ndy) (*env)->ReleasePrimitiveArrayCritical(env, dy, __ndy, failed ? JNI_ABORT : 0); - if (__ndx) (*env)->ReleasePrimitiveArrayCritical(env, dx, __ndx, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ndy) (*env)->ReleasePrimitiveArrayCritical(env, dy, __ndy, __failed ? JNI_ABORT : 0); + if (__ndx) (*env)->ReleasePrimitiveArrayCritical(env, dx, __ndx, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*srot_)(int *n, float *sx, int *incx, float *sy, int *incy, float *c, float *s); void Java_dev_ludovic_netlib_blas_JNIBLAS_srotK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray sx, jint offsetsx, jint incx, jfloatArray sy, jint offsetsy, jint incy, jfloat c, jfloat s) { - jboolean failed = FALSE; - float *__nsx = NULL; float *__nsy = NULL; - if (!(__nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto fail; - if (!(__nsy = (*env)->GetPrimitiveArrayCritical(env, sy, NULL))) goto fail; + jboolean __failed = FALSE; + float *__nsx = NULL; + float *__nsy = NULL; + if (!(__nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) { __failed = TRUE; goto done; } + if (!(__nsy = (*env)->GetPrimitiveArrayCritical(env, sy, NULL))) { __failed = TRUE; goto done; } srot_(&n, __nsx + offsetsx, &incx, __nsy + offsetsy, &incy, &c, &s); done: - if (__nsy) (*env)->ReleasePrimitiveArrayCritical(env, sy, __nsy, failed ? JNI_ABORT : 0); - if (__nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, __nsx, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nsy) (*env)->ReleasePrimitiveArrayCritical(env, sy, __nsy, __failed ? JNI_ABORT : 0); + if (__nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, __nsx, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*drotm_)(int *n, double *dx, int *incx, double *dy, int *incy, double *dparam); void Java_dev_ludovic_netlib_blas_JNIBLAS_drotmK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray dx, jint offsetdx, jint incx, jdoubleArray dy, jint offsetdy, jint incy, jdoubleArray dparam, jint offsetdparam) { - jboolean failed = FALSE; - double *__ndx = NULL; double *__ndy = NULL; double *__ndparam = NULL; - if (!(__ndx = (*env)->GetPrimitiveArrayCritical(env, dx, NULL))) goto fail; - if (!(__ndy = (*env)->GetPrimitiveArrayCritical(env, dy, NULL))) goto fail; - if (!(__ndparam = (*env)->GetPrimitiveArrayCritical(env, dparam, NULL))) goto fail; + jboolean __failed = FALSE; + double *__ndx = NULL; + double *__ndy = NULL; + double *__ndparam = NULL; + if (!(__ndx = (*env)->GetPrimitiveArrayCritical(env, dx, NULL))) { __failed = TRUE; goto done; } + if (!(__ndy = (*env)->GetPrimitiveArrayCritical(env, dy, NULL))) { __failed = TRUE; goto done; } + if (!(__ndparam = (*env)->GetPrimitiveArrayCritical(env, dparam, NULL))) { __failed = TRUE; goto done; } drotm_(&n, __ndx + offsetdx, &incx, __ndy + offsetdy, &incy, __ndparam + offsetdparam); done: if (__ndparam) (*env)->ReleasePrimitiveArrayCritical(env, dparam, __ndparam, JNI_ABORT); - if (__ndy) (*env)->ReleasePrimitiveArrayCritical(env, dy, __ndy, failed ? JNI_ABORT : 0); + if (__ndy) (*env)->ReleasePrimitiveArrayCritical(env, dy, __ndy, __failed ? JNI_ABORT : 0); if (__ndx) (*env)->ReleasePrimitiveArrayCritical(env, dx, __ndx, JNI_ABORT); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*srotm_)(int *n, float *sx, int *incx, float *sy, int *incy, float *sparam); void Java_dev_ludovic_netlib_blas_JNIBLAS_srotmK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray sx, jint offsetsx, jint incx, jfloatArray sy, jint offsetsy, jint incy, jfloatArray sparam, jint offsetsparam) { - jboolean failed = FALSE; - float *__nsx = NULL; float *__nsy = NULL; float *__nsparam = NULL; - if (!(__nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto fail; - if (!(__nsy = (*env)->GetPrimitiveArrayCritical(env, sy, NULL))) goto fail; - if (!(__nsparam = (*env)->GetPrimitiveArrayCritical(env, sparam, NULL))) goto fail; + jboolean __failed = FALSE; + float *__nsx = NULL; + float *__nsy = NULL; + float *__nsparam = NULL; + if (!(__nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) { __failed = TRUE; goto done; } + if (!(__nsy = (*env)->GetPrimitiveArrayCritical(env, sy, NULL))) { __failed = TRUE; goto done; } + if (!(__nsparam = (*env)->GetPrimitiveArrayCritical(env, sparam, NULL))) { __failed = TRUE; goto done; } srotm_(&n, __nsx + offsetsx, &incx, __nsy + offsetsy, &incy, __nsparam + offsetsparam); done: if (__nsparam) (*env)->ReleasePrimitiveArrayCritical(env, sparam, __nsparam, JNI_ABORT); - if (__nsy) (*env)->ReleasePrimitiveArrayCritical(env, sy, __nsy, failed ? JNI_ABORT : 0); + if (__nsy) (*env)->ReleasePrimitiveArrayCritical(env, sy, __nsy, __failed ? JNI_ABORT : 0); if (__nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, __nsx, JNI_ABORT); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*drotmg_)(double *dd1, double *dd2, double *dx1, double *dy1, double *dparam); void Java_dev_ludovic_netlib_blas_JNIBLAS_drotmgK(JNIEnv *env, UNUSED jobject obj, jobject dd1, jobject dd2, jobject dx1, jdouble dy1, jdoubleArray dparam, jint offsetdparam) { - jboolean failed = FALSE; - double __ndd1 = 0; double __ndd2 = 0; double __ndx1 = 0; double *__ndparam = NULL; + jboolean __failed = FALSE; + double __ndd1 = 0; + double __ndd2 = 0; + double __ndx1 = 0; + double *__ndparam = NULL; __ndd1 = (*env)->GetDoubleField(env, dd1, doubleW_val_fieldID); __ndd2 = (*env)->GetDoubleField(env, dd2, doubleW_val_fieldID); __ndx1 = (*env)->GetDoubleField(env, dx1, doubleW_val_fieldID); - if (!(__ndparam = (*env)->GetPrimitiveArrayCritical(env, dparam, NULL))) goto fail; + if (!(__ndparam = (*env)->GetPrimitiveArrayCritical(env, dparam, NULL))) { __failed = TRUE; goto done; } drotmg_(&__ndd1, &__ndd2, &__ndx1, &dy1, __ndparam + offsetdparam); done: if (__ndparam) (*env)->ReleasePrimitiveArrayCritical(env, dparam, __ndparam, JNI_ABORT); - if (!failed) (*env)->SetDoubleField(env, dx1, doubleW_val_fieldID, __ndx1); - if (!failed) (*env)->SetDoubleField(env, dd2, doubleW_val_fieldID, __ndd2); - if (!failed) (*env)->SetDoubleField(env, dd1, doubleW_val_fieldID, __ndd1); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetDoubleField(env, dx1, doubleW_val_fieldID, __ndx1); + if (!__failed) (*env)->SetDoubleField(env, dd2, doubleW_val_fieldID, __ndd2); + if (!__failed) (*env)->SetDoubleField(env, dd1, doubleW_val_fieldID, __ndd1); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*srotmg_)(float *sd1, float *sd2, float *sx1, float *sy1, float *sparam); void Java_dev_ludovic_netlib_blas_JNIBLAS_srotmgK(JNIEnv *env, UNUSED jobject obj, jobject sd1, jobject sd2, jobject sx1, jfloat sy1, jfloatArray sparam, jint offsetsparam) { - jboolean failed = FALSE; - float __nsd1 = 0; float __nsd2 = 0; float __nsx1 = 0; float *__nsparam = NULL; + jboolean __failed = FALSE; + float __nsd1 = 0; + float __nsd2 = 0; + float __nsx1 = 0; + float *__nsparam = NULL; __nsd1 = (*env)->GetFloatField(env, sd1, floatW_val_fieldID); __nsd2 = (*env)->GetFloatField(env, sd2, floatW_val_fieldID); __nsx1 = (*env)->GetFloatField(env, sx1, floatW_val_fieldID); - if (!(__nsparam = (*env)->GetPrimitiveArrayCritical(env, sparam, NULL))) goto fail; + if (!(__nsparam = (*env)->GetPrimitiveArrayCritical(env, sparam, NULL))) { __failed = TRUE; goto done; } srotmg_(&__nsd1, &__nsd2, &__nsx1, &sy1, __nsparam + offsetsparam); done: if (__nsparam) (*env)->ReleasePrimitiveArrayCritical(env, sparam, __nsparam, JNI_ABORT); - if (!failed) (*env)->SetFloatField(env, sx1, floatW_val_fieldID, __nsx1); - if (!failed) (*env)->SetFloatField(env, sd2, floatW_val_fieldID, __nsd2); - if (!failed) (*env)->SetFloatField(env, sd1, floatW_val_fieldID, __nsd1); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (!__failed) (*env)->SetFloatField(env, sx1, floatW_val_fieldID, __nsx1); + if (!__failed) (*env)->SetFloatField(env, sd2, floatW_val_fieldID, __nsd2); + if (!__failed) (*env)->SetFloatField(env, sd1, floatW_val_fieldID, __nsd1); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsbmv_)(const char *uplo, int *n, int *k, double *alpha, double *a, int *lda, double *x, int *incx, double *beta, double *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_dsbmvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint k, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx, jdouble beta, jdoubleArray y, jint offsety, jint incy) { - jboolean failed = FALSE; - const char *__nuplo = NULL; double *__na = NULL; double *__nx = NULL; double *__ny = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + double *__na = NULL; + double *__nx = NULL; + double *__ny = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } dsbmv_(__nuplo, &n, &k, &alpha, __na + offseta, &lda, __nx + offsetx, &incx, &beta, __ny + offsety, &incy); done: - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssbmv_)(const char *uplo, int *n, int *k, float *alpha, float *a, int *lda, float *x, int *incx, float *beta, float *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_ssbmvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jint k, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx, jfloat beta, jfloatArray y, jint offsety, jint incy) { - jboolean failed = FALSE; - const char *__nuplo = NULL; float *__na = NULL; float *__nx = NULL; float *__ny = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + float *__na = NULL; + float *__nx = NULL; + float *__ny = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } ssbmv_(__nuplo, &n, &k, &alpha, __na + offseta, &lda, __nx + offsetx, &incx, &beta, __ny + offsety, &incy); done: - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dscal_)(int *n, double *alpha, double *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_dscalK(JNIEnv *env, UNUSED jobject obj, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx) { - jboolean failed = FALSE; + jboolean __failed = FALSE; double *__nx = NULL; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } dscal_(&n, &alpha, __nx + offsetx, &incx); done: - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sscal_)(int *n, float *alpha, float *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_sscalK(JNIEnv *env, UNUSED jobject obj, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx) { - jboolean failed = FALSE; + jboolean __failed = FALSE; float *__nx = NULL; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } sscal_(&n, &alpha, __nx + offsetx, &incx); done: - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dspmv_)(const char *uplo, int *n, double *alpha, double *a, double *x, int *incx, double *beta, double *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_dspmvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdouble alpha, jdoubleArray a, jint offseta, jdoubleArray x, jint offsetx, jint incx, jdouble beta, jdoubleArray y, jint offsety, jint incy) { - jboolean failed = FALSE; - const char *__nuplo = NULL; double *__na = NULL; double *__nx = NULL; double *__ny = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + double *__na = NULL; + double *__nx = NULL; + double *__ny = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } dspmv_(__nuplo, &n, &alpha, __na + offseta, __nx + offsetx, &incx, &beta, __ny + offsety, &incy); done: - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sspmv_)(const char *uplo, int *n, float *alpha, float *a, float *x, int *incx, float *beta, float *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_sspmvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloat alpha, jfloatArray a, jint offseta, jfloatArray x, jint offsetx, jint incx, jfloat beta, jfloatArray y, jint offsety, jint incy) { - jboolean failed = FALSE; - const char *__nuplo = NULL; float *__na = NULL; float *__nx = NULL; float *__ny = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + float *__na = NULL; + float *__nx = NULL; + float *__ny = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } sspmv_(__nuplo, &n, &alpha, __na + offseta, __nx + offsetx, &incx, &beta, __ny + offsety, &incy); done: - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dspr_)(const char *uplo, int *n, double *alpha, double *x, int *incx, double *a); void Java_dev_ludovic_netlib_blas_JNIBLAS_dsprK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray a, jint offseta) { - jboolean failed = FALSE; - const char *__nuplo = NULL; double *__nx = NULL; double *__na = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + double *__nx = NULL; + double *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } dspr_(__nuplo, &n, &alpha, __nx + offsetx, &incx, __na + offseta); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sspr_)(const char *uplo, int *n, float *alpha, float *x, int *incx, float *a); void Java_dev_ludovic_netlib_blas_JNIBLAS_ssprK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray a, jint offseta) { - jboolean failed = FALSE; - const char *__nuplo = NULL; float *__nx = NULL; float *__na = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + float *__nx = NULL; + float *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } sspr_(__nuplo, &n, &alpha, __nx + offsetx, &incx, __na + offseta); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dspr2_)(const char *uplo, int *n, double *alpha, double *x, int *incx, double *y, int *incy, double *a); void Java_dev_ludovic_netlib_blas_JNIBLAS_dspr2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy, jdoubleArray a, jint offseta) { - jboolean failed = FALSE; - const char *__nuplo = NULL; double *__nx = NULL; double *__ny = NULL; double *__na = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + double *__nx = NULL; + double *__ny = NULL; + double *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } dspr2_(__nuplo, &n, &alpha, __nx + offsetx, &incx, __ny + offsety, &incy, __na + offseta); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, JNI_ABORT); if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sspr2_)(const char *uplo, int *n, float *alpha, float *x, int *incx, float *y, int *incy, float *a); void Java_dev_ludovic_netlib_blas_JNIBLAS_sspr2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy, jfloatArray a, jint offseta) { - jboolean failed = FALSE; - const char *__nuplo = NULL; float *__nx = NULL; float *__ny = NULL; float *__na = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + float *__nx = NULL; + float *__ny = NULL; + float *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } sspr2_(__nuplo, &n, &alpha, __nx + offsetx, &incx, __ny + offsety, &incy, __na + offseta); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, JNI_ABORT); if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dswap_)(int *n, double *x, int *incx, double *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_dswapK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy) { - jboolean failed = FALSE; - double *__nx = NULL; double *__ny = NULL; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + jboolean __failed = FALSE; + double *__nx = NULL; + double *__ny = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } dswap_(&n, __nx + offsetx, &incx, __ny + offsety, &incy); done: - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*sswap_)(int *n, float *x, int *incx, float *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_sswapK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy) { - jboolean failed = FALSE; - float *__nx = NULL; float *__ny = NULL; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + jboolean __failed = FALSE; + float *__nx = NULL; + float *__ny = NULL; + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } sswap_(&n, __nx + offsetx, &incx, __ny + offsety, &incy); done: - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsymm_)(const char *side, const char *uplo, int *m, int *n, double *alpha, double *a, int *lda, double *b, int *ldb, double *beta, double *c, int *ldc); void Java_dev_ludovic_netlib_blas_JNIBLAS_dsymmK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring uplo, jint m, jint n, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble beta, jdoubleArray c, jint offsetc, jint ldc) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__nuplo = NULL; double *__na = NULL; double *__nb = NULL; double *__nc = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__nuplo = NULL; + double *__na = NULL; + double *__nb = NULL; + double *__nc = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } dsymm_(__nside, __nuplo, &m, &n, &alpha, __na + offseta, &lda, __nb + offsetb, &ldb, &beta, __nc + offsetc, &ldc); done: - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, JNI_ABORT); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssymm_)(const char *side, const char *uplo, int *m, int *n, float *alpha, float *a, int *lda, float *b, int *ldb, float *beta, float *c, int *ldc); void Java_dev_ludovic_netlib_blas_JNIBLAS_ssymmK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring uplo, jint m, jint n, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat beta, jfloatArray c, jint offsetc, jint ldc) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__nuplo = NULL; float *__na = NULL; float *__nb = NULL; float *__nc = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__nuplo = NULL; + float *__na = NULL; + float *__nb = NULL; + float *__nc = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } ssymm_(__nside, __nuplo, &m, &n, &alpha, __na + offseta, &lda, __nb + offsetb, &ldb, &beta, __nc + offsetc, &ldc); done: - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, JNI_ABORT); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsymv_)(const char *uplo, int *n, double *alpha, double *a, int *lda, double *x, int *incx, double *beta, double *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_dsymvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx, jdouble beta, jdoubleArray y, jint offsety, jint incy) { - jboolean failed = FALSE; - const char *__nuplo = NULL; double *__na = NULL; double *__nx = NULL; double *__ny = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + double *__na = NULL; + double *__nx = NULL; + double *__ny = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } dsymv_(__nuplo, &n, &alpha, __na + offseta, &lda, __nx + offsetx, &incx, &beta, __ny + offsety, &incy); done: - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssymv_)(const char *uplo, int *n, float *alpha, float *a, int *lda, float *x, int *incx, float *beta, float *y, int *incy); void Java_dev_ludovic_netlib_blas_JNIBLAS_ssymvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx, jfloat beta, jfloatArray y, jint offsety, jint incy) { - jboolean failed = FALSE; - const char *__nuplo = NULL; float *__na = NULL; float *__nx = NULL; float *__ny = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + float *__na = NULL; + float *__nx = NULL; + float *__ny = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } ssymv_(__nuplo, &n, &alpha, __na + offseta, &lda, __nx + offsetx, &incx, &beta, __ny + offsety, &incy); done: - if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, failed ? JNI_ABORT : 0); + if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, __failed ? JNI_ABORT : 0); if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsyr_)(const char *uplo, int *n, double *alpha, double *x, int *incx, double *a, int *lda); void Java_dev_ludovic_netlib_blas_JNIBLAS_dsyrK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray a, jint offseta, jint lda) { - jboolean failed = FALSE; - const char *__nuplo = NULL; double *__nx = NULL; double *__na = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + double *__nx = NULL; + double *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } dsyr_(__nuplo, &n, &alpha, __nx + offsetx, &incx, __na + offseta, &lda); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssyr_)(const char *uplo, int *n, float *alpha, float *x, int *incx, float *a, int *lda); void Java_dev_ludovic_netlib_blas_JNIBLAS_ssyrK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray a, jint offseta, jint lda) { - jboolean failed = FALSE; - const char *__nuplo = NULL; float *__nx = NULL; float *__na = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + float *__nx = NULL; + float *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } ssyr_(__nuplo, &n, &alpha, __nx + offsetx, &incx, __na + offseta, &lda); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsyr2_)(const char *uplo, int *n, double *alpha, double *x, int *incx, double *y, int *incy, double *a, int *lda); void Java_dev_ludovic_netlib_blas_JNIBLAS_dsyr2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jdouble alpha, jdoubleArray x, jint offsetx, jint incx, jdoubleArray y, jint offsety, jint incy, jdoubleArray a, jint offseta, jint lda) { - jboolean failed = FALSE; - const char *__nuplo = NULL; double *__nx = NULL; double *__ny = NULL; double *__na = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + double *__nx = NULL; + double *__ny = NULL; + double *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } dsyr2_(__nuplo, &n, &alpha, __nx + offsetx, &incx, __ny + offsety, &incy, __na + offseta, &lda); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, JNI_ABORT); if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssyr2_)(const char *uplo, int *n, float *alpha, float *x, int *incx, float *y, int *incy, float *a, int *lda); void Java_dev_ludovic_netlib_blas_JNIBLAS_ssyr2K(JNIEnv *env, UNUSED jobject obj, jstring uplo, jint n, jfloat alpha, jfloatArray x, jint offsetx, jint incx, jfloatArray y, jint offsety, jint incy, jfloatArray a, jint offseta, jint lda) { - jboolean failed = FALSE; - const char *__nuplo = NULL; float *__nx = NULL; float *__ny = NULL; float *__na = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; - if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + float *__nx = NULL; + float *__ny = NULL; + float *__na = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } + if (!(__ny = (*env)->GetPrimitiveArrayCritical(env, y, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } ssyr2_(__nuplo, &n, &alpha, __nx + offsetx, &incx, __ny + offsety, &incy, __na + offseta, &lda); done: - if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, failed ? JNI_ABORT : 0); + if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, __failed ? JNI_ABORT : 0); if (__ny) (*env)->ReleasePrimitiveArrayCritical(env, y, __ny, JNI_ABORT); if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, JNI_ABORT); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsyr2k_)(const char *uplo, const char *trans, int *n, int *k, double *alpha, double *a, int *lda, double *b, int *ldb, double *beta, double *c, int *ldc); void Java_dev_ludovic_netlib_blas_JNIBLAS_dsyr2kK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jint n, jint k, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb, jdouble beta, jdoubleArray c, jint offsetc, jint ldc) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; double *__na = NULL; double *__nb = NULL; double *__nc = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + double *__na = NULL; + double *__nb = NULL; + double *__nc = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } dsyr2k_(__nuplo, __ntrans, &n, &k, &alpha, __na + offseta, &lda, __nb + offsetb, &ldb, &beta, __nc + offsetc, &ldc); done: - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, JNI_ABORT); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssyr2k_)(const char *uplo, const char *trans, int *n, int *k, float *alpha, float *a, int *lda, float *b, int *ldb, float *beta, float *c, int *ldc); void Java_dev_ludovic_netlib_blas_JNIBLAS_ssyr2kK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jint n, jint k, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb, jfloat beta, jfloatArray c, jint offsetc, jint ldc) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; float *__na = NULL; float *__nb = NULL; float *__nc = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + float *__na = NULL; + float *__nb = NULL; + float *__nc = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } ssyr2k_(__nuplo, __ntrans, &n, &k, &alpha, __na + offseta, &lda, __nb + offsetb, &ldb, &beta, __nc + offsetc, &ldc); done: - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, JNI_ABORT); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dsyrk_)(const char *uplo, const char *trans, int *n, int *k, double *alpha, double *a, int *lda, double *beta, double *c, int *ldc); void Java_dev_ludovic_netlib_blas_JNIBLAS_dsyrkK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jint n, jint k, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdouble beta, jdoubleArray c, jint offsetc, jint ldc) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; double *__na = NULL; double *__nc = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + double *__na = NULL; + double *__nc = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } dsyrk_(__nuplo, __ntrans, &n, &k, &alpha, __na + offseta, &lda, &beta, __nc + offsetc, &ldc); done: - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*ssyrk_)(const char *uplo, const char *trans, int *n, int *k, float *alpha, float *a, int *lda, float *beta, float *c, int *ldc); void Java_dev_ludovic_netlib_blas_JNIBLAS_ssyrkK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jint n, jint k, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloat beta, jfloatArray c, jint offsetc, jint ldc) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; float *__na = NULL; float *__nc = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + float *__na = NULL; + float *__nc = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nc = (*env)->GetPrimitiveArrayCritical(env, c, NULL))) { __failed = TRUE; goto done; } ssyrk_(__nuplo, __ntrans, &n, &k, &alpha, __na + offseta, &lda, &beta, __nc + offsetc, &ldc); done: - if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, failed ? JNI_ABORT : 0); + if (__nc) (*env)->ReleasePrimitiveArrayCritical(env, c, __nc, __failed ? JNI_ABORT : 0); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtbmv_)(const char *uplo, const char *trans, const char *diag, int *n, int *k, double *a, int *lda, double *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_dtbmvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; double *__na = NULL; double *__nx = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + const char *__ndiag = NULL; + double *__na = NULL; + double *__nx = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } dtbmv_(__nuplo, __ntrans, __ndiag, &n, &k, __na + offseta, &lda, __nx + offsetx, &incx); done: - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*stbmv_)(const char *uplo, const char *trans, const char *diag, int *n, int *k, float *a, int *lda, float *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_stbmvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; float *__na = NULL; float *__nx = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + const char *__ndiag = NULL; + float *__na = NULL; + float *__nx = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } stbmv_(__nuplo, __ntrans, __ndiag, &n, &k, __na + offseta, &lda, __nx + offsetx, &incx); done: - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtbsv_)(const char *uplo, const char *trans, const char *diag, int *n, int *k, double *a, int *lda, double *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_dtbsvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint k, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; double *__na = NULL; double *__nx = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + const char *__ndiag = NULL; + double *__na = NULL; + double *__nx = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } dtbsv_(__nuplo, __ntrans, __ndiag, &n, &k, __na + offseta, &lda, __nx + offsetx, &incx); done: - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*stbsv_)(const char *uplo, const char *trans, const char *diag, int *n, int *k, float *a, int *lda, float *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_stbsvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jint k, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; float *__na = NULL; float *__nx = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + const char *__ndiag = NULL; + float *__na = NULL; + float *__nx = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } stbsv_(__nuplo, __ntrans, __ndiag, &n, &k, __na + offseta, &lda, __nx + offsetx, &incx); done: - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtpmv_)(const char *uplo, const char *trans, const char *diag, int *n, double *a, double *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_dtpmvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jdoubleArray a, jint offseta, jdoubleArray x, jint offsetx, jint incx) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; double *__na = NULL; double *__nx = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + const char *__ndiag = NULL; + double *__na = NULL; + double *__nx = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } dtpmv_(__nuplo, __ntrans, __ndiag, &n, __na + offseta, __nx + offsetx, &incx); done: - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*stpmv_)(const char *uplo, const char *trans, const char *diag, int *n, float *a, float *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_stpmvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jfloatArray a, jint offseta, jfloatArray x, jint offsetx, jint incx) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; float *__na = NULL; float *__nx = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + const char *__ndiag = NULL; + float *__na = NULL; + float *__nx = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } stpmv_(__nuplo, __ntrans, __ndiag, &n, __na + offseta, __nx + offsetx, &incx); done: - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtpsv_)(const char *uplo, const char *trans, const char *diag, int *n, double *a, double *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_dtpsvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jdoubleArray a, jint offseta, jdoubleArray x, jint offsetx, jint incx) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; double *__na = NULL; double *__nx = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + const char *__ndiag = NULL; + double *__na = NULL; + double *__nx = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } dtpsv_(__nuplo, __ntrans, __ndiag, &n, __na + offseta, __nx + offsetx, &incx); done: - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*stpsv_)(const char *uplo, const char *trans, const char *diag, int *n, float *a, float *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_stpsvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jfloatArray a, jint offseta, jfloatArray x, jint offsetx, jint incx) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; float *__na = NULL; float *__nx = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + const char *__ndiag = NULL; + float *__na = NULL; + float *__nx = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } stpsv_(__nuplo, __ntrans, __ndiag, &n, __na + offseta, __nx + offsetx, &incx); done: - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtrmm_)(const char *side, const char *uplo, const char *transa, const char *diag, int *m, int *n, double *alpha, double *a, int *lda, double *b, int *ldb); void Java_dev_ludovic_netlib_blas_JNIBLAS_dtrmmK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring uplo, jstring transa, jstring diag, jint m, jint n, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__nuplo = NULL; const char *__ntransa = NULL; const char *__ndiag = NULL; double *__na = NULL; double *__nb = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__nuplo = NULL; + const char *__ntransa = NULL; + const char *__ndiag = NULL; + double *__na = NULL; + double *__nb = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } dtrmm_(__nside, __nuplo, __ntransa, __ndiag, &m, &n, &alpha, __na + offseta, &lda, __nb + offsetb, &ldb); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntransa) (*env)->ReleaseStringUTFChars(env, transa, __ntransa); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*strmm_)(const char *side, const char *uplo, const char *transa, const char *diag, int *m, int *n, float *alpha, float *a, int *lda, float *b, int *ldb); void Java_dev_ludovic_netlib_blas_JNIBLAS_strmmK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring uplo, jstring transa, jstring diag, jint m, jint n, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__nuplo = NULL; const char *__ntransa = NULL; const char *__ndiag = NULL; float *__na = NULL; float *__nb = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__nuplo = NULL; + const char *__ntransa = NULL; + const char *__ndiag = NULL; + float *__na = NULL; + float *__nb = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } strmm_(__nside, __nuplo, __ntransa, __ndiag, &m, &n, &alpha, __na + offseta, &lda, __nb + offsetb, &ldb); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntransa) (*env)->ReleaseStringUTFChars(env, transa, __ntransa); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtrmv_)(const char *uplo, const char *trans, const char *diag, int *n, double *a, int *lda, double *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_dtrmvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; double *__na = NULL; double *__nx = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + const char *__ndiag = NULL; + double *__na = NULL; + double *__nx = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } dtrmv_(__nuplo, __ntrans, __ndiag, &n, __na + offseta, &lda, __nx + offsetx, &incx); done: - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*strmv_)(const char *uplo, const char *trans, const char *diag, int *n, float *a, int *lda, float *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_strmvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; float *__na = NULL; float *__nx = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + const char *__ndiag = NULL; + float *__na = NULL; + float *__nx = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } strmv_(__nuplo, __ntrans, __ndiag, &n, __na + offseta, &lda, __nx + offsetx, &incx); done: - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtrsm_)(const char *side, const char *uplo, const char *transa, const char *diag, int *m, int *n, double *alpha, double *a, int *lda, double *b, int *ldb); void Java_dev_ludovic_netlib_blas_JNIBLAS_dtrsmK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring uplo, jstring transa, jstring diag, jint m, jint n, jdouble alpha, jdoubleArray a, jint offseta, jint lda, jdoubleArray b, jint offsetb, jint ldb) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__nuplo = NULL; const char *__ntransa = NULL; const char *__ndiag = NULL; double *__na = NULL; double *__nb = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__nuplo = NULL; + const char *__ntransa = NULL; + const char *__ndiag = NULL; + double *__na = NULL; + double *__nb = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } dtrsm_(__nside, __nuplo, __ntransa, __ndiag, &m, &n, &alpha, __na + offseta, &lda, __nb + offsetb, &ldb); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntransa) (*env)->ReleaseStringUTFChars(env, transa, __ntransa); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*strsm_)(const char *side, const char *uplo, const char *transa, const char *diag, int *m, int *n, float *alpha, float *a, int *lda, float *b, int *ldb); void Java_dev_ludovic_netlib_blas_JNIBLAS_strsmK(JNIEnv *env, UNUSED jobject obj, jstring side, jstring uplo, jstring transa, jstring diag, jint m, jint n, jfloat alpha, jfloatArray a, jint offseta, jint lda, jfloatArray b, jint offsetb, jint ldb) { - jboolean failed = FALSE; - const char *__nside = NULL; const char *__nuplo = NULL; const char *__ntransa = NULL; const char *__ndiag = NULL; float *__na = NULL; float *__nb = NULL; - if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) goto fail; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nside = NULL; + const char *__nuplo = NULL; + const char *__ntransa = NULL; + const char *__ndiag = NULL; + float *__na = NULL; + float *__nb = NULL; + if (!(__nside = (*env)->GetStringUTFChars(env, side, NULL))) { __failed = TRUE; goto done; } + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntransa = (*env)->GetStringUTFChars(env, transa, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nb = (*env)->GetPrimitiveArrayCritical(env, b, NULL))) { __failed = TRUE; goto done; } strsm_(__nside, __nuplo, __ntransa, __ndiag, &m, &n, &alpha, __na + offseta, &lda, __nb + offsetb, &ldb); done: - if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, failed ? JNI_ABORT : 0); + if (__nb) (*env)->ReleasePrimitiveArrayCritical(env, b, __nb, __failed ? JNI_ABORT : 0); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntransa) (*env)->ReleaseStringUTFChars(env, transa, __ntransa); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); if (__nside) (*env)->ReleaseStringUTFChars(env, side, __nside); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*dtrsv_)(const char *uplo, const char *trans, const char *diag, int *n, double *a, int *lda, double *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_dtrsvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jdoubleArray a, jint offseta, jint lda, jdoubleArray x, jint offsetx, jint incx) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; double *__na = NULL; double *__nx = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + const char *__ndiag = NULL; + double *__na = NULL; + double *__nx = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } dtrsv_(__nuplo, __ntrans, __ndiag, &n, __na + offseta, &lda, __nx + offsetx, &incx); done: - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static void (*strsv_)(const char *uplo, const char *trans, const char *diag, int *n, float *a, int *lda, float *x, int *incx); void Java_dev_ludovic_netlib_blas_JNIBLAS_strsvK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring trans, jstring diag, jint n, jfloatArray a, jint offseta, jint lda, jfloatArray x, jint offsetx, jint incx) { - jboolean failed = FALSE; - const char *__nuplo = NULL; const char *__ntrans = NULL; const char *__ndiag = NULL; float *__na = NULL; float *__nx = NULL; - if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) goto fail; - if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) goto fail; - if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) goto fail; - if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) goto fail; - if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) goto fail; + jboolean __failed = FALSE; + const char *__nuplo = NULL; + const char *__ntrans = NULL; + const char *__ndiag = NULL; + float *__na = NULL; + float *__nx = NULL; + if (!(__nuplo = (*env)->GetStringUTFChars(env, uplo, NULL))) { __failed = TRUE; goto done; } + if (!(__ntrans = (*env)->GetStringUTFChars(env, trans, NULL))) { __failed = TRUE; goto done; } + if (!(__ndiag = (*env)->GetStringUTFChars(env, diag, NULL))) { __failed = TRUE; goto done; } + if (!(__na = (*env)->GetPrimitiveArrayCritical(env, a, NULL))) { __failed = TRUE; goto done; } + if (!(__nx = (*env)->GetPrimitiveArrayCritical(env, x, NULL))) { __failed = TRUE; goto done; } strsv_(__nuplo, __ntrans, __ndiag, &n, __na + offseta, &lda, __nx + offsetx, &incx); done: - if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, failed ? JNI_ABORT : 0); + if (__nx) (*env)->ReleasePrimitiveArrayCritical(env, x, __nx, __failed ? JNI_ABORT : 0); if (__na) (*env)->ReleasePrimitiveArrayCritical(env, a, __na, JNI_ABORT); if (__ndiag) (*env)->ReleaseStringUTFChars(env, diag, __ndiag); if (__ntrans) (*env)->ReleaseStringUTFChars(env, trans, __ntrans); if (__nuplo) (*env)->ReleaseStringUTFChars(env, uplo, __nuplo); - if (failed) throwOOM(env); - return; -fail: - failed = TRUE; - goto done; + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); } static int (*idamax_)(int *n, double *dx, int *incdx); jint Java_dev_ludovic_netlib_blas_JNIBLAS_idamaxK(JNIEnv *env, UNUSED jobject obj, jint n, jdoubleArray dx, jint offsetdx, jint incdx) { - jint __ret; - jboolean failed = FALSE; + jint __ret = 0; + jboolean __failed = FALSE; double *__ndx = NULL; - if (!(__ndx = (*env)->GetPrimitiveArrayCritical(env, dx, NULL))) goto fail; - /* It returns 1-based index because that's how Fortran works */ - __ret = idamax_(&n, __ndx + offsetdx, &incdx) - 1; + if (!(__ndx = (*env)->GetPrimitiveArrayCritical(env, dx, NULL))) { __failed = TRUE; goto done; } + __ret = idamax_(&n, __ndx + offsetdx, &incdx); done: if (__ndx) (*env)->ReleasePrimitiveArrayCritical(env, dx, __ndx, JNI_ABORT); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } static int (*isamax_)(int *n, float *sx, int *incsx); jint Java_dev_ludovic_netlib_blas_JNIBLAS_isamaxK(JNIEnv *env, UNUSED jobject obj, jint n, jfloatArray sx, jint offsetsx, jint incsx) { - jint __ret; - jboolean failed = FALSE; + jint __ret = 0; + jboolean __failed = FALSE; float *__nsx = NULL; - if (!(__nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) goto fail; - /* It returns 1-based index because that's how Fortran works */ - __ret = isamax_(&n, __nsx + offsetsx, &incsx) - 1; + if (!(__nsx = (*env)->GetPrimitiveArrayCritical(env, sx, NULL))) { __failed = TRUE; goto done; } + __ret = isamax_(&n, __nsx + offsetsx, &incsx); done: if (__nsx) (*env)->ReleasePrimitiveArrayCritical(env, sx, __nsx, JNI_ABORT); - if (failed) throwOOM(env); + if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, "java/lang/OutOfMemoryError"), "Failed to copy from heap to native memory"); return __ret; -fail: - failed = TRUE; - goto done; } jboolean get_system_property(JNIEnv *env, jstring key, jstring def, jstring *res) { @@ -1490,6 +1394,87 @@ jboolean get_system_property(JNIEnv *env, jstring key, jstring def, jstring *res return TRUE; } +static void *libhandle; + +jboolean load_symbols(void) { +#define LOAD_SYMBOL(name) \ + name = dlsym(libhandle, #name); \ + if (!name) { \ + return FALSE; \ + } + + LOAD_SYMBOL(dasum_); + LOAD_SYMBOL(sasum_); + LOAD_SYMBOL(daxpy_); + LOAD_SYMBOL(saxpy_); + LOAD_SYMBOL(dcopy_); + LOAD_SYMBOL(scopy_); + LOAD_SYMBOL(ddot_); + LOAD_SYMBOL(sdot_); + LOAD_SYMBOL(sdsdot_); + LOAD_SYMBOL(dgbmv_); + LOAD_SYMBOL(sgbmv_); + LOAD_SYMBOL(dgemm_); + LOAD_SYMBOL(sgemm_); + LOAD_SYMBOL(dgemv_); + LOAD_SYMBOL(sgemv_); + LOAD_SYMBOL(dger_); + LOAD_SYMBOL(sger_); + LOAD_SYMBOL(dnrm2_); + LOAD_SYMBOL(snrm2_); + LOAD_SYMBOL(drot_); + LOAD_SYMBOL(srot_); + LOAD_SYMBOL(drotm_); + LOAD_SYMBOL(srotm_); + LOAD_SYMBOL(drotmg_); + LOAD_SYMBOL(srotmg_); + LOAD_SYMBOL(dsbmv_); + LOAD_SYMBOL(ssbmv_); + LOAD_SYMBOL(dscal_); + LOAD_SYMBOL(sscal_); + LOAD_SYMBOL(dspmv_); + LOAD_SYMBOL(sspmv_); + LOAD_SYMBOL(dspr_); + LOAD_SYMBOL(sspr_); + LOAD_SYMBOL(dspr2_); + LOAD_SYMBOL(sspr2_); + LOAD_SYMBOL(dswap_); + LOAD_SYMBOL(sswap_); + LOAD_SYMBOL(dsymm_); + LOAD_SYMBOL(ssymm_); + LOAD_SYMBOL(dsymv_); + LOAD_SYMBOL(ssymv_); + LOAD_SYMBOL(dsyr_); + LOAD_SYMBOL(ssyr_); + LOAD_SYMBOL(dsyr2_); + LOAD_SYMBOL(ssyr2_); + LOAD_SYMBOL(dsyr2k_); + LOAD_SYMBOL(ssyr2k_); + LOAD_SYMBOL(dsyrk_); + LOAD_SYMBOL(ssyrk_); + LOAD_SYMBOL(dtbmv_); + LOAD_SYMBOL(stbmv_); + LOAD_SYMBOL(dtbsv_); + LOAD_SYMBOL(stbsv_); + LOAD_SYMBOL(dtpmv_); + LOAD_SYMBOL(stpmv_); + LOAD_SYMBOL(dtpsv_); + LOAD_SYMBOL(stpsv_); + LOAD_SYMBOL(dtrmm_); + LOAD_SYMBOL(strmm_); + LOAD_SYMBOL(dtrmv_); + LOAD_SYMBOL(strmv_); + LOAD_SYMBOL(dtrsm_); + LOAD_SYMBOL(strsm_); + LOAD_SYMBOL(dtrsv_); + LOAD_SYMBOL(strsv_); + LOAD_SYMBOL(idamax_); + LOAD_SYMBOL(isamax_); + +#undef LOAD_SYMBOL + return TRUE; +} + jint JNI_OnLoad(JavaVM *vm, UNUSED void *reserved) { JNIEnv *env; if ((*vm)->GetEnv(vm, (void**)&env, JNI_VERSION_1_6) != JNI_OK) { @@ -1550,104 +1535,32 @@ jint JNI_OnLoad(JavaVM *vm, UNUSED void *reserved) { return -1; } - char blas_name[1024]; + char name[1024]; if (property_nativeLibPath) { const char *utf = (*env)->GetStringUTFChars(env, property_nativeLibPath, NULL); - snprintf(blas_name, sizeof(blas_name), "%s", utf); + snprintf(name, sizeof(name), "%s", utf); (*env)->ReleaseStringUTFChars(env, property_nativeLibPath, utf); } else if (property_nativeLib) { const char *utf = (*env)->GetStringUTFChars(env, property_nativeLib, NULL); - snprintf(blas_name, sizeof(blas_name), "lib%s.so", utf); + snprintf(name, sizeof(name), "lib%s.so", utf); (*env)->ReleaseStringUTFChars(env, property_nativeLib, utf); } else { /* either property_nativeLibPath or property_nativeLib should always be non-NULL */ return -1; } - blas = dlopen(blas_name, RTLD_LAZY); - if (!blas) { + libhandle = dlopen(name, RTLD_LAZY); + if (!libhandle) { return -1; } -#define LOAD_SYMBOL(name) \ - name = dlsym(blas, #name); \ - if (!name) { \ - return -1; \ + if (!load_symbols()) { + return -1; } - LOAD_SYMBOL(dasum_); - LOAD_SYMBOL(sasum_); - LOAD_SYMBOL(daxpy_); - LOAD_SYMBOL(saxpy_); - LOAD_SYMBOL(dcopy_); - LOAD_SYMBOL(scopy_); - LOAD_SYMBOL(ddot_); - LOAD_SYMBOL(sdot_); - LOAD_SYMBOL(sdsdot_); - LOAD_SYMBOL(dgbmv_); - LOAD_SYMBOL(sgbmv_); - LOAD_SYMBOL(dgemm_); - LOAD_SYMBOL(sgemm_); - LOAD_SYMBOL(dgemv_); - LOAD_SYMBOL(sgemv_); - LOAD_SYMBOL(dger_); - LOAD_SYMBOL(sger_); - LOAD_SYMBOL(dnrm2_); - LOAD_SYMBOL(snrm2_); - LOAD_SYMBOL(drot_); - LOAD_SYMBOL(srot_); - LOAD_SYMBOL(drotm_); - LOAD_SYMBOL(srotm_); - LOAD_SYMBOL(drotmg_); - LOAD_SYMBOL(srotmg_); - LOAD_SYMBOL(dsbmv_); - LOAD_SYMBOL(ssbmv_); - LOAD_SYMBOL(dscal_); - LOAD_SYMBOL(sscal_); - LOAD_SYMBOL(dspmv_); - LOAD_SYMBOL(sspmv_); - LOAD_SYMBOL(dspr_); - LOAD_SYMBOL(sspr_); - LOAD_SYMBOL(dspr2_); - LOAD_SYMBOL(sspr2_); - LOAD_SYMBOL(dswap_); - LOAD_SYMBOL(sswap_); - LOAD_SYMBOL(dsymm_); - LOAD_SYMBOL(ssymm_); - LOAD_SYMBOL(dsymv_); - LOAD_SYMBOL(ssymv_); - LOAD_SYMBOL(dsyr_); - LOAD_SYMBOL(ssyr_); - LOAD_SYMBOL(dsyr2_); - LOAD_SYMBOL(ssyr2_); - LOAD_SYMBOL(dsyr2k_); - LOAD_SYMBOL(ssyr2k_); - LOAD_SYMBOL(dsyrk_); - LOAD_SYMBOL(ssyrk_); - LOAD_SYMBOL(dtbmv_); - LOAD_SYMBOL(stbmv_); - LOAD_SYMBOL(dtbsv_); - LOAD_SYMBOL(stbsv_); - LOAD_SYMBOL(dtpmv_); - LOAD_SYMBOL(stpmv_); - LOAD_SYMBOL(dtpsv_); - LOAD_SYMBOL(stpsv_); - LOAD_SYMBOL(dtrmm_); - LOAD_SYMBOL(strmm_); - LOAD_SYMBOL(dtrmv_); - LOAD_SYMBOL(strmv_); - LOAD_SYMBOL(dtrsm_); - LOAD_SYMBOL(strsm_); - LOAD_SYMBOL(dtrsv_); - LOAD_SYMBOL(strsv_); - LOAD_SYMBOL(idamax_); - LOAD_SYMBOL(isamax_); - -#undef LOAD_SYMBOL - return JNI_VERSION_1_6; } void JNI_OnUnload(UNUSED JavaVM *vm, UNUSED void *reserved) { - dlclose(blas); + dlclose(libhandle); } diff --git a/generator.py b/generator.py index 301d88f8..47e960eb 100644 --- a/generator.py +++ b/generator.py @@ -1,3 +1,25 @@ +# Copyright 2020, 2021, Ludovic Henry +# +# Permission is hereby granted, free of charge, to any person obtaining a copy +# of this software and associated documentation files (the \"Software\"), to deal +# in the Software without restriction, including without limitation the rights +# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell +# copies of the Software, and to permit persons to whom the Software is +# furnished to do so, subject to the following conditions: +# +# The above copyright notice and this permission notice shall be included in +# all copies or substantial portions of the Software. +# +# THE SOFTWARE IS PROVIDED \"AS IS\", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR +# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, +# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE +# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER +# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, +# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE +# SOFTWARE. +# +# Please contact git@ludovic.dev or visit ludovic.dev if you need additional +# information or have any questions. import sys @@ -172,70 +194,274 @@ def __init__(self, name, mode = "0"): self.epilog = "if (__n{name}) (*env)->ReleasePrimitiveArrayCritical(env, {name}, __n{name}, {mode});".format(name=name, mode=("JNI_ABORT" if mode == "JNI_ABORT" else ("__failed ? JNI_ABORT : %s" % mode))) class RoutineR: - def __init__(self, pkg, ret, name, *args): + def __init__(self, ret, name, *args): + self.ret = ret + self.name = name + self.args = args + + def render(self, pkg): # Print native function signature - print("static {ret} (*{name}_)({args});".format(ret=ret.native_type, name=name, args=", ".join([arg.native_type_and_name for arg in args]))) + print("static {ret} (*{name}_)({args});".format(ret=self.ret.native_type, name=self.name, args=", ".join([arg.native_type_and_name for arg in self.args]))) print() # Print JNI function implementation - print("{ret} Java_dev_ludovic_netlib_{pkg}_JNI{pkgupper}_{name}K(JNIEnv *env, UNUSED jobject obj{args}) {{".format(ret=ret.java_type, pkg=pkg, pkgupper=pkg.upper(), name=name, args="".join([", " + a for arg in args for a in arg.java_type_and_name]))) - print(" {rettype} __ret = 0;".format(rettype=ret.java_type)) + print("{ret} Java_dev_ludovic_netlib_{pkg}_JNI{pkgupper}_{name}K(JNIEnv *env, UNUSED jobject obj{args}) {{".format(ret=self.ret.java_type, pkg=pkg, pkgupper=pkg.upper(), name=self.name, args="".join([", " + a for arg in self.args for a in arg.java_type_and_name]))) + print(" {rettype} __ret = 0;".format(rettype=self.ret.java_type)) print(" jboolean __failed = FALSE;") - if any(len(arg.native_local) > 0 for arg in sorted(args, key=lambda a: a.idx)): - print("\n".join([" " + a for a in [arg.native_local for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0])) - if any(len(arg.prolog) > 0 for arg in sorted(args, key=lambda a: a.idx)): - print("\n".join([" " + a for a in [arg.prolog for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0])) - print(" __ret = {name}_({args});".format(name=name, args=", ".join([arg.native_argument for arg in args]))) + if any(len(arg.native_local) > 0 for arg in sorted(self.args, key=lambda a: a.idx)): + print("\n".join([" " + a for a in [arg.native_local for arg in sorted(self.args, key=lambda a: a.idx)] if len(a) > 0])) + if any(len(arg.prolog) > 0 for arg in sorted(self.args, key=lambda a: a.idx)): + print("\n".join([" " + a for a in [arg.prolog for arg in sorted(self.args, key=lambda a: a.idx)] if len(a) > 0])) + print(" __ret = {name}_({args});".format(name=self.name, args=", ".join([arg.native_argument for arg in self.args]))) print("done:") - if any(len(arg.epilog) > 0 for arg in sorted(args, key=lambda a: a.idx)): - print("\n".join([" " + a for a in [arg.epilog for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0][::-1])) + if any(len(arg.epilog) > 0 for arg in sorted(self.args, key=lambda a: a.idx)): + print("\n".join([" " + a for a in [arg.epilog for arg in sorted(self.args, key=lambda a: a.idx)] if len(a) > 0][::-1])) print(" if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, \"java/lang/OutOfMemoryError\"), \"Failed to copy from heap to native memory\");") print(" return __ret;") print("}") print() + def render_load_symbol(self): + print(" LOAD_SYMBOL({name}_);".format(name=self.name)) + class RoutineR_NI: - def __init__(self, pkg, ret, name, *args): + def __init__(self, ret, name, *args): + self.ret = ret + self.name = name + self.args = args + + def render(self, pkg): # Print native function signature - print("// static {ret} (*{name}_)({args});".format(ret=ret.native_type, name=name, args=", ".join([arg.native_type_and_name for arg in args]))) + print("// static {ret} (*{name}_)({args});".format(ret=self.ret.native_type, name=self.name, args=", ".join([arg.native_type_and_name for arg in self.args]))) print() # Print JNI function implementation - print("{ret} Java_dev_ludovic_netlib_{pkg}_JNI{pkgupper}_{name}K(JNIEnv *env, UNUSED jobject obj{args}) {{".format(ret=ret.java_type, pkg=pkg, pkgupper=pkg.upper(), name=name, args="".join([", UNUSED " + arg.java_type_and_name for arg in args]))) + print("{ret} Java_dev_ludovic_netlib_{pkg}_JNI{pkgupper}_{name}K(JNIEnv *env, UNUSED jobject obj{args}) {{".format(ret=self.ret.java_type, pkg=pkg, pkgupper=pkg.upper(), name=self.name, args="".join([", UNUSED " + arg.java_type_and_name for arg in self.args]))) print(" (*env)->ThrowNew(env, (*env)->FindClass(env, \"java/lang/UnsupportedOperationException\"), \"not implemented\");") print(" return 0;") print("}") print() + def render_load_symbol(self): + print(" // LOAD_SYMBOL({name}_);".format(name=self.name)) + class Routine: - def __init__(self, pkg, name, *args): + def __init__(self, name, *args): + self.name = name + self.args = args + + def render(self, pkg): # Print native function signature - print("static void (*{name}_)({args});".format(name=name, args=", ".join([arg.native_type_and_name for arg in args]))) + print("static void (*{name}_)({args});".format(name=self.name, args=", ".join([arg.native_type_and_name for arg in self.args]))) print() # Print JNI function implementation - print("void Java_dev_ludovic_netlib_{pkg}_JNI{pkgupper}_{name}K(JNIEnv *env, UNUSED jobject obj{args}) {{".format(pkg=pkg, pkgupper=pkg.upper(), name=name, args="".join([", " + a for arg in args for a in arg.java_type_and_name]))) + print("void Java_dev_ludovic_netlib_{pkg}_JNI{pkgupper}_{name}K(JNIEnv *env, UNUSED jobject obj{args}) {{".format(pkg=pkg, pkgupper=pkg.upper(), name=self.name, args="".join([", " + a for arg in self.args for a in arg.java_type_and_name]))) print(" jboolean __failed = FALSE;") - if any(len(arg.native_local) > 0 for arg in sorted(args, key=lambda a: a.idx)): - print("\n".join([" " + a for a in [arg.native_local for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0])) - if any(len(arg.prolog) > 0 for arg in sorted(args, key=lambda a: a.idx)): - print("\n".join([" " + a for a in [arg.prolog for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0])) - print(" {name}_({args});".format(name=name, args=", ".join([arg.native_argument for arg in args]))) + if any(len(arg.native_local) > 0 for arg in sorted(self.args, key=lambda a: a.idx)): + print("\n".join([" " + a for a in [arg.native_local for arg in sorted(self.args, key=lambda a: a.idx)] if len(a) > 0])) + if any(len(arg.prolog) > 0 for arg in sorted(self.args, key=lambda a: a.idx)): + print("\n".join([" " + a for a in [arg.prolog for arg in sorted(self.args, key=lambda a: a.idx)] if len(a) > 0])) + print(" {name}_({args});".format(name=self.name, args=", ".join([arg.native_argument for arg in self.args]))) print("done:") - if any(len(arg.epilog) > 0 for arg in sorted(args, key=lambda a: a.idx)): - print("\n".join([" " + a for a in [arg.epilog for arg in sorted(args, key=lambda a: a.idx)] if len(a) > 0][::-1])) + if any(len(arg.epilog) > 0 for arg in sorted(self.args, key=lambda a: a.idx)): + print("\n".join([" " + a for a in [arg.epilog for arg in sorted(self.args, key=lambda a: a.idx)] if len(a) > 0][::-1])) print(" if (__failed) (*env)->ThrowNew(env, (*env)->FindClass(env, \"java/lang/OutOfMemoryError\"), \"Failed to copy from heap to native memory\");") print("}") print() + def render_load_symbol(self): + print(" LOAD_SYMBOL({name}_);".format(name=self.name)) + class Routine_NI: - def __init__(self, pkg, name, *args): + def __init__(self, name, *args): + self.name = name + self.args = args + + def render(self, pkg): # Print native function signature - print("// static void (*{name}_)({args});".format(name=name, args=", ".join([arg.native_type_and_name for arg in args]))) + print("// static void (*{name}_)({args});".format(name=self.name, args=", ".join([arg.native_type_and_name for arg in self.args]))) print() # Print JNI function implementation - print("void Java_dev_ludovic_netlib_{pkg}_JNI{pkgupper}_{name}K(JNIEnv *env, UNUSED jobject obj{args}) {{".format(pkg=pkg, pkgupper=pkg.upper(), name=name, args="".join([", UNUSED " + a for arg in args for a in arg.java_type_and_name]))) + print("void Java_dev_ludovic_netlib_{pkg}_JNI{pkgupper}_{name}K(JNIEnv *env, UNUSED jobject obj{args}) {{".format(pkg=pkg, pkgupper=pkg.upper(), name=self.name, args="".join([", UNUSED " + a for arg in self.args for a in arg.java_type_and_name]))) print(" (*env)->ThrowNew(env, (*env)->FindClass(env, \"java/lang/UnsupportedOperationException\"), \"not implemented\");") print("}") print() + def render_load_symbol(self): + print(" // LOAD_SYMBOL({name}_);".format(name=self.name)) + +class Library: + def __init__(self, pkg, *routines): + # Print copyright header + print("/*") + print(" * Copyright 2020, 2021, Ludovic Henry") + print(" *") + print(" * Permission is hereby granted, free of charge, to any person obtaining a copy") + print(" * of this software and associated documentation files (the \"Software\"), to deal") + print(" * in the Software without restriction, including without limitation the rights") + print(" * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell") + print(" * copies of the Software, and to permit persons to whom the Software is") + print(" * furnished to do so, subject to the following conditions:") + print(" *") + print(" * The above copyright notice and this permission notice shall be included in") + print(" * all copies or substantial portions of the Software.") + print(" *") + print(" * THE SOFTWARE IS PROVIDED \"AS IS\", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR") + print(" * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,") + print(" * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE") + print(" * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER") + print(" * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,") + print(" * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE") + print(" * SOFTWARE.") + print(" *") + print(" * Please contact git@ludovic.dev or visit ludovic.dev if you need additional") + print(" * information or have any questions.") + print(" */") + print() + # Print includes + print("#include ") + print("#include ") + print("#include ") + print() + print("#include \"dev_ludovic_netlib_{pkg}_JNI{pkgupper}.h\"".format(pkg=pkg, pkgupper=pkg.upper())) + print() + # Print defines + print("#define UNUSED __attribute__((unused))") + print() + print("#define TRUE 1") + print("#define FALSE 0") + print() + # Print static fields + print("static jfieldID booleanW_val_fieldID;") + print("static jfieldID intW_val_fieldID;") + print("static jfieldID floatW_val_fieldID;") + print("static jfieldID doubleW_val_fieldID;") + print("static jfieldID StringW_val_fieldID;") + print() + # Print routines bodies + for routine in routines: + routine.render(pkg) + # Print helper functions + print("jboolean get_system_property(JNIEnv *env, jstring key, jstring def, jstring *res) {") + print(" jclass System_class = (*env)->FindClass(env, \"java/lang/System\");") + print(" if (!System_class) {") + print(" return FALSE;") + print(" }") + print(" jmethodID System_getProperty_methodID = (*env)->GetStaticMethodID(env, System_class, \"getProperty\", \"(Ljava/lang/String;Ljava/lang/String;)Ljava/lang/String;\");") + print(" if (!System_getProperty_methodID) {") + print(" return FALSE;") + print(" }") + print(" *res = (jstring)(*env)->CallStaticObjectMethod(env, System_class, System_getProperty_methodID, key, def);") + print(" return TRUE;") + print("}") + print() + # Print symbols loading + print("static void *libhandle;") + print() + print("jboolean load_symbols(void) {") + print("#define LOAD_SYMBOL(name) \\") + print(" name = dlsym(libhandle, #name); \\") + print(" if (!name) { \\") + print(" return FALSE; \\") + print(" }") + print("") + for routine in routines: + routine.render_load_symbol() + print("") + print("#undef LOAD_SYMBOL") + print(" return TRUE;") + print("}") + print() + # Print JNI entry functions + print("jint JNI_OnLoad(JavaVM *vm, UNUSED void *reserved) {") + print(" JNIEnv *env;") + print(" if ((*vm)->GetEnv(vm, (void**)&env, JNI_VERSION_1_6) != JNI_OK) {") + print(" return -1;") + print(" }") + print("") + print(" jclass booleanW_class = (*env)->FindClass(env, \"org/netlib/util/booleanW\");") + print(" if (!booleanW_class) {") + print(" return -1;") + print(" }") + print(" booleanW_val_fieldID = (*env)->GetFieldID(env, booleanW_class, \"val\", \"Z\");") + print(" if (!booleanW_val_fieldID) {") + print(" return -1;") + print(" }") + print("") + print(" jclass intW_class = (*env)->FindClass(env, \"org/netlib/util/intW\");") + print(" if (!intW_class) {") + print(" return -1;") + print(" }") + print(" intW_val_fieldID = (*env)->GetFieldID(env, intW_class, \"val\", \"I\");") + print(" if (!intW_val_fieldID) {") + print(" return -1;") + print(" }") + print("") + print(" jclass floatW_class = (*env)->FindClass(env, \"org/netlib/util/floatW\");") + print(" if (!floatW_class) {") + print(" return -1;") + print(" }") + print(" floatW_val_fieldID = (*env)->GetFieldID(env, floatW_class, \"val\", \"F\");") + print(" if (!floatW_val_fieldID) {") + print(" return -1;") + print(" }") + print("") + print(" jclass doubleW_class = (*env)->FindClass(env, \"org/netlib/util/doubleW\");") + print(" if (!doubleW_class) {") + print(" return -1;") + print(" }") + print(" doubleW_val_fieldID = (*env)->GetFieldID(env, doubleW_class, \"val\", \"D\");") + print(" if (!doubleW_val_fieldID) {") + print(" return -1;") + print(" }") + print("") + print(" jclass StringW_class = (*env)->FindClass(env, \"org/netlib/util/StringW\");") + print(" if (!StringW_class) {") + print(" return -1;") + print(" }") + print(" StringW_val_fieldID = (*env)->GetFieldID(env, StringW_class, \"val\", \"Ljava/lang/String;\");") + print(" if (!StringW_val_fieldID) {") + print(" return -1;") + print(" }") + print("") + print(" jstring property_nativeLibPath;") + print(" if (!get_system_property(env, (*env)->NewStringUTF(env, \"dev.ludovic.netlib.{pkg}.nativeLibPath\"), NULL, &property_nativeLibPath)) {{".format(pkg=pkg)) + print(" return -1;") + print(" }") + print(" jstring property_nativeLib;") + print(" if (!get_system_property(env, (*env)->NewStringUTF(env, \"dev.ludovic.netlib.{pkg}.nativeLib\"), (*env)->NewStringUTF(env, \"{pkg}\"), &property_nativeLib)) {{".format(pkg=pkg)) + print(" return -1;") + print(" }") + print("") + print(" char name[1024];") + print(" if (property_nativeLibPath) {") + print(" const char *utf = (*env)->GetStringUTFChars(env, property_nativeLibPath, NULL);") + print(" snprintf(name, sizeof(name), \"%s\", utf);") + print(" (*env)->ReleaseStringUTFChars(env, property_nativeLibPath, utf);") + print(" } else if (property_nativeLib) {") + print(" const char *utf = (*env)->GetStringUTFChars(env, property_nativeLib, NULL);") + print(" snprintf(name, sizeof(name), \"lib%s.so\", utf);") + print(" (*env)->ReleaseStringUTFChars(env, property_nativeLib, utf);") + print(" } else {") + print(" /* either property_nativeLibPath or property_nativeLib should always be non-NULL */") + print(" return -1;") + print(" }") + print("") + print(" libhandle = dlopen(name, RTLD_LAZY);") + print(" if (!libhandle) {") + print(" return -1;") + print(" }") + print("") + print(" if (!load_symbols()) {") + print(" return -1;") + print(" }") + print("") + print(" return JNI_VERSION_1_6;") + print("}") + print() + print("void JNI_OnUnload(UNUSED JavaVM *vm, UNUSED void *reserved) {") + print(" dlclose(libhandle);") + print("}") + + # Copy from Java # $> [] @@ -248,855 +474,861 @@ def __init__(self, pkg, name, *args): # $< $1("$5") if sys.argv[1] == "blas": - RoutineR ("blas", JDoubleR(), "dasum", JInt("n"), JDoubleArray("x", "JNI_ABORT"), JInt("incx")) - RoutineR ("blas", JFloatR(), "sasum", JInt("n"), JFloatArray("x", "JNI_ABORT"), JInt("incx")) - Routine ("blas", "daxpy", JInt("n"), JDouble("alpha"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("y"), JInt("incy")) - Routine ("blas", "saxpy", JInt("n"), JFloat("alpha"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("y"), JInt("incy")) - Routine ("blas", "dcopy", JInt("n"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("y"), JInt("incy")) - Routine ("blas", "scopy", JInt("n"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("y"), JInt("incy")) - RoutineR ("blas", JDoubleR(), "ddot", JInt("n"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("y", "JNI_ABORT"), JInt("incy")) - RoutineR ("blas", JFloatR(), "sdot", JInt("n"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("y", "JNI_ABORT"), JInt("incy")) - RoutineR ("blas", JFloatR(), "sdsdot", JInt("n"), JFloat("sb"), JFloatArray("sx", "JNI_ABORT"), JInt("incsx"), JFloatArray("sy", "JNI_ABORT"), JInt("incsy")) - Routine ("blas", "dgbmv", JString("trans"), JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDouble("beta"), JDoubleArray("y"), JInt("incy")) - Routine ("blas", "sgbmv", JString("trans"), JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloat("beta"), JFloatArray("y"), JInt("incy")) - Routine ("blas", "dgemm", JString("transa"), JString("transb"), JInt("m"), JInt("n"), JInt("k"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("b", "JNI_ABORT"), JInt("ldb"), JDouble("beta"), JDoubleArray("c"), JInt("ldc")) - Routine ("blas", "sgemm", JString("transa"), JString("transb"), JInt("m"), JInt("n"), JInt("k"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("b", "JNI_ABORT"), JInt("ldb"), JFloat("beta"), JFloatArray("c"), JInt("ldc")) - Routine ("blas", "dgemv", JString("trans"), JInt("m"), JInt("n"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDouble("beta"), JDoubleArray("y"), JInt("incy")) - Routine ("blas", "sgemv", JString("trans"), JInt("m"), JInt("n"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloat("beta"), JFloatArray("y"), JInt("incy")) - Routine ("blas", "dger", JInt("m"), JInt("n"), JDouble("alpha"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("y", "JNI_ABORT"), JInt("incy"), JDoubleArray("a"), JInt("lda")) - Routine ("blas", "sger", JInt("m"), JInt("n"), JFloat("alpha"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("y", "JNI_ABORT"), JInt("incy"), JFloatArray("a"), JInt("lda")) - RoutineR ("blas", JDoubleR(), "dnrm2", JInt("n"), JDoubleArray("x", "JNI_ABORT"), JInt("incx")) - RoutineR ("blas", JFloatR(), "snrm2", JInt("n"), JFloatArray("x", "JNI_ABORT"), JInt("incx")) - Routine ("blas", "drot", JInt("n"), JDoubleArray("dx"), JInt("incx"), JDoubleArray("dy"), JInt("incy"), JDouble("c"), JDouble("s")) - Routine ("blas", "srot", JInt("n"), JFloatArray("sx"), JInt("incx"), JFloatArray("sy"), JInt("incy"), JFloat("c"), JFloat("s")) - Routine ("blas", "drotm", JInt("n"), JDoubleArray("dx", "JNI_ABORT"), JInt("incx"), JDoubleArray("dy"), JInt("incy"), JDoubleArray("dparam", "JNI_ABORT")) - Routine ("blas", "srotm", JInt("n"), JFloatArray("sx", "JNI_ABORT"), JInt("incx"), JFloatArray("sy"), JInt("incy"), JFloatArray("sparam", "JNI_ABORT")) - Routine ("blas", "drotmg", JDoubleW("dd1"), JDoubleW("dd2"), JDoubleW("dx1"), JDouble("dy1"), JDoubleArray("dparam", "JNI_ABORT")) - Routine ("blas", "srotmg", JFloatW("sd1"), JFloatW("sd2"), JFloatW("sx1"), JFloat("sy1"), JFloatArray("sparam", "JNI_ABORT")) - Routine ("blas", "dsbmv", JString("uplo"), JInt("n"), JInt("k"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDouble("beta"), JDoubleArray("y"), JInt("incy")) - Routine ("blas", "ssbmv", JString("uplo"), JInt("n"), JInt("k"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloat("beta"), JFloatArray("y"), JInt("incy")) - Routine ("blas", "dscal", JInt("n"), JDouble("alpha"), JDoubleArray("x"), JInt("incx")) - Routine ("blas", "sscal", JInt("n"), JFloat("alpha"), JFloatArray("x"), JInt("incx")) - Routine ("blas", "dspmv", JString("uplo"), JInt("n"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDouble("beta"), JDoubleArray("y"), JInt("incy")) - Routine ("blas", "sspmv", JString("uplo"), JInt("n"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloat("beta"), JFloatArray("y"), JInt("incy")) - Routine ("blas", "dspr", JString("uplo"), JInt("n"), JDouble("alpha"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("a")) - Routine ("blas", "sspr", JString("uplo"), JInt("n"), JFloat("alpha"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("a")) - Routine ("blas", "dspr2", JString("uplo"), JInt("n"), JDouble("alpha"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("y", "JNI_ABORT"), JInt("incy"), JDoubleArray("a")) - Routine ("blas", "sspr2", JString("uplo"), JInt("n"), JFloat("alpha"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("y", "JNI_ABORT"), JInt("incy"), JFloatArray("a")) - Routine ("blas", "dswap", JInt("n"), JDoubleArray("x"), JInt("incx"), JDoubleArray("y"), JInt("incy")) - Routine ("blas", "sswap", JInt("n"), JFloatArray("x"), JInt("incx"), JFloatArray("y"), JInt("incy")) - Routine ("blas", "dsymm", JString("side"), JString("uplo"), JInt("m"), JInt("n"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("b", "JNI_ABORT"), JInt("ldb"), JDouble("beta"), JDoubleArray("c"), JInt("ldc")) - Routine ("blas", "ssymm", JString("side"), JString("uplo"), JInt("m"), JInt("n"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("b", "JNI_ABORT"), JInt("ldb"), JFloat("beta"), JFloatArray("c"), JInt("ldc")) - Routine ("blas", "dsymv", JString("uplo"), JInt("n"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDouble("beta"), JDoubleArray("y"), JInt("incy")) - Routine ("blas", "ssymv", JString("uplo"), JInt("n"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloat("beta"), JFloatArray("y"), JInt("incy")) - Routine ("blas", "dsyr", JString("uplo"), JInt("n"), JDouble("alpha"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("a"), JInt("lda")) - Routine ("blas", "ssyr", JString("uplo"), JInt("n"), JFloat("alpha"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("a"), JInt("lda")) - Routine ("blas", "dsyr2", JString("uplo"), JInt("n"), JDouble("alpha"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("y", "JNI_ABORT"), JInt("incy"), JDoubleArray("a"), JInt("lda")) - Routine ("blas", "ssyr2", JString("uplo"), JInt("n"), JFloat("alpha"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("y", "JNI_ABORT"), JInt("incy"), JFloatArray("a"), JInt("lda")) - Routine ("blas", "dsyr2k", JString("uplo"), JString("trans"), JInt("n"), JInt("k"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("b", "JNI_ABORT"), JInt("ldb"), JDouble("beta"), JDoubleArray("c"), JInt("ldc")) - Routine ("blas", "ssyr2k", JString("uplo"), JString("trans"), JInt("n"), JInt("k"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("b", "JNI_ABORT"), JInt("ldb"), JFloat("beta"), JFloatArray("c"), JInt("ldc")) - Routine ("blas", "dsyrk", JString("uplo"), JString("trans"), JInt("n"), JInt("k"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDouble("beta"), JDoubleArray("c"), JInt("ldc")) - Routine ("blas", "ssyrk", JString("uplo"), JString("trans"), JInt("n"), JInt("k"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloat("beta"), JFloatArray("c"), JInt("ldc")) - Routine ("blas", "dtbmv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("k"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x"), JInt("incx")) - Routine ("blas", "stbmv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("k"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x"), JInt("incx")) - Routine ("blas", "dtbsv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("k"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x"), JInt("incx")) - Routine ("blas", "stbsv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("k"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x"), JInt("incx")) - Routine ("blas", "dtpmv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JDoubleArray("a", "JNI_ABORT"), JDoubleArray("x"), JInt("incx")) - Routine ("blas", "stpmv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JFloatArray("a", "JNI_ABORT"), JFloatArray("x"), JInt("incx")) - Routine ("blas", "dtpsv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JDoubleArray("a", "JNI_ABORT"), JDoubleArray("x"), JInt("incx")) - Routine ("blas", "stpsv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JFloatArray("a", "JNI_ABORT"), JFloatArray("x"), JInt("incx")) - Routine ("blas", "dtrmm", JString("side"), JString("uplo"), JString("transa"), JString("diag"), JInt("m"), JInt("n"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("b"), JInt("ldb")) - Routine ("blas", "strmm", JString("side"), JString("uplo"), JString("transa"), JString("diag"), JInt("m"), JInt("n"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("b"), JInt("ldb")) - Routine ("blas", "dtrmv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x"), JInt("incx")) - Routine ("blas", "strmv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x"), JInt("incx")) - Routine ("blas", "dtrsm", JString("side"), JString("uplo"), JString("transa"), JString("diag"), JInt("m"), JInt("n"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("b"), JInt("ldb")) - Routine ("blas", "strsm", JString("side"), JString("uplo"), JString("transa"), JString("diag"), JInt("m"), JInt("n"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("b"), JInt("ldb")) - Routine ("blas", "dtrsv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x"), JInt("incx")) - Routine ("blas", "strsv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x"), JInt("incx")) - RoutineR ("blas", JIntR(), "idamax", JInt("n"), JDoubleArray("dx", "JNI_ABORT"), JInt("incdx")) - RoutineR ("blas", JIntR(), "isamax", JInt("n"), JFloatArray("sx", "JNI_ABORT"), JInt("incsx")) + Library("blas", + RoutineR (JDoubleR(), "dasum", JInt("n"), JDoubleArray("x", "JNI_ABORT"), JInt("incx")), + RoutineR (JFloatR(), "sasum", JInt("n"), JFloatArray("x", "JNI_ABORT"), JInt("incx")), + Routine ( "daxpy", JInt("n"), JDouble("alpha"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("y"), JInt("incy")), + Routine ( "saxpy", JInt("n"), JFloat("alpha"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("y"), JInt("incy")), + Routine ( "dcopy", JInt("n"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("y"), JInt("incy")), + Routine ( "scopy", JInt("n"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("y"), JInt("incy")), + RoutineR (JDoubleR(), "ddot", JInt("n"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("y", "JNI_ABORT"), JInt("incy")), + RoutineR (JFloatR(), "sdot", JInt("n"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("y", "JNI_ABORT"), JInt("incy")), + RoutineR (JFloatR(), "sdsdot", JInt("n"), JFloat("sb"), JFloatArray("sx", "JNI_ABORT"), JInt("incsx"), JFloatArray("sy", "JNI_ABORT"), JInt("incsy")), + Routine ( "dgbmv", JString("trans"), JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDouble("beta"), JDoubleArray("y"), JInt("incy")), + Routine ( "sgbmv", JString("trans"), JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloat("beta"), JFloatArray("y"), JInt("incy")), + Routine ( "dgemm", JString("transa"), JString("transb"), JInt("m"), JInt("n"), JInt("k"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("b", "JNI_ABORT"), JInt("ldb"), JDouble("beta"), JDoubleArray("c"), JInt("ldc")), + Routine ( "sgemm", JString("transa"), JString("transb"), JInt("m"), JInt("n"), JInt("k"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("b", "JNI_ABORT"), JInt("ldb"), JFloat("beta"), JFloatArray("c"), JInt("ldc")), + Routine ( "dgemv", JString("trans"), JInt("m"), JInt("n"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDouble("beta"), JDoubleArray("y"), JInt("incy")), + Routine ( "sgemv", JString("trans"), JInt("m"), JInt("n"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloat("beta"), JFloatArray("y"), JInt("incy")), + Routine ( "dger", JInt("m"), JInt("n"), JDouble("alpha"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("y", "JNI_ABORT"), JInt("incy"), JDoubleArray("a"), JInt("lda")), + Routine ( "sger", JInt("m"), JInt("n"), JFloat("alpha"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("y", "JNI_ABORT"), JInt("incy"), JFloatArray("a"), JInt("lda")), + RoutineR (JDoubleR(), "dnrm2", JInt("n"), JDoubleArray("x", "JNI_ABORT"), JInt("incx")), + RoutineR (JFloatR(), "snrm2", JInt("n"), JFloatArray("x", "JNI_ABORT"), JInt("incx")), + Routine ( "drot", JInt("n"), JDoubleArray("dx"), JInt("incx"), JDoubleArray("dy"), JInt("incy"), JDouble("c"), JDouble("s")), + Routine ( "srot", JInt("n"), JFloatArray("sx"), JInt("incx"), JFloatArray("sy"), JInt("incy"), JFloat("c"), JFloat("s")), + Routine ( "drotm", JInt("n"), JDoubleArray("dx", "JNI_ABORT"), JInt("incx"), JDoubleArray("dy"), JInt("incy"), JDoubleArray("dparam", "JNI_ABORT")), + Routine ( "srotm", JInt("n"), JFloatArray("sx", "JNI_ABORT"), JInt("incx"), JFloatArray("sy"), JInt("incy"), JFloatArray("sparam", "JNI_ABORT")), + Routine ( "drotmg", JDoubleW("dd1"), JDoubleW("dd2"), JDoubleW("dx1"), JDouble("dy1"), JDoubleArray("dparam", "JNI_ABORT")), + Routine ( "srotmg", JFloatW("sd1"), JFloatW("sd2"), JFloatW("sx1"), JFloat("sy1"), JFloatArray("sparam", "JNI_ABORT")), + Routine ( "dsbmv", JString("uplo"), JInt("n"), JInt("k"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDouble("beta"), JDoubleArray("y"), JInt("incy")), + Routine ( "ssbmv", JString("uplo"), JInt("n"), JInt("k"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloat("beta"), JFloatArray("y"), JInt("incy")), + Routine ( "dscal", JInt("n"), JDouble("alpha"), JDoubleArray("x"), JInt("incx")), + Routine ( "sscal", JInt("n"), JFloat("alpha"), JFloatArray("x"), JInt("incx")), + Routine ( "dspmv", JString("uplo"), JInt("n"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDouble("beta"), JDoubleArray("y"), JInt("incy")), + Routine ( "sspmv", JString("uplo"), JInt("n"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloat("beta"), JFloatArray("y"), JInt("incy")), + Routine ( "dspr", JString("uplo"), JInt("n"), JDouble("alpha"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("a")), + Routine ( "sspr", JString("uplo"), JInt("n"), JFloat("alpha"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("a")), + Routine ( "dspr2", JString("uplo"), JInt("n"), JDouble("alpha"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("y", "JNI_ABORT"), JInt("incy"), JDoubleArray("a")), + Routine ( "sspr2", JString("uplo"), JInt("n"), JFloat("alpha"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("y", "JNI_ABORT"), JInt("incy"), JFloatArray("a")), + Routine ( "dswap", JInt("n"), JDoubleArray("x"), JInt("incx"), JDoubleArray("y"), JInt("incy")), + Routine ( "sswap", JInt("n"), JFloatArray("x"), JInt("incx"), JFloatArray("y"), JInt("incy")), + Routine ( "dsymm", JString("side"), JString("uplo"), JInt("m"), JInt("n"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("b", "JNI_ABORT"), JInt("ldb"), JDouble("beta"), JDoubleArray("c"), JInt("ldc")), + Routine ( "ssymm", JString("side"), JString("uplo"), JInt("m"), JInt("n"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("b", "JNI_ABORT"), JInt("ldb"), JFloat("beta"), JFloatArray("c"), JInt("ldc")), + Routine ( "dsymv", JString("uplo"), JInt("n"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDouble("beta"), JDoubleArray("y"), JInt("incy")), + Routine ( "ssymv", JString("uplo"), JInt("n"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloat("beta"), JFloatArray("y"), JInt("incy")), + Routine ( "dsyr", JString("uplo"), JInt("n"), JDouble("alpha"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("a"), JInt("lda")), + Routine ( "ssyr", JString("uplo"), JInt("n"), JFloat("alpha"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("a"), JInt("lda")), + Routine ( "dsyr2", JString("uplo"), JInt("n"), JDouble("alpha"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("y", "JNI_ABORT"), JInt("incy"), JDoubleArray("a"), JInt("lda")), + Routine ( "ssyr2", JString("uplo"), JInt("n"), JFloat("alpha"), JFloatArray("x", "JNI_ABORT"), JInt("incx"), JFloatArray("y", "JNI_ABORT"), JInt("incy"), JFloatArray("a"), JInt("lda")), + Routine ( "dsyr2k", JString("uplo"), JString("trans"), JInt("n"), JInt("k"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("b", "JNI_ABORT"), JInt("ldb"), JDouble("beta"), JDoubleArray("c"), JInt("ldc")), + Routine ( "ssyr2k", JString("uplo"), JString("trans"), JInt("n"), JInt("k"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("b", "JNI_ABORT"), JInt("ldb"), JFloat("beta"), JFloatArray("c"), JInt("ldc")), + Routine ( "dsyrk", JString("uplo"), JString("trans"), JInt("n"), JInt("k"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDouble("beta"), JDoubleArray("c"), JInt("ldc")), + Routine ( "ssyrk", JString("uplo"), JString("trans"), JInt("n"), JInt("k"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloat("beta"), JFloatArray("c"), JInt("ldc")), + Routine ( "dtbmv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("k"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x"), JInt("incx")), + Routine ( "stbmv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("k"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x"), JInt("incx")), + Routine ( "dtbsv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("k"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x"), JInt("incx")), + Routine ( "stbsv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("k"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x"), JInt("incx")), + Routine ( "dtpmv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JDoubleArray("a", "JNI_ABORT"), JDoubleArray("x"), JInt("incx")), + Routine ( "stpmv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JFloatArray("a", "JNI_ABORT"), JFloatArray("x"), JInt("incx")), + Routine ( "dtpsv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JDoubleArray("a", "JNI_ABORT"), JDoubleArray("x"), JInt("incx")), + Routine ( "stpsv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JFloatArray("a", "JNI_ABORT"), JFloatArray("x"), JInt("incx")), + Routine ( "dtrmm", JString("side"), JString("uplo"), JString("transa"), JString("diag"), JInt("m"), JInt("n"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("b"), JInt("ldb")), + Routine ( "strmm", JString("side"), JString("uplo"), JString("transa"), JString("diag"), JInt("m"), JInt("n"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("b"), JInt("ldb")), + Routine ( "dtrmv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x"), JInt("incx")), + Routine ( "strmv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x"), JInt("incx")), + Routine ( "dtrsm", JString("side"), JString("uplo"), JString("transa"), JString("diag"), JInt("m"), JInt("n"), JDouble("alpha"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("b"), JInt("ldb")), + Routine ( "strsm", JString("side"), JString("uplo"), JString("transa"), JString("diag"), JInt("m"), JInt("n"), JFloat("alpha"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("b"), JInt("ldb")), + Routine ( "dtrsv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JDoubleArray("a", "JNI_ABORT"), JInt("lda"), JDoubleArray("x"), JInt("incx")), + Routine ( "strsv", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JFloatArray("a", "JNI_ABORT"), JInt("lda"), JFloatArray("x"), JInt("incx")), + RoutineR (JIntR(), "idamax", JInt("n"), JDoubleArray("dx", "JNI_ABORT"), JInt("incdx")), + RoutineR (JIntR(), "isamax", JInt("n"), JFloatArray("sx", "JNI_ABORT"), JInt("incsx")), + ) if sys.argv[1] == "arpack": - Routine ("arpack", "dmout", JInt("lout"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JInt("idigit"), JString("ifmt")) - Routine ("arpack", "smout", JInt("lout"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JInt("idigit"), JString("ifmt")) - Routine ("arpack", "dvout", JInt("lout"), JInt("n"), JDoubleArray("sx"), JInt("idigit"), JString("ifmt")) - Routine ("arpack", "svout", JInt("lout"), JInt("n"), JFloatArray("sx"), JInt("idigit"), JString("ifmt")) - Routine ("arpack", "ivout", JInt("lout"), JInt("n"), JIntArray("ix"), JInt("idigit"), JString("ifmt")) - Routine ("arpack", "dgetv0", JIntW("ido"), JString("bmat"), JInt("itry"), JBoolean("initv"), JInt("n"), JInt("j"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("resid"), JDoubleW("rnorm"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("ierr")) - Routine ("arpack", "sgetv0", JIntW("ido"), JString("bmat"), JInt("itry"), JBoolean("initv"), JInt("n"), JInt("j"), JFloatArray("v"), JInt("ldv"), JFloatArray("resid"), JFloatW("rnorm"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("ierr")) - Routine_NI("arpack", "dlaqrb", JBoolean("wantt"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("z"), JIntW("info")) - Routine_NI("arpack", "slaqrb", JBoolean("wantt"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("z"), JIntW("info")) - Routine ("arpack", "dnaitr", JIntW("ido"), JString("bmat"), JInt("n"), JInt("k"), JInt("np"), JInt("nb"), JDoubleArray("resid"), JDoubleW("rnorm"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("info")) - Routine ("arpack", "snaitr", JIntW("ido"), JString("bmat"), JInt("n"), JInt("k"), JInt("np"), JInt("nb"), JFloatArray("resid"), JFloatW("rnorm"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("info")) - Routine ("arpack", "dnapps", JInt("n"), JIntW("kev"), JInt("np"), JDoubleArray("shiftr"), JDoubleArray("shifti"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("resid"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workl"), JDoubleArray("workd")) - Routine ("arpack", "snapps", JInt("n"), JIntW("kev"), JInt("np"), JFloatArray("shiftr"), JFloatArray("shifti"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JFloatArray("resid"), JFloatArray("q"), JInt("ldq"), JFloatArray("workl"), JFloatArray("workd")) - Routine ("arpack", "dnaup2", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JIntW("np"), JDouble("tol"), JDoubleArray("resid"), JInt("mode"), JInt("iupd"), JInt("ishift"), JIntW("mxiter"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("ritzr"), JDoubleArray("ritzi"), JDoubleArray("bounds"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workl"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("info")) - Routine ("arpack", "snaup2", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JIntW("np"), JFloat("tol"), JFloatArray("resid"), JInt("mode"), JInt("iupd"), JInt("ishift"), JIntW("mxiter"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JFloatArray("ritzr"), JFloatArray("ritzi"), JFloatArray("bounds"), JFloatArray("q"), JInt("ldq"), JFloatArray("workl"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("info")) - Routine ("arpack", "dnaupd", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JInt("nev"), JDoubleW("tol"), JDoubleArray("resid"), JInt("ncv"), JDoubleArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JDoubleArray("workd"), JDoubleArray("workl"), JInt("lworkl"), JIntW("info")) - Routine ("arpack", "snaupd", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JInt("nev"), JFloatW("tol"), JFloatArray("resid"), JInt("ncv"), JFloatArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JFloatArray("workd"), JFloatArray("workl"), JInt("lworkl"), JIntW("info")) - Routine ("arpack", "dnconv", JInt("n"), JDoubleArray("ritzr"), JDoubleArray("ritzi"), JDoubleArray("bounds"), JDouble("tol"), JIntW("nconv")) - Routine ("arpack", "snconv", JInt("n"), JFloatArray("ritzr"), JFloatArray("ritzi"), JFloatArray("bounds"), JFloat("tol"), JIntW("nconv")) - Routine ("arpack", "dsconv", JInt("n"), JDoubleArray("ritz"), JDoubleArray("bounds"), JDouble("tol"), JIntW("nconv")) - Routine ("arpack", "ssconv", JInt("n"), JFloatArray("ritz"), JFloatArray("bounds"), JFloat("tol"), JIntW("nconv")) - Routine ("arpack", "dneigh", JDouble("rnorm"), JIntW("n"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("ritzr"), JDoubleArray("ritzi"), JDoubleArray("bounds"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workl"), JIntW("ierr")) - Routine ("arpack", "sneigh", JFloat("rnorm"), JIntW("n"), JFloatArray("h"), JInt("ldh"), JFloatArray("ritzr"), JFloatArray("ritzi"), JFloatArray("bounds"), JFloatArray("q"), JInt("ldq"), JFloatArray("workl"), JIntW("ierr")) - Routine ("arpack", "dneupd", JBoolean("rvec"), JString("howmny"), JBooleanArray("select"), JDoubleArray("dr"), JDoubleArray("di"), JDoubleArray("z"), JInt("ldz"), JDouble("sigmar"), JDouble("sigmai"), JDoubleArray("workev"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JDouble("tol"), JDoubleArray("resid"), JInt("ncv"), JDoubleArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JDoubleArray("workd"), JDoubleArray("workl"), JInt("lworkl"), JIntW("info")) - Routine ("arpack", "sneupd", JBoolean("rvec"), JString("howmny"), JBooleanArray("select"), JFloatArray("dr"), JFloatArray("di"), JFloatArray("z"), JInt("ldz"), JFloat("sigmar"), JFloat("sigmai"), JFloatArray("workev"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JFloat("tol"), JFloatArray("resid"), JInt("ncv"), JFloatArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JFloatArray("workd"), JFloatArray("workl"), JInt("lworkl"), JIntW("info")) - Routine ("arpack", "dngets", JInt("ishift"), JString("which"), JIntW("kev"), JIntW("np"), JDoubleArray("ritzr"), JDoubleArray("ritzi"), JDoubleArray("bounds"), JDoubleArray("shiftr"), JDoubleArray("shifti")) - Routine ("arpack", "sngets", JInt("ishift"), JString("which"), JIntW("kev"), JIntW("np"), JFloatArray("ritzr"), JFloatArray("ritzi"), JFloatArray("bounds"), JFloatArray("shiftr"), JFloatArray("shifti")) - Routine ("arpack", "dsaitr", JIntW("ido"), JString("bmat"), JInt("n"), JInt("k"), JInt("np"), JInt("mode"), JDoubleArray("resid"), JDoubleW("rnorm"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("info")) - Routine ("arpack", "ssaitr", JIntW("ido"), JString("bmat"), JInt("n"), JInt("k"), JInt("np"), JInt("mode"), JFloatArray("resid"), JFloatW("rnorm"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("info")) - Routine ("arpack", "dsapps", JInt("n"), JInt("kev"), JInt("np"), JDoubleArray("shift"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("resid"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workd")) - Routine ("arpack", "ssapps", JInt("n"), JInt("kev"), JInt("np"), JFloatArray("shift"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JFloatArray("resid"), JFloatArray("q"), JInt("ldq"), JFloatArray("workd")) - Routine ("arpack", "dsaup2", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JIntW("np"), JDouble("tol"), JDoubleArray("resid"), JInt("mode"), JInt("iupd"), JInt("ishift"), JIntW("mxiter"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("ritz"), JDoubleArray("bounds"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workl"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("info")) - Routine ("arpack", "ssaup2", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JIntW("np"), JFloat("tol"), JFloatArray("resid"), JInt("mode"), JInt("iupd"), JInt("ishift"), JIntW("mxiter"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JFloatArray("ritz"), JFloatArray("bounds"), JFloatArray("q"), JInt("ldq"), JFloatArray("workl"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("info")) - Routine ("arpack", "dseigt", JDouble("rnorm"), JInt("n"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("eig"), JDoubleArray("bounds"), JDoubleArray("workl"), JIntW("ierr")) - Routine ("arpack", "sseigt", JFloat("rnorm"), JInt("n"), JFloatArray("h"), JInt("ldh"), JFloatArray("eig"), JFloatArray("bounds"), JFloatArray("workl"), JIntW("ierr")) - Routine ("arpack", "dsesrt", JString("which"), JBoolean("apply"), JInt("n"), JDoubleArray("x"), JInt("na"), JDoubleArray("a"), JInt("lda")) - Routine ("arpack", "ssesrt", JString("which"), JBoolean("apply"), JInt("n"), JFloatArray("x"), JInt("na"), JFloatArray("a"), JInt("lda")) - Routine ("arpack", "dsaupd", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JInt("nev"), JDoubleW("tol"), JDoubleArray("resid"), JInt("ncv"), JDoubleArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JDoubleArray("workd"), JDoubleArray("workl"), JInt("lworkl"), JIntW("info")) - Routine ("arpack", "ssaupd", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JInt("nev"), JFloatW("tol"), JFloatArray("resid"), JInt("ncv"), JFloatArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JFloatArray("workd"), JFloatArray("workl"), JInt("lworkl"), JIntW("info")) - Routine ("arpack", "dseupd", JBoolean("rvec"), JString("howmny"), JBooleanArray("select"), JDoubleArray("d"), JDoubleArray("z"), JInt("ldz"), JDouble("sigma"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JDouble("tol"), JDoubleArray("resid"), JInt("ncv"), JDoubleArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JDoubleArray("workd"), JDoubleArray("workl"), JInt("lworkl"), JIntW("info")) - Routine ("arpack", "sseupd", JBoolean("rvec"), JString("howmny"), JBooleanArray("select"), JFloatArray("d"), JFloatArray("z"), JInt("ldz"), JFloat("sigma"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JFloat("tol"), JFloatArray("resid"), JInt("ncv"), JFloatArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JFloatArray("workd"), JFloatArray("workl"), JInt("lworkl"), JIntW("info")) - Routine ("arpack", "dsgets", JInt("ishift"), JString("which"), JIntW("kev"), JIntW("np"), JDoubleArray("ritz"), JDoubleArray("bounds"), JDoubleArray("shifts")) - Routine ("arpack", "ssgets", JInt("ishift"), JString("which"), JIntW("kev"), JIntW("np"), JFloatArray("ritz"), JFloatArray("bounds"), JFloatArray("shifts")) - Routine ("arpack", "dsortc", JString("which"), JBoolean("apply"), JInt("n"), JDoubleArray("xreal"), JDoubleArray("ximag"), JDoubleArray("y")) - Routine ("arpack", "ssortc", JString("which"), JBoolean("apply"), JInt("n"), JFloatArray("xreal"), JFloatArray("ximag"), JFloatArray("y")) - Routine ("arpack", "dsortr", JString("which"), JBoolean("apply"), JInt("n"), JDoubleArray("x1"), JDoubleArray("x2")) - Routine ("arpack", "ssortr", JString("which"), JBoolean("apply"), JInt("n"), JFloatArray("x1"), JFloatArray("x2")) - Routine ("arpack", "dstatn") - Routine ("arpack", "sstatn") - Routine ("arpack", "dstats") - Routine ("arpack", "sstats") - Routine ("arpack", "dstqrb", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JDoubleArray("work"), JIntW("info")) - Routine ("arpack", "sstqrb", JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JFloatArray("work"), JIntW("info")) - RoutineR ("arpack", JIntR(), "icnteq", JInt("n"), JIntArray("array"), JInt("value")) - Routine ("arpack", "icopy", JInt("n"), JIntArray("lx"), JInt("incx"), JIntArray("ly"), JInt("incy")) - Routine ("arpack", "iset", JInt("n"), JInt("value"), JIntArray("array"), JInt("inc")) - Routine ("arpack", "iswap", JInt("n"), JIntArray("sx"), JInt("incx"), JIntArray("sy"), JInt("incy")) - Routine ("arpack", "second", JFloatW("t")) + Library("arpack", + Routine ( "dmout", JInt("lout"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JInt("idigit"), JString("ifmt")), + Routine ( "smout", JInt("lout"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JInt("idigit"), JString("ifmt")), + Routine ( "dvout", JInt("lout"), JInt("n"), JDoubleArray("sx"), JInt("idigit"), JString("ifmt")), + Routine ( "svout", JInt("lout"), JInt("n"), JFloatArray("sx"), JInt("idigit"), JString("ifmt")), + Routine ( "ivout", JInt("lout"), JInt("n"), JIntArray("ix"), JInt("idigit"), JString("ifmt")), + Routine ( "dgetv0", JIntW("ido"), JString("bmat"), JInt("itry"), JBoolean("initv"), JInt("n"), JInt("j"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("resid"), JDoubleW("rnorm"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("ierr")), + Routine ( "sgetv0", JIntW("ido"), JString("bmat"), JInt("itry"), JBoolean("initv"), JInt("n"), JInt("j"), JFloatArray("v"), JInt("ldv"), JFloatArray("resid"), JFloatW("rnorm"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("ierr")), + Routine_NI( "dlaqrb", JBoolean("wantt"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("z"), JIntW("info")), + Routine_NI( "slaqrb", JBoolean("wantt"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("z"), JIntW("info")), + Routine ( "dnaitr", JIntW("ido"), JString("bmat"), JInt("n"), JInt("k"), JInt("np"), JInt("nb"), JDoubleArray("resid"), JDoubleW("rnorm"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("info")), + Routine ( "snaitr", JIntW("ido"), JString("bmat"), JInt("n"), JInt("k"), JInt("np"), JInt("nb"), JFloatArray("resid"), JFloatW("rnorm"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("info")), + Routine ( "dnapps", JInt("n"), JIntW("kev"), JInt("np"), JDoubleArray("shiftr"), JDoubleArray("shifti"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("resid"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workl"), JDoubleArray("workd")), + Routine ( "snapps", JInt("n"), JIntW("kev"), JInt("np"), JFloatArray("shiftr"), JFloatArray("shifti"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JFloatArray("resid"), JFloatArray("q"), JInt("ldq"), JFloatArray("workl"), JFloatArray("workd")), + Routine ( "dnaup2", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JIntW("np"), JDouble("tol"), JDoubleArray("resid"), JInt("mode"), JInt("iupd"), JInt("ishift"), JIntW("mxiter"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("ritzr"), JDoubleArray("ritzi"), JDoubleArray("bounds"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workl"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("info")), + Routine ( "snaup2", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JIntW("np"), JFloat("tol"), JFloatArray("resid"), JInt("mode"), JInt("iupd"), JInt("ishift"), JIntW("mxiter"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JFloatArray("ritzr"), JFloatArray("ritzi"), JFloatArray("bounds"), JFloatArray("q"), JInt("ldq"), JFloatArray("workl"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("info")), + Routine ( "dnaupd", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JInt("nev"), JDoubleW("tol"), JDoubleArray("resid"), JInt("ncv"), JDoubleArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JDoubleArray("workd"), JDoubleArray("workl"), JInt("lworkl"), JIntW("info")), + Routine ( "snaupd", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JInt("nev"), JFloatW("tol"), JFloatArray("resid"), JInt("ncv"), JFloatArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JFloatArray("workd"), JFloatArray("workl"), JInt("lworkl"), JIntW("info")), + Routine ( "dnconv", JInt("n"), JDoubleArray("ritzr"), JDoubleArray("ritzi"), JDoubleArray("bounds"), JDouble("tol"), JIntW("nconv")), + Routine ( "snconv", JInt("n"), JFloatArray("ritzr"), JFloatArray("ritzi"), JFloatArray("bounds"), JFloat("tol"), JIntW("nconv")), + Routine ( "dsconv", JInt("n"), JDoubleArray("ritz"), JDoubleArray("bounds"), JDouble("tol"), JIntW("nconv")), + Routine ( "ssconv", JInt("n"), JFloatArray("ritz"), JFloatArray("bounds"), JFloat("tol"), JIntW("nconv")), + Routine ( "dneigh", JDouble("rnorm"), JIntW("n"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("ritzr"), JDoubleArray("ritzi"), JDoubleArray("bounds"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workl"), JIntW("ierr")), + Routine ( "sneigh", JFloat("rnorm"), JIntW("n"), JFloatArray("h"), JInt("ldh"), JFloatArray("ritzr"), JFloatArray("ritzi"), JFloatArray("bounds"), JFloatArray("q"), JInt("ldq"), JFloatArray("workl"), JIntW("ierr")), + Routine ( "dneupd", JBoolean("rvec"), JString("howmny"), JBooleanArray("select"), JDoubleArray("dr"), JDoubleArray("di"), JDoubleArray("z"), JInt("ldz"), JDouble("sigmar"), JDouble("sigmai"), JDoubleArray("workev"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JDouble("tol"), JDoubleArray("resid"), JInt("ncv"), JDoubleArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JDoubleArray("workd"), JDoubleArray("workl"), JInt("lworkl"), JIntW("info")), + Routine ( "sneupd", JBoolean("rvec"), JString("howmny"), JBooleanArray("select"), JFloatArray("dr"), JFloatArray("di"), JFloatArray("z"), JInt("ldz"), JFloat("sigmar"), JFloat("sigmai"), JFloatArray("workev"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JFloat("tol"), JFloatArray("resid"), JInt("ncv"), JFloatArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JFloatArray("workd"), JFloatArray("workl"), JInt("lworkl"), JIntW("info")), + Routine ( "dngets", JInt("ishift"), JString("which"), JIntW("kev"), JIntW("np"), JDoubleArray("ritzr"), JDoubleArray("ritzi"), JDoubleArray("bounds"), JDoubleArray("shiftr"), JDoubleArray("shifti")), + Routine ( "sngets", JInt("ishift"), JString("which"), JIntW("kev"), JIntW("np"), JFloatArray("ritzr"), JFloatArray("ritzi"), JFloatArray("bounds"), JFloatArray("shiftr"), JFloatArray("shifti")), + Routine ( "dsaitr", JIntW("ido"), JString("bmat"), JInt("n"), JInt("k"), JInt("np"), JInt("mode"), JDoubleArray("resid"), JDoubleW("rnorm"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("info")), + Routine ( "ssaitr", JIntW("ido"), JString("bmat"), JInt("n"), JInt("k"), JInt("np"), JInt("mode"), JFloatArray("resid"), JFloatW("rnorm"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("info")), + Routine ( "dsapps", JInt("n"), JInt("kev"), JInt("np"), JDoubleArray("shift"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("resid"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workd")), + Routine ( "ssapps", JInt("n"), JInt("kev"), JInt("np"), JFloatArray("shift"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JFloatArray("resid"), JFloatArray("q"), JInt("ldq"), JFloatArray("workd")), + Routine ( "dsaup2", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JIntW("np"), JDouble("tol"), JDoubleArray("resid"), JInt("mode"), JInt("iupd"), JInt("ishift"), JIntW("mxiter"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("ritz"), JDoubleArray("bounds"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workl"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("info")), + Routine ( "ssaup2", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JIntW("np"), JFloat("tol"), JFloatArray("resid"), JInt("mode"), JInt("iupd"), JInt("ishift"), JIntW("mxiter"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JFloatArray("ritz"), JFloatArray("bounds"), JFloatArray("q"), JInt("ldq"), JFloatArray("workl"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("info")), + Routine ( "dseigt", JDouble("rnorm"), JInt("n"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("eig"), JDoubleArray("bounds"), JDoubleArray("workl"), JIntW("ierr")), + Routine ( "sseigt", JFloat("rnorm"), JInt("n"), JFloatArray("h"), JInt("ldh"), JFloatArray("eig"), JFloatArray("bounds"), JFloatArray("workl"), JIntW("ierr")), + Routine ( "dsesrt", JString("which"), JBoolean("apply"), JInt("n"), JDoubleArray("x"), JInt("na"), JDoubleArray("a"), JInt("lda")), + Routine ( "ssesrt", JString("which"), JBoolean("apply"), JInt("n"), JFloatArray("x"), JInt("na"), JFloatArray("a"), JInt("lda")), + Routine ( "dsaupd", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JInt("nev"), JDoubleW("tol"), JDoubleArray("resid"), JInt("ncv"), JDoubleArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JDoubleArray("workd"), JDoubleArray("workl"), JInt("lworkl"), JIntW("info")), + Routine ( "ssaupd", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JInt("nev"), JFloatW("tol"), JFloatArray("resid"), JInt("ncv"), JFloatArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JFloatArray("workd"), JFloatArray("workl"), JInt("lworkl"), JIntW("info")), + Routine ( "dseupd", JBoolean("rvec"), JString("howmny"), JBooleanArray("select"), JDoubleArray("d"), JDoubleArray("z"), JInt("ldz"), JDouble("sigma"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JDouble("tol"), JDoubleArray("resid"), JInt("ncv"), JDoubleArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JDoubleArray("workd"), JDoubleArray("workl"), JInt("lworkl"), JIntW("info")), + Routine ( "sseupd", JBoolean("rvec"), JString("howmny"), JBooleanArray("select"), JFloatArray("d"), JFloatArray("z"), JInt("ldz"), JFloat("sigma"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JFloat("tol"), JFloatArray("resid"), JInt("ncv"), JFloatArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JFloatArray("workd"), JFloatArray("workl"), JInt("lworkl"), JIntW("info")), + Routine ( "dsgets", JInt("ishift"), JString("which"), JIntW("kev"), JIntW("np"), JDoubleArray("ritz"), JDoubleArray("bounds"), JDoubleArray("shifts")), + Routine ( "ssgets", JInt("ishift"), JString("which"), JIntW("kev"), JIntW("np"), JFloatArray("ritz"), JFloatArray("bounds"), JFloatArray("shifts")), + Routine ( "dsortc", JString("which"), JBoolean("apply"), JInt("n"), JDoubleArray("xreal"), JDoubleArray("ximag"), JDoubleArray("y")), + Routine ( "ssortc", JString("which"), JBoolean("apply"), JInt("n"), JFloatArray("xreal"), JFloatArray("ximag"), JFloatArray("y")), + Routine ( "dsortr", JString("which"), JBoolean("apply"), JInt("n"), JDoubleArray("x1"), JDoubleArray("x2")), + Routine ( "ssortr", JString("which"), JBoolean("apply"), JInt("n"), JFloatArray("x1"), JFloatArray("x2")), + Routine ( "dstatn"), + Routine ( "sstatn"), + Routine ( "dstats"), + Routine ( "sstats"), + Routine ( "dstqrb", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JDoubleArray("work"), JIntW("info")), + Routine ( "sstqrb", JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JFloatArray("work"), JIntW("info")), + RoutineR (JIntR(), "icnteq", JInt("n"), JIntArray("array"), JInt("value")), + Routine ( "icopy", JInt("n"), JIntArray("lx"), JInt("incx"), JIntArray("ly"), JInt("incy")), + Routine ( "iset", JInt("n"), JInt("value"), JIntArray("array"), JInt("inc")), + Routine ( "iswap", JInt("n"), JIntArray("sx"), JInt("incx"), JIntArray("sy"), JInt("incy")), + Routine ( "second", JFloatW("t")), + ) if sys.argv[1] == "lapack": - Routine ("lapack", "dbdsdc", JString("uplo"), JString("compq"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("q"), JIntArray("iq"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dbdsqr", JString("uplo"), JInt("n"), JInt("ncvt"), JInt("nru"), JInt("ncc"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "ddisna", JString("job"), JInt("m"), JInt("n"), JDoubleArray("d"), JDoubleArray("sep"), JIntW("info")) - Routine ("lapack", "dgbbrd", JString("vect"), JInt("m"), JInt("n"), JInt("ncc"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("pt"), JInt("ldpt"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dgbcon", JString("norm"), JInt("n"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JIntArray("ipiv"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dgbequ", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("r"), JDoubleArray("c"), JDoubleW("rowcnd"), JDoubleW("colcnd"), JDoubleW("amax"), JIntW("info")) - Routine ("lapack", "dgbrfs", JString("trans"), JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("afb"), JInt("ldafb"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dgbsv", JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "dgbsvx", JString("fact"), JString("trans"), JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("afb"), JInt("ldafb"), JIntArray("ipiv"), JStringW("equed"), JDoubleArray("r"), JDoubleArray("c"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dgbtf2", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JIntArray("ipiv"), JIntW("info")) - Routine ("lapack", "dgbtrf", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JIntArray("ipiv"), JIntW("info")) - Routine ("lapack", "dgbtrs", JString("trans"), JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "dgebak", JString("job"), JString("side"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("scale"), JInt("m"), JDoubleArray("v"), JInt("ldv"), JIntW("info")) - Routine ("lapack", "dgebal", JString("job"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("ilo"), JIntW("ihi"), JDoubleArray("scale"), JIntW("info")) - Routine ("lapack", "dgebd2", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("tauq"), JDoubleArray("taup"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dgebrd", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("tauq"), JDoubleArray("taup"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dgecon", JString("norm"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dgeequ", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("r"), JDoubleArray("c"), JDoubleW("rowcnd"), JDoubleW("colcnd"), JDoubleW("amax"), JIntW("info")) - Routine_NI("lapack", "dgees", JString("jobvs"), JString("sort"), JObject("select"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("sdim"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("vs"), JInt("ldvs"), JDoubleArray("work"), JInt("lwork"), JBooleanArray("bwork"), JIntW("info")) - Routine_NI("lapack", "dgeesx", JString("jobvs"), JString("sort"), JObject("select"), JString("sense"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("sdim"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("vs"), JInt("ldvs"), JDoubleW("rconde"), JDoubleW("rcondv"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JBooleanArray("bwork"), JIntW("info")) - Routine ("lapack", "dgeev", JString("jobvl"), JString("jobvr"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dgeevx", JString("balanc"), JString("jobvl"), JString("jobvr"), JString("sense"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JIntW("ilo"), JIntW("ihi"), JDoubleArray("scale"), JDoubleW("abnrm"), JDoubleArray("rconde"), JDoubleArray("rcondv"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dgegs", JString("jobvsl"), JString("jobvsr"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("vsl"), JInt("ldvsl"), JDoubleArray("vsr"), JInt("ldvsr"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dgegv", JString("jobvl"), JString("jobvr"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dgehd2", JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dgehrd", JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dgelq2", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dgelqf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dgels", JString("trans"), JInt("m"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dgelsd", JInt("m"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("s"), JDouble("rcond"), JIntW("rank"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dgelss", JInt("m"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("s"), JDouble("rcond"), JIntW("rank"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dgelsx", JInt("m"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntArray("jpvt"), JDouble("rcond"), JIntW("rank"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dgelsy", JInt("m"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntArray("jpvt"), JDouble("rcond"), JIntW("rank"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dgeql2", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dgeqlf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dgeqp3", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("jpvt"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dgeqpf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("jpvt"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dgeqr2", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dgeqrf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dgerfs", JString("trans"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("af"), JInt("ldaf"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dgerq2", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dgerqf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dgesc2", JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("rhs"), JIntArray("ipiv"), JIntArray("jpiv"), JDoubleW("scale")) - Routine ("lapack", "dgesdd", JString("jobz"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("s"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dgesv", JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "dgesvd", JString("jobu"), JString("jobvt"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("s"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dgesvx", JString("fact"), JString("trans"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("af"), JInt("ldaf"), JIntArray("ipiv"), JStringW("equed"), JDoubleArray("r"), JDoubleArray("c"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dgetc2", JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JIntArray("jpiv"), JIntW("info")) - Routine ("lapack", "dgetf2", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JIntW("info")) - Routine ("lapack", "dgetrf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JIntW("info")) - Routine ("lapack", "dgetri", JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dgetrs", JString("trans"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "dggbak", JString("job"), JString("side"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("lscale"), JDoubleArray("rscale"), JInt("m"), JDoubleArray("v"), JInt("ldv"), JIntW("info")) - Routine ("lapack", "dggbal", JString("job"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("ilo"), JIntW("ihi"), JDoubleArray("lscale"), JDoubleArray("rscale"), JDoubleArray("work"), JIntW("info")) - Routine_NI("lapack", "dgges", JString("jobvsl"), JString("jobvsr"), JString("sort"), JObject("selctg"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("sdim"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("vsl"), JInt("ldvsl"), JDoubleArray("vsr"), JInt("ldvsr"), JDoubleArray("work"), JInt("lwork"), JBooleanArray("bwork"), JIntW("info")) - Routine_NI("lapack", "dggesx", JString("jobvsl"), JString("jobvsr"), JString("sort"), JObject("selctg"), JString("sense"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("sdim"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("vsl"), JInt("ldvsl"), JDoubleArray("vsr"), JInt("ldvsr"), JDoubleArray("rconde"), JDoubleArray("rcondv"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JBooleanArray("bwork"), JIntW("info")) - Routine ("lapack", "dggev", JString("jobvl"), JString("jobvr"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dggevx", JString("balanc"), JString("jobvl"), JString("jobvr"), JString("sense"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JIntW("ilo"), JIntW("ihi"), JDoubleArray("lscale"), JDoubleArray("rscale"), JDoubleW("abnrm"), JDoubleW("bbnrm"), JDoubleArray("rconde"), JDoubleArray("rcondv"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JBooleanArray("bwork"), JIntW("info")) - Routine ("lapack", "dggglm", JInt("n"), JInt("m"), JInt("p"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("d"), JDoubleArray("x"), JDoubleArray("y"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dgghrd", JString("compq"), JString("compz"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("z"), JInt("ldz"), JIntW("info")) - Routine ("lapack", "dgglse", JInt("m"), JInt("n"), JInt("p"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("c"), JDoubleArray("d"), JDoubleArray("x"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dggqrf", JInt("n"), JInt("m"), JInt("p"), JDoubleArray("a"), JInt("lda"), JDoubleArray("taua"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("taub"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dggrqf", JInt("m"), JInt("p"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("taua"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("taub"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dggsvd", JString("jobu"), JString("jobv"), JString("jobq"), JInt("m"), JInt("n"), JInt("p"), JIntW("k"), JIntW("l"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alpha"), JDoubleArray("beta"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dggsvp", JString("jobu"), JString("jobv"), JString("jobq"), JInt("m"), JInt("p"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDouble("tola"), JDouble("tolb"), JIntW("k"), JIntW("l"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("q"), JInt("ldq"), JIntArray("iwork"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dgtcon", JString("norm"), JInt("n"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("du2"), JIntArray("ipiv"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dgtrfs", JString("trans"), JInt("n"), JInt("nrhs"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("dlf"), JDoubleArray("df"), JDoubleArray("duf"), JDoubleArray("du2"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dgtsv", JInt("n"), JInt("nrhs"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "dgtsvx", JString("fact"), JString("trans"), JInt("n"), JInt("nrhs"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("dlf"), JDoubleArray("df"), JDoubleArray("duf"), JDoubleArray("du2"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dgttrf", JInt("n"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("du2"), JIntArray("ipiv"), JIntW("info")) - Routine ("lapack", "dgttrs", JString("trans"), JInt("n"), JInt("nrhs"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("du2"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "dgtts2", JInt("itrans"), JInt("n"), JInt("nrhs"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("du2"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb")) - Routine ("lapack", "dhgeqz", JString("job"), JString("compq"), JString("compz"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dhsein", JString("side"), JString("eigsrc"), JString("initv"), JBooleanArray("select"), JInt("n"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JInt("mm"), JIntW("m"), JDoubleArray("work"), JIntArray("ifaill"), JIntArray("ifailr"), JIntW("info")) - Routine ("lapack", "dhseqr", JString("job"), JString("compz"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - RoutineR ("lapack", JBooleanR(), "disnan", JDouble("din")) - Routine ("lapack", "dlabad", JDoubleW("small"), JDoubleW("large")) - Routine ("lapack", "dlabrd", JInt("m"), JInt("n"), JInt("nb"), JDoubleArray("a"), JInt("lda"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("tauq"), JDoubleArray("taup"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("y"), JInt("ldy")) - Routine ("lapack", "dlacn2", JInt("n"), JDoubleArray("v"), JDoubleArray("x"), JIntArray("isgn"), JDoubleW("est"), JIntW("kase"), JIntArray("isave")) - Routine ("lapack", "dlacon", JInt("n"), JDoubleArray("v"), JDoubleArray("x"), JIntArray("isgn"), JDoubleW("est"), JIntW("kase")) - Routine ("lapack", "dlacpy", JString("uplo"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb")) - Routine ("lapack", "dladiv", JDouble("a"), JDouble("b"), JDouble("c"), JDouble("d"), JDoubleW("p"), JDoubleW("q")) - Routine ("lapack", "dlae2", JDouble("a"), JDouble("b"), JDouble("c"), JDoubleW("rt1"), JDoubleW("rt2")) - Routine ("lapack", "dlaebz", JInt("ijob"), JInt("nitmax"), JInt("n"), JInt("mmax"), JInt("minp"), JInt("nbmin"), JDouble("abstol"), JDouble("reltol"), JDouble("pivmin"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("e2"), JIntArray("nval"), JDoubleArray("ab"), JDoubleArray("c"), JIntW("mout"), JIntArray("nab"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dlaed0", JInt("icompq"), JInt("qsiz"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("qstore"), JInt("ldqs"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dlaed1", JInt("n"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JIntArray("indxq"), JDoubleW("rho"), JInt("cutpnt"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dlaed2", JIntW("k"), JInt("n"), JInt("n1"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JIntArray("indxq"), JDoubleW("rho"), JDoubleArray("z"), JDoubleArray("dlamda"), JDoubleArray("w"), JDoubleArray("q2"), JIntArray("indx"), JIntArray("indxc"), JIntArray("indxp"), JIntArray("coltyp"), JIntW("info")) - Routine ("lapack", "dlaed3", JInt("k"), JInt("n"), JInt("n1"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JDouble("rho"), JDoubleArray("dlamda"), JDoubleArray("q2"), JIntArray("indx"), JIntArray("ctot"), JDoubleArray("w"), JDoubleArray("s"), JIntW("info")) - Routine ("lapack", "dlaed4", JInt("n"), JInt("i"), JDoubleArray("d"), JDoubleArray("z"), JDoubleArray("delta"), JDouble("rho"), JDoubleW("dlam"), JIntW("info")) - Routine ("lapack", "dlaed5", JInt("i"), JDoubleArray("d"), JDoubleArray("z"), JDoubleArray("delta"), JDouble("rho"), JDoubleW("dlam")) - Routine ("lapack", "dlaed6", JInt("kniter"), JBoolean("orgati"), JDouble("rho"), JDoubleArray("d"), JDoubleArray("z"), JDouble("finit"), JDoubleW("tau"), JIntW("info")) - Routine ("lapack", "dlaed7", JInt("icompq"), JInt("n"), JInt("qsiz"), JInt("tlvls"), JInt("curlvl"), JInt("curpbm"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JIntArray("indxq"), JDoubleW("rho"), JInt("cutpnt"), JDoubleArray("qstore"), JIntArray("qptr"), JIntArray("prmptr"), JIntArray("perm"), JIntArray("givptr"), JIntArray("givcol"), JDoubleArray("givnum"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dlaed8", JInt("icompq"), JIntW("k"), JInt("n"), JInt("qsiz"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JIntArray("indxq"), JDoubleW("rho"), JInt("cutpnt"), JDoubleArray("z"), JDoubleArray("dlamda"), JDoubleArray("q2"), JInt("ldq2"), JDoubleArray("w"), JIntArray("perm"), JIntW("givptr"), JIntArray("givcol"), JDoubleArray("givnum"), JIntArray("indxp"), JIntArray("indx"), JIntW("info")) - Routine ("lapack", "dlaed9", JInt("k"), JInt("kstart"), JInt("kstop"), JInt("n"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JDouble("rho"), JDoubleArray("dlamda"), JDoubleArray("w"), JDoubleArray("s"), JInt("lds"), JIntW("info")) - Routine ("lapack", "dlaeda", JInt("n"), JInt("tlvls"), JInt("curlvl"), JInt("curpbm"), JIntArray("prmptr"), JIntArray("perm"), JIntArray("givptr"), JIntArray("givcol"), JDoubleArray("givnum"), JDoubleArray("q"), JIntArray("qptr"), JDoubleArray("z"), JDoubleArray("ztemp"), JIntW("info")) - Routine ("lapack", "dlaein", JBoolean("rightv"), JBoolean("noinit"), JInt("n"), JDoubleArray("h"), JInt("ldh"), JDouble("wr"), JDouble("wi"), JDoubleArray("vr"), JDoubleArray("vi"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("work"), JDouble("eps3"), JDouble("smlnum"), JDouble("bignum"), JIntW("info")) - Routine ("lapack", "dlaev2", JDouble("a"), JDouble("b"), JDouble("c"), JDoubleW("rt1"), JDoubleW("rt2"), JDoubleW("cs1"), JDoubleW("sn1")) - Routine ("lapack", "dlaexc", JBoolean("wantq"), JInt("n"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("q"), JInt("ldq"), JInt("j1"), JInt("n1"), JInt("n2"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dlag2", JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDouble("safmin"), JDoubleW("scale1"), JDoubleW("scale2"), JDoubleW("wr1"), JDoubleW("wr2"), JDoubleW("wi")) - Routine ("lapack", "dlag2s", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JFloatArray("sa"), JInt("ldsa"), JIntW("info")) - Routine ("lapack", "dlags2", JBoolean("upper"), JDouble("a1"), JDouble("a2"), JDouble("a3"), JDouble("b1"), JDouble("b2"), JDouble("b3"), JDoubleW("csu"), JDoubleW("snu"), JDoubleW("csv"), JDoubleW("snv"), JDoubleW("csq"), JDoubleW("snq")) - Routine ("lapack", "dlagtf", JInt("n"), JDoubleArray("a"), JDouble("lambda"), JDoubleArray("b"), JDoubleArray("c"), JDouble("tol"), JDoubleArray("d"), JIntArray("in"), JIntW("info")) - Routine ("lapack", "dlagtm", JString("trans"), JInt("n"), JInt("nrhs"), JDouble("alpha"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("x"), JInt("ldx"), JDouble("beta"), JDoubleArray("b"), JInt("ldb")) - Routine ("lapack", "dlagts", JInt("job"), JInt("n"), JDoubleArray("a"), JDoubleArray("b"), JDoubleArray("c"), JDoubleArray("d"), JIntArray("in"), JDoubleArray("y"), JDoubleW("tol"), JIntW("info")) - Routine ("lapack", "dlagv2", JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleW("csl"), JDoubleW("snl"), JDoubleW("csr"), JDoubleW("snr")) - Routine ("lapack", "dlahqr", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JInt("iloz"), JInt("ihiz"), JDoubleArray("z"), JInt("ldz"), JIntW("info")) - Routine ("lapack", "dlahr2", JInt("n"), JInt("k"), JInt("nb"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("y"), JInt("ldy")) - Routine ("lapack", "dlahrd", JInt("n"), JInt("k"), JInt("nb"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("y"), JInt("ldy")) - Routine ("lapack", "dlaic1", JInt("job"), JInt("j"), JDoubleArray("x"), JDouble("sest"), JDoubleArray("w"), JDouble("gamma"), JDoubleW("sestpr"), JDoubleW("s"), JDoubleW("c")) - RoutineR ("lapack", JBooleanR(), "dlaisnan", JDouble("din1"), JDouble("din2")) - Routine ("lapack", "dlaln2", JBoolean("ltrans"), JInt("na"), JInt("nw"), JDouble("smin"), JDouble("ca"), JDoubleArray("a"), JInt("lda"), JDouble("d1"), JDouble("d2"), JDoubleArray("b"), JInt("ldb"), JDouble("wr"), JDouble("wi"), JDoubleArray("x"), JInt("ldx"), JDoubleW("scale"), JDoubleW("xnorm"), JIntW("info")) - Routine ("lapack", "dlals0", JInt("icompq"), JInt("nl"), JInt("nr"), JInt("sqre"), JInt("nrhs"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("bx"), JInt("ldbx"), JIntArray("perm"), JInt("givptr"), JIntArray("givcol"), JInt("ldgcol"), JDoubleArray("givnum"), JInt("ldgnum"), JDoubleArray("poles"), JDoubleArray("difl"), JDoubleArray("difr"), JDoubleArray("z"), JInt("k"), JDouble("c"), JDouble("s"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dlalsa", JInt("icompq"), JInt("smlsiz"), JInt("n"), JInt("nrhs"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("bx"), JInt("ldbx"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JIntArray("k"), JDoubleArray("difl"), JDoubleArray("difr"), JDoubleArray("z"), JDoubleArray("poles"), JIntArray("givptr"), JIntArray("givcol"), JInt("ldgcol"), JIntArray("perm"), JDoubleArray("givnum"), JDoubleArray("c"), JDoubleArray("s"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dlalsd", JString("uplo"), JInt("smlsiz"), JInt("n"), JInt("nrhs"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("b"), JInt("ldb"), JDouble("rcond"), JIntW("rank"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dlamrg", JInt("n1"), JInt("n2"), JDoubleArray("a"), JInt("dtrd1"), JInt("dtrd2"), JIntArray("index")) - RoutineR ("lapack", JIntR(), "dlaneg", JInt("n"), JDoubleArray("d"), JDoubleArray("lld"), JDouble("sigma"), JDouble("pivmin"), JInt("r")) - RoutineR ("lapack", JDoubleR(), "dlangb", JString("norm"), JInt("n"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("work")) - RoutineR ("lapack", JDoubleR(), "dlange", JString("norm"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("work")) - RoutineR ("lapack", JDoubleR(), "dlangt", JString("norm"), JInt("n"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du")) - RoutineR ("lapack", JDoubleR(), "dlanhs", JString("norm"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("work")) - RoutineR ("lapack", JDoubleR(), "dlansb", JString("norm"), JString("uplo"), JInt("n"), JInt("k"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("work")) - RoutineR ("lapack", JDoubleR(), "dlansp", JString("norm"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("work")) - RoutineR ("lapack", JDoubleR(), "dlanst", JString("norm"), JInt("n"), JDoubleArray("d"), JDoubleArray("e")) - RoutineR ("lapack", JDoubleR(), "dlansy", JString("norm"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("work")) - RoutineR ("lapack", JDoubleR(), "dlantb", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JInt("k"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("work")) - RoutineR ("lapack", JDoubleR(), "dlantp", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JDoubleArray("ap"), JDoubleArray("work")) - RoutineR ("lapack", JDoubleR(), "dlantr", JString("norm"), JString("uplo"), JString("diag"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("work")) - Routine ("lapack", "dlanv2", JDoubleW("a"), JDoubleW("b"), JDoubleW("c"), JDoubleW("d"), JDoubleW("rt1r"), JDoubleW("rt1i"), JDoubleW("rt2r"), JDoubleW("rt2i"), JDoubleW("cs"), JDoubleW("sn")) - Routine ("lapack", "dlapll", JInt("n"), JDoubleArray("x"), JInt("incx"), JDoubleArray("y"), JInt("incy"), JDoubleW("ssmin")) - Routine ("lapack", "dlapmt", JBoolean("forwrd"), JInt("m"), JInt("n"), JDoubleArray("x"), JInt("ldx"), JIntArray("k")) - RoutineR ("lapack", JDoubleR(), "dlapy2", JDouble("x"), JDouble("y")) - RoutineR ("lapack", JDoubleR(), "dlapy3", JDouble("x"), JDouble("y"), JDouble("z")) - Routine ("lapack", "dlaqgb", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("r"), JDoubleArray("c"), JDouble("rowcnd"), JDouble("colcnd"), JDouble("amax"), JStringW("equed")) - Routine ("lapack", "dlaqge", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("r"), JDoubleArray("c"), JDouble("rowcnd"), JDouble("colcnd"), JDouble("amax"), JStringW("equed")) - Routine ("lapack", "dlaqp2", JInt("m"), JInt("n"), JInt("offset"), JDoubleArray("a"), JInt("lda"), JIntArray("jpvt"), JDoubleArray("tau"), JDoubleArray("vn1"), JDoubleArray("vn2"), JDoubleArray("work")) - Routine ("lapack", "dlaqps", JInt("m"), JInt("n"), JInt("offset"), JInt("nb"), JIntW("kb"), JDoubleArray("a"), JInt("lda"), JIntArray("jpvt"), JDoubleArray("tau"), JDoubleArray("vn1"), JDoubleArray("vn2"), JDoubleArray("auxv"), JDoubleArray("f"), JInt("ldf")) - Routine ("lapack", "dlaqr0", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JInt("iloz"), JInt("ihiz"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dlaqr1", JInt("n"), JDoubleArray("h"), JInt("ldh"), JDouble("sr1"), JDouble("si1"), JDouble("sr2"), JDouble("si2"), JDoubleArray("v")) - Routine ("lapack", "dlaqr2", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ktop"), JInt("kbot"), JInt("nw"), JDoubleArray("h"), JInt("ldh"), JInt("iloz"), JInt("ihiz"), JDoubleArray("z"), JInt("ldz"), JIntW("ns"), JIntW("nd"), JDoubleArray("sr"), JDoubleArray("si"), JDoubleArray("v"), JInt("ldv"), JInt("nh"), JDoubleArray("t"), JInt("ldt"), JInt("nv"), JDoubleArray("wv"), JInt("ldwv"), JDoubleArray("work"), JInt("lwork")) - Routine ("lapack", "dlaqr3", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ktop"), JInt("kbot"), JInt("nw"), JDoubleArray("h"), JInt("ldh"), JInt("iloz"), JInt("ihiz"), JDoubleArray("z"), JInt("ldz"), JIntW("ns"), JIntW("nd"), JDoubleArray("sr"), JDoubleArray("si"), JDoubleArray("v"), JInt("ldv"), JInt("nh"), JDoubleArray("t"), JInt("ldt"), JInt("nv"), JDoubleArray("wv"), JInt("ldwv"), JDoubleArray("work"), JInt("lwork")) - Routine ("lapack", "dlaqr4", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JInt("iloz"), JInt("ihiz"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dlaqr5", JBoolean("wantt"), JBoolean("wantz"), JInt("kacc22"), JInt("n"), JInt("ktop"), JInt("kbot"), JInt("nshfts"), JDoubleArray("sr"), JDoubleArray("si"), JDoubleArray("h"), JInt("ldh"), JInt("iloz"), JInt("ihiz"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("u"), JInt("ldu"), JInt("nv"), JDoubleArray("wv"), JInt("ldwv"), JInt("nh"), JDoubleArray("wh"), JInt("ldwh")) - Routine ("lapack", "dlaqsb", JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("s"), JDouble("scond"), JDouble("amax"), JStringW("equed")) - Routine ("lapack", "dlaqsp", JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("s"), JDouble("scond"), JDouble("amax"), JStringW("equed")) - Routine ("lapack", "dlaqsy", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("s"), JDouble("scond"), JDouble("amax"), JStringW("equed")) - Routine ("lapack", "dlaqtr", JBoolean("ltran"), JBoolean("lreal"), JInt("n"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("b"), JDouble("w"), JDoubleW("scale"), JDoubleArray("x"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dlar1v", JInt("n"), JInt("b1"), JInt("bn"), JDouble("lambda"), JDoubleArray("d"), JDoubleArray("l"), JDoubleArray("ld"), JDoubleArray("lld"), JDouble("pivmin"), JDouble("gaptol"), JDoubleArray("z"), JBoolean("wantnc"), JIntW("negcnt"), JDoubleW("ztz"), JDoubleW("mingma"), JIntW("r"), JIntArray("isuppz"), JDoubleW("nrminv"), JDoubleW("resid"), JDoubleW("rqcorr"), JDoubleArray("work")) - Routine ("lapack", "dlar2v", JInt("n"), JDoubleArray("x"), JDoubleArray("y"), JDoubleArray("z"), JInt("incx"), JDoubleArray("c"), JDoubleArray("s"), JInt("incc")) - Routine ("lapack", "dlarf", JString("side"), JInt("m"), JInt("n"), JDoubleArray("v"), JInt("incv"), JDouble("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work")) - Routine ("lapack", "dlarfb", JString("side"), JString("trans"), JString("direct"), JString("storev"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("ldwork")) - Routine ("lapack", "dlarfg", JInt("n"), JDoubleW("alpha"), JDoubleArray("x"), JInt("incx"), JDoubleW("tau")) - Routine ("lapack", "dlarft", JString("direct"), JString("storev"), JInt("n"), JInt("k"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("tau"), JDoubleArray("t"), JInt("ldt")) - Routine ("lapack", "dlarfx", JString("side"), JInt("m"), JInt("n"), JDoubleArray("v"), JDouble("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work")) - Routine ("lapack", "dlargv", JInt("n"), JDoubleArray("x"), JInt("incx"), JDoubleArray("y"), JInt("incy"), JDoubleArray("c"), JInt("incc")) - Routine ("lapack", "dlarnv", JInt("idist"), JIntArray("iseed"), JInt("n"), JDoubleArray("x")) - Routine ("lapack", "dlarra", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("e2"), JDouble("spltol"), JDouble("tnrm"), JIntW("nsplit"), JIntArray("isplit"), JIntW("info")) - Routine ("lapack", "dlarrb", JInt("n"), JDoubleArray("d"), JDoubleArray("lld"), JInt("ifirst"), JInt("ilast"), JDouble("rtol1"), JDouble("rtol2"), JInt("offset"), JDoubleArray("w"), JDoubleArray("wgap"), JDoubleArray("werr"), JDoubleArray("work"), JIntArray("iwork"), JDouble("pivmin"), JDouble("spdiam"), JInt("twist"), JIntW("info")) - Routine ("lapack", "dlarrc", JString("jobt"), JInt("n"), JDouble("vl"), JDouble("vu"), JDoubleArray("d"), JDoubleArray("e"), JDouble("pivmin"), JIntW("eigcnt"), JIntW("lcnt"), JIntW("rcnt"), JIntW("info")) - Routine ("lapack", "dlarrd", JString("range"), JString("order"), JInt("n"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDoubleArray("gers"), JDouble("reltol"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("e2"), JDouble("pivmin"), JInt("nsplit"), JIntArray("isplit"), JIntW("m"), JDoubleArray("w"), JDoubleArray("werr"), JDoubleW("wl"), JDoubleW("wu"), JIntArray("iblock"), JIntArray("indexw"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dlarre", JString("range"), JInt("n"), JDoubleW("vl"), JDoubleW("vu"), JInt("il"), JInt("iu"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("e2"), JDouble("rtol1"), JDouble("rtol2"), JDouble("spltol"), JIntW("nsplit"), JIntArray("isplit"), JIntW("m"), JDoubleArray("w"), JDoubleArray("werr"), JDoubleArray("wgap"), JIntArray("iblock"), JIntArray("indexw"), JDoubleArray("gers"), JDoubleW("pivmin"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dlarrf", JInt("n"), JDoubleArray("d"), JDoubleArray("l"), JDoubleArray("ld"), JInt("clstrt"), JInt("clend"), JDoubleArray("w"), JDoubleArray("wgap"), JDoubleArray("werr"), JDouble("spdiam"), JDouble("clgapl"), JDouble("clgapr"), JDouble("pivmin"), JDoubleW("sigma"), JDoubleArray("dplus"), JDoubleArray("lplus"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dlarrj", JInt("n"), JDoubleArray("d"), JDoubleArray("e2"), JInt("ifirst"), JInt("ilast"), JDouble("rtol"), JInt("offset"), JDoubleArray("w"), JDoubleArray("werr"), JDoubleArray("work"), JIntArray("iwork"), JDouble("pivmin"), JDouble("spdiam"), JIntW("info")) - Routine ("lapack", "dlarrk", JInt("n"), JInt("iw"), JDouble("gl"), JDouble("gu"), JDoubleArray("d"), JDoubleArray("e2"), JDouble("pivmin"), JDouble("reltol"), JDoubleW("w"), JDoubleW("werr"), JIntW("info")) - Routine ("lapack", "dlarrr", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JIntW("info")) - Routine ("lapack", "dlarrv", JInt("n"), JDouble("vl"), JDouble("vu"), JDoubleArray("d"), JDoubleArray("l"), JDouble("pivmin"), JIntArray("isplit"), JInt("m"), JInt("dol"), JInt("dou"), JDouble("minrgp"), JDoubleW("rtol1"), JDoubleW("rtol2"), JDoubleArray("w"), JDoubleArray("werr"), JDoubleArray("wgap"), JIntArray("iblock"), JIntArray("indexw"), JDoubleArray("gers"), JDoubleArray("z"), JInt("ldz"), JIntArray("isuppz"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dlartg", JDouble("f"), JDouble("g"), JDoubleW("cs"), JDoubleW("sn"), JDoubleW("r")) - Routine ("lapack", "dlartv", JInt("n"), JDoubleArray("x"), JInt("incx"), JDoubleArray("y"), JInt("incy"), JDoubleArray("c"), JDoubleArray("s"), JInt("incc")) - Routine ("lapack", "dlaruv", JIntArray("iseed"), JInt("n"), JDoubleArray("x")) - Routine ("lapack", "dlarz", JString("side"), JInt("m"), JInt("n"), JInt("l"), JDoubleArray("v"), JInt("incv"), JDouble("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work")) - Routine ("lapack", "dlarzb", JString("side"), JString("trans"), JString("direct"), JString("storev"), JInt("m"), JInt("n"), JInt("k"), JInt("l"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("ldwork")) - Routine ("lapack", "dlarzt", JString("direct"), JString("storev"), JInt("n"), JInt("k"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("tau"), JDoubleArray("t"), JInt("ldt")) - Routine ("lapack", "dlas2", JDouble("f"), JDouble("g"), JDouble("h"), JDoubleW("ssmin"), JDoubleW("ssmax")) - Routine ("lapack", "dlascl", JString("type"), JInt("kl"), JInt("ku"), JDouble("cfrom"), JDouble("cto"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) - Routine ("lapack", "dlasd0", JInt("n"), JInt("sqre"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JInt("ldvt"), JInt("smlsiz"), JIntArray("iwork"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dlasd1", JInt("nl"), JInt("nr"), JInt("sqre"), JDoubleArray("d"), JDoubleW("alpha"), JDoubleW("beta"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JInt("ldvt"), JIntArray("idxq"), JIntArray("iwork"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dlasd2", JInt("nl"), JInt("nr"), JInt("sqre"), JIntW("k"), JDoubleArray("d"), JDoubleArray("z"), JDouble("alpha"), JDouble("beta"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("dsigma"), JDoubleArray("u2"), JInt("ldu2"), JDoubleArray("vt2"), JInt("ldvt2"), JIntArray("idxp"), JIntArray("idx"), JIntArray("idxc"), JIntArray("idxq"), JIntArray("coltyp"), JIntW("info")) - Routine ("lapack", "dlasd3", JInt("nl"), JInt("nr"), JInt("sqre"), JInt("k"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("dsigma"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("u2"), JInt("ldu2"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("vt2"), JInt("ldvt2"), JIntArray("idxc"), JIntArray("ctot"), JDoubleArray("z"), JIntW("info")) - Routine ("lapack", "dlasd4", JInt("n"), JInt("i"), JDoubleArray("d"), JDoubleArray("z"), JDoubleArray("delta"), JDouble("rho"), JDoubleW("sigma"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dlasd5", JInt("i"), JDoubleArray("d"), JDoubleArray("z"), JDoubleArray("delta"), JDouble("rho"), JDoubleW("dsigma"), JDoubleArray("work")) - Routine ("lapack", "dlasd6", JInt("icompq"), JInt("nl"), JInt("nr"), JInt("sqre"), JDoubleArray("d"), JDoubleArray("vf"), JDoubleArray("vl"), JDoubleW("alpha"), JDoubleW("beta"), JIntArray("idxq"), JIntArray("perm"), JIntW("givptr"), JIntArray("givcol"), JInt("ldgcol"), JDoubleArray("givnum"), JInt("ldgnum"), JDoubleArray("poles"), JDoubleArray("difl"), JDoubleArray("difr"), JDoubleArray("z"), JIntW("k"), JDoubleW("c"), JDoubleW("s"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dlasd7", JInt("icompq"), JInt("nl"), JInt("nr"), JInt("sqre"), JIntW("k"), JDoubleArray("d"), JDoubleArray("z"), JDoubleArray("zw"), JDoubleArray("vf"), JDoubleArray("vfw"), JDoubleArray("vl"), JDoubleArray("vlw"), JDouble("alpha"), JDouble("beta"), JDoubleArray("dsigma"), JIntArray("idx"), JIntArray("idxp"), JIntArray("idxq"), JIntArray("perm"), JIntW("givptr"), JIntArray("givcol"), JInt("ldgcol"), JDoubleArray("givnum"), JInt("ldgnum"), JDoubleW("c"), JDoubleW("s"), JIntW("info")) - Routine ("lapack", "dlasd8", JInt("icompq"), JInt("k"), JDoubleArray("d"), JDoubleArray("z"), JDoubleArray("vf"), JDoubleArray("vl"), JDoubleArray("difl"), JDoubleArray("difr"), JInt("lddifr"), JDoubleArray("dsigma"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dlasda", JInt("icompq"), JInt("smlsiz"), JInt("n"), JInt("sqre"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JIntArray("k"), JDoubleArray("difl"), JDoubleArray("difr"), JDoubleArray("z"), JDoubleArray("poles"), JIntArray("givptr"), JIntArray("givcol"), JInt("ldgcol"), JIntArray("perm"), JDoubleArray("givnum"), JDoubleArray("c"), JDoubleArray("s"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dlasdq", JString("uplo"), JInt("sqre"), JInt("n"), JInt("ncvt"), JInt("nru"), JInt("ncc"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dlasdt", JInt("n"), JIntW("lvl"), JIntW("nd"), JIntArray("inode"), JIntArray("ndiml"), JIntArray("ndimr"), JInt("msub")) - Routine ("lapack", "dlaset", JString("uplo"), JInt("m"), JInt("n"), JDouble("alpha"), JDouble("beta"), JDoubleArray("a"), JInt("lda")) - Routine ("lapack", "dlasq1", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dlasq2", JInt("n"), JDoubleArray("z"), JIntW("info")) - Routine ("lapack", "dlasq3", JInt("i0"), JIntW("n0"), JDoubleArray("z"), JInt("pp"), JDoubleW("dmin"), JDoubleW("sigma"), JDoubleW("desig"), JDoubleW("qmax"), JIntW("nfail"), JIntW("iter"), JIntW("ndiv"), JBoolean("ieee")) - Routine ("lapack", "dlasq4", JInt("i0"), JInt("n0"), JDoubleArray("z"), JInt("pp"), JInt("n0in"), JDouble("dmin"), JDouble("dmin1"), JDouble("dmin2"), JDouble("dn"), JDouble("dn1"), JDouble("dn2"), JDoubleW("tau"), JIntW("ttype")) - Routine ("lapack", "dlasq5", JInt("i0"), JInt("n0"), JDoubleArray("z"), JInt("pp"), JDouble("tau"), JDoubleW("dmin"), JDoubleW("dmin1"), JDoubleW("dmin2"), JDoubleW("dn"), JDoubleW("dnm1"), JDoubleW("dnm2"), JBoolean("ieee")) - Routine ("lapack", "dlasq6", JInt("i0"), JInt("n0"), JDoubleArray("z"), JInt("pp"), JDoubleW("dmin"), JDoubleW("dmin1"), JDoubleW("dmin2"), JDoubleW("dn"), JDoubleW("dnm1"), JDoubleW("dnm2")) - Routine ("lapack", "dlasr", JString("side"), JString("pivot"), JString("direct"), JInt("m"), JInt("n"), JDoubleArray("c"), JDoubleArray("s"), JDoubleArray("a"), JInt("lda")) - Routine ("lapack", "dlasrt", JString("id"), JInt("n"), JDoubleArray("d"), JIntW("info")) - Routine ("lapack", "dlassq", JInt("n"), JDoubleArray("x"), JInt("incx"), JDoubleW("scale"), JDoubleW("sumsq")) - Routine ("lapack", "dlasv2", JDouble("f"), JDouble("g"), JDouble("h"), JDoubleW("ssmin"), JDoubleW("ssmax"), JDoubleW("snr"), JDoubleW("csr"), JDoubleW("snl"), JDoubleW("csl")) - Routine ("lapack", "dlaswp", JInt("n"), JDoubleArray("a"), JInt("lda"), JInt("k1"), JInt("k2"), JIntArray("ipiv"), JInt("incx")) - Routine ("lapack", "dlasy2", JBoolean("ltranl"), JBoolean("ltranr"), JInt("isgn"), JInt("n1"), JInt("n2"), JDoubleArray("tl"), JInt("ldtl"), JDoubleArray("tr"), JInt("ldtr"), JDoubleArray("b"), JInt("ldb"), JDoubleW("scale"), JDoubleArray("x"), JInt("ldx"), JDoubleW("xnorm"), JIntW("info")) - Routine ("lapack", "dlasyf", JString("uplo"), JInt("n"), JInt("nb"), JIntW("kb"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("w"), JInt("ldw"), JIntW("info")) - Routine ("lapack", "dlatbs", JString("uplo"), JString("trans"), JString("diag"), JString("normin"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("x"), JDoubleW("scale"), JDoubleArray("cnorm"), JIntW("info")) - Routine ("lapack", "dlatdf", JInt("ijob"), JInt("n"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("rhs"), JDoubleW("rdsum"), JDoubleW("rdscal"), JIntArray("ipiv"), JIntArray("jpiv")) - Routine ("lapack", "dlatps", JString("uplo"), JString("trans"), JString("diag"), JString("normin"), JInt("n"), JDoubleArray("ap"), JDoubleArray("x"), JDoubleW("scale"), JDoubleArray("cnorm"), JIntW("info")) - Routine ("lapack", "dlatrd", JString("uplo"), JInt("n"), JInt("nb"), JDoubleArray("a"), JInt("lda"), JDoubleArray("e"), JDoubleArray("tau"), JDoubleArray("w"), JInt("ldw")) - Routine ("lapack", "dlatrs", JString("uplo"), JString("trans"), JString("diag"), JString("normin"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("x"), JDoubleW("scale"), JDoubleArray("cnorm"), JIntW("info")) - Routine ("lapack", "dlatrz", JInt("m"), JInt("n"), JInt("l"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work")) - Routine ("lapack", "dlatzm", JString("side"), JInt("m"), JInt("n"), JDoubleArray("v"), JInt("incv"), JDouble("tau"), JDoubleArray("c1"), JDoubleArray("c2"), JInt("Ldc"), JDoubleArray("work")) - Routine ("lapack", "dlauu2", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) - Routine ("lapack", "dlauum", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) - Routine_NI("lapack", "dlazq3", JInt("i0"), JIntW("n0"), JDoubleArray("z"), JInt("pp"), JDoubleW("dmin"), JDoubleW("sigma"), JDoubleW("desig"), JDoubleW("qmax"), JIntW("nfail"), JIntW("iter"), JIntW("ndiv"), JBoolean("ieee"), JIntW("ttype"), JDoubleW("dmin1"), JDoubleW("dmin2"), JDoubleW("dn"), JDoubleW("dn1"), JDoubleW("dn2"), JDoubleW("tau")) - Routine_NI("lapack", "dlazq4", JInt("i0"), JInt("n0"), JDoubleArray("z"), JInt("pp"), JInt("n0in"), JDouble("dmin"), JDouble("dmin1"), JDouble("dmin2"), JDouble("dn"), JDouble("dn1"), JDouble("dn2"), JDoubleW("tau"), JIntW("ttype"), JDoubleW("g")) - Routine ("lapack", "dopgtr", JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("tau"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dopmtr", JString("side"), JString("uplo"), JString("trans"), JInt("m"), JInt("n"), JDoubleArray("ap"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dorg2l", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dorg2r", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dorgbr", JString("vect"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dorghr", JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dorgl2", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dorglq", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dorgql", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dorgqr", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dorgr2", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dorgrq", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dorgtr", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dorm2l", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dorm2r", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dormbr", JString("vect"), JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dormhr", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dorml2", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dormlq", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dormql", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dormqr", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dormr2", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dormr3", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JInt("l"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dormrq", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dormrz", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JInt("l"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dormtr", JString("side"), JString("uplo"), JString("trans"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dpbcon", JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dpbequ", JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("s"), JDoubleW("scond"), JDoubleW("amax"), JIntW("info")) - Routine ("lapack", "dpbrfs", JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("afb"), JInt("ldafb"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dpbstf", JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JIntW("info")) - Routine ("lapack", "dpbsv", JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "dpbsvx", JString("fact"), JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("afb"), JInt("ldafb"), JStringW("equed"), JDoubleArray("s"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dpbtf2", JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JIntW("info")) - Routine ("lapack", "dpbtrf", JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JIntW("info")) - Routine ("lapack", "dpbtrs", JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "dpocon", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dpoequ", JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("s"), JDoubleW("scond"), JDoubleW("amax"), JIntW("info")) - Routine ("lapack", "dporfs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("af"), JInt("ldaf"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dposv", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "dposvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("af"), JInt("ldaf"), JStringW("equed"), JDoubleArray("s"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dpotf2", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) - Routine ("lapack", "dpotrf", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) - Routine ("lapack", "dpotri", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) - Routine ("lapack", "dpotrs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "dppcon", JString("uplo"), JInt("n"), JDoubleArray("ap"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dppequ", JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("s"), JDoubleW("scond"), JDoubleW("amax"), JIntW("info")) - Routine ("lapack", "dpprfs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("afp"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dppsv", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "dppsvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("afp"), JStringW("equed"), JDoubleArray("s"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dpptrf", JString("uplo"), JInt("n"), JDoubleArray("ap"), JIntW("info")) - Routine ("lapack", "dpptri", JString("uplo"), JInt("n"), JDoubleArray("ap"), JIntW("info")) - Routine ("lapack", "dpptrs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "dptcon", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dpteqr", JString("compz"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dptrfs", JInt("n"), JInt("nrhs"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("df"), JDoubleArray("ef"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dptsv", JInt("n"), JInt("nrhs"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "dptsvx", JString("fact"), JInt("n"), JInt("nrhs"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("df"), JDoubleArray("ef"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dpttrf", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JIntW("info")) - Routine ("lapack", "dpttrs", JInt("n"), JInt("nrhs"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "dptts2", JInt("n"), JInt("nrhs"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("b"), JInt("ldb")) - Routine ("lapack", "drscl", JInt("n"), JDouble("sa"), JDoubleArray("sx"), JInt("incx")) - Routine ("lapack", "dsbev", JString("jobz"), JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dsbevd", JString("jobz"), JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - Routine ("lapack", "dsbevx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("q"), JInt("ldq"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - Routine ("lapack", "dsbgst", JString("vect"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("bb"), JInt("ldbb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dsbgv", JString("jobz"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("bb"), JInt("ldbb"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dsbgvd", JString("jobz"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("bb"), JInt("ldbb"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - Routine ("lapack", "dsbgvx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("bb"), JInt("ldbb"), JDoubleArray("q"), JInt("ldq"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - Routine ("lapack", "dsbtrd", JString("vect"), JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dsgesv", JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("work"), JFloatArray("swork"), JIntW("iter"), JIntW("info")) - Routine ("lapack", "dspcon", JString("uplo"), JInt("n"), JDoubleArray("ap"), JIntArray("ipiv"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dspev", JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dspevd", JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - Routine ("lapack", "dspevx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - Routine ("lapack", "dspgst", JInt("itype"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("bp"), JIntW("info")) - Routine ("lapack", "dspgv", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("bp"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dspgvd", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("bp"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - Routine ("lapack", "dspgvx", JInt("itype"), JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("bp"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - Routine ("lapack", "dsprfs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("afp"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dspsv", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "dspsvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("afp"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dsptrd", JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("tau"), JIntW("info")) - Routine ("lapack", "dsptrf", JString("uplo"), JInt("n"), JDoubleArray("ap"), JIntArray("ipiv"), JIntW("info")) - Routine ("lapack", "dsptri", JString("uplo"), JInt("n"), JDoubleArray("ap"), JIntArray("ipiv"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dsptrs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "dstebz", JString("range"), JString("order"), JInt("n"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JDoubleArray("d"), JDoubleArray("e"), JIntW("m"), JIntW("nsplit"), JDoubleArray("w"), JIntArray("iblock"), JIntArray("isplit"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dstedc", JString("compz"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - Routine ("lapack", "dstegr", JString("jobz"), JString("range"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JIntArray("isuppz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - Routine ("lapack", "dstein", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JInt("m"), JDoubleArray("w"), JIntArray("iblock"), JIntArray("isplit"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - Routine ("lapack", "dstemr", JString("jobz"), JString("range"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JInt("nzc"), JIntArray("isuppz"), JBooleanW("tryrac"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - Routine ("lapack", "dsteqr", JString("compz"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dsterf", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JIntW("info")) - Routine ("lapack", "dstev", JString("jobz"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dstevd", JString("jobz"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - Routine ("lapack", "dstevr", JString("jobz"), JString("range"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JIntArray("isuppz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - Routine ("lapack", "dstevx", JString("jobz"), JString("range"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - Routine ("lapack", "dsycon", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dsyev", JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("w"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dsyevd", JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("w"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - Routine ("lapack", "dsyevr", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JIntArray("isuppz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - Routine ("lapack", "dsyevx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - Routine ("lapack", "dsygs2", JInt("itype"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "dsygst", JInt("itype"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "dsygv", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("w"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dsygvd", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("w"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - Routine ("lapack", "dsygvx", JInt("itype"), JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - Routine ("lapack", "dsyrfs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("af"), JInt("ldaf"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dsysv", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dsysvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("af"), JInt("ldaf"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dsytd2", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("tau"), JIntW("info")) - Routine ("lapack", "dsytf2", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JIntW("info")) - Routine ("lapack", "dsytrd", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dsytrf", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dsytri", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dsytrs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "dtbcon", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dtbrfs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("kd"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dtbtrs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("kd"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "dtgevc", JString("side"), JString("howmny"), JBooleanArray("select"), JInt("n"), JDoubleArray("s"), JInt("lds"), JDoubleArray("p"), JInt("ldp"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JInt("mm"), JIntW("m"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dtgex2", JBoolean("wantq"), JBoolean("wantz"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("z"), JInt("ldz"), JInt("j1"), JInt("n1"), JInt("n2"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dtgexc", JBoolean("wantq"), JBoolean("wantz"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("z"), JInt("ldz"), JIntW("ifst"), JIntW("ilst"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "dtgsen", JInt("ijob"), JBoolean("wantq"), JBoolean("wantz"), JBooleanArray("select"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("z"), JInt("ldz"), JIntW("m"), JDoubleW("pl"), JDoubleW("pr"), JDoubleArray("dif"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - Routine ("lapack", "dtgsja", JString("jobu"), JString("jobv"), JString("jobq"), JInt("m"), JInt("p"), JInt("n"), JInt("k"), JInt("l"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDouble("tola"), JDouble("tolb"), JDoubleArray("alpha"), JDoubleArray("beta"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("work"), JIntW("ncycle"), JIntW("info")) - Routine ("lapack", "dtgsna", JString("job"), JString("howmny"), JBooleanArray("select"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JDoubleArray("s"), JDoubleArray("dif"), JInt("mm"), JIntW("m"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dtgsy2", JString("trans"), JInt("ijob"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("d"), JInt("ldd"), JDoubleArray("e"), JInt("lde"), JDoubleArray("f"), JInt("ldf"), JDoubleW("scale"), JDoubleW("rdsum"), JDoubleW("rdscal"), JIntArray("iwork"), JIntW("pq"), JIntW("info")) - Routine ("lapack", "dtgsyl", JString("trans"), JInt("ijob"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("d"), JInt("ldd"), JDoubleArray("e"), JInt("lde"), JDoubleArray("f"), JInt("ldf"), JDoubleW("scale"), JDoubleW("dif"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dtpcon", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JDoubleArray("ap"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dtprfs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dtptri", JString("uplo"), JString("diag"), JInt("n"), JDoubleArray("ap"), JIntW("info")) - Routine ("lapack", "dtptrs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "dtrcon", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dtrevc", JString("side"), JString("howmny"), JBooleanArray("select"), JInt("n"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JInt("mm"), JIntW("m"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dtrexc", JString("compq"), JInt("n"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("q"), JInt("ldq"), JIntW("ifst"), JIntW("ilst"), JDoubleArray("work"), JIntW("info")) - Routine ("lapack", "dtrrfs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dtrsen", JString("job"), JString("compq"), JBooleanArray("select"), JInt("n"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("wr"), JDoubleArray("wi"), JIntW("m"), JDoubleW("s"), JDoubleW("sep"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - Routine ("lapack", "dtrsna", JString("job"), JString("howmny"), JBooleanArray("select"), JInt("n"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JDoubleArray("s"), JDoubleArray("sep"), JInt("mm"), JIntW("m"), JDoubleArray("work"), JInt("ldwork"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "dtrsyl", JString("trana"), JString("tranb"), JInt("isgn"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("c"), JInt("Ldc"), JDoubleW("scale"), JIntW("info")) - Routine ("lapack", "dtrti2", JString("uplo"), JString("diag"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) - Routine ("lapack", "dtrtri", JString("uplo"), JString("diag"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")) - Routine ("lapack", "dtrtrs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "dtzrqf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JIntW("info")) - Routine ("lapack", "dtzrzf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")) - RoutineR ("lapack", JIntR(), "ieeeck", JInt("ispec"), JFloat("zero"), JFloat("one")) - RoutineR ("lapack", JIntR(), "ilaenv", JInt("ispec"), JString("name"), JString("opts"), JInt("n1"), JInt("n2"), JInt("n3"), JInt("n4")) - Routine ("lapack", "ilaver", JIntW("vers_major"), JIntW("vers_minor"), JIntW("vers_patch")) - RoutineR ("lapack", JIntR(), "iparmq", JInt("ispec"), JString("name"), JString("opts"), JInt("n"), JInt("ilo"), JInt("ihi"), JInt("lwork")) - RoutineR ("lapack", JBooleanR(), "lsamen", JInt("n"), JString("ca"), JString("cb")) - Routine ("lapack", "sbdsdc", JString("uplo"), JString("compq"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("q"), JIntArray("iq"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "sbdsqr", JString("uplo"), JInt("n"), JInt("ncvt"), JInt("nru"), JInt("ncc"), JFloatArray("d"), JFloatArray("e"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("u"), JInt("ldu"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "sdisna", JString("job"), JInt("m"), JInt("n"), JFloatArray("d"), JFloatArray("sep"), JIntW("info")) - Routine ("lapack", "sgbbrd", JString("vect"), JInt("m"), JInt("n"), JInt("ncc"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JFloatArray("d"), JFloatArray("e"), JFloatArray("q"), JInt("ldq"), JFloatArray("pt"), JInt("ldpt"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "sgbcon", JString("norm"), JInt("n"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JIntArray("ipiv"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "sgbequ", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JFloatArray("r"), JFloatArray("c"), JFloatW("rowcnd"), JFloatW("colcnd"), JFloatW("amax"), JIntW("info")) - Routine ("lapack", "sgbrfs", JString("trans"), JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("afb"), JInt("ldafb"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "sgbsv", JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "sgbsvx", JString("fact"), JString("trans"), JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("afb"), JInt("ldafb"), JIntArray("ipiv"), JStringW("equed"), JFloatArray("r"), JFloatArray("c"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "sgbtf2", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JIntArray("ipiv"), JIntW("info")) - Routine ("lapack", "sgbtrf", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JIntArray("ipiv"), JIntW("info")) - Routine ("lapack", "sgbtrs", JString("trans"), JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "sgebak", JString("job"), JString("side"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("scale"), JInt("m"), JFloatArray("v"), JInt("ldv"), JIntW("info")) - Routine ("lapack", "sgebal", JString("job"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("ilo"), JIntW("ihi"), JFloatArray("scale"), JIntW("info")) - Routine ("lapack", "sgebd2", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("d"), JFloatArray("e"), JFloatArray("tauq"), JFloatArray("taup"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "sgebrd", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("d"), JFloatArray("e"), JFloatArray("tauq"), JFloatArray("taup"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sgecon", JString("norm"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "sgeequ", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("r"), JFloatArray("c"), JFloatW("rowcnd"), JFloatW("colcnd"), JFloatW("amax"), JIntW("info")) - Routine_NI("lapack", "sgees", JString("jobvs"), JString("sort"), JObject("select"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("sdim"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("vs"), JInt("ldvs"), JFloatArray("work"), JInt("lwork"), JBooleanArray("bwork"), JIntW("info")) - Routine_NI("lapack", "sgeesx", JString("jobvs"), JString("sort"), JObject("select"), JString("sense"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("sdim"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("vs"), JInt("ldvs"), JFloatW("rconde"), JFloatW("rcondv"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JBooleanArray("bwork"), JIntW("info")) - Routine ("lapack", "sgeev", JString("jobvl"), JString("jobvr"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sgeevx", JString("balanc"), JString("jobvl"), JString("jobvr"), JString("sense"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JIntW("ilo"), JIntW("ihi"), JFloatArray("scale"), JFloatW("abnrm"), JFloatArray("rconde"), JFloatArray("rcondv"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "sgegs", JString("jobvsl"), JString("jobvsr"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("vsl"), JInt("ldvsl"), JFloatArray("vsr"), JInt("ldvsr"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sgegv", JString("jobvl"), JString("jobvr"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sgehd2", JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "sgehrd", JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sgelq2", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "sgelqf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sgels", JString("trans"), JInt("m"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sgelsd", JInt("m"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("s"), JFloat("rcond"), JIntW("rank"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "sgelss", JInt("m"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("s"), JFloat("rcond"), JIntW("rank"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sgelsx", JInt("m"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntArray("jpvt"), JFloat("rcond"), JIntW("rank"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "sgelsy", JInt("m"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntArray("jpvt"), JFloat("rcond"), JIntW("rank"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sgeql2", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "sgeqlf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sgeqp3", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("jpvt"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sgeqpf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("jpvt"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "sgeqr2", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "sgeqrf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sgerfs", JString("trans"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("af"), JInt("ldaf"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "sgerq2", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "sgerqf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sgesc2", JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("rhs"), JIntArray("ipiv"), JIntArray("jpiv"), JFloatW("scale")) - Routine ("lapack", "sgesdd", JString("jobz"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("s"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "sgesv", JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "sgesvd", JString("jobu"), JString("jobvt"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("s"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sgesvx", JString("fact"), JString("trans"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("af"), JInt("ldaf"), JIntArray("ipiv"), JStringW("equed"), JFloatArray("r"), JFloatArray("c"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "sgetc2", JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JIntArray("jpiv"), JIntW("info")) - Routine ("lapack", "sgetf2", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JIntW("info")) - Routine ("lapack", "sgetrf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JIntW("info")) - Routine ("lapack", "sgetri", JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sgetrs", JString("trans"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "sggbak", JString("job"), JString("side"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("lscale"), JFloatArray("rscale"), JInt("m"), JFloatArray("v"), JInt("ldv"), JIntW("info")) - Routine ("lapack", "sggbal", JString("job"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("ilo"), JIntW("ihi"), JFloatArray("lscale"), JFloatArray("rscale"), JFloatArray("work"), JIntW("info")) - Routine_NI("lapack", "sgges", JString("jobvsl"), JString("jobvsr"), JString("sort"), JObject("selctg"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("sdim"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("vsl"), JInt("ldvsl"), JFloatArray("vsr"), JInt("ldvsr"), JFloatArray("work"), JInt("lwork"), JBooleanArray("bwork"), JIntW("info")) - Routine_NI("lapack", "sggesx", JString("jobvsl"), JString("jobvsr"), JString("sort"), JObject("selctg"), JString("sense"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("sdim"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("vsl"), JInt("ldvsl"), JFloatArray("vsr"), JInt("ldvsr"), JFloatArray("rconde"), JFloatArray("rcondv"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JBooleanArray("bwork"), JIntW("info")) - Routine ("lapack", "sggev", JString("jobvl"), JString("jobvr"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sggevx", JString("balanc"), JString("jobvl"), JString("jobvr"), JString("sense"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JIntW("ilo"), JIntW("ihi"), JFloatArray("lscale"), JFloatArray("rscale"), JFloatW("abnrm"), JFloatW("bbnrm"), JFloatArray("rconde"), JFloatArray("rcondv"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JBooleanArray("bwork"), JIntW("info")) - Routine ("lapack", "sggglm", JInt("n"), JInt("m"), JInt("p"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("d"), JFloatArray("x"), JFloatArray("y"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sgghrd", JString("compq"), JString("compz"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("q"), JInt("ldq"), JFloatArray("z"), JInt("ldz"), JIntW("info")) - Routine ("lapack", "sgglse", JInt("m"), JInt("n"), JInt("p"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("c"), JFloatArray("d"), JFloatArray("x"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sggqrf", JInt("n"), JInt("m"), JInt("p"), JFloatArray("a"), JInt("lda"), JFloatArray("taua"), JFloatArray("b"), JInt("ldb"), JFloatArray("taub"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sggrqf", JInt("m"), JInt("p"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("taua"), JFloatArray("b"), JInt("ldb"), JFloatArray("taub"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sggsvd", JString("jobu"), JString("jobv"), JString("jobq"), JInt("m"), JInt("n"), JInt("p"), JIntW("k"), JIntW("l"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alpha"), JFloatArray("beta"), JFloatArray("u"), JInt("ldu"), JFloatArray("v"), JInt("ldv"), JFloatArray("q"), JInt("ldq"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "sggsvp", JString("jobu"), JString("jobv"), JString("jobq"), JInt("m"), JInt("p"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloat("tola"), JFloat("tolb"), JIntW("k"), JIntW("l"), JFloatArray("u"), JInt("ldu"), JFloatArray("v"), JInt("ldv"), JFloatArray("q"), JInt("ldq"), JIntArray("iwork"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "sgtcon", JString("norm"), JInt("n"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("du2"), JIntArray("ipiv"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "sgtrfs", JString("trans"), JInt("n"), JInt("nrhs"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("dlf"), JFloatArray("df"), JFloatArray("duf"), JFloatArray("du2"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "sgtsv", JInt("n"), JInt("nrhs"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "sgtsvx", JString("fact"), JString("trans"), JInt("n"), JInt("nrhs"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("dlf"), JFloatArray("df"), JFloatArray("duf"), JFloatArray("du2"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "sgttrf", JInt("n"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("du2"), JIntArray("ipiv"), JIntW("info")) - Routine ("lapack", "sgttrs", JString("trans"), JInt("n"), JInt("nrhs"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("du2"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "sgtts2", JInt("itrans"), JInt("n"), JInt("nrhs"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("du2"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb")) - Routine ("lapack", "shgeqz", JString("job"), JString("compq"), JString("compz"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("t"), JInt("ldt"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("q"), JInt("ldq"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "shsein", JString("side"), JString("eigsrc"), JString("initv"), JBooleanArray("select"), JInt("n"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JInt("mm"), JIntW("m"), JFloatArray("work"), JIntArray("ifaill"), JIntArray("ifailr"), JIntW("info")) - Routine ("lapack", "shseqr", JString("job"), JString("compz"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - RoutineR ("lapack", JBooleanR(), "sisnan", JFloat("sin")) - Routine ("lapack", "slabad", JFloatW("small"), JFloatW("large")) - Routine ("lapack", "slabrd", JInt("m"), JInt("n"), JInt("nb"), JFloatArray("a"), JInt("lda"), JFloatArray("d"), JFloatArray("e"), JFloatArray("tauq"), JFloatArray("taup"), JFloatArray("x"), JInt("ldx"), JFloatArray("y"), JInt("ldy")) - Routine ("lapack", "slacn2", JInt("n"), JFloatArray("v"), JFloatArray("x"), JIntArray("isgn"), JFloatW("est"), JIntW("kase"), JIntArray("isave")) - Routine ("lapack", "slacon", JInt("n"), JFloatArray("v"), JFloatArray("x"), JIntArray("isgn"), JFloatW("est"), JIntW("kase")) - Routine ("lapack", "slacpy", JString("uplo"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb")) - Routine ("lapack", "sladiv", JFloat("a"), JFloat("b"), JFloat("c"), JFloat("d"), JFloatW("p"), JFloatW("q")) - Routine ("lapack", "slae2", JFloat("a"), JFloat("b"), JFloat("c"), JFloatW("rt1"), JFloatW("rt2")) - Routine ("lapack", "slaebz", JInt("ijob"), JInt("nitmax"), JInt("n"), JInt("mmax"), JInt("minp"), JInt("nbmin"), JFloat("abstol"), JFloat("reltol"), JFloat("pivmin"), JFloatArray("d"), JFloatArray("e"), JFloatArray("e2"), JIntArray("nval"), JFloatArray("ab"), JFloatArray("c"), JIntW("mout"), JIntArray("nab"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "slaed0", JInt("icompq"), JInt("qsiz"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("q"), JInt("ldq"), JFloatArray("qstore"), JInt("ldqs"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "slaed1", JInt("n"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JIntArray("indxq"), JFloatW("rho"), JInt("cutpnt"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "slaed2", JIntW("k"), JInt("n"), JInt("n1"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JIntArray("indxq"), JFloatW("rho"), JFloatArray("z"), JFloatArray("dlamda"), JFloatArray("w"), JFloatArray("q2"), JIntArray("indx"), JIntArray("indxc"), JIntArray("indxp"), JIntArray("coltyp"), JIntW("info")) - Routine ("lapack", "slaed3", JInt("k"), JInt("n"), JInt("n1"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JFloat("rho"), JFloatArray("dlamda"), JFloatArray("q2"), JIntArray("indx"), JIntArray("ctot"), JFloatArray("w"), JFloatArray("s"), JIntW("info")) - Routine ("lapack", "slaed4", JInt("n"), JInt("i"), JFloatArray("d"), JFloatArray("z"), JFloatArray("delta"), JFloat("rho"), JFloatW("dlam"), JIntW("info")) - Routine ("lapack", "slaed5", JInt("i"), JFloatArray("d"), JFloatArray("z"), JFloatArray("delta"), JFloat("rho"), JFloatW("dlam")) - Routine ("lapack", "slaed6", JInt("kniter"), JBoolean("orgati"), JFloat("rho"), JFloatArray("d"), JFloatArray("z"), JFloat("finit"), JFloatW("tau"), JIntW("info")) - Routine ("lapack", "slaed7", JInt("icompq"), JInt("n"), JInt("qsiz"), JInt("tlvls"), JInt("curlvl"), JInt("curpbm"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JIntArray("indxq"), JFloatW("rho"), JInt("cutpnt"), JFloatArray("qstore"), JIntArray("qptr"), JIntArray("prmptr"), JIntArray("perm"), JIntArray("givptr"), JIntArray("givcol"), JFloatArray("givnum"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "slaed8", JInt("icompq"), JIntW("k"), JInt("n"), JInt("qsiz"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JIntArray("indxq"), JFloatW("rho"), JInt("cutpnt"), JFloatArray("z"), JFloatArray("dlamda"), JFloatArray("q2"), JInt("ldq2"), JFloatArray("w"), JIntArray("perm"), JIntW("givptr"), JIntArray("givcol"), JFloatArray("givnum"), JIntArray("indxp"), JIntArray("indx"), JIntW("info")) - Routine ("lapack", "slaed9", JInt("k"), JInt("kstart"), JInt("kstop"), JInt("n"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JFloat("rho"), JFloatArray("dlamda"), JFloatArray("w"), JFloatArray("s"), JInt("lds"), JIntW("info")) - Routine ("lapack", "slaeda", JInt("n"), JInt("tlvls"), JInt("curlvl"), JInt("curpbm"), JIntArray("prmptr"), JIntArray("perm"), JIntArray("givptr"), JIntArray("givcol"), JFloatArray("givnum"), JFloatArray("q"), JIntArray("qptr"), JFloatArray("z"), JFloatArray("ztemp"), JIntW("info")) - Routine ("lapack", "slaein", JBoolean("rightv"), JBoolean("noinit"), JInt("n"), JFloatArray("h"), JInt("ldh"), JFloat("wr"), JFloat("wi"), JFloatArray("vr"), JFloatArray("vi"), JFloatArray("b"), JInt("ldb"), JFloatArray("work"), JFloat("eps3"), JFloat("smlnum"), JFloat("bignum"), JIntW("info")) - Routine ("lapack", "slaev2", JFloat("a"), JFloat("b"), JFloat("c"), JFloatW("rt1"), JFloatW("rt2"), JFloatW("cs1"), JFloatW("sn1")) - Routine ("lapack", "slaexc", JBoolean("wantq"), JInt("n"), JFloatArray("t"), JInt("ldt"), JFloatArray("q"), JInt("ldq"), JInt("j1"), JInt("n1"), JInt("n2"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "slag2", JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloat("safmin"), JFloatW("scale1"), JFloatW("scale2"), JFloatW("wr1"), JFloatW("wr2"), JFloatW("wi")) - Routine ("lapack", "slag2d", JInt("m"), JInt("n"), JFloatArray("sa"), JInt("ldsa"), JDoubleArray("a"), JInt("lda"), JIntW("info")) - Routine ("lapack", "slags2", JBoolean("upper"), JFloat("a1"), JFloat("a2"), JFloat("a3"), JFloat("b1"), JFloat("b2"), JFloat("b3"), JFloatW("csu"), JFloatW("snu"), JFloatW("csv"), JFloatW("snv"), JFloatW("csq"), JFloatW("snq")) - Routine ("lapack", "slagtf", JInt("n"), JFloatArray("a"), JFloat("lambda"), JFloatArray("b"), JFloatArray("c"), JFloat("tol"), JFloatArray("d"), JIntArray("in"), JIntW("info")) - Routine ("lapack", "slagtm", JString("trans"), JInt("n"), JInt("nrhs"), JFloat("alpha"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("x"), JInt("ldx"), JFloat("beta"), JFloatArray("b"), JInt("ldb")) - Routine ("lapack", "slagts", JInt("job"), JInt("n"), JFloatArray("a"), JFloatArray("b"), JFloatArray("c"), JFloatArray("d"), JIntArray("in"), JFloatArray("y"), JFloatW("tol"), JIntW("info")) - Routine ("lapack", "slagv2", JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatW("csl"), JFloatW("snl"), JFloatW("csr"), JFloatW("snr")) - Routine ("lapack", "slahqr", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JInt("iloz"), JInt("ihiz"), JFloatArray("z"), JInt("ldz"), JIntW("info")) - Routine ("lapack", "slahr2", JInt("n"), JInt("k"), JInt("nb"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("t"), JInt("ldt"), JFloatArray("y"), JInt("ldy")) - Routine ("lapack", "slahrd", JInt("n"), JInt("k"), JInt("nb"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("t"), JInt("ldt"), JFloatArray("y"), JInt("ldy")) - Routine ("lapack", "slaic1", JInt("job"), JInt("j"), JFloatArray("x"), JFloat("sest"), JFloatArray("w"), JFloat("gamma"), JFloatW("sestpr"), JFloatW("s"), JFloatW("c")) - RoutineR ("lapack", JBooleanR(), "slaisnan", JFloat("sin1"), JFloat("sin2")) - Routine ("lapack", "slaln2", JBoolean("ltrans"), JInt("na"), JInt("nw"), JFloat("smin"), JFloat("ca"), JFloatArray("a"), JInt("lda"), JFloat("d1"), JFloat("d2"), JFloatArray("b"), JInt("ldb"), JFloat("wr"), JFloat("wi"), JFloatArray("x"), JInt("ldx"), JFloatW("scale"), JFloatW("xnorm"), JIntW("info")) - Routine ("lapack", "slals0", JInt("icompq"), JInt("nl"), JInt("nr"), JInt("sqre"), JInt("nrhs"), JFloatArray("b"), JInt("ldb"), JFloatArray("bx"), JInt("ldbx"), JIntArray("perm"), JInt("givptr"), JIntArray("givcol"), JInt("ldgcol"), JFloatArray("givnum"), JInt("ldgnum"), JFloatArray("poles"), JFloatArray("difl"), JFloatArray("difr"), JFloatArray("z"), JInt("k"), JFloat("c"), JFloat("s"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "slalsa", JInt("icompq"), JInt("smlsiz"), JInt("n"), JInt("nrhs"), JFloatArray("b"), JInt("ldb"), JFloatArray("bx"), JInt("ldbx"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JIntArray("k"), JFloatArray("difl"), JFloatArray("difr"), JFloatArray("z"), JFloatArray("poles"), JIntArray("givptr"), JIntArray("givcol"), JInt("ldgcol"), JIntArray("perm"), JFloatArray("givnum"), JFloatArray("c"), JFloatArray("s"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "slalsd", JString("uplo"), JInt("smlsiz"), JInt("n"), JInt("nrhs"), JFloatArray("d"), JFloatArray("e"), JFloatArray("b"), JInt("ldb"), JFloat("rcond"), JIntW("rank"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "slamrg", JInt("n1"), JInt("n2"), JFloatArray("a"), JInt("strd1"), JInt("strd2"), JIntArray("index")) - RoutineR ("lapack", JIntR(), "slaneg", JInt("n"), JFloatArray("d"), JFloatArray("lld"), JFloat("sigma"), JFloat("pivmin"), JInt("r")) - RoutineR ("lapack", JFloatR(), "slangb", JString("norm"), JInt("n"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JFloatArray("work")) - RoutineR ("lapack", JFloatR(), "slange", JString("norm"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("work")) - RoutineR ("lapack", JFloatR(), "slangt", JString("norm"), JInt("n"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du")) - RoutineR ("lapack", JFloatR(), "slanhs", JString("norm"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("work")) - RoutineR ("lapack", JFloatR(), "slansb", JString("norm"), JString("uplo"), JInt("n"), JInt("k"), JFloatArray("ab"), JInt("ldab"), JFloatArray("work")) - RoutineR ("lapack", JFloatR(), "slansp", JString("norm"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("work")) - RoutineR ("lapack", JFloatR(), "slanst", JString("norm"), JInt("n"), JFloatArray("d"), JFloatArray("e")) - RoutineR ("lapack", JFloatR(), "slansy", JString("norm"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("work")) - RoutineR ("lapack", JFloatR(), "slantb", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JInt("k"), JFloatArray("ab"), JInt("ldab"), JFloatArray("work")) - RoutineR ("lapack", JFloatR(), "slantp", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JFloatArray("ap"), JFloatArray("work")) - RoutineR ("lapack", JFloatR(), "slantr", JString("norm"), JString("uplo"), JString("diag"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("work")) - Routine ("lapack", "slanv2", JFloatW("a"), JFloatW("b"), JFloatW("c"), JFloatW("d"), JFloatW("rt1r"), JFloatW("rt1i"), JFloatW("rt2r"), JFloatW("rt2i"), JFloatW("cs"), JFloatW("sn")) - Routine ("lapack", "slapll", JInt("n"), JFloatArray("x"), JInt("incx"), JFloatArray("y"), JInt("incy"), JFloatW("ssmin")) - Routine ("lapack", "slapmt", JBoolean("forwrd"), JInt("m"), JInt("n"), JFloatArray("x"), JInt("ldx"), JIntArray("k")) - RoutineR ("lapack", JFloatR(), "slapy2", JFloat("x"), JFloat("y")) - RoutineR ("lapack", JFloatR(), "slapy3", JFloat("x"), JFloat("y"), JFloat("z")) - Routine ("lapack", "slaqgb", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JFloatArray("r"), JFloatArray("c"), JFloat("rowcnd"), JFloat("colcnd"), JFloat("amax"), JStringW("equed")) - Routine ("lapack", "slaqge", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("r"), JFloatArray("c"), JFloat("rowcnd"), JFloat("colcnd"), JFloat("amax"), JStringW("equed")) - Routine ("lapack", "slaqp2", JInt("m"), JInt("n"), JInt("offset"), JFloatArray("a"), JInt("lda"), JIntArray("jpvt"), JFloatArray("tau"), JFloatArray("vn1"), JFloatArray("vn2"), JFloatArray("work")) - Routine ("lapack", "slaqps", JInt("m"), JInt("n"), JInt("offset"), JInt("nb"), JIntW("kb"), JFloatArray("a"), JInt("lda"), JIntArray("jpvt"), JFloatArray("tau"), JFloatArray("vn1"), JFloatArray("vn2"), JFloatArray("auxv"), JFloatArray("f"), JInt("ldf")) - Routine ("lapack", "slaqr0", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JInt("iloz"), JInt("ihiz"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "slaqr1", JInt("n"), JFloatArray("h"), JInt("ldh"), JFloat("sr1"), JFloat("si1"), JFloat("sr2"), JFloat("si2"), JFloatArray("v")) - Routine ("lapack", "slaqr2", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ktop"), JInt("kbot"), JInt("nw"), JFloatArray("h"), JInt("ldh"), JInt("iloz"), JInt("ihiz"), JFloatArray("z"), JInt("ldz"), JIntW("ns"), JIntW("nd"), JFloatArray("sr"), JFloatArray("si"), JFloatArray("v"), JInt("ldv"), JInt("nh"), JFloatArray("t"), JInt("ldt"), JInt("nv"), JFloatArray("wv"), JInt("ldwv"), JFloatArray("work"), JInt("lwork")) - Routine ("lapack", "slaqr3", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ktop"), JInt("kbot"), JInt("nw"), JFloatArray("h"), JInt("ldh"), JInt("iloz"), JInt("ihiz"), JFloatArray("z"), JInt("ldz"), JIntW("ns"), JIntW("nd"), JFloatArray("sr"), JFloatArray("si"), JFloatArray("v"), JInt("ldv"), JInt("nh"), JFloatArray("t"), JInt("ldt"), JInt("nv"), JFloatArray("wv"), JInt("ldwv"), JFloatArray("work"), JInt("lwork")) - Routine ("lapack", "slaqr4", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JInt("iloz"), JInt("ihiz"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "slaqr5", JBoolean("wantt"), JBoolean("wantz"), JInt("kacc22"), JInt("n"), JInt("ktop"), JInt("kbot"), JInt("nshfts"), JFloatArray("sr"), JFloatArray("si"), JFloatArray("h"), JInt("ldh"), JInt("iloz"), JInt("ihiz"), JFloatArray("z"), JInt("ldz"), JFloatArray("v"), JInt("ldv"), JFloatArray("u"), JInt("ldu"), JInt("nv"), JFloatArray("wv"), JInt("ldwv"), JInt("nh"), JFloatArray("wh"), JInt("ldwh")) - Routine ("lapack", "slaqsb", JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("s"), JFloat("scond"), JFloat("amax"), JStringW("equed")) - Routine ("lapack", "slaqsp", JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("s"), JFloat("scond"), JFloat("amax"), JStringW("equed")) - Routine ("lapack", "slaqsy", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("s"), JFloat("scond"), JFloat("amax"), JStringW("equed")) - Routine ("lapack", "slaqtr", JBoolean("ltran"), JBoolean("lreal"), JInt("n"), JFloatArray("t"), JInt("ldt"), JFloatArray("b"), JFloat("w"), JFloatW("scale"), JFloatArray("x"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "slar1v", JInt("n"), JInt("b1"), JInt("bn"), JFloat("lambda"), JFloatArray("d"), JFloatArray("l"), JFloatArray("ld"), JFloatArray("lld"), JFloat("pivmin"), JFloat("gaptol"), JFloatArray("z"), JBoolean("wantnc"), JIntW("negcnt"), JFloatW("ztz"), JFloatW("mingma"), JIntW("r"), JIntArray("isuppz"), JFloatW("nrminv"), JFloatW("resid"), JFloatW("rqcorr"), JFloatArray("work")) - Routine ("lapack", "slar2v", JInt("n"), JFloatArray("x"), JFloatArray("y"), JFloatArray("z"), JInt("incx"), JFloatArray("c"), JFloatArray("s"), JInt("incc")) - Routine ("lapack", "slarf", JString("side"), JInt("m"), JInt("n"), JFloatArray("v"), JInt("incv"), JFloat("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work")) - Routine ("lapack", "slarfb", JString("side"), JString("trans"), JString("direct"), JString("storev"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("v"), JInt("ldv"), JFloatArray("t"), JInt("ldt"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("ldwork")) - Routine ("lapack", "slarfg", JInt("n"), JFloatW("alpha"), JFloatArray("x"), JInt("incx"), JFloatW("tau")) - Routine ("lapack", "slarft", JString("direct"), JString("storev"), JInt("n"), JInt("k"), JFloatArray("v"), JInt("ldv"), JFloatArray("tau"), JFloatArray("t"), JInt("ldt")) - Routine ("lapack", "slarfx", JString("side"), JInt("m"), JInt("n"), JFloatArray("v"), JFloat("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work")) - Routine ("lapack", "slargv", JInt("n"), JFloatArray("x"), JInt("incx"), JFloatArray("y"), JInt("incy"), JFloatArray("c"), JInt("incc")) - Routine ("lapack", "slarnv", JInt("idist"), JIntArray("iseed"), JInt("n"), JFloatArray("x")) - Routine ("lapack", "slarra", JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("e2"), JFloat("spltol"), JFloat("tnrm"), JIntW("nsplit"), JIntArray("isplit"), JIntW("info")) - Routine ("lapack", "slarrb", JInt("n"), JFloatArray("d"), JFloatArray("lld"), JInt("ifirst"), JInt("ilast"), JFloat("rtol1"), JFloat("rtol2"), JInt("offset"), JFloatArray("w"), JFloatArray("wgap"), JFloatArray("werr"), JFloatArray("work"), JIntArray("iwork"), JFloat("pivmin"), JFloat("spdiam"), JInt("twist"), JIntW("info")) - Routine ("lapack", "slarrc", JString("jobt"), JInt("n"), JFloat("vl"), JFloat("vu"), JFloatArray("d"), JFloatArray("e"), JFloat("pivmin"), JIntW("eigcnt"), JIntW("lcnt"), JIntW("rcnt"), JIntW("info")) - Routine ("lapack", "slarrd", JString("range"), JString("order"), JInt("n"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloatArray("gers"), JFloat("reltol"), JFloatArray("d"), JFloatArray("e"), JFloatArray("e2"), JFloat("pivmin"), JInt("nsplit"), JIntArray("isplit"), JIntW("m"), JFloatArray("w"), JFloatArray("werr"), JFloatW("wl"), JFloatW("wu"), JIntArray("iblock"), JIntArray("indexw"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "slarre", JString("range"), JInt("n"), JFloatW("vl"), JFloatW("vu"), JInt("il"), JInt("iu"), JFloatArray("d"), JFloatArray("e"), JFloatArray("e2"), JFloat("rtol1"), JFloat("rtol2"), JFloat("spltol"), JIntW("nsplit"), JIntArray("isplit"), JIntW("m"), JFloatArray("w"), JFloatArray("werr"), JFloatArray("wgap"), JIntArray("iblock"), JIntArray("indexw"), JFloatArray("gers"), JFloatW("pivmin"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "slarrf", JInt("n"), JFloatArray("d"), JFloatArray("l"), JFloatArray("ld"), JInt("clstrt"), JInt("clend"), JFloatArray("w"), JFloatArray("wgap"), JFloatArray("werr"), JFloat("spdiam"), JFloat("clgapl"), JFloat("clgapr"), JFloat("pivmin"), JFloatW("sigma"), JFloatArray("dplus"), JFloatArray("lplus"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "slarrj", JInt("n"), JFloatArray("d"), JFloatArray("e2"), JInt("ifirst"), JInt("ilast"), JFloat("rtol"), JInt("offset"), JFloatArray("w"), JFloatArray("werr"), JFloatArray("work"), JIntArray("iwork"), JFloat("pivmin"), JFloat("spdiam"), JIntW("info")) - Routine ("lapack", "slarrk", JInt("n"), JInt("iw"), JFloat("gl"), JFloat("gu"), JFloatArray("d"), JFloatArray("e2"), JFloat("pivmin"), JFloat("reltol"), JFloatW("w"), JFloatW("werr"), JIntW("info")) - Routine ("lapack", "slarrr", JInt("n"), JFloatArray("d"), JFloatArray("e"), JIntW("info")) - Routine ("lapack", "slarrv", JInt("n"), JFloat("vl"), JFloat("vu"), JFloatArray("d"), JFloatArray("l"), JFloat("pivmin"), JIntArray("isplit"), JInt("m"), JInt("dol"), JInt("dou"), JFloat("minrgp"), JFloatW("rtol1"), JFloatW("rtol2"), JFloatArray("w"), JFloatArray("werr"), JFloatArray("wgap"), JIntArray("iblock"), JIntArray("indexw"), JFloatArray("gers"), JFloatArray("z"), JInt("ldz"), JIntArray("isuppz"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "slartg", JFloat("f"), JFloat("g"), JFloatW("cs"), JFloatW("sn"), JFloatW("r")) - Routine ("lapack", "slartv", JInt("n"), JFloatArray("x"), JInt("incx"), JFloatArray("y"), JInt("incy"), JFloatArray("c"), JFloatArray("s"), JInt("incc")) - Routine ("lapack", "slaruv", JIntArray("iseed"), JInt("n"), JFloatArray("x")) - Routine ("lapack", "slarz", JString("side"), JInt("m"), JInt("n"), JInt("l"), JFloatArray("v"), JInt("incv"), JFloat("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work")) - Routine ("lapack", "slarzb", JString("side"), JString("trans"), JString("direct"), JString("storev"), JInt("m"), JInt("n"), JInt("k"), JInt("l"), JFloatArray("v"), JInt("ldv"), JFloatArray("t"), JInt("ldt"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("ldwork")) - Routine ("lapack", "slarzt", JString("direct"), JString("storev"), JInt("n"), JInt("k"), JFloatArray("v"), JInt("ldv"), JFloatArray("tau"), JFloatArray("t"), JInt("ldt")) - Routine ("lapack", "slas2", JFloat("f"), JFloat("g"), JFloat("h"), JFloatW("ssmin"), JFloatW("ssmax")) - Routine ("lapack", "slascl", JString("type"), JInt("kl"), JInt("ku"), JFloat("cfrom"), JFloat("cto"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) - Routine ("lapack", "slasd0", JInt("n"), JInt("sqre"), JFloatArray("d"), JFloatArray("e"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JInt("ldvt"), JInt("smlsiz"), JIntArray("iwork"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "slasd1", JInt("nl"), JInt("nr"), JInt("sqre"), JFloatArray("d"), JFloatW("alpha"), JFloatW("beta"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JInt("ldvt"), JIntArray("idxq"), JIntArray("iwork"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "slasd2", JInt("nl"), JInt("nr"), JInt("sqre"), JIntW("k"), JFloatArray("d"), JFloatArray("z"), JFloat("alpha"), JFloat("beta"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("dsigma"), JFloatArray("u2"), JInt("ldu2"), JFloatArray("vt2"), JInt("ldvt2"), JIntArray("idxp"), JIntArray("idx"), JIntArray("idxc"), JIntArray("idxq"), JIntArray("coltyp"), JIntW("info")) - Routine ("lapack", "slasd3", JInt("nl"), JInt("nr"), JInt("sqre"), JInt("k"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JFloatArray("dsigma"), JFloatArray("u"), JInt("ldu"), JFloatArray("u2"), JInt("ldu2"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("vt2"), JInt("ldvt2"), JIntArray("idxc"), JIntArray("ctot"), JFloatArray("z"), JIntW("info")) - Routine ("lapack", "slasd4", JInt("n"), JInt("i"), JFloatArray("d"), JFloatArray("z"), JFloatArray("delta"), JFloat("rho"), JFloatW("sigma"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "slasd5", JInt("i"), JFloatArray("d"), JFloatArray("z"), JFloatArray("delta"), JFloat("rho"), JFloatW("dsigma"), JFloatArray("work")) - Routine ("lapack", "slasd6", JInt("icompq"), JInt("nl"), JInt("nr"), JInt("sqre"), JFloatArray("d"), JFloatArray("vf"), JFloatArray("vl"), JFloatW("alpha"), JFloatW("beta"), JIntArray("idxq"), JIntArray("perm"), JIntW("givptr"), JIntArray("givcol"), JInt("ldgcol"), JFloatArray("givnum"), JInt("ldgnum"), JFloatArray("poles"), JFloatArray("difl"), JFloatArray("difr"), JFloatArray("z"), JIntW("k"), JFloatW("c"), JFloatW("s"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "slasd7", JInt("icompq"), JInt("nl"), JInt("nr"), JInt("sqre"), JIntW("k"), JFloatArray("d"), JFloatArray("z"), JFloatArray("zw"), JFloatArray("vf"), JFloatArray("vfw"), JFloatArray("vl"), JFloatArray("vlw"), JFloat("alpha"), JFloat("beta"), JFloatArray("dsigma"), JIntArray("idx"), JIntArray("idxp"), JIntArray("idxq"), JIntArray("perm"), JIntW("givptr"), JIntArray("givcol"), JInt("ldgcol"), JFloatArray("givnum"), JInt("ldgnum"), JFloatW("c"), JFloatW("s"), JIntW("info")) - Routine ("lapack", "slasd8", JInt("icompq"), JInt("k"), JFloatArray("d"), JFloatArray("z"), JFloatArray("vf"), JFloatArray("vl"), JFloatArray("difl"), JFloatArray("difr"), JInt("lddifr"), JFloatArray("dsigma"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "slasda", JInt("icompq"), JInt("smlsiz"), JInt("n"), JInt("sqre"), JFloatArray("d"), JFloatArray("e"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JIntArray("k"), JFloatArray("difl"), JFloatArray("difr"), JFloatArray("z"), JFloatArray("poles"), JIntArray("givptr"), JIntArray("givcol"), JInt("ldgcol"), JIntArray("perm"), JFloatArray("givnum"), JFloatArray("c"), JFloatArray("s"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "slasdq", JString("uplo"), JInt("sqre"), JInt("n"), JInt("ncvt"), JInt("nru"), JInt("ncc"), JFloatArray("d"), JFloatArray("e"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("u"), JInt("ldu"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "slasdt", JInt("n"), JIntW("lvl"), JIntW("nd"), JIntArray("inode"), JIntArray("ndiml"), JIntArray("ndimr"), JInt("msub")) - Routine ("lapack", "slaset", JString("uplo"), JInt("m"), JInt("n"), JFloat("alpha"), JFloat("beta"), JFloatArray("a"), JInt("lda")) - Routine ("lapack", "slasq1", JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "slasq2", JInt("n"), JFloatArray("z"), JIntW("info")) - Routine ("lapack", "slasq3", JInt("i0"), JIntW("n0"), JFloatArray("z"), JInt("pp"), JFloatW("dmin"), JFloatW("sigma"), JFloatW("desig"), JFloatW("qmax"), JIntW("nfail"), JIntW("iter"), JIntW("ndiv"), JBoolean("ieee")) - Routine ("lapack", "slasq4", JInt("i0"), JInt("n0"), JFloatArray("z"), JInt("pp"), JInt("n0in"), JFloat("dmin"), JFloat("dmin1"), JFloat("dmin2"), JFloat("dn"), JFloat("dn1"), JFloat("dn2"), JFloatW("tau"), JIntW("ttype")) - Routine ("lapack", "slasq5", JInt("i0"), JInt("n0"), JFloatArray("z"), JInt("pp"), JFloat("tau"), JFloatW("dmin"), JFloatW("dmin1"), JFloatW("dmin2"), JFloatW("dn"), JFloatW("dnm1"), JFloatW("dnm2"), JBoolean("ieee")) - Routine ("lapack", "slasq6", JInt("i0"), JInt("n0"), JFloatArray("z"), JInt("pp"), JFloatW("dmin"), JFloatW("dmin1"), JFloatW("dmin2"), JFloatW("dn"), JFloatW("dnm1"), JFloatW("dnm2")) - Routine ("lapack", "slasr", JString("side"), JString("pivot"), JString("direct"), JInt("m"), JInt("n"), JFloatArray("c"), JFloatArray("s"), JFloatArray("a"), JInt("lda")) - Routine ("lapack", "slasrt", JString("id"), JInt("n"), JFloatArray("d"), JIntW("info")) - Routine ("lapack", "slassq", JInt("n"), JFloatArray("x"), JInt("incx"), JFloatW("scale"), JFloatW("sumsq")) - Routine ("lapack", "slasv2", JFloat("f"), JFloat("g"), JFloat("h"), JFloatW("ssmin"), JFloatW("ssmax"), JFloatW("snr"), JFloatW("csr"), JFloatW("snl"), JFloatW("csl")) - Routine ("lapack", "slaswp", JInt("n"), JFloatArray("a"), JInt("lda"), JInt("k1"), JInt("k2"), JIntArray("ipiv"), JInt("incx")) - Routine ("lapack", "slasy2", JBoolean("ltranl"), JBoolean("ltranr"), JInt("isgn"), JInt("n1"), JInt("n2"), JFloatArray("tl"), JInt("ldtl"), JFloatArray("tr"), JInt("ldtr"), JFloatArray("b"), JInt("ldb"), JFloatW("scale"), JFloatArray("x"), JInt("ldx"), JFloatW("xnorm"), JIntW("info")) - Routine ("lapack", "slasyf", JString("uplo"), JInt("n"), JInt("nb"), JIntW("kb"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("w"), JInt("ldw"), JIntW("info")) - Routine ("lapack", "slatbs", JString("uplo"), JString("trans"), JString("diag"), JString("normin"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("x"), JFloatW("scale"), JFloatArray("cnorm"), JIntW("info")) - Routine ("lapack", "slatdf", JInt("ijob"), JInt("n"), JFloatArray("z"), JInt("ldz"), JFloatArray("rhs"), JFloatW("rdsum"), JFloatW("rdscal"), JIntArray("ipiv"), JIntArray("jpiv")) - Routine ("lapack", "slatps", JString("uplo"), JString("trans"), JString("diag"), JString("normin"), JInt("n"), JFloatArray("ap"), JFloatArray("x"), JFloatW("scale"), JFloatArray("cnorm"), JIntW("info")) - Routine ("lapack", "slatrd", JString("uplo"), JInt("n"), JInt("nb"), JFloatArray("a"), JInt("lda"), JFloatArray("e"), JFloatArray("tau"), JFloatArray("w"), JInt("ldw")) - Routine ("lapack", "slatrs", JString("uplo"), JString("trans"), JString("diag"), JString("normin"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("x"), JFloatW("scale"), JFloatArray("cnorm"), JIntW("info")) - Routine ("lapack", "slatrz", JInt("m"), JInt("n"), JInt("l"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work")) - Routine ("lapack", "slatzm", JString("side"), JInt("m"), JInt("n"), JFloatArray("v"), JInt("incv"), JFloat("tau"), JFloatArray("c1"), JFloatArray("c2"), JInt("Ldc"), JFloatArray("work")) - Routine ("lapack", "slauu2", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) - Routine ("lapack", "slauum", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) - Routine_NI("lapack", "slazq3", JInt("i0"), JIntW("n0"), JFloatArray("z"), JInt("pp"), JFloatW("dmin"), JFloatW("sigma"), JFloatW("desig"), JFloatW("qmax"), JIntW("nfail"), JIntW("iter"), JIntW("ndiv"), JBoolean("ieee"), JIntW("ttype"), JFloatW("dmin1"), JFloatW("dmin2"), JFloatW("dn"), JFloatW("dn1"), JFloatW("dn2"), JFloatW("tau")) - Routine_NI("lapack", "slazq4", JInt("i0"), JInt("n0"), JFloatArray("z"), JInt("pp"), JInt("n0in"), JFloat("dmin"), JFloat("dmin1"), JFloat("dmin2"), JFloat("dn"), JFloat("dn1"), JFloat("dn2"), JFloatW("tau"), JIntW("ttype"), JFloatW("g")) - Routine ("lapack", "sopgtr", JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("tau"), JFloatArray("q"), JInt("ldq"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "sopmtr", JString("side"), JString("uplo"), JString("trans"), JInt("m"), JInt("n"), JFloatArray("ap"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "sorg2l", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "sorg2r", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "sorgbr", JString("vect"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sorghr", JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sorgl2", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "sorglq", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sorgql", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sorgqr", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sorgr2", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "sorgrq", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sorgtr", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sorm2l", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "sorm2r", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "sormbr", JString("vect"), JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sormhr", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sorml2", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "sormlq", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sormql", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sormqr", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sormr2", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "sormr3", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JInt("l"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "sormrq", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sormrz", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JInt("l"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "sormtr", JString("side"), JString("uplo"), JString("trans"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "spbcon", JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "spbequ", JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("s"), JFloatW("scond"), JFloatW("amax"), JIntW("info")) - Routine ("lapack", "spbrfs", JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("afb"), JInt("ldafb"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "spbstf", JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JIntW("info")) - Routine ("lapack", "spbsv", JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "spbsvx", JString("fact"), JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("afb"), JInt("ldafb"), JStringW("equed"), JFloatArray("s"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "spbtf2", JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JIntW("info")) - Routine ("lapack", "spbtrf", JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JIntW("info")) - Routine ("lapack", "spbtrs", JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "spocon", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "spoequ", JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("s"), JFloatW("scond"), JFloatW("amax"), JIntW("info")) - Routine ("lapack", "sporfs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("af"), JInt("ldaf"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "sposv", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "sposvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("af"), JInt("ldaf"), JStringW("equed"), JFloatArray("s"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "spotf2", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) - Routine ("lapack", "spotrf", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) - Routine ("lapack", "spotri", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) - Routine ("lapack", "spotrs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "sppcon", JString("uplo"), JInt("n"), JFloatArray("ap"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "sppequ", JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("s"), JFloatW("scond"), JFloatW("amax"), JIntW("info")) - Routine ("lapack", "spprfs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("afp"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "sppsv", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "sppsvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("afp"), JStringW("equed"), JFloatArray("s"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "spptrf", JString("uplo"), JInt("n"), JFloatArray("ap"), JIntW("info")) - Routine ("lapack", "spptri", JString("uplo"), JInt("n"), JFloatArray("ap"), JIntW("info")) - Routine ("lapack", "spptrs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "sptcon", JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "spteqr", JString("compz"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "sptrfs", JInt("n"), JInt("nrhs"), JFloatArray("d"), JFloatArray("e"), JFloatArray("df"), JFloatArray("ef"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "sptsv", JInt("n"), JInt("nrhs"), JFloatArray("d"), JFloatArray("e"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "sptsvx", JString("fact"), JInt("n"), JInt("nrhs"), JFloatArray("d"), JFloatArray("e"), JFloatArray("df"), JFloatArray("ef"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "spttrf", JInt("n"), JFloatArray("d"), JFloatArray("e"), JIntW("info")) - Routine ("lapack", "spttrs", JInt("n"), JInt("nrhs"), JFloatArray("d"), JFloatArray("e"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "sptts2", JInt("n"), JInt("nrhs"), JFloatArray("d"), JFloatArray("e"), JFloatArray("b"), JInt("ldb")) - Routine ("lapack", "srscl", JInt("n"), JFloat("sa"), JFloatArray("sx"), JInt("incx")) - Routine ("lapack", "ssbev", JString("jobz"), JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "ssbevd", JString("jobz"), JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - Routine ("lapack", "ssbevx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("q"), JInt("ldq"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - Routine ("lapack", "ssbgst", JString("vect"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JFloatArray("ab"), JInt("ldab"), JFloatArray("bb"), JInt("ldbb"), JFloatArray("x"), JInt("ldx"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "ssbgv", JString("jobz"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JFloatArray("ab"), JInt("ldab"), JFloatArray("bb"), JInt("ldbb"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "ssbgvd", JString("jobz"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JFloatArray("ab"), JInt("ldab"), JFloatArray("bb"), JInt("ldbb"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - Routine ("lapack", "ssbgvx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JFloatArray("ab"), JInt("ldab"), JFloatArray("bb"), JInt("ldbb"), JFloatArray("q"), JInt("ldq"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - Routine ("lapack", "ssbtrd", JString("vect"), JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("d"), JFloatArray("e"), JFloatArray("q"), JInt("ldq"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "sspcon", JString("uplo"), JInt("n"), JFloatArray("ap"), JIntArray("ipiv"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "sspev", JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "sspevd", JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - Routine ("lapack", "sspevx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - Routine ("lapack", "sspgst", JInt("itype"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("bp"), JIntW("info")) - Routine ("lapack", "sspgv", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("bp"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "sspgvd", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("bp"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - Routine ("lapack", "sspgvx", JInt("itype"), JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("bp"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - Routine ("lapack", "ssprfs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("afp"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "sspsv", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "sspsvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("afp"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "ssptrd", JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("d"), JFloatArray("e"), JFloatArray("tau"), JIntW("info")) - Routine ("lapack", "ssptrf", JString("uplo"), JInt("n"), JFloatArray("ap"), JIntArray("ipiv"), JIntW("info")) - Routine ("lapack", "ssptri", JString("uplo"), JInt("n"), JFloatArray("ap"), JIntArray("ipiv"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "ssptrs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "sstebz", JString("range"), JString("order"), JInt("n"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JFloatArray("d"), JFloatArray("e"), JIntW("m"), JIntW("nsplit"), JFloatArray("w"), JIntArray("iblock"), JIntArray("isplit"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "sstedc", JString("compz"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - Routine ("lapack", "sstegr", JString("jobz"), JString("range"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JIntArray("isuppz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - Routine ("lapack", "sstein", JInt("n"), JFloatArray("d"), JFloatArray("e"), JInt("m"), JFloatArray("w"), JIntArray("iblock"), JIntArray("isplit"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - Routine ("lapack", "sstemr", JString("jobz"), JString("range"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JInt("nzc"), JIntArray("isuppz"), JBooleanW("tryrac"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - Routine ("lapack", "ssteqr", JString("compz"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "ssterf", JInt("n"), JFloatArray("d"), JFloatArray("e"), JIntW("info")) - Routine ("lapack", "sstev", JString("jobz"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "sstevd", JString("jobz"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - Routine ("lapack", "sstevr", JString("jobz"), JString("range"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JIntArray("isuppz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - Routine ("lapack", "sstevx", JString("jobz"), JString("range"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - Routine ("lapack", "ssycon", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "ssyev", JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("w"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "ssyevd", JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("w"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - Routine ("lapack", "ssyevr", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JIntArray("isuppz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - Routine ("lapack", "ssyevx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - Routine ("lapack", "ssygs2", JInt("itype"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "ssygst", JInt("itype"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "ssygv", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("w"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "ssygvd", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("w"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - Routine ("lapack", "ssygvx", JInt("itype"), JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")) - Routine ("lapack", "ssyrfs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("af"), JInt("ldaf"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "ssysv", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "ssysvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("af"), JInt("ldaf"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "ssytd2", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("d"), JFloatArray("e"), JFloatArray("tau"), JIntW("info")) - Routine ("lapack", "ssytf2", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JIntW("info")) - Routine ("lapack", "ssytrd", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("d"), JFloatArray("e"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "ssytrf", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "ssytri", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "ssytrs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "stbcon", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "stbrfs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("kd"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "stbtrs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("kd"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "stgevc", JString("side"), JString("howmny"), JBooleanArray("select"), JInt("n"), JFloatArray("s"), JInt("lds"), JFloatArray("p"), JInt("ldp"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JInt("mm"), JIntW("m"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "stgex2", JBoolean("wantq"), JBoolean("wantz"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("q"), JInt("ldq"), JFloatArray("z"), JInt("ldz"), JInt("j1"), JInt("n1"), JInt("n2"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "stgexc", JBoolean("wantq"), JBoolean("wantz"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("q"), JInt("ldq"), JFloatArray("z"), JInt("ldz"), JIntW("ifst"), JIntW("ilst"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - Routine ("lapack", "stgsen", JInt("ijob"), JBoolean("wantq"), JBoolean("wantz"), JBooleanArray("select"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("q"), JInt("ldq"), JFloatArray("z"), JInt("ldz"), JIntW("m"), JFloatW("pl"), JFloatW("pr"), JFloatArray("dif"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - Routine ("lapack", "stgsja", JString("jobu"), JString("jobv"), JString("jobq"), JInt("m"), JInt("p"), JInt("n"), JInt("k"), JInt("l"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloat("tola"), JFloat("tolb"), JFloatArray("alpha"), JFloatArray("beta"), JFloatArray("u"), JInt("ldu"), JFloatArray("v"), JInt("ldv"), JFloatArray("q"), JInt("ldq"), JFloatArray("work"), JIntW("ncycle"), JIntW("info")) - Routine ("lapack", "stgsna", JString("job"), JString("howmny"), JBooleanArray("select"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JFloatArray("s"), JFloatArray("dif"), JInt("mm"), JIntW("m"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "stgsy2", JString("trans"), JInt("ijob"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("c"), JInt("Ldc"), JFloatArray("d"), JInt("ldd"), JFloatArray("e"), JInt("lde"), JFloatArray("f"), JInt("ldf"), JFloatW("scale"), JFloatW("rdsum"), JFloatW("rdscal"), JIntArray("iwork"), JIntW("pq"), JIntW("info")) - Routine ("lapack", "stgsyl", JString("trans"), JInt("ijob"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("c"), JInt("Ldc"), JFloatArray("d"), JInt("ldd"), JFloatArray("e"), JInt("lde"), JFloatArray("f"), JInt("ldf"), JFloatW("scale"), JFloatW("dif"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "stpcon", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JFloatArray("ap"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "stprfs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "stptri", JString("uplo"), JString("diag"), JInt("n"), JFloatArray("ap"), JIntW("info")) - Routine ("lapack", "stptrs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "strcon", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "strevc", JString("side"), JString("howmny"), JBooleanArray("select"), JInt("n"), JFloatArray("t"), JInt("ldt"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JInt("mm"), JIntW("m"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "strexc", JString("compq"), JInt("n"), JFloatArray("t"), JInt("ldt"), JFloatArray("q"), JInt("ldq"), JIntW("ifst"), JIntW("ilst"), JFloatArray("work"), JIntW("info")) - Routine ("lapack", "strrfs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "strsen", JString("job"), JString("compq"), JBooleanArray("select"), JInt("n"), JFloatArray("t"), JInt("ldt"), JFloatArray("q"), JInt("ldq"), JFloatArray("wr"), JFloatArray("wi"), JIntW("m"), JFloatW("s"), JFloatW("sep"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")) - Routine ("lapack", "strsna", JString("job"), JString("howmny"), JBooleanArray("select"), JInt("n"), JFloatArray("t"), JInt("ldt"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JFloatArray("s"), JFloatArray("sep"), JInt("mm"), JIntW("m"), JFloatArray("work"), JInt("ldwork"), JIntArray("iwork"), JIntW("info")) - Routine ("lapack", "strsyl", JString("trana"), JString("tranb"), JInt("isgn"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("c"), JInt("Ldc"), JFloatW("scale"), JIntW("info")) - Routine ("lapack", "strti2", JString("uplo"), JString("diag"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) - Routine ("lapack", "strtri", JString("uplo"), JString("diag"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")) - Routine ("lapack", "strtrs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("info")) - Routine ("lapack", "stzrqf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JIntW("info")) - Routine ("lapack", "stzrzf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")) - RoutineR ("lapack", JDoubleR(), "dlamch", JString("cmach")) - Routine_NI("lapack", "dlamc1", JIntW("beta"), JIntW("t"), JBooleanW("rnd"), JBooleanW("ieee1")) - Routine_NI("lapack", "dlamc2", JIntW("beta"), JIntW("t"), JBooleanW("rnd"), JDoubleW("eps"), JIntW("emin"), JDoubleW("rmin"), JIntW("emax"), JDoubleW("rmax")) - RoutineR ("lapack", JDoubleR(), "dlamc3", JDouble("a"), JDouble("b")) - Routine_NI("lapack", "dlamc4", JIntW("emin"), JDouble("start"), JInt("base")) - Routine_NI("lapack", "dlamc5", JInt("beta"), JInt("p"), JInt("emin"), JBoolean("ieee"), JIntW("emax"), JDoubleW("rmax")) - RoutineR ("lapack", JDoubleR(), "dsecnd") - RoutineR ("lapack", JBooleanR(), "lsame", JString("ca"), JString("cb")) - RoutineR ("lapack", JFloatR(), "second") - RoutineR ("lapack", JFloatR(), "slamch", JString("cmach")) - Routine_NI("lapack", "slamc1", JIntW("beta"), JIntW("t"), JBooleanW("rnd"), JBooleanW("ieee1")) - Routine_NI("lapack", "slamc2", JIntW("beta"), JIntW("t"), JBooleanW("rnd"), JFloatW("eps"), JIntW("emin"), JFloatW("rmin"), JIntW("emax"), JFloatW("rmax")) - RoutineR ("lapack", JFloatR(), "slamc3", JFloat("a"), JFloat("b")) - Routine_NI("lapack", "slamc4", JIntW("emin"), JFloat("start"), JInt("base")) - Routine_NI("lapack", "slamc5", JInt("beta"), JInt("p"), JInt("emin"), JBoolean("ieee"), JIntW("emax"), JFloatW("rmax")) \ No newline at end of file + Library("lapack", + Routine ( "dbdsdc", JString("uplo"), JString("compq"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("q"), JIntArray("iq"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dbdsqr", JString("uplo"), JInt("n"), JInt("ncvt"), JInt("nru"), JInt("ncc"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")), + Routine ( "ddisna", JString("job"), JInt("m"), JInt("n"), JDoubleArray("d"), JDoubleArray("sep"), JIntW("info")), + Routine ( "dgbbrd", JString("vect"), JInt("m"), JInt("n"), JInt("ncc"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("pt"), JInt("ldpt"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")), + Routine ( "dgbcon", JString("norm"), JInt("n"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JIntArray("ipiv"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dgbequ", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("r"), JDoubleArray("c"), JDoubleW("rowcnd"), JDoubleW("colcnd"), JDoubleW("amax"), JIntW("info")), + Routine ( "dgbrfs", JString("trans"), JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("afb"), JInt("ldafb"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dgbsv", JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "dgbsvx", JString("fact"), JString("trans"), JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("afb"), JInt("ldafb"), JIntArray("ipiv"), JStringW("equed"), JDoubleArray("r"), JDoubleArray("c"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dgbtf2", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JIntArray("ipiv"), JIntW("info")), + Routine ( "dgbtrf", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JIntArray("ipiv"), JIntW("info")), + Routine ( "dgbtrs", JString("trans"), JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "dgebak", JString("job"), JString("side"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("scale"), JInt("m"), JDoubleArray("v"), JInt("ldv"), JIntW("info")), + Routine ( "dgebal", JString("job"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("ilo"), JIntW("ihi"), JDoubleArray("scale"), JIntW("info")), + Routine ( "dgebd2", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("tauq"), JDoubleArray("taup"), JDoubleArray("work"), JIntW("info")), + Routine ( "dgebrd", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("tauq"), JDoubleArray("taup"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dgecon", JString("norm"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dgeequ", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("r"), JDoubleArray("c"), JDoubleW("rowcnd"), JDoubleW("colcnd"), JDoubleW("amax"), JIntW("info")), + Routine_NI( "dgees", JString("jobvs"), JString("sort"), JObject("select"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("sdim"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("vs"), JInt("ldvs"), JDoubleArray("work"), JInt("lwork"), JBooleanArray("bwork"), JIntW("info")), + Routine_NI( "dgeesx", JString("jobvs"), JString("sort"), JObject("select"), JString("sense"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("sdim"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("vs"), JInt("ldvs"), JDoubleW("rconde"), JDoubleW("rcondv"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JBooleanArray("bwork"), JIntW("info")), + Routine ( "dgeev", JString("jobvl"), JString("jobvr"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dgeevx", JString("balanc"), JString("jobvl"), JString("jobvr"), JString("sense"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JIntW("ilo"), JIntW("ihi"), JDoubleArray("scale"), JDoubleW("abnrm"), JDoubleArray("rconde"), JDoubleArray("rcondv"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")), + Routine ( "dgegs", JString("jobvsl"), JString("jobvsr"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("vsl"), JInt("ldvsl"), JDoubleArray("vsr"), JInt("ldvsr"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dgegv", JString("jobvl"), JString("jobvr"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dgehd2", JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")), + Routine ( "dgehrd", JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dgelq2", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")), + Routine ( "dgelqf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dgels", JString("trans"), JInt("m"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dgelsd", JInt("m"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("s"), JDouble("rcond"), JIntW("rank"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")), + Routine ( "dgelss", JInt("m"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("s"), JDouble("rcond"), JIntW("rank"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dgelsx", JInt("m"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntArray("jpvt"), JDouble("rcond"), JIntW("rank"), JDoubleArray("work"), JIntW("info")), + Routine ( "dgelsy", JInt("m"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntArray("jpvt"), JDouble("rcond"), JIntW("rank"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dgeql2", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")), + Routine ( "dgeqlf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dgeqp3", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("jpvt"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dgeqpf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("jpvt"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")), + Routine ( "dgeqr2", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")), + Routine ( "dgeqrf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dgerfs", JString("trans"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("af"), JInt("ldaf"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dgerq2", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")), + Routine ( "dgerqf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dgesc2", JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("rhs"), JIntArray("ipiv"), JIntArray("jpiv"), JDoubleW("scale")), + Routine ( "dgesdd", JString("jobz"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("s"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")), + Routine ( "dgesv", JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "dgesvd", JString("jobu"), JString("jobvt"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("s"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dgesvx", JString("fact"), JString("trans"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("af"), JInt("ldaf"), JIntArray("ipiv"), JStringW("equed"), JDoubleArray("r"), JDoubleArray("c"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dgetc2", JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JIntArray("jpiv"), JIntW("info")), + Routine ( "dgetf2", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JIntW("info")), + Routine ( "dgetrf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JIntW("info")), + Routine ( "dgetri", JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dgetrs", JString("trans"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "dggbak", JString("job"), JString("side"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("lscale"), JDoubleArray("rscale"), JInt("m"), JDoubleArray("v"), JInt("ldv"), JIntW("info")), + Routine ( "dggbal", JString("job"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("ilo"), JIntW("ihi"), JDoubleArray("lscale"), JDoubleArray("rscale"), JDoubleArray("work"), JIntW("info")), + Routine_NI( "dgges", JString("jobvsl"), JString("jobvsr"), JString("sort"), JObject("selctg"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("sdim"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("vsl"), JInt("ldvsl"), JDoubleArray("vsr"), JInt("ldvsr"), JDoubleArray("work"), JInt("lwork"), JBooleanArray("bwork"), JIntW("info")), + Routine_NI( "dggesx", JString("jobvsl"), JString("jobvsr"), JString("sort"), JObject("selctg"), JString("sense"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("sdim"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("vsl"), JInt("ldvsl"), JDoubleArray("vsr"), JInt("ldvsr"), JDoubleArray("rconde"), JDoubleArray("rcondv"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JBooleanArray("bwork"), JIntW("info")), + Routine ( "dggev", JString("jobvl"), JString("jobvr"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dggevx", JString("balanc"), JString("jobvl"), JString("jobvr"), JString("sense"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JIntW("ilo"), JIntW("ihi"), JDoubleArray("lscale"), JDoubleArray("rscale"), JDoubleW("abnrm"), JDoubleW("bbnrm"), JDoubleArray("rconde"), JDoubleArray("rcondv"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JBooleanArray("bwork"), JIntW("info")), + Routine ( "dggglm", JInt("n"), JInt("m"), JInt("p"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("d"), JDoubleArray("x"), JDoubleArray("y"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dgghrd", JString("compq"), JString("compz"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("z"), JInt("ldz"), JIntW("info")), + Routine ( "dgglse", JInt("m"), JInt("n"), JInt("p"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("c"), JDoubleArray("d"), JDoubleArray("x"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dggqrf", JInt("n"), JInt("m"), JInt("p"), JDoubleArray("a"), JInt("lda"), JDoubleArray("taua"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("taub"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dggrqf", JInt("m"), JInt("p"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("taua"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("taub"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dggsvd", JString("jobu"), JString("jobv"), JString("jobq"), JInt("m"), JInt("n"), JInt("p"), JIntW("k"), JIntW("l"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alpha"), JDoubleArray("beta"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dggsvp", JString("jobu"), JString("jobv"), JString("jobq"), JInt("m"), JInt("p"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDouble("tola"), JDouble("tolb"), JIntW("k"), JIntW("l"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("q"), JInt("ldq"), JIntArray("iwork"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")), + Routine ( "dgtcon", JString("norm"), JInt("n"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("du2"), JIntArray("ipiv"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dgtrfs", JString("trans"), JInt("n"), JInt("nrhs"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("dlf"), JDoubleArray("df"), JDoubleArray("duf"), JDoubleArray("du2"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dgtsv", JInt("n"), JInt("nrhs"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "dgtsvx", JString("fact"), JString("trans"), JInt("n"), JInt("nrhs"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("dlf"), JDoubleArray("df"), JDoubleArray("duf"), JDoubleArray("du2"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dgttrf", JInt("n"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("du2"), JIntArray("ipiv"), JIntW("info")), + Routine ( "dgttrs", JString("trans"), JInt("n"), JInt("nrhs"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("du2"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "dgtts2", JInt("itrans"), JInt("n"), JInt("nrhs"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("du2"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb")), + Routine ( "dhgeqz", JString("job"), JString("compq"), JString("compz"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dhsein", JString("side"), JString("eigsrc"), JString("initv"), JBooleanArray("select"), JInt("n"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JInt("mm"), JIntW("m"), JDoubleArray("work"), JIntArray("ifaill"), JIntArray("ifailr"), JIntW("info")), + Routine ( "dhseqr", JString("job"), JString("compz"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + RoutineR (JBooleanR(), "disnan", JDouble("din")), + Routine ( "dlabad", JDoubleW("small"), JDoubleW("large")), + Routine ( "dlabrd", JInt("m"), JInt("n"), JInt("nb"), JDoubleArray("a"), JInt("lda"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("tauq"), JDoubleArray("taup"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("y"), JInt("ldy")), + Routine ( "dlacn2", JInt("n"), JDoubleArray("v"), JDoubleArray("x"), JIntArray("isgn"), JDoubleW("est"), JIntW("kase"), JIntArray("isave")), + Routine ( "dlacon", JInt("n"), JDoubleArray("v"), JDoubleArray("x"), JIntArray("isgn"), JDoubleW("est"), JIntW("kase")), + Routine ( "dlacpy", JString("uplo"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb")), + Routine ( "dladiv", JDouble("a"), JDouble("b"), JDouble("c"), JDouble("d"), JDoubleW("p"), JDoubleW("q")), + Routine ( "dlae2", JDouble("a"), JDouble("b"), JDouble("c"), JDoubleW("rt1"), JDoubleW("rt2")), + Routine ( "dlaebz", JInt("ijob"), JInt("nitmax"), JInt("n"), JInt("mmax"), JInt("minp"), JInt("nbmin"), JDouble("abstol"), JDouble("reltol"), JDouble("pivmin"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("e2"), JIntArray("nval"), JDoubleArray("ab"), JDoubleArray("c"), JIntW("mout"), JIntArray("nab"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dlaed0", JInt("icompq"), JInt("qsiz"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("qstore"), JInt("ldqs"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dlaed1", JInt("n"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JIntArray("indxq"), JDoubleW("rho"), JInt("cutpnt"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dlaed2", JIntW("k"), JInt("n"), JInt("n1"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JIntArray("indxq"), JDoubleW("rho"), JDoubleArray("z"), JDoubleArray("dlamda"), JDoubleArray("w"), JDoubleArray("q2"), JIntArray("indx"), JIntArray("indxc"), JIntArray("indxp"), JIntArray("coltyp"), JIntW("info")), + Routine ( "dlaed3", JInt("k"), JInt("n"), JInt("n1"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JDouble("rho"), JDoubleArray("dlamda"), JDoubleArray("q2"), JIntArray("indx"), JIntArray("ctot"), JDoubleArray("w"), JDoubleArray("s"), JIntW("info")), + Routine ( "dlaed4", JInt("n"), JInt("i"), JDoubleArray("d"), JDoubleArray("z"), JDoubleArray("delta"), JDouble("rho"), JDoubleW("dlam"), JIntW("info")), + Routine ( "dlaed5", JInt("i"), JDoubleArray("d"), JDoubleArray("z"), JDoubleArray("delta"), JDouble("rho"), JDoubleW("dlam")), + Routine ( "dlaed6", JInt("kniter"), JBoolean("orgati"), JDouble("rho"), JDoubleArray("d"), JDoubleArray("z"), JDouble("finit"), JDoubleW("tau"), JIntW("info")), + Routine ( "dlaed7", JInt("icompq"), JInt("n"), JInt("qsiz"), JInt("tlvls"), JInt("curlvl"), JInt("curpbm"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JIntArray("indxq"), JDoubleW("rho"), JInt("cutpnt"), JDoubleArray("qstore"), JIntArray("qptr"), JIntArray("prmptr"), JIntArray("perm"), JIntArray("givptr"), JIntArray("givcol"), JDoubleArray("givnum"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dlaed8", JInt("icompq"), JIntW("k"), JInt("n"), JInt("qsiz"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JIntArray("indxq"), JDoubleW("rho"), JInt("cutpnt"), JDoubleArray("z"), JDoubleArray("dlamda"), JDoubleArray("q2"), JInt("ldq2"), JDoubleArray("w"), JIntArray("perm"), JIntW("givptr"), JIntArray("givcol"), JDoubleArray("givnum"), JIntArray("indxp"), JIntArray("indx"), JIntW("info")), + Routine ( "dlaed9", JInt("k"), JInt("kstart"), JInt("kstop"), JInt("n"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JDouble("rho"), JDoubleArray("dlamda"), JDoubleArray("w"), JDoubleArray("s"), JInt("lds"), JIntW("info")), + Routine ( "dlaeda", JInt("n"), JInt("tlvls"), JInt("curlvl"), JInt("curpbm"), JIntArray("prmptr"), JIntArray("perm"), JIntArray("givptr"), JIntArray("givcol"), JDoubleArray("givnum"), JDoubleArray("q"), JIntArray("qptr"), JDoubleArray("z"), JDoubleArray("ztemp"), JIntW("info")), + Routine ( "dlaein", JBoolean("rightv"), JBoolean("noinit"), JInt("n"), JDoubleArray("h"), JInt("ldh"), JDouble("wr"), JDouble("wi"), JDoubleArray("vr"), JDoubleArray("vi"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("work"), JDouble("eps3"), JDouble("smlnum"), JDouble("bignum"), JIntW("info")), + Routine ( "dlaev2", JDouble("a"), JDouble("b"), JDouble("c"), JDoubleW("rt1"), JDoubleW("rt2"), JDoubleW("cs1"), JDoubleW("sn1")), + Routine ( "dlaexc", JBoolean("wantq"), JInt("n"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("q"), JInt("ldq"), JInt("j1"), JInt("n1"), JInt("n2"), JDoubleArray("work"), JIntW("info")), + Routine ( "dlag2", JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDouble("safmin"), JDoubleW("scale1"), JDoubleW("scale2"), JDoubleW("wr1"), JDoubleW("wr2"), JDoubleW("wi")), + Routine ( "dlag2s", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JFloatArray("sa"), JInt("ldsa"), JIntW("info")), + Routine ( "dlags2", JBoolean("upper"), JDouble("a1"), JDouble("a2"), JDouble("a3"), JDouble("b1"), JDouble("b2"), JDouble("b3"), JDoubleW("csu"), JDoubleW("snu"), JDoubleW("csv"), JDoubleW("snv"), JDoubleW("csq"), JDoubleW("snq")), + Routine ( "dlagtf", JInt("n"), JDoubleArray("a"), JDouble("lambda"), JDoubleArray("b"), JDoubleArray("c"), JDouble("tol"), JDoubleArray("d"), JIntArray("in"), JIntW("info")), + Routine ( "dlagtm", JString("trans"), JInt("n"), JInt("nrhs"), JDouble("alpha"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du"), JDoubleArray("x"), JInt("ldx"), JDouble("beta"), JDoubleArray("b"), JInt("ldb")), + Routine ( "dlagts", JInt("job"), JInt("n"), JDoubleArray("a"), JDoubleArray("b"), JDoubleArray("c"), JDoubleArray("d"), JIntArray("in"), JDoubleArray("y"), JDoubleW("tol"), JIntW("info")), + Routine ( "dlagv2", JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleW("csl"), JDoubleW("snl"), JDoubleW("csr"), JDoubleW("snr")), + Routine ( "dlahqr", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JInt("iloz"), JInt("ihiz"), JDoubleArray("z"), JInt("ldz"), JIntW("info")), + Routine ( "dlahr2", JInt("n"), JInt("k"), JInt("nb"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("y"), JInt("ldy")), + Routine ( "dlahrd", JInt("n"), JInt("k"), JInt("nb"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("y"), JInt("ldy")), + Routine ( "dlaic1", JInt("job"), JInt("j"), JDoubleArray("x"), JDouble("sest"), JDoubleArray("w"), JDouble("gamma"), JDoubleW("sestpr"), JDoubleW("s"), JDoubleW("c")), + RoutineR (JBooleanR(), "dlaisnan", JDouble("din1"), JDouble("din2")), + Routine ( "dlaln2", JBoolean("ltrans"), JInt("na"), JInt("nw"), JDouble("smin"), JDouble("ca"), JDoubleArray("a"), JInt("lda"), JDouble("d1"), JDouble("d2"), JDoubleArray("b"), JInt("ldb"), JDouble("wr"), JDouble("wi"), JDoubleArray("x"), JInt("ldx"), JDoubleW("scale"), JDoubleW("xnorm"), JIntW("info")), + Routine ( "dlals0", JInt("icompq"), JInt("nl"), JInt("nr"), JInt("sqre"), JInt("nrhs"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("bx"), JInt("ldbx"), JIntArray("perm"), JInt("givptr"), JIntArray("givcol"), JInt("ldgcol"), JDoubleArray("givnum"), JInt("ldgnum"), JDoubleArray("poles"), JDoubleArray("difl"), JDoubleArray("difr"), JDoubleArray("z"), JInt("k"), JDouble("c"), JDouble("s"), JDoubleArray("work"), JIntW("info")), + Routine ( "dlalsa", JInt("icompq"), JInt("smlsiz"), JInt("n"), JInt("nrhs"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("bx"), JInt("ldbx"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JIntArray("k"), JDoubleArray("difl"), JDoubleArray("difr"), JDoubleArray("z"), JDoubleArray("poles"), JIntArray("givptr"), JIntArray("givcol"), JInt("ldgcol"), JIntArray("perm"), JDoubleArray("givnum"), JDoubleArray("c"), JDoubleArray("s"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dlalsd", JString("uplo"), JInt("smlsiz"), JInt("n"), JInt("nrhs"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("b"), JInt("ldb"), JDouble("rcond"), JIntW("rank"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dlamrg", JInt("n1"), JInt("n2"), JDoubleArray("a"), JInt("dtrd1"), JInt("dtrd2"), JIntArray("index")), + RoutineR (JIntR(), "dlaneg", JInt("n"), JDoubleArray("d"), JDoubleArray("lld"), JDouble("sigma"), JDouble("pivmin"), JInt("r")), + RoutineR (JDoubleR(), "dlangb", JString("norm"), JInt("n"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("work")), + RoutineR (JDoubleR(), "dlange", JString("norm"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("work")), + RoutineR (JDoubleR(), "dlangt", JString("norm"), JInt("n"), JDoubleArray("dl"), JDoubleArray("d"), JDoubleArray("du")), + RoutineR (JDoubleR(), "dlanhs", JString("norm"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("work")), + RoutineR (JDoubleR(), "dlansb", JString("norm"), JString("uplo"), JInt("n"), JInt("k"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("work")), + RoutineR (JDoubleR(), "dlansp", JString("norm"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("work")), + RoutineR (JDoubleR(), "dlanst", JString("norm"), JInt("n"), JDoubleArray("d"), JDoubleArray("e")), + RoutineR (JDoubleR(), "dlansy", JString("norm"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("work")), + RoutineR (JDoubleR(), "dlantb", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JInt("k"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("work")), + RoutineR (JDoubleR(), "dlantp", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JDoubleArray("ap"), JDoubleArray("work")), + RoutineR (JDoubleR(), "dlantr", JString("norm"), JString("uplo"), JString("diag"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("work")), + Routine ( "dlanv2", JDoubleW("a"), JDoubleW("b"), JDoubleW("c"), JDoubleW("d"), JDoubleW("rt1r"), JDoubleW("rt1i"), JDoubleW("rt2r"), JDoubleW("rt2i"), JDoubleW("cs"), JDoubleW("sn")), + Routine ( "dlapll", JInt("n"), JDoubleArray("x"), JInt("incx"), JDoubleArray("y"), JInt("incy"), JDoubleW("ssmin")), + Routine ( "dlapmt", JBoolean("forwrd"), JInt("m"), JInt("n"), JDoubleArray("x"), JInt("ldx"), JIntArray("k")), + RoutineR (JDoubleR(), "dlapy2", JDouble("x"), JDouble("y")), + RoutineR (JDoubleR(), "dlapy3", JDouble("x"), JDouble("y"), JDouble("z")), + Routine ( "dlaqgb", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("r"), JDoubleArray("c"), JDouble("rowcnd"), JDouble("colcnd"), JDouble("amax"), JStringW("equed")), + Routine ( "dlaqge", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("r"), JDoubleArray("c"), JDouble("rowcnd"), JDouble("colcnd"), JDouble("amax"), JStringW("equed")), + Routine ( "dlaqp2", JInt("m"), JInt("n"), JInt("offset"), JDoubleArray("a"), JInt("lda"), JIntArray("jpvt"), JDoubleArray("tau"), JDoubleArray("vn1"), JDoubleArray("vn2"), JDoubleArray("work")), + Routine ( "dlaqps", JInt("m"), JInt("n"), JInt("offset"), JInt("nb"), JIntW("kb"), JDoubleArray("a"), JInt("lda"), JIntArray("jpvt"), JDoubleArray("tau"), JDoubleArray("vn1"), JDoubleArray("vn2"), JDoubleArray("auxv"), JDoubleArray("f"), JInt("ldf")), + Routine ( "dlaqr0", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JInt("iloz"), JInt("ihiz"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dlaqr1", JInt("n"), JDoubleArray("h"), JInt("ldh"), JDouble("sr1"), JDouble("si1"), JDouble("sr2"), JDouble("si2"), JDoubleArray("v")), + Routine ( "dlaqr2", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ktop"), JInt("kbot"), JInt("nw"), JDoubleArray("h"), JInt("ldh"), JInt("iloz"), JInt("ihiz"), JDoubleArray("z"), JInt("ldz"), JIntW("ns"), JIntW("nd"), JDoubleArray("sr"), JDoubleArray("si"), JDoubleArray("v"), JInt("ldv"), JInt("nh"), JDoubleArray("t"), JInt("ldt"), JInt("nv"), JDoubleArray("wv"), JInt("ldwv"), JDoubleArray("work"), JInt("lwork")), + Routine ( "dlaqr3", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ktop"), JInt("kbot"), JInt("nw"), JDoubleArray("h"), JInt("ldh"), JInt("iloz"), JInt("ihiz"), JDoubleArray("z"), JInt("ldz"), JIntW("ns"), JIntW("nd"), JDoubleArray("sr"), JDoubleArray("si"), JDoubleArray("v"), JInt("ldv"), JInt("nh"), JDoubleArray("t"), JInt("ldt"), JInt("nv"), JDoubleArray("wv"), JInt("ldwv"), JDoubleArray("work"), JInt("lwork")), + Routine ( "dlaqr4", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JInt("iloz"), JInt("ihiz"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dlaqr5", JBoolean("wantt"), JBoolean("wantz"), JInt("kacc22"), JInt("n"), JInt("ktop"), JInt("kbot"), JInt("nshfts"), JDoubleArray("sr"), JDoubleArray("si"), JDoubleArray("h"), JInt("ldh"), JInt("iloz"), JInt("ihiz"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("u"), JInt("ldu"), JInt("nv"), JDoubleArray("wv"), JInt("ldwv"), JInt("nh"), JDoubleArray("wh"), JInt("ldwh")), + Routine ( "dlaqsb", JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("s"), JDouble("scond"), JDouble("amax"), JStringW("equed")), + Routine ( "dlaqsp", JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("s"), JDouble("scond"), JDouble("amax"), JStringW("equed")), + Routine ( "dlaqsy", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("s"), JDouble("scond"), JDouble("amax"), JStringW("equed")), + Routine ( "dlaqtr", JBoolean("ltran"), JBoolean("lreal"), JInt("n"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("b"), JDouble("w"), JDoubleW("scale"), JDoubleArray("x"), JDoubleArray("work"), JIntW("info")), + Routine ( "dlar1v", JInt("n"), JInt("b1"), JInt("bn"), JDouble("lambda"), JDoubleArray("d"), JDoubleArray("l"), JDoubleArray("ld"), JDoubleArray("lld"), JDouble("pivmin"), JDouble("gaptol"), JDoubleArray("z"), JBoolean("wantnc"), JIntW("negcnt"), JDoubleW("ztz"), JDoubleW("mingma"), JIntW("r"), JIntArray("isuppz"), JDoubleW("nrminv"), JDoubleW("resid"), JDoubleW("rqcorr"), JDoubleArray("work")), + Routine ( "dlar2v", JInt("n"), JDoubleArray("x"), JDoubleArray("y"), JDoubleArray("z"), JInt("incx"), JDoubleArray("c"), JDoubleArray("s"), JInt("incc")), + Routine ( "dlarf", JString("side"), JInt("m"), JInt("n"), JDoubleArray("v"), JInt("incv"), JDouble("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work")), + Routine ( "dlarfb", JString("side"), JString("trans"), JString("direct"), JString("storev"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("ldwork")), + Routine ( "dlarfg", JInt("n"), JDoubleW("alpha"), JDoubleArray("x"), JInt("incx"), JDoubleW("tau")), + Routine ( "dlarft", JString("direct"), JString("storev"), JInt("n"), JInt("k"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("tau"), JDoubleArray("t"), JInt("ldt")), + Routine ( "dlarfx", JString("side"), JInt("m"), JInt("n"), JDoubleArray("v"), JDouble("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work")), + Routine ( "dlargv", JInt("n"), JDoubleArray("x"), JInt("incx"), JDoubleArray("y"), JInt("incy"), JDoubleArray("c"), JInt("incc")), + Routine ( "dlarnv", JInt("idist"), JIntArray("iseed"), JInt("n"), JDoubleArray("x")), + Routine ( "dlarra", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("e2"), JDouble("spltol"), JDouble("tnrm"), JIntW("nsplit"), JIntArray("isplit"), JIntW("info")), + Routine ( "dlarrb", JInt("n"), JDoubleArray("d"), JDoubleArray("lld"), JInt("ifirst"), JInt("ilast"), JDouble("rtol1"), JDouble("rtol2"), JInt("offset"), JDoubleArray("w"), JDoubleArray("wgap"), JDoubleArray("werr"), JDoubleArray("work"), JIntArray("iwork"), JDouble("pivmin"), JDouble("spdiam"), JInt("twist"), JIntW("info")), + Routine ( "dlarrc", JString("jobt"), JInt("n"), JDouble("vl"), JDouble("vu"), JDoubleArray("d"), JDoubleArray("e"), JDouble("pivmin"), JIntW("eigcnt"), JIntW("lcnt"), JIntW("rcnt"), JIntW("info")), + Routine ( "dlarrd", JString("range"), JString("order"), JInt("n"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDoubleArray("gers"), JDouble("reltol"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("e2"), JDouble("pivmin"), JInt("nsplit"), JIntArray("isplit"), JIntW("m"), JDoubleArray("w"), JDoubleArray("werr"), JDoubleW("wl"), JDoubleW("wu"), JIntArray("iblock"), JIntArray("indexw"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dlarre", JString("range"), JInt("n"), JDoubleW("vl"), JDoubleW("vu"), JInt("il"), JInt("iu"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("e2"), JDouble("rtol1"), JDouble("rtol2"), JDouble("spltol"), JIntW("nsplit"), JIntArray("isplit"), JIntW("m"), JDoubleArray("w"), JDoubleArray("werr"), JDoubleArray("wgap"), JIntArray("iblock"), JIntArray("indexw"), JDoubleArray("gers"), JDoubleW("pivmin"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dlarrf", JInt("n"), JDoubleArray("d"), JDoubleArray("l"), JDoubleArray("ld"), JInt("clstrt"), JInt("clend"), JDoubleArray("w"), JDoubleArray("wgap"), JDoubleArray("werr"), JDouble("spdiam"), JDouble("clgapl"), JDouble("clgapr"), JDouble("pivmin"), JDoubleW("sigma"), JDoubleArray("dplus"), JDoubleArray("lplus"), JDoubleArray("work"), JIntW("info")), + Routine ( "dlarrj", JInt("n"), JDoubleArray("d"), JDoubleArray("e2"), JInt("ifirst"), JInt("ilast"), JDouble("rtol"), JInt("offset"), JDoubleArray("w"), JDoubleArray("werr"), JDoubleArray("work"), JIntArray("iwork"), JDouble("pivmin"), JDouble("spdiam"), JIntW("info")), + Routine ( "dlarrk", JInt("n"), JInt("iw"), JDouble("gl"), JDouble("gu"), JDoubleArray("d"), JDoubleArray("e2"), JDouble("pivmin"), JDouble("reltol"), JDoubleW("w"), JDoubleW("werr"), JIntW("info")), + Routine ( "dlarrr", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JIntW("info")), + Routine ( "dlarrv", JInt("n"), JDouble("vl"), JDouble("vu"), JDoubleArray("d"), JDoubleArray("l"), JDouble("pivmin"), JIntArray("isplit"), JInt("m"), JInt("dol"), JInt("dou"), JDouble("minrgp"), JDoubleW("rtol1"), JDoubleW("rtol2"), JDoubleArray("w"), JDoubleArray("werr"), JDoubleArray("wgap"), JIntArray("iblock"), JIntArray("indexw"), JDoubleArray("gers"), JDoubleArray("z"), JInt("ldz"), JIntArray("isuppz"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dlartg", JDouble("f"), JDouble("g"), JDoubleW("cs"), JDoubleW("sn"), JDoubleW("r")), + Routine ( "dlartv", JInt("n"), JDoubleArray("x"), JInt("incx"), JDoubleArray("y"), JInt("incy"), JDoubleArray("c"), JDoubleArray("s"), JInt("incc")), + Routine ( "dlaruv", JIntArray("iseed"), JInt("n"), JDoubleArray("x")), + Routine ( "dlarz", JString("side"), JInt("m"), JInt("n"), JInt("l"), JDoubleArray("v"), JInt("incv"), JDouble("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work")), + Routine ( "dlarzb", JString("side"), JString("trans"), JString("direct"), JString("storev"), JInt("m"), JInt("n"), JInt("k"), JInt("l"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("ldwork")), + Routine ( "dlarzt", JString("direct"), JString("storev"), JInt("n"), JInt("k"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("tau"), JDoubleArray("t"), JInt("ldt")), + Routine ( "dlas2", JDouble("f"), JDouble("g"), JDouble("h"), JDoubleW("ssmin"), JDoubleW("ssmax")), + Routine ( "dlascl", JString("type"), JInt("kl"), JInt("ku"), JDouble("cfrom"), JDouble("cto"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")), + Routine ( "dlasd0", JInt("n"), JInt("sqre"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JInt("ldvt"), JInt("smlsiz"), JIntArray("iwork"), JDoubleArray("work"), JIntW("info")), + Routine ( "dlasd1", JInt("nl"), JInt("nr"), JInt("sqre"), JDoubleArray("d"), JDoubleW("alpha"), JDoubleW("beta"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JInt("ldvt"), JIntArray("idxq"), JIntArray("iwork"), JDoubleArray("work"), JIntW("info")), + Routine ( "dlasd2", JInt("nl"), JInt("nr"), JInt("sqre"), JIntW("k"), JDoubleArray("d"), JDoubleArray("z"), JDouble("alpha"), JDouble("beta"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("dsigma"), JDoubleArray("u2"), JInt("ldu2"), JDoubleArray("vt2"), JInt("ldvt2"), JIntArray("idxp"), JIntArray("idx"), JIntArray("idxc"), JIntArray("idxq"), JIntArray("coltyp"), JIntW("info")), + Routine ( "dlasd3", JInt("nl"), JInt("nr"), JInt("sqre"), JInt("k"), JDoubleArray("d"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("dsigma"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("u2"), JInt("ldu2"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("vt2"), JInt("ldvt2"), JIntArray("idxc"), JIntArray("ctot"), JDoubleArray("z"), JIntW("info")), + Routine ( "dlasd4", JInt("n"), JInt("i"), JDoubleArray("d"), JDoubleArray("z"), JDoubleArray("delta"), JDouble("rho"), JDoubleW("sigma"), JDoubleArray("work"), JIntW("info")), + Routine ( "dlasd5", JInt("i"), JDoubleArray("d"), JDoubleArray("z"), JDoubleArray("delta"), JDouble("rho"), JDoubleW("dsigma"), JDoubleArray("work")), + Routine ( "dlasd6", JInt("icompq"), JInt("nl"), JInt("nr"), JInt("sqre"), JDoubleArray("d"), JDoubleArray("vf"), JDoubleArray("vl"), JDoubleW("alpha"), JDoubleW("beta"), JIntArray("idxq"), JIntArray("perm"), JIntW("givptr"), JIntArray("givcol"), JInt("ldgcol"), JDoubleArray("givnum"), JInt("ldgnum"), JDoubleArray("poles"), JDoubleArray("difl"), JDoubleArray("difr"), JDoubleArray("z"), JIntW("k"), JDoubleW("c"), JDoubleW("s"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dlasd7", JInt("icompq"), JInt("nl"), JInt("nr"), JInt("sqre"), JIntW("k"), JDoubleArray("d"), JDoubleArray("z"), JDoubleArray("zw"), JDoubleArray("vf"), JDoubleArray("vfw"), JDoubleArray("vl"), JDoubleArray("vlw"), JDouble("alpha"), JDouble("beta"), JDoubleArray("dsigma"), JIntArray("idx"), JIntArray("idxp"), JIntArray("idxq"), JIntArray("perm"), JIntW("givptr"), JIntArray("givcol"), JInt("ldgcol"), JDoubleArray("givnum"), JInt("ldgnum"), JDoubleW("c"), JDoubleW("s"), JIntW("info")), + Routine ( "dlasd8", JInt("icompq"), JInt("k"), JDoubleArray("d"), JDoubleArray("z"), JDoubleArray("vf"), JDoubleArray("vl"), JDoubleArray("difl"), JDoubleArray("difr"), JInt("lddifr"), JDoubleArray("dsigma"), JDoubleArray("work"), JIntW("info")), + Routine ( "dlasda", JInt("icompq"), JInt("smlsiz"), JInt("n"), JInt("sqre"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JIntArray("k"), JDoubleArray("difl"), JDoubleArray("difr"), JDoubleArray("z"), JDoubleArray("poles"), JIntArray("givptr"), JIntArray("givcol"), JInt("ldgcol"), JIntArray("perm"), JDoubleArray("givnum"), JDoubleArray("c"), JDoubleArray("s"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dlasdq", JString("uplo"), JInt("sqre"), JInt("n"), JInt("ncvt"), JInt("nru"), JInt("ncc"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")), + Routine ( "dlasdt", JInt("n"), JIntW("lvl"), JIntW("nd"), JIntArray("inode"), JIntArray("ndiml"), JIntArray("ndimr"), JInt("msub")), + Routine ( "dlaset", JString("uplo"), JInt("m"), JInt("n"), JDouble("alpha"), JDouble("beta"), JDoubleArray("a"), JInt("lda")), + Routine ( "dlasq1", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("work"), JIntW("info")), + Routine ( "dlasq2", JInt("n"), JDoubleArray("z"), JIntW("info")), + Routine ( "dlasq3", JInt("i0"), JIntW("n0"), JDoubleArray("z"), JInt("pp"), JDoubleW("dmin"), JDoubleW("sigma"), JDoubleW("desig"), JDoubleW("qmax"), JIntW("nfail"), JIntW("iter"), JIntW("ndiv"), JBoolean("ieee")), + Routine ( "dlasq4", JInt("i0"), JInt("n0"), JDoubleArray("z"), JInt("pp"), JInt("n0in"), JDouble("dmin"), JDouble("dmin1"), JDouble("dmin2"), JDouble("dn"), JDouble("dn1"), JDouble("dn2"), JDoubleW("tau"), JIntW("ttype")), + Routine ( "dlasq5", JInt("i0"), JInt("n0"), JDoubleArray("z"), JInt("pp"), JDouble("tau"), JDoubleW("dmin"), JDoubleW("dmin1"), JDoubleW("dmin2"), JDoubleW("dn"), JDoubleW("dnm1"), JDoubleW("dnm2"), JBoolean("ieee")), + Routine ( "dlasq6", JInt("i0"), JInt("n0"), JDoubleArray("z"), JInt("pp"), JDoubleW("dmin"), JDoubleW("dmin1"), JDoubleW("dmin2"), JDoubleW("dn"), JDoubleW("dnm1"), JDoubleW("dnm2")), + Routine ( "dlasr", JString("side"), JString("pivot"), JString("direct"), JInt("m"), JInt("n"), JDoubleArray("c"), JDoubleArray("s"), JDoubleArray("a"), JInt("lda")), + Routine ( "dlasrt", JString("id"), JInt("n"), JDoubleArray("d"), JIntW("info")), + Routine ( "dlassq", JInt("n"), JDoubleArray("x"), JInt("incx"), JDoubleW("scale"), JDoubleW("sumsq")), + Routine ( "dlasv2", JDouble("f"), JDouble("g"), JDouble("h"), JDoubleW("ssmin"), JDoubleW("ssmax"), JDoubleW("snr"), JDoubleW("csr"), JDoubleW("snl"), JDoubleW("csl")), + Routine ( "dlaswp", JInt("n"), JDoubleArray("a"), JInt("lda"), JInt("k1"), JInt("k2"), JIntArray("ipiv"), JInt("incx")), + Routine ( "dlasy2", JBoolean("ltranl"), JBoolean("ltranr"), JInt("isgn"), JInt("n1"), JInt("n2"), JDoubleArray("tl"), JInt("ldtl"), JDoubleArray("tr"), JInt("ldtr"), JDoubleArray("b"), JInt("ldb"), JDoubleW("scale"), JDoubleArray("x"), JInt("ldx"), JDoubleW("xnorm"), JIntW("info")), + Routine ( "dlasyf", JString("uplo"), JInt("n"), JInt("nb"), JIntW("kb"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("w"), JInt("ldw"), JIntW("info")), + Routine ( "dlatbs", JString("uplo"), JString("trans"), JString("diag"), JString("normin"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("x"), JDoubleW("scale"), JDoubleArray("cnorm"), JIntW("info")), + Routine ( "dlatdf", JInt("ijob"), JInt("n"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("rhs"), JDoubleW("rdsum"), JDoubleW("rdscal"), JIntArray("ipiv"), JIntArray("jpiv")), + Routine ( "dlatps", JString("uplo"), JString("trans"), JString("diag"), JString("normin"), JInt("n"), JDoubleArray("ap"), JDoubleArray("x"), JDoubleW("scale"), JDoubleArray("cnorm"), JIntW("info")), + Routine ( "dlatrd", JString("uplo"), JInt("n"), JInt("nb"), JDoubleArray("a"), JInt("lda"), JDoubleArray("e"), JDoubleArray("tau"), JDoubleArray("w"), JInt("ldw")), + Routine ( "dlatrs", JString("uplo"), JString("trans"), JString("diag"), JString("normin"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("x"), JDoubleW("scale"), JDoubleArray("cnorm"), JIntW("info")), + Routine ( "dlatrz", JInt("m"), JInt("n"), JInt("l"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work")), + Routine ( "dlatzm", JString("side"), JInt("m"), JInt("n"), JDoubleArray("v"), JInt("incv"), JDouble("tau"), JDoubleArray("c1"), JDoubleArray("c2"), JInt("Ldc"), JDoubleArray("work")), + Routine ( "dlauu2", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")), + Routine ( "dlauum", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")), + Routine_NI( "dlazq3", JInt("i0"), JIntW("n0"), JDoubleArray("z"), JInt("pp"), JDoubleW("dmin"), JDoubleW("sigma"), JDoubleW("desig"), JDoubleW("qmax"), JIntW("nfail"), JIntW("iter"), JIntW("ndiv"), JBoolean("ieee"), JIntW("ttype"), JDoubleW("dmin1"), JDoubleW("dmin2"), JDoubleW("dn"), JDoubleW("dn1"), JDoubleW("dn2"), JDoubleW("tau")), + Routine_NI( "dlazq4", JInt("i0"), JInt("n0"), JDoubleArray("z"), JInt("pp"), JInt("n0in"), JDouble("dmin"), JDouble("dmin1"), JDouble("dmin2"), JDouble("dn"), JDouble("dn1"), JDouble("dn2"), JDoubleW("tau"), JIntW("ttype"), JDoubleW("g")), + Routine ( "dopgtr", JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("tau"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("work"), JIntW("info")), + Routine ( "dopmtr", JString("side"), JString("uplo"), JString("trans"), JInt("m"), JInt("n"), JDoubleArray("ap"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")), + Routine ( "dorg2l", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")), + Routine ( "dorg2r", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")), + Routine ( "dorgbr", JString("vect"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dorghr", JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dorgl2", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")), + Routine ( "dorglq", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dorgql", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dorgqr", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dorgr2", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JIntW("info")), + Routine ( "dorgrq", JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dorgtr", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dorm2l", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")), + Routine ( "dorm2r", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")), + Routine ( "dormbr", JString("vect"), JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dormhr", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dorml2", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")), + Routine ( "dormlq", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dormql", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dormqr", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dormr2", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")), + Routine ( "dormr3", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JInt("l"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")), + Routine ( "dormrq", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dormrz", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JInt("l"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dormtr", JString("side"), JString("uplo"), JString("trans"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dpbcon", JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dpbequ", JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("s"), JDoubleW("scond"), JDoubleW("amax"), JIntW("info")), + Routine ( "dpbrfs", JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("afb"), JInt("ldafb"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dpbstf", JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JIntW("info")), + Routine ( "dpbsv", JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "dpbsvx", JString("fact"), JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("afb"), JInt("ldafb"), JStringW("equed"), JDoubleArray("s"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dpbtf2", JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JIntW("info")), + Routine ( "dpbtrf", JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JIntW("info")), + Routine ( "dpbtrs", JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "dpocon", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dpoequ", JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("s"), JDoubleW("scond"), JDoubleW("amax"), JIntW("info")), + Routine ( "dporfs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("af"), JInt("ldaf"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dposv", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "dposvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("af"), JInt("ldaf"), JStringW("equed"), JDoubleArray("s"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dpotf2", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")), + Routine ( "dpotrf", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")), + Routine ( "dpotri", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")), + Routine ( "dpotrs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "dppcon", JString("uplo"), JInt("n"), JDoubleArray("ap"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dppequ", JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("s"), JDoubleW("scond"), JDoubleW("amax"), JIntW("info")), + Routine ( "dpprfs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("afp"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dppsv", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "dppsvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("afp"), JStringW("equed"), JDoubleArray("s"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dpptrf", JString("uplo"), JInt("n"), JDoubleArray("ap"), JIntW("info")), + Routine ( "dpptri", JString("uplo"), JInt("n"), JDoubleArray("ap"), JIntW("info")), + Routine ( "dpptrs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "dptcon", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntW("info")), + Routine ( "dpteqr", JString("compz"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")), + Routine ( "dptrfs", JInt("n"), JInt("nrhs"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("df"), JDoubleArray("ef"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntW("info")), + Routine ( "dptsv", JInt("n"), JInt("nrhs"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "dptsvx", JString("fact"), JInt("n"), JInt("nrhs"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("df"), JDoubleArray("ef"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntW("info")), + Routine ( "dpttrf", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JIntW("info")), + Routine ( "dpttrs", JInt("n"), JInt("nrhs"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "dptts2", JInt("n"), JInt("nrhs"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("b"), JInt("ldb")), + Routine ( "drscl", JInt("n"), JDouble("sa"), JDoubleArray("sx"), JInt("incx")), + Routine ( "dsbev", JString("jobz"), JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")), + Routine ( "dsbevd", JString("jobz"), JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")), + Routine ( "dsbevx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("q"), JInt("ldq"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")), + Routine ( "dsbgst", JString("vect"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("bb"), JInt("ldbb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("work"), JIntW("info")), + Routine ( "dsbgv", JString("jobz"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("bb"), JInt("ldbb"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")), + Routine ( "dsbgvd", JString("jobz"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("bb"), JInt("ldbb"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")), + Routine ( "dsbgvx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("bb"), JInt("ldbb"), JDoubleArray("q"), JInt("ldq"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")), + Routine ( "dsbtrd", JString("vect"), JString("uplo"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("work"), JIntW("info")), + Routine ( "dsgesv", JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("work"), JFloatArray("swork"), JIntW("iter"), JIntW("info")), + Routine ( "dspcon", JString("uplo"), JInt("n"), JDoubleArray("ap"), JIntArray("ipiv"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dspev", JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")), + Routine ( "dspevd", JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")), + Routine ( "dspevx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")), + Routine ( "dspgst", JInt("itype"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("bp"), JIntW("info")), + Routine ( "dspgv", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("bp"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")), + Routine ( "dspgvd", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("bp"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")), + Routine ( "dspgvx", JInt("itype"), JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("bp"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")), + Routine ( "dsprfs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("afp"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dspsv", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "dspsvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("afp"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dsptrd", JString("uplo"), JInt("n"), JDoubleArray("ap"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("tau"), JIntW("info")), + Routine ( "dsptrf", JString("uplo"), JInt("n"), JDoubleArray("ap"), JIntArray("ipiv"), JIntW("info")), + Routine ( "dsptri", JString("uplo"), JInt("n"), JDoubleArray("ap"), JIntArray("ipiv"), JDoubleArray("work"), JIntW("info")), + Routine ( "dsptrs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "dstebz", JString("range"), JString("order"), JInt("n"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JDoubleArray("d"), JDoubleArray("e"), JIntW("m"), JIntW("nsplit"), JDoubleArray("w"), JIntArray("iblock"), JIntArray("isplit"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dstedc", JString("compz"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")), + Routine ( "dstegr", JString("jobz"), JString("range"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JIntArray("isuppz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")), + Routine ( "dstein", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JInt("m"), JDoubleArray("w"), JIntArray("iblock"), JIntArray("isplit"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")), + Routine ( "dstemr", JString("jobz"), JString("range"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JInt("nzc"), JIntArray("isuppz"), JBooleanW("tryrac"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")), + Routine ( "dsteqr", JString("compz"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")), + Routine ( "dsterf", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JIntW("info")), + Routine ( "dstev", JString("jobz"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntW("info")), + Routine ( "dstevd", JString("jobz"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")), + Routine ( "dstevr", JString("jobz"), JString("range"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JIntArray("isuppz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")), + Routine ( "dstevx", JString("jobz"), JString("range"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")), + Routine ( "dsycon", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDouble("anorm"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dsyev", JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("w"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dsyevd", JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("w"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")), + Routine ( "dsyevr", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JIntArray("isuppz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")), + Routine ( "dsyevx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")), + Routine ( "dsygs2", JInt("itype"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "dsygst", JInt("itype"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "dsygv", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("w"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dsygvd", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("w"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")), + Routine ( "dsygvx", JInt("itype"), JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDouble("vl"), JDouble("vu"), JInt("il"), JInt("iu"), JDouble("abstol"), JIntW("m"), JDoubleArray("w"), JDoubleArray("z"), JInt("ldz"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")), + Routine ( "dsyrfs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("af"), JInt("ldaf"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dsysv", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dsysvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("af"), JInt("ldaf"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleW("rcond"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")), + Routine ( "dsytd2", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("tau"), JIntW("info")), + Routine ( "dsytf2", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JIntW("info")), + Routine ( "dsytrd", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dsytrf", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dsytri", JString("uplo"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("work"), JIntW("info")), + Routine ( "dsytrs", JString("uplo"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JIntArray("ipiv"), JDoubleArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "dtbcon", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JInt("kd"), JDoubleArray("ab"), JInt("ldab"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dtbrfs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("kd"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dtbtrs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("kd"), JInt("nrhs"), JDoubleArray("ab"), JInt("ldab"), JDoubleArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "dtgevc", JString("side"), JString("howmny"), JBooleanArray("select"), JInt("n"), JDoubleArray("s"), JInt("lds"), JDoubleArray("p"), JInt("ldp"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JInt("mm"), JIntW("m"), JDoubleArray("work"), JIntW("info")), + Routine ( "dtgex2", JBoolean("wantq"), JBoolean("wantz"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("z"), JInt("ldz"), JInt("j1"), JInt("n1"), JInt("n2"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dtgexc", JBoolean("wantq"), JBoolean("wantz"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("z"), JInt("ldz"), JIntW("ifst"), JIntW("ilst"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "dtgsen", JInt("ijob"), JBoolean("wantq"), JBoolean("wantz"), JBooleanArray("select"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("alphar"), JDoubleArray("alphai"), JDoubleArray("beta"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("z"), JInt("ldz"), JIntW("m"), JDoubleW("pl"), JDoubleW("pr"), JDoubleArray("dif"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")), + Routine ( "dtgsja", JString("jobu"), JString("jobv"), JString("jobq"), JInt("m"), JInt("p"), JInt("n"), JInt("k"), JInt("l"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDouble("tola"), JDouble("tolb"), JDoubleArray("alpha"), JDoubleArray("beta"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("work"), JIntW("ncycle"), JIntW("info")), + Routine ( "dtgsna", JString("job"), JString("howmny"), JBooleanArray("select"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JDoubleArray("s"), JDoubleArray("dif"), JInt("mm"), JIntW("m"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")), + Routine ( "dtgsy2", JString("trans"), JInt("ijob"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("d"), JInt("ldd"), JDoubleArray("e"), JInt("lde"), JDoubleArray("f"), JInt("ldf"), JDoubleW("scale"), JDoubleW("rdsum"), JDoubleW("rdscal"), JIntArray("iwork"), JIntW("pq"), JIntW("info")), + Routine ( "dtgsyl", JString("trans"), JInt("ijob"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("d"), JInt("ldd"), JDoubleArray("e"), JInt("lde"), JDoubleArray("f"), JInt("ldf"), JDoubleW("scale"), JDoubleW("dif"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")), + Routine ( "dtpcon", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JDoubleArray("ap"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dtprfs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dtptri", JString("uplo"), JString("diag"), JInt("n"), JDoubleArray("ap"), JIntW("info")), + Routine ( "dtptrs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JDoubleArray("ap"), JDoubleArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "dtrcon", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleW("rcond"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dtrevc", JString("side"), JString("howmny"), JBooleanArray("select"), JInt("n"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JInt("mm"), JIntW("m"), JDoubleArray("work"), JIntW("info")), + Routine ( "dtrexc", JString("compq"), JInt("n"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("q"), JInt("ldq"), JIntW("ifst"), JIntW("ilst"), JDoubleArray("work"), JIntW("info")), + Routine ( "dtrrfs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("x"), JInt("ldx"), JDoubleArray("ferr"), JDoubleArray("berr"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "dtrsen", JString("job"), JString("compq"), JBooleanArray("select"), JInt("n"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("wr"), JDoubleArray("wi"), JIntW("m"), JDoubleW("s"), JDoubleW("sep"), JDoubleArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")), + Routine ( "dtrsna", JString("job"), JString("howmny"), JBooleanArray("select"), JInt("n"), JDoubleArray("t"), JInt("ldt"), JDoubleArray("vl"), JInt("ldvl"), JDoubleArray("vr"), JInt("ldvr"), JDoubleArray("s"), JDoubleArray("sep"), JInt("mm"), JIntW("m"), JDoubleArray("work"), JInt("ldwork"), JIntArray("iwork"), JIntW("info")), + Routine ( "dtrsyl", JString("trana"), JString("tranb"), JInt("isgn"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JDoubleArray("c"), JInt("Ldc"), JDoubleW("scale"), JIntW("info")), + Routine ( "dtrti2", JString("uplo"), JString("diag"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")), + Routine ( "dtrtri", JString("uplo"), JString("diag"), JInt("n"), JDoubleArray("a"), JInt("lda"), JIntW("info")), + Routine ( "dtrtrs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JDoubleArray("a"), JInt("lda"), JDoubleArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "dtzrqf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JIntW("info")), + Routine ( "dtzrzf", JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JDoubleArray("tau"), JDoubleArray("work"), JInt("lwork"), JIntW("info")), + RoutineR (JIntR(), "ieeeck", JInt("ispec"), JFloat("zero"), JFloat("one")), + RoutineR (JIntR(), "ilaenv", JInt("ispec"), JString("name"), JString("opts"), JInt("n1"), JInt("n2"), JInt("n3"), JInt("n4")), + Routine ( "ilaver", JIntW("vers_major"), JIntW("vers_minor"), JIntW("vers_patch")), + RoutineR (JIntR(), "iparmq", JInt("ispec"), JString("name"), JString("opts"), JInt("n"), JInt("ilo"), JInt("ihi"), JInt("lwork")), + RoutineR (JBooleanR(), "lsamen", JInt("n"), JString("ca"), JString("cb")), + Routine ( "sbdsdc", JString("uplo"), JString("compq"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("q"), JIntArray("iq"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "sbdsqr", JString("uplo"), JInt("n"), JInt("ncvt"), JInt("nru"), JInt("ncc"), JFloatArray("d"), JFloatArray("e"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("u"), JInt("ldu"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")), + Routine ( "sdisna", JString("job"), JInt("m"), JInt("n"), JFloatArray("d"), JFloatArray("sep"), JIntW("info")), + Routine ( "sgbbrd", JString("vect"), JInt("m"), JInt("n"), JInt("ncc"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JFloatArray("d"), JFloatArray("e"), JFloatArray("q"), JInt("ldq"), JFloatArray("pt"), JInt("ldpt"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")), + Routine ( "sgbcon", JString("norm"), JInt("n"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JIntArray("ipiv"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "sgbequ", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JFloatArray("r"), JFloatArray("c"), JFloatW("rowcnd"), JFloatW("colcnd"), JFloatW("amax"), JIntW("info")), + Routine ( "sgbrfs", JString("trans"), JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("afb"), JInt("ldafb"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "sgbsv", JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "sgbsvx", JString("fact"), JString("trans"), JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("afb"), JInt("ldafb"), JIntArray("ipiv"), JStringW("equed"), JFloatArray("r"), JFloatArray("c"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "sgbtf2", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JIntArray("ipiv"), JIntW("info")), + Routine ( "sgbtrf", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JIntArray("ipiv"), JIntW("info")), + Routine ( "sgbtrs", JString("trans"), JInt("n"), JInt("kl"), JInt("ku"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "sgebak", JString("job"), JString("side"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("scale"), JInt("m"), JFloatArray("v"), JInt("ldv"), JIntW("info")), + Routine ( "sgebal", JString("job"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("ilo"), JIntW("ihi"), JFloatArray("scale"), JIntW("info")), + Routine ( "sgebd2", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("d"), JFloatArray("e"), JFloatArray("tauq"), JFloatArray("taup"), JFloatArray("work"), JIntW("info")), + Routine ( "sgebrd", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("d"), JFloatArray("e"), JFloatArray("tauq"), JFloatArray("taup"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sgecon", JString("norm"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "sgeequ", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("r"), JFloatArray("c"), JFloatW("rowcnd"), JFloatW("colcnd"), JFloatW("amax"), JIntW("info")), + Routine_NI( "sgees", JString("jobvs"), JString("sort"), JObject("select"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("sdim"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("vs"), JInt("ldvs"), JFloatArray("work"), JInt("lwork"), JBooleanArray("bwork"), JIntW("info")), + Routine_NI( "sgeesx", JString("jobvs"), JString("sort"), JObject("select"), JString("sense"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("sdim"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("vs"), JInt("ldvs"), JFloatW("rconde"), JFloatW("rcondv"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JBooleanArray("bwork"), JIntW("info")), + Routine ( "sgeev", JString("jobvl"), JString("jobvr"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sgeevx", JString("balanc"), JString("jobvl"), JString("jobvr"), JString("sense"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JIntW("ilo"), JIntW("ihi"), JFloatArray("scale"), JFloatW("abnrm"), JFloatArray("rconde"), JFloatArray("rcondv"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")), + Routine ( "sgegs", JString("jobvsl"), JString("jobvsr"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("vsl"), JInt("ldvsl"), JFloatArray("vsr"), JInt("ldvsr"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sgegv", JString("jobvl"), JString("jobvr"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sgehd2", JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")), + Routine ( "sgehrd", JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sgelq2", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")), + Routine ( "sgelqf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sgels", JString("trans"), JInt("m"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sgelsd", JInt("m"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("s"), JFloat("rcond"), JIntW("rank"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")), + Routine ( "sgelss", JInt("m"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("s"), JFloat("rcond"), JIntW("rank"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sgelsx", JInt("m"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntArray("jpvt"), JFloat("rcond"), JIntW("rank"), JFloatArray("work"), JIntW("info")), + Routine ( "sgelsy", JInt("m"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntArray("jpvt"), JFloat("rcond"), JIntW("rank"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sgeql2", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")), + Routine ( "sgeqlf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sgeqp3", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("jpvt"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sgeqpf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("jpvt"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")), + Routine ( "sgeqr2", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")), + Routine ( "sgeqrf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sgerfs", JString("trans"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("af"), JInt("ldaf"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "sgerq2", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")), + Routine ( "sgerqf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sgesc2", JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("rhs"), JIntArray("ipiv"), JIntArray("jpiv"), JFloatW("scale")), + Routine ( "sgesdd", JString("jobz"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("s"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")), + Routine ( "sgesv", JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "sgesvd", JString("jobu"), JString("jobvt"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("s"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sgesvx", JString("fact"), JString("trans"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("af"), JInt("ldaf"), JIntArray("ipiv"), JStringW("equed"), JFloatArray("r"), JFloatArray("c"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "sgetc2", JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JIntArray("jpiv"), JIntW("info")), + Routine ( "sgetf2", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JIntW("info")), + Routine ( "sgetrf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JIntW("info")), + Routine ( "sgetri", JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sgetrs", JString("trans"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "sggbak", JString("job"), JString("side"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("lscale"), JFloatArray("rscale"), JInt("m"), JFloatArray("v"), JInt("ldv"), JIntW("info")), + Routine ( "sggbal", JString("job"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("ilo"), JIntW("ihi"), JFloatArray("lscale"), JFloatArray("rscale"), JFloatArray("work"), JIntW("info")), + Routine_NI( "sgges", JString("jobvsl"), JString("jobvsr"), JString("sort"), JObject("selctg"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("sdim"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("vsl"), JInt("ldvsl"), JFloatArray("vsr"), JInt("ldvsr"), JFloatArray("work"), JInt("lwork"), JBooleanArray("bwork"), JIntW("info")), + Routine_NI( "sggesx", JString("jobvsl"), JString("jobvsr"), JString("sort"), JObject("selctg"), JString("sense"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("sdim"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("vsl"), JInt("ldvsl"), JFloatArray("vsr"), JInt("ldvsr"), JFloatArray("rconde"), JFloatArray("rcondv"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JBooleanArray("bwork"), JIntW("info")), + Routine ( "sggev", JString("jobvl"), JString("jobvr"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sggevx", JString("balanc"), JString("jobvl"), JString("jobvr"), JString("sense"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JIntW("ilo"), JIntW("ihi"), JFloatArray("lscale"), JFloatArray("rscale"), JFloatW("abnrm"), JFloatW("bbnrm"), JFloatArray("rconde"), JFloatArray("rcondv"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JBooleanArray("bwork"), JIntW("info")), + Routine ( "sggglm", JInt("n"), JInt("m"), JInt("p"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("d"), JFloatArray("x"), JFloatArray("y"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sgghrd", JString("compq"), JString("compz"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("q"), JInt("ldq"), JFloatArray("z"), JInt("ldz"), JIntW("info")), + Routine ( "sgglse", JInt("m"), JInt("n"), JInt("p"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("c"), JFloatArray("d"), JFloatArray("x"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sggqrf", JInt("n"), JInt("m"), JInt("p"), JFloatArray("a"), JInt("lda"), JFloatArray("taua"), JFloatArray("b"), JInt("ldb"), JFloatArray("taub"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sggrqf", JInt("m"), JInt("p"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("taua"), JFloatArray("b"), JInt("ldb"), JFloatArray("taub"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sggsvd", JString("jobu"), JString("jobv"), JString("jobq"), JInt("m"), JInt("n"), JInt("p"), JIntW("k"), JIntW("l"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alpha"), JFloatArray("beta"), JFloatArray("u"), JInt("ldu"), JFloatArray("v"), JInt("ldv"), JFloatArray("q"), JInt("ldq"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "sggsvp", JString("jobu"), JString("jobv"), JString("jobq"), JInt("m"), JInt("p"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloat("tola"), JFloat("tolb"), JIntW("k"), JIntW("l"), JFloatArray("u"), JInt("ldu"), JFloatArray("v"), JInt("ldv"), JFloatArray("q"), JInt("ldq"), JIntArray("iwork"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")), + Routine ( "sgtcon", JString("norm"), JInt("n"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("du2"), JIntArray("ipiv"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "sgtrfs", JString("trans"), JInt("n"), JInt("nrhs"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("dlf"), JFloatArray("df"), JFloatArray("duf"), JFloatArray("du2"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "sgtsv", JInt("n"), JInt("nrhs"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "sgtsvx", JString("fact"), JString("trans"), JInt("n"), JInt("nrhs"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("dlf"), JFloatArray("df"), JFloatArray("duf"), JFloatArray("du2"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "sgttrf", JInt("n"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("du2"), JIntArray("ipiv"), JIntW("info")), + Routine ( "sgttrs", JString("trans"), JInt("n"), JInt("nrhs"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("du2"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "sgtts2", JInt("itrans"), JInt("n"), JInt("nrhs"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("du2"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb")), + Routine ( "shgeqz", JString("job"), JString("compq"), JString("compz"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("t"), JInt("ldt"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("q"), JInt("ldq"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "shsein", JString("side"), JString("eigsrc"), JString("initv"), JBooleanArray("select"), JInt("n"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JInt("mm"), JIntW("m"), JFloatArray("work"), JIntArray("ifaill"), JIntArray("ifailr"), JIntW("info")), + Routine ( "shseqr", JString("job"), JString("compz"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + RoutineR (JBooleanR(), "sisnan", JFloat("sin")), + Routine ( "slabad", JFloatW("small"), JFloatW("large")), + Routine ( "slabrd", JInt("m"), JInt("n"), JInt("nb"), JFloatArray("a"), JInt("lda"), JFloatArray("d"), JFloatArray("e"), JFloatArray("tauq"), JFloatArray("taup"), JFloatArray("x"), JInt("ldx"), JFloatArray("y"), JInt("ldy")), + Routine ( "slacn2", JInt("n"), JFloatArray("v"), JFloatArray("x"), JIntArray("isgn"), JFloatW("est"), JIntW("kase"), JIntArray("isave")), + Routine ( "slacon", JInt("n"), JFloatArray("v"), JFloatArray("x"), JIntArray("isgn"), JFloatW("est"), JIntW("kase")), + Routine ( "slacpy", JString("uplo"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb")), + Routine ( "sladiv", JFloat("a"), JFloat("b"), JFloat("c"), JFloat("d"), JFloatW("p"), JFloatW("q")), + Routine ( "slae2", JFloat("a"), JFloat("b"), JFloat("c"), JFloatW("rt1"), JFloatW("rt2")), + Routine ( "slaebz", JInt("ijob"), JInt("nitmax"), JInt("n"), JInt("mmax"), JInt("minp"), JInt("nbmin"), JFloat("abstol"), JFloat("reltol"), JFloat("pivmin"), JFloatArray("d"), JFloatArray("e"), JFloatArray("e2"), JIntArray("nval"), JFloatArray("ab"), JFloatArray("c"), JIntW("mout"), JIntArray("nab"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "slaed0", JInt("icompq"), JInt("qsiz"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("q"), JInt("ldq"), JFloatArray("qstore"), JInt("ldqs"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "slaed1", JInt("n"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JIntArray("indxq"), JFloatW("rho"), JInt("cutpnt"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "slaed2", JIntW("k"), JInt("n"), JInt("n1"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JIntArray("indxq"), JFloatW("rho"), JFloatArray("z"), JFloatArray("dlamda"), JFloatArray("w"), JFloatArray("q2"), JIntArray("indx"), JIntArray("indxc"), JIntArray("indxp"), JIntArray("coltyp"), JIntW("info")), + Routine ( "slaed3", JInt("k"), JInt("n"), JInt("n1"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JFloat("rho"), JFloatArray("dlamda"), JFloatArray("q2"), JIntArray("indx"), JIntArray("ctot"), JFloatArray("w"), JFloatArray("s"), JIntW("info")), + Routine ( "slaed4", JInt("n"), JInt("i"), JFloatArray("d"), JFloatArray("z"), JFloatArray("delta"), JFloat("rho"), JFloatW("dlam"), JIntW("info")), + Routine ( "slaed5", JInt("i"), JFloatArray("d"), JFloatArray("z"), JFloatArray("delta"), JFloat("rho"), JFloatW("dlam")), + Routine ( "slaed6", JInt("kniter"), JBoolean("orgati"), JFloat("rho"), JFloatArray("d"), JFloatArray("z"), JFloat("finit"), JFloatW("tau"), JIntW("info")), + Routine ( "slaed7", JInt("icompq"), JInt("n"), JInt("qsiz"), JInt("tlvls"), JInt("curlvl"), JInt("curpbm"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JIntArray("indxq"), JFloatW("rho"), JInt("cutpnt"), JFloatArray("qstore"), JIntArray("qptr"), JIntArray("prmptr"), JIntArray("perm"), JIntArray("givptr"), JIntArray("givcol"), JFloatArray("givnum"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "slaed8", JInt("icompq"), JIntW("k"), JInt("n"), JInt("qsiz"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JIntArray("indxq"), JFloatW("rho"), JInt("cutpnt"), JFloatArray("z"), JFloatArray("dlamda"), JFloatArray("q2"), JInt("ldq2"), JFloatArray("w"), JIntArray("perm"), JIntW("givptr"), JIntArray("givcol"), JFloatArray("givnum"), JIntArray("indxp"), JIntArray("indx"), JIntW("info")), + Routine ( "slaed9", JInt("k"), JInt("kstart"), JInt("kstop"), JInt("n"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JFloat("rho"), JFloatArray("dlamda"), JFloatArray("w"), JFloatArray("s"), JInt("lds"), JIntW("info")), + Routine ( "slaeda", JInt("n"), JInt("tlvls"), JInt("curlvl"), JInt("curpbm"), JIntArray("prmptr"), JIntArray("perm"), JIntArray("givptr"), JIntArray("givcol"), JFloatArray("givnum"), JFloatArray("q"), JIntArray("qptr"), JFloatArray("z"), JFloatArray("ztemp"), JIntW("info")), + Routine ( "slaein", JBoolean("rightv"), JBoolean("noinit"), JInt("n"), JFloatArray("h"), JInt("ldh"), JFloat("wr"), JFloat("wi"), JFloatArray("vr"), JFloatArray("vi"), JFloatArray("b"), JInt("ldb"), JFloatArray("work"), JFloat("eps3"), JFloat("smlnum"), JFloat("bignum"), JIntW("info")), + Routine ( "slaev2", JFloat("a"), JFloat("b"), JFloat("c"), JFloatW("rt1"), JFloatW("rt2"), JFloatW("cs1"), JFloatW("sn1")), + Routine ( "slaexc", JBoolean("wantq"), JInt("n"), JFloatArray("t"), JInt("ldt"), JFloatArray("q"), JInt("ldq"), JInt("j1"), JInt("n1"), JInt("n2"), JFloatArray("work"), JIntW("info")), + Routine ( "slag2", JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloat("safmin"), JFloatW("scale1"), JFloatW("scale2"), JFloatW("wr1"), JFloatW("wr2"), JFloatW("wi")), + Routine ( "slag2d", JInt("m"), JInt("n"), JFloatArray("sa"), JInt("ldsa"), JDoubleArray("a"), JInt("lda"), JIntW("info")), + Routine ( "slags2", JBoolean("upper"), JFloat("a1"), JFloat("a2"), JFloat("a3"), JFloat("b1"), JFloat("b2"), JFloat("b3"), JFloatW("csu"), JFloatW("snu"), JFloatW("csv"), JFloatW("snv"), JFloatW("csq"), JFloatW("snq")), + Routine ( "slagtf", JInt("n"), JFloatArray("a"), JFloat("lambda"), JFloatArray("b"), JFloatArray("c"), JFloat("tol"), JFloatArray("d"), JIntArray("in"), JIntW("info")), + Routine ( "slagtm", JString("trans"), JInt("n"), JInt("nrhs"), JFloat("alpha"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du"), JFloatArray("x"), JInt("ldx"), JFloat("beta"), JFloatArray("b"), JInt("ldb")), + Routine ( "slagts", JInt("job"), JInt("n"), JFloatArray("a"), JFloatArray("b"), JFloatArray("c"), JFloatArray("d"), JIntArray("in"), JFloatArray("y"), JFloatW("tol"), JIntW("info")), + Routine ( "slagv2", JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatW("csl"), JFloatW("snl"), JFloatW("csr"), JFloatW("snr")), + Routine ( "slahqr", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JInt("iloz"), JInt("ihiz"), JFloatArray("z"), JInt("ldz"), JIntW("info")), + Routine ( "slahr2", JInt("n"), JInt("k"), JInt("nb"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("t"), JInt("ldt"), JFloatArray("y"), JInt("ldy")), + Routine ( "slahrd", JInt("n"), JInt("k"), JInt("nb"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("t"), JInt("ldt"), JFloatArray("y"), JInt("ldy")), + Routine ( "slaic1", JInt("job"), JInt("j"), JFloatArray("x"), JFloat("sest"), JFloatArray("w"), JFloat("gamma"), JFloatW("sestpr"), JFloatW("s"), JFloatW("c")), + RoutineR (JBooleanR(), "slaisnan", JFloat("sin1"), JFloat("sin2")), + Routine ( "slaln2", JBoolean("ltrans"), JInt("na"), JInt("nw"), JFloat("smin"), JFloat("ca"), JFloatArray("a"), JInt("lda"), JFloat("d1"), JFloat("d2"), JFloatArray("b"), JInt("ldb"), JFloat("wr"), JFloat("wi"), JFloatArray("x"), JInt("ldx"), JFloatW("scale"), JFloatW("xnorm"), JIntW("info")), + Routine ( "slals0", JInt("icompq"), JInt("nl"), JInt("nr"), JInt("sqre"), JInt("nrhs"), JFloatArray("b"), JInt("ldb"), JFloatArray("bx"), JInt("ldbx"), JIntArray("perm"), JInt("givptr"), JIntArray("givcol"), JInt("ldgcol"), JFloatArray("givnum"), JInt("ldgnum"), JFloatArray("poles"), JFloatArray("difl"), JFloatArray("difr"), JFloatArray("z"), JInt("k"), JFloat("c"), JFloat("s"), JFloatArray("work"), JIntW("info")), + Routine ( "slalsa", JInt("icompq"), JInt("smlsiz"), JInt("n"), JInt("nrhs"), JFloatArray("b"), JInt("ldb"), JFloatArray("bx"), JInt("ldbx"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JIntArray("k"), JFloatArray("difl"), JFloatArray("difr"), JFloatArray("z"), JFloatArray("poles"), JIntArray("givptr"), JIntArray("givcol"), JInt("ldgcol"), JIntArray("perm"), JFloatArray("givnum"), JFloatArray("c"), JFloatArray("s"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "slalsd", JString("uplo"), JInt("smlsiz"), JInt("n"), JInt("nrhs"), JFloatArray("d"), JFloatArray("e"), JFloatArray("b"), JInt("ldb"), JFloat("rcond"), JIntW("rank"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "slamrg", JInt("n1"), JInt("n2"), JFloatArray("a"), JInt("strd1"), JInt("strd2"), JIntArray("index")), + RoutineR (JIntR(), "slaneg", JInt("n"), JFloatArray("d"), JFloatArray("lld"), JFloat("sigma"), JFloat("pivmin"), JInt("r")), + RoutineR (JFloatR(), "slangb", JString("norm"), JInt("n"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JFloatArray("work")), + RoutineR (JFloatR(), "slange", JString("norm"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("work")), + RoutineR (JFloatR(), "slangt", JString("norm"), JInt("n"), JFloatArray("dl"), JFloatArray("d"), JFloatArray("du")), + RoutineR (JFloatR(), "slanhs", JString("norm"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("work")), + RoutineR (JFloatR(), "slansb", JString("norm"), JString("uplo"), JInt("n"), JInt("k"), JFloatArray("ab"), JInt("ldab"), JFloatArray("work")), + RoutineR (JFloatR(), "slansp", JString("norm"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("work")), + RoutineR (JFloatR(), "slanst", JString("norm"), JInt("n"), JFloatArray("d"), JFloatArray("e")), + RoutineR (JFloatR(), "slansy", JString("norm"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("work")), + RoutineR (JFloatR(), "slantb", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JInt("k"), JFloatArray("ab"), JInt("ldab"), JFloatArray("work")), + RoutineR (JFloatR(), "slantp", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JFloatArray("ap"), JFloatArray("work")), + RoutineR (JFloatR(), "slantr", JString("norm"), JString("uplo"), JString("diag"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("work")), + Routine ( "slanv2", JFloatW("a"), JFloatW("b"), JFloatW("c"), JFloatW("d"), JFloatW("rt1r"), JFloatW("rt1i"), JFloatW("rt2r"), JFloatW("rt2i"), JFloatW("cs"), JFloatW("sn")), + Routine ( "slapll", JInt("n"), JFloatArray("x"), JInt("incx"), JFloatArray("y"), JInt("incy"), JFloatW("ssmin")), + Routine ( "slapmt", JBoolean("forwrd"), JInt("m"), JInt("n"), JFloatArray("x"), JInt("ldx"), JIntArray("k")), + RoutineR (JFloatR(), "slapy2", JFloat("x"), JFloat("y")), + RoutineR (JFloatR(), "slapy3", JFloat("x"), JFloat("y"), JFloat("z")), + Routine ( "slaqgb", JInt("m"), JInt("n"), JInt("kl"), JInt("ku"), JFloatArray("ab"), JInt("ldab"), JFloatArray("r"), JFloatArray("c"), JFloat("rowcnd"), JFloat("colcnd"), JFloat("amax"), JStringW("equed")), + Routine ( "slaqge", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("r"), JFloatArray("c"), JFloat("rowcnd"), JFloat("colcnd"), JFloat("amax"), JStringW("equed")), + Routine ( "slaqp2", JInt("m"), JInt("n"), JInt("offset"), JFloatArray("a"), JInt("lda"), JIntArray("jpvt"), JFloatArray("tau"), JFloatArray("vn1"), JFloatArray("vn2"), JFloatArray("work")), + Routine ( "slaqps", JInt("m"), JInt("n"), JInt("offset"), JInt("nb"), JIntW("kb"), JFloatArray("a"), JInt("lda"), JIntArray("jpvt"), JFloatArray("tau"), JFloatArray("vn1"), JFloatArray("vn2"), JFloatArray("auxv"), JFloatArray("f"), JInt("ldf")), + Routine ( "slaqr0", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JInt("iloz"), JInt("ihiz"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "slaqr1", JInt("n"), JFloatArray("h"), JInt("ldh"), JFloat("sr1"), JFloat("si1"), JFloat("sr2"), JFloat("si2"), JFloatArray("v")), + Routine ( "slaqr2", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ktop"), JInt("kbot"), JInt("nw"), JFloatArray("h"), JInt("ldh"), JInt("iloz"), JInt("ihiz"), JFloatArray("z"), JInt("ldz"), JIntW("ns"), JIntW("nd"), JFloatArray("sr"), JFloatArray("si"), JFloatArray("v"), JInt("ldv"), JInt("nh"), JFloatArray("t"), JInt("ldt"), JInt("nv"), JFloatArray("wv"), JInt("ldwv"), JFloatArray("work"), JInt("lwork")), + Routine ( "slaqr3", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ktop"), JInt("kbot"), JInt("nw"), JFloatArray("h"), JInt("ldh"), JInt("iloz"), JInt("ihiz"), JFloatArray("z"), JInt("ldz"), JIntW("ns"), JIntW("nd"), JFloatArray("sr"), JFloatArray("si"), JFloatArray("v"), JInt("ldv"), JInt("nh"), JFloatArray("t"), JInt("ldt"), JInt("nv"), JFloatArray("wv"), JInt("ldwv"), JFloatArray("work"), JInt("lwork")), + Routine ( "slaqr4", JBoolean("wantt"), JBoolean("wantz"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JInt("iloz"), JInt("ihiz"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "slaqr5", JBoolean("wantt"), JBoolean("wantz"), JInt("kacc22"), JInt("n"), JInt("ktop"), JInt("kbot"), JInt("nshfts"), JFloatArray("sr"), JFloatArray("si"), JFloatArray("h"), JInt("ldh"), JInt("iloz"), JInt("ihiz"), JFloatArray("z"), JInt("ldz"), JFloatArray("v"), JInt("ldv"), JFloatArray("u"), JInt("ldu"), JInt("nv"), JFloatArray("wv"), JInt("ldwv"), JInt("nh"), JFloatArray("wh"), JInt("ldwh")), + Routine ( "slaqsb", JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("s"), JFloat("scond"), JFloat("amax"), JStringW("equed")), + Routine ( "slaqsp", JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("s"), JFloat("scond"), JFloat("amax"), JStringW("equed")), + Routine ( "slaqsy", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("s"), JFloat("scond"), JFloat("amax"), JStringW("equed")), + Routine ( "slaqtr", JBoolean("ltran"), JBoolean("lreal"), JInt("n"), JFloatArray("t"), JInt("ldt"), JFloatArray("b"), JFloat("w"), JFloatW("scale"), JFloatArray("x"), JFloatArray("work"), JIntW("info")), + Routine ( "slar1v", JInt("n"), JInt("b1"), JInt("bn"), JFloat("lambda"), JFloatArray("d"), JFloatArray("l"), JFloatArray("ld"), JFloatArray("lld"), JFloat("pivmin"), JFloat("gaptol"), JFloatArray("z"), JBoolean("wantnc"), JIntW("negcnt"), JFloatW("ztz"), JFloatW("mingma"), JIntW("r"), JIntArray("isuppz"), JFloatW("nrminv"), JFloatW("resid"), JFloatW("rqcorr"), JFloatArray("work")), + Routine ( "slar2v", JInt("n"), JFloatArray("x"), JFloatArray("y"), JFloatArray("z"), JInt("incx"), JFloatArray("c"), JFloatArray("s"), JInt("incc")), + Routine ( "slarf", JString("side"), JInt("m"), JInt("n"), JFloatArray("v"), JInt("incv"), JFloat("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work")), + Routine ( "slarfb", JString("side"), JString("trans"), JString("direct"), JString("storev"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("v"), JInt("ldv"), JFloatArray("t"), JInt("ldt"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("ldwork")), + Routine ( "slarfg", JInt("n"), JFloatW("alpha"), JFloatArray("x"), JInt("incx"), JFloatW("tau")), + Routine ( "slarft", JString("direct"), JString("storev"), JInt("n"), JInt("k"), JFloatArray("v"), JInt("ldv"), JFloatArray("tau"), JFloatArray("t"), JInt("ldt")), + Routine ( "slarfx", JString("side"), JInt("m"), JInt("n"), JFloatArray("v"), JFloat("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work")), + Routine ( "slargv", JInt("n"), JFloatArray("x"), JInt("incx"), JFloatArray("y"), JInt("incy"), JFloatArray("c"), JInt("incc")), + Routine ( "slarnv", JInt("idist"), JIntArray("iseed"), JInt("n"), JFloatArray("x")), + Routine ( "slarra", JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("e2"), JFloat("spltol"), JFloat("tnrm"), JIntW("nsplit"), JIntArray("isplit"), JIntW("info")), + Routine ( "slarrb", JInt("n"), JFloatArray("d"), JFloatArray("lld"), JInt("ifirst"), JInt("ilast"), JFloat("rtol1"), JFloat("rtol2"), JInt("offset"), JFloatArray("w"), JFloatArray("wgap"), JFloatArray("werr"), JFloatArray("work"), JIntArray("iwork"), JFloat("pivmin"), JFloat("spdiam"), JInt("twist"), JIntW("info")), + Routine ( "slarrc", JString("jobt"), JInt("n"), JFloat("vl"), JFloat("vu"), JFloatArray("d"), JFloatArray("e"), JFloat("pivmin"), JIntW("eigcnt"), JIntW("lcnt"), JIntW("rcnt"), JIntW("info")), + Routine ( "slarrd", JString("range"), JString("order"), JInt("n"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloatArray("gers"), JFloat("reltol"), JFloatArray("d"), JFloatArray("e"), JFloatArray("e2"), JFloat("pivmin"), JInt("nsplit"), JIntArray("isplit"), JIntW("m"), JFloatArray("w"), JFloatArray("werr"), JFloatW("wl"), JFloatW("wu"), JIntArray("iblock"), JIntArray("indexw"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "slarre", JString("range"), JInt("n"), JFloatW("vl"), JFloatW("vu"), JInt("il"), JInt("iu"), JFloatArray("d"), JFloatArray("e"), JFloatArray("e2"), JFloat("rtol1"), JFloat("rtol2"), JFloat("spltol"), JIntW("nsplit"), JIntArray("isplit"), JIntW("m"), JFloatArray("w"), JFloatArray("werr"), JFloatArray("wgap"), JIntArray("iblock"), JIntArray("indexw"), JFloatArray("gers"), JFloatW("pivmin"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "slarrf", JInt("n"), JFloatArray("d"), JFloatArray("l"), JFloatArray("ld"), JInt("clstrt"), JInt("clend"), JFloatArray("w"), JFloatArray("wgap"), JFloatArray("werr"), JFloat("spdiam"), JFloat("clgapl"), JFloat("clgapr"), JFloat("pivmin"), JFloatW("sigma"), JFloatArray("dplus"), JFloatArray("lplus"), JFloatArray("work"), JIntW("info")), + Routine ( "slarrj", JInt("n"), JFloatArray("d"), JFloatArray("e2"), JInt("ifirst"), JInt("ilast"), JFloat("rtol"), JInt("offset"), JFloatArray("w"), JFloatArray("werr"), JFloatArray("work"), JIntArray("iwork"), JFloat("pivmin"), JFloat("spdiam"), JIntW("info")), + Routine ( "slarrk", JInt("n"), JInt("iw"), JFloat("gl"), JFloat("gu"), JFloatArray("d"), JFloatArray("e2"), JFloat("pivmin"), JFloat("reltol"), JFloatW("w"), JFloatW("werr"), JIntW("info")), + Routine ( "slarrr", JInt("n"), JFloatArray("d"), JFloatArray("e"), JIntW("info")), + Routine ( "slarrv", JInt("n"), JFloat("vl"), JFloat("vu"), JFloatArray("d"), JFloatArray("l"), JFloat("pivmin"), JIntArray("isplit"), JInt("m"), JInt("dol"), JInt("dou"), JFloat("minrgp"), JFloatW("rtol1"), JFloatW("rtol2"), JFloatArray("w"), JFloatArray("werr"), JFloatArray("wgap"), JIntArray("iblock"), JIntArray("indexw"), JFloatArray("gers"), JFloatArray("z"), JInt("ldz"), JIntArray("isuppz"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "slartg", JFloat("f"), JFloat("g"), JFloatW("cs"), JFloatW("sn"), JFloatW("r")), + Routine ( "slartv", JInt("n"), JFloatArray("x"), JInt("incx"), JFloatArray("y"), JInt("incy"), JFloatArray("c"), JFloatArray("s"), JInt("incc")), + Routine ( "slaruv", JIntArray("iseed"), JInt("n"), JFloatArray("x")), + Routine ( "slarz", JString("side"), JInt("m"), JInt("n"), JInt("l"), JFloatArray("v"), JInt("incv"), JFloat("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work")), + Routine ( "slarzb", JString("side"), JString("trans"), JString("direct"), JString("storev"), JInt("m"), JInt("n"), JInt("k"), JInt("l"), JFloatArray("v"), JInt("ldv"), JFloatArray("t"), JInt("ldt"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("ldwork")), + Routine ( "slarzt", JString("direct"), JString("storev"), JInt("n"), JInt("k"), JFloatArray("v"), JInt("ldv"), JFloatArray("tau"), JFloatArray("t"), JInt("ldt")), + Routine ( "slas2", JFloat("f"), JFloat("g"), JFloat("h"), JFloatW("ssmin"), JFloatW("ssmax")), + Routine ( "slascl", JString("type"), JInt("kl"), JInt("ku"), JFloat("cfrom"), JFloat("cto"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")), + Routine ( "slasd0", JInt("n"), JInt("sqre"), JFloatArray("d"), JFloatArray("e"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JInt("ldvt"), JInt("smlsiz"), JIntArray("iwork"), JFloatArray("work"), JIntW("info")), + Routine ( "slasd1", JInt("nl"), JInt("nr"), JInt("sqre"), JFloatArray("d"), JFloatW("alpha"), JFloatW("beta"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JInt("ldvt"), JIntArray("idxq"), JIntArray("iwork"), JFloatArray("work"), JIntW("info")), + Routine ( "slasd2", JInt("nl"), JInt("nr"), JInt("sqre"), JIntW("k"), JFloatArray("d"), JFloatArray("z"), JFloat("alpha"), JFloat("beta"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("dsigma"), JFloatArray("u2"), JInt("ldu2"), JFloatArray("vt2"), JInt("ldvt2"), JIntArray("idxp"), JIntArray("idx"), JIntArray("idxc"), JIntArray("idxq"), JIntArray("coltyp"), JIntW("info")), + Routine ( "slasd3", JInt("nl"), JInt("nr"), JInt("sqre"), JInt("k"), JFloatArray("d"), JFloatArray("q"), JInt("ldq"), JFloatArray("dsigma"), JFloatArray("u"), JInt("ldu"), JFloatArray("u2"), JInt("ldu2"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("vt2"), JInt("ldvt2"), JIntArray("idxc"), JIntArray("ctot"), JFloatArray("z"), JIntW("info")), + Routine ( "slasd4", JInt("n"), JInt("i"), JFloatArray("d"), JFloatArray("z"), JFloatArray("delta"), JFloat("rho"), JFloatW("sigma"), JFloatArray("work"), JIntW("info")), + Routine ( "slasd5", JInt("i"), JFloatArray("d"), JFloatArray("z"), JFloatArray("delta"), JFloat("rho"), JFloatW("dsigma"), JFloatArray("work")), + Routine ( "slasd6", JInt("icompq"), JInt("nl"), JInt("nr"), JInt("sqre"), JFloatArray("d"), JFloatArray("vf"), JFloatArray("vl"), JFloatW("alpha"), JFloatW("beta"), JIntArray("idxq"), JIntArray("perm"), JIntW("givptr"), JIntArray("givcol"), JInt("ldgcol"), JFloatArray("givnum"), JInt("ldgnum"), JFloatArray("poles"), JFloatArray("difl"), JFloatArray("difr"), JFloatArray("z"), JIntW("k"), JFloatW("c"), JFloatW("s"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "slasd7", JInt("icompq"), JInt("nl"), JInt("nr"), JInt("sqre"), JIntW("k"), JFloatArray("d"), JFloatArray("z"), JFloatArray("zw"), JFloatArray("vf"), JFloatArray("vfw"), JFloatArray("vl"), JFloatArray("vlw"), JFloat("alpha"), JFloat("beta"), JFloatArray("dsigma"), JIntArray("idx"), JIntArray("idxp"), JIntArray("idxq"), JIntArray("perm"), JIntW("givptr"), JIntArray("givcol"), JInt("ldgcol"), JFloatArray("givnum"), JInt("ldgnum"), JFloatW("c"), JFloatW("s"), JIntW("info")), + Routine ( "slasd8", JInt("icompq"), JInt("k"), JFloatArray("d"), JFloatArray("z"), JFloatArray("vf"), JFloatArray("vl"), JFloatArray("difl"), JFloatArray("difr"), JInt("lddifr"), JFloatArray("dsigma"), JFloatArray("work"), JIntW("info")), + Routine ( "slasda", JInt("icompq"), JInt("smlsiz"), JInt("n"), JInt("sqre"), JFloatArray("d"), JFloatArray("e"), JFloatArray("u"), JInt("ldu"), JFloatArray("vt"), JIntArray("k"), JFloatArray("difl"), JFloatArray("difr"), JFloatArray("z"), JFloatArray("poles"), JIntArray("givptr"), JIntArray("givcol"), JInt("ldgcol"), JIntArray("perm"), JFloatArray("givnum"), JFloatArray("c"), JFloatArray("s"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "slasdq", JString("uplo"), JInt("sqre"), JInt("n"), JInt("ncvt"), JInt("nru"), JInt("ncc"), JFloatArray("d"), JFloatArray("e"), JFloatArray("vt"), JInt("ldvt"), JFloatArray("u"), JInt("ldu"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")), + Routine ( "slasdt", JInt("n"), JIntW("lvl"), JIntW("nd"), JIntArray("inode"), JIntArray("ndiml"), JIntArray("ndimr"), JInt("msub")), + Routine ( "slaset", JString("uplo"), JInt("m"), JInt("n"), JFloat("alpha"), JFloat("beta"), JFloatArray("a"), JInt("lda")), + Routine ( "slasq1", JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("work"), JIntW("info")), + Routine ( "slasq2", JInt("n"), JFloatArray("z"), JIntW("info")), + Routine ( "slasq3", JInt("i0"), JIntW("n0"), JFloatArray("z"), JInt("pp"), JFloatW("dmin"), JFloatW("sigma"), JFloatW("desig"), JFloatW("qmax"), JIntW("nfail"), JIntW("iter"), JIntW("ndiv"), JBoolean("ieee")), + Routine ( "slasq4", JInt("i0"), JInt("n0"), JFloatArray("z"), JInt("pp"), JInt("n0in"), JFloat("dmin"), JFloat("dmin1"), JFloat("dmin2"), JFloat("dn"), JFloat("dn1"), JFloat("dn2"), JFloatW("tau"), JIntW("ttype")), + Routine ( "slasq5", JInt("i0"), JInt("n0"), JFloatArray("z"), JInt("pp"), JFloat("tau"), JFloatW("dmin"), JFloatW("dmin1"), JFloatW("dmin2"), JFloatW("dn"), JFloatW("dnm1"), JFloatW("dnm2"), JBoolean("ieee")), + Routine ( "slasq6", JInt("i0"), JInt("n0"), JFloatArray("z"), JInt("pp"), JFloatW("dmin"), JFloatW("dmin1"), JFloatW("dmin2"), JFloatW("dn"), JFloatW("dnm1"), JFloatW("dnm2")), + Routine ( "slasr", JString("side"), JString("pivot"), JString("direct"), JInt("m"), JInt("n"), JFloatArray("c"), JFloatArray("s"), JFloatArray("a"), JInt("lda")), + Routine ( "slasrt", JString("id"), JInt("n"), JFloatArray("d"), JIntW("info")), + Routine ( "slassq", JInt("n"), JFloatArray("x"), JInt("incx"), JFloatW("scale"), JFloatW("sumsq")), + Routine ( "slasv2", JFloat("f"), JFloat("g"), JFloat("h"), JFloatW("ssmin"), JFloatW("ssmax"), JFloatW("snr"), JFloatW("csr"), JFloatW("snl"), JFloatW("csl")), + Routine ( "slaswp", JInt("n"), JFloatArray("a"), JInt("lda"), JInt("k1"), JInt("k2"), JIntArray("ipiv"), JInt("incx")), + Routine ( "slasy2", JBoolean("ltranl"), JBoolean("ltranr"), JInt("isgn"), JInt("n1"), JInt("n2"), JFloatArray("tl"), JInt("ldtl"), JFloatArray("tr"), JInt("ldtr"), JFloatArray("b"), JInt("ldb"), JFloatW("scale"), JFloatArray("x"), JInt("ldx"), JFloatW("xnorm"), JIntW("info")), + Routine ( "slasyf", JString("uplo"), JInt("n"), JInt("nb"), JIntW("kb"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("w"), JInt("ldw"), JIntW("info")), + Routine ( "slatbs", JString("uplo"), JString("trans"), JString("diag"), JString("normin"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("x"), JFloatW("scale"), JFloatArray("cnorm"), JIntW("info")), + Routine ( "slatdf", JInt("ijob"), JInt("n"), JFloatArray("z"), JInt("ldz"), JFloatArray("rhs"), JFloatW("rdsum"), JFloatW("rdscal"), JIntArray("ipiv"), JIntArray("jpiv")), + Routine ( "slatps", JString("uplo"), JString("trans"), JString("diag"), JString("normin"), JInt("n"), JFloatArray("ap"), JFloatArray("x"), JFloatW("scale"), JFloatArray("cnorm"), JIntW("info")), + Routine ( "slatrd", JString("uplo"), JInt("n"), JInt("nb"), JFloatArray("a"), JInt("lda"), JFloatArray("e"), JFloatArray("tau"), JFloatArray("w"), JInt("ldw")), + Routine ( "slatrs", JString("uplo"), JString("trans"), JString("diag"), JString("normin"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("x"), JFloatW("scale"), JFloatArray("cnorm"), JIntW("info")), + Routine ( "slatrz", JInt("m"), JInt("n"), JInt("l"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work")), + Routine ( "slatzm", JString("side"), JInt("m"), JInt("n"), JFloatArray("v"), JInt("incv"), JFloat("tau"), JFloatArray("c1"), JFloatArray("c2"), JInt("Ldc"), JFloatArray("work")), + Routine ( "slauu2", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")), + Routine ( "slauum", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")), + Routine_NI( "slazq3", JInt("i0"), JIntW("n0"), JFloatArray("z"), JInt("pp"), JFloatW("dmin"), JFloatW("sigma"), JFloatW("desig"), JFloatW("qmax"), JIntW("nfail"), JIntW("iter"), JIntW("ndiv"), JBoolean("ieee"), JIntW("ttype"), JFloatW("dmin1"), JFloatW("dmin2"), JFloatW("dn"), JFloatW("dn1"), JFloatW("dn2"), JFloatW("tau")), + Routine_NI( "slazq4", JInt("i0"), JInt("n0"), JFloatArray("z"), JInt("pp"), JInt("n0in"), JFloat("dmin"), JFloat("dmin1"), JFloat("dmin2"), JFloat("dn"), JFloat("dn1"), JFloat("dn2"), JFloatW("tau"), JIntW("ttype"), JFloatW("g")), + Routine ( "sopgtr", JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("tau"), JFloatArray("q"), JInt("ldq"), JFloatArray("work"), JIntW("info")), + Routine ( "sopmtr", JString("side"), JString("uplo"), JString("trans"), JInt("m"), JInt("n"), JFloatArray("ap"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")), + Routine ( "sorg2l", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")), + Routine ( "sorg2r", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")), + Routine ( "sorgbr", JString("vect"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sorghr", JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sorgl2", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")), + Routine ( "sorglq", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sorgql", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sorgqr", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sorgr2", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JIntW("info")), + Routine ( "sorgrq", JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sorgtr", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sorm2l", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")), + Routine ( "sorm2r", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")), + Routine ( "sormbr", JString("vect"), JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sormhr", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sorml2", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")), + Routine ( "sormlq", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sormql", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sormqr", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sormr2", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")), + Routine ( "sormr3", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JInt("l"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JIntW("info")), + Routine ( "sormrq", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sormrz", JString("side"), JString("trans"), JInt("m"), JInt("n"), JInt("k"), JInt("l"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "sormtr", JString("side"), JString("uplo"), JString("trans"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("c"), JInt("Ldc"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "spbcon", JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "spbequ", JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("s"), JFloatW("scond"), JFloatW("amax"), JIntW("info")), + Routine ( "spbrfs", JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("afb"), JInt("ldafb"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "spbstf", JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JIntW("info")), + Routine ( "spbsv", JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "spbsvx", JString("fact"), JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("afb"), JInt("ldafb"), JStringW("equed"), JFloatArray("s"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "spbtf2", JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JIntW("info")), + Routine ( "spbtrf", JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JIntW("info")), + Routine ( "spbtrs", JString("uplo"), JInt("n"), JInt("kd"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "spocon", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "spoequ", JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("s"), JFloatW("scond"), JFloatW("amax"), JIntW("info")), + Routine ( "sporfs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("af"), JInt("ldaf"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "sposv", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "sposvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("af"), JInt("ldaf"), JStringW("equed"), JFloatArray("s"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "spotf2", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")), + Routine ( "spotrf", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")), + Routine ( "spotri", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")), + Routine ( "spotrs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "sppcon", JString("uplo"), JInt("n"), JFloatArray("ap"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "sppequ", JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("s"), JFloatW("scond"), JFloatW("amax"), JIntW("info")), + Routine ( "spprfs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("afp"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "sppsv", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "sppsvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("afp"), JStringW("equed"), JFloatArray("s"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "spptrf", JString("uplo"), JInt("n"), JFloatArray("ap"), JIntW("info")), + Routine ( "spptri", JString("uplo"), JInt("n"), JFloatArray("ap"), JIntW("info")), + Routine ( "spptrs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "sptcon", JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntW("info")), + Routine ( "spteqr", JString("compz"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")), + Routine ( "sptrfs", JInt("n"), JInt("nrhs"), JFloatArray("d"), JFloatArray("e"), JFloatArray("df"), JFloatArray("ef"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntW("info")), + Routine ( "sptsv", JInt("n"), JInt("nrhs"), JFloatArray("d"), JFloatArray("e"), JFloatArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "sptsvx", JString("fact"), JInt("n"), JInt("nrhs"), JFloatArray("d"), JFloatArray("e"), JFloatArray("df"), JFloatArray("ef"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntW("info")), + Routine ( "spttrf", JInt("n"), JFloatArray("d"), JFloatArray("e"), JIntW("info")), + Routine ( "spttrs", JInt("n"), JInt("nrhs"), JFloatArray("d"), JFloatArray("e"), JFloatArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "sptts2", JInt("n"), JInt("nrhs"), JFloatArray("d"), JFloatArray("e"), JFloatArray("b"), JInt("ldb")), + Routine ( "srscl", JInt("n"), JFloat("sa"), JFloatArray("sx"), JInt("incx")), + Routine ( "ssbev", JString("jobz"), JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")), + Routine ( "ssbevd", JString("jobz"), JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")), + Routine ( "ssbevx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("q"), JInt("ldq"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")), + Routine ( "ssbgst", JString("vect"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JFloatArray("ab"), JInt("ldab"), JFloatArray("bb"), JInt("ldbb"), JFloatArray("x"), JInt("ldx"), JFloatArray("work"), JIntW("info")), + Routine ( "ssbgv", JString("jobz"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JFloatArray("ab"), JInt("ldab"), JFloatArray("bb"), JInt("ldbb"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")), + Routine ( "ssbgvd", JString("jobz"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JFloatArray("ab"), JInt("ldab"), JFloatArray("bb"), JInt("ldbb"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")), + Routine ( "ssbgvx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JInt("ka"), JInt("kb"), JFloatArray("ab"), JInt("ldab"), JFloatArray("bb"), JInt("ldbb"), JFloatArray("q"), JInt("ldq"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")), + Routine ( "ssbtrd", JString("vect"), JString("uplo"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatArray("d"), JFloatArray("e"), JFloatArray("q"), JInt("ldq"), JFloatArray("work"), JIntW("info")), + Routine ( "sspcon", JString("uplo"), JInt("n"), JFloatArray("ap"), JIntArray("ipiv"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "sspev", JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")), + Routine ( "sspevd", JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")), + Routine ( "sspevx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")), + Routine ( "sspgst", JInt("itype"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("bp"), JIntW("info")), + Routine ( "sspgv", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("bp"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")), + Routine ( "sspgvd", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("bp"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")), + Routine ( "sspgvx", JInt("itype"), JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("bp"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")), + Routine ( "ssprfs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("afp"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "sspsv", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "sspsvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("afp"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "ssptrd", JString("uplo"), JInt("n"), JFloatArray("ap"), JFloatArray("d"), JFloatArray("e"), JFloatArray("tau"), JIntW("info")), + Routine ( "ssptrf", JString("uplo"), JInt("n"), JFloatArray("ap"), JIntArray("ipiv"), JIntW("info")), + Routine ( "ssptri", JString("uplo"), JInt("n"), JFloatArray("ap"), JIntArray("ipiv"), JFloatArray("work"), JIntW("info")), + Routine ( "ssptrs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "sstebz", JString("range"), JString("order"), JInt("n"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JFloatArray("d"), JFloatArray("e"), JIntW("m"), JIntW("nsplit"), JFloatArray("w"), JIntArray("iblock"), JIntArray("isplit"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "sstedc", JString("compz"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")), + Routine ( "sstegr", JString("jobz"), JString("range"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JIntArray("isuppz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")), + Routine ( "sstein", JInt("n"), JFloatArray("d"), JFloatArray("e"), JInt("m"), JFloatArray("w"), JIntArray("iblock"), JIntArray("isplit"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")), + Routine ( "sstemr", JString("jobz"), JString("range"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JInt("nzc"), JIntArray("isuppz"), JBooleanW("tryrac"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")), + Routine ( "ssteqr", JString("compz"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")), + Routine ( "ssterf", JInt("n"), JFloatArray("d"), JFloatArray("e"), JIntW("info")), + Routine ( "sstev", JString("jobz"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntW("info")), + Routine ( "sstevd", JString("jobz"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")), + Routine ( "sstevr", JString("jobz"), JString("range"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JIntArray("isuppz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")), + Routine ( "sstevx", JString("jobz"), JString("range"), JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")), + Routine ( "ssycon", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloat("anorm"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "ssyev", JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("w"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "ssyevd", JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("w"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")), + Routine ( "ssyevr", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JIntArray("isuppz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")), + Routine ( "ssyevx", JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")), + Routine ( "ssygs2", JInt("itype"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "ssygst", JInt("itype"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "ssygv", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("w"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "ssygvd", JInt("itype"), JString("jobz"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("w"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")), + Routine ( "ssygvx", JInt("itype"), JString("jobz"), JString("range"), JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloat("vl"), JFloat("vu"), JInt("il"), JInt("iu"), JFloat("abstol"), JIntW("m"), JFloatArray("w"), JFloatArray("z"), JInt("ldz"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntArray("ifail"), JIntW("info")), + Routine ( "ssyrfs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("af"), JInt("ldaf"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "ssysv", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "ssysvx", JString("fact"), JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("af"), JInt("ldaf"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatW("rcond"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")), + Routine ( "ssytd2", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("d"), JFloatArray("e"), JFloatArray("tau"), JIntW("info")), + Routine ( "ssytf2", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JIntW("info")), + Routine ( "ssytrd", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("d"), JFloatArray("e"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "ssytrf", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "ssytri", JString("uplo"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("work"), JIntW("info")), + Routine ( "ssytrs", JString("uplo"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JIntArray("ipiv"), JFloatArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "stbcon", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JInt("kd"), JFloatArray("ab"), JInt("ldab"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "stbrfs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("kd"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "stbtrs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("kd"), JInt("nrhs"), JFloatArray("ab"), JInt("ldab"), JFloatArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "stgevc", JString("side"), JString("howmny"), JBooleanArray("select"), JInt("n"), JFloatArray("s"), JInt("lds"), JFloatArray("p"), JInt("ldp"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JInt("mm"), JIntW("m"), JFloatArray("work"), JIntW("info")), + Routine ( "stgex2", JBoolean("wantq"), JBoolean("wantz"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("q"), JInt("ldq"), JFloatArray("z"), JInt("ldz"), JInt("j1"), JInt("n1"), JInt("n2"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "stgexc", JBoolean("wantq"), JBoolean("wantz"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("q"), JInt("ldq"), JFloatArray("z"), JInt("ldz"), JIntW("ifst"), JIntW("ilst"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + Routine ( "stgsen", JInt("ijob"), JBoolean("wantq"), JBoolean("wantz"), JBooleanArray("select"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("alphar"), JFloatArray("alphai"), JFloatArray("beta"), JFloatArray("q"), JInt("ldq"), JFloatArray("z"), JInt("ldz"), JIntW("m"), JFloatW("pl"), JFloatW("pr"), JFloatArray("dif"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")), + Routine ( "stgsja", JString("jobu"), JString("jobv"), JString("jobq"), JInt("m"), JInt("p"), JInt("n"), JInt("k"), JInt("l"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloat("tola"), JFloat("tolb"), JFloatArray("alpha"), JFloatArray("beta"), JFloatArray("u"), JInt("ldu"), JFloatArray("v"), JInt("ldv"), JFloatArray("q"), JInt("ldq"), JFloatArray("work"), JIntW("ncycle"), JIntW("info")), + Routine ( "stgsna", JString("job"), JString("howmny"), JBooleanArray("select"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JFloatArray("s"), JFloatArray("dif"), JInt("mm"), JIntW("m"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")), + Routine ( "stgsy2", JString("trans"), JInt("ijob"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("c"), JInt("Ldc"), JFloatArray("d"), JInt("ldd"), JFloatArray("e"), JInt("lde"), JFloatArray("f"), JInt("ldf"), JFloatW("scale"), JFloatW("rdsum"), JFloatW("rdscal"), JIntArray("iwork"), JIntW("pq"), JIntW("info")), + Routine ( "stgsyl", JString("trans"), JInt("ijob"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("c"), JInt("Ldc"), JFloatArray("d"), JInt("ldd"), JFloatArray("e"), JInt("lde"), JFloatArray("f"), JInt("ldf"), JFloatW("scale"), JFloatW("dif"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JIntW("info")), + Routine ( "stpcon", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JFloatArray("ap"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "stprfs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "stptri", JString("uplo"), JString("diag"), JInt("n"), JFloatArray("ap"), JIntW("info")), + Routine ( "stptrs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JFloatArray("ap"), JFloatArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "strcon", JString("norm"), JString("uplo"), JString("diag"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatW("rcond"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "strevc", JString("side"), JString("howmny"), JBooleanArray("select"), JInt("n"), JFloatArray("t"), JInt("ldt"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JInt("mm"), JIntW("m"), JFloatArray("work"), JIntW("info")), + Routine ( "strexc", JString("compq"), JInt("n"), JFloatArray("t"), JInt("ldt"), JFloatArray("q"), JInt("ldq"), JIntW("ifst"), JIntW("ilst"), JFloatArray("work"), JIntW("info")), + Routine ( "strrfs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("x"), JInt("ldx"), JFloatArray("ferr"), JFloatArray("berr"), JFloatArray("work"), JIntArray("iwork"), JIntW("info")), + Routine ( "strsen", JString("job"), JString("compq"), JBooleanArray("select"), JInt("n"), JFloatArray("t"), JInt("ldt"), JFloatArray("q"), JInt("ldq"), JFloatArray("wr"), JFloatArray("wi"), JIntW("m"), JFloatW("s"), JFloatW("sep"), JFloatArray("work"), JInt("lwork"), JIntArray("iwork"), JInt("liwork"), JIntW("info")), + Routine ( "strsna", JString("job"), JString("howmny"), JBooleanArray("select"), JInt("n"), JFloatArray("t"), JInt("ldt"), JFloatArray("vl"), JInt("ldvl"), JFloatArray("vr"), JInt("ldvr"), JFloatArray("s"), JFloatArray("sep"), JInt("mm"), JIntW("m"), JFloatArray("work"), JInt("ldwork"), JIntArray("iwork"), JIntW("info")), + Routine ( "strsyl", JString("trana"), JString("tranb"), JInt("isgn"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JFloatArray("c"), JInt("Ldc"), JFloatW("scale"), JIntW("info")), + Routine ( "strti2", JString("uplo"), JString("diag"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")), + Routine ( "strtri", JString("uplo"), JString("diag"), JInt("n"), JFloatArray("a"), JInt("lda"), JIntW("info")), + Routine ( "strtrs", JString("uplo"), JString("trans"), JString("diag"), JInt("n"), JInt("nrhs"), JFloatArray("a"), JInt("lda"), JFloatArray("b"), JInt("ldb"), JIntW("info")), + Routine ( "stzrqf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JIntW("info")), + Routine ( "stzrzf", JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JFloatArray("tau"), JFloatArray("work"), JInt("lwork"), JIntW("info")), + RoutineR (JDoubleR(), "dlamch", JString("cmach")), + Routine_NI( "dlamc1", JIntW("beta"), JIntW("t"), JBooleanW("rnd"), JBooleanW("ieee1")), + Routine_NI( "dlamc2", JIntW("beta"), JIntW("t"), JBooleanW("rnd"), JDoubleW("eps"), JIntW("emin"), JDoubleW("rmin"), JIntW("emax"), JDoubleW("rmax")), + RoutineR (JDoubleR(), "dlamc3", JDouble("a"), JDouble("b")), + Routine_NI( "dlamc4", JIntW("emin"), JDouble("start"), JInt("base")), + Routine_NI( "dlamc5", JInt("beta"), JInt("p"), JInt("emin"), JBoolean("ieee"), JIntW("emax"), JDoubleW("rmax")), + RoutineR (JDoubleR(), "dsecnd"), + RoutineR (JBooleanR(), "lsame", JString("ca"), JString("cb")), + RoutineR (JFloatR(), "second"), + RoutineR (JFloatR(), "slamch", JString("cmach")), + Routine_NI( "slamc1", JIntW("beta"), JIntW("t"), JBooleanW("rnd"), JBooleanW("ieee1")), + Routine_NI( "slamc2", JIntW("beta"), JIntW("t"), JBooleanW("rnd"), JFloatW("eps"), JIntW("emin"), JFloatW("rmin"), JIntW("emax"), JFloatW("rmax")), + RoutineR (JFloatR(), "slamc3", JFloat("a"), JFloat("b")), + Routine_NI( "slamc4", JIntW("emin"), JFloat("start"), JInt("base")), + Routine_NI( "slamc5", JInt("beta"), JInt("p"), JInt("emin"), JBoolean("ieee"), JIntW("emax"), JFloatW("rmax")), + ) \ No newline at end of file diff --git a/lapack/src/main/native/jni.c b/lapack/src/main/native/jni.c index f041c14d..3b47342b 100644 --- a/lapack/src/main/native/jni.c +++ b/lapack/src/main/native/jni.c @@ -40,8 +40,6 @@ static jfieldID floatW_val_fieldID; static jfieldID doubleW_val_fieldID; static jfieldID StringW_val_fieldID; -static void *lapack; - static void (*dbdsdc_)(const char *uplo, const char *compq, int *n, double *d, double *e, double *u, int *ldu, double *vt, int *ldvt, double *q, int *iq, double *work, int *iwork, int *info); void Java_dev_ludovic_netlib_lapack_JNILAPACK_dbdsdcK(JNIEnv *env, UNUSED jobject obj, jstring uplo, jstring compq, jint n, jdoubleArray d, jint offsetd, jdoubleArray e, jint offsete, jdoubleArray u, jint offsetu, jint ldu, jdoubleArray vt, jint offsetvt, jint ldvt, jdoubleArray q, jint offsetq, jintArray iq, jint offsetiq, jdoubleArray work, jint offsetwork, jintArray iwork, jint offsetiwork, jobject info) { @@ -21099,6 +21097,743 @@ jboolean get_system_property(JNIEnv *env, jstring key, jstring def, jstring *res return TRUE; } +static void *libhandle; + +jboolean load_symbols(void) { +#define LOAD_SYMBOL(name) \ + name = dlsym(libhandle, #name); \ + if (!name) { \ + return FALSE; \ + } + + LOAD_SYMBOL(dbdsdc_); + LOAD_SYMBOL(dbdsqr_); + LOAD_SYMBOL(ddisna_); + LOAD_SYMBOL(dgbbrd_); + LOAD_SYMBOL(dgbcon_); + LOAD_SYMBOL(dgbequ_); + LOAD_SYMBOL(dgbrfs_); + LOAD_SYMBOL(dgbsv_); + LOAD_SYMBOL(dgbsvx_); + LOAD_SYMBOL(dgbtf2_); + LOAD_SYMBOL(dgbtrf_); + LOAD_SYMBOL(dgbtrs_); + LOAD_SYMBOL(dgebak_); + LOAD_SYMBOL(dgebal_); + LOAD_SYMBOL(dgebd2_); + LOAD_SYMBOL(dgebrd_); + LOAD_SYMBOL(dgecon_); + LOAD_SYMBOL(dgeequ_); + // LOAD_SYMBOL(dgees_); + // LOAD_SYMBOL(dgeesx_); + LOAD_SYMBOL(dgeev_); + LOAD_SYMBOL(dgeevx_); + LOAD_SYMBOL(dgegs_); + LOAD_SYMBOL(dgegv_); + LOAD_SYMBOL(dgehd2_); + LOAD_SYMBOL(dgehrd_); + LOAD_SYMBOL(dgelq2_); + LOAD_SYMBOL(dgelqf_); + LOAD_SYMBOL(dgels_); + LOAD_SYMBOL(dgelsd_); + LOAD_SYMBOL(dgelss_); + LOAD_SYMBOL(dgelsx_); + LOAD_SYMBOL(dgelsy_); + LOAD_SYMBOL(dgeql2_); + LOAD_SYMBOL(dgeqlf_); + LOAD_SYMBOL(dgeqp3_); + LOAD_SYMBOL(dgeqpf_); + LOAD_SYMBOL(dgeqr2_); + LOAD_SYMBOL(dgeqrf_); + LOAD_SYMBOL(dgerfs_); + LOAD_SYMBOL(dgerq2_); + LOAD_SYMBOL(dgerqf_); + LOAD_SYMBOL(dgesc2_); + LOAD_SYMBOL(dgesdd_); + LOAD_SYMBOL(dgesv_); + LOAD_SYMBOL(dgesvd_); + LOAD_SYMBOL(dgesvx_); + LOAD_SYMBOL(dgetc2_); + LOAD_SYMBOL(dgetf2_); + LOAD_SYMBOL(dgetrf_); + LOAD_SYMBOL(dgetri_); + LOAD_SYMBOL(dgetrs_); + LOAD_SYMBOL(dggbak_); + LOAD_SYMBOL(dggbal_); + // LOAD_SYMBOL(dgges_); + // LOAD_SYMBOL(dggesx_); + LOAD_SYMBOL(dggev_); + LOAD_SYMBOL(dggevx_); + LOAD_SYMBOL(dggglm_); + LOAD_SYMBOL(dgghrd_); + LOAD_SYMBOL(dgglse_); + LOAD_SYMBOL(dggqrf_); + LOAD_SYMBOL(dggrqf_); + LOAD_SYMBOL(dggsvd_); + LOAD_SYMBOL(dggsvp_); + LOAD_SYMBOL(dgtcon_); + LOAD_SYMBOL(dgtrfs_); + LOAD_SYMBOL(dgtsv_); + LOAD_SYMBOL(dgtsvx_); + LOAD_SYMBOL(dgttrf_); + LOAD_SYMBOL(dgttrs_); + LOAD_SYMBOL(dgtts2_); + LOAD_SYMBOL(dhgeqz_); + LOAD_SYMBOL(dhsein_); + LOAD_SYMBOL(dhseqr_); + LOAD_SYMBOL(disnan_); + LOAD_SYMBOL(dlabad_); + LOAD_SYMBOL(dlabrd_); + LOAD_SYMBOL(dlacn2_); + LOAD_SYMBOL(dlacon_); + LOAD_SYMBOL(dlacpy_); + LOAD_SYMBOL(dladiv_); + LOAD_SYMBOL(dlae2_); + LOAD_SYMBOL(dlaebz_); + LOAD_SYMBOL(dlaed0_); + LOAD_SYMBOL(dlaed1_); + LOAD_SYMBOL(dlaed2_); + LOAD_SYMBOL(dlaed3_); + LOAD_SYMBOL(dlaed4_); + LOAD_SYMBOL(dlaed5_); + LOAD_SYMBOL(dlaed6_); + LOAD_SYMBOL(dlaed7_); + LOAD_SYMBOL(dlaed8_); + LOAD_SYMBOL(dlaed9_); + LOAD_SYMBOL(dlaeda_); + LOAD_SYMBOL(dlaein_); + LOAD_SYMBOL(dlaev2_); + LOAD_SYMBOL(dlaexc_); + LOAD_SYMBOL(dlag2_); + LOAD_SYMBOL(dlag2s_); + LOAD_SYMBOL(dlags2_); + LOAD_SYMBOL(dlagtf_); + LOAD_SYMBOL(dlagtm_); + LOAD_SYMBOL(dlagts_); + LOAD_SYMBOL(dlagv2_); + LOAD_SYMBOL(dlahqr_); + LOAD_SYMBOL(dlahr2_); + LOAD_SYMBOL(dlahrd_); + LOAD_SYMBOL(dlaic1_); + LOAD_SYMBOL(dlaisnan_); + LOAD_SYMBOL(dlaln2_); + LOAD_SYMBOL(dlals0_); + LOAD_SYMBOL(dlalsa_); + LOAD_SYMBOL(dlalsd_); + LOAD_SYMBOL(dlamrg_); + LOAD_SYMBOL(dlaneg_); + LOAD_SYMBOL(dlangb_); + LOAD_SYMBOL(dlange_); + LOAD_SYMBOL(dlangt_); + LOAD_SYMBOL(dlanhs_); + LOAD_SYMBOL(dlansb_); + LOAD_SYMBOL(dlansp_); + LOAD_SYMBOL(dlanst_); + LOAD_SYMBOL(dlansy_); + LOAD_SYMBOL(dlantb_); + LOAD_SYMBOL(dlantp_); + LOAD_SYMBOL(dlantr_); + LOAD_SYMBOL(dlanv2_); + LOAD_SYMBOL(dlapll_); + LOAD_SYMBOL(dlapmt_); + LOAD_SYMBOL(dlapy2_); + LOAD_SYMBOL(dlapy3_); + LOAD_SYMBOL(dlaqgb_); + LOAD_SYMBOL(dlaqge_); + LOAD_SYMBOL(dlaqp2_); + LOAD_SYMBOL(dlaqps_); + LOAD_SYMBOL(dlaqr0_); + LOAD_SYMBOL(dlaqr1_); + LOAD_SYMBOL(dlaqr2_); + LOAD_SYMBOL(dlaqr3_); + LOAD_SYMBOL(dlaqr4_); + LOAD_SYMBOL(dlaqr5_); + LOAD_SYMBOL(dlaqsb_); + LOAD_SYMBOL(dlaqsp_); + LOAD_SYMBOL(dlaqsy_); + LOAD_SYMBOL(dlaqtr_); + LOAD_SYMBOL(dlar1v_); + LOAD_SYMBOL(dlar2v_); + LOAD_SYMBOL(dlarf_); + LOAD_SYMBOL(dlarfb_); + LOAD_SYMBOL(dlarfg_); + LOAD_SYMBOL(dlarft_); + LOAD_SYMBOL(dlarfx_); + LOAD_SYMBOL(dlargv_); + LOAD_SYMBOL(dlarnv_); + LOAD_SYMBOL(dlarra_); + LOAD_SYMBOL(dlarrb_); + LOAD_SYMBOL(dlarrc_); + LOAD_SYMBOL(dlarrd_); + LOAD_SYMBOL(dlarre_); + LOAD_SYMBOL(dlarrf_); + LOAD_SYMBOL(dlarrj_); + LOAD_SYMBOL(dlarrk_); + LOAD_SYMBOL(dlarrr_); + LOAD_SYMBOL(dlarrv_); + LOAD_SYMBOL(dlartg_); + LOAD_SYMBOL(dlartv_); + LOAD_SYMBOL(dlaruv_); + LOAD_SYMBOL(dlarz_); + LOAD_SYMBOL(dlarzb_); + LOAD_SYMBOL(dlarzt_); + LOAD_SYMBOL(dlas2_); + LOAD_SYMBOL(dlascl_); + LOAD_SYMBOL(dlasd0_); + LOAD_SYMBOL(dlasd1_); + LOAD_SYMBOL(dlasd2_); + LOAD_SYMBOL(dlasd3_); + LOAD_SYMBOL(dlasd4_); + LOAD_SYMBOL(dlasd5_); + LOAD_SYMBOL(dlasd6_); + LOAD_SYMBOL(dlasd7_); + LOAD_SYMBOL(dlasd8_); + LOAD_SYMBOL(dlasda_); + LOAD_SYMBOL(dlasdq_); + LOAD_SYMBOL(dlasdt_); + LOAD_SYMBOL(dlaset_); + LOAD_SYMBOL(dlasq1_); + LOAD_SYMBOL(dlasq2_); + LOAD_SYMBOL(dlasq3_); + LOAD_SYMBOL(dlasq4_); + LOAD_SYMBOL(dlasq5_); + LOAD_SYMBOL(dlasq6_); + LOAD_SYMBOL(dlasr_); + LOAD_SYMBOL(dlasrt_); + LOAD_SYMBOL(dlassq_); + LOAD_SYMBOL(dlasv2_); + LOAD_SYMBOL(dlaswp_); + LOAD_SYMBOL(dlasy2_); + LOAD_SYMBOL(dlasyf_); + LOAD_SYMBOL(dlatbs_); + LOAD_SYMBOL(dlatdf_); + LOAD_SYMBOL(dlatps_); + LOAD_SYMBOL(dlatrd_); + LOAD_SYMBOL(dlatrs_); + LOAD_SYMBOL(dlatrz_); + LOAD_SYMBOL(dlatzm_); + LOAD_SYMBOL(dlauu2_); + LOAD_SYMBOL(dlauum_); + // LOAD_SYMBOL(dlazq3_); + // LOAD_SYMBOL(dlazq4_); + LOAD_SYMBOL(dopgtr_); + LOAD_SYMBOL(dopmtr_); + LOAD_SYMBOL(dorg2l_); + LOAD_SYMBOL(dorg2r_); + LOAD_SYMBOL(dorgbr_); + LOAD_SYMBOL(dorghr_); + LOAD_SYMBOL(dorgl2_); + LOAD_SYMBOL(dorglq_); + LOAD_SYMBOL(dorgql_); + LOAD_SYMBOL(dorgqr_); + LOAD_SYMBOL(dorgr2_); + LOAD_SYMBOL(dorgrq_); + LOAD_SYMBOL(dorgtr_); + LOAD_SYMBOL(dorm2l_); + LOAD_SYMBOL(dorm2r_); + LOAD_SYMBOL(dormbr_); + LOAD_SYMBOL(dormhr_); + LOAD_SYMBOL(dorml2_); + LOAD_SYMBOL(dormlq_); + LOAD_SYMBOL(dormql_); + LOAD_SYMBOL(dormqr_); + LOAD_SYMBOL(dormr2_); + LOAD_SYMBOL(dormr3_); + LOAD_SYMBOL(dormrq_); + LOAD_SYMBOL(dormrz_); + LOAD_SYMBOL(dormtr_); + LOAD_SYMBOL(dpbcon_); + LOAD_SYMBOL(dpbequ_); + LOAD_SYMBOL(dpbrfs_); + LOAD_SYMBOL(dpbstf_); + LOAD_SYMBOL(dpbsv_); + LOAD_SYMBOL(dpbsvx_); + LOAD_SYMBOL(dpbtf2_); + LOAD_SYMBOL(dpbtrf_); + LOAD_SYMBOL(dpbtrs_); + LOAD_SYMBOL(dpocon_); + LOAD_SYMBOL(dpoequ_); + LOAD_SYMBOL(dporfs_); + LOAD_SYMBOL(dposv_); + LOAD_SYMBOL(dposvx_); + LOAD_SYMBOL(dpotf2_); + LOAD_SYMBOL(dpotrf_); + LOAD_SYMBOL(dpotri_); + LOAD_SYMBOL(dpotrs_); + LOAD_SYMBOL(dppcon_); + LOAD_SYMBOL(dppequ_); + LOAD_SYMBOL(dpprfs_); + LOAD_SYMBOL(dppsv_); + LOAD_SYMBOL(dppsvx_); + LOAD_SYMBOL(dpptrf_); + LOAD_SYMBOL(dpptri_); + LOAD_SYMBOL(dpptrs_); + LOAD_SYMBOL(dptcon_); + LOAD_SYMBOL(dpteqr_); + LOAD_SYMBOL(dptrfs_); + LOAD_SYMBOL(dptsv_); + LOAD_SYMBOL(dptsvx_); + LOAD_SYMBOL(dpttrf_); + LOAD_SYMBOL(dpttrs_); + LOAD_SYMBOL(dptts2_); + LOAD_SYMBOL(drscl_); + LOAD_SYMBOL(dsbev_); + LOAD_SYMBOL(dsbevd_); + LOAD_SYMBOL(dsbevx_); + LOAD_SYMBOL(dsbgst_); + LOAD_SYMBOL(dsbgv_); + LOAD_SYMBOL(dsbgvd_); + LOAD_SYMBOL(dsbgvx_); + LOAD_SYMBOL(dsbtrd_); + LOAD_SYMBOL(dsgesv_); + LOAD_SYMBOL(dspcon_); + LOAD_SYMBOL(dspev_); + LOAD_SYMBOL(dspevd_); + LOAD_SYMBOL(dspevx_); + LOAD_SYMBOL(dspgst_); + LOAD_SYMBOL(dspgv_); + LOAD_SYMBOL(dspgvd_); + LOAD_SYMBOL(dspgvx_); + LOAD_SYMBOL(dsprfs_); + LOAD_SYMBOL(dspsv_); + LOAD_SYMBOL(dspsvx_); + LOAD_SYMBOL(dsptrd_); + LOAD_SYMBOL(dsptrf_); + LOAD_SYMBOL(dsptri_); + LOAD_SYMBOL(dsptrs_); + LOAD_SYMBOL(dstebz_); + LOAD_SYMBOL(dstedc_); + LOAD_SYMBOL(dstegr_); + LOAD_SYMBOL(dstein_); + LOAD_SYMBOL(dstemr_); + LOAD_SYMBOL(dsteqr_); + LOAD_SYMBOL(dsterf_); + LOAD_SYMBOL(dstev_); + LOAD_SYMBOL(dstevd_); + LOAD_SYMBOL(dstevr_); + LOAD_SYMBOL(dstevx_); + LOAD_SYMBOL(dsycon_); + LOAD_SYMBOL(dsyev_); + LOAD_SYMBOL(dsyevd_); + LOAD_SYMBOL(dsyevr_); + LOAD_SYMBOL(dsyevx_); + LOAD_SYMBOL(dsygs2_); + LOAD_SYMBOL(dsygst_); + LOAD_SYMBOL(dsygv_); + LOAD_SYMBOL(dsygvd_); + LOAD_SYMBOL(dsygvx_); + LOAD_SYMBOL(dsyrfs_); + LOAD_SYMBOL(dsysv_); + LOAD_SYMBOL(dsysvx_); + LOAD_SYMBOL(dsytd2_); + LOAD_SYMBOL(dsytf2_); + LOAD_SYMBOL(dsytrd_); + LOAD_SYMBOL(dsytrf_); + LOAD_SYMBOL(dsytri_); + LOAD_SYMBOL(dsytrs_); + LOAD_SYMBOL(dtbcon_); + LOAD_SYMBOL(dtbrfs_); + LOAD_SYMBOL(dtbtrs_); + LOAD_SYMBOL(dtgevc_); + LOAD_SYMBOL(dtgex2_); + LOAD_SYMBOL(dtgexc_); + LOAD_SYMBOL(dtgsen_); + LOAD_SYMBOL(dtgsja_); + LOAD_SYMBOL(dtgsna_); + LOAD_SYMBOL(dtgsy2_); + LOAD_SYMBOL(dtgsyl_); + LOAD_SYMBOL(dtpcon_); + LOAD_SYMBOL(dtprfs_); + LOAD_SYMBOL(dtptri_); + LOAD_SYMBOL(dtptrs_); + LOAD_SYMBOL(dtrcon_); + LOAD_SYMBOL(dtrevc_); + LOAD_SYMBOL(dtrexc_); + LOAD_SYMBOL(dtrrfs_); + LOAD_SYMBOL(dtrsen_); + LOAD_SYMBOL(dtrsna_); + LOAD_SYMBOL(dtrsyl_); + LOAD_SYMBOL(dtrti2_); + LOAD_SYMBOL(dtrtri_); + LOAD_SYMBOL(dtrtrs_); + LOAD_SYMBOL(dtzrqf_); + LOAD_SYMBOL(dtzrzf_); + LOAD_SYMBOL(ieeeck_); + LOAD_SYMBOL(ilaenv_); + LOAD_SYMBOL(ilaver_); + LOAD_SYMBOL(iparmq_); + LOAD_SYMBOL(lsamen_); + LOAD_SYMBOL(sbdsdc_); + LOAD_SYMBOL(sbdsqr_); + LOAD_SYMBOL(sdisna_); + LOAD_SYMBOL(sgbbrd_); + LOAD_SYMBOL(sgbcon_); + LOAD_SYMBOL(sgbequ_); + LOAD_SYMBOL(sgbrfs_); + LOAD_SYMBOL(sgbsv_); + LOAD_SYMBOL(sgbsvx_); + LOAD_SYMBOL(sgbtf2_); + LOAD_SYMBOL(sgbtrf_); + LOAD_SYMBOL(sgbtrs_); + LOAD_SYMBOL(sgebak_); + LOAD_SYMBOL(sgebal_); + LOAD_SYMBOL(sgebd2_); + LOAD_SYMBOL(sgebrd_); + LOAD_SYMBOL(sgecon_); + LOAD_SYMBOL(sgeequ_); + // LOAD_SYMBOL(sgees_); + // LOAD_SYMBOL(sgeesx_); + LOAD_SYMBOL(sgeev_); + LOAD_SYMBOL(sgeevx_); + LOAD_SYMBOL(sgegs_); + LOAD_SYMBOL(sgegv_); + LOAD_SYMBOL(sgehd2_); + LOAD_SYMBOL(sgehrd_); + LOAD_SYMBOL(sgelq2_); + LOAD_SYMBOL(sgelqf_); + LOAD_SYMBOL(sgels_); + LOAD_SYMBOL(sgelsd_); + LOAD_SYMBOL(sgelss_); + LOAD_SYMBOL(sgelsx_); + LOAD_SYMBOL(sgelsy_); + LOAD_SYMBOL(sgeql2_); + LOAD_SYMBOL(sgeqlf_); + LOAD_SYMBOL(sgeqp3_); + LOAD_SYMBOL(sgeqpf_); + LOAD_SYMBOL(sgeqr2_); + LOAD_SYMBOL(sgeqrf_); + LOAD_SYMBOL(sgerfs_); + LOAD_SYMBOL(sgerq2_); + LOAD_SYMBOL(sgerqf_); + LOAD_SYMBOL(sgesc2_); + LOAD_SYMBOL(sgesdd_); + LOAD_SYMBOL(sgesv_); + LOAD_SYMBOL(sgesvd_); + LOAD_SYMBOL(sgesvx_); + LOAD_SYMBOL(sgetc2_); + LOAD_SYMBOL(sgetf2_); + LOAD_SYMBOL(sgetrf_); + LOAD_SYMBOL(sgetri_); + LOAD_SYMBOL(sgetrs_); + LOAD_SYMBOL(sggbak_); + LOAD_SYMBOL(sggbal_); + // LOAD_SYMBOL(sgges_); + // LOAD_SYMBOL(sggesx_); + LOAD_SYMBOL(sggev_); + LOAD_SYMBOL(sggevx_); + LOAD_SYMBOL(sggglm_); + LOAD_SYMBOL(sgghrd_); + LOAD_SYMBOL(sgglse_); + LOAD_SYMBOL(sggqrf_); + LOAD_SYMBOL(sggrqf_); + LOAD_SYMBOL(sggsvd_); + LOAD_SYMBOL(sggsvp_); + LOAD_SYMBOL(sgtcon_); + LOAD_SYMBOL(sgtrfs_); + LOAD_SYMBOL(sgtsv_); + LOAD_SYMBOL(sgtsvx_); + LOAD_SYMBOL(sgttrf_); + LOAD_SYMBOL(sgttrs_); + LOAD_SYMBOL(sgtts2_); + LOAD_SYMBOL(shgeqz_); + LOAD_SYMBOL(shsein_); + LOAD_SYMBOL(shseqr_); + LOAD_SYMBOL(sisnan_); + LOAD_SYMBOL(slabad_); + LOAD_SYMBOL(slabrd_); + LOAD_SYMBOL(slacn2_); + LOAD_SYMBOL(slacon_); + LOAD_SYMBOL(slacpy_); + LOAD_SYMBOL(sladiv_); + LOAD_SYMBOL(slae2_); + LOAD_SYMBOL(slaebz_); + LOAD_SYMBOL(slaed0_); + LOAD_SYMBOL(slaed1_); + LOAD_SYMBOL(slaed2_); + LOAD_SYMBOL(slaed3_); + LOAD_SYMBOL(slaed4_); + LOAD_SYMBOL(slaed5_); + LOAD_SYMBOL(slaed6_); + LOAD_SYMBOL(slaed7_); + LOAD_SYMBOL(slaed8_); + LOAD_SYMBOL(slaed9_); + LOAD_SYMBOL(slaeda_); + LOAD_SYMBOL(slaein_); + LOAD_SYMBOL(slaev2_); + LOAD_SYMBOL(slaexc_); + LOAD_SYMBOL(slag2_); + LOAD_SYMBOL(slag2d_); + LOAD_SYMBOL(slags2_); + LOAD_SYMBOL(slagtf_); + LOAD_SYMBOL(slagtm_); + LOAD_SYMBOL(slagts_); + LOAD_SYMBOL(slagv2_); + LOAD_SYMBOL(slahqr_); + LOAD_SYMBOL(slahr2_); + LOAD_SYMBOL(slahrd_); + LOAD_SYMBOL(slaic1_); + LOAD_SYMBOL(slaisnan_); + LOAD_SYMBOL(slaln2_); + LOAD_SYMBOL(slals0_); + LOAD_SYMBOL(slalsa_); + LOAD_SYMBOL(slalsd_); + LOAD_SYMBOL(slamrg_); + LOAD_SYMBOL(slaneg_); + LOAD_SYMBOL(slangb_); + LOAD_SYMBOL(slange_); + LOAD_SYMBOL(slangt_); + LOAD_SYMBOL(slanhs_); + LOAD_SYMBOL(slansb_); + LOAD_SYMBOL(slansp_); + LOAD_SYMBOL(slanst_); + LOAD_SYMBOL(slansy_); + LOAD_SYMBOL(slantb_); + LOAD_SYMBOL(slantp_); + LOAD_SYMBOL(slantr_); + LOAD_SYMBOL(slanv2_); + LOAD_SYMBOL(slapll_); + LOAD_SYMBOL(slapmt_); + LOAD_SYMBOL(slapy2_); + LOAD_SYMBOL(slapy3_); + LOAD_SYMBOL(slaqgb_); + LOAD_SYMBOL(slaqge_); + LOAD_SYMBOL(slaqp2_); + LOAD_SYMBOL(slaqps_); + LOAD_SYMBOL(slaqr0_); + LOAD_SYMBOL(slaqr1_); + LOAD_SYMBOL(slaqr2_); + LOAD_SYMBOL(slaqr3_); + LOAD_SYMBOL(slaqr4_); + LOAD_SYMBOL(slaqr5_); + LOAD_SYMBOL(slaqsb_); + LOAD_SYMBOL(slaqsp_); + LOAD_SYMBOL(slaqsy_); + LOAD_SYMBOL(slaqtr_); + LOAD_SYMBOL(slar1v_); + LOAD_SYMBOL(slar2v_); + LOAD_SYMBOL(slarf_); + LOAD_SYMBOL(slarfb_); + LOAD_SYMBOL(slarfg_); + LOAD_SYMBOL(slarft_); + LOAD_SYMBOL(slarfx_); + LOAD_SYMBOL(slargv_); + LOAD_SYMBOL(slarnv_); + LOAD_SYMBOL(slarra_); + LOAD_SYMBOL(slarrb_); + LOAD_SYMBOL(slarrc_); + LOAD_SYMBOL(slarrd_); + LOAD_SYMBOL(slarre_); + LOAD_SYMBOL(slarrf_); + LOAD_SYMBOL(slarrj_); + LOAD_SYMBOL(slarrk_); + LOAD_SYMBOL(slarrr_); + LOAD_SYMBOL(slarrv_); + LOAD_SYMBOL(slartg_); + LOAD_SYMBOL(slartv_); + LOAD_SYMBOL(slaruv_); + LOAD_SYMBOL(slarz_); + LOAD_SYMBOL(slarzb_); + LOAD_SYMBOL(slarzt_); + LOAD_SYMBOL(slas2_); + LOAD_SYMBOL(slascl_); + LOAD_SYMBOL(slasd0_); + LOAD_SYMBOL(slasd1_); + LOAD_SYMBOL(slasd2_); + LOAD_SYMBOL(slasd3_); + LOAD_SYMBOL(slasd4_); + LOAD_SYMBOL(slasd5_); + LOAD_SYMBOL(slasd6_); + LOAD_SYMBOL(slasd7_); + LOAD_SYMBOL(slasd8_); + LOAD_SYMBOL(slasda_); + LOAD_SYMBOL(slasdq_); + LOAD_SYMBOL(slasdt_); + LOAD_SYMBOL(slaset_); + LOAD_SYMBOL(slasq1_); + LOAD_SYMBOL(slasq2_); + LOAD_SYMBOL(slasq3_); + LOAD_SYMBOL(slasq4_); + LOAD_SYMBOL(slasq5_); + LOAD_SYMBOL(slasq6_); + LOAD_SYMBOL(slasr_); + LOAD_SYMBOL(slasrt_); + LOAD_SYMBOL(slassq_); + LOAD_SYMBOL(slasv2_); + LOAD_SYMBOL(slaswp_); + LOAD_SYMBOL(slasy2_); + LOAD_SYMBOL(slasyf_); + LOAD_SYMBOL(slatbs_); + LOAD_SYMBOL(slatdf_); + LOAD_SYMBOL(slatps_); + LOAD_SYMBOL(slatrd_); + LOAD_SYMBOL(slatrs_); + LOAD_SYMBOL(slatrz_); + LOAD_SYMBOL(slatzm_); + LOAD_SYMBOL(slauu2_); + LOAD_SYMBOL(slauum_); + // LOAD_SYMBOL(slazq3_); + // LOAD_SYMBOL(slazq4_); + LOAD_SYMBOL(sopgtr_); + LOAD_SYMBOL(sopmtr_); + LOAD_SYMBOL(sorg2l_); + LOAD_SYMBOL(sorg2r_); + LOAD_SYMBOL(sorgbr_); + LOAD_SYMBOL(sorghr_); + LOAD_SYMBOL(sorgl2_); + LOAD_SYMBOL(sorglq_); + LOAD_SYMBOL(sorgql_); + LOAD_SYMBOL(sorgqr_); + LOAD_SYMBOL(sorgr2_); + LOAD_SYMBOL(sorgrq_); + LOAD_SYMBOL(sorgtr_); + LOAD_SYMBOL(sorm2l_); + LOAD_SYMBOL(sorm2r_); + LOAD_SYMBOL(sormbr_); + LOAD_SYMBOL(sormhr_); + LOAD_SYMBOL(sorml2_); + LOAD_SYMBOL(sormlq_); + LOAD_SYMBOL(sormql_); + LOAD_SYMBOL(sormqr_); + LOAD_SYMBOL(sormr2_); + LOAD_SYMBOL(sormr3_); + LOAD_SYMBOL(sormrq_); + LOAD_SYMBOL(sormrz_); + LOAD_SYMBOL(sormtr_); + LOAD_SYMBOL(spbcon_); + LOAD_SYMBOL(spbequ_); + LOAD_SYMBOL(spbrfs_); + LOAD_SYMBOL(spbstf_); + LOAD_SYMBOL(spbsv_); + LOAD_SYMBOL(spbsvx_); + LOAD_SYMBOL(spbtf2_); + LOAD_SYMBOL(spbtrf_); + LOAD_SYMBOL(spbtrs_); + LOAD_SYMBOL(spocon_); + LOAD_SYMBOL(spoequ_); + LOAD_SYMBOL(sporfs_); + LOAD_SYMBOL(sposv_); + LOAD_SYMBOL(sposvx_); + LOAD_SYMBOL(spotf2_); + LOAD_SYMBOL(spotrf_); + LOAD_SYMBOL(spotri_); + LOAD_SYMBOL(spotrs_); + LOAD_SYMBOL(sppcon_); + LOAD_SYMBOL(sppequ_); + LOAD_SYMBOL(spprfs_); + LOAD_SYMBOL(sppsv_); + LOAD_SYMBOL(sppsvx_); + LOAD_SYMBOL(spptrf_); + LOAD_SYMBOL(spptri_); + LOAD_SYMBOL(spptrs_); + LOAD_SYMBOL(sptcon_); + LOAD_SYMBOL(spteqr_); + LOAD_SYMBOL(sptrfs_); + LOAD_SYMBOL(sptsv_); + LOAD_SYMBOL(sptsvx_); + LOAD_SYMBOL(spttrf_); + LOAD_SYMBOL(spttrs_); + LOAD_SYMBOL(sptts2_); + LOAD_SYMBOL(srscl_); + LOAD_SYMBOL(ssbev_); + LOAD_SYMBOL(ssbevd_); + LOAD_SYMBOL(ssbevx_); + LOAD_SYMBOL(ssbgst_); + LOAD_SYMBOL(ssbgv_); + LOAD_SYMBOL(ssbgvd_); + LOAD_SYMBOL(ssbgvx_); + LOAD_SYMBOL(ssbtrd_); + LOAD_SYMBOL(sspcon_); + LOAD_SYMBOL(sspev_); + LOAD_SYMBOL(sspevd_); + LOAD_SYMBOL(sspevx_); + LOAD_SYMBOL(sspgst_); + LOAD_SYMBOL(sspgv_); + LOAD_SYMBOL(sspgvd_); + LOAD_SYMBOL(sspgvx_); + LOAD_SYMBOL(ssprfs_); + LOAD_SYMBOL(sspsv_); + LOAD_SYMBOL(sspsvx_); + LOAD_SYMBOL(ssptrd_); + LOAD_SYMBOL(ssptrf_); + LOAD_SYMBOL(ssptri_); + LOAD_SYMBOL(ssptrs_); + LOAD_SYMBOL(sstebz_); + LOAD_SYMBOL(sstedc_); + LOAD_SYMBOL(sstegr_); + LOAD_SYMBOL(sstein_); + LOAD_SYMBOL(sstemr_); + LOAD_SYMBOL(ssteqr_); + LOAD_SYMBOL(ssterf_); + LOAD_SYMBOL(sstev_); + LOAD_SYMBOL(sstevd_); + LOAD_SYMBOL(sstevr_); + LOAD_SYMBOL(sstevx_); + LOAD_SYMBOL(ssycon_); + LOAD_SYMBOL(ssyev_); + LOAD_SYMBOL(ssyevd_); + LOAD_SYMBOL(ssyevr_); + LOAD_SYMBOL(ssyevx_); + LOAD_SYMBOL(ssygs2_); + LOAD_SYMBOL(ssygst_); + LOAD_SYMBOL(ssygv_); + LOAD_SYMBOL(ssygvd_); + LOAD_SYMBOL(ssygvx_); + LOAD_SYMBOL(ssyrfs_); + LOAD_SYMBOL(ssysv_); + LOAD_SYMBOL(ssysvx_); + LOAD_SYMBOL(ssytd2_); + LOAD_SYMBOL(ssytf2_); + LOAD_SYMBOL(ssytrd_); + LOAD_SYMBOL(ssytrf_); + LOAD_SYMBOL(ssytri_); + LOAD_SYMBOL(ssytrs_); + LOAD_SYMBOL(stbcon_); + LOAD_SYMBOL(stbrfs_); + LOAD_SYMBOL(stbtrs_); + LOAD_SYMBOL(stgevc_); + LOAD_SYMBOL(stgex2_); + LOAD_SYMBOL(stgexc_); + LOAD_SYMBOL(stgsen_); + LOAD_SYMBOL(stgsja_); + LOAD_SYMBOL(stgsna_); + LOAD_SYMBOL(stgsy2_); + LOAD_SYMBOL(stgsyl_); + LOAD_SYMBOL(stpcon_); + LOAD_SYMBOL(stprfs_); + LOAD_SYMBOL(stptri_); + LOAD_SYMBOL(stptrs_); + LOAD_SYMBOL(strcon_); + LOAD_SYMBOL(strevc_); + LOAD_SYMBOL(strexc_); + LOAD_SYMBOL(strrfs_); + LOAD_SYMBOL(strsen_); + LOAD_SYMBOL(strsna_); + LOAD_SYMBOL(strsyl_); + LOAD_SYMBOL(strti2_); + LOAD_SYMBOL(strtri_); + LOAD_SYMBOL(strtrs_); + LOAD_SYMBOL(stzrqf_); + LOAD_SYMBOL(stzrzf_); + LOAD_SYMBOL(dlamch_); + // LOAD_SYMBOL(dlamc1_); + // LOAD_SYMBOL(dlamc2_); + LOAD_SYMBOL(dlamc3_); + // LOAD_SYMBOL(dlamc4_); + // LOAD_SYMBOL(dlamc5_); + LOAD_SYMBOL(dsecnd_); + LOAD_SYMBOL(lsame_); + LOAD_SYMBOL(second_); + LOAD_SYMBOL(slamch_); + // LOAD_SYMBOL(slamc1_); + // LOAD_SYMBOL(slamc2_); + LOAD_SYMBOL(slamc3_); + // LOAD_SYMBOL(slamc4_); + // LOAD_SYMBOL(slamc5_); + +#undef LOAD_SYMBOL + return TRUE; +} + jint JNI_OnLoad(JavaVM *vm, UNUSED void *reserved) { JNIEnv *env; if ((*vm)->GetEnv(vm, (void**)&env, JNI_VERSION_1_6) != JNI_OK) { @@ -21159,760 +21894,32 @@ jint JNI_OnLoad(JavaVM *vm, UNUSED void *reserved) { return -1; } - char lapack_name[1024]; + char name[1024]; if (property_nativeLibPath) { const char *utf = (*env)->GetStringUTFChars(env, property_nativeLibPath, NULL); - snprintf(lapack_name, sizeof(lapack_name), "%s", utf); + snprintf(name, sizeof(name), "%s", utf); (*env)->ReleaseStringUTFChars(env, property_nativeLibPath, utf); } else if (property_nativeLib) { const char *utf = (*env)->GetStringUTFChars(env, property_nativeLib, NULL); - snprintf(lapack_name, sizeof(lapack_name), "lib%s.so", utf); + snprintf(name, sizeof(name), "lib%s.so", utf); (*env)->ReleaseStringUTFChars(env, property_nativeLib, utf); } else { /* either property_nativeLibPath or property_nativeLib should always be non-NULL */ return -1; } - lapack = dlopen(lapack_name, RTLD_LAZY); - if (!lapack) { + libhandle = dlopen(name, RTLD_LAZY); + if (!libhandle) { return -1; } -#define LOAD_SYMBOL(name) \ - name = dlsym(lapack, #name); \ - if (!name) { \ - return -1; \ + if (!load_symbols()) { + return -1; } - LOAD_SYMBOL(dbdsdc_) - LOAD_SYMBOL(dbdsqr_) - LOAD_SYMBOL(ddisna_) - LOAD_SYMBOL(dgbbrd_) - LOAD_SYMBOL(dgbcon_) - LOAD_SYMBOL(dgbequ_) - LOAD_SYMBOL(dgbrfs_) - LOAD_SYMBOL(dgbsvx_) - LOAD_SYMBOL(dgbsv_) - LOAD_SYMBOL(dgbtrf_) - LOAD_SYMBOL(dgbtf2_) - LOAD_SYMBOL(dgebak_) - LOAD_SYMBOL(dgbtrs_) - LOAD_SYMBOL(dgebd2_) - LOAD_SYMBOL(dgebal_) - LOAD_SYMBOL(dgecon_) - LOAD_SYMBOL(dgebrd_) - // LOAD_SYMBOL(dgees_) - LOAD_SYMBOL(dgeequ_) - LOAD_SYMBOL(dgeev_) - // LOAD_SYMBOL(dgeesx_) - LOAD_SYMBOL(dgegs_) - LOAD_SYMBOL(dgeevx_) - LOAD_SYMBOL(dgehd2_) - LOAD_SYMBOL(dgegv_) - LOAD_SYMBOL(dgelq2_) - LOAD_SYMBOL(dgehrd_) - LOAD_SYMBOL(dgels_) - LOAD_SYMBOL(dgelqf_) - LOAD_SYMBOL(dgelss_) - LOAD_SYMBOL(dgelsd_) - LOAD_SYMBOL(dgelsy_) - LOAD_SYMBOL(dgelsx_) - LOAD_SYMBOL(dgeqlf_) - LOAD_SYMBOL(dgeql2_) - LOAD_SYMBOL(dgeqpf_) - LOAD_SYMBOL(dgeqp3_) - LOAD_SYMBOL(dgeqrf_) - LOAD_SYMBOL(dgeqr2_) - LOAD_SYMBOL(dgerq2_) - LOAD_SYMBOL(dgerfs_) - LOAD_SYMBOL(dgesc2_) - LOAD_SYMBOL(dgerqf_) - LOAD_SYMBOL(dgesv_) - LOAD_SYMBOL(dgesdd_) - LOAD_SYMBOL(dgesvx_) - LOAD_SYMBOL(dgesvd_) - LOAD_SYMBOL(dgetf2_) - LOAD_SYMBOL(dgetc2_) - LOAD_SYMBOL(dgetri_) - LOAD_SYMBOL(dgetrf_) - LOAD_SYMBOL(dggbak_) - LOAD_SYMBOL(dgetrs_) - // LOAD_SYMBOL(dgges_) - LOAD_SYMBOL(dggbal_) - LOAD_SYMBOL(dggev_) - // LOAD_SYMBOL(dggesx_) - LOAD_SYMBOL(dggglm_) - LOAD_SYMBOL(dggevx_) - LOAD_SYMBOL(dgglse_) - LOAD_SYMBOL(dgghrd_) - LOAD_SYMBOL(dggrqf_) - LOAD_SYMBOL(dggqrf_) - LOAD_SYMBOL(dggsvp_) - LOAD_SYMBOL(dggsvd_) - LOAD_SYMBOL(dgtrfs_) - LOAD_SYMBOL(dgtcon_) - LOAD_SYMBOL(dgtsvx_) - LOAD_SYMBOL(dgtsv_) - LOAD_SYMBOL(dgttrs_) - LOAD_SYMBOL(dgttrf_) - LOAD_SYMBOL(dhgeqz_) - LOAD_SYMBOL(dgtts2_) - LOAD_SYMBOL(dhseqr_) - LOAD_SYMBOL(dhsein_) - LOAD_SYMBOL(dlabad_) - LOAD_SYMBOL(disnan_) - LOAD_SYMBOL(dlacn2_) - LOAD_SYMBOL(dlabrd_) - LOAD_SYMBOL(dlacpy_) - LOAD_SYMBOL(dlacon_) - LOAD_SYMBOL(dlae2_) - LOAD_SYMBOL(dladiv_) - LOAD_SYMBOL(dlaed0_) - LOAD_SYMBOL(dlaebz_) - LOAD_SYMBOL(dlaed2_) - LOAD_SYMBOL(dlaed1_) - LOAD_SYMBOL(dlaed4_) - LOAD_SYMBOL(dlaed3_) - LOAD_SYMBOL(dlaed6_) - LOAD_SYMBOL(dlaed5_) - LOAD_SYMBOL(dlaed8_) - LOAD_SYMBOL(dlaed7_) - LOAD_SYMBOL(dlaeda_) - LOAD_SYMBOL(dlaed9_) - LOAD_SYMBOL(dlaev2_) - LOAD_SYMBOL(dlaein_) - LOAD_SYMBOL(dlag2_) - LOAD_SYMBOL(dlaexc_) - LOAD_SYMBOL(dlags2_) - LOAD_SYMBOL(dlag2s_) - LOAD_SYMBOL(dlagtm_) - LOAD_SYMBOL(dlagtf_) - LOAD_SYMBOL(dlagv2_) - LOAD_SYMBOL(dlagts_) - LOAD_SYMBOL(dlahr2_) - LOAD_SYMBOL(dlahqr_) - LOAD_SYMBOL(dlaic1_) - LOAD_SYMBOL(dlahrd_) - LOAD_SYMBOL(dlaln2_) - LOAD_SYMBOL(dlaisnan_) - LOAD_SYMBOL(dlalsa_) - LOAD_SYMBOL(dlals0_) - LOAD_SYMBOL(dlamrg_) - LOAD_SYMBOL(dlalsd_) - LOAD_SYMBOL(dlangb_) - LOAD_SYMBOL(dlaneg_) - LOAD_SYMBOL(dlangt_) - LOAD_SYMBOL(dlange_) - LOAD_SYMBOL(dlansb_) - LOAD_SYMBOL(dlanhs_) - LOAD_SYMBOL(dlanst_) - LOAD_SYMBOL(dlansp_) - LOAD_SYMBOL(dlantb_) - LOAD_SYMBOL(dlansy_) - LOAD_SYMBOL(dlantr_) - LOAD_SYMBOL(dlantp_) - LOAD_SYMBOL(dlapll_) - LOAD_SYMBOL(dlanv2_) - LOAD_SYMBOL(dlapy2_) - LOAD_SYMBOL(dlapmt_) - LOAD_SYMBOL(dlaqgb_) - LOAD_SYMBOL(dlapy3_) - LOAD_SYMBOL(dlaqp2_) - LOAD_SYMBOL(dlaqge_) - LOAD_SYMBOL(dlaqr0_) - LOAD_SYMBOL(dlaqps_) - LOAD_SYMBOL(dlaqr2_) - LOAD_SYMBOL(dlaqr1_) - LOAD_SYMBOL(dlaqr4_) - LOAD_SYMBOL(dlaqr3_) - LOAD_SYMBOL(dlaqsb_) - LOAD_SYMBOL(dlaqr5_) - LOAD_SYMBOL(dlaqsy_) - LOAD_SYMBOL(dlaqsp_) - LOAD_SYMBOL(dlar1v_) - LOAD_SYMBOL(dlaqtr_) - LOAD_SYMBOL(dlarf_) - LOAD_SYMBOL(dlar2v_) - LOAD_SYMBOL(dlarfg_) - LOAD_SYMBOL(dlarfb_) - LOAD_SYMBOL(dlarfx_) - LOAD_SYMBOL(dlarft_) - LOAD_SYMBOL(dlarnv_) - LOAD_SYMBOL(dlargv_) - LOAD_SYMBOL(dlarrb_) - LOAD_SYMBOL(dlarra_) - LOAD_SYMBOL(dlarrd_) - LOAD_SYMBOL(dlarrc_) - LOAD_SYMBOL(dlarrf_) - LOAD_SYMBOL(dlarre_) - LOAD_SYMBOL(dlarrk_) - LOAD_SYMBOL(dlarrj_) - LOAD_SYMBOL(dlarrv_) - LOAD_SYMBOL(dlarrr_) - LOAD_SYMBOL(dlartv_) - LOAD_SYMBOL(dlartg_) - LOAD_SYMBOL(dlarz_) - LOAD_SYMBOL(dlaruv_) - LOAD_SYMBOL(dlarzt_) - LOAD_SYMBOL(dlarzb_) - LOAD_SYMBOL(dlascl_) - LOAD_SYMBOL(dlas2_) - LOAD_SYMBOL(dlasd1_) - LOAD_SYMBOL(dlasd0_) - LOAD_SYMBOL(dlasd3_) - LOAD_SYMBOL(dlasd2_) - LOAD_SYMBOL(dlasd5_) - LOAD_SYMBOL(dlasd4_) - LOAD_SYMBOL(dlasd7_) - LOAD_SYMBOL(dlasd6_) - LOAD_SYMBOL(dlasda_) - LOAD_SYMBOL(dlasd8_) - LOAD_SYMBOL(dlasdt_) - LOAD_SYMBOL(dlasdq_) - LOAD_SYMBOL(dlasq1_) - LOAD_SYMBOL(dlaset_) - LOAD_SYMBOL(dlasq3_) - LOAD_SYMBOL(dlasq2_) - LOAD_SYMBOL(dlasq5_) - LOAD_SYMBOL(dlasq4_) - LOAD_SYMBOL(dlasr_) - LOAD_SYMBOL(dlasq6_) - LOAD_SYMBOL(dlassq_) - LOAD_SYMBOL(dlasrt_) - LOAD_SYMBOL(dlaswp_) - LOAD_SYMBOL(dlasv2_) - LOAD_SYMBOL(dlasyf_) - LOAD_SYMBOL(dlasy2_) - LOAD_SYMBOL(dlatdf_) - LOAD_SYMBOL(dlatbs_) - LOAD_SYMBOL(dlatrd_) - LOAD_SYMBOL(dlatps_) - LOAD_SYMBOL(dlatrz_) - LOAD_SYMBOL(dlatrs_) - LOAD_SYMBOL(dlauu2_) - LOAD_SYMBOL(dlatzm_) - // LOAD_SYMBOL(dlazq3_) - LOAD_SYMBOL(dlauum_) - LOAD_SYMBOL(dopgtr_) - // LOAD_SYMBOL(dlazq4_) - LOAD_SYMBOL(dorg2l_) - LOAD_SYMBOL(dopmtr_) - LOAD_SYMBOL(dorgbr_) - LOAD_SYMBOL(dorg2r_) - LOAD_SYMBOL(dorgl2_) - LOAD_SYMBOL(dorghr_) - LOAD_SYMBOL(dorgql_) - LOAD_SYMBOL(dorglq_) - LOAD_SYMBOL(dorgr2_) - LOAD_SYMBOL(dorgqr_) - LOAD_SYMBOL(dorgtr_) - LOAD_SYMBOL(dorgrq_) - LOAD_SYMBOL(dorm2r_) - LOAD_SYMBOL(dorm2l_) - LOAD_SYMBOL(dormhr_) - LOAD_SYMBOL(dormbr_) - LOAD_SYMBOL(dormlq_) - LOAD_SYMBOL(dorml2_) - LOAD_SYMBOL(dormqr_) - LOAD_SYMBOL(dormql_) - LOAD_SYMBOL(dormr3_) - LOAD_SYMBOL(dormr2_) - LOAD_SYMBOL(dormrz_) - LOAD_SYMBOL(dormrq_) - LOAD_SYMBOL(dpbcon_) - LOAD_SYMBOL(dormtr_) - LOAD_SYMBOL(dpbrfs_) - LOAD_SYMBOL(dpbequ_) - LOAD_SYMBOL(dpbsv_) - LOAD_SYMBOL(dpbstf_) - LOAD_SYMBOL(dpbtf2_) - LOAD_SYMBOL(dpbsvx_) - LOAD_SYMBOL(dpbtrs_) - LOAD_SYMBOL(dpbtrf_) - LOAD_SYMBOL(dpoequ_) - LOAD_SYMBOL(dpocon_) - LOAD_SYMBOL(dposv_) - LOAD_SYMBOL(dporfs_) - LOAD_SYMBOL(dpotf2_) - LOAD_SYMBOL(dposvx_) - LOAD_SYMBOL(dpotri_) - LOAD_SYMBOL(dpotrf_) - LOAD_SYMBOL(dppcon_) - LOAD_SYMBOL(dpotrs_) - LOAD_SYMBOL(dpprfs_) - LOAD_SYMBOL(dppequ_) - LOAD_SYMBOL(dppsvx_) - LOAD_SYMBOL(dppsv_) - LOAD_SYMBOL(dpptri_) - LOAD_SYMBOL(dpptrf_) - LOAD_SYMBOL(dptcon_) - LOAD_SYMBOL(dpptrs_) - LOAD_SYMBOL(dptrfs_) - LOAD_SYMBOL(dpteqr_) - LOAD_SYMBOL(dptsvx_) - LOAD_SYMBOL(dptsv_) - LOAD_SYMBOL(dpttrs_) - LOAD_SYMBOL(dpttrf_) - LOAD_SYMBOL(drscl_) - LOAD_SYMBOL(dptts2_) - LOAD_SYMBOL(dsbevd_) - LOAD_SYMBOL(dsbev_) - LOAD_SYMBOL(dsbgst_) - LOAD_SYMBOL(dsbevx_) - LOAD_SYMBOL(dsbgvd_) - LOAD_SYMBOL(dsbgv_) - LOAD_SYMBOL(dsbtrd_) - LOAD_SYMBOL(dsbgvx_) - LOAD_SYMBOL(dspcon_) - LOAD_SYMBOL(dsgesv_) - LOAD_SYMBOL(dspevd_) - LOAD_SYMBOL(dspev_) - LOAD_SYMBOL(dspgst_) - LOAD_SYMBOL(dspevx_) - LOAD_SYMBOL(dspgvd_) - LOAD_SYMBOL(dspgv_) - LOAD_SYMBOL(dsprfs_) - LOAD_SYMBOL(dspgvx_) - LOAD_SYMBOL(dspsvx_) - LOAD_SYMBOL(dspsv_) - LOAD_SYMBOL(dsptrf_) - LOAD_SYMBOL(dsptrd_) - LOAD_SYMBOL(dsptrs_) - LOAD_SYMBOL(dsptri_) - LOAD_SYMBOL(dstedc_) - LOAD_SYMBOL(dstebz_) - LOAD_SYMBOL(dstein_) - LOAD_SYMBOL(dstegr_) - LOAD_SYMBOL(dsteqr_) - LOAD_SYMBOL(dstemr_) - LOAD_SYMBOL(dstev_) - LOAD_SYMBOL(dsterf_) - LOAD_SYMBOL(dstevr_) - LOAD_SYMBOL(dstevd_) - LOAD_SYMBOL(dsycon_) - LOAD_SYMBOL(dstevx_) - LOAD_SYMBOL(dsyevd_) - LOAD_SYMBOL(dsyev_) - LOAD_SYMBOL(dsyevx_) - LOAD_SYMBOL(dsyevr_) - LOAD_SYMBOL(dsygst_) - LOAD_SYMBOL(dsygs2_) - LOAD_SYMBOL(dsygvd_) - LOAD_SYMBOL(dsygv_) - LOAD_SYMBOL(dsyrfs_) - LOAD_SYMBOL(dsygvx_) - LOAD_SYMBOL(dsysvx_) - LOAD_SYMBOL(dsysv_) - LOAD_SYMBOL(dsytf2_) - LOAD_SYMBOL(dsytd2_) - LOAD_SYMBOL(dsytrf_) - LOAD_SYMBOL(dsytrd_) - LOAD_SYMBOL(dsytrs_) - LOAD_SYMBOL(dsytri_) - LOAD_SYMBOL(dtbrfs_) - LOAD_SYMBOL(dtbcon_) - LOAD_SYMBOL(dtgevc_) - LOAD_SYMBOL(dtbtrs_) - LOAD_SYMBOL(dtgexc_) - LOAD_SYMBOL(dtgex2_) - LOAD_SYMBOL(dtgsja_) - LOAD_SYMBOL(dtgsen_) - LOAD_SYMBOL(dtgsy2_) - LOAD_SYMBOL(dtgsna_) - LOAD_SYMBOL(dtpcon_) - LOAD_SYMBOL(dtgsyl_) - LOAD_SYMBOL(dtptri_) - LOAD_SYMBOL(dtprfs_) - LOAD_SYMBOL(dtrcon_) - LOAD_SYMBOL(dtptrs_) - LOAD_SYMBOL(dtrexc_) - LOAD_SYMBOL(dtrevc_) - LOAD_SYMBOL(dtrsen_) - LOAD_SYMBOL(dtrrfs_) - LOAD_SYMBOL(dtrsyl_) - LOAD_SYMBOL(dtrsna_) - LOAD_SYMBOL(dtrtri_) - LOAD_SYMBOL(dtrti2_) - LOAD_SYMBOL(dtzrqf_) - LOAD_SYMBOL(dtrtrs_) - LOAD_SYMBOL(ieeeck_) - LOAD_SYMBOL(dtzrzf_) - LOAD_SYMBOL(ilaver_) - LOAD_SYMBOL(ilaenv_) - LOAD_SYMBOL(lsamen_) - LOAD_SYMBOL(iparmq_) - LOAD_SYMBOL(sbdsqr_) - LOAD_SYMBOL(sbdsdc_) - LOAD_SYMBOL(sgbbrd_) - LOAD_SYMBOL(sdisna_) - LOAD_SYMBOL(sgbequ_) - LOAD_SYMBOL(sgbcon_) - LOAD_SYMBOL(sgbsv_) - LOAD_SYMBOL(sgbrfs_) - LOAD_SYMBOL(sgbtf2_) - LOAD_SYMBOL(sgbsvx_) - LOAD_SYMBOL(sgbtrs_) - LOAD_SYMBOL(sgbtrf_) - LOAD_SYMBOL(sgebal_) - LOAD_SYMBOL(sgebak_) - LOAD_SYMBOL(sgebrd_) - LOAD_SYMBOL(sgebd2_) - LOAD_SYMBOL(sgeequ_) - LOAD_SYMBOL(sgecon_) - // LOAD_SYMBOL(sgeesx_) - // LOAD_SYMBOL(sgees_) - LOAD_SYMBOL(sgeevx_) - LOAD_SYMBOL(sgeev_) - LOAD_SYMBOL(sgegv_) - LOAD_SYMBOL(sgegs_) - LOAD_SYMBOL(sgehrd_) - LOAD_SYMBOL(sgehd2_) - LOAD_SYMBOL(sgelqf_) - LOAD_SYMBOL(sgelq2_) - LOAD_SYMBOL(sgelsd_) - LOAD_SYMBOL(sgels_) - LOAD_SYMBOL(sgelsx_) - LOAD_SYMBOL(sgelss_) - LOAD_SYMBOL(sgeql2_) - LOAD_SYMBOL(sgelsy_) - LOAD_SYMBOL(sgeqp3_) - LOAD_SYMBOL(sgeqlf_) - LOAD_SYMBOL(sgeqr2_) - LOAD_SYMBOL(sgeqpf_) - LOAD_SYMBOL(sgerfs_) - LOAD_SYMBOL(sgeqrf_) - LOAD_SYMBOL(sgerqf_) - LOAD_SYMBOL(sgerq2_) - LOAD_SYMBOL(sgesdd_) - LOAD_SYMBOL(sgesc2_) - LOAD_SYMBOL(sgesvd_) - LOAD_SYMBOL(sgesv_) - LOAD_SYMBOL(sgetc2_) - LOAD_SYMBOL(sgesvx_) - LOAD_SYMBOL(sgetrf_) - LOAD_SYMBOL(sgetf2_) - LOAD_SYMBOL(sgetrs_) - LOAD_SYMBOL(sgetri_) - LOAD_SYMBOL(sggbal_) - LOAD_SYMBOL(sggbak_) - // LOAD_SYMBOL(sggesx_) - // LOAD_SYMBOL(sgges_) - LOAD_SYMBOL(sggevx_) - LOAD_SYMBOL(sggev_) - LOAD_SYMBOL(sgghrd_) - LOAD_SYMBOL(sggglm_) - LOAD_SYMBOL(sggqrf_) - LOAD_SYMBOL(sgglse_) - LOAD_SYMBOL(sggsvd_) - LOAD_SYMBOL(sggrqf_) - LOAD_SYMBOL(sgtcon_) - LOAD_SYMBOL(sggsvp_) - LOAD_SYMBOL(sgtsv_) - LOAD_SYMBOL(sgtrfs_) - LOAD_SYMBOL(sgttrf_) - LOAD_SYMBOL(sgtsvx_) - LOAD_SYMBOL(sgtts2_) - LOAD_SYMBOL(sgttrs_) - LOAD_SYMBOL(shsein_) - LOAD_SYMBOL(shgeqz_) - LOAD_SYMBOL(sisnan_) - LOAD_SYMBOL(shseqr_) - LOAD_SYMBOL(slabrd_) - LOAD_SYMBOL(slabad_) - LOAD_SYMBOL(slacon_) - LOAD_SYMBOL(slacn2_) - LOAD_SYMBOL(sladiv_) - LOAD_SYMBOL(slacpy_) - LOAD_SYMBOL(slaebz_) - LOAD_SYMBOL(slae2_) - LOAD_SYMBOL(slaed1_) - LOAD_SYMBOL(slaed0_) - LOAD_SYMBOL(slaed3_) - LOAD_SYMBOL(slaed2_) - LOAD_SYMBOL(slaed5_) - LOAD_SYMBOL(slaed4_) - LOAD_SYMBOL(slaed7_) - LOAD_SYMBOL(slaed6_) - LOAD_SYMBOL(slaed9_) - LOAD_SYMBOL(slaed8_) - LOAD_SYMBOL(slaein_) - LOAD_SYMBOL(slaeda_) - LOAD_SYMBOL(slaexc_) - LOAD_SYMBOL(slaev2_) - LOAD_SYMBOL(slag2d_) - LOAD_SYMBOL(slag2_) - LOAD_SYMBOL(slagtf_) - LOAD_SYMBOL(slags2_) - LOAD_SYMBOL(slagts_) - LOAD_SYMBOL(slagtm_) - LOAD_SYMBOL(slahqr_) - LOAD_SYMBOL(slagv2_) - LOAD_SYMBOL(slahrd_) - LOAD_SYMBOL(slahr2_) - LOAD_SYMBOL(slaisnan_) - LOAD_SYMBOL(slaic1_) - LOAD_SYMBOL(slals0_) - LOAD_SYMBOL(slaln2_) - LOAD_SYMBOL(slalsd_) - LOAD_SYMBOL(slalsa_) - LOAD_SYMBOL(slaneg_) - LOAD_SYMBOL(slamrg_) - LOAD_SYMBOL(slange_) - LOAD_SYMBOL(slangb_) - LOAD_SYMBOL(slanhs_) - LOAD_SYMBOL(slangt_) - LOAD_SYMBOL(slansp_) - LOAD_SYMBOL(slansb_) - LOAD_SYMBOL(slansy_) - LOAD_SYMBOL(slanst_) - LOAD_SYMBOL(slantp_) - LOAD_SYMBOL(slantb_) - LOAD_SYMBOL(slanv2_) - LOAD_SYMBOL(slantr_) - LOAD_SYMBOL(slapmt_) - LOAD_SYMBOL(slapll_) - LOAD_SYMBOL(slapy3_) - LOAD_SYMBOL(slapy2_) - LOAD_SYMBOL(slaqge_) - LOAD_SYMBOL(slaqgb_) - LOAD_SYMBOL(slaqps_) - LOAD_SYMBOL(slaqp2_) - LOAD_SYMBOL(slaqr1_) - LOAD_SYMBOL(slaqr0_) - LOAD_SYMBOL(slaqr3_) - LOAD_SYMBOL(slaqr2_) - LOAD_SYMBOL(slaqr5_) - LOAD_SYMBOL(slaqr4_) - LOAD_SYMBOL(slaqsp_) - LOAD_SYMBOL(slaqsb_) - LOAD_SYMBOL(slaqtr_) - LOAD_SYMBOL(slaqsy_) - LOAD_SYMBOL(slar2v_) - LOAD_SYMBOL(slar1v_) - LOAD_SYMBOL(slarfb_) - LOAD_SYMBOL(slarf_) - LOAD_SYMBOL(slarft_) - LOAD_SYMBOL(slarfg_) - LOAD_SYMBOL(slargv_) - LOAD_SYMBOL(slarfx_) - LOAD_SYMBOL(slarra_) - LOAD_SYMBOL(slarnv_) - LOAD_SYMBOL(slarrc_) - LOAD_SYMBOL(slarrb_) - LOAD_SYMBOL(slarre_) - LOAD_SYMBOL(slarrd_) - LOAD_SYMBOL(slarrj_) - LOAD_SYMBOL(slarrf_) - LOAD_SYMBOL(slarrk_) - LOAD_SYMBOL(slarrr_) - LOAD_SYMBOL(slarrv_) - LOAD_SYMBOL(slartg_) - LOAD_SYMBOL(slartv_) - LOAD_SYMBOL(slaruv_) - LOAD_SYMBOL(slarz_) - LOAD_SYMBOL(slarzb_) - LOAD_SYMBOL(slarzt_) - LOAD_SYMBOL(slas2_) - LOAD_SYMBOL(slascl_) - LOAD_SYMBOL(slasd0_) - LOAD_SYMBOL(slasd1_) - LOAD_SYMBOL(slasd2_) - LOAD_SYMBOL(slasd3_) - LOAD_SYMBOL(slasd4_) - LOAD_SYMBOL(slasd5_) - LOAD_SYMBOL(slasd6_) - LOAD_SYMBOL(slasd7_) - LOAD_SYMBOL(slasd8_) - LOAD_SYMBOL(slasda_) - LOAD_SYMBOL(slasdq_) - LOAD_SYMBOL(slasdt_) - LOAD_SYMBOL(slaset_) - LOAD_SYMBOL(slasq1_) - LOAD_SYMBOL(slasq2_) - LOAD_SYMBOL(slasq3_) - LOAD_SYMBOL(slasq4_) - LOAD_SYMBOL(slasq5_) - LOAD_SYMBOL(slasq6_) - LOAD_SYMBOL(slasr_) - LOAD_SYMBOL(slasrt_) - LOAD_SYMBOL(slassq_) - LOAD_SYMBOL(slasv2_) - LOAD_SYMBOL(slaswp_) - LOAD_SYMBOL(slasy2_) - LOAD_SYMBOL(slasyf_) - LOAD_SYMBOL(slatbs_) - LOAD_SYMBOL(slatdf_) - LOAD_SYMBOL(slatps_) - LOAD_SYMBOL(slatrd_) - LOAD_SYMBOL(slatrs_) - LOAD_SYMBOL(slatrz_) - LOAD_SYMBOL(slatzm_) - LOAD_SYMBOL(slauu2_) - LOAD_SYMBOL(slauum_) - // LOAD_SYMBOL(slazq3_) - // LOAD_SYMBOL(slazq4_) - LOAD_SYMBOL(sopgtr_) - LOAD_SYMBOL(sopmtr_) - LOAD_SYMBOL(sorg2l_) - LOAD_SYMBOL(sorg2r_) - LOAD_SYMBOL(sorgbr_) - LOAD_SYMBOL(sorghr_) - LOAD_SYMBOL(sorgl2_) - LOAD_SYMBOL(sorglq_) - LOAD_SYMBOL(sorgql_) - LOAD_SYMBOL(sorgqr_) - LOAD_SYMBOL(sorgr2_) - LOAD_SYMBOL(sorgrq_) - LOAD_SYMBOL(sorgtr_) - LOAD_SYMBOL(sorm2l_) - LOAD_SYMBOL(sorm2r_) - LOAD_SYMBOL(sormbr_) - LOAD_SYMBOL(sormhr_) - LOAD_SYMBOL(sorml2_) - LOAD_SYMBOL(sormlq_) - LOAD_SYMBOL(sormql_) - LOAD_SYMBOL(sormqr_) - LOAD_SYMBOL(sormr2_) - LOAD_SYMBOL(sormr3_) - LOAD_SYMBOL(sormrq_) - LOAD_SYMBOL(sormrz_) - LOAD_SYMBOL(sormtr_) - LOAD_SYMBOL(spbcon_) - LOAD_SYMBOL(spbequ_) - LOAD_SYMBOL(spbrfs_) - LOAD_SYMBOL(spbstf_) - LOAD_SYMBOL(spbsv_) - LOAD_SYMBOL(spbsvx_) - LOAD_SYMBOL(spbtf2_) - LOAD_SYMBOL(spbtrf_) - LOAD_SYMBOL(spbtrs_) - LOAD_SYMBOL(spocon_) - LOAD_SYMBOL(spoequ_) - LOAD_SYMBOL(sporfs_) - LOAD_SYMBOL(sposv_) - LOAD_SYMBOL(sposvx_) - LOAD_SYMBOL(spotf2_) - LOAD_SYMBOL(spotrf_) - LOAD_SYMBOL(spotri_) - LOAD_SYMBOL(spotrs_) - LOAD_SYMBOL(sppcon_) - LOAD_SYMBOL(sppequ_) - LOAD_SYMBOL(spprfs_) - LOAD_SYMBOL(sppsv_) - LOAD_SYMBOL(sppsvx_) - LOAD_SYMBOL(spptrf_) - LOAD_SYMBOL(spptri_) - LOAD_SYMBOL(spptrs_) - LOAD_SYMBOL(sptcon_) - LOAD_SYMBOL(spteqr_) - LOAD_SYMBOL(sptrfs_) - LOAD_SYMBOL(sptsv_) - LOAD_SYMBOL(sptsvx_) - LOAD_SYMBOL(spttrf_) - LOAD_SYMBOL(spttrs_) - LOAD_SYMBOL(sptts2_) - LOAD_SYMBOL(srscl_) - LOAD_SYMBOL(ssbev_) - LOAD_SYMBOL(ssbevd_) - LOAD_SYMBOL(ssbevx_) - LOAD_SYMBOL(ssbgst_) - LOAD_SYMBOL(ssbgv_) - LOAD_SYMBOL(ssbgvd_) - LOAD_SYMBOL(ssbgvx_) - LOAD_SYMBOL(ssbtrd_) - LOAD_SYMBOL(sspcon_) - LOAD_SYMBOL(sspev_) - LOAD_SYMBOL(sspevd_) - LOAD_SYMBOL(sspevx_) - LOAD_SYMBOL(sspgst_) - LOAD_SYMBOL(sspgv_) - LOAD_SYMBOL(sspgvd_) - LOAD_SYMBOL(sspgvx_) - LOAD_SYMBOL(ssprfs_) - LOAD_SYMBOL(sspsv_) - LOAD_SYMBOL(sspsvx_) - LOAD_SYMBOL(ssptrd_) - LOAD_SYMBOL(ssptrf_) - LOAD_SYMBOL(ssptri_) - LOAD_SYMBOL(ssptrs_) - LOAD_SYMBOL(sstebz_) - LOAD_SYMBOL(sstedc_) - LOAD_SYMBOL(sstegr_) - LOAD_SYMBOL(sstein_) - LOAD_SYMBOL(sstemr_) - LOAD_SYMBOL(ssteqr_) - LOAD_SYMBOL(ssterf_) - LOAD_SYMBOL(sstev_) - LOAD_SYMBOL(sstevd_) - LOAD_SYMBOL(sstevr_) - LOAD_SYMBOL(sstevx_) - LOAD_SYMBOL(ssycon_) - LOAD_SYMBOL(ssyev_) - LOAD_SYMBOL(ssyevd_) - LOAD_SYMBOL(ssyevr_) - LOAD_SYMBOL(ssyevx_) - LOAD_SYMBOL(ssygs2_) - LOAD_SYMBOL(ssygst_) - LOAD_SYMBOL(ssygv_) - LOAD_SYMBOL(ssygvd_) - LOAD_SYMBOL(ssygvx_) - LOAD_SYMBOL(ssyrfs_) - LOAD_SYMBOL(ssysv_) - LOAD_SYMBOL(ssysvx_) - LOAD_SYMBOL(ssytd2_) - LOAD_SYMBOL(ssytf2_) - LOAD_SYMBOL(ssytrd_) - LOAD_SYMBOL(ssytrf_) - LOAD_SYMBOL(ssytri_) - LOAD_SYMBOL(ssytrs_) - LOAD_SYMBOL(stbcon_) - LOAD_SYMBOL(stbrfs_) - LOAD_SYMBOL(stbtrs_) - LOAD_SYMBOL(stgevc_) - LOAD_SYMBOL(stgex2_) - LOAD_SYMBOL(stgexc_) - LOAD_SYMBOL(stgsen_) - LOAD_SYMBOL(stgsja_) - LOAD_SYMBOL(stgsna_) - LOAD_SYMBOL(stgsy2_) - LOAD_SYMBOL(stgsyl_) - LOAD_SYMBOL(stpcon_) - LOAD_SYMBOL(stprfs_) - LOAD_SYMBOL(stptri_) - LOAD_SYMBOL(stptrs_) - LOAD_SYMBOL(strcon_) - LOAD_SYMBOL(strevc_) - LOAD_SYMBOL(strexc_) - LOAD_SYMBOL(strrfs_) - LOAD_SYMBOL(strsen_) - LOAD_SYMBOL(strsna_) - LOAD_SYMBOL(strsyl_) - LOAD_SYMBOL(strti2_) - LOAD_SYMBOL(strtri_) - LOAD_SYMBOL(strtrs_) - LOAD_SYMBOL(stzrqf_) - LOAD_SYMBOL(stzrzf_) - LOAD_SYMBOL(dlamch_) - // LOAD_SYMBOL(dlamc1_) - // LOAD_SYMBOL(dlamc2_) - LOAD_SYMBOL(dlamc3_) - // LOAD_SYMBOL(dlamc4_) - // LOAD_SYMBOL(dlamc5_) - LOAD_SYMBOL(dsecnd_) - LOAD_SYMBOL(lsame_) - LOAD_SYMBOL(second_) - LOAD_SYMBOL(slamch_) - // LOAD_SYMBOL(slamc1_) - // LOAD_SYMBOL(slamc2_) - LOAD_SYMBOL(slamc3_) - // LOAD_SYMBOL(slamc4_) - // LOAD_SYMBOL(slamc5_) - -#undef LOAD_SYMBOL - return JNI_VERSION_1_6; } void JNI_OnUnload(UNUSED JavaVM *vm, UNUSED void *reserved) { - dlclose(lapack); + dlclose(libhandle); } From 98e428455d7dc7e0200a47311c593ef5503ad019 Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Mon, 3 May 2021 11:09:24 +0200 Subject: [PATCH 35/42] Add null and index checks for double/float arrays --- .../dev/ludovic/netlib/blas/AbstractBLAS.java | 198 +++++++++++++++++- 1 file changed, 190 insertions(+), 8 deletions(-) diff --git a/blas/src/main/java/dev/ludovic/netlib/blas/AbstractBLAS.java b/blas/src/main/java/dev/ludovic/netlib/blas/AbstractBLAS.java index f40d8719..d7643b72 100644 --- a/blas/src/main/java/dev/ludovic/netlib/blas/AbstractBLAS.java +++ b/blas/src/main/java/dev/ludovic/netlib/blas/AbstractBLAS.java @@ -202,6 +202,10 @@ public float sdsdot(int n, float sb, float[] x, int offsetx, int incx, float[] y if (n <= 0) { return 0.0f; } + Objects.requireNonNull(x); + Objects.requireNonNull(y); + checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); + checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); return sdsdotK(n, sb, x, offsetx, incx, y, offsety, incy); } @@ -212,7 +216,12 @@ public void dgbmv(String trans, int m, int n, int kl, int ku, double alpha, doub } public void dgbmv(String trans, int m, int n, int kl, int ku, double alpha, double[] a, int offseta, int lda, double[] x, int offsetx, int incx, double beta, double[] y, int offsety, int incy) { - //FIXME: add arguments checks + Objects.requireNonNull(a); + Objects.requireNonNull(x); + Objects.requireNonNull(y); + checkIndex(offseta + n * lda - 1, a.length); + checkIndex(offsetx + ((lsame("N", trans) ? n : m) - 1) * Math.abs(incx), x.length); + checkIndex(offsety + ((lsame("N", trans) ? m : n) - 1) * Math.abs(incy), y.length); dgbmvK(trans, m, n, kl, ku, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); } @@ -223,7 +232,12 @@ public void sgbmv(String trans, int m, int n, int kl, int ku, float alpha, float } public void sgbmv(String trans, int m, int n, int kl, int ku, float alpha, float[] a, int offseta, int lda, float[] x, int offsetx, int incx, float beta, float[] y, int offsety, int incy) { - //FIXME: add arguments checks + Objects.requireNonNull(a); + Objects.requireNonNull(x); + Objects.requireNonNull(y); + checkIndex(offseta + n * lda - 1, a.length); + checkIndex(offsetx + ((lsame("N", trans) ? n : m) - 1) * Math.abs(incx), x.length); + checkIndex(offsety + ((lsame("N", trans) ? m : n) - 1) * Math.abs(incy), y.length); sgbmvK(trans, m, n, kl, ku, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); } @@ -246,6 +260,12 @@ public void dgemm(String transa, String transb, int m, int n, int k, double alph if (m == 0 || n == 0 || ((alpha == 0.0 || k == 0) && beta == 1.0)) { return; } + Objects.requireNonNull(a); + Objects.requireNonNull(b); + Objects.requireNonNull(c); + checkIndex(offseta + (lsame("N", transa) ? k : m) * lda - 1, a.length); + checkIndex(offsetb + (lsame("N", transb) ? n : k) * ldb - 1, b.length); + checkIndex(offsetc + m * n - 1, c.length); dgemmK(transa, transb, m, n, k, alpha, a, offseta, lda, b, offsetb, ldb, beta, c, offsetc, ldc); } @@ -268,6 +288,12 @@ public void sgemm(String transa, String transb, int m, int n, int k, float alpha if (m == 0 || n == 0 || ((alpha == 0.0f || k == 0) && beta == 1.0f)) { return; } + Objects.requireNonNull(a); + Objects.requireNonNull(b); + Objects.requireNonNull(c); + checkIndex(offseta + (lsame("N", transa) ? k : m) * lda - 1, a.length); + checkIndex(offsetb + (lsame("N", transb) ? n : k) * ldb - 1, b.length); + checkIndex(offsetc + m * n - 1, c.length); sgemmK(transa, transb, m, n, k, alpha, a, offseta, lda, b, offsetb, ldb, beta, c, offsetc, ldc); } @@ -288,6 +314,12 @@ public void dgemv(String trans, int m, int n, double alpha, double[] a, int offs if (m == 0 || n == 0) { return; } + Objects.requireNonNull(a); + Objects.requireNonNull(x); + Objects.requireNonNull(y); + checkIndex(offseta + n * lda - 1, a.length); + checkIndex(offsetx + ((lsame("N", trans) ? n : m) - 1) * Math.abs(incx), x.length); + checkIndex(offsety + ((lsame("N", trans) ? m : n) - 1) * Math.abs(incy), y.length); dgemvK(trans, m, n, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); } @@ -308,6 +340,12 @@ public void sgemv(String trans, int m, int n, float alpha, float[] a, int offset if (m == 0 || n == 0) { return; } + Objects.requireNonNull(a); + Objects.requireNonNull(x); + Objects.requireNonNull(y); + checkIndex(offseta + n * lda - 1, a.length); + checkIndex(offsetx + ((lsame("N", trans) ? n : m) - 1) * Math.abs(incx), x.length); + checkIndex(offsety + ((lsame("N", trans) ? m : n) - 1) * Math.abs(incy), y.length); sgemvK(trans, m, n, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); } @@ -327,6 +365,12 @@ public void dger(int m, int n, double alpha, double[] x, int offsetx, int incx, if (m == 0 || n == 0) { return; } + Objects.requireNonNull(x); + Objects.requireNonNull(y); + Objects.requireNonNull(a); + checkIndex(offsetx + (m - 1) * Math.abs(incx), x.length); + checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); + checkIndex(offseta + n * lda - 1, a.length); if (alpha != 0.0) { dgerK(m, n, alpha, x, offsetx, incx, y, offsety, incy, a, offseta, lda); } @@ -347,6 +391,12 @@ public void sger(int m, int n, float alpha, float[] x, int offsetx, int incx, fl if (m == 0 || n == 0) { return; } + Objects.requireNonNull(x); + Objects.requireNonNull(y); + Objects.requireNonNull(a); + checkIndex(offsetx + (m - 1) * Math.abs(incx), x.length); + checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); + checkIndex(offseta + n * lda - 1, a.length); if (alpha != 0.0f) { sgerK(m, n, alpha, x, offsetx, incx, y, offsety, incy, a, offseta, lda); } @@ -368,6 +418,8 @@ public double dnrm2(int n, double[] x, int offsetx, int incx) { if (n == 1) { return Math.abs(x[offsetx + 0]); } + Objects.requireNonNull(x); + checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); return dnrm2K(n, x, offsetx, incx); } @@ -387,6 +439,8 @@ public float snrm2(int n, float[] x, int offsetx, int incx) { if (n == 1) { return Math.abs(x[offsetx + 0]); } + Objects.requireNonNull(x); + checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); return snrm2K(n, x, offsetx, incx); } @@ -400,6 +454,10 @@ public void drot(int n, double[] x, int offsetx, int incx, double[] y, int offse if (n <= 0) { return; } + Objects.requireNonNull(x); + Objects.requireNonNull(y); + checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); + checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); drotK(n, x, offsetx, incx, y, offsety, incy, c, s); } @@ -413,6 +471,10 @@ public void srot(int n, float[] x, int offsetx, int incx, float[] y, int offsety if (n <= 0) { return; } + Objects.requireNonNull(x); + Objects.requireNonNull(y); + checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); + checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); srotK(n, x, offsetx, incx, y, offsety, incy, c, s); } @@ -469,7 +531,12 @@ public void drotm(int n, double[] x, int incx, double[] y, int incy, double[] pa } public void drotm(int n, double[] x, int offsetx, int incx, double[] y, int offsety, int incy, double[] param, int offsetparam) { - //FIXME: add arguments checks + Objects.requireNonNull(x); + Objects.requireNonNull(y); + Objects.requireNonNull(param); + checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); + checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); + checkIndex(offsetparam + 4, param.length); /* param.length == 5 */ drotmK(n, x, offsetx, incx, y, offsety, incy, param, offsetparam); } @@ -480,7 +547,12 @@ public void srotm(int n, float[] x, int incx, float[] y, int incy, float[] param } public void srotm(int n, float[] x, int offsetx, int incx, float[] y, int offsety, int incy, float[] param, int offsetparam) { - //FIXME: add arguments checks + Objects.requireNonNull(x); + Objects.requireNonNull(y); + Objects.requireNonNull(param); + checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); + checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); + checkIndex(offsetparam + 4, param.length); /* param.length == 5 */ srotmK(n, x, offsetx, incx, y, offsety, incy, param, offsetparam); } @@ -491,7 +563,11 @@ public void drotmg(org.netlib.util.doubleW dd1, org.netlib.util.doubleW dd2, org } public void drotmg(org.netlib.util.doubleW dd1, org.netlib.util.doubleW dd2, org.netlib.util.doubleW dx1, double dy1, double[] param, int offsetparam) { - //FIXME: add arguments checks + Objects.requireNonNull(dd1); + Objects.requireNonNull(dd2); + Objects.requireNonNull(dx1); + Objects.requireNonNull(param); + checkIndex(offsetparam + 4, param.length); drotmgK(dd1, dd2, dx1, dy1, param, offsetparam); } @@ -502,7 +578,11 @@ public void srotmg(org.netlib.util.floatW sd1, org.netlib.util.floatW sd2, org.n } public void srotmg(org.netlib.util.floatW sd1, org.netlib.util.floatW sd2, org.netlib.util.floatW sx1, float sy1, float[] param, int offsetparam) { - //FIXME: add arguments checks + Objects.requireNonNull(sd1); + Objects.requireNonNull(sd2); + Objects.requireNonNull(sx1); + Objects.requireNonNull(param); + checkIndex(offsetparam + 4, param.length); srotmgK(sd1, sd2, sx1, sy1, param, offsetparam); } @@ -513,7 +593,12 @@ public void dsbmv(String uplo, int n, int k, double alpha, double[] a, int lda, } public void dsbmv(String uplo, int n, int k, double alpha, double[] a, int offseta, int lda, double[] x, int offsetx, int incx, double beta, double[] y, int offsety, int incy) { - //FIXME: add arguments checks + Objects.requireNonNull(a); + Objects.requireNonNull(x); + Objects.requireNonNull(y); + checkIndex(offseta + n * lda - 1, a.length); + checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); + checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); dsbmvK(uplo, n, k, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); } @@ -524,7 +609,12 @@ public void ssbmv(String uplo, int n, int k, float alpha, float[] a, int lda, fl } public void ssbmv(String uplo, int n, int k, float alpha, float[] a, int offseta, int lda, float[] x, int offsetx, int incx, float beta, float[] y, int offsety, int incy) { - //FIXME: add arguments checks + Objects.requireNonNull(a); + Objects.requireNonNull(x); + Objects.requireNonNull(y); + checkIndex(offseta + n * lda - 1, a.length); + checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); + checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); ssbmvK(uplo, n, k, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); } @@ -545,6 +635,8 @@ public void dscal(int n, double alpha, double[] x, int offsetx, int incx) { if (alpha == 1.0) { return; } + Objects.requireNonNull(x); + checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); dscalK(n, alpha, x, offsetx, incx); } @@ -565,6 +657,8 @@ public void sscal(int n, float alpha, float[] x, int offsetx, int incx) { if (alpha == 1.0f) { return; } + Objects.requireNonNull(x); + checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); sscalK(n, alpha, x, offsetx, incx); } @@ -583,6 +677,12 @@ public void dspmv(String uplo, int n, double alpha, double[] a, int offseta, dou if (n == 0) { return; } + Objects.requireNonNull(a); + Objects.requireNonNull(x); + Objects.requireNonNull(y); + checkIndex(offseta + (n * (n + 1) / 2) - 1, a.length); + checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); + checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); dspmvK(uplo, n, alpha, a, offseta, x, offsetx, incx, beta, y, offsety, incy); } @@ -600,6 +700,12 @@ public void sspmv(String uplo, int n, float alpha, float[] a, int offseta, float if (n == 0) { return; } + Objects.requireNonNull(a); + Objects.requireNonNull(x); + Objects.requireNonNull(y); + checkIndex(offseta + (n * (n + 1) / 2) - 1, a.length); + checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); + checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); sspmvK(uplo, n, alpha, a, offseta, x, offsetx, incx, beta, y, offsety, incy); } @@ -617,6 +723,10 @@ public void dspr(String uplo, int n, double alpha, double[] x, int offsetx, int if (n == 0) { return; } + Objects.requireNonNull(x); + Objects.requireNonNull(a); + checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); + checkIndex(offseta + (n * (n + 1) / 2) - 1, a.length); dsprK(uplo, n, alpha, x, offsetx, incx, a, offseta); } @@ -634,6 +744,10 @@ public void sspr(String uplo, int n, float alpha, float[] x, int offsetx, int in if (n == 0) { return; } + Objects.requireNonNull(x); + Objects.requireNonNull(a); + checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); + checkIndex(offseta + (n * (n + 1) / 2) - 1, a.length); ssprK(uplo, n, alpha, x, offsetx, incx, a, offseta); } @@ -652,6 +766,12 @@ public void dspr2(String uplo, int n, double alpha, double[] x, int offsetx, int if (n == 0) { return; } + Objects.requireNonNull(x); + Objects.requireNonNull(y); + Objects.requireNonNull(a); + checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); + checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); + checkIndex(offseta + (n * (n + 1) / 2) - 1, a.length); dspr2K(uplo, n, alpha, x, offsetx, incx, y, offsety, incy, a, offseta); } @@ -670,6 +790,12 @@ public void sspr2(String uplo, int n, float alpha, float[] x, int offsetx, int i if (n == 0) { return; } + Objects.requireNonNull(x); + Objects.requireNonNull(y); + Objects.requireNonNull(a); + checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); + checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); + checkIndex(offseta + (n * (n + 1) / 2) - 1, a.length); sspr2K(uplo, n, alpha, x, offsetx, incx, y, offsety, incy, a, offseta); } @@ -683,6 +809,10 @@ public void dswap(int n, double[] x, int offsetx, int incx, double[] y, int offs if (n <= 0) { return; } + Objects.requireNonNull(x); + Objects.requireNonNull(y); + checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); + checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); dswapK(n, x, offsetx, incx, y, offsety, incy); } @@ -696,6 +826,10 @@ public void sswap(int n, float[] x, int offsetx, int incx, float[] y, int offset if (n <= 0) { return; } + Objects.requireNonNull(x); + Objects.requireNonNull(y); + checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); + checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); sswapK(n, x, offsetx, incx, y, offsety, incy); } @@ -716,6 +850,12 @@ public void dsymm(String side, String uplo, int m, int n, double alpha, double[] if (m == 0 || n == 0 || (alpha == 0.0 && beta == 1.0)) { return; } + Objects.requireNonNull(a); + Objects.requireNonNull(b); + Objects.requireNonNull(c); + checkIndex(offseta + (lsame("L", side) ? m : n) * lda - 1, a.length); + checkIndex(offsetb + n * ldb - 1, a.length); + checkIndex(offsetc + n * ldc, b.length); dsymmK(side, uplo, m, n, alpha, a, offseta, lda, b, offsetb, ldb, beta, c, offsetc, ldc); } @@ -736,6 +876,12 @@ public void ssymm(String side, String uplo, int m, int n, float alpha, float[] a if (m == 0 || n == 0 || (alpha == 0.0f && beta == 1.0f)) { return; } + Objects.requireNonNull(a); + Objects.requireNonNull(b); + Objects.requireNonNull(c); + checkIndex(offseta + (lsame("L", side) ? m : n) * lda - 1, a.length); + checkIndex(offsetb + n * ldb - 1, a.length); + checkIndex(offsetc + n * ldc, b.length); ssymmK(side, uplo, m, n, alpha, a, offseta, lda, b, offsetb, ldb, beta, c, offsetc, ldc); } @@ -754,6 +900,12 @@ public void dsymv(String uplo, int n, double alpha, double[] a, int offseta, int if (n == 0) { return; } + Objects.requireNonNull(a); + Objects.requireNonNull(x); + Objects.requireNonNull(y); + checkIndex(offseta + n * lda - 1, a.length); + checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); + checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); dsymvK(uplo, n, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); } @@ -772,6 +924,12 @@ public void ssymv(String uplo, int n, float alpha, float[] a, int offseta, int l if (n == 0) { return; } + Objects.requireNonNull(a); + Objects.requireNonNull(x); + Objects.requireNonNull(y); + checkIndex(offseta + n * lda - 1, a.length); + checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); + checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); ssymvK(uplo, n, alpha, a, offseta, lda, x, offsetx, incx, beta, y, offsety, incy); } @@ -790,6 +948,10 @@ public void dsyr(String uplo, int n, double alpha, double[] x, int offsetx, int if (n == 0) { return; } + Objects.requireNonNull(x); + Objects.requireNonNull(a); + checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); + checkIndex(offseta + n * lda - 1, a.length); dsyrK(uplo, n, alpha, x, offsetx, incx, a, offseta, lda); } @@ -807,6 +969,10 @@ public void ssyr(String uplo, int n, float alpha, float[] x, int offsetx, int in if (n == 0) { return; } + Objects.requireNonNull(x); + Objects.requireNonNull(a); + checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); + checkIndex(offseta + n * lda - 1, a.length); ssyrK(uplo, n, alpha, x, offsetx, incx, a, offseta, lda); } @@ -825,6 +991,12 @@ public void dsyr2(String uplo, int n, double alpha, double[] x, int offsetx, int if (n == 0) { return; } + Objects.requireNonNull(x); + Objects.requireNonNull(y); + Objects.requireNonNull(a); + checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); + checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); + checkIndex(offseta + n * lda - 1, a.length); dsyr2K(uplo, n, alpha, x, offsetx, incx, y, offsety, incy, a, offseta, lda); } @@ -843,6 +1015,12 @@ public void ssyr2(String uplo, int n, float alpha, float[] x, int offsetx, int i if (n == 0) { return; } + Objects.requireNonNull(x); + Objects.requireNonNull(y); + Objects.requireNonNull(a); + checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); + checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); + checkIndex(offseta + n * lda - 1, a.length); ssyr2K(uplo, n, alpha, x, offsetx, incx, y, offsety, incy, a, offseta, lda); } @@ -1082,6 +1260,8 @@ public int idamax(int n, double[] x, int offsetx, int incx) { if (n == 1) { return 0; } + Objects.requireNonNull(x); + checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); // Fortran arrays use 1-based index return idamaxK(n, x, offsetx, incx) - 1; } @@ -1102,6 +1282,8 @@ public int isamax(int n, float[] x, int offsetx, int incx) { if (n == 1) { return 0; } + Objects.requireNonNull(x); + checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); // Fortran arrays use 1-based index return isamaxK(n, x, offsetx, incx) - 1; } From de18317fd74cc639d2e4761b79f995b922cba62c Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Mon, 3 May 2021 11:10:00 +0200 Subject: [PATCH 36/42] Cache more often --- .github/workflows/build-and-test.yml | 4 +--- .github/workflows/release.yml | 8 ++------ 2 files changed, 3 insertions(+), 9 deletions(-) diff --git a/.github/workflows/build-and-test.yml b/.github/workflows/build-and-test.yml index 78767551..ce01067c 100644 --- a/.github/workflows/build-and-test.yml +++ b/.github/workflows/build-and-test.yml @@ -24,9 +24,7 @@ jobs: uses: actions/cache@v2 with: path: ~/.m2/repository - key: m2-${{ hashFiles('**/pom.xml') }} - restore-keys: | - m2- + key: m2 - name: Install dependencies run: | sudo apt-get -y update diff --git a/.github/workflows/release.yml b/.github/workflows/release.yml index c8ead05d..23f67a24 100644 --- a/.github/workflows/release.yml +++ b/.github/workflows/release.yml @@ -24,9 +24,7 @@ jobs: uses: actions/cache@v2 with: path: ~/.m2/repository - key: m2-${{ hashFiles('**/pom.xml') }} - restore-keys: | - m2- + key: m2 - name: Install dependencies run: | sudo apt-get -y update @@ -59,9 +57,7 @@ jobs: uses: actions/cache@v2 with: path: ~/.m2/repository - key: m2-${{ hashFiles('**/pom.xml') }} - restore-keys: | - m2- + key: m2 - name: Install dependencies run: | sudo apt-get -y update From 85c6e10bfd36936160136d4cda63f37fef09d9ba Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Mon, 3 May 2021 11:10:41 +0200 Subject: [PATCH 37/42] Use full name of library for dev.ludovic.netlib.{blas,lapack,arpack}.nativeLib --- arpack/src/main/native/jni.c | 4 +- blas/src/main/native/jni.c | 4 +- generator.py | 134 +++++++++++++++++------------------ lapack/src/main/native/jni.c | 4 +- pom.xml | 2 +- 5 files changed, 74 insertions(+), 74 deletions(-) diff --git a/arpack/src/main/native/jni.c b/arpack/src/main/native/jni.c index 65232011..4a403799 100644 --- a/arpack/src/main/native/jni.c +++ b/arpack/src/main/native/jni.c @@ -1836,7 +1836,7 @@ jint JNI_OnLoad(JavaVM *vm, UNUSED void *reserved) { return -1; } jstring property_nativeLib; - if (!get_system_property(env, (*env)->NewStringUTF(env, "dev.ludovic.netlib.arpack.nativeLib"), (*env)->NewStringUTF(env, "arpack"), &property_nativeLib)) { + if (!get_system_property(env, (*env)->NewStringUTF(env, "dev.ludovic.netlib.arpack.nativeLib"), (*env)->NewStringUTF(env, "libarpack.so.2"), &property_nativeLib)) { return -1; } @@ -1847,7 +1847,7 @@ jint JNI_OnLoad(JavaVM *vm, UNUSED void *reserved) { (*env)->ReleaseStringUTFChars(env, property_nativeLibPath, utf); } else if (property_nativeLib) { const char *utf = (*env)->GetStringUTFChars(env, property_nativeLib, NULL); - snprintf(name, sizeof(name), "lib%s.so", utf); + snprintf(name, sizeof(name), "%s", utf); (*env)->ReleaseStringUTFChars(env, property_nativeLib, utf); } else { /* either property_nativeLibPath or property_nativeLib should always be non-NULL */ diff --git a/blas/src/main/native/jni.c b/blas/src/main/native/jni.c index 911e7cc8..1a8f6ecf 100644 --- a/blas/src/main/native/jni.c +++ b/blas/src/main/native/jni.c @@ -1531,7 +1531,7 @@ jint JNI_OnLoad(JavaVM *vm, UNUSED void *reserved) { return -1; } jstring property_nativeLib; - if (!get_system_property(env, (*env)->NewStringUTF(env, "dev.ludovic.netlib.blas.nativeLib"), (*env)->NewStringUTF(env, "blas"), &property_nativeLib)) { + if (!get_system_property(env, (*env)->NewStringUTF(env, "dev.ludovic.netlib.blas.nativeLib"), (*env)->NewStringUTF(env, "libblas.so.3"), &property_nativeLib)) { return -1; } @@ -1542,7 +1542,7 @@ jint JNI_OnLoad(JavaVM *vm, UNUSED void *reserved) { (*env)->ReleaseStringUTFChars(env, property_nativeLibPath, utf); } else if (property_nativeLib) { const char *utf = (*env)->GetStringUTFChars(env, property_nativeLib, NULL); - snprintf(name, sizeof(name), "lib%s.so", utf); + snprintf(name, sizeof(name), "%s", utf); (*env)->ReleaseStringUTFChars(env, property_nativeLib, utf); } else { /* either property_nativeLibPath or property_nativeLib should always be non-NULL */ diff --git a/generator.py b/generator.py index 47e960eb..cfa1d2de 100644 --- a/generator.py +++ b/generator.py @@ -289,7 +289,7 @@ def render_load_symbol(self): print(" // LOAD_SYMBOL({name}_);".format(name=self.name)) class Library: - def __init__(self, pkg, *routines): + def __init__(self, pkg, libname, *routines): # Print copyright header print("/*") print(" * Copyright 2020, 2021, Ludovic Henry") @@ -427,7 +427,7 @@ def __init__(self, pkg, *routines): print(" return -1;") print(" }") print(" jstring property_nativeLib;") - print(" if (!get_system_property(env, (*env)->NewStringUTF(env, \"dev.ludovic.netlib.{pkg}.nativeLib\"), (*env)->NewStringUTF(env, \"{pkg}\"), &property_nativeLib)) {{".format(pkg=pkg)) + print(" if (!get_system_property(env, (*env)->NewStringUTF(env, \"dev.ludovic.netlib.{pkg}.nativeLib\"), (*env)->NewStringUTF(env, \"{libname}\"), &property_nativeLib)) {{".format(pkg=pkg, libname=libname)) print(" return -1;") print(" }") print("") @@ -438,7 +438,7 @@ def __init__(self, pkg, *routines): print(" (*env)->ReleaseStringUTFChars(env, property_nativeLibPath, utf);") print(" } else if (property_nativeLib) {") print(" const char *utf = (*env)->GetStringUTFChars(env, property_nativeLib, NULL);") - print(" snprintf(name, sizeof(name), \"lib%s.so\", utf);") + print(" snprintf(name, sizeof(name), \"%s\", utf);") print(" (*env)->ReleaseStringUTFChars(env, property_nativeLib, utf);") print(" } else {") print(" /* either property_nativeLibPath or property_nativeLib should always be non-NULL */") @@ -474,7 +474,7 @@ def __init__(self, pkg, *routines): # $< $1("$5") if sys.argv[1] == "blas": - Library("blas", + Library("blas", "libblas.so.3", RoutineR (JDoubleR(), "dasum", JInt("n"), JDoubleArray("x", "JNI_ABORT"), JInt("incx")), RoutineR (JFloatR(), "sasum", JInt("n"), JFloatArray("x", "JNI_ABORT"), JInt("incx")), Routine ( "daxpy", JInt("n"), JDouble("alpha"), JDoubleArray("x", "JNI_ABORT"), JInt("incx"), JDoubleArray("y"), JInt("incy")), @@ -544,70 +544,8 @@ def __init__(self, pkg, *routines): RoutineR (JIntR(), "isamax", JInt("n"), JFloatArray("sx", "JNI_ABORT"), JInt("incsx")), ) -if sys.argv[1] == "arpack": - Library("arpack", - Routine ( "dmout", JInt("lout"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JInt("idigit"), JString("ifmt")), - Routine ( "smout", JInt("lout"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JInt("idigit"), JString("ifmt")), - Routine ( "dvout", JInt("lout"), JInt("n"), JDoubleArray("sx"), JInt("idigit"), JString("ifmt")), - Routine ( "svout", JInt("lout"), JInt("n"), JFloatArray("sx"), JInt("idigit"), JString("ifmt")), - Routine ( "ivout", JInt("lout"), JInt("n"), JIntArray("ix"), JInt("idigit"), JString("ifmt")), - Routine ( "dgetv0", JIntW("ido"), JString("bmat"), JInt("itry"), JBoolean("initv"), JInt("n"), JInt("j"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("resid"), JDoubleW("rnorm"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("ierr")), - Routine ( "sgetv0", JIntW("ido"), JString("bmat"), JInt("itry"), JBoolean("initv"), JInt("n"), JInt("j"), JFloatArray("v"), JInt("ldv"), JFloatArray("resid"), JFloatW("rnorm"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("ierr")), - Routine_NI( "dlaqrb", JBoolean("wantt"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("z"), JIntW("info")), - Routine_NI( "slaqrb", JBoolean("wantt"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("z"), JIntW("info")), - Routine ( "dnaitr", JIntW("ido"), JString("bmat"), JInt("n"), JInt("k"), JInt("np"), JInt("nb"), JDoubleArray("resid"), JDoubleW("rnorm"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("info")), - Routine ( "snaitr", JIntW("ido"), JString("bmat"), JInt("n"), JInt("k"), JInt("np"), JInt("nb"), JFloatArray("resid"), JFloatW("rnorm"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("info")), - Routine ( "dnapps", JInt("n"), JIntW("kev"), JInt("np"), JDoubleArray("shiftr"), JDoubleArray("shifti"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("resid"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workl"), JDoubleArray("workd")), - Routine ( "snapps", JInt("n"), JIntW("kev"), JInt("np"), JFloatArray("shiftr"), JFloatArray("shifti"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JFloatArray("resid"), JFloatArray("q"), JInt("ldq"), JFloatArray("workl"), JFloatArray("workd")), - Routine ( "dnaup2", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JIntW("np"), JDouble("tol"), JDoubleArray("resid"), JInt("mode"), JInt("iupd"), JInt("ishift"), JIntW("mxiter"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("ritzr"), JDoubleArray("ritzi"), JDoubleArray("bounds"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workl"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("info")), - Routine ( "snaup2", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JIntW("np"), JFloat("tol"), JFloatArray("resid"), JInt("mode"), JInt("iupd"), JInt("ishift"), JIntW("mxiter"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JFloatArray("ritzr"), JFloatArray("ritzi"), JFloatArray("bounds"), JFloatArray("q"), JInt("ldq"), JFloatArray("workl"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("info")), - Routine ( "dnaupd", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JInt("nev"), JDoubleW("tol"), JDoubleArray("resid"), JInt("ncv"), JDoubleArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JDoubleArray("workd"), JDoubleArray("workl"), JInt("lworkl"), JIntW("info")), - Routine ( "snaupd", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JInt("nev"), JFloatW("tol"), JFloatArray("resid"), JInt("ncv"), JFloatArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JFloatArray("workd"), JFloatArray("workl"), JInt("lworkl"), JIntW("info")), - Routine ( "dnconv", JInt("n"), JDoubleArray("ritzr"), JDoubleArray("ritzi"), JDoubleArray("bounds"), JDouble("tol"), JIntW("nconv")), - Routine ( "snconv", JInt("n"), JFloatArray("ritzr"), JFloatArray("ritzi"), JFloatArray("bounds"), JFloat("tol"), JIntW("nconv")), - Routine ( "dsconv", JInt("n"), JDoubleArray("ritz"), JDoubleArray("bounds"), JDouble("tol"), JIntW("nconv")), - Routine ( "ssconv", JInt("n"), JFloatArray("ritz"), JFloatArray("bounds"), JFloat("tol"), JIntW("nconv")), - Routine ( "dneigh", JDouble("rnorm"), JIntW("n"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("ritzr"), JDoubleArray("ritzi"), JDoubleArray("bounds"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workl"), JIntW("ierr")), - Routine ( "sneigh", JFloat("rnorm"), JIntW("n"), JFloatArray("h"), JInt("ldh"), JFloatArray("ritzr"), JFloatArray("ritzi"), JFloatArray("bounds"), JFloatArray("q"), JInt("ldq"), JFloatArray("workl"), JIntW("ierr")), - Routine ( "dneupd", JBoolean("rvec"), JString("howmny"), JBooleanArray("select"), JDoubleArray("dr"), JDoubleArray("di"), JDoubleArray("z"), JInt("ldz"), JDouble("sigmar"), JDouble("sigmai"), JDoubleArray("workev"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JDouble("tol"), JDoubleArray("resid"), JInt("ncv"), JDoubleArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JDoubleArray("workd"), JDoubleArray("workl"), JInt("lworkl"), JIntW("info")), - Routine ( "sneupd", JBoolean("rvec"), JString("howmny"), JBooleanArray("select"), JFloatArray("dr"), JFloatArray("di"), JFloatArray("z"), JInt("ldz"), JFloat("sigmar"), JFloat("sigmai"), JFloatArray("workev"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JFloat("tol"), JFloatArray("resid"), JInt("ncv"), JFloatArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JFloatArray("workd"), JFloatArray("workl"), JInt("lworkl"), JIntW("info")), - Routine ( "dngets", JInt("ishift"), JString("which"), JIntW("kev"), JIntW("np"), JDoubleArray("ritzr"), JDoubleArray("ritzi"), JDoubleArray("bounds"), JDoubleArray("shiftr"), JDoubleArray("shifti")), - Routine ( "sngets", JInt("ishift"), JString("which"), JIntW("kev"), JIntW("np"), JFloatArray("ritzr"), JFloatArray("ritzi"), JFloatArray("bounds"), JFloatArray("shiftr"), JFloatArray("shifti")), - Routine ( "dsaitr", JIntW("ido"), JString("bmat"), JInt("n"), JInt("k"), JInt("np"), JInt("mode"), JDoubleArray("resid"), JDoubleW("rnorm"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("info")), - Routine ( "ssaitr", JIntW("ido"), JString("bmat"), JInt("n"), JInt("k"), JInt("np"), JInt("mode"), JFloatArray("resid"), JFloatW("rnorm"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("info")), - Routine ( "dsapps", JInt("n"), JInt("kev"), JInt("np"), JDoubleArray("shift"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("resid"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workd")), - Routine ( "ssapps", JInt("n"), JInt("kev"), JInt("np"), JFloatArray("shift"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JFloatArray("resid"), JFloatArray("q"), JInt("ldq"), JFloatArray("workd")), - Routine ( "dsaup2", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JIntW("np"), JDouble("tol"), JDoubleArray("resid"), JInt("mode"), JInt("iupd"), JInt("ishift"), JIntW("mxiter"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("ritz"), JDoubleArray("bounds"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workl"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("info")), - Routine ( "ssaup2", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JIntW("np"), JFloat("tol"), JFloatArray("resid"), JInt("mode"), JInt("iupd"), JInt("ishift"), JIntW("mxiter"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JFloatArray("ritz"), JFloatArray("bounds"), JFloatArray("q"), JInt("ldq"), JFloatArray("workl"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("info")), - Routine ( "dseigt", JDouble("rnorm"), JInt("n"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("eig"), JDoubleArray("bounds"), JDoubleArray("workl"), JIntW("ierr")), - Routine ( "sseigt", JFloat("rnorm"), JInt("n"), JFloatArray("h"), JInt("ldh"), JFloatArray("eig"), JFloatArray("bounds"), JFloatArray("workl"), JIntW("ierr")), - Routine ( "dsesrt", JString("which"), JBoolean("apply"), JInt("n"), JDoubleArray("x"), JInt("na"), JDoubleArray("a"), JInt("lda")), - Routine ( "ssesrt", JString("which"), JBoolean("apply"), JInt("n"), JFloatArray("x"), JInt("na"), JFloatArray("a"), JInt("lda")), - Routine ( "dsaupd", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JInt("nev"), JDoubleW("tol"), JDoubleArray("resid"), JInt("ncv"), JDoubleArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JDoubleArray("workd"), JDoubleArray("workl"), JInt("lworkl"), JIntW("info")), - Routine ( "ssaupd", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JInt("nev"), JFloatW("tol"), JFloatArray("resid"), JInt("ncv"), JFloatArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JFloatArray("workd"), JFloatArray("workl"), JInt("lworkl"), JIntW("info")), - Routine ( "dseupd", JBoolean("rvec"), JString("howmny"), JBooleanArray("select"), JDoubleArray("d"), JDoubleArray("z"), JInt("ldz"), JDouble("sigma"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JDouble("tol"), JDoubleArray("resid"), JInt("ncv"), JDoubleArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JDoubleArray("workd"), JDoubleArray("workl"), JInt("lworkl"), JIntW("info")), - Routine ( "sseupd", JBoolean("rvec"), JString("howmny"), JBooleanArray("select"), JFloatArray("d"), JFloatArray("z"), JInt("ldz"), JFloat("sigma"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JFloat("tol"), JFloatArray("resid"), JInt("ncv"), JFloatArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JFloatArray("workd"), JFloatArray("workl"), JInt("lworkl"), JIntW("info")), - Routine ( "dsgets", JInt("ishift"), JString("which"), JIntW("kev"), JIntW("np"), JDoubleArray("ritz"), JDoubleArray("bounds"), JDoubleArray("shifts")), - Routine ( "ssgets", JInt("ishift"), JString("which"), JIntW("kev"), JIntW("np"), JFloatArray("ritz"), JFloatArray("bounds"), JFloatArray("shifts")), - Routine ( "dsortc", JString("which"), JBoolean("apply"), JInt("n"), JDoubleArray("xreal"), JDoubleArray("ximag"), JDoubleArray("y")), - Routine ( "ssortc", JString("which"), JBoolean("apply"), JInt("n"), JFloatArray("xreal"), JFloatArray("ximag"), JFloatArray("y")), - Routine ( "dsortr", JString("which"), JBoolean("apply"), JInt("n"), JDoubleArray("x1"), JDoubleArray("x2")), - Routine ( "ssortr", JString("which"), JBoolean("apply"), JInt("n"), JFloatArray("x1"), JFloatArray("x2")), - Routine ( "dstatn"), - Routine ( "sstatn"), - Routine ( "dstats"), - Routine ( "sstats"), - Routine ( "dstqrb", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JDoubleArray("work"), JIntW("info")), - Routine ( "sstqrb", JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JFloatArray("work"), JIntW("info")), - RoutineR (JIntR(), "icnteq", JInt("n"), JIntArray("array"), JInt("value")), - Routine ( "icopy", JInt("n"), JIntArray("lx"), JInt("incx"), JIntArray("ly"), JInt("incy")), - Routine ( "iset", JInt("n"), JInt("value"), JIntArray("array"), JInt("inc")), - Routine ( "iswap", JInt("n"), JIntArray("sx"), JInt("incx"), JIntArray("sy"), JInt("incy")), - Routine ( "second", JFloatW("t")), - ) - if sys.argv[1] == "lapack": - Library("lapack", + Library("lapack", "liblapack.so.3", Routine ( "dbdsdc", JString("uplo"), JString("compq"), JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("q"), JIntArray("iq"), JDoubleArray("work"), JIntArray("iwork"), JIntW("info")), Routine ( "dbdsqr", JString("uplo"), JInt("n"), JInt("ncvt"), JInt("nru"), JInt("ncc"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("vt"), JInt("ldvt"), JDoubleArray("u"), JInt("ldu"), JDoubleArray("c"), JInt("Ldc"), JDoubleArray("work"), JIntW("info")), Routine ( "ddisna", JString("job"), JInt("m"), JInt("n"), JDoubleArray("d"), JDoubleArray("sep"), JIntW("info")), @@ -1331,4 +1269,66 @@ def __init__(self, pkg, *routines): RoutineR (JFloatR(), "slamc3", JFloat("a"), JFloat("b")), Routine_NI( "slamc4", JIntW("emin"), JFloat("start"), JInt("base")), Routine_NI( "slamc5", JInt("beta"), JInt("p"), JInt("emin"), JBoolean("ieee"), JIntW("emax"), JFloatW("rmax")), + ) + +if sys.argv[1] == "arpack": + Library("arpack", "libarpack.so.2", + Routine ( "dmout", JInt("lout"), JInt("m"), JInt("n"), JDoubleArray("a"), JInt("lda"), JInt("idigit"), JString("ifmt")), + Routine ( "smout", JInt("lout"), JInt("m"), JInt("n"), JFloatArray("a"), JInt("lda"), JInt("idigit"), JString("ifmt")), + Routine ( "dvout", JInt("lout"), JInt("n"), JDoubleArray("sx"), JInt("idigit"), JString("ifmt")), + Routine ( "svout", JInt("lout"), JInt("n"), JFloatArray("sx"), JInt("idigit"), JString("ifmt")), + Routine ( "ivout", JInt("lout"), JInt("n"), JIntArray("ix"), JInt("idigit"), JString("ifmt")), + Routine ( "dgetv0", JIntW("ido"), JString("bmat"), JInt("itry"), JBoolean("initv"), JInt("n"), JInt("j"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("resid"), JDoubleW("rnorm"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("ierr")), + Routine ( "sgetv0", JIntW("ido"), JString("bmat"), JInt("itry"), JBoolean("initv"), JInt("n"), JInt("j"), JFloatArray("v"), JInt("ldv"), JFloatArray("resid"), JFloatW("rnorm"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("ierr")), + Routine_NI( "dlaqrb", JBoolean("wantt"), JInt("n"), JInt("ilo"), JInt("ihi"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("wr"), JDoubleArray("wi"), JDoubleArray("z"), JIntW("info")), + Routine_NI( "slaqrb", JBoolean("wantt"), JInt("n"), JInt("ilo"), JInt("ihi"), JFloatArray("h"), JInt("ldh"), JFloatArray("wr"), JFloatArray("wi"), JFloatArray("z"), JIntW("info")), + Routine ( "dnaitr", JIntW("ido"), JString("bmat"), JInt("n"), JInt("k"), JInt("np"), JInt("nb"), JDoubleArray("resid"), JDoubleW("rnorm"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("info")), + Routine ( "snaitr", JIntW("ido"), JString("bmat"), JInt("n"), JInt("k"), JInt("np"), JInt("nb"), JFloatArray("resid"), JFloatW("rnorm"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("info")), + Routine ( "dnapps", JInt("n"), JIntW("kev"), JInt("np"), JDoubleArray("shiftr"), JDoubleArray("shifti"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("resid"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workl"), JDoubleArray("workd")), + Routine ( "snapps", JInt("n"), JIntW("kev"), JInt("np"), JFloatArray("shiftr"), JFloatArray("shifti"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JFloatArray("resid"), JFloatArray("q"), JInt("ldq"), JFloatArray("workl"), JFloatArray("workd")), + Routine ( "dnaup2", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JIntW("np"), JDouble("tol"), JDoubleArray("resid"), JInt("mode"), JInt("iupd"), JInt("ishift"), JIntW("mxiter"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("ritzr"), JDoubleArray("ritzi"), JDoubleArray("bounds"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workl"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("info")), + Routine ( "snaup2", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JIntW("np"), JFloat("tol"), JFloatArray("resid"), JInt("mode"), JInt("iupd"), JInt("ishift"), JIntW("mxiter"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JFloatArray("ritzr"), JFloatArray("ritzi"), JFloatArray("bounds"), JFloatArray("q"), JInt("ldq"), JFloatArray("workl"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("info")), + Routine ( "dnaupd", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JInt("nev"), JDoubleW("tol"), JDoubleArray("resid"), JInt("ncv"), JDoubleArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JDoubleArray("workd"), JDoubleArray("workl"), JInt("lworkl"), JIntW("info")), + Routine ( "snaupd", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JInt("nev"), JFloatW("tol"), JFloatArray("resid"), JInt("ncv"), JFloatArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JFloatArray("workd"), JFloatArray("workl"), JInt("lworkl"), JIntW("info")), + Routine ( "dnconv", JInt("n"), JDoubleArray("ritzr"), JDoubleArray("ritzi"), JDoubleArray("bounds"), JDouble("tol"), JIntW("nconv")), + Routine ( "snconv", JInt("n"), JFloatArray("ritzr"), JFloatArray("ritzi"), JFloatArray("bounds"), JFloat("tol"), JIntW("nconv")), + Routine ( "dsconv", JInt("n"), JDoubleArray("ritz"), JDoubleArray("bounds"), JDouble("tol"), JIntW("nconv")), + Routine ( "ssconv", JInt("n"), JFloatArray("ritz"), JFloatArray("bounds"), JFloat("tol"), JIntW("nconv")), + Routine ( "dneigh", JDouble("rnorm"), JIntW("n"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("ritzr"), JDoubleArray("ritzi"), JDoubleArray("bounds"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workl"), JIntW("ierr")), + Routine ( "sneigh", JFloat("rnorm"), JIntW("n"), JFloatArray("h"), JInt("ldh"), JFloatArray("ritzr"), JFloatArray("ritzi"), JFloatArray("bounds"), JFloatArray("q"), JInt("ldq"), JFloatArray("workl"), JIntW("ierr")), + Routine ( "dneupd", JBoolean("rvec"), JString("howmny"), JBooleanArray("select"), JDoubleArray("dr"), JDoubleArray("di"), JDoubleArray("z"), JInt("ldz"), JDouble("sigmar"), JDouble("sigmai"), JDoubleArray("workev"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JDouble("tol"), JDoubleArray("resid"), JInt("ncv"), JDoubleArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JDoubleArray("workd"), JDoubleArray("workl"), JInt("lworkl"), JIntW("info")), + Routine ( "sneupd", JBoolean("rvec"), JString("howmny"), JBooleanArray("select"), JFloatArray("dr"), JFloatArray("di"), JFloatArray("z"), JInt("ldz"), JFloat("sigmar"), JFloat("sigmai"), JFloatArray("workev"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JFloat("tol"), JFloatArray("resid"), JInt("ncv"), JFloatArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JFloatArray("workd"), JFloatArray("workl"), JInt("lworkl"), JIntW("info")), + Routine ( "dngets", JInt("ishift"), JString("which"), JIntW("kev"), JIntW("np"), JDoubleArray("ritzr"), JDoubleArray("ritzi"), JDoubleArray("bounds"), JDoubleArray("shiftr"), JDoubleArray("shifti")), + Routine ( "sngets", JInt("ishift"), JString("which"), JIntW("kev"), JIntW("np"), JFloatArray("ritzr"), JFloatArray("ritzi"), JFloatArray("bounds"), JFloatArray("shiftr"), JFloatArray("shifti")), + Routine ( "dsaitr", JIntW("ido"), JString("bmat"), JInt("n"), JInt("k"), JInt("np"), JInt("mode"), JDoubleArray("resid"), JDoubleW("rnorm"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("info")), + Routine ( "ssaitr", JIntW("ido"), JString("bmat"), JInt("n"), JInt("k"), JInt("np"), JInt("mode"), JFloatArray("resid"), JFloatW("rnorm"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("info")), + Routine ( "dsapps", JInt("n"), JInt("kev"), JInt("np"), JDoubleArray("shift"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("resid"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workd")), + Routine ( "ssapps", JInt("n"), JInt("kev"), JInt("np"), JFloatArray("shift"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JFloatArray("resid"), JFloatArray("q"), JInt("ldq"), JFloatArray("workd")), + Routine ( "dsaup2", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JIntW("np"), JDouble("tol"), JDoubleArray("resid"), JInt("mode"), JInt("iupd"), JInt("ishift"), JIntW("mxiter"), JDoubleArray("v"), JInt("ldv"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("ritz"), JDoubleArray("bounds"), JDoubleArray("q"), JInt("ldq"), JDoubleArray("workl"), JIntArray("ipntr"), JDoubleArray("workd"), JIntW("info")), + Routine ( "ssaup2", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JIntW("np"), JFloat("tol"), JFloatArray("resid"), JInt("mode"), JInt("iupd"), JInt("ishift"), JIntW("mxiter"), JFloatArray("v"), JInt("ldv"), JFloatArray("h"), JInt("ldh"), JFloatArray("ritz"), JFloatArray("bounds"), JFloatArray("q"), JInt("ldq"), JFloatArray("workl"), JIntArray("ipntr"), JFloatArray("workd"), JIntW("info")), + Routine ( "dseigt", JDouble("rnorm"), JInt("n"), JDoubleArray("h"), JInt("ldh"), JDoubleArray("eig"), JDoubleArray("bounds"), JDoubleArray("workl"), JIntW("ierr")), + Routine ( "sseigt", JFloat("rnorm"), JInt("n"), JFloatArray("h"), JInt("ldh"), JFloatArray("eig"), JFloatArray("bounds"), JFloatArray("workl"), JIntW("ierr")), + Routine ( "dsesrt", JString("which"), JBoolean("apply"), JInt("n"), JDoubleArray("x"), JInt("na"), JDoubleArray("a"), JInt("lda")), + Routine ( "ssesrt", JString("which"), JBoolean("apply"), JInt("n"), JFloatArray("x"), JInt("na"), JFloatArray("a"), JInt("lda")), + Routine ( "dsaupd", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JInt("nev"), JDoubleW("tol"), JDoubleArray("resid"), JInt("ncv"), JDoubleArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JDoubleArray("workd"), JDoubleArray("workl"), JInt("lworkl"), JIntW("info")), + Routine ( "ssaupd", JIntW("ido"), JString("bmat"), JInt("n"), JString("which"), JInt("nev"), JFloatW("tol"), JFloatArray("resid"), JInt("ncv"), JFloatArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JFloatArray("workd"), JFloatArray("workl"), JInt("lworkl"), JIntW("info")), + Routine ( "dseupd", JBoolean("rvec"), JString("howmny"), JBooleanArray("select"), JDoubleArray("d"), JDoubleArray("z"), JInt("ldz"), JDouble("sigma"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JDouble("tol"), JDoubleArray("resid"), JInt("ncv"), JDoubleArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JDoubleArray("workd"), JDoubleArray("workl"), JInt("lworkl"), JIntW("info")), + Routine ( "sseupd", JBoolean("rvec"), JString("howmny"), JBooleanArray("select"), JFloatArray("d"), JFloatArray("z"), JInt("ldz"), JFloat("sigma"), JString("bmat"), JInt("n"), JString("which"), JIntW("nev"), JFloat("tol"), JFloatArray("resid"), JInt("ncv"), JFloatArray("v"), JInt("ldv"), JIntArray("iparam"), JIntArray("ipntr"), JFloatArray("workd"), JFloatArray("workl"), JInt("lworkl"), JIntW("info")), + Routine ( "dsgets", JInt("ishift"), JString("which"), JIntW("kev"), JIntW("np"), JDoubleArray("ritz"), JDoubleArray("bounds"), JDoubleArray("shifts")), + Routine ( "ssgets", JInt("ishift"), JString("which"), JIntW("kev"), JIntW("np"), JFloatArray("ritz"), JFloatArray("bounds"), JFloatArray("shifts")), + Routine ( "dsortc", JString("which"), JBoolean("apply"), JInt("n"), JDoubleArray("xreal"), JDoubleArray("ximag"), JDoubleArray("y")), + Routine ( "ssortc", JString("which"), JBoolean("apply"), JInt("n"), JFloatArray("xreal"), JFloatArray("ximag"), JFloatArray("y")), + Routine ( "dsortr", JString("which"), JBoolean("apply"), JInt("n"), JDoubleArray("x1"), JDoubleArray("x2")), + Routine ( "ssortr", JString("which"), JBoolean("apply"), JInt("n"), JFloatArray("x1"), JFloatArray("x2")), + Routine ( "dstatn"), + Routine ( "sstatn"), + Routine ( "dstats"), + Routine ( "sstats"), + Routine ( "dstqrb", JInt("n"), JDoubleArray("d"), JDoubleArray("e"), JDoubleArray("z"), JDoubleArray("work"), JIntW("info")), + Routine ( "sstqrb", JInt("n"), JFloatArray("d"), JFloatArray("e"), JFloatArray("z"), JFloatArray("work"), JIntW("info")), + RoutineR (JIntR(), "icnteq", JInt("n"), JIntArray("array"), JInt("value")), + Routine ( "icopy", JInt("n"), JIntArray("lx"), JInt("incx"), JIntArray("ly"), JInt("incy")), + Routine ( "iset", JInt("n"), JInt("value"), JIntArray("array"), JInt("inc")), + Routine ( "iswap", JInt("n"), JIntArray("sx"), JInt("incx"), JIntArray("sy"), JInt("incy")), + Routine ( "second", JFloatW("t")), ) \ No newline at end of file diff --git a/lapack/src/main/native/jni.c b/lapack/src/main/native/jni.c index 3b47342b..1b544fb1 100644 --- a/lapack/src/main/native/jni.c +++ b/lapack/src/main/native/jni.c @@ -21890,7 +21890,7 @@ jint JNI_OnLoad(JavaVM *vm, UNUSED void *reserved) { return -1; } jstring property_nativeLib; - if (!get_system_property(env, (*env)->NewStringUTF(env, "dev.ludovic.netlib.lapack.nativeLib"), (*env)->NewStringUTF(env, "lapack"), &property_nativeLib)) { + if (!get_system_property(env, (*env)->NewStringUTF(env, "dev.ludovic.netlib.lapack.nativeLib"), (*env)->NewStringUTF(env, "liblapack.so.3"), &property_nativeLib)) { return -1; } @@ -21901,7 +21901,7 @@ jint JNI_OnLoad(JavaVM *vm, UNUSED void *reserved) { (*env)->ReleaseStringUTFChars(env, property_nativeLibPath, utf); } else if (property_nativeLib) { const char *utf = (*env)->GetStringUTFChars(env, property_nativeLib, NULL); - snprintf(name, sizeof(name), "lib%s.so", utf); + snprintf(name, sizeof(name), "%s", utf); (*env)->ReleaseStringUTFChars(env, property_nativeLib, utf); } else { /* either property_nativeLibPath or property_nativeLib should always be non-NULL */ diff --git a/pom.xml b/pom.xml index 0cbe2dcf..abfcced2 100644 --- a/pom.xml +++ b/pom.xml @@ -60,8 +60,8 @@ information or have any questions. blas - arpack lapack + arpack benchmarks From 383a8310dcd8a9615cb24007187dfc4a8d7bdf90 Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Mon, 3 May 2021 11:28:43 +0200 Subject: [PATCH 38/42] Skip unimplemented tests --- arpack/src/test/java/dev/ludovic/netlib/arpack/Dgetv0Test.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/DlaqrbTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/DmoutTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/DnaitrTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/DnappsTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/Dnaup2Test.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/DnaupdTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/DnconvTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/DneighTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/DneupdTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/DngetsTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/DsaitrTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/DsappsTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/Dsaup2Test.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/DsaupdTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/DsconvTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/DseigtTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/DsesrtTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/DseupdTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/DsgetsTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/DsortcTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/DsortrTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/DstatnTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/DstatsTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/DstqrbTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/DvoutTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/IcnteqTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/IcopyTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/IsetTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/IswapTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/IvoutTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/SecondTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/Sgetv0Test.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/SlaqrbTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/SmoutTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/SnaitrTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/SnappsTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/Snaup2Test.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/SnaupdTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/SnconvTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/SneighTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/SneupdTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/SngetsTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/SsaitrTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/SsappsTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/Ssaup2Test.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/SsaupdTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/SsconvTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/SseigtTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/SsesrtTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/SseupdTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/SsgetsTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/SsortcTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/SsortrTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/SstatnTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/SstatsTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/SstqrbTest.java | 1 + arpack/src/test/java/dev/ludovic/netlib/arpack/SvoutTest.java | 1 + blas/src/test/java/dev/ludovic/netlib/blas/DgbmvTest.java | 1 + blas/src/test/java/dev/ludovic/netlib/blas/DrotmTest.java | 1 + blas/src/test/java/dev/ludovic/netlib/blas/DrotmgTest.java | 1 + blas/src/test/java/dev/ludovic/netlib/blas/DsbmvTest.java | 1 + blas/src/test/java/dev/ludovic/netlib/blas/Dsyr2kTest.java | 1 + blas/src/test/java/dev/ludovic/netlib/blas/DsyrkTest.java | 1 + blas/src/test/java/dev/ludovic/netlib/blas/DtbmvTest.java | 1 + blas/src/test/java/dev/ludovic/netlib/blas/DtbsvTest.java | 1 + blas/src/test/java/dev/ludovic/netlib/blas/DtpmvTest.java | 1 + blas/src/test/java/dev/ludovic/netlib/blas/DtpsvTest.java | 1 + blas/src/test/java/dev/ludovic/netlib/blas/DtrmmTest.java | 1 + blas/src/test/java/dev/ludovic/netlib/blas/DtrmvTest.java | 1 + blas/src/test/java/dev/ludovic/netlib/blas/DtrsmTest.java | 1 + blas/src/test/java/dev/ludovic/netlib/blas/DtrsvTest.java | 1 + blas/src/test/java/dev/ludovic/netlib/blas/SgbmvTest.java | 1 + blas/src/test/java/dev/ludovic/netlib/blas/SrotmTest.java | 1 + blas/src/test/java/dev/ludovic/netlib/blas/SrotmgTest.java | 1 + blas/src/test/java/dev/ludovic/netlib/blas/SsbmvTest.java | 1 + blas/src/test/java/dev/ludovic/netlib/blas/Ssyr2kTest.java | 1 + blas/src/test/java/dev/ludovic/netlib/blas/SsyrkTest.java | 1 + blas/src/test/java/dev/ludovic/netlib/blas/StbmvTest.java | 1 + blas/src/test/java/dev/ludovic/netlib/blas/StbsvTest.java | 1 + blas/src/test/java/dev/ludovic/netlib/blas/StpmvTest.java | 1 + blas/src/test/java/dev/ludovic/netlib/blas/StpsvTest.java | 1 + blas/src/test/java/dev/ludovic/netlib/blas/StrmmTest.java | 1 + blas/src/test/java/dev/ludovic/netlib/blas/StrmvTest.java | 1 + blas/src/test/java/dev/ludovic/netlib/blas/StrsmTest.java | 1 + blas/src/test/java/dev/ludovic/netlib/blas/StrsvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DbdsdcTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DbdsqrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DdisnaTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgbbrdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgbconTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgbequTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgbrfsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgbsvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgbsvxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dgbtf2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgbtrfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgbtrsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgebakTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgebalTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dgebd2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgebrdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgeconTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgeequTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgeesTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgeesxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgeevTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgeevxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgegsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgegvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dgehd2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgehrdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dgelq2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgelqfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgelssTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsyTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dgeql2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgeqlfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dgeqp3Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgeqpfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dgeqr2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgeqrfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgerfsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dgerq2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgerqfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dgesc2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgesddTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgesvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgesvdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgesvxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dgetc2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dgetf2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgetrfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgetriTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgetrsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DggbakTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DggbalTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DggesTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DggesxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DggevTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DggevxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DggglmTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgghrdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgglseTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DggqrfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DggrqfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DggsvdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DggsvpTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgtconTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgtrfsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgtsvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgtsvxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgttrfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DgttrsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dgtts2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DhgeqzTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DhseinTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DhseqrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlabadTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlabrdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlacn2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlaconTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlacpyTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DladivTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlae2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlaebzTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed0Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed1Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed3Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed4Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed5Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed6Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed7Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed8Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed9Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlaedaTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlaeinTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaev2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlaexcTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlag2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlag2sTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlags2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlagtfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlagtmTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlagtsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlagv2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlahqrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlahr2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlahrdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaic1Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaln2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlals0Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlalsaTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlalsdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc1Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc4Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc5Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlamrgTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlanv2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlapllTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlapmtTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqgbTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqgeTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqp2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqpsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr0Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr1Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr3Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr4Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr5Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqsbTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqspTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqsyTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqtrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlar1vTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlar2vTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfbTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfgTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlarftTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlargvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlarnvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlarraTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrbTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrcTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlarreTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrjTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrkTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlartgTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlartvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlaruvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlarzTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlarzbTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlarztTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlas2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlasclTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd0Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd1Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd3Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd4Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd5Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd6Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd7Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd8Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlasdaTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlasdqTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlasdtTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlasetTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq1Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq3Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq4Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq5Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq6Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlasrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlasrtTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlassqTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasv2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlaswpTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasy2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlasyfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlatbsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlatdfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlatpsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlatrdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlatrsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlatrzTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlatzmTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlauu2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DlauumTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlazq3Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dlazq4Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DopgtrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DopmtrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dorg2lTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dorg2rTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DorgbrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DorghrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dorgl2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DorglqTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DorgqlTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DorgqrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dorgr2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DorgrqTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DorgtrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dorm2lTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dorm2rTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DormbrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DormhrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dorml2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DormlqTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DormqlTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DormqrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dormr2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dormr3Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DormrqTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DormrzTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DormtrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DpbconTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DpbequTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DpbrfsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DpbstfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DpbsvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DpbsvxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dpbtf2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DpbtrfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DpbtrsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DpoconTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DpoequTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DporfsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DposvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DposvxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dpotf2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DpotrfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DpotriTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DpotrsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DppconTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DppequTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DpprfsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DppsvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DppsvxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DpptrfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DpptriTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DpptrsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DptconTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DpteqrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DptrfsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DptsvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DptsvxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DpttrfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DpttrsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dptts2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DrsclTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsbevTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsbevdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsbevxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgstTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgvdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgvxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsbtrdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsgesvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DspconTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DspevTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DspevdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DspevxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DspgstTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DspgvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DspgvdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DspgvxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsprfsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DspsvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DspsvxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsptrdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsptrfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsptriTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsptrsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DstebzTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DstedcTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DstegrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsteinTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DstemrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsteqrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsterfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DstevTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DstevdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DstevrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DstevxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsyconTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dsygs2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsygstTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsygvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsygvdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsygvxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsyrfsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsysvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsysvxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dsytd2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dsytf2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsytrdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsytrfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsytriTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DsytrsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DtbconTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DtbrfsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DtbtrsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DtgevcTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dtgex2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DtgexcTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsenTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsjaTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsnaTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dtgsy2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsylTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DtpconTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DtprfsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DtptriTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DtptrsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DtrconTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DtrevcTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DtrexcTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DtrrfsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DtrsenTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DtrsnaTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DtrsylTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Dtrti2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DtrtriTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DtrtrsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DtzrqfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/DtzrzfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/IlaverTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SbdsdcTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SbdsqrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SdisnaTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgbbrdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgbconTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgbequTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgbrfsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgbsvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgbsvxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Sgbtf2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgbtrfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgbtrsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgebakTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgebalTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Sgebd2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgebrdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgeconTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgeequTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgeesTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgeesxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgeevTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgeevxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgegsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgegvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Sgehd2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgehrdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Sgelq2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgelqfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgelssTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsyTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Sgeql2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgeqlfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Sgeqp3Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgeqpfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Sgeqr2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgeqrfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgerfsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Sgerq2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgerqfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Sgesc2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgesddTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgesvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgesvdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgesvxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Sgetc2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Sgetf2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgetrfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgetriTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgetrsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SggbakTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SggbalTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SggesTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SggesxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SggevTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SggevxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SggglmTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgghrdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgglseTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SggqrfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SggrqfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SggsvdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SggsvpTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgtconTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgtrfsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgtsvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgtsvxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgttrfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SgttrsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Sgtts2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/ShgeqzTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/ShseinTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/ShseqrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlabadTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlabrdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slacn2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlaconTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlacpyTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SladivTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slae2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlaebzTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed0Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed1Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed3Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed4Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed5Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed6Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed7Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed8Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed9Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlaedaTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlaeinTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slaev2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlaexcTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slag2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slag2dTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slags2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlagtfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlagtmTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlagtsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slagv2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlahqrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slahr2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlahrdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slaic1Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slaln2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slals0Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlalsaTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlalsdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc1Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc4Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc5Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlamrgTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slanv2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlapllTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlapmtTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqgbTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqgeTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqp2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqpsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr0Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr1Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr3Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr4Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr5Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqsbTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqspTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqsyTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqtrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slar1vTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slar2vTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfbTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfgTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlarftTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlargvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlarnvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlarraTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrbTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrcTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlarreTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrjTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrkTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlartgTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlartvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlaruvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlarzTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlarzbTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlarztTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slas2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlasclTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd0Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd1Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd3Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd4Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd5Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd6Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd7Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd8Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlasdaTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlasdqTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlasdtTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlasetTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq1Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq3Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq4Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq5Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq6Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlasrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlasrtTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlassqTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slasv2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlaswpTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slasy2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlasyfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlatbsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlatdfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlatpsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlatrdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlatrsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlatrzTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlatzmTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slauu2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SlauumTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slazq3Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Slazq4Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SopgtrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SopmtrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Sorg2lTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Sorg2rTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SorgbrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SorghrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Sorgl2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SorglqTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SorgqlTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SorgqrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Sorgr2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SorgrqTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SorgtrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Sorm2lTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Sorm2rTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SormbrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SormhrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Sorml2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SormlqTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SormqlTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SormqrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Sormr2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Sormr3Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SormrqTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SormrzTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SormtrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SpbconTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SpbequTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SpbrfsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SpbstfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SpbsvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SpbsvxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Spbtf2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SpbtrfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SpbtrsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SpoconTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SpoequTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SporfsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SposvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SposvxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Spotf2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SpotrfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SpotriTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SpotrsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SppconTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SppequTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SpprfsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SppsvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SppsvxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SpptrfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SpptriTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SpptrsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SptconTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SpteqrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SptrfsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SptsvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SptsvxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SpttrfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SpttrsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Sptts2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SrsclTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsbevTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsbevdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsbevxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgstTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgvdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgvxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsbtrdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SspconTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SspevTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SspevdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SspevxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SspgstTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SspgvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SspgvdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SspgvxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsprfsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SspsvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SspsvxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsptrdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsptrfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsptriTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsptrsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SstebzTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SstedcTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SstegrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsteinTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SstemrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsteqrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsterfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SstevTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SstevdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SstevrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SstevxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsyconTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevrTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Ssygs2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsygstTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsygvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsygvdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsygvxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsyrfsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsysvTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsysvxTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Ssytd2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Ssytf2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsytrdTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsytrfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsytriTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/SsytrsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/StbconTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/StbrfsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/StbtrsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/StgevcTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Stgex2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/StgexcTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/StgsenTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/StgsjaTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/StgsnaTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Stgsy2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/StgsylTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/StpconTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/StprfsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/StptriTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/StptrsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/StrconTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/StrevcTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/StrexcTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/StrrfsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/StrsenTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/StrsnaTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/StrsylTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/Strti2Test.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/StrtriTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/StrtrsTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/StzrqfTest.java | 1 + lapack/src/test/java/dev/ludovic/netlib/lapack/StzrzfTest.java | 1 + 766 files changed, 766 insertions(+) diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/Dgetv0Test.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/Dgetv0Test.java index 0b381d3a..7d32a6e7 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/Dgetv0Test.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/Dgetv0Test.java @@ -35,5 +35,6 @@ public class Dgetv0Test extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DlaqrbTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DlaqrbTest.java index 97c0c9c9..1b7c9778 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/DlaqrbTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DlaqrbTest.java @@ -35,5 +35,6 @@ public class DlaqrbTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DmoutTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DmoutTest.java index 75b72213..98568548 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/DmoutTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DmoutTest.java @@ -35,5 +35,6 @@ public class DmoutTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DnaitrTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DnaitrTest.java index c994363e..34166806 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/DnaitrTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DnaitrTest.java @@ -35,5 +35,6 @@ public class DnaitrTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DnappsTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DnappsTest.java index 1ef784b3..978ebdc5 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/DnappsTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DnappsTest.java @@ -35,5 +35,6 @@ public class DnappsTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/Dnaup2Test.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/Dnaup2Test.java index 6f50bbe9..184646e2 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/Dnaup2Test.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/Dnaup2Test.java @@ -35,5 +35,6 @@ public class Dnaup2Test extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DnaupdTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DnaupdTest.java index 90694442..7d6a711d 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/DnaupdTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DnaupdTest.java @@ -35,5 +35,6 @@ public class DnaupdTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DnconvTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DnconvTest.java index 196c14de..7c14ea10 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/DnconvTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DnconvTest.java @@ -35,5 +35,6 @@ public class DnconvTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DneighTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DneighTest.java index 4991d5d3..9db52a4f 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/DneighTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DneighTest.java @@ -35,5 +35,6 @@ public class DneighTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DneupdTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DneupdTest.java index 843856e7..adb30228 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/DneupdTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DneupdTest.java @@ -35,5 +35,6 @@ public class DneupdTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DngetsTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DngetsTest.java index eca99efe..f7532437 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/DngetsTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DngetsTest.java @@ -35,5 +35,6 @@ public class DngetsTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DsaitrTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsaitrTest.java index b4dfe798..16a2587b 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/DsaitrTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsaitrTest.java @@ -35,5 +35,6 @@ public class DsaitrTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DsappsTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsappsTest.java index a7fe4cf5..75e20cac 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/DsappsTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsappsTest.java @@ -35,5 +35,6 @@ public class DsappsTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/Dsaup2Test.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/Dsaup2Test.java index 3a994e40..6e9109d7 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/Dsaup2Test.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/Dsaup2Test.java @@ -35,5 +35,6 @@ public class Dsaup2Test extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DsaupdTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsaupdTest.java index 0b31a1fd..012ffc94 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/DsaupdTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsaupdTest.java @@ -35,5 +35,6 @@ public class DsaupdTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DsconvTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsconvTest.java index da71711c..691eb8d2 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/DsconvTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsconvTest.java @@ -35,5 +35,6 @@ public class DsconvTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DseigtTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DseigtTest.java index 26173f43..02f99b00 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/DseigtTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DseigtTest.java @@ -35,5 +35,6 @@ public class DseigtTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DsesrtTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsesrtTest.java index 423a1504..59df03a5 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/DsesrtTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsesrtTest.java @@ -35,5 +35,6 @@ public class DsesrtTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DseupdTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DseupdTest.java index 7aad5793..854f70e1 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/DseupdTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DseupdTest.java @@ -35,5 +35,6 @@ public class DseupdTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DsgetsTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsgetsTest.java index 9dd5608c..61a6ee96 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/DsgetsTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsgetsTest.java @@ -35,5 +35,6 @@ public class DsgetsTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DsortcTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsortcTest.java index 410707ab..8b91b3f7 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/DsortcTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsortcTest.java @@ -35,5 +35,6 @@ public class DsortcTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DsortrTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsortrTest.java index 1f59e701..ced27865 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/DsortrTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DsortrTest.java @@ -35,5 +35,6 @@ public class DsortrTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DstatnTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DstatnTest.java index 9f05ce85..514f4f27 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/DstatnTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DstatnTest.java @@ -35,5 +35,6 @@ public class DstatnTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DstatsTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DstatsTest.java index bd9c344e..a9ff4c74 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/DstatsTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DstatsTest.java @@ -35,5 +35,6 @@ public class DstatsTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DstqrbTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DstqrbTest.java index b36e7b3b..e3a71b69 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/DstqrbTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DstqrbTest.java @@ -35,5 +35,6 @@ public class DstqrbTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/DvoutTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/DvoutTest.java index f2e82eca..59a26921 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/DvoutTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/DvoutTest.java @@ -35,5 +35,6 @@ public class DvoutTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/IcnteqTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/IcnteqTest.java index a6c68bc2..41fa9711 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/IcnteqTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/IcnteqTest.java @@ -35,5 +35,6 @@ public class IcnteqTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/IcopyTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/IcopyTest.java index 7111c92e..4d6d874f 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/IcopyTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/IcopyTest.java @@ -35,5 +35,6 @@ public class IcopyTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/IsetTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/IsetTest.java index af207fcf..5196ad87 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/IsetTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/IsetTest.java @@ -35,5 +35,6 @@ public class IsetTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/IswapTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/IswapTest.java index a6597164..ecd2dbca 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/IswapTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/IswapTest.java @@ -35,5 +35,6 @@ public class IswapTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/IvoutTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/IvoutTest.java index ee22edaf..9adf889a 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/IvoutTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/IvoutTest.java @@ -35,5 +35,6 @@ public class IvoutTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SecondTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SecondTest.java index a78dbbfc..061eb2a8 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/SecondTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SecondTest.java @@ -35,5 +35,6 @@ public class SecondTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/Sgetv0Test.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/Sgetv0Test.java index 10e1cc10..788ee980 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/Sgetv0Test.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/Sgetv0Test.java @@ -35,5 +35,6 @@ public class Sgetv0Test extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SlaqrbTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SlaqrbTest.java index d0930a8e..98d34368 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/SlaqrbTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SlaqrbTest.java @@ -35,5 +35,6 @@ public class SlaqrbTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SmoutTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SmoutTest.java index ba919f14..01b9cd82 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/SmoutTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SmoutTest.java @@ -35,5 +35,6 @@ public class SmoutTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SnaitrTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SnaitrTest.java index 64f38a8f..3ac942fa 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/SnaitrTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SnaitrTest.java @@ -35,5 +35,6 @@ public class SnaitrTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SnappsTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SnappsTest.java index 3ed8a9e7..af63f13f 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/SnappsTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SnappsTest.java @@ -35,5 +35,6 @@ public class SnappsTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/Snaup2Test.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/Snaup2Test.java index 3bf1b9cd..fbfbb519 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/Snaup2Test.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/Snaup2Test.java @@ -35,5 +35,6 @@ public class Snaup2Test extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SnaupdTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SnaupdTest.java index f1f2c817..523b56fb 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/SnaupdTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SnaupdTest.java @@ -35,5 +35,6 @@ public class SnaupdTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SnconvTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SnconvTest.java index fde4733f..244c6ede 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/SnconvTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SnconvTest.java @@ -35,5 +35,6 @@ public class SnconvTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SneighTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SneighTest.java index 70144619..ac3ecbab 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/SneighTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SneighTest.java @@ -35,5 +35,6 @@ public class SneighTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SneupdTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SneupdTest.java index 4f647904..1b47e374 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/SneupdTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SneupdTest.java @@ -35,5 +35,6 @@ public class SneupdTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SngetsTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SngetsTest.java index 2ff219d8..8737cc8f 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/SngetsTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SngetsTest.java @@ -35,5 +35,6 @@ public class SngetsTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SsaitrTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsaitrTest.java index 4a81aa13..3c6caa98 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/SsaitrTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsaitrTest.java @@ -35,5 +35,6 @@ public class SsaitrTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SsappsTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsappsTest.java index 3f406193..7d4c7984 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/SsappsTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsappsTest.java @@ -35,5 +35,6 @@ public class SsappsTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/Ssaup2Test.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/Ssaup2Test.java index f3ce255f..d0208b73 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/Ssaup2Test.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/Ssaup2Test.java @@ -35,5 +35,6 @@ public class Ssaup2Test extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SsaupdTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsaupdTest.java index 4ddb911c..c4a14a4c 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/SsaupdTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsaupdTest.java @@ -35,5 +35,6 @@ public class SsaupdTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SsconvTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsconvTest.java index e018c8cb..96d9d048 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/SsconvTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsconvTest.java @@ -35,5 +35,6 @@ public class SsconvTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SseigtTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SseigtTest.java index 59071574..941f7d62 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/SseigtTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SseigtTest.java @@ -35,5 +35,6 @@ public class SseigtTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SsesrtTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsesrtTest.java index 71588574..9ccb79ab 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/SsesrtTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsesrtTest.java @@ -35,5 +35,6 @@ public class SsesrtTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SseupdTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SseupdTest.java index 1291cdc2..fbf0d166 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/SseupdTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SseupdTest.java @@ -35,5 +35,6 @@ public class SseupdTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SsgetsTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsgetsTest.java index 98280e2d..622e635c 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/SsgetsTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsgetsTest.java @@ -35,5 +35,6 @@ public class SsgetsTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SsortcTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsortcTest.java index 54cd15b8..b027fa5e 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/SsortcTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsortcTest.java @@ -35,5 +35,6 @@ public class SsortcTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SsortrTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsortrTest.java index 1e3561d8..399606d8 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/SsortrTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SsortrTest.java @@ -35,5 +35,6 @@ public class SsortrTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SstatnTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SstatnTest.java index 362ecc81..fb1043c1 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/SstatnTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SstatnTest.java @@ -35,5 +35,6 @@ public class SstatnTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SstatsTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SstatsTest.java index cfdf9203..b69fb920 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/SstatsTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SstatsTest.java @@ -35,5 +35,6 @@ public class SstatsTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SstqrbTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SstqrbTest.java index 82a6a1c3..a68f84cf 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/SstqrbTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SstqrbTest.java @@ -35,5 +35,6 @@ public class SstqrbTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/SvoutTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/SvoutTest.java index d70ec20f..71584479 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/SvoutTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/SvoutTest.java @@ -35,5 +35,6 @@ public class SvoutTest extends ARPACKTest { @ParameterizedTest @MethodSource("ARPACKImplementations") void testSanity(ARPACK arpack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/DgbmvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DgbmvTest.java index 0c70d216..6f45c946 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/DgbmvTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/DgbmvTest.java @@ -35,5 +35,6 @@ public class DgbmvTest extends BLASTest { @ParameterizedTest @MethodSource("BLASImplementations") void testSanity(BLAS blas) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/DrotmTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DrotmTest.java index 96f189e3..b849ef23 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/DrotmTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/DrotmTest.java @@ -35,5 +35,6 @@ public class DrotmTest extends BLASTest { @ParameterizedTest @MethodSource("BLASImplementations") void testSanity(BLAS blas) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/DrotmgTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DrotmgTest.java index 97eb7abe..97e64e53 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/DrotmgTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/DrotmgTest.java @@ -35,5 +35,6 @@ public class DrotmgTest extends BLASTest { @ParameterizedTest @MethodSource("BLASImplementations") void testSanity(BLAS blas) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/DsbmvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DsbmvTest.java index d32bdf5b..df903b81 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/DsbmvTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/DsbmvTest.java @@ -35,5 +35,6 @@ public class DsbmvTest extends BLASTest { @ParameterizedTest @MethodSource("BLASImplementations") void testSanity(BLAS blas) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/Dsyr2kTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/Dsyr2kTest.java index 6f0d3327..0304369c 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/Dsyr2kTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/Dsyr2kTest.java @@ -35,5 +35,6 @@ public class Dsyr2kTest extends BLASTest { @ParameterizedTest @MethodSource("BLASImplementations") void testSanity(BLAS blas) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/DsyrkTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DsyrkTest.java index 54d8a708..9acae709 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/DsyrkTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/DsyrkTest.java @@ -35,5 +35,6 @@ public class DsyrkTest extends BLASTest { @ParameterizedTest @MethodSource("BLASImplementations") void testSanity(BLAS blas) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/DtbmvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DtbmvTest.java index f112cc56..51fd71b1 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/DtbmvTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/DtbmvTest.java @@ -35,5 +35,6 @@ public class DtbmvTest extends BLASTest { @ParameterizedTest @MethodSource("BLASImplementations") void testSanity(BLAS blas) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/DtbsvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DtbsvTest.java index f2eec6c0..e9701b32 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/DtbsvTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/DtbsvTest.java @@ -35,5 +35,6 @@ public class DtbsvTest extends BLASTest { @ParameterizedTest @MethodSource("BLASImplementations") void testSanity(BLAS blas) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/DtpmvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DtpmvTest.java index e7e9cfce..5a2c883f 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/DtpmvTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/DtpmvTest.java @@ -35,5 +35,6 @@ public class DtpmvTest extends BLASTest { @ParameterizedTest @MethodSource("BLASImplementations") void testSanity(BLAS blas) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/DtpsvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DtpsvTest.java index f4d2f327..8affc977 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/DtpsvTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/DtpsvTest.java @@ -35,5 +35,6 @@ public class DtpsvTest extends BLASTest { @ParameterizedTest @MethodSource("BLASImplementations") void testSanity(BLAS blas) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/DtrmmTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DtrmmTest.java index 6f94b6c7..ba7d0a4e 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/DtrmmTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/DtrmmTest.java @@ -35,5 +35,6 @@ public class DtrmmTest extends BLASTest { @ParameterizedTest @MethodSource("BLASImplementations") void testSanity(BLAS blas) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/DtrmvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DtrmvTest.java index 4f97d1c7..6d7742eb 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/DtrmvTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/DtrmvTest.java @@ -35,5 +35,6 @@ public class DtrmvTest extends BLASTest { @ParameterizedTest @MethodSource("BLASImplementations") void testSanity(BLAS blas) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/DtrsmTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DtrsmTest.java index baf27766..b759cfa6 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/DtrsmTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/DtrsmTest.java @@ -35,5 +35,6 @@ public class DtrsmTest extends BLASTest { @ParameterizedTest @MethodSource("BLASImplementations") void testSanity(BLAS blas) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/DtrsvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/DtrsvTest.java index 5760f220..d99384bd 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/DtrsvTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/DtrsvTest.java @@ -35,5 +35,6 @@ public class DtrsvTest extends BLASTest { @ParameterizedTest @MethodSource("BLASImplementations") void testSanity(BLAS blas) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/SgbmvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/SgbmvTest.java index 66bad099..790145f6 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/SgbmvTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/SgbmvTest.java @@ -35,5 +35,6 @@ public class SgbmvTest extends BLASTest { @ParameterizedTest @MethodSource("BLASImplementations") void testSanity(BLAS blas) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/SrotmTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/SrotmTest.java index eff4a336..55e935f3 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/SrotmTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/SrotmTest.java @@ -35,5 +35,6 @@ public class SrotmTest extends BLASTest { @ParameterizedTest @MethodSource("BLASImplementations") void testSanity(BLAS blas) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/SrotmgTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/SrotmgTest.java index 40793502..45e5372a 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/SrotmgTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/SrotmgTest.java @@ -35,5 +35,6 @@ public class SrotmgTest extends BLASTest { @ParameterizedTest @MethodSource("BLASImplementations") void testSanity(BLAS blas) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/SsbmvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/SsbmvTest.java index 22b551f9..31f84f55 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/SsbmvTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/SsbmvTest.java @@ -35,5 +35,6 @@ public class SsbmvTest extends BLASTest { @ParameterizedTest @MethodSource("BLASImplementations") void testSanity(BLAS blas) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/Ssyr2kTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/Ssyr2kTest.java index 88fd9f62..0bc58059 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/Ssyr2kTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/Ssyr2kTest.java @@ -35,5 +35,6 @@ public class Ssyr2kTest extends BLASTest { @ParameterizedTest @MethodSource("BLASImplementations") void testSanity(BLAS blas) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/SsyrkTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/SsyrkTest.java index dac16d87..f37b1228 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/SsyrkTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/SsyrkTest.java @@ -35,5 +35,6 @@ public class SsyrkTest extends BLASTest { @ParameterizedTest @MethodSource("BLASImplementations") void testSanity(BLAS blas) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/StbmvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/StbmvTest.java index d54e6f20..131fc2e9 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/StbmvTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/StbmvTest.java @@ -35,5 +35,6 @@ public class StbmvTest extends BLASTest { @ParameterizedTest @MethodSource("BLASImplementations") void testSanity(BLAS blas) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/StbsvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/StbsvTest.java index de6e609e..a160c56d 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/StbsvTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/StbsvTest.java @@ -35,5 +35,6 @@ public class StbsvTest extends BLASTest { @ParameterizedTest @MethodSource("BLASImplementations") void testSanity(BLAS blas) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/StpmvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/StpmvTest.java index efd6ae53..647b1a4a 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/StpmvTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/StpmvTest.java @@ -35,5 +35,6 @@ public class StpmvTest extends BLASTest { @ParameterizedTest @MethodSource("BLASImplementations") void testSanity(BLAS blas) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/StpsvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/StpsvTest.java index 8aedba62..8d1f3cd8 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/StpsvTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/StpsvTest.java @@ -35,5 +35,6 @@ public class StpsvTest extends BLASTest { @ParameterizedTest @MethodSource("BLASImplementations") void testSanity(BLAS blas) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/StrmmTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/StrmmTest.java index 35d2c9d1..c9ed66b4 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/StrmmTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/StrmmTest.java @@ -35,5 +35,6 @@ public class StrmmTest extends BLASTest { @ParameterizedTest @MethodSource("BLASImplementations") void testSanity(BLAS blas) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/StrmvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/StrmvTest.java index ce3f53b3..0d7fbb54 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/StrmvTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/StrmvTest.java @@ -35,5 +35,6 @@ public class StrmvTest extends BLASTest { @ParameterizedTest @MethodSource("BLASImplementations") void testSanity(BLAS blas) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/StrsmTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/StrsmTest.java index 8685e1d8..153ef6dd 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/StrsmTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/StrsmTest.java @@ -35,5 +35,6 @@ public class StrsmTest extends BLASTest { @ParameterizedTest @MethodSource("BLASImplementations") void testSanity(BLAS blas) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/blas/src/test/java/dev/ludovic/netlib/blas/StrsvTest.java b/blas/src/test/java/dev/ludovic/netlib/blas/StrsvTest.java index e027a835..62dd902e 100644 --- a/blas/src/test/java/dev/ludovic/netlib/blas/StrsvTest.java +++ b/blas/src/test/java/dev/ludovic/netlib/blas/StrsvTest.java @@ -35,5 +35,6 @@ public class StrsvTest extends BLASTest { @ParameterizedTest @MethodSource("BLASImplementations") void testSanity(BLAS blas) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DbdsdcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DbdsdcTest.java index f5ecc9bb..cefbc2c3 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DbdsdcTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DbdsdcTest.java @@ -35,5 +35,6 @@ public class DbdsdcTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DbdsqrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DbdsqrTest.java index ed0b398b..5e79046e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DbdsqrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DbdsqrTest.java @@ -35,5 +35,6 @@ public class DbdsqrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DdisnaTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DdisnaTest.java index 6feeac8f..e6ea9bd0 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DdisnaTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DdisnaTest.java @@ -35,5 +35,6 @@ public class DdisnaTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbbrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbbrdTest.java index 501f4c8c..de0ce14c 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbbrdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbbrdTest.java @@ -35,5 +35,6 @@ public class DgbbrdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbconTest.java index 0a84c13a..7af0edd8 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbconTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbconTest.java @@ -35,5 +35,6 @@ public class DgbconTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbequTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbequTest.java index 4d09f343..2846f32f 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbequTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbequTest.java @@ -35,5 +35,6 @@ public class DgbequTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbrfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbrfsTest.java index 3bc074d7..7daa8fe4 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbrfsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbrfsTest.java @@ -35,5 +35,6 @@ public class DgbrfsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbsvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbsvTest.java index f40716e4..e7f6d469 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbsvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbsvTest.java @@ -35,5 +35,6 @@ public class DgbsvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbsvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbsvxTest.java index ae8da8ad..9f3266c7 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbsvxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbsvxTest.java @@ -35,5 +35,6 @@ public class DgbsvxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgbtf2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgbtf2Test.java index 286fd2c9..cbbb3e4a 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgbtf2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgbtf2Test.java @@ -35,5 +35,6 @@ public class Dgbtf2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbtrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbtrfTest.java index 8ad0e3af..54e1f4c7 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbtrfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbtrfTest.java @@ -35,5 +35,6 @@ public class DgbtrfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbtrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbtrsTest.java index cbefe2e0..a7089b6f 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbtrsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgbtrsTest.java @@ -35,5 +35,6 @@ public class DgbtrsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgebakTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgebakTest.java index 7a567f27..f519121a 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgebakTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgebakTest.java @@ -35,5 +35,6 @@ public class DgebakTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgebalTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgebalTest.java index 98dde67c..a709f992 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgebalTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgebalTest.java @@ -35,5 +35,6 @@ public class DgebalTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgebd2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgebd2Test.java index 18cd8af7..de135c23 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgebd2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgebd2Test.java @@ -35,5 +35,6 @@ public class Dgebd2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgebrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgebrdTest.java index f8004e15..d265e7c2 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgebrdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgebrdTest.java @@ -35,5 +35,6 @@ public class DgebrdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeconTest.java index aee1485d..e5d0ae38 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeconTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeconTest.java @@ -35,5 +35,6 @@ public class DgeconTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeequTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeequTest.java index 0d144ae2..9d14ff4d 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeequTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeequTest.java @@ -35,5 +35,6 @@ public class DgeequTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeesTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeesTest.java index 146701a0..c6b6b0fa 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeesTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeesTest.java @@ -35,5 +35,6 @@ public class DgeesTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeesxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeesxTest.java index 5cead174..9034d342 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeesxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeesxTest.java @@ -35,5 +35,6 @@ public class DgeesxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeevTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeevTest.java index 50b1b8af..79f9d0c9 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeevTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeevTest.java @@ -35,5 +35,6 @@ public class DgeevTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeevxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeevxTest.java index 1febc4c3..7c46d504 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeevxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeevxTest.java @@ -35,5 +35,6 @@ public class DgeevxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgegsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgegsTest.java index ed7da311..33e86a57 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgegsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgegsTest.java @@ -35,5 +35,6 @@ public class DgegsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgegvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgegvTest.java index 1da9f9da..ef35f6a1 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgegvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgegvTest.java @@ -35,5 +35,6 @@ public class DgegvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgehd2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgehd2Test.java index 89fec242..25a00a99 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgehd2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgehd2Test.java @@ -35,5 +35,6 @@ public class Dgehd2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgehrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgehrdTest.java index 0a9c2667..d6674b7f 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgehrdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgehrdTest.java @@ -35,5 +35,6 @@ public class DgehrdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgelq2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgelq2Test.java index c83079ea..ec2dad67 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgelq2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgelq2Test.java @@ -35,5 +35,6 @@ public class Dgelq2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelqfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelqfTest.java index e338fd63..f67b11d7 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelqfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelqfTest.java @@ -35,5 +35,6 @@ public class DgelqfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsTest.java index bc6c15b2..bcc214b5 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsTest.java @@ -35,5 +35,6 @@ public class DgelsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsdTest.java index ae1cbf4a..93297a56 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsdTest.java @@ -35,5 +35,6 @@ public class DgelsdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelssTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelssTest.java index 55614717..8338cb79 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelssTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelssTest.java @@ -35,5 +35,6 @@ public class DgelssTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsxTest.java index 89a58e54..3f5583b9 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsxTest.java @@ -35,5 +35,6 @@ public class DgelsxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsyTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsyTest.java index 4ef2a80c..8605e813 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsyTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgelsyTest.java @@ -35,5 +35,6 @@ public class DgelsyTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgeql2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgeql2Test.java index 765f9f07..e9798100 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgeql2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgeql2Test.java @@ -35,5 +35,6 @@ public class Dgeql2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeqlfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeqlfTest.java index 0c36ce33..2810dbe3 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeqlfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeqlfTest.java @@ -35,5 +35,6 @@ public class DgeqlfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgeqp3Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgeqp3Test.java index 3a9e9034..8692da07 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgeqp3Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgeqp3Test.java @@ -35,5 +35,6 @@ public class Dgeqp3Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeqpfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeqpfTest.java index 76179c73..c8423589 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeqpfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeqpfTest.java @@ -35,5 +35,6 @@ public class DgeqpfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgeqr2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgeqr2Test.java index 2a4374cb..367f8353 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgeqr2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgeqr2Test.java @@ -35,5 +35,6 @@ public class Dgeqr2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeqrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeqrfTest.java index f13cd6d1..a0bfffbb 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeqrfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgeqrfTest.java @@ -35,5 +35,6 @@ public class DgeqrfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgerfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgerfsTest.java index 7fd04cf9..1d333ec1 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgerfsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgerfsTest.java @@ -35,5 +35,6 @@ public class DgerfsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgerq2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgerq2Test.java index 7d784e38..d15b502e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgerq2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgerq2Test.java @@ -35,5 +35,6 @@ public class Dgerq2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgerqfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgerqfTest.java index ee815a21..a7447aef 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgerqfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgerqfTest.java @@ -35,5 +35,6 @@ public class DgerqfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgesc2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgesc2Test.java index a7ab485d..da8e7ebf 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgesc2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgesc2Test.java @@ -35,5 +35,6 @@ public class Dgesc2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgesddTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgesddTest.java index 10c8b74b..5949b7a6 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgesddTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgesddTest.java @@ -35,5 +35,6 @@ public class DgesddTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgesvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgesvTest.java index 033a97d9..45113cd7 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgesvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgesvTest.java @@ -35,5 +35,6 @@ public class DgesvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgesvdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgesvdTest.java index 7af4ddef..0887169c 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgesvdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgesvdTest.java @@ -35,5 +35,6 @@ public class DgesvdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgesvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgesvxTest.java index 837f956b..b52b3065 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgesvxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgesvxTest.java @@ -35,5 +35,6 @@ public class DgesvxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgetc2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgetc2Test.java index 58fc2452..504b8e93 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgetc2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgetc2Test.java @@ -35,5 +35,6 @@ public class Dgetc2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgetf2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgetf2Test.java index 78d1ef48..c89826b3 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgetf2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgetf2Test.java @@ -35,5 +35,6 @@ public class Dgetf2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgetrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgetrfTest.java index 634c5225..a351eeea 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgetrfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgetrfTest.java @@ -35,5 +35,6 @@ public class DgetrfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgetriTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgetriTest.java index ad25d776..d54943e6 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgetriTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgetriTest.java @@ -35,5 +35,6 @@ public class DgetriTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgetrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgetrsTest.java index cf444363..dba74c7d 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgetrsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgetrsTest.java @@ -35,5 +35,6 @@ public class DgetrsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggbakTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggbakTest.java index c8b47c3d..009243af 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggbakTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggbakTest.java @@ -35,5 +35,6 @@ public class DggbakTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggbalTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggbalTest.java index e4ab4430..fc3f432e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggbalTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggbalTest.java @@ -35,5 +35,6 @@ public class DggbalTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggesTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggesTest.java index a23d735b..36005a2e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggesTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggesTest.java @@ -35,5 +35,6 @@ public class DggesTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggesxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggesxTest.java index 1a392cf2..ee0f5bdf 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggesxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggesxTest.java @@ -35,5 +35,6 @@ public class DggesxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggevTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggevTest.java index 337bd7c3..0aa8fa88 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggevTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggevTest.java @@ -35,5 +35,6 @@ public class DggevTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggevxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggevxTest.java index 8f8e5790..3a1ef4c7 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggevxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggevxTest.java @@ -35,5 +35,6 @@ public class DggevxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggglmTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggglmTest.java index 945c5518..398ab180 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggglmTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggglmTest.java @@ -35,5 +35,6 @@ public class DggglmTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgghrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgghrdTest.java index d2fdb167..98679de2 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgghrdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgghrdTest.java @@ -35,5 +35,6 @@ public class DgghrdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgglseTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgglseTest.java index 0a0744af..9e96ecea 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgglseTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgglseTest.java @@ -35,5 +35,6 @@ public class DgglseTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggqrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggqrfTest.java index 10935dd4..95eb0c43 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggqrfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggqrfTest.java @@ -35,5 +35,6 @@ public class DggqrfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggrqfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggrqfTest.java index 9c8ccf47..79853f87 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggrqfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggrqfTest.java @@ -35,5 +35,6 @@ public class DggrqfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggsvdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggsvdTest.java index 42f46f29..e619e537 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggsvdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggsvdTest.java @@ -35,5 +35,6 @@ public class DggsvdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggsvpTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggsvpTest.java index 17b8beaf..cbe09e94 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DggsvpTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DggsvpTest.java @@ -35,5 +35,6 @@ public class DggsvpTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgtconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgtconTest.java index d0b2b750..7a142511 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgtconTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgtconTest.java @@ -35,5 +35,6 @@ public class DgtconTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgtrfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgtrfsTest.java index 20daa4c4..086b2db4 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgtrfsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgtrfsTest.java @@ -35,5 +35,6 @@ public class DgtrfsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgtsvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgtsvTest.java index 889f8b2c..e12a46cc 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgtsvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgtsvTest.java @@ -35,5 +35,6 @@ public class DgtsvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgtsvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgtsvxTest.java index 274c39ab..80ee8cdc 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgtsvxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgtsvxTest.java @@ -35,5 +35,6 @@ public class DgtsvxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgttrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgttrfTest.java index 6443a039..2d27ceab 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgttrfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgttrfTest.java @@ -35,5 +35,6 @@ public class DgttrfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgttrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgttrsTest.java index 21804ba2..efdbcfa3 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DgttrsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DgttrsTest.java @@ -35,5 +35,6 @@ public class DgttrsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgtts2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgtts2Test.java index 8b96838e..bdc527af 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgtts2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dgtts2Test.java @@ -35,5 +35,6 @@ public class Dgtts2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DhgeqzTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DhgeqzTest.java index 68469ed2..c1399a01 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DhgeqzTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DhgeqzTest.java @@ -35,5 +35,6 @@ public class DhgeqzTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DhseinTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DhseinTest.java index 920b417e..24828313 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DhseinTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DhseinTest.java @@ -35,5 +35,6 @@ public class DhseinTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DhseqrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DhseqrTest.java index e176cd36..eb00d600 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DhseqrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DhseqrTest.java @@ -35,5 +35,6 @@ public class DhseqrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlabadTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlabadTest.java index 3bdadd22..8761ff18 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlabadTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlabadTest.java @@ -35,5 +35,6 @@ public class DlabadTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlabrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlabrdTest.java index c1ba45f5..21ecc2d7 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlabrdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlabrdTest.java @@ -35,5 +35,6 @@ public class DlabrdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlacn2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlacn2Test.java index fea271fd..6f99cfec 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlacn2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlacn2Test.java @@ -35,5 +35,6 @@ public class Dlacn2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaconTest.java index c7688207..9672998e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaconTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaconTest.java @@ -35,5 +35,6 @@ public class DlaconTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlacpyTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlacpyTest.java index f20d2064..fa16bd38 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlacpyTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlacpyTest.java @@ -35,5 +35,6 @@ public class DlacpyTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DladivTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DladivTest.java index dc567015..c3ea36c2 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DladivTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DladivTest.java @@ -35,5 +35,6 @@ public class DladivTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlae2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlae2Test.java index 5fbeb9be..c5ed8a21 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlae2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlae2Test.java @@ -35,5 +35,6 @@ public class Dlae2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaebzTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaebzTest.java index edb08bce..2698f84b 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaebzTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaebzTest.java @@ -35,5 +35,6 @@ public class DlaebzTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed0Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed0Test.java index 7965d04d..37a8b831 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed0Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed0Test.java @@ -35,5 +35,6 @@ public class Dlaed0Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed1Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed1Test.java index df5fd4a6..b00d7bff 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed1Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed1Test.java @@ -35,5 +35,6 @@ public class Dlaed1Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed2Test.java index c4f3c09a..5b2cadd1 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed2Test.java @@ -35,5 +35,6 @@ public class Dlaed2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed3Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed3Test.java index bf433161..e3af5d30 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed3Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed3Test.java @@ -35,5 +35,6 @@ public class Dlaed3Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed4Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed4Test.java index 76ffc5c0..5b967427 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed4Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed4Test.java @@ -35,5 +35,6 @@ public class Dlaed4Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed5Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed5Test.java index 77221c5f..f0a59bec 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed5Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed5Test.java @@ -35,5 +35,6 @@ public class Dlaed5Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed6Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed6Test.java index 56bbff60..6d17afd8 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed6Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed6Test.java @@ -35,5 +35,6 @@ public class Dlaed6Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed7Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed7Test.java index ed4607ea..910f17cb 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed7Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed7Test.java @@ -35,5 +35,6 @@ public class Dlaed7Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed8Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed8Test.java index 439067df..ceaf39eb 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed8Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed8Test.java @@ -35,5 +35,6 @@ public class Dlaed8Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed9Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed9Test.java index 61051449..99100fa3 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed9Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaed9Test.java @@ -35,5 +35,6 @@ public class Dlaed9Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaedaTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaedaTest.java index 91eb593a..785bf6fc 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaedaTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaedaTest.java @@ -35,5 +35,6 @@ public class DlaedaTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaeinTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaeinTest.java index 911079f8..5cef5067 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaeinTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaeinTest.java @@ -35,5 +35,6 @@ public class DlaeinTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaev2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaev2Test.java index 7b34b597..a1d8f9a9 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaev2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaev2Test.java @@ -35,5 +35,6 @@ public class Dlaev2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaexcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaexcTest.java index c14931f9..e7118d94 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaexcTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaexcTest.java @@ -35,5 +35,6 @@ public class DlaexcTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlag2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlag2Test.java index bedd15c7..7c4ade88 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlag2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlag2Test.java @@ -35,5 +35,6 @@ public class Dlag2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlag2sTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlag2sTest.java index 9bc04241..4bfabeca 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlag2sTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlag2sTest.java @@ -35,5 +35,6 @@ public class Dlag2sTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlags2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlags2Test.java index a09bc87e..8a73d93f 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlags2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlags2Test.java @@ -35,5 +35,6 @@ public class Dlags2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlagtfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlagtfTest.java index 86aa6296..b87a7fb5 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlagtfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlagtfTest.java @@ -35,5 +35,6 @@ public class DlagtfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlagtmTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlagtmTest.java index 4502dfe8..6373ae55 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlagtmTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlagtmTest.java @@ -35,5 +35,6 @@ public class DlagtmTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlagtsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlagtsTest.java index 57f166d2..fa5ac7ba 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlagtsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlagtsTest.java @@ -35,5 +35,6 @@ public class DlagtsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlagv2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlagv2Test.java index 95f7380c..2a6c03dc 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlagv2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlagv2Test.java @@ -35,5 +35,6 @@ public class Dlagv2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlahqrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlahqrTest.java index 17373605..012f9c97 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlahqrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlahqrTest.java @@ -35,5 +35,6 @@ public class DlahqrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlahr2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlahr2Test.java index de196d7a..d0b98edf 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlahr2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlahr2Test.java @@ -35,5 +35,6 @@ public class Dlahr2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlahrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlahrdTest.java index fa8ca46c..84540b02 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlahrdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlahrdTest.java @@ -35,5 +35,6 @@ public class DlahrdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaic1Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaic1Test.java index 4789195c..c70297d3 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaic1Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaic1Test.java @@ -35,5 +35,6 @@ public class Dlaic1Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaln2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaln2Test.java index 52b26767..fef2ff88 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaln2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaln2Test.java @@ -35,5 +35,6 @@ public class Dlaln2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlals0Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlals0Test.java index c617e841..73873622 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlals0Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlals0Test.java @@ -35,5 +35,6 @@ public class Dlals0Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlalsaTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlalsaTest.java index 1b09982d..274f91e9 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlalsaTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlalsaTest.java @@ -35,5 +35,6 @@ public class DlalsaTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlalsdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlalsdTest.java index cb9e794d..d4d175fa 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlalsdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlalsdTest.java @@ -35,5 +35,6 @@ public class DlalsdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc1Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc1Test.java index 275703f5..6d84cb61 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc1Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc1Test.java @@ -35,5 +35,6 @@ public class Dlamc1Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc2Test.java index dc89d4fb..8cd43e34 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc2Test.java @@ -35,5 +35,6 @@ public class Dlamc2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc4Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc4Test.java index 8d0c36ab..390f0676 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc4Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc4Test.java @@ -35,5 +35,6 @@ public class Dlamc4Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc5Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc5Test.java index a9733233..55da8e68 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc5Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlamc5Test.java @@ -35,5 +35,6 @@ public class Dlamc5Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlamrgTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlamrgTest.java index 9c32aaba..df151aaa 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlamrgTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlamrgTest.java @@ -35,5 +35,6 @@ public class DlamrgTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlanv2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlanv2Test.java index 15ea59e5..17de5b27 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlanv2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlanv2Test.java @@ -35,5 +35,6 @@ public class Dlanv2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlapllTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlapllTest.java index e9cdc600..ba86be93 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlapllTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlapllTest.java @@ -35,5 +35,6 @@ public class DlapllTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlapmtTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlapmtTest.java index 49003729..e3566fa4 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlapmtTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlapmtTest.java @@ -35,5 +35,6 @@ public class DlapmtTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqgbTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqgbTest.java index a6013561..c961d57c 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqgbTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqgbTest.java @@ -35,5 +35,6 @@ public class DlaqgbTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqgeTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqgeTest.java index 439406c1..d4b1acf1 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqgeTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqgeTest.java @@ -35,5 +35,6 @@ public class DlaqgeTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqp2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqp2Test.java index 4f88a8f0..8468b755 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqp2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqp2Test.java @@ -35,5 +35,6 @@ public class Dlaqp2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqpsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqpsTest.java index 3129393c..7c5521e1 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqpsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqpsTest.java @@ -35,5 +35,6 @@ public class DlaqpsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr0Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr0Test.java index 6b378304..12c6cc87 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr0Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr0Test.java @@ -35,5 +35,6 @@ public class Dlaqr0Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr1Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr1Test.java index 1a99e586..ce7106c6 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr1Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr1Test.java @@ -35,5 +35,6 @@ public class Dlaqr1Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr2Test.java index 7b3bdad4..206b1efe 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr2Test.java @@ -35,5 +35,6 @@ public class Dlaqr2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr3Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr3Test.java index 41d6da79..390995f7 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr3Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr3Test.java @@ -35,5 +35,6 @@ public class Dlaqr3Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr4Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr4Test.java index c8dd6bb1..41447695 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr4Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr4Test.java @@ -35,5 +35,6 @@ public class Dlaqr4Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr5Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr5Test.java index d42a51d7..10100df5 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr5Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlaqr5Test.java @@ -35,5 +35,6 @@ public class Dlaqr5Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqsbTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqsbTest.java index 6553dfd0..5e4eb143 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqsbTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqsbTest.java @@ -35,5 +35,6 @@ public class DlaqsbTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqspTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqspTest.java index 7b4fbe84..eb9dfb10 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqspTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqspTest.java @@ -35,5 +35,6 @@ public class DlaqspTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqsyTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqsyTest.java index 80a674d0..646e1a5e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqsyTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqsyTest.java @@ -35,5 +35,6 @@ public class DlaqsyTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqtrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqtrTest.java index a9cf0a2d..994656ab 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqtrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaqtrTest.java @@ -35,5 +35,6 @@ public class DlaqtrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlar1vTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlar1vTest.java index 16665d77..3c6044ab 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlar1vTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlar1vTest.java @@ -35,5 +35,6 @@ public class Dlar1vTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlar2vTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlar2vTest.java index 09d5a4d7..4089fb99 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlar2vTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlar2vTest.java @@ -35,5 +35,6 @@ public class Dlar2vTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfTest.java index b92d8d11..c1edb94d 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfTest.java @@ -35,5 +35,6 @@ public class DlarfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfbTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfbTest.java index 22a8e82d..bc294aff 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfbTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfbTest.java @@ -35,5 +35,6 @@ public class DlarfbTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfgTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfgTest.java index b0ce9d89..cbc262ad 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfgTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfgTest.java @@ -35,5 +35,6 @@ public class DlarfgTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarftTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarftTest.java index b6b90e0e..0fd70b0a 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarftTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarftTest.java @@ -35,5 +35,6 @@ public class DlarftTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfxTest.java index de3d330f..e322c738 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarfxTest.java @@ -35,5 +35,6 @@ public class DlarfxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlargvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlargvTest.java index 3f0a701d..9446cc49 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlargvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlargvTest.java @@ -35,5 +35,6 @@ public class DlargvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarnvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarnvTest.java index 6873980f..8daec1b8 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarnvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarnvTest.java @@ -35,5 +35,6 @@ public class DlarnvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarraTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarraTest.java index 4da2f150..6da74ab3 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarraTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarraTest.java @@ -35,5 +35,6 @@ public class DlarraTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrbTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrbTest.java index 0af49153..fce7f168 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrbTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrbTest.java @@ -35,5 +35,6 @@ public class DlarrbTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrcTest.java index bedce4be..a2ebf91c 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrcTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrcTest.java @@ -35,5 +35,6 @@ public class DlarrcTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrdTest.java index f1ba687d..718e77ea 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrdTest.java @@ -35,5 +35,6 @@ public class DlarrdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarreTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarreTest.java index 27b04e68..83c32b9f 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarreTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarreTest.java @@ -35,5 +35,6 @@ public class DlarreTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrfTest.java index 8d4e7e98..6ec374ee 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrfTest.java @@ -35,5 +35,6 @@ public class DlarrfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrjTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrjTest.java index 4aef5786..c8ca58d1 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrjTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrjTest.java @@ -35,5 +35,6 @@ public class DlarrjTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrkTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrkTest.java index 9a81f1f7..1a74d648 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrkTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrkTest.java @@ -35,5 +35,6 @@ public class DlarrkTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrrTest.java index 5ba00785..3310c203 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrrTest.java @@ -35,5 +35,6 @@ public class DlarrrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrvTest.java index f9b758ff..dd40399b 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarrvTest.java @@ -35,5 +35,6 @@ public class DlarrvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlartgTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlartgTest.java index c0180964..8e04acb8 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlartgTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlartgTest.java @@ -35,5 +35,6 @@ public class DlartgTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlartvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlartvTest.java index 315992a4..fd3f2fc8 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlartvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlartvTest.java @@ -35,5 +35,6 @@ public class DlartvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaruvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaruvTest.java index 48f20b87..ab641f6a 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaruvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaruvTest.java @@ -35,5 +35,6 @@ public class DlaruvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarzTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarzTest.java index 9701a895..2b224c18 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarzTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarzTest.java @@ -35,5 +35,6 @@ public class DlarzTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarzbTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarzbTest.java index 90260dce..35b0680e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarzbTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarzbTest.java @@ -35,5 +35,6 @@ public class DlarzbTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarztTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarztTest.java index 5534cc6b..44afd679 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarztTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlarztTest.java @@ -35,5 +35,6 @@ public class DlarztTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlas2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlas2Test.java index e0ab587e..f5e605c7 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlas2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlas2Test.java @@ -35,5 +35,6 @@ public class Dlas2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasclTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasclTest.java index e3f0b052..dfdf6fb9 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasclTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasclTest.java @@ -35,5 +35,6 @@ public class DlasclTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd0Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd0Test.java index 30f05ad4..d9cb13b9 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd0Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd0Test.java @@ -35,5 +35,6 @@ public class Dlasd0Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd1Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd1Test.java index d0ec9aa5..77f864d0 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd1Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd1Test.java @@ -35,5 +35,6 @@ public class Dlasd1Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd2Test.java index c84103fb..7911517e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd2Test.java @@ -35,5 +35,6 @@ public class Dlasd2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd3Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd3Test.java index fdcf64c8..8a35294b 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd3Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd3Test.java @@ -35,5 +35,6 @@ public class Dlasd3Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd4Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd4Test.java index c03ae544..966c1895 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd4Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd4Test.java @@ -35,5 +35,6 @@ public class Dlasd4Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd5Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd5Test.java index 633c7438..6d8dacf3 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd5Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd5Test.java @@ -35,5 +35,6 @@ public class Dlasd5Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd6Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd6Test.java index 00652545..f6235c2c 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd6Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd6Test.java @@ -35,5 +35,6 @@ public class Dlasd6Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd7Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd7Test.java index fad24f88..defd2902 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd7Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd7Test.java @@ -35,5 +35,6 @@ public class Dlasd7Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd8Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd8Test.java index 9b97d7ba..ce370271 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd8Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasd8Test.java @@ -35,5 +35,6 @@ public class Dlasd8Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasdaTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasdaTest.java index 52fae845..f485db11 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasdaTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasdaTest.java @@ -35,5 +35,6 @@ public class DlasdaTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasdqTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasdqTest.java index d7533084..85ef9145 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasdqTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasdqTest.java @@ -35,5 +35,6 @@ public class DlasdqTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasdtTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasdtTest.java index f165338d..cbd51d25 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasdtTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasdtTest.java @@ -35,5 +35,6 @@ public class DlasdtTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasetTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasetTest.java index 3e5c0011..a86fa81e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasetTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasetTest.java @@ -35,5 +35,6 @@ public class DlasetTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq1Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq1Test.java index 43444f52..5118236f 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq1Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq1Test.java @@ -35,5 +35,6 @@ public class Dlasq1Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq2Test.java index 18894dcf..cd1d26ae 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq2Test.java @@ -35,5 +35,6 @@ public class Dlasq2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq3Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq3Test.java index bd7f9f79..e874fed3 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq3Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq3Test.java @@ -35,5 +35,6 @@ public class Dlasq3Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq4Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq4Test.java index cb77bc1b..2f587575 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq4Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq4Test.java @@ -35,5 +35,6 @@ public class Dlasq4Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq5Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq5Test.java index 7c470460..4c5c1369 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq5Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq5Test.java @@ -35,5 +35,6 @@ public class Dlasq5Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq6Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq6Test.java index 9d07d6c0..a1ba81e4 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq6Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasq6Test.java @@ -35,5 +35,6 @@ public class Dlasq6Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasrTest.java index 03e92038..50e1d1ce 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasrTest.java @@ -35,5 +35,6 @@ public class DlasrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasrtTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasrtTest.java index e4ba6c7e..e22e3537 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasrtTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasrtTest.java @@ -35,5 +35,6 @@ public class DlasrtTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlassqTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlassqTest.java index 2c3cf260..bafc9b3a 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlassqTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlassqTest.java @@ -35,5 +35,6 @@ public class DlassqTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasv2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasv2Test.java index 9f4c524d..6222d1eb 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasv2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasv2Test.java @@ -35,5 +35,6 @@ public class Dlasv2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaswpTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaswpTest.java index b9aa21c4..410e634d 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaswpTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlaswpTest.java @@ -35,5 +35,6 @@ public class DlaswpTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasy2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasy2Test.java index 042a8f0b..8a0676fb 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasy2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlasy2Test.java @@ -35,5 +35,6 @@ public class Dlasy2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasyfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasyfTest.java index 1ffe360f..b48223d6 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasyfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlasyfTest.java @@ -35,5 +35,6 @@ public class DlasyfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatbsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatbsTest.java index 95588e5f..5588cc1f 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatbsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatbsTest.java @@ -35,5 +35,6 @@ public class DlatbsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatdfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatdfTest.java index 637b58bc..ea509bc2 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatdfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatdfTest.java @@ -35,5 +35,6 @@ public class DlatdfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatpsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatpsTest.java index afbe2a30..d3ab8570 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatpsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatpsTest.java @@ -35,5 +35,6 @@ public class DlatpsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatrdTest.java index 0b9efd45..ae0eaccc 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatrdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatrdTest.java @@ -35,5 +35,6 @@ public class DlatrdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatrsTest.java index aecb0857..1cb749a1 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatrsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatrsTest.java @@ -35,5 +35,6 @@ public class DlatrsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatrzTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatrzTest.java index cf654490..eb5ffd37 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatrzTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatrzTest.java @@ -35,5 +35,6 @@ public class DlatrzTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatzmTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatzmTest.java index f03428e8..23da6165 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatzmTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlatzmTest.java @@ -35,5 +35,6 @@ public class DlatzmTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlauu2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlauu2Test.java index 6b3a0fa4..4a3ac36c 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlauu2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlauu2Test.java @@ -35,5 +35,6 @@ public class Dlauu2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlauumTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlauumTest.java index b24f8616..c5b95ab6 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DlauumTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DlauumTest.java @@ -35,5 +35,6 @@ public class DlauumTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlazq3Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlazq3Test.java index e335436e..69b83b6b 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlazq3Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlazq3Test.java @@ -35,5 +35,6 @@ public class Dlazq3Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlazq4Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlazq4Test.java index 8b63672b..3a362dea 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlazq4Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dlazq4Test.java @@ -35,5 +35,6 @@ public class Dlazq4Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DopgtrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DopgtrTest.java index 3bd577a5..adf99841 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DopgtrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DopgtrTest.java @@ -35,5 +35,6 @@ public class DopgtrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DopmtrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DopmtrTest.java index 1510f4b3..271c57e5 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DopmtrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DopmtrTest.java @@ -35,5 +35,6 @@ public class DopmtrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorg2lTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorg2lTest.java index 0adcf387..d4079942 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorg2lTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorg2lTest.java @@ -35,5 +35,6 @@ public class Dorg2lTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorg2rTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorg2rTest.java index 8742e3f7..6485d1e3 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorg2rTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorg2rTest.java @@ -35,5 +35,6 @@ public class Dorg2rTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgbrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgbrTest.java index 0036dc1f..7ab232b8 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgbrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgbrTest.java @@ -35,5 +35,6 @@ public class DorgbrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DorghrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DorghrTest.java index 772b9d6b..9984e044 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DorghrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DorghrTest.java @@ -35,5 +35,6 @@ public class DorghrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorgl2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorgl2Test.java index 4bd709d6..f9a41cbb 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorgl2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorgl2Test.java @@ -35,5 +35,6 @@ public class Dorgl2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DorglqTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DorglqTest.java index 08f33bed..ed2ae907 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DorglqTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DorglqTest.java @@ -35,5 +35,6 @@ public class DorglqTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgqlTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgqlTest.java index 21d822da..87e15639 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgqlTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgqlTest.java @@ -35,5 +35,6 @@ public class DorgqlTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgqrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgqrTest.java index f694c917..eac4b176 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgqrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgqrTest.java @@ -35,5 +35,6 @@ public class DorgqrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorgr2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorgr2Test.java index b5d7f164..0c66ddd3 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorgr2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorgr2Test.java @@ -35,5 +35,6 @@ public class Dorgr2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgrqTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgrqTest.java index dfa22b04..437db4bc 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgrqTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgrqTest.java @@ -35,5 +35,6 @@ public class DorgrqTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgtrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgtrTest.java index a8c4bc40..3436ded8 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgtrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DorgtrTest.java @@ -35,5 +35,6 @@ public class DorgtrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorm2lTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorm2lTest.java index 850eb113..d4bdc4f9 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorm2lTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorm2lTest.java @@ -35,5 +35,6 @@ public class Dorm2lTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorm2rTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorm2rTest.java index b11dd191..bdc944a9 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorm2rTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorm2rTest.java @@ -35,5 +35,6 @@ public class Dorm2rTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DormbrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormbrTest.java index 389b0694..41fdea77 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DormbrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormbrTest.java @@ -35,5 +35,6 @@ public class DormbrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DormhrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormhrTest.java index 28ba987a..46b69c8b 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DormhrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormhrTest.java @@ -35,5 +35,6 @@ public class DormhrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorml2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorml2Test.java index ccb8f7cb..2b4c25b2 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorml2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dorml2Test.java @@ -35,5 +35,6 @@ public class Dorml2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DormlqTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormlqTest.java index f8497721..48101b8f 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DormlqTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormlqTest.java @@ -35,5 +35,6 @@ public class DormlqTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DormqlTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormqlTest.java index c72529dd..f9fc2595 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DormqlTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormqlTest.java @@ -35,5 +35,6 @@ public class DormqlTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DormqrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormqrTest.java index 4aaea73d..1142314e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DormqrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormqrTest.java @@ -35,5 +35,6 @@ public class DormqrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dormr2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dormr2Test.java index bdd17254..9af2a099 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dormr2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dormr2Test.java @@ -35,5 +35,6 @@ public class Dormr2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dormr3Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dormr3Test.java index 533016ec..a6d31938 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dormr3Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dormr3Test.java @@ -35,5 +35,6 @@ public class Dormr3Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DormrqTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormrqTest.java index b542edad..0690a1b0 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DormrqTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormrqTest.java @@ -35,5 +35,6 @@ public class DormrqTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DormrzTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormrzTest.java index a2d92c72..0ea1585b 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DormrzTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormrzTest.java @@ -35,5 +35,6 @@ public class DormrzTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DormtrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormtrTest.java index b1231658..01c12e7d 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DormtrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DormtrTest.java @@ -35,5 +35,6 @@ public class DormtrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbconTest.java index c8ff3b18..bb69399f 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbconTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbconTest.java @@ -35,5 +35,6 @@ public class DpbconTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbequTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbequTest.java index f78450f9..7d0b4c1c 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbequTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbequTest.java @@ -35,5 +35,6 @@ public class DpbequTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbrfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbrfsTest.java index 102cb0b4..9fc94f12 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbrfsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbrfsTest.java @@ -35,5 +35,6 @@ public class DpbrfsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbstfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbstfTest.java index d006817f..dfcd0f40 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbstfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbstfTest.java @@ -35,5 +35,6 @@ public class DpbstfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbsvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbsvTest.java index ac7e6b07..ea9e3383 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbsvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbsvTest.java @@ -35,5 +35,6 @@ public class DpbsvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbsvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbsvxTest.java index 1687637b..4511e6d3 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbsvxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbsvxTest.java @@ -35,5 +35,6 @@ public class DpbsvxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dpbtf2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dpbtf2Test.java index b805c2d2..71798bc2 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dpbtf2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dpbtf2Test.java @@ -35,5 +35,6 @@ public class Dpbtf2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbtrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbtrfTest.java index f7eb561b..6c3d3a14 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbtrfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbtrfTest.java @@ -35,5 +35,6 @@ public class DpbtrfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbtrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbtrsTest.java index d26c9562..3a225360 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbtrsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpbtrsTest.java @@ -35,5 +35,6 @@ public class DpbtrsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpoconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpoconTest.java index 6a9ca36d..f9015c1a 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpoconTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpoconTest.java @@ -35,5 +35,6 @@ public class DpoconTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpoequTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpoequTest.java index 062cac22..b459859b 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpoequTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpoequTest.java @@ -35,5 +35,6 @@ public class DpoequTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DporfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DporfsTest.java index 7c40f0ce..7b032aa8 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DporfsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DporfsTest.java @@ -35,5 +35,6 @@ public class DporfsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DposvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DposvTest.java index 0caab792..59aaea81 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DposvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DposvTest.java @@ -35,5 +35,6 @@ public class DposvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DposvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DposvxTest.java index bbb4182c..c5e0fe2a 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DposvxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DposvxTest.java @@ -35,5 +35,6 @@ public class DposvxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dpotf2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dpotf2Test.java index 54d6175e..83ffaf95 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dpotf2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dpotf2Test.java @@ -35,5 +35,6 @@ public class Dpotf2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpotrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpotrfTest.java index 81863e19..cd806e5e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpotrfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpotrfTest.java @@ -35,5 +35,6 @@ public class DpotrfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpotriTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpotriTest.java index ab0446d8..0be7bc85 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpotriTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpotriTest.java @@ -35,5 +35,6 @@ public class DpotriTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpotrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpotrsTest.java index 61f10121..aa3b7e2e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpotrsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpotrsTest.java @@ -35,5 +35,6 @@ public class DpotrsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DppconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DppconTest.java index b5ae527c..676798d0 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DppconTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DppconTest.java @@ -35,5 +35,6 @@ public class DppconTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DppequTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DppequTest.java index 447b1f19..0beaa7fb 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DppequTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DppequTest.java @@ -35,5 +35,6 @@ public class DppequTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpprfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpprfsTest.java index c1a62a0a..14e6f4f5 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpprfsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpprfsTest.java @@ -35,5 +35,6 @@ public class DpprfsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DppsvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DppsvTest.java index 109eefed..94f1ca30 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DppsvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DppsvTest.java @@ -35,5 +35,6 @@ public class DppsvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DppsvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DppsvxTest.java index 23add8dd..19c12983 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DppsvxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DppsvxTest.java @@ -35,5 +35,6 @@ public class DppsvxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpptrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpptrfTest.java index aef0cac2..da15ddad 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpptrfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpptrfTest.java @@ -35,5 +35,6 @@ public class DpptrfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpptriTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpptriTest.java index 52fe57fb..50640b3b 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpptriTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpptriTest.java @@ -35,5 +35,6 @@ public class DpptriTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpptrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpptrsTest.java index 19dac1e7..1fe70a99 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpptrsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpptrsTest.java @@ -35,5 +35,6 @@ public class DpptrsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DptconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DptconTest.java index c741927b..7117bf0a 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DptconTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DptconTest.java @@ -35,5 +35,6 @@ public class DptconTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpteqrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpteqrTest.java index 5c420791..3b231642 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpteqrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpteqrTest.java @@ -35,5 +35,6 @@ public class DpteqrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DptrfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DptrfsTest.java index 607238c5..cad43c0f 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DptrfsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DptrfsTest.java @@ -35,5 +35,6 @@ public class DptrfsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DptsvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DptsvTest.java index 8e7dc7b3..57f5612e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DptsvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DptsvTest.java @@ -35,5 +35,6 @@ public class DptsvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DptsvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DptsvxTest.java index ced35e41..b59e4a1b 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DptsvxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DptsvxTest.java @@ -35,5 +35,6 @@ public class DptsvxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpttrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpttrfTest.java index 486a9f54..64951f10 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpttrfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpttrfTest.java @@ -35,5 +35,6 @@ public class DpttrfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpttrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpttrsTest.java index f7435016..378fb9f6 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DpttrsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DpttrsTest.java @@ -35,5 +35,6 @@ public class DpttrsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dptts2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dptts2Test.java index f60c7590..4b38bb96 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dptts2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dptts2Test.java @@ -35,5 +35,6 @@ public class Dptts2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DrsclTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DrsclTest.java index 53e39135..b9ab6e67 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DrsclTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DrsclTest.java @@ -35,5 +35,6 @@ public class DrsclTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbevTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbevTest.java index 6436c18d..c9e5cc90 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbevTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbevTest.java @@ -35,5 +35,6 @@ public class DsbevTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbevdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbevdTest.java index 9c017a43..6b500bae 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbevdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbevdTest.java @@ -35,5 +35,6 @@ public class DsbevdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbevxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbevxTest.java index 0f297d1d..b3e59935 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbevxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbevxTest.java @@ -35,5 +35,6 @@ public class DsbevxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgstTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgstTest.java index 29111023..508c24df 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgstTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgstTest.java @@ -35,5 +35,6 @@ public class DsbgstTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgvTest.java index 26ba0722..8e5dbbfc 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgvTest.java @@ -35,5 +35,6 @@ public class DsbgvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgvdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgvdTest.java index 2c524311..f043e574 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgvdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgvdTest.java @@ -35,5 +35,6 @@ public class DsbgvdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgvxTest.java index f1d870dd..c075500e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgvxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbgvxTest.java @@ -35,5 +35,6 @@ public class DsbgvxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbtrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbtrdTest.java index 985c3a86..8607c3a4 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbtrdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsbtrdTest.java @@ -35,5 +35,6 @@ public class DsbtrdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsgesvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsgesvTest.java index 840e04d1..e03ac856 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsgesvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsgesvTest.java @@ -35,5 +35,6 @@ public class DsgesvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DspconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspconTest.java index ea1b8f06..18ae5d5d 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DspconTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspconTest.java @@ -35,5 +35,6 @@ public class DspconTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DspevTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspevTest.java index 1125f6af..3e5de5a5 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DspevTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspevTest.java @@ -35,5 +35,6 @@ public class DspevTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DspevdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspevdTest.java index f6aa9cb2..32552d0f 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DspevdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspevdTest.java @@ -35,5 +35,6 @@ public class DspevdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DspevxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspevxTest.java index a0a0b2e5..e065a10d 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DspevxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspevxTest.java @@ -35,5 +35,6 @@ public class DspevxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DspgstTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspgstTest.java index 52b8295c..16eaae88 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DspgstTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspgstTest.java @@ -35,5 +35,6 @@ public class DspgstTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DspgvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspgvTest.java index aa260366..e5c6a8f1 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DspgvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspgvTest.java @@ -35,5 +35,6 @@ public class DspgvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DspgvdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspgvdTest.java index 96fa0519..c8808837 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DspgvdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspgvdTest.java @@ -35,5 +35,6 @@ public class DspgvdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DspgvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspgvxTest.java index 70d66941..cc9d6338 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DspgvxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspgvxTest.java @@ -35,5 +35,6 @@ public class DspgvxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsprfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsprfsTest.java index bef4a7d8..c06cc8dd 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsprfsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsprfsTest.java @@ -35,5 +35,6 @@ public class DsprfsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DspsvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspsvTest.java index 137a55c5..e1b63d3a 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DspsvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspsvTest.java @@ -35,5 +35,6 @@ public class DspsvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DspsvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspsvxTest.java index 1ff75af5..fd774909 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DspsvxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DspsvxTest.java @@ -35,5 +35,6 @@ public class DspsvxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsptrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsptrdTest.java index fd1326b9..ba183c06 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsptrdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsptrdTest.java @@ -35,5 +35,6 @@ public class DsptrdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsptrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsptrfTest.java index 3e3cc38d..13f967d9 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsptrfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsptrfTest.java @@ -35,5 +35,6 @@ public class DsptrfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsptriTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsptriTest.java index 409004df..52f1a396 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsptriTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsptriTest.java @@ -35,5 +35,6 @@ public class DsptriTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsptrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsptrsTest.java index f122c829..bf178bb5 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsptrsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsptrsTest.java @@ -35,5 +35,6 @@ public class DsptrsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DstebzTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstebzTest.java index 4eb54aee..35872e59 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DstebzTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstebzTest.java @@ -35,5 +35,6 @@ public class DstebzTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DstedcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstedcTest.java index a65c48f5..163a3a19 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DstedcTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstedcTest.java @@ -35,5 +35,6 @@ public class DstedcTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DstegrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstegrTest.java index 69ada315..87564dda 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DstegrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstegrTest.java @@ -35,5 +35,6 @@ public class DstegrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsteinTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsteinTest.java index e811fd1c..244834a9 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsteinTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsteinTest.java @@ -35,5 +35,6 @@ public class DsteinTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DstemrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstemrTest.java index ad807c94..f790155b 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DstemrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstemrTest.java @@ -35,5 +35,6 @@ public class DstemrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsteqrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsteqrTest.java index 62c6ca7b..c3b7035b 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsteqrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsteqrTest.java @@ -35,5 +35,6 @@ public class DsteqrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsterfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsterfTest.java index 7d5709d8..408656e0 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsterfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsterfTest.java @@ -35,5 +35,6 @@ public class DsterfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DstevTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstevTest.java index 61bc7644..6bd72082 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DstevTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstevTest.java @@ -35,5 +35,6 @@ public class DstevTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DstevdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstevdTest.java index 06135aa7..69f1410f 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DstevdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstevdTest.java @@ -35,5 +35,6 @@ public class DstevdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DstevrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstevrTest.java index bee5dff2..bd06c56f 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DstevrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstevrTest.java @@ -35,5 +35,6 @@ public class DstevrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DstevxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstevxTest.java index 9e5b12f0..be44f41b 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DstevxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DstevxTest.java @@ -35,5 +35,6 @@ public class DstevxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyconTest.java index b987c20b..8d2fa18c 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyconTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyconTest.java @@ -35,5 +35,6 @@ public class DsyconTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevTest.java index a8c7bc65..c2149279 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevTest.java @@ -35,5 +35,6 @@ public class DsyevTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevdTest.java index 7aa978ac..a1c330e2 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevdTest.java @@ -35,5 +35,6 @@ public class DsyevdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevrTest.java index 866d7ecd..8656955a 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevrTest.java @@ -35,5 +35,6 @@ public class DsyevrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevxTest.java index 0a9d53dc..50782d2a 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyevxTest.java @@ -35,5 +35,6 @@ public class DsyevxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dsygs2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dsygs2Test.java index ae590624..5dbd97e2 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dsygs2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dsygs2Test.java @@ -35,5 +35,6 @@ public class Dsygs2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsygstTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsygstTest.java index 83a4e52c..6815f9ce 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsygstTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsygstTest.java @@ -35,5 +35,6 @@ public class DsygstTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsygvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsygvTest.java index 7cc15687..6197e6d6 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsygvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsygvTest.java @@ -35,5 +35,6 @@ public class DsygvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsygvdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsygvdTest.java index c0cc8dbd..98b53de8 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsygvdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsygvdTest.java @@ -35,5 +35,6 @@ public class DsygvdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsygvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsygvxTest.java index e3d03e31..44155afe 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsygvxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsygvxTest.java @@ -35,5 +35,6 @@ public class DsygvxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyrfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyrfsTest.java index 304ef786..c55acf54 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyrfsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsyrfsTest.java @@ -35,5 +35,6 @@ public class DsyrfsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsysvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsysvTest.java index fab0809e..c4a702e8 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsysvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsysvTest.java @@ -35,5 +35,6 @@ public class DsysvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsysvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsysvxTest.java index 4147a3d5..675447e3 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsysvxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsysvxTest.java @@ -35,5 +35,6 @@ public class DsysvxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dsytd2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dsytd2Test.java index 04138bac..7fd63d79 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dsytd2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dsytd2Test.java @@ -35,5 +35,6 @@ public class Dsytd2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dsytf2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dsytf2Test.java index 0abe941f..bcdec741 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dsytf2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dsytf2Test.java @@ -35,5 +35,6 @@ public class Dsytf2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsytrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsytrdTest.java index 2af7d970..ec636e45 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsytrdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsytrdTest.java @@ -35,5 +35,6 @@ public class DsytrdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsytrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsytrfTest.java index 089c00ac..63c047be 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsytrfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsytrfTest.java @@ -35,5 +35,6 @@ public class DsytrfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsytriTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsytriTest.java index 48448113..f1d247c5 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsytriTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsytriTest.java @@ -35,5 +35,6 @@ public class DsytriTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsytrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsytrsTest.java index 52c01a74..790b03a1 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DsytrsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DsytrsTest.java @@ -35,5 +35,6 @@ public class DsytrsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtbconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtbconTest.java index 4b1cd7f5..4b8e7ce4 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtbconTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtbconTest.java @@ -35,5 +35,6 @@ public class DtbconTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtbrfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtbrfsTest.java index 14454016..667a30e9 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtbrfsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtbrfsTest.java @@ -35,5 +35,6 @@ public class DtbrfsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtbtrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtbtrsTest.java index 47d4a4c8..4a59491c 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtbtrsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtbtrsTest.java @@ -35,5 +35,6 @@ public class DtbtrsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgevcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgevcTest.java index 21672448..ba77256b 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgevcTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgevcTest.java @@ -35,5 +35,6 @@ public class DtgevcTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dtgex2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dtgex2Test.java index d4318cd7..79ff2088 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dtgex2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dtgex2Test.java @@ -35,5 +35,6 @@ public class Dtgex2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgexcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgexcTest.java index 65f75671..f96a8a82 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgexcTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgexcTest.java @@ -35,5 +35,6 @@ public class DtgexcTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsenTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsenTest.java index f81aca38..0270393a 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsenTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsenTest.java @@ -35,5 +35,6 @@ public class DtgsenTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsjaTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsjaTest.java index c7ade10e..0e22dcaa 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsjaTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsjaTest.java @@ -35,5 +35,6 @@ public class DtgsjaTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsnaTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsnaTest.java index 997e061a..f1454b73 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsnaTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsnaTest.java @@ -35,5 +35,6 @@ public class DtgsnaTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dtgsy2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dtgsy2Test.java index dc033118..f38e239d 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dtgsy2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dtgsy2Test.java @@ -35,5 +35,6 @@ public class Dtgsy2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsylTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsylTest.java index b304f799..f708a836 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsylTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtgsylTest.java @@ -35,5 +35,6 @@ public class DtgsylTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtpconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtpconTest.java index 14797236..92c8e30a 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtpconTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtpconTest.java @@ -35,5 +35,6 @@ public class DtpconTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtprfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtprfsTest.java index 6e5b12bf..0965813f 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtprfsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtprfsTest.java @@ -35,5 +35,6 @@ public class DtprfsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtptriTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtptriTest.java index b8bb4ae6..14a53cd5 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtptriTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtptriTest.java @@ -35,5 +35,6 @@ public class DtptriTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtptrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtptrsTest.java index 5efa5899..22e3ff32 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtptrsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtptrsTest.java @@ -35,5 +35,6 @@ public class DtptrsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrconTest.java index e46db35c..b1135c5e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrconTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrconTest.java @@ -35,5 +35,6 @@ public class DtrconTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrevcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrevcTest.java index 46d95111..1152bd59 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrevcTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrevcTest.java @@ -35,5 +35,6 @@ public class DtrevcTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrexcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrexcTest.java index def8a170..9b66806a 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrexcTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrexcTest.java @@ -35,5 +35,6 @@ public class DtrexcTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrrfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrrfsTest.java index 8fc35606..bbca582d 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrrfsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrrfsTest.java @@ -35,5 +35,6 @@ public class DtrrfsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrsenTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrsenTest.java index fde3d532..86e757c5 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrsenTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrsenTest.java @@ -35,5 +35,6 @@ public class DtrsenTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrsnaTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrsnaTest.java index fee8f9f3..1a39731e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrsnaTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrsnaTest.java @@ -35,5 +35,6 @@ public class DtrsnaTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrsylTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrsylTest.java index 5391b615..1e8d5579 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrsylTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrsylTest.java @@ -35,5 +35,6 @@ public class DtrsylTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dtrti2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dtrti2Test.java index 503586e1..fa63f750 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Dtrti2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Dtrti2Test.java @@ -35,5 +35,6 @@ public class Dtrti2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrtriTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrtriTest.java index 3ebd404e..7f009878 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrtriTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrtriTest.java @@ -35,5 +35,6 @@ public class DtrtriTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrtrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrtrsTest.java index 20de69e4..9aa4c0e0 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrtrsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtrtrsTest.java @@ -35,5 +35,6 @@ public class DtrtrsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtzrqfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtzrqfTest.java index ef76c2ee..c0cf10b3 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtzrqfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtzrqfTest.java @@ -35,5 +35,6 @@ public class DtzrqfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtzrzfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtzrzfTest.java index 1c0cb7ee..6883a529 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/DtzrzfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/DtzrzfTest.java @@ -35,5 +35,6 @@ public class DtzrzfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/IlaverTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/IlaverTest.java index f29c80e2..6f8a72bc 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/IlaverTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/IlaverTest.java @@ -35,5 +35,6 @@ public class IlaverTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SbdsdcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SbdsdcTest.java index 1f75a6c4..3ff08954 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SbdsdcTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SbdsdcTest.java @@ -35,5 +35,6 @@ public class SbdsdcTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SbdsqrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SbdsqrTest.java index 1eaa2d11..7c1ccea5 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SbdsqrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SbdsqrTest.java @@ -35,5 +35,6 @@ public class SbdsqrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SdisnaTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SdisnaTest.java index 7e38c946..f67977a3 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SdisnaTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SdisnaTest.java @@ -35,5 +35,6 @@ public class SdisnaTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbbrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbbrdTest.java index f26c5ae4..6aae25ff 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbbrdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbbrdTest.java @@ -35,5 +35,6 @@ public class SgbbrdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbconTest.java index 3d177eb6..0ee78698 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbconTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbconTest.java @@ -35,5 +35,6 @@ public class SgbconTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbequTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbequTest.java index 363c6414..09e5f638 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbequTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbequTest.java @@ -35,5 +35,6 @@ public class SgbequTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbrfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbrfsTest.java index f778bc66..02b760c5 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbrfsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbrfsTest.java @@ -35,5 +35,6 @@ public class SgbrfsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbsvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbsvTest.java index 3f4fa36b..067a32e0 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbsvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbsvTest.java @@ -35,5 +35,6 @@ public class SgbsvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbsvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbsvxTest.java index 7bf996b7..eebc3561 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbsvxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbsvxTest.java @@ -35,5 +35,6 @@ public class SgbsvxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgbtf2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgbtf2Test.java index 26133d19..453850f6 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgbtf2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgbtf2Test.java @@ -35,5 +35,6 @@ public class Sgbtf2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbtrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbtrfTest.java index 45caa61d..04febc6d 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbtrfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbtrfTest.java @@ -35,5 +35,6 @@ public class SgbtrfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbtrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbtrsTest.java index ffe2c164..cc4d0681 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbtrsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgbtrsTest.java @@ -35,5 +35,6 @@ public class SgbtrsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgebakTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgebakTest.java index dd1a5d56..72e56459 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgebakTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgebakTest.java @@ -35,5 +35,6 @@ public class SgebakTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgebalTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgebalTest.java index 11ff4f91..ed101b27 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgebalTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgebalTest.java @@ -35,5 +35,6 @@ public class SgebalTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgebd2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgebd2Test.java index 2539ba97..7f191e4c 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgebd2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgebd2Test.java @@ -35,5 +35,6 @@ public class Sgebd2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgebrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgebrdTest.java index 56138b01..924a0447 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgebrdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgebrdTest.java @@ -35,5 +35,6 @@ public class SgebrdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeconTest.java index 0fe971e5..ef298dc4 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeconTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeconTest.java @@ -35,5 +35,6 @@ public class SgeconTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeequTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeequTest.java index 0ccfe34b..9bb7fe52 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeequTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeequTest.java @@ -35,5 +35,6 @@ public class SgeequTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeesTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeesTest.java index 887378a2..3902d154 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeesTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeesTest.java @@ -35,5 +35,6 @@ public class SgeesTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeesxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeesxTest.java index 7f653bd5..ba9bacbd 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeesxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeesxTest.java @@ -35,5 +35,6 @@ public class SgeesxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeevTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeevTest.java index 2731afdd..3e462a8b 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeevTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeevTest.java @@ -35,5 +35,6 @@ public class SgeevTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeevxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeevxTest.java index 0eafffb0..aa537b0e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeevxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeevxTest.java @@ -35,5 +35,6 @@ public class SgeevxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgegsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgegsTest.java index 880ee126..0d921551 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgegsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgegsTest.java @@ -35,5 +35,6 @@ public class SgegsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgegvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgegvTest.java index 7d69fb05..f23596fd 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgegvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgegvTest.java @@ -35,5 +35,6 @@ public class SgegvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgehd2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgehd2Test.java index 49cdd93e..33bf9bb8 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgehd2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgehd2Test.java @@ -35,5 +35,6 @@ public class Sgehd2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgehrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgehrdTest.java index c265a133..fd13b131 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgehrdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgehrdTest.java @@ -35,5 +35,6 @@ public class SgehrdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgelq2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgelq2Test.java index 72604b09..82cf2664 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgelq2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgelq2Test.java @@ -35,5 +35,6 @@ public class Sgelq2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelqfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelqfTest.java index e0ceeb45..ca2a2ca8 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelqfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelqfTest.java @@ -35,5 +35,6 @@ public class SgelqfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsTest.java index 0553c24b..bbef0fc2 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsTest.java @@ -35,5 +35,6 @@ public class SgelsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsdTest.java index 08dbd763..0d6fad4c 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsdTest.java @@ -35,5 +35,6 @@ public class SgelsdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelssTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelssTest.java index 8f1d6a31..612205d9 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelssTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelssTest.java @@ -35,5 +35,6 @@ public class SgelssTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsxTest.java index 9438b4c3..7f61efc6 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsxTest.java @@ -35,5 +35,6 @@ public class SgelsxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsyTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsyTest.java index 5f29f6c7..95c27396 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsyTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgelsyTest.java @@ -35,5 +35,6 @@ public class SgelsyTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgeql2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgeql2Test.java index cde88171..1f5a51c6 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgeql2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgeql2Test.java @@ -35,5 +35,6 @@ public class Sgeql2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeqlfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeqlfTest.java index 106eefe0..cad87f32 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeqlfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeqlfTest.java @@ -35,5 +35,6 @@ public class SgeqlfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgeqp3Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgeqp3Test.java index a1e90fb3..ae4ac46f 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgeqp3Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgeqp3Test.java @@ -35,5 +35,6 @@ public class Sgeqp3Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeqpfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeqpfTest.java index 9c992df3..0e7aad32 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeqpfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeqpfTest.java @@ -35,5 +35,6 @@ public class SgeqpfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgeqr2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgeqr2Test.java index c1ab1e46..163093f6 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgeqr2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgeqr2Test.java @@ -35,5 +35,6 @@ public class Sgeqr2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeqrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeqrfTest.java index 562b2ebf..0e28509e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeqrfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgeqrfTest.java @@ -35,5 +35,6 @@ public class SgeqrfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgerfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgerfsTest.java index f1f3e2e9..b665b1d1 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgerfsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgerfsTest.java @@ -35,5 +35,6 @@ public class SgerfsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgerq2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgerq2Test.java index d272e7ec..9b769b27 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgerq2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgerq2Test.java @@ -35,5 +35,6 @@ public class Sgerq2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgerqfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgerqfTest.java index 10d64219..89b7e656 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgerqfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgerqfTest.java @@ -35,5 +35,6 @@ public class SgerqfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgesc2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgesc2Test.java index 92fd8a8a..3f40a76a 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgesc2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgesc2Test.java @@ -35,5 +35,6 @@ public class Sgesc2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgesddTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgesddTest.java index c455c39e..8e167c61 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgesddTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgesddTest.java @@ -35,5 +35,6 @@ public class SgesddTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgesvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgesvTest.java index da42d01a..04d80b56 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgesvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgesvTest.java @@ -35,5 +35,6 @@ public class SgesvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgesvdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgesvdTest.java index fca2e80d..d979d02e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgesvdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgesvdTest.java @@ -35,5 +35,6 @@ public class SgesvdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgesvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgesvxTest.java index 656753ed..8516bf54 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgesvxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgesvxTest.java @@ -35,5 +35,6 @@ public class SgesvxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgetc2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgetc2Test.java index d1876dd6..ad2248c4 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgetc2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgetc2Test.java @@ -35,5 +35,6 @@ public class Sgetc2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgetf2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgetf2Test.java index 3916d7ef..6d9eb36e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgetf2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgetf2Test.java @@ -35,5 +35,6 @@ public class Sgetf2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgetrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgetrfTest.java index 1d93df95..cca8d866 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgetrfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgetrfTest.java @@ -35,5 +35,6 @@ public class SgetrfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgetriTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgetriTest.java index a30a3bb6..3a3ea059 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgetriTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgetriTest.java @@ -35,5 +35,6 @@ public class SgetriTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgetrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgetrsTest.java index 0008c608..3707d9fa 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgetrsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgetrsTest.java @@ -35,5 +35,6 @@ public class SgetrsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggbakTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggbakTest.java index 36ccb18f..de661a9d 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggbakTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggbakTest.java @@ -35,5 +35,6 @@ public class SggbakTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggbalTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggbalTest.java index 5f69f51b..cfe3bf25 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggbalTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggbalTest.java @@ -35,5 +35,6 @@ public class SggbalTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggesTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggesTest.java index 62d8d5eb..ad99905e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggesTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggesTest.java @@ -35,5 +35,6 @@ public class SggesTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggesxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggesxTest.java index 2ab576a5..3c19554b 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggesxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggesxTest.java @@ -35,5 +35,6 @@ public class SggesxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggevTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggevTest.java index 67c8bd3a..01163323 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggevTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggevTest.java @@ -35,5 +35,6 @@ public class SggevTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggevxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggevxTest.java index 5f645b2a..30d9851c 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggevxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggevxTest.java @@ -35,5 +35,6 @@ public class SggevxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggglmTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggglmTest.java index a4c0df80..a5a501be 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggglmTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggglmTest.java @@ -35,5 +35,6 @@ public class SggglmTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgghrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgghrdTest.java index dd85c885..ccafa2d4 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgghrdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgghrdTest.java @@ -35,5 +35,6 @@ public class SgghrdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgglseTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgglseTest.java index 787e2bd1..f3061d4a 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgglseTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgglseTest.java @@ -35,5 +35,6 @@ public class SgglseTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggqrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggqrfTest.java index 3749b647..bf06623c 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggqrfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggqrfTest.java @@ -35,5 +35,6 @@ public class SggqrfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggrqfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggrqfTest.java index fa589298..5543a290 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggrqfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggrqfTest.java @@ -35,5 +35,6 @@ public class SggrqfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggsvdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggsvdTest.java index 9a636364..e1ecbeff 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggsvdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggsvdTest.java @@ -35,5 +35,6 @@ public class SggsvdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggsvpTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggsvpTest.java index f66270ef..25397377 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SggsvpTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SggsvpTest.java @@ -35,5 +35,6 @@ public class SggsvpTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgtconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgtconTest.java index 58945a6b..835684a1 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgtconTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgtconTest.java @@ -35,5 +35,6 @@ public class SgtconTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgtrfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgtrfsTest.java index c0b07cf0..d3057298 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgtrfsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgtrfsTest.java @@ -35,5 +35,6 @@ public class SgtrfsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgtsvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgtsvTest.java index 2b64962f..56506761 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgtsvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgtsvTest.java @@ -35,5 +35,6 @@ public class SgtsvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgtsvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgtsvxTest.java index 3049379d..dd18aa2b 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgtsvxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgtsvxTest.java @@ -35,5 +35,6 @@ public class SgtsvxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgttrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgttrfTest.java index 463e1297..f0fd450d 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgttrfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgttrfTest.java @@ -35,5 +35,6 @@ public class SgttrfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgttrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgttrsTest.java index 093c9cb5..63c21011 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SgttrsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SgttrsTest.java @@ -35,5 +35,6 @@ public class SgttrsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgtts2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgtts2Test.java index 8591ff40..0c033668 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgtts2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sgtts2Test.java @@ -35,5 +35,6 @@ public class Sgtts2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/ShgeqzTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/ShgeqzTest.java index 143569d3..1341a677 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/ShgeqzTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/ShgeqzTest.java @@ -35,5 +35,6 @@ public class ShgeqzTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/ShseinTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/ShseinTest.java index 153d84b1..2a316056 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/ShseinTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/ShseinTest.java @@ -35,5 +35,6 @@ public class ShseinTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/ShseqrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/ShseqrTest.java index 2039a1b1..d589afc7 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/ShseqrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/ShseqrTest.java @@ -35,5 +35,6 @@ public class ShseqrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlabadTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlabadTest.java index 2460ca32..04f1aa1b 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlabadTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlabadTest.java @@ -35,5 +35,6 @@ public class SlabadTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlabrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlabrdTest.java index 255b67da..ec2a327f 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlabrdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlabrdTest.java @@ -35,5 +35,6 @@ public class SlabrdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slacn2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slacn2Test.java index 7fb84560..d66cb56e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slacn2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slacn2Test.java @@ -35,5 +35,6 @@ public class Slacn2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaconTest.java index 98de2919..3c6b224a 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaconTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaconTest.java @@ -35,5 +35,6 @@ public class SlaconTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlacpyTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlacpyTest.java index 351f4b38..da657f10 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlacpyTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlacpyTest.java @@ -35,5 +35,6 @@ public class SlacpyTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SladivTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SladivTest.java index d3c05fad..c1cd8070 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SladivTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SladivTest.java @@ -35,5 +35,6 @@ public class SladivTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slae2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slae2Test.java index d16531cf..df6723ed 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slae2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slae2Test.java @@ -35,5 +35,6 @@ public class Slae2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaebzTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaebzTest.java index c23f8dd7..a3aa63fb 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaebzTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaebzTest.java @@ -35,5 +35,6 @@ public class SlaebzTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed0Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed0Test.java index 08480bad..a91d71a1 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed0Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed0Test.java @@ -35,5 +35,6 @@ public class Slaed0Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed1Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed1Test.java index 4647ca8f..bece7dd4 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed1Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed1Test.java @@ -35,5 +35,6 @@ public class Slaed1Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed2Test.java index 516f3476..2593616a 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed2Test.java @@ -35,5 +35,6 @@ public class Slaed2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed3Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed3Test.java index 77268544..bf49a1c5 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed3Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed3Test.java @@ -35,5 +35,6 @@ public class Slaed3Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed4Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed4Test.java index 6bf1f61d..f1794cb5 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed4Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed4Test.java @@ -35,5 +35,6 @@ public class Slaed4Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed5Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed5Test.java index 607e0370..1e0c8627 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed5Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed5Test.java @@ -35,5 +35,6 @@ public class Slaed5Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed6Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed6Test.java index c26b9b2f..0bc08e19 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed6Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed6Test.java @@ -35,5 +35,6 @@ public class Slaed6Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed7Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed7Test.java index af519ce1..e23816c1 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed7Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed7Test.java @@ -35,5 +35,6 @@ public class Slaed7Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed8Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed8Test.java index 49172d61..2236b688 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed8Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed8Test.java @@ -35,5 +35,6 @@ public class Slaed8Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed9Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed9Test.java index fd216037..6ef580f3 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed9Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaed9Test.java @@ -35,5 +35,6 @@ public class Slaed9Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaedaTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaedaTest.java index e2c8f176..db37e9c8 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaedaTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaedaTest.java @@ -35,5 +35,6 @@ public class SlaedaTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaeinTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaeinTest.java index e69b6910..736e3e7b 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaeinTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaeinTest.java @@ -35,5 +35,6 @@ public class SlaeinTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaev2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaev2Test.java index 98c5eaff..4006c01d 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaev2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaev2Test.java @@ -35,5 +35,6 @@ public class Slaev2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaexcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaexcTest.java index 43b267aa..da64943b 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaexcTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaexcTest.java @@ -35,5 +35,6 @@ public class SlaexcTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slag2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slag2Test.java index 72229af6..a6603d7b 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slag2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slag2Test.java @@ -35,5 +35,6 @@ public class Slag2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slag2dTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slag2dTest.java index efa5649b..5d9c3ba3 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slag2dTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slag2dTest.java @@ -35,5 +35,6 @@ public class Slag2dTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slags2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slags2Test.java index a83905f0..b4156835 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slags2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slags2Test.java @@ -35,5 +35,6 @@ public class Slags2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlagtfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlagtfTest.java index 3be460ff..7dd798a6 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlagtfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlagtfTest.java @@ -35,5 +35,6 @@ public class SlagtfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlagtmTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlagtmTest.java index 962036c7..62bbb644 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlagtmTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlagtmTest.java @@ -35,5 +35,6 @@ public class SlagtmTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlagtsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlagtsTest.java index e474d812..f13a6323 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlagtsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlagtsTest.java @@ -35,5 +35,6 @@ public class SlagtsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slagv2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slagv2Test.java index e324122d..9f9bb499 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slagv2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slagv2Test.java @@ -35,5 +35,6 @@ public class Slagv2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlahqrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlahqrTest.java index 726de7dd..5f908c35 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlahqrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlahqrTest.java @@ -35,5 +35,6 @@ public class SlahqrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slahr2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slahr2Test.java index a095ea53..38845b6e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slahr2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slahr2Test.java @@ -35,5 +35,6 @@ public class Slahr2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlahrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlahrdTest.java index 2c9253dc..a24fb5e0 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlahrdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlahrdTest.java @@ -35,5 +35,6 @@ public class SlahrdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaic1Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaic1Test.java index da951572..4d6a3e48 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaic1Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaic1Test.java @@ -35,5 +35,6 @@ public class Slaic1Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaln2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaln2Test.java index 480387c3..e207f817 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaln2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaln2Test.java @@ -35,5 +35,6 @@ public class Slaln2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slals0Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slals0Test.java index 769f6f5f..dd29c902 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slals0Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slals0Test.java @@ -35,5 +35,6 @@ public class Slals0Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlalsaTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlalsaTest.java index b70b8de7..44a3eaf6 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlalsaTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlalsaTest.java @@ -35,5 +35,6 @@ public class SlalsaTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlalsdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlalsdTest.java index 3929332e..0860464a 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlalsdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlalsdTest.java @@ -35,5 +35,6 @@ public class SlalsdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc1Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc1Test.java index faa4f946..73536a9b 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc1Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc1Test.java @@ -35,5 +35,6 @@ public class Slamc1Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc2Test.java index 24c1188a..0e8f2d58 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc2Test.java @@ -35,5 +35,6 @@ public class Slamc2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc4Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc4Test.java index bba70513..1567c0a1 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc4Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc4Test.java @@ -35,5 +35,6 @@ public class Slamc4Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc5Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc5Test.java index 85c47c74..d6a2d439 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc5Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slamc5Test.java @@ -35,5 +35,6 @@ public class Slamc5Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlamrgTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlamrgTest.java index 0b1dac21..bb75cfee 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlamrgTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlamrgTest.java @@ -35,5 +35,6 @@ public class SlamrgTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slanv2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slanv2Test.java index d300e1b4..cfe0c71f 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slanv2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slanv2Test.java @@ -35,5 +35,6 @@ public class Slanv2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlapllTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlapllTest.java index 4b517516..bf47e75e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlapllTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlapllTest.java @@ -35,5 +35,6 @@ public class SlapllTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlapmtTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlapmtTest.java index 072dd6ee..58ed1ec4 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlapmtTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlapmtTest.java @@ -35,5 +35,6 @@ public class SlapmtTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqgbTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqgbTest.java index 12c83a73..99b675bf 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqgbTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqgbTest.java @@ -35,5 +35,6 @@ public class SlaqgbTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqgeTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqgeTest.java index 5f81ce22..9e914a8d 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqgeTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqgeTest.java @@ -35,5 +35,6 @@ public class SlaqgeTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqp2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqp2Test.java index aeccb9d1..5952aa31 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqp2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqp2Test.java @@ -35,5 +35,6 @@ public class Slaqp2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqpsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqpsTest.java index 067a0f85..6efd492d 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqpsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqpsTest.java @@ -35,5 +35,6 @@ public class SlaqpsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr0Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr0Test.java index db5bdf46..78e0d64a 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr0Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr0Test.java @@ -35,5 +35,6 @@ public class Slaqr0Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr1Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr1Test.java index 1aa12707..9a88c5e8 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr1Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr1Test.java @@ -35,5 +35,6 @@ public class Slaqr1Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr2Test.java index af4f7899..565aecfb 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr2Test.java @@ -35,5 +35,6 @@ public class Slaqr2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr3Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr3Test.java index 0ce5d304..b3570ff0 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr3Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr3Test.java @@ -35,5 +35,6 @@ public class Slaqr3Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr4Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr4Test.java index 3db65799..fab4a61b 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr4Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr4Test.java @@ -35,5 +35,6 @@ public class Slaqr4Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr5Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr5Test.java index fd73c389..107a32d8 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr5Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slaqr5Test.java @@ -35,5 +35,6 @@ public class Slaqr5Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqsbTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqsbTest.java index e78f011f..d37b0745 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqsbTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqsbTest.java @@ -35,5 +35,6 @@ public class SlaqsbTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqspTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqspTest.java index ab228585..5a47b06c 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqspTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqspTest.java @@ -35,5 +35,6 @@ public class SlaqspTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqsyTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqsyTest.java index b09dc815..880f7919 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqsyTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqsyTest.java @@ -35,5 +35,6 @@ public class SlaqsyTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqtrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqtrTest.java index 39471275..9abb1f2a 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqtrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaqtrTest.java @@ -35,5 +35,6 @@ public class SlaqtrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slar1vTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slar1vTest.java index 41cf1654..2e3a3634 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slar1vTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slar1vTest.java @@ -35,5 +35,6 @@ public class Slar1vTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slar2vTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slar2vTest.java index 6e95430d..48d4e8f9 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slar2vTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slar2vTest.java @@ -35,5 +35,6 @@ public class Slar2vTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfTest.java index 6a7aa639..0787ef4d 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfTest.java @@ -35,5 +35,6 @@ public class SlarfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfbTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfbTest.java index 3e88762a..0c7962b0 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfbTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfbTest.java @@ -35,5 +35,6 @@ public class SlarfbTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfgTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfgTest.java index e73dcdf3..e1aed572 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfgTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfgTest.java @@ -35,5 +35,6 @@ public class SlarfgTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarftTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarftTest.java index e3f46c66..e9a3700f 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarftTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarftTest.java @@ -35,5 +35,6 @@ public class SlarftTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfxTest.java index c0362f74..e3006829 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarfxTest.java @@ -35,5 +35,6 @@ public class SlarfxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlargvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlargvTest.java index 3ccfaf32..4779d9dd 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlargvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlargvTest.java @@ -35,5 +35,6 @@ public class SlargvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarnvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarnvTest.java index faca14a1..6ff702fc 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarnvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarnvTest.java @@ -35,5 +35,6 @@ public class SlarnvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarraTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarraTest.java index 2c741aa4..fd93577f 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarraTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarraTest.java @@ -35,5 +35,6 @@ public class SlarraTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrbTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrbTest.java index 6ebb5e02..14f8ffd1 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrbTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrbTest.java @@ -35,5 +35,6 @@ public class SlarrbTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrcTest.java index 794369f4..5b348df7 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrcTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrcTest.java @@ -35,5 +35,6 @@ public class SlarrcTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrdTest.java index b2540481..64248349 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrdTest.java @@ -35,5 +35,6 @@ public class SlarrdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarreTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarreTest.java index c9648696..2aaf274a 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarreTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarreTest.java @@ -35,5 +35,6 @@ public class SlarreTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrfTest.java index dd653a18..61cd324e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrfTest.java @@ -35,5 +35,6 @@ public class SlarrfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrjTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrjTest.java index 7fcd0b23..10dc2ff2 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrjTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrjTest.java @@ -35,5 +35,6 @@ public class SlarrjTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrkTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrkTest.java index 7179f51c..8279f671 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrkTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrkTest.java @@ -35,5 +35,6 @@ public class SlarrkTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrrTest.java index b53238f7..333fd98e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrrTest.java @@ -35,5 +35,6 @@ public class SlarrrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrvTest.java index b6c63f8c..f5380265 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarrvTest.java @@ -35,5 +35,6 @@ public class SlarrvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlartgTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlartgTest.java index 60af17e7..4e9faac0 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlartgTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlartgTest.java @@ -35,5 +35,6 @@ public class SlartgTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlartvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlartvTest.java index dc3747cf..6bdd9f22 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlartvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlartvTest.java @@ -35,5 +35,6 @@ public class SlartvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaruvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaruvTest.java index 1e436884..b33456c1 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaruvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaruvTest.java @@ -35,5 +35,6 @@ public class SlaruvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarzTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarzTest.java index 1d5dcd4c..e59b5460 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarzTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarzTest.java @@ -35,5 +35,6 @@ public class SlarzTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarzbTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarzbTest.java index bbfe31c7..b4c431ef 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarzbTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarzbTest.java @@ -35,5 +35,6 @@ public class SlarzbTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarztTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarztTest.java index 99b9e884..35d30e5b 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarztTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlarztTest.java @@ -35,5 +35,6 @@ public class SlarztTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slas2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slas2Test.java index f53d471d..a949daf5 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slas2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slas2Test.java @@ -35,5 +35,6 @@ public class Slas2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasclTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasclTest.java index f30c468b..43dd49ec 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasclTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasclTest.java @@ -35,5 +35,6 @@ public class SlasclTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd0Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd0Test.java index 9a77dfb5..2923a73c 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd0Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd0Test.java @@ -35,5 +35,6 @@ public class Slasd0Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd1Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd1Test.java index c9668394..765d73b6 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd1Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd1Test.java @@ -35,5 +35,6 @@ public class Slasd1Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd2Test.java index 37c1a935..c762aa73 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd2Test.java @@ -35,5 +35,6 @@ public class Slasd2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd3Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd3Test.java index dbf57a7b..3a907d57 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd3Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd3Test.java @@ -35,5 +35,6 @@ public class Slasd3Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd4Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd4Test.java index 3b814b4b..ff80ab9d 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd4Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd4Test.java @@ -35,5 +35,6 @@ public class Slasd4Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd5Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd5Test.java index e748babc..3421e38f 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd5Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd5Test.java @@ -35,5 +35,6 @@ public class Slasd5Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd6Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd6Test.java index ea4ffa93..3a998069 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd6Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd6Test.java @@ -35,5 +35,6 @@ public class Slasd6Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd7Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd7Test.java index 54c7e558..83cf9acb 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd7Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd7Test.java @@ -35,5 +35,6 @@ public class Slasd7Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd8Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd8Test.java index 25e175a0..cbe3209b 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd8Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasd8Test.java @@ -35,5 +35,6 @@ public class Slasd8Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasdaTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasdaTest.java index 5ce7fc99..37714ec3 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasdaTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasdaTest.java @@ -35,5 +35,6 @@ public class SlasdaTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasdqTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasdqTest.java index ea875750..f4b0b8a9 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasdqTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasdqTest.java @@ -35,5 +35,6 @@ public class SlasdqTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasdtTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasdtTest.java index 5db29637..c728e204 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasdtTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasdtTest.java @@ -35,5 +35,6 @@ public class SlasdtTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasetTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasetTest.java index d13c4f89..9b1b3264 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasetTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasetTest.java @@ -35,5 +35,6 @@ public class SlasetTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq1Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq1Test.java index e71fa09c..54b7d400 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq1Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq1Test.java @@ -35,5 +35,6 @@ public class Slasq1Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq2Test.java index fa7a2a9b..1b9ba70c 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq2Test.java @@ -35,5 +35,6 @@ public class Slasq2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq3Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq3Test.java index 4f30c3ea..56710a8d 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq3Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq3Test.java @@ -35,5 +35,6 @@ public class Slasq3Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq4Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq4Test.java index da8eb5aa..29f32f2f 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq4Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq4Test.java @@ -35,5 +35,6 @@ public class Slasq4Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq5Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq5Test.java index 22a51587..7f1378cd 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq5Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq5Test.java @@ -35,5 +35,6 @@ public class Slasq5Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq6Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq6Test.java index 7c08d042..afaaa830 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq6Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasq6Test.java @@ -35,5 +35,6 @@ public class Slasq6Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasrTest.java index adfe555a..9ad1ac01 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasrTest.java @@ -35,5 +35,6 @@ public class SlasrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasrtTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasrtTest.java index cdbd1487..841caabd 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasrtTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasrtTest.java @@ -35,5 +35,6 @@ public class SlasrtTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlassqTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlassqTest.java index 3dc5cd56..0f75e745 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlassqTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlassqTest.java @@ -35,5 +35,6 @@ public class SlassqTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasv2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasv2Test.java index ab7e4b63..4827f2f5 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasv2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasv2Test.java @@ -35,5 +35,6 @@ public class Slasv2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaswpTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaswpTest.java index 460bea04..22f5cd2c 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaswpTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlaswpTest.java @@ -35,5 +35,6 @@ public class SlaswpTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasy2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasy2Test.java index 2663d52b..515e9b10 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasy2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slasy2Test.java @@ -35,5 +35,6 @@ public class Slasy2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasyfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasyfTest.java index 2647397f..9163b8b0 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasyfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlasyfTest.java @@ -35,5 +35,6 @@ public class SlasyfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatbsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatbsTest.java index 0bb3f321..b62a779a 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatbsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatbsTest.java @@ -35,5 +35,6 @@ public class SlatbsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatdfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatdfTest.java index 69cb78f3..6092fb59 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatdfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatdfTest.java @@ -35,5 +35,6 @@ public class SlatdfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatpsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatpsTest.java index a86eb880..833de687 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatpsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatpsTest.java @@ -35,5 +35,6 @@ public class SlatpsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatrdTest.java index de323fea..01073a8e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatrdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatrdTest.java @@ -35,5 +35,6 @@ public class SlatrdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatrsTest.java index fa3b63e3..249655d5 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatrsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatrsTest.java @@ -35,5 +35,6 @@ public class SlatrsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatrzTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatrzTest.java index f3f620b7..42a23e51 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatrzTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatrzTest.java @@ -35,5 +35,6 @@ public class SlatrzTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatzmTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatzmTest.java index 0d13e018..a0900ece 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatzmTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlatzmTest.java @@ -35,5 +35,6 @@ public class SlatzmTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slauu2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slauu2Test.java index 13d68b80..8c0002a3 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slauu2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slauu2Test.java @@ -35,5 +35,6 @@ public class Slauu2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlauumTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlauumTest.java index 024ddefb..677bfb19 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SlauumTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SlauumTest.java @@ -35,5 +35,6 @@ public class SlauumTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slazq3Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slazq3Test.java index 26340aad..b610438b 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slazq3Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slazq3Test.java @@ -35,5 +35,6 @@ public class Slazq3Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slazq4Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slazq4Test.java index 1a1b1e28..b60e73a4 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Slazq4Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Slazq4Test.java @@ -35,5 +35,6 @@ public class Slazq4Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SopgtrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SopgtrTest.java index 4b4e699f..687ecd21 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SopgtrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SopgtrTest.java @@ -35,5 +35,6 @@ public class SopgtrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SopmtrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SopmtrTest.java index 23679ed0..3c6ac893 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SopmtrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SopmtrTest.java @@ -35,5 +35,6 @@ public class SopmtrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorg2lTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorg2lTest.java index d10abc05..b047b85a 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorg2lTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorg2lTest.java @@ -35,5 +35,6 @@ public class Sorg2lTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorg2rTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorg2rTest.java index ec86870b..1c1af779 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorg2rTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorg2rTest.java @@ -35,5 +35,6 @@ public class Sorg2rTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgbrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgbrTest.java index e5bd226c..b13d853e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgbrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgbrTest.java @@ -35,5 +35,6 @@ public class SorgbrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SorghrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SorghrTest.java index c161692d..839056ae 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SorghrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SorghrTest.java @@ -35,5 +35,6 @@ public class SorghrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorgl2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorgl2Test.java index 1decb0d2..148355b2 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorgl2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorgl2Test.java @@ -35,5 +35,6 @@ public class Sorgl2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SorglqTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SorglqTest.java index a2ef61b8..d6934cbf 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SorglqTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SorglqTest.java @@ -35,5 +35,6 @@ public class SorglqTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgqlTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgqlTest.java index e485ff43..7d93c38c 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgqlTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgqlTest.java @@ -35,5 +35,6 @@ public class SorgqlTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgqrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgqrTest.java index d7e0ae8a..02d3c28f 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgqrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgqrTest.java @@ -35,5 +35,6 @@ public class SorgqrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorgr2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorgr2Test.java index ce3cd1d5..befedc2e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorgr2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorgr2Test.java @@ -35,5 +35,6 @@ public class Sorgr2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgrqTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgrqTest.java index d7b34e65..765b7bf7 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgrqTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgrqTest.java @@ -35,5 +35,6 @@ public class SorgrqTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgtrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgtrTest.java index 20dbd1fa..20d66ce7 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgtrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SorgtrTest.java @@ -35,5 +35,6 @@ public class SorgtrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorm2lTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorm2lTest.java index 8dc3e5b1..40a80845 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorm2lTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorm2lTest.java @@ -35,5 +35,6 @@ public class Sorm2lTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorm2rTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorm2rTest.java index ad700778..f2e3180a 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorm2rTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorm2rTest.java @@ -35,5 +35,6 @@ public class Sorm2rTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SormbrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormbrTest.java index 4ce17b66..57ef4f4c 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SormbrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormbrTest.java @@ -35,5 +35,6 @@ public class SormbrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SormhrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormhrTest.java index 7c40fa60..498c39d1 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SormhrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormhrTest.java @@ -35,5 +35,6 @@ public class SormhrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorml2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorml2Test.java index cb1dd364..3fa2903f 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorml2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sorml2Test.java @@ -35,5 +35,6 @@ public class Sorml2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SormlqTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormlqTest.java index ba7cc9ac..51490906 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SormlqTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormlqTest.java @@ -35,5 +35,6 @@ public class SormlqTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SormqlTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormqlTest.java index 64739ca1..b691ce44 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SormqlTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormqlTest.java @@ -35,5 +35,6 @@ public class SormqlTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SormqrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormqrTest.java index f9b413ab..dde43659 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SormqrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormqrTest.java @@ -35,5 +35,6 @@ public class SormqrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sormr2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sormr2Test.java index 61618ad1..c5c9ad4b 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sormr2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sormr2Test.java @@ -35,5 +35,6 @@ public class Sormr2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sormr3Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sormr3Test.java index 51609288..63db4699 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sormr3Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sormr3Test.java @@ -35,5 +35,6 @@ public class Sormr3Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SormrqTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormrqTest.java index 42de6665..753238f2 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SormrqTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormrqTest.java @@ -35,5 +35,6 @@ public class SormrqTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SormrzTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormrzTest.java index f4a2c31c..d5ccc3fd 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SormrzTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormrzTest.java @@ -35,5 +35,6 @@ public class SormrzTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SormtrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormtrTest.java index a34ad200..45171bc0 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SormtrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SormtrTest.java @@ -35,5 +35,6 @@ public class SormtrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbconTest.java index 9c92f6eb..e78b8f42 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbconTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbconTest.java @@ -35,5 +35,6 @@ public class SpbconTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbequTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbequTest.java index 10de0df5..1943d5ca 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbequTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbequTest.java @@ -35,5 +35,6 @@ public class SpbequTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbrfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbrfsTest.java index 2c9cb6d4..62f6269a 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbrfsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbrfsTest.java @@ -35,5 +35,6 @@ public class SpbrfsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbstfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbstfTest.java index a0cb6da7..361a3c17 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbstfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbstfTest.java @@ -35,5 +35,6 @@ public class SpbstfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbsvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbsvTest.java index a27d9f31..7210f947 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbsvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbsvTest.java @@ -35,5 +35,6 @@ public class SpbsvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbsvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbsvxTest.java index 6ebb6593..775070ff 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbsvxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbsvxTest.java @@ -35,5 +35,6 @@ public class SpbsvxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Spbtf2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Spbtf2Test.java index f6588574..6d5ce8c1 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Spbtf2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Spbtf2Test.java @@ -35,5 +35,6 @@ public class Spbtf2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbtrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbtrfTest.java index 33b68bdd..922c7a1e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbtrfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbtrfTest.java @@ -35,5 +35,6 @@ public class SpbtrfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbtrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbtrsTest.java index e4c27278..39a6f3f0 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbtrsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpbtrsTest.java @@ -35,5 +35,6 @@ public class SpbtrsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpoconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpoconTest.java index 6901683c..67a3a933 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpoconTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpoconTest.java @@ -35,5 +35,6 @@ public class SpoconTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpoequTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpoequTest.java index 840df15b..940c2a56 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpoequTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpoequTest.java @@ -35,5 +35,6 @@ public class SpoequTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SporfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SporfsTest.java index 03a90129..4ba5474b 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SporfsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SporfsTest.java @@ -35,5 +35,6 @@ public class SporfsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SposvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SposvTest.java index b1b1b1a2..83a41f6d 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SposvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SposvTest.java @@ -35,5 +35,6 @@ public class SposvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SposvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SposvxTest.java index 7e196aa4..fa71fb0a 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SposvxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SposvxTest.java @@ -35,5 +35,6 @@ public class SposvxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Spotf2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Spotf2Test.java index 65d5f231..c329aa23 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Spotf2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Spotf2Test.java @@ -35,5 +35,6 @@ public class Spotf2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpotrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpotrfTest.java index c7e06f06..27bf3a3e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpotrfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpotrfTest.java @@ -35,5 +35,6 @@ public class SpotrfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpotriTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpotriTest.java index ced0158c..84967b78 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpotriTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpotriTest.java @@ -35,5 +35,6 @@ public class SpotriTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpotrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpotrsTest.java index 8b67ad72..bb9b4cb5 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpotrsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpotrsTest.java @@ -35,5 +35,6 @@ public class SpotrsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SppconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SppconTest.java index f18c2945..ea5c1a2b 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SppconTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SppconTest.java @@ -35,5 +35,6 @@ public class SppconTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SppequTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SppequTest.java index 81916322..57784d26 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SppequTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SppequTest.java @@ -35,5 +35,6 @@ public class SppequTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpprfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpprfsTest.java index a3a4e88f..b01eb9e0 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpprfsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpprfsTest.java @@ -35,5 +35,6 @@ public class SpprfsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SppsvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SppsvTest.java index f83553ae..302ebb8b 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SppsvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SppsvTest.java @@ -35,5 +35,6 @@ public class SppsvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SppsvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SppsvxTest.java index 3268338a..13e0a290 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SppsvxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SppsvxTest.java @@ -35,5 +35,6 @@ public class SppsvxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpptrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpptrfTest.java index de97cd80..42b891a3 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpptrfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpptrfTest.java @@ -35,5 +35,6 @@ public class SpptrfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpptriTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpptriTest.java index 2be27988..cb939bad 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpptriTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpptriTest.java @@ -35,5 +35,6 @@ public class SpptriTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpptrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpptrsTest.java index db4f1ecc..e9449b16 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpptrsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpptrsTest.java @@ -35,5 +35,6 @@ public class SpptrsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SptconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SptconTest.java index 5d37d9f5..0e7bfe8f 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SptconTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SptconTest.java @@ -35,5 +35,6 @@ public class SptconTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpteqrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpteqrTest.java index 0eba7a82..b2e08312 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpteqrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpteqrTest.java @@ -35,5 +35,6 @@ public class SpteqrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SptrfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SptrfsTest.java index adf5b58b..00997fe6 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SptrfsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SptrfsTest.java @@ -35,5 +35,6 @@ public class SptrfsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SptsvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SptsvTest.java index 21cf303f..449449ff 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SptsvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SptsvTest.java @@ -35,5 +35,6 @@ public class SptsvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SptsvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SptsvxTest.java index 11e9efef..d6937cfa 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SptsvxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SptsvxTest.java @@ -35,5 +35,6 @@ public class SptsvxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpttrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpttrfTest.java index 0523fd93..a3a53b11 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpttrfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpttrfTest.java @@ -35,5 +35,6 @@ public class SpttrfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpttrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpttrsTest.java index 849c1aad..23861380 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SpttrsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SpttrsTest.java @@ -35,5 +35,6 @@ public class SpttrsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sptts2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sptts2Test.java index 59b2a3d8..fef3031e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Sptts2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Sptts2Test.java @@ -35,5 +35,6 @@ public class Sptts2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SrsclTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SrsclTest.java index 24bac442..ac051893 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SrsclTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SrsclTest.java @@ -35,5 +35,6 @@ public class SrsclTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbevTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbevTest.java index 00b26c29..149313d9 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbevTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbevTest.java @@ -35,5 +35,6 @@ public class SsbevTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbevdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbevdTest.java index d08ff373..6717a7d7 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbevdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbevdTest.java @@ -35,5 +35,6 @@ public class SsbevdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbevxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbevxTest.java index a530f584..d859ffe0 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbevxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbevxTest.java @@ -35,5 +35,6 @@ public class SsbevxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgstTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgstTest.java index 8d45eeff..4d99611c 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgstTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgstTest.java @@ -35,5 +35,6 @@ public class SsbgstTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgvTest.java index 69d2dc7f..e6924262 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgvTest.java @@ -35,5 +35,6 @@ public class SsbgvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgvdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgvdTest.java index 42fc32ab..f034f85f 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgvdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgvdTest.java @@ -35,5 +35,6 @@ public class SsbgvdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgvxTest.java index 3394e66b..185a5c5f 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgvxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbgvxTest.java @@ -35,5 +35,6 @@ public class SsbgvxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbtrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbtrdTest.java index 5ac526d3..aeea64d2 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbtrdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsbtrdTest.java @@ -35,5 +35,6 @@ public class SsbtrdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SspconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspconTest.java index fc0807e0..5e7cf4ab 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SspconTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspconTest.java @@ -35,5 +35,6 @@ public class SspconTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SspevTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspevTest.java index 5f22beeb..4b9a6465 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SspevTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspevTest.java @@ -35,5 +35,6 @@ public class SspevTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SspevdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspevdTest.java index ea64b6b0..5ea168f5 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SspevdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspevdTest.java @@ -35,5 +35,6 @@ public class SspevdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SspevxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspevxTest.java index 941c626a..8750aa8b 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SspevxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspevxTest.java @@ -35,5 +35,6 @@ public class SspevxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SspgstTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspgstTest.java index b7ba6b90..3ff54ca0 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SspgstTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspgstTest.java @@ -35,5 +35,6 @@ public class SspgstTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SspgvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspgvTest.java index 458921e3..b2b50c72 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SspgvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspgvTest.java @@ -35,5 +35,6 @@ public class SspgvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SspgvdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspgvdTest.java index c4fd498b..9a720f93 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SspgvdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspgvdTest.java @@ -35,5 +35,6 @@ public class SspgvdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SspgvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspgvxTest.java index 6bbdee24..7d0aca57 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SspgvxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspgvxTest.java @@ -35,5 +35,6 @@ public class SspgvxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsprfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsprfsTest.java index 4953fe87..09ebbf44 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsprfsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsprfsTest.java @@ -35,5 +35,6 @@ public class SsprfsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SspsvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspsvTest.java index fe6452d7..bb15f5e8 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SspsvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspsvTest.java @@ -35,5 +35,6 @@ public class SspsvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SspsvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspsvxTest.java index d6fc8490..13773846 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SspsvxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SspsvxTest.java @@ -35,5 +35,6 @@ public class SspsvxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsptrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsptrdTest.java index 0ee0f743..f1274508 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsptrdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsptrdTest.java @@ -35,5 +35,6 @@ public class SsptrdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsptrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsptrfTest.java index 9a015fb5..2862dc04 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsptrfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsptrfTest.java @@ -35,5 +35,6 @@ public class SsptrfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsptriTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsptriTest.java index 82f64a2a..9ee208cb 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsptriTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsptriTest.java @@ -35,5 +35,6 @@ public class SsptriTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsptrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsptrsTest.java index 89880780..b7526c2e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsptrsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsptrsTest.java @@ -35,5 +35,6 @@ public class SsptrsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SstebzTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstebzTest.java index ed9f0810..9891e1f9 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SstebzTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstebzTest.java @@ -35,5 +35,6 @@ public class SstebzTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SstedcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstedcTest.java index f4977edc..e5eaf11e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SstedcTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstedcTest.java @@ -35,5 +35,6 @@ public class SstedcTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SstegrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstegrTest.java index 425513ec..ae7e10cb 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SstegrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstegrTest.java @@ -35,5 +35,6 @@ public class SstegrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsteinTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsteinTest.java index afd353ac..8090cbf4 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsteinTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsteinTest.java @@ -35,5 +35,6 @@ public class SsteinTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SstemrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstemrTest.java index 4b07d992..12144b7a 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SstemrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstemrTest.java @@ -35,5 +35,6 @@ public class SstemrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsteqrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsteqrTest.java index eb042ad5..b03be506 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsteqrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsteqrTest.java @@ -35,5 +35,6 @@ public class SsteqrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsterfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsterfTest.java index c4b96603..b17c8c78 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsterfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsterfTest.java @@ -35,5 +35,6 @@ public class SsterfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SstevTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstevTest.java index fe1586d8..8489b325 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SstevTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstevTest.java @@ -35,5 +35,6 @@ public class SstevTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SstevdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstevdTest.java index e84903a7..e9ce19cf 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SstevdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstevdTest.java @@ -35,5 +35,6 @@ public class SstevdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SstevrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstevrTest.java index bffe91ac..e9717398 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SstevrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstevrTest.java @@ -35,5 +35,6 @@ public class SstevrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SstevxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstevxTest.java index 26270742..8505cf50 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SstevxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SstevxTest.java @@ -35,5 +35,6 @@ public class SstevxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyconTest.java index 5abee40b..d7d2d959 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyconTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyconTest.java @@ -35,5 +35,6 @@ public class SsyconTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevTest.java index cee83f82..8fd29afd 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevTest.java @@ -35,5 +35,6 @@ public class SsyevTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevdTest.java index e3feff49..6e1219a8 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevdTest.java @@ -35,5 +35,6 @@ public class SsyevdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevrTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevrTest.java index 4cd78790..371a2643 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevrTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevrTest.java @@ -35,5 +35,6 @@ public class SsyevrTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevxTest.java index 3d4ad319..3ef34576 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyevxTest.java @@ -35,5 +35,6 @@ public class SsyevxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Ssygs2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Ssygs2Test.java index 6c719606..9df59ce4 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Ssygs2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Ssygs2Test.java @@ -35,5 +35,6 @@ public class Ssygs2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsygstTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsygstTest.java index d059079f..af089806 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsygstTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsygstTest.java @@ -35,5 +35,6 @@ public class SsygstTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsygvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsygvTest.java index 22ae85d2..1029e04d 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsygvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsygvTest.java @@ -35,5 +35,6 @@ public class SsygvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsygvdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsygvdTest.java index 9e2a9e49..0e6029c0 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsygvdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsygvdTest.java @@ -35,5 +35,6 @@ public class SsygvdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsygvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsygvxTest.java index 7f6b74f3..2396e55e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsygvxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsygvxTest.java @@ -35,5 +35,6 @@ public class SsygvxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyrfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyrfsTest.java index f39cbaf3..05bd234e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyrfsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsyrfsTest.java @@ -35,5 +35,6 @@ public class SsyrfsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsysvTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsysvTest.java index 3d7ca076..681f17f1 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsysvTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsysvTest.java @@ -35,5 +35,6 @@ public class SsysvTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsysvxTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsysvxTest.java index 583ff9e6..ddee597c 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsysvxTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsysvxTest.java @@ -35,5 +35,6 @@ public class SsysvxTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Ssytd2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Ssytd2Test.java index bb956131..c85de5f1 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Ssytd2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Ssytd2Test.java @@ -35,5 +35,6 @@ public class Ssytd2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Ssytf2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Ssytf2Test.java index 7561c56a..f9232c2d 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Ssytf2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Ssytf2Test.java @@ -35,5 +35,6 @@ public class Ssytf2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsytrdTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsytrdTest.java index a6e9f6e2..a1560a42 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsytrdTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsytrdTest.java @@ -35,5 +35,6 @@ public class SsytrdTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsytrfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsytrfTest.java index e624a936..1f8517f9 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsytrfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsytrfTest.java @@ -35,5 +35,6 @@ public class SsytrfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsytriTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsytriTest.java index 3f3b70e9..6f1ecdfc 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsytriTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsytriTest.java @@ -35,5 +35,6 @@ public class SsytriTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsytrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsytrsTest.java index d0d658a5..d0ab4da4 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/SsytrsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/SsytrsTest.java @@ -35,5 +35,6 @@ public class SsytrsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StbconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StbconTest.java index 1f5fe5e8..d8fb53d6 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/StbconTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StbconTest.java @@ -35,5 +35,6 @@ public class StbconTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StbrfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StbrfsTest.java index b038ad4c..5ae8567b 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/StbrfsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StbrfsTest.java @@ -35,5 +35,6 @@ public class StbrfsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StbtrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StbtrsTest.java index 11c31540..d404045d 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/StbtrsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StbtrsTest.java @@ -35,5 +35,6 @@ public class StbtrsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StgevcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StgevcTest.java index 0c893fb8..e8c9137d 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/StgevcTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StgevcTest.java @@ -35,5 +35,6 @@ public class StgevcTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Stgex2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Stgex2Test.java index ac9e3127..d89480a6 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Stgex2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Stgex2Test.java @@ -35,5 +35,6 @@ public class Stgex2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StgexcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StgexcTest.java index 5a77757a..ccd67043 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/StgexcTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StgexcTest.java @@ -35,5 +35,6 @@ public class StgexcTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StgsenTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StgsenTest.java index b3150007..eca50aca 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/StgsenTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StgsenTest.java @@ -35,5 +35,6 @@ public class StgsenTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StgsjaTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StgsjaTest.java index 3ae29525..479e4af9 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/StgsjaTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StgsjaTest.java @@ -35,5 +35,6 @@ public class StgsjaTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StgsnaTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StgsnaTest.java index fe9ddce8..3d1b88d4 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/StgsnaTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StgsnaTest.java @@ -35,5 +35,6 @@ public class StgsnaTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Stgsy2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Stgsy2Test.java index 11de230a..e3ac71e5 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Stgsy2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Stgsy2Test.java @@ -35,5 +35,6 @@ public class Stgsy2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StgsylTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StgsylTest.java index 08ad3048..816cf843 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/StgsylTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StgsylTest.java @@ -35,5 +35,6 @@ public class StgsylTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StpconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StpconTest.java index 05e9a33d..f31da7c7 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/StpconTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StpconTest.java @@ -35,5 +35,6 @@ public class StpconTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StprfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StprfsTest.java index b11ef203..fc306143 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/StprfsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StprfsTest.java @@ -35,5 +35,6 @@ public class StprfsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StptriTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StptriTest.java index e87f7190..20ed7b76 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/StptriTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StptriTest.java @@ -35,5 +35,6 @@ public class StptriTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StptrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StptrsTest.java index 740db062..8c9e8469 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/StptrsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StptrsTest.java @@ -35,5 +35,6 @@ public class StptrsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StrconTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrconTest.java index 181f2493..07cdbf1d 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/StrconTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrconTest.java @@ -35,5 +35,6 @@ public class StrconTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StrevcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrevcTest.java index aa850788..8424280d 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/StrevcTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrevcTest.java @@ -35,5 +35,6 @@ public class StrevcTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StrexcTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrexcTest.java index 1e098b95..49fc2585 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/StrexcTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrexcTest.java @@ -35,5 +35,6 @@ public class StrexcTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StrrfsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrrfsTest.java index e071c3fa..28fd9d43 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/StrrfsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrrfsTest.java @@ -35,5 +35,6 @@ public class StrrfsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StrsenTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrsenTest.java index 11e6e086..36152fc2 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/StrsenTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrsenTest.java @@ -35,5 +35,6 @@ public class StrsenTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StrsnaTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrsnaTest.java index 4103c344..6902c891 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/StrsnaTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrsnaTest.java @@ -35,5 +35,6 @@ public class StrsnaTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StrsylTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrsylTest.java index 2b86ca2d..1d126dbc 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/StrsylTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrsylTest.java @@ -35,5 +35,6 @@ public class StrsylTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/Strti2Test.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/Strti2Test.java index c3de8018..be07751e 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/Strti2Test.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/Strti2Test.java @@ -35,5 +35,6 @@ public class Strti2Test extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StrtriTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrtriTest.java index 00fdbf8e..30aaa78f 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/StrtriTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrtriTest.java @@ -35,5 +35,6 @@ public class StrtriTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StrtrsTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrtrsTest.java index 9e0c1f30..3fb17068 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/StrtrsTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StrtrsTest.java @@ -35,5 +35,6 @@ public class StrtrsTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StzrqfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StzrqfTest.java index 56bba3d8..4c903ad7 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/StzrqfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StzrqfTest.java @@ -35,5 +35,6 @@ public class StzrqfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/StzrzfTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/StzrzfTest.java index d297eb8e..b9931579 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/StzrzfTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/StzrzfTest.java @@ -35,5 +35,6 @@ public class StzrzfTest extends LAPACKTest { @ParameterizedTest @MethodSource("LAPACKImplementations") void testSanity(LAPACK lapack) { + org.junit.jupiter.api.Assumptions.assumeTrue(false); } } From 74b43c76132c6d0c784bf86db2d0791a63dc76ff Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Mon, 3 May 2021 11:28:56 +0200 Subject: [PATCH 39/42] Wrap calls to Objects.requireNonNull for consistency with checkIndex --- .../dev/ludovic/netlib/blas/AbstractBLAS.java | 232 +++++++++--------- 1 file changed, 118 insertions(+), 114 deletions(-) diff --git a/blas/src/main/java/dev/ludovic/netlib/blas/AbstractBLAS.java b/blas/src/main/java/dev/ludovic/netlib/blas/AbstractBLAS.java index d7643b72..ca59e917 100644 --- a/blas/src/main/java/dev/ludovic/netlib/blas/AbstractBLAS.java +++ b/blas/src/main/java/dev/ludovic/netlib/blas/AbstractBLAS.java @@ -52,6 +52,10 @@ private void checkIndex(int index, int length) { } } + private void requireNonNull(T obj) { + Objects.requireNonNull(obj); + } + public double dasum(int n, double[] x, int incx) { return dasum(n, x, 0, incx); } @@ -60,7 +64,7 @@ public double dasum(int n, double[] x, int offsetx, int incx) { if (n <= 0) { return 0.0; } - Objects.requireNonNull(x); + requireNonNull(x); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); return dasumK(n, x, offsetx, incx); } @@ -75,7 +79,7 @@ public float sasum(int n, float[] x, int offsetx, int incx) { if (n <= 0) { return 0.0f; } - Objects.requireNonNull(x); + requireNonNull(x); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); return sasumK(n, x, offsetx, incx); } @@ -94,8 +98,8 @@ public void daxpy(int n, double alpha, double[] x, int offsetx, int incx, double if (alpha == 0.0) { return; } - Objects.requireNonNull(x); - Objects.requireNonNull(y); + requireNonNull(x); + requireNonNull(y); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); daxpyK(n, alpha, x, offsetx, incx, y, offsety, incy); @@ -115,8 +119,8 @@ public void saxpy(int n, float alpha, float[] x, int offsetx, int incx, float[] if (alpha == 0.0f) { return; } - Objects.requireNonNull(x); - Objects.requireNonNull(y); + requireNonNull(x); + requireNonNull(y); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); saxpyK(n, alpha, x, offsetx, incx, y, offsety, incy); @@ -132,8 +136,8 @@ public void dcopy(int n, double[] x, int offsetx, int incx, double[] y, int offs if (n <= 0) { return; } - Objects.requireNonNull(x); - Objects.requireNonNull(y); + requireNonNull(x); + requireNonNull(y); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); dcopyK(n, x, offsetx, incx, y, offsety, incy); @@ -149,8 +153,8 @@ public void scopy(int n, float[] x, int offsetx, int incx, float[] y, int offset if (n <= 0) { return; } - Objects.requireNonNull(x); - Objects.requireNonNull(y); + requireNonNull(x); + requireNonNull(y); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); scopyK(n, x, offsetx, incx, y, offsety, incy); @@ -167,8 +171,8 @@ public double ddot(int n, double[] x, int offsetx, int incx, double[] y, int off if (n <= 0) { return 0.0; } - Objects.requireNonNull(x); - Objects.requireNonNull(y); + requireNonNull(x); + requireNonNull(y); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); return ddotK(n, x, offsetx, incx, y, offsety, incy); @@ -185,8 +189,8 @@ public float sdot(int n, float[] x, int offsetx, int incx, float[] y, int offset if (n <= 0) { return 0.0f; } - Objects.requireNonNull(x); - Objects.requireNonNull(y); + requireNonNull(x); + requireNonNull(y); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); return sdotK(n, x, offsetx, incx, y, offsety, incy); @@ -202,8 +206,8 @@ public float sdsdot(int n, float sb, float[] x, int offsetx, int incx, float[] y if (n <= 0) { return 0.0f; } - Objects.requireNonNull(x); - Objects.requireNonNull(y); + requireNonNull(x); + requireNonNull(y); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); return sdsdotK(n, sb, x, offsetx, incx, y, offsety, incy); @@ -216,9 +220,9 @@ public void dgbmv(String trans, int m, int n, int kl, int ku, double alpha, doub } public void dgbmv(String trans, int m, int n, int kl, int ku, double alpha, double[] a, int offseta, int lda, double[] x, int offsetx, int incx, double beta, double[] y, int offsety, int incy) { - Objects.requireNonNull(a); - Objects.requireNonNull(x); - Objects.requireNonNull(y); + requireNonNull(a); + requireNonNull(x); + requireNonNull(y); checkIndex(offseta + n * lda - 1, a.length); checkIndex(offsetx + ((lsame("N", trans) ? n : m) - 1) * Math.abs(incx), x.length); checkIndex(offsety + ((lsame("N", trans) ? m : n) - 1) * Math.abs(incy), y.length); @@ -232,9 +236,9 @@ public void sgbmv(String trans, int m, int n, int kl, int ku, float alpha, float } public void sgbmv(String trans, int m, int n, int kl, int ku, float alpha, float[] a, int offseta, int lda, float[] x, int offsetx, int incx, float beta, float[] y, int offsety, int incy) { - Objects.requireNonNull(a); - Objects.requireNonNull(x); - Objects.requireNonNull(y); + requireNonNull(a); + requireNonNull(x); + requireNonNull(y); checkIndex(offseta + n * lda - 1, a.length); checkIndex(offsetx + ((lsame("N", trans) ? n : m) - 1) * Math.abs(incx), x.length); checkIndex(offsety + ((lsame("N", trans) ? m : n) - 1) * Math.abs(incy), y.length); @@ -260,9 +264,9 @@ public void dgemm(String transa, String transb, int m, int n, int k, double alph if (m == 0 || n == 0 || ((alpha == 0.0 || k == 0) && beta == 1.0)) { return; } - Objects.requireNonNull(a); - Objects.requireNonNull(b); - Objects.requireNonNull(c); + requireNonNull(a); + requireNonNull(b); + requireNonNull(c); checkIndex(offseta + (lsame("N", transa) ? k : m) * lda - 1, a.length); checkIndex(offsetb + (lsame("N", transb) ? n : k) * ldb - 1, b.length); checkIndex(offsetc + m * n - 1, c.length); @@ -288,9 +292,9 @@ public void sgemm(String transa, String transb, int m, int n, int k, float alpha if (m == 0 || n == 0 || ((alpha == 0.0f || k == 0) && beta == 1.0f)) { return; } - Objects.requireNonNull(a); - Objects.requireNonNull(b); - Objects.requireNonNull(c); + requireNonNull(a); + requireNonNull(b); + requireNonNull(c); checkIndex(offseta + (lsame("N", transa) ? k : m) * lda - 1, a.length); checkIndex(offsetb + (lsame("N", transb) ? n : k) * ldb - 1, b.length); checkIndex(offsetc + m * n - 1, c.length); @@ -314,9 +318,9 @@ public void dgemv(String trans, int m, int n, double alpha, double[] a, int offs if (m == 0 || n == 0) { return; } - Objects.requireNonNull(a); - Objects.requireNonNull(x); - Objects.requireNonNull(y); + requireNonNull(a); + requireNonNull(x); + requireNonNull(y); checkIndex(offseta + n * lda - 1, a.length); checkIndex(offsetx + ((lsame("N", trans) ? n : m) - 1) * Math.abs(incx), x.length); checkIndex(offsety + ((lsame("N", trans) ? m : n) - 1) * Math.abs(incy), y.length); @@ -340,9 +344,9 @@ public void sgemv(String trans, int m, int n, float alpha, float[] a, int offset if (m == 0 || n == 0) { return; } - Objects.requireNonNull(a); - Objects.requireNonNull(x); - Objects.requireNonNull(y); + requireNonNull(a); + requireNonNull(x); + requireNonNull(y); checkIndex(offseta + n * lda - 1, a.length); checkIndex(offsetx + ((lsame("N", trans) ? n : m) - 1) * Math.abs(incx), x.length); checkIndex(offsety + ((lsame("N", trans) ? m : n) - 1) * Math.abs(incy), y.length); @@ -365,9 +369,9 @@ public void dger(int m, int n, double alpha, double[] x, int offsetx, int incx, if (m == 0 || n == 0) { return; } - Objects.requireNonNull(x); - Objects.requireNonNull(y); - Objects.requireNonNull(a); + requireNonNull(x); + requireNonNull(y); + requireNonNull(a); checkIndex(offsetx + (m - 1) * Math.abs(incx), x.length); checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); checkIndex(offseta + n * lda - 1, a.length); @@ -391,9 +395,9 @@ public void sger(int m, int n, float alpha, float[] x, int offsetx, int incx, fl if (m == 0 || n == 0) { return; } - Objects.requireNonNull(x); - Objects.requireNonNull(y); - Objects.requireNonNull(a); + requireNonNull(x); + requireNonNull(y); + requireNonNull(a); checkIndex(offsetx + (m - 1) * Math.abs(incx), x.length); checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); checkIndex(offseta + n * lda - 1, a.length); @@ -418,7 +422,7 @@ public double dnrm2(int n, double[] x, int offsetx, int incx) { if (n == 1) { return Math.abs(x[offsetx + 0]); } - Objects.requireNonNull(x); + requireNonNull(x); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); return dnrm2K(n, x, offsetx, incx); } @@ -439,7 +443,7 @@ public float snrm2(int n, float[] x, int offsetx, int incx) { if (n == 1) { return Math.abs(x[offsetx + 0]); } - Objects.requireNonNull(x); + requireNonNull(x); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); return snrm2K(n, x, offsetx, incx); } @@ -454,8 +458,8 @@ public void drot(int n, double[] x, int offsetx, int incx, double[] y, int offse if (n <= 0) { return; } - Objects.requireNonNull(x); - Objects.requireNonNull(y); + requireNonNull(x); + requireNonNull(y); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); drotK(n, x, offsetx, incx, y, offsety, incy, c, s); @@ -471,8 +475,8 @@ public void srot(int n, float[] x, int offsetx, int incx, float[] y, int offsety if (n <= 0) { return; } - Objects.requireNonNull(x); - Objects.requireNonNull(y); + requireNonNull(x); + requireNonNull(y); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); srotK(n, x, offsetx, incx, y, offsety, incy, c, s); @@ -531,9 +535,9 @@ public void drotm(int n, double[] x, int incx, double[] y, int incy, double[] pa } public void drotm(int n, double[] x, int offsetx, int incx, double[] y, int offsety, int incy, double[] param, int offsetparam) { - Objects.requireNonNull(x); - Objects.requireNonNull(y); - Objects.requireNonNull(param); + requireNonNull(x); + requireNonNull(y); + requireNonNull(param); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); checkIndex(offsetparam + 4, param.length); /* param.length == 5 */ @@ -547,9 +551,9 @@ public void srotm(int n, float[] x, int incx, float[] y, int incy, float[] param } public void srotm(int n, float[] x, int offsetx, int incx, float[] y, int offsety, int incy, float[] param, int offsetparam) { - Objects.requireNonNull(x); - Objects.requireNonNull(y); - Objects.requireNonNull(param); + requireNonNull(x); + requireNonNull(y); + requireNonNull(param); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); checkIndex(offsetparam + 4, param.length); /* param.length == 5 */ @@ -563,10 +567,10 @@ public void drotmg(org.netlib.util.doubleW dd1, org.netlib.util.doubleW dd2, org } public void drotmg(org.netlib.util.doubleW dd1, org.netlib.util.doubleW dd2, org.netlib.util.doubleW dx1, double dy1, double[] param, int offsetparam) { - Objects.requireNonNull(dd1); - Objects.requireNonNull(dd2); - Objects.requireNonNull(dx1); - Objects.requireNonNull(param); + requireNonNull(dd1); + requireNonNull(dd2); + requireNonNull(dx1); + requireNonNull(param); checkIndex(offsetparam + 4, param.length); drotmgK(dd1, dd2, dx1, dy1, param, offsetparam); } @@ -578,10 +582,10 @@ public void srotmg(org.netlib.util.floatW sd1, org.netlib.util.floatW sd2, org.n } public void srotmg(org.netlib.util.floatW sd1, org.netlib.util.floatW sd2, org.netlib.util.floatW sx1, float sy1, float[] param, int offsetparam) { - Objects.requireNonNull(sd1); - Objects.requireNonNull(sd2); - Objects.requireNonNull(sx1); - Objects.requireNonNull(param); + requireNonNull(sd1); + requireNonNull(sd2); + requireNonNull(sx1); + requireNonNull(param); checkIndex(offsetparam + 4, param.length); srotmgK(sd1, sd2, sx1, sy1, param, offsetparam); } @@ -593,9 +597,9 @@ public void dsbmv(String uplo, int n, int k, double alpha, double[] a, int lda, } public void dsbmv(String uplo, int n, int k, double alpha, double[] a, int offseta, int lda, double[] x, int offsetx, int incx, double beta, double[] y, int offsety, int incy) { - Objects.requireNonNull(a); - Objects.requireNonNull(x); - Objects.requireNonNull(y); + requireNonNull(a); + requireNonNull(x); + requireNonNull(y); checkIndex(offseta + n * lda - 1, a.length); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); @@ -609,9 +613,9 @@ public void ssbmv(String uplo, int n, int k, float alpha, float[] a, int lda, fl } public void ssbmv(String uplo, int n, int k, float alpha, float[] a, int offseta, int lda, float[] x, int offsetx, int incx, float beta, float[] y, int offsety, int incy) { - Objects.requireNonNull(a); - Objects.requireNonNull(x); - Objects.requireNonNull(y); + requireNonNull(a); + requireNonNull(x); + requireNonNull(y); checkIndex(offseta + n * lda - 1, a.length); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); @@ -635,7 +639,7 @@ public void dscal(int n, double alpha, double[] x, int offsetx, int incx) { if (alpha == 1.0) { return; } - Objects.requireNonNull(x); + requireNonNull(x); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); dscalK(n, alpha, x, offsetx, incx); } @@ -657,7 +661,7 @@ public void sscal(int n, float alpha, float[] x, int offsetx, int incx) { if (alpha == 1.0f) { return; } - Objects.requireNonNull(x); + requireNonNull(x); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); sscalK(n, alpha, x, offsetx, incx); } @@ -677,9 +681,9 @@ public void dspmv(String uplo, int n, double alpha, double[] a, int offseta, dou if (n == 0) { return; } - Objects.requireNonNull(a); - Objects.requireNonNull(x); - Objects.requireNonNull(y); + requireNonNull(a); + requireNonNull(x); + requireNonNull(y); checkIndex(offseta + (n * (n + 1) / 2) - 1, a.length); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); @@ -700,9 +704,9 @@ public void sspmv(String uplo, int n, float alpha, float[] a, int offseta, float if (n == 0) { return; } - Objects.requireNonNull(a); - Objects.requireNonNull(x); - Objects.requireNonNull(y); + requireNonNull(a); + requireNonNull(x); + requireNonNull(y); checkIndex(offseta + (n * (n + 1) / 2) - 1, a.length); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); @@ -723,8 +727,8 @@ public void dspr(String uplo, int n, double alpha, double[] x, int offsetx, int if (n == 0) { return; } - Objects.requireNonNull(x); - Objects.requireNonNull(a); + requireNonNull(x); + requireNonNull(a); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); checkIndex(offseta + (n * (n + 1) / 2) - 1, a.length); dsprK(uplo, n, alpha, x, offsetx, incx, a, offseta); @@ -744,8 +748,8 @@ public void sspr(String uplo, int n, float alpha, float[] x, int offsetx, int in if (n == 0) { return; } - Objects.requireNonNull(x); - Objects.requireNonNull(a); + requireNonNull(x); + requireNonNull(a); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); checkIndex(offseta + (n * (n + 1) / 2) - 1, a.length); ssprK(uplo, n, alpha, x, offsetx, incx, a, offseta); @@ -766,9 +770,9 @@ public void dspr2(String uplo, int n, double alpha, double[] x, int offsetx, int if (n == 0) { return; } - Objects.requireNonNull(x); - Objects.requireNonNull(y); - Objects.requireNonNull(a); + requireNonNull(x); + requireNonNull(y); + requireNonNull(a); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); checkIndex(offseta + (n * (n + 1) / 2) - 1, a.length); @@ -790,9 +794,9 @@ public void sspr2(String uplo, int n, float alpha, float[] x, int offsetx, int i if (n == 0) { return; } - Objects.requireNonNull(x); - Objects.requireNonNull(y); - Objects.requireNonNull(a); + requireNonNull(x); + requireNonNull(y); + requireNonNull(a); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); checkIndex(offseta + (n * (n + 1) / 2) - 1, a.length); @@ -809,8 +813,8 @@ public void dswap(int n, double[] x, int offsetx, int incx, double[] y, int offs if (n <= 0) { return; } - Objects.requireNonNull(x); - Objects.requireNonNull(y); + requireNonNull(x); + requireNonNull(y); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); dswapK(n, x, offsetx, incx, y, offsety, incy); @@ -826,8 +830,8 @@ public void sswap(int n, float[] x, int offsetx, int incx, float[] y, int offset if (n <= 0) { return; } - Objects.requireNonNull(x); - Objects.requireNonNull(y); + requireNonNull(x); + requireNonNull(y); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); sswapK(n, x, offsetx, incx, y, offsety, incy); @@ -850,12 +854,12 @@ public void dsymm(String side, String uplo, int m, int n, double alpha, double[] if (m == 0 || n == 0 || (alpha == 0.0 && beta == 1.0)) { return; } - Objects.requireNonNull(a); - Objects.requireNonNull(b); - Objects.requireNonNull(c); + requireNonNull(a); + requireNonNull(b); + requireNonNull(c); checkIndex(offseta + (lsame("L", side) ? m : n) * lda - 1, a.length); checkIndex(offsetb + n * ldb - 1, a.length); - checkIndex(offsetc + n * ldc, b.length); + checkIndex(offsetc + n * ldc - 1, b.length); dsymmK(side, uplo, m, n, alpha, a, offseta, lda, b, offsetb, ldb, beta, c, offsetc, ldc); } @@ -876,12 +880,12 @@ public void ssymm(String side, String uplo, int m, int n, float alpha, float[] a if (m == 0 || n == 0 || (alpha == 0.0f && beta == 1.0f)) { return; } - Objects.requireNonNull(a); - Objects.requireNonNull(b); - Objects.requireNonNull(c); + requireNonNull(a); + requireNonNull(b); + requireNonNull(c); checkIndex(offseta + (lsame("L", side) ? m : n) * lda - 1, a.length); checkIndex(offsetb + n * ldb - 1, a.length); - checkIndex(offsetc + n * ldc, b.length); + checkIndex(offsetc + n * ldc - 1, b.length); ssymmK(side, uplo, m, n, alpha, a, offseta, lda, b, offsetb, ldb, beta, c, offsetc, ldc); } @@ -900,9 +904,9 @@ public void dsymv(String uplo, int n, double alpha, double[] a, int offseta, int if (n == 0) { return; } - Objects.requireNonNull(a); - Objects.requireNonNull(x); - Objects.requireNonNull(y); + requireNonNull(a); + requireNonNull(x); + requireNonNull(y); checkIndex(offseta + n * lda - 1, a.length); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); @@ -924,9 +928,9 @@ public void ssymv(String uplo, int n, float alpha, float[] a, int offseta, int l if (n == 0) { return; } - Objects.requireNonNull(a); - Objects.requireNonNull(x); - Objects.requireNonNull(y); + requireNonNull(a); + requireNonNull(x); + requireNonNull(y); checkIndex(offseta + n * lda - 1, a.length); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); @@ -948,8 +952,8 @@ public void dsyr(String uplo, int n, double alpha, double[] x, int offsetx, int if (n == 0) { return; } - Objects.requireNonNull(x); - Objects.requireNonNull(a); + requireNonNull(x); + requireNonNull(a); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); checkIndex(offseta + n * lda - 1, a.length); dsyrK(uplo, n, alpha, x, offsetx, incx, a, offseta, lda); @@ -969,8 +973,8 @@ public void ssyr(String uplo, int n, float alpha, float[] x, int offsetx, int in if (n == 0) { return; } - Objects.requireNonNull(x); - Objects.requireNonNull(a); + requireNonNull(x); + requireNonNull(a); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); checkIndex(offseta + n * lda - 1, a.length); ssyrK(uplo, n, alpha, x, offsetx, incx, a, offseta, lda); @@ -991,9 +995,9 @@ public void dsyr2(String uplo, int n, double alpha, double[] x, int offsetx, int if (n == 0) { return; } - Objects.requireNonNull(x); - Objects.requireNonNull(y); - Objects.requireNonNull(a); + requireNonNull(x); + requireNonNull(y); + requireNonNull(a); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); checkIndex(offseta + n * lda - 1, a.length); @@ -1015,9 +1019,9 @@ public void ssyr2(String uplo, int n, float alpha, float[] x, int offsetx, int i if (n == 0) { return; } - Objects.requireNonNull(x); - Objects.requireNonNull(y); - Objects.requireNonNull(a); + requireNonNull(x); + requireNonNull(y); + requireNonNull(a); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); checkIndex(offsety + (n - 1) * Math.abs(incy), y.length); checkIndex(offseta + n * lda - 1, a.length); @@ -1260,7 +1264,7 @@ public int idamax(int n, double[] x, int offsetx, int incx) { if (n == 1) { return 0; } - Objects.requireNonNull(x); + requireNonNull(x); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); // Fortran arrays use 1-based index return idamaxK(n, x, offsetx, incx) - 1; @@ -1282,7 +1286,7 @@ public int isamax(int n, float[] x, int offsetx, int incx) { if (n == 1) { return 0; } - Objects.requireNonNull(x); + requireNonNull(x); checkIndex(offsetx + (n - 1) * Math.abs(incx), x.length); // Fortran arrays use 1-based index return isamaxK(n, x, offsetx, incx) - 1; From c11fe1a1e0814a8b86b44029b6d9795fa89674f6 Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Mon, 3 May 2021 11:51:40 +0200 Subject: [PATCH 40/42] Add {BLAS,LAPACK,ARPACK}.getInstance helpers --- arpack/src/main/java/dev/ludovic/netlib/ARPACK.java | 12 ++++++++++++ blas/src/main/java/dev/ludovic/netlib/BLAS.java | 12 ++++++++++++ lapack/src/main/java/dev/ludovic/netlib/LAPACK.java | 12 ++++++++++++ 3 files changed, 36 insertions(+) diff --git a/arpack/src/main/java/dev/ludovic/netlib/ARPACK.java b/arpack/src/main/java/dev/ludovic/netlib/ARPACK.java index 8dc5bf28..d3670237 100644 --- a/arpack/src/main/java/dev/ludovic/netlib/ARPACK.java +++ b/arpack/src/main/java/dev/ludovic/netlib/ARPACK.java @@ -25,8 +25,20 @@ package dev.ludovic.netlib; +import java.util.logging.Level; +import java.util.logging.Logger; + public interface ARPACK { + public static ARPACK getInstance() { + try { + return dev.ludovic.netlib.NativeARPACK.getInstance(); + } catch (Throwable t) { + Logger.getLogger(ARPACK.class.getName()).warning("Failed to load implementation from:dev.ludovic.netlib.NativeARPACK"); + } + return dev.ludovic.netlib.JavaARPACK.getInstance(); + } + public void dmout(int lout, int m, int n, double[] a, int lda, int idigit, String ifmt); public void dmout(int lout, int m, int n, double[] a, int offseta, int lda, int idigit, String ifmt); public void smout(int lout, int m, int n, float[] a, int lda, int idigit, String ifmt); diff --git a/blas/src/main/java/dev/ludovic/netlib/BLAS.java b/blas/src/main/java/dev/ludovic/netlib/BLAS.java index 177b75bb..1eaed457 100644 --- a/blas/src/main/java/dev/ludovic/netlib/BLAS.java +++ b/blas/src/main/java/dev/ludovic/netlib/BLAS.java @@ -25,8 +25,20 @@ package dev.ludovic.netlib; +import java.util.logging.Level; +import java.util.logging.Logger; + public interface BLAS { + public static BLAS getInstance() { + try { + return dev.ludovic.netlib.NativeBLAS.getInstance(); + } catch (Throwable t) { + Logger.getLogger(BLAS.class.getName()).warning("Failed to load implementation from:dev.ludovic.netlib.NativeBLAS"); + } + return dev.ludovic.netlib.JavaBLAS.getInstance(); + } + public double dasum(int n, double[] x, int incx); public double dasum(int n, double[] x, int offsetx, int incx); diff --git a/lapack/src/main/java/dev/ludovic/netlib/LAPACK.java b/lapack/src/main/java/dev/ludovic/netlib/LAPACK.java index 50e8220f..a5719cee 100644 --- a/lapack/src/main/java/dev/ludovic/netlib/LAPACK.java +++ b/lapack/src/main/java/dev/ludovic/netlib/LAPACK.java @@ -25,8 +25,20 @@ package dev.ludovic.netlib; +import java.util.logging.Level; +import java.util.logging.Logger; + public interface LAPACK { + public static LAPACK getInstance() { + try { + return dev.ludovic.netlib.NativeLAPACK.getInstance(); + } catch (Throwable t) { + Logger.getLogger(LAPACK.class.getName()).warning("Failed to load implementation from:dev.ludovic.netlib.NativeLAPACK"); + } + return dev.ludovic.netlib.JavaLAPACK.getInstance(); + } + public void dbdsdc(String uplo, String compq, int n, double[] d, double[] e, double[] u, int ldu, double[] vt, int ldvt, double[] q, int[] iq, double[] work, int[] iwork, org.netlib.util.intW info); public void dbdsdc(String uplo, String compq, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, double[] q, int _q_offset, int[] iq, int _iq_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); public void dbdsqr(String uplo, int n, int ncvt, int nru, int ncc, double[] d, double[] e, double[] vt, int ldvt, double[] u, int ldu, double[] c, int Ldc, double[] work, org.netlib.util.intW info); From f37fa20448fed32954642938682437825c7c4ccf Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Mon, 3 May 2021 13:05:44 +0200 Subject: [PATCH 41/42] Rename _*_offset parameters to offset* --- .../main/java/dev/ludovic/netlib/BLAS.java | 14 +- .../main/java/dev/ludovic/netlib/LAPACK.java | 1354 +++--- .../ludovic/netlib/lapack/AbstractLAPACK.java | 4062 ++++++++--------- .../dev/ludovic/netlib/lapack/F2jLAPACK.java | 2708 +++++------ .../dev/ludovic/netlib/lapack/JNILAPACK.java | 1354 +++--- 5 files changed, 4746 insertions(+), 4746 deletions(-) diff --git a/blas/src/main/java/dev/ludovic/netlib/BLAS.java b/blas/src/main/java/dev/ludovic/netlib/BLAS.java index 1eaed457..03930127 100644 --- a/blas/src/main/java/dev/ludovic/netlib/BLAS.java +++ b/blas/src/main/java/dev/ludovic/netlib/BLAS.java @@ -64,7 +64,7 @@ public static BLAS getInstance() { public float sdot(int n, float[] x, int offsetx, int incx, float[] y, int offsety, int incy); public float sdsdot(int n, float sb, float[] sx, int incx, float[] sy, int incy); - public float sdsdot(int n, float sb, float[] sx, int _sx_offset, int incx, float[] sy, int _sy_offset, int incy); + public float sdsdot(int n, float sb, float[] sx, int offsetsx, int incx, float[] sy, int offsetsy, int incy); public void dgbmv(String trans, int m, int n, int kl, int ku, double alpha, double[] a, int lda, double[] x, int incx, double beta, double[] y, int incy); public void dgbmv(String trans, int m, int n, int kl, int ku, double alpha, double[] a, int offseta, int lda, double[] x, int offsetx, int incx, double beta, double[] y, int offsety, int incy); @@ -100,23 +100,23 @@ public static BLAS getInstance() { public void drot(int n, double[] dx, int offsetdx, int incx, double[] dy, int offsetdy, int incy, double c, double s); public void srot(int n, float[] sx, int incx, float[] sy, int incy, float c, float s); - public void srot(int n, float[] sx, int _sx_offset, int incx, float[] sy, int _sy_offset, int incy, float c, float s); + public void srot(int n, float[] sx, int offsetsx, int incx, float[] sy, int offsetsy, int incy, float c, float s); public void drotg(org.netlib.util.doubleW da, org.netlib.util.doubleW db, org.netlib.util.doubleW c, org.netlib.util.doubleW s); public void srotg(org.netlib.util.floatW sa, org.netlib.util.floatW sb, org.netlib.util.floatW c, org.netlib.util.floatW s); public void drotm(int n, double[] dx, int incx, double[] dy, int incy, double[] dparam); - public void drotm(int n, double[] dx, int offsetdx, int incx, double[] dy, int offsetdy, int incy, double[] dparam, int _dparam_offset); + public void drotm(int n, double[] dx, int offsetdx, int incx, double[] dy, int offsetdy, int incy, double[] dparam, int offsetdparam); public void srotm(int n, float[] sx, int incx, float[] sy, int incy, float[] sparam); - public void srotm(int n, float[] sx, int _sx_offset, int incx, float[] sy, int _sy_offset, int incy, float[] sparam, int _sparam_offset); + public void srotm(int n, float[] sx, int offsetsx, int incx, float[] sy, int offsetsy, int incy, float[] sparam, int offsetsparam); public void drotmg(org.netlib.util.doubleW dd1, org.netlib.util.doubleW dd2, org.netlib.util.doubleW dx1, double dy1, double[] dparam); - public void drotmg(org.netlib.util.doubleW dd1, org.netlib.util.doubleW dd2, org.netlib.util.doubleW dx1, double dy1, double[] dparam, int _dparam_offset); + public void drotmg(org.netlib.util.doubleW dd1, org.netlib.util.doubleW dd2, org.netlib.util.doubleW dx1, double dy1, double[] dparam, int offsetdparam); public void srotmg(org.netlib.util.floatW sd1, org.netlib.util.floatW sd2, org.netlib.util.floatW sx1, float sy1, float[] sparam); - public void srotmg(org.netlib.util.floatW sd1, org.netlib.util.floatW sd2, org.netlib.util.floatW sx1, float sy1, float[] sparam, int _sparam_offset); + public void srotmg(org.netlib.util.floatW sd1, org.netlib.util.floatW sd2, org.netlib.util.floatW sx1, float sy1, float[] sparam, int offsetsparam); public void dsbmv(String uplo, int n, int k, double alpha, double[] a, int lda, double[] x, int incx, double beta, double[] y, int incy); public void dsbmv(String uplo, int n, int k, double alpha, double[] a, int offseta, int lda, double[] x, int offsetx, int incx, double beta, double[] y, int offsety, int incy); @@ -242,7 +242,7 @@ public static BLAS getInstance() { public int idamax(int n, double[] x, int offsetx, int incx); public int isamax(int n, float[] sx, int incx); - public int isamax(int n, float[] sx, int _sx_offset, int incx); + public int isamax(int n, float[] sx, int offsetsx, int incx); public boolean lsame(String ca, String cb); } diff --git a/lapack/src/main/java/dev/ludovic/netlib/LAPACK.java b/lapack/src/main/java/dev/ludovic/netlib/LAPACK.java index a5719cee..4a8e2f37 100644 --- a/lapack/src/main/java/dev/ludovic/netlib/LAPACK.java +++ b/lapack/src/main/java/dev/ludovic/netlib/LAPACK.java @@ -40,1390 +40,1390 @@ public static LAPACK getInstance() { } public void dbdsdc(String uplo, String compq, int n, double[] d, double[] e, double[] u, int ldu, double[] vt, int ldvt, double[] q, int[] iq, double[] work, int[] iwork, org.netlib.util.intW info); - public void dbdsdc(String uplo, String compq, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, double[] q, int _q_offset, int[] iq, int _iq_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dbdsdc(String uplo, String compq, int n, double[] d, int offsetd, double[] e, int offsete, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int ldvt, double[] q, int offsetq, int[] iq, int offsetiq, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dbdsqr(String uplo, int n, int ncvt, int nru, int ncc, double[] d, double[] e, double[] vt, int ldvt, double[] u, int ldu, double[] c, int Ldc, double[] work, org.netlib.util.intW info); - public void dbdsqr(String uplo, int n, int ncvt, int nru, int ncc, double[] d, int _d_offset, double[] e, int _e_offset, double[] vt, int _vt_offset, int ldvt, double[] u, int _u_offset, int ldu, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + public void dbdsqr(String uplo, int n, int ncvt, int nru, int ncc, double[] d, int offsetd, double[] e, int offsete, double[] vt, int offsetvt, int ldvt, double[] u, int offsetu, int ldu, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info); public void ddisna(String job, int m, int n, double[] d, double[] sep, org.netlib.util.intW info); - public void ddisna(String job, int m, int n, double[] d, int _d_offset, double[] sep, int _sep_offset, org.netlib.util.intW info); + public void ddisna(String job, int m, int n, double[] d, int offsetd, double[] sep, int offsetsep, org.netlib.util.intW info); public void dgbbrd(String vect, int m, int n, int ncc, int kl, int ku, double[] ab, int ldab, double[] d, double[] e, double[] q, int ldq, double[] pt, int ldpt, double[] c, int Ldc, double[] work, org.netlib.util.intW info); - public void dgbbrd(String vect, int m, int n, int ncc, int kl, int ku, double[] ab, int _ab_offset, int ldab, double[] d, int _d_offset, double[] e, int _e_offset, double[] q, int _q_offset, int ldq, double[] pt, int _pt_offset, int ldpt, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + public void dgbbrd(String vect, int m, int n, int ncc, int kl, int ku, double[] ab, int offsetab, int ldab, double[] d, int offsetd, double[] e, int offsete, double[] q, int offsetq, int ldq, double[] pt, int offsetpt, int ldpt, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info); public void dgbcon(String norm, int n, int kl, int ku, double[] ab, int ldab, int[] ipiv, double anorm, org.netlib.util.doubleW rcond, double[] work, int[] iwork, org.netlib.util.intW info); - public void dgbcon(String norm, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dgbcon(String norm, int n, int kl, int ku, double[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dgbequ(int m, int n, int kl, int ku, double[] ab, int ldab, double[] r, double[] c, org.netlib.util.doubleW rowcnd, org.netlib.util.doubleW colcnd, org.netlib.util.doubleW amax, org.netlib.util.intW info); - public void dgbequ(int m, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, double[] r, int _r_offset, double[] c, int _c_offset, org.netlib.util.doubleW rowcnd, org.netlib.util.doubleW colcnd, org.netlib.util.doubleW amax, org.netlib.util.intW info); + public void dgbequ(int m, int n, int kl, int ku, double[] ab, int offsetab, int ldab, double[] r, int offsetr, double[] c, int offsetc, org.netlib.util.doubleW rowcnd, org.netlib.util.doubleW colcnd, org.netlib.util.doubleW amax, org.netlib.util.intW info); public void dgbrfs(String trans, int n, int kl, int ku, int nrhs, double[] ab, int ldab, double[] afb, int ldafb, int[] ipiv, double[] b, int ldb, double[] x, int ldx, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info); - public void dgbrfs(String trans, int n, int kl, int ku, int nrhs, double[] ab, int _ab_offset, int ldab, double[] afb, int _afb_offset, int ldafb, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dgbrfs(String trans, int n, int kl, int ku, int nrhs, double[] ab, int offsetab, int ldab, double[] afb, int offsetafb, int ldafb, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dgbsv(int n, int kl, int ku, int nrhs, double[] ab, int ldab, int[] ipiv, double[] b, int ldb, org.netlib.util.intW info); - public void dgbsv(int n, int kl, int ku, int nrhs, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void dgbsv(int n, int kl, int ku, int nrhs, double[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dgbsvx(String fact, String trans, int n, int kl, int ku, int nrhs, double[] ab, int ldab, double[] afb, int ldafb, int[] ipiv, org.netlib.util.StringW equed, double[] r, double[] c, double[] b, int ldb, double[] x, int ldx, org.netlib.util.doubleW rcond, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info); - public void dgbsvx(String fact, String trans, int n, int kl, int ku, int nrhs, double[] ab, int _ab_offset, int ldab, double[] afb, int _afb_offset, int ldafb, int[] ipiv, int _ipiv_offset, org.netlib.util.StringW equed, double[] r, int _r_offset, double[] c, int _c_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dgbsvx(String fact, String trans, int n, int kl, int ku, int nrhs, double[] ab, int offsetab, int ldab, double[] afb, int offsetafb, int ldafb, int[] ipiv, int offsetipiv, org.netlib.util.StringW equed, double[] r, int offsetr, double[] c, int offsetc, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dgbtf2(int m, int n, int kl, int ku, double[] ab, int ldab, int[] ipiv, org.netlib.util.intW info); - public void dgbtf2(int m, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + public void dgbtf2(int m, int n, int kl, int ku, double[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, org.netlib.util.intW info); public void dgbtrf(int m, int n, int kl, int ku, double[] ab, int ldab, int[] ipiv, org.netlib.util.intW info); - public void dgbtrf(int m, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + public void dgbtrf(int m, int n, int kl, int ku, double[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, org.netlib.util.intW info); public void dgbtrs(String trans, int n, int kl, int ku, int nrhs, double[] ab, int ldab, int[] ipiv, double[] b, int ldb, org.netlib.util.intW info); - public void dgbtrs(String trans, int n, int kl, int ku, int nrhs, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void dgbtrs(String trans, int n, int kl, int ku, int nrhs, double[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dgebak(String job, String side, int n, int ilo, int ihi, double[] scale, int m, double[] v, int ldv, org.netlib.util.intW info); - public void dgebak(String job, String side, int n, int ilo, int ihi, double[] scale, int _scale_offset, int m, double[] v, int _v_offset, int ldv, org.netlib.util.intW info); + public void dgebak(String job, String side, int n, int ilo, int ihi, double[] scale, int offsetscale, int m, double[] v, int offsetv, int ldv, org.netlib.util.intW info); public void dgebal(String job, int n, double[] a, int lda, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] scale, org.netlib.util.intW info); - public void dgebal(String job, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] scale, int _scale_offset, org.netlib.util.intW info); + public void dgebal(String job, int n, double[] a, int offseta, int lda, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] scale, int offsetscale, org.netlib.util.intW info); public void dgebd2(int m, int n, double[] a, int lda, double[] d, double[] e, double[] tauq, double[] taup, double[] work, org.netlib.util.intW info); - public void dgebd2(int m, int n, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tauq, int _tauq_offset, double[] taup, int _taup_offset, double[] work, int _work_offset, org.netlib.util.intW info); + public void dgebd2(int m, int n, double[] a, int offseta, int lda, double[] d, int offsetd, double[] e, int offsete, double[] tauq, int offsettauq, double[] taup, int offsettaup, double[] work, int offsetwork, org.netlib.util.intW info); public void dgebrd(int m, int n, double[] a, int lda, double[] d, double[] e, double[] tauq, double[] taup, double[] work, int lwork, org.netlib.util.intW info); - public void dgebrd(int m, int n, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tauq, int _tauq_offset, double[] taup, int _taup_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dgebrd(int m, int n, double[] a, int offseta, int lda, double[] d, int offsetd, double[] e, int offsete, double[] tauq, int offsettauq, double[] taup, int offsettaup, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgecon(String norm, int n, double[] a, int lda, double anorm, org.netlib.util.doubleW rcond, double[] work, int[] iwork, org.netlib.util.intW info); - public void dgecon(String norm, int n, double[] a, int _a_offset, int lda, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dgecon(String norm, int n, double[] a, int offseta, int lda, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dgeequ(int m, int n, double[] a, int lda, double[] r, double[] c, org.netlib.util.doubleW rowcnd, org.netlib.util.doubleW colcnd, org.netlib.util.doubleW amax, org.netlib.util.intW info); - public void dgeequ(int m, int n, double[] a, int _a_offset, int lda, double[] r, int _r_offset, double[] c, int _c_offset, org.netlib.util.doubleW rowcnd, org.netlib.util.doubleW colcnd, org.netlib.util.doubleW amax, org.netlib.util.intW info); + public void dgeequ(int m, int n, double[] a, int offseta, int lda, double[] r, int offsetr, double[] c, int offsetc, org.netlib.util.doubleW rowcnd, org.netlib.util.doubleW colcnd, org.netlib.util.doubleW amax, org.netlib.util.intW info); public void dgees(String jobvs, String sort, java.lang.Object select, int n, double[] a, int lda, org.netlib.util.intW sdim, double[] wr, double[] wi, double[] vs, int ldvs, double[] work, int lwork, boolean[] bwork, org.netlib.util.intW info); - public void dgees(String jobvs, String sort, java.lang.Object select, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW sdim, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vs, int _vs_offset, int ldvs, double[] work, int _work_offset, int lwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + public void dgees(String jobvs, String sort, java.lang.Object select, int n, double[] a, int offseta, int lda, org.netlib.util.intW sdim, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] vs, int offsetvs, int ldvs, double[] work, int offsetwork, int lwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info); public void dgeesx(String jobvs, String sort, java.lang.Object select, String sense, int n, double[] a, int lda, org.netlib.util.intW sdim, double[] wr, double[] wi, double[] vs, int ldvs, org.netlib.util.doubleW rconde, org.netlib.util.doubleW rcondv, double[] work, int lwork, int[] iwork, int liwork, boolean[] bwork, org.netlib.util.intW info); - public void dgeesx(String jobvs, String sort, java.lang.Object select, String sense, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW sdim, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vs, int _vs_offset, int ldvs, org.netlib.util.doubleW rconde, org.netlib.util.doubleW rcondv, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + public void dgeesx(String jobvs, String sort, java.lang.Object select, String sense, int n, double[] a, int offseta, int lda, org.netlib.util.intW sdim, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] vs, int offsetvs, int ldvs, org.netlib.util.doubleW rconde, org.netlib.util.doubleW rcondv, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info); public void dgeev(String jobvl, String jobvr, int n, double[] a, int lda, double[] wr, double[] wi, double[] vl, int ldvl, double[] vr, int ldvr, double[] work, int lwork, org.netlib.util.intW info); - public void dgeev(String jobvl, String jobvr, int n, double[] a, int _a_offset, int lda, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dgeev(String jobvl, String jobvr, int n, double[] a, int offseta, int lda, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgeevx(String balanc, String jobvl, String jobvr, String sense, int n, double[] a, int lda, double[] wr, double[] wi, double[] vl, int ldvl, double[] vr, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] scale, org.netlib.util.doubleW abnrm, double[] rconde, double[] rcondv, double[] work, int lwork, int[] iwork, org.netlib.util.intW info); - public void dgeevx(String balanc, String jobvl, String jobvr, String sense, int n, double[] a, int _a_offset, int lda, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] scale, int _scale_offset, org.netlib.util.doubleW abnrm, double[] rconde, int _rconde_offset, double[] rcondv, int _rcondv_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dgeevx(String balanc, String jobvl, String jobvr, String sense, int n, double[] a, int offseta, int lda, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] scale, int offsetscale, org.netlib.util.doubleW abnrm, double[] rconde, int offsetrconde, double[] rcondv, int offsetrcondv, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dgegs(String jobvsl, String jobvsr, int n, double[] a, int lda, double[] b, int ldb, double[] alphar, double[] alphai, double[] beta, double[] vsl, int ldvsl, double[] vsr, int ldvsr, double[] work, int lwork, org.netlib.util.intW info); - public void dgegs(String jobvsl, String jobvsr, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vsl, int _vsl_offset, int ldvsl, double[] vsr, int _vsr_offset, int ldvsr, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dgegs(String jobvsl, String jobvsr, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] vsl, int offsetvsl, int ldvsl, double[] vsr, int offsetvsr, int ldvsr, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgegv(String jobvl, String jobvr, int n, double[] a, int lda, double[] b, int ldb, double[] alphar, double[] alphai, double[] beta, double[] vl, int ldvl, double[] vr, int ldvr, double[] work, int lwork, org.netlib.util.intW info); - public void dgegv(String jobvl, String jobvr, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dgegv(String jobvl, String jobvr, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgehd2(int n, int ilo, int ihi, double[] a, int lda, double[] tau, double[] work, org.netlib.util.intW info); - public void dgehd2(int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + public void dgehd2(int n, int ilo, int ihi, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); public void dgehrd(int n, int ilo, int ihi, double[] a, int lda, double[] tau, double[] work, int lwork, org.netlib.util.intW info); - public void dgehrd(int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dgehrd(int n, int ilo, int ihi, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgelq2(int m, int n, double[] a, int lda, double[] tau, double[] work, org.netlib.util.intW info); - public void dgelq2(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + public void dgelq2(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); public void dgelqf(int m, int n, double[] a, int lda, double[] tau, double[] work, int lwork, org.netlib.util.intW info); - public void dgelqf(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dgelqf(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgels(String trans, int m, int n, int nrhs, double[] a, int lda, double[] b, int ldb, double[] work, int lwork, org.netlib.util.intW info); - public void dgels(String trans, int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dgels(String trans, int m, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgelsd(int m, int n, int nrhs, double[] a, int lda, double[] b, int ldb, double[] s, double rcond, org.netlib.util.intW rank, double[] work, int lwork, int[] iwork, org.netlib.util.intW info); - public void dgelsd(int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] s, int _s_offset, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dgelsd(int m, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] s, int offsets, double rcond, org.netlib.util.intW rank, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dgelss(int m, int n, int nrhs, double[] a, int lda, double[] b, int ldb, double[] s, double rcond, org.netlib.util.intW rank, double[] work, int lwork, org.netlib.util.intW info); - public void dgelss(int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] s, int _s_offset, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dgelss(int m, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] s, int offsets, double rcond, org.netlib.util.intW rank, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgelsx(int m, int n, int nrhs, double[] a, int lda, double[] b, int ldb, int[] jpvt, double rcond, org.netlib.util.intW rank, double[] work, org.netlib.util.intW info); - public void dgelsx(int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, int[] jpvt, int _jpvt_offset, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, org.netlib.util.intW info); + public void dgelsx(int m, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, int[] jpvt, int offsetjpvt, double rcond, org.netlib.util.intW rank, double[] work, int offsetwork, org.netlib.util.intW info); public void dgelsy(int m, int n, int nrhs, double[] a, int lda, double[] b, int ldb, int[] jpvt, double rcond, org.netlib.util.intW rank, double[] work, int lwork, org.netlib.util.intW info); - public void dgelsy(int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, int[] jpvt, int _jpvt_offset, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dgelsy(int m, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, int[] jpvt, int offsetjpvt, double rcond, org.netlib.util.intW rank, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgeql2(int m, int n, double[] a, int lda, double[] tau, double[] work, org.netlib.util.intW info); - public void dgeql2(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + public void dgeql2(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); public void dgeqlf(int m, int n, double[] a, int lda, double[] tau, double[] work, int lwork, org.netlib.util.intW info); - public void dgeqlf(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dgeqlf(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgeqp3(int m, int n, double[] a, int lda, int[] jpvt, double[] tau, double[] work, int lwork, org.netlib.util.intW info); - public void dgeqp3(int m, int n, double[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dgeqp3(int m, int n, double[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgeqpf(int m, int n, double[] a, int lda, int[] jpvt, double[] tau, double[] work, org.netlib.util.intW info); - public void dgeqpf(int m, int n, double[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + public void dgeqpf(int m, int n, double[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); public void dgeqr2(int m, int n, double[] a, int lda, double[] tau, double[] work, org.netlib.util.intW info); - public void dgeqr2(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + public void dgeqr2(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); public void dgeqrf(int m, int n, double[] a, int lda, double[] tau, double[] work, int lwork, org.netlib.util.intW info); - public void dgeqrf(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dgeqrf(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgerfs(String trans, int n, int nrhs, double[] a, int lda, double[] af, int ldaf, int[] ipiv, double[] b, int ldb, double[] x, int ldx, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info); - public void dgerfs(String trans, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dgerfs(String trans, int n, int nrhs, double[] a, int offseta, int lda, double[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dgerq2(int m, int n, double[] a, int lda, double[] tau, double[] work, org.netlib.util.intW info); - public void dgerq2(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + public void dgerq2(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); public void dgerqf(int m, int n, double[] a, int lda, double[] tau, double[] work, int lwork, org.netlib.util.intW info); - public void dgerqf(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dgerqf(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgesc2(int n, double[] a, int lda, double[] rhs, int[] ipiv, int[] jpiv, org.netlib.util.doubleW scale); - public void dgesc2(int n, double[] a, int _a_offset, int lda, double[] rhs, int _rhs_offset, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset, org.netlib.util.doubleW scale); + public void dgesc2(int n, double[] a, int offseta, int lda, double[] rhs, int offsetrhs, int[] ipiv, int offsetipiv, int[] jpiv, int offsetjpiv, org.netlib.util.doubleW scale); public void dgesdd(String jobz, int m, int n, double[] a, int lda, double[] s, double[] u, int ldu, double[] vt, int ldvt, double[] work, int lwork, int[] iwork, org.netlib.util.intW info); - public void dgesdd(String jobz, int m, int n, double[] a, int _a_offset, int lda, double[] s, int _s_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dgesdd(String jobz, int m, int n, double[] a, int offseta, int lda, double[] s, int offsets, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int ldvt, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dgesv(int n, int nrhs, double[] a, int lda, int[] ipiv, double[] b, int ldb, org.netlib.util.intW info); - public void dgesv(int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void dgesv(int n, int nrhs, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dgesvd(String jobu, String jobvt, int m, int n, double[] a, int lda, double[] s, double[] u, int ldu, double[] vt, int ldvt, double[] work, int lwork, org.netlib.util.intW info); - public void dgesvd(String jobu, String jobvt, int m, int n, double[] a, int _a_offset, int lda, double[] s, int _s_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dgesvd(String jobu, String jobvt, int m, int n, double[] a, int offseta, int lda, double[] s, int offsets, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int ldvt, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgesvx(String fact, String trans, int n, int nrhs, double[] a, int lda, double[] af, int ldaf, int[] ipiv, org.netlib.util.StringW equed, double[] r, double[] c, double[] b, int ldb, double[] x, int ldx, org.netlib.util.doubleW rcond, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info); - public void dgesvx(String fact, String trans, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, org.netlib.util.StringW equed, double[] r, int _r_offset, double[] c, int _c_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dgesvx(String fact, String trans, int n, int nrhs, double[] a, int offseta, int lda, double[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, org.netlib.util.StringW equed, double[] r, int offsetr, double[] c, int offsetc, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dgetc2(int n, double[] a, int lda, int[] ipiv, int[] jpiv, org.netlib.util.intW info); - public void dgetc2(int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset, org.netlib.util.intW info); + public void dgetc2(int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, int[] jpiv, int offsetjpiv, org.netlib.util.intW info); public void dgetf2(int m, int n, double[] a, int lda, int[] ipiv, org.netlib.util.intW info); - public void dgetf2(int m, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + public void dgetf2(int m, int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, org.netlib.util.intW info); public void dgetrf(int m, int n, double[] a, int lda, int[] ipiv, org.netlib.util.intW info); - public void dgetrf(int m, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + public void dgetrf(int m, int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, org.netlib.util.intW info); public void dgetri(int n, double[] a, int lda, int[] ipiv, double[] work, int lwork, org.netlib.util.intW info); - public void dgetri(int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dgetri(int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgetrs(String trans, int n, int nrhs, double[] a, int lda, int[] ipiv, double[] b, int ldb, org.netlib.util.intW info); - public void dgetrs(String trans, int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void dgetrs(String trans, int n, int nrhs, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dggbak(String job, String side, int n, int ilo, int ihi, double[] lscale, double[] rscale, int m, double[] v, int ldv, org.netlib.util.intW info); - public void dggbak(String job, String side, int n, int ilo, int ihi, double[] lscale, int _lscale_offset, double[] rscale, int _rscale_offset, int m, double[] v, int _v_offset, int ldv, org.netlib.util.intW info); + public void dggbak(String job, String side, int n, int ilo, int ihi, double[] lscale, int offsetlscale, double[] rscale, int offsetrscale, int m, double[] v, int offsetv, int ldv, org.netlib.util.intW info); public void dggbal(String job, int n, double[] a, int lda, double[] b, int ldb, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] lscale, double[] rscale, double[] work, org.netlib.util.intW info); - public void dggbal(String job, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] lscale, int _lscale_offset, double[] rscale, int _rscale_offset, double[] work, int _work_offset, org.netlib.util.intW info); + public void dggbal(String job, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] lscale, int offsetlscale, double[] rscale, int offsetrscale, double[] work, int offsetwork, org.netlib.util.intW info); public void dgges(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, int n, double[] a, int lda, double[] b, int ldb, org.netlib.util.intW sdim, double[] alphar, double[] alphai, double[] beta, double[] vsl, int ldvsl, double[] vsr, int ldvsr, double[] work, int lwork, boolean[] bwork, org.netlib.util.intW info); - public void dgges(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW sdim, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vsl, int _vsl_offset, int ldvsl, double[] vsr, int _vsr_offset, int ldvsr, double[] work, int _work_offset, int lwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + public void dgges(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW sdim, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] vsl, int offsetvsl, int ldvsl, double[] vsr, int offsetvsr, int ldvsr, double[] work, int offsetwork, int lwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info); public void dggesx(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, String sense, int n, double[] a, int lda, double[] b, int ldb, org.netlib.util.intW sdim, double[] alphar, double[] alphai, double[] beta, double[] vsl, int ldvsl, double[] vsr, int ldvsr, double[] rconde, double[] rcondv, double[] work, int lwork, int[] iwork, int liwork, boolean[] bwork, org.netlib.util.intW info); - public void dggesx(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, String sense, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW sdim, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vsl, int _vsl_offset, int ldvsl, double[] vsr, int _vsr_offset, int ldvsr, double[] rconde, int _rconde_offset, double[] rcondv, int _rcondv_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + public void dggesx(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, String sense, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW sdim, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] vsl, int offsetvsl, int ldvsl, double[] vsr, int offsetvsr, int ldvsr, double[] rconde, int offsetrconde, double[] rcondv, int offsetrcondv, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info); public void dggev(String jobvl, String jobvr, int n, double[] a, int lda, double[] b, int ldb, double[] alphar, double[] alphai, double[] beta, double[] vl, int ldvl, double[] vr, int ldvr, double[] work, int lwork, org.netlib.util.intW info); - public void dggev(String jobvl, String jobvr, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dggev(String jobvl, String jobvr, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dggevx(String balanc, String jobvl, String jobvr, String sense, int n, double[] a, int lda, double[] b, int ldb, double[] alphar, double[] alphai, double[] beta, double[] vl, int ldvl, double[] vr, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] lscale, double[] rscale, org.netlib.util.doubleW abnrm, org.netlib.util.doubleW bbnrm, double[] rconde, double[] rcondv, double[] work, int lwork, int[] iwork, boolean[] bwork, org.netlib.util.intW info); - public void dggevx(String balanc, String jobvl, String jobvr, String sense, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] lscale, int _lscale_offset, double[] rscale, int _rscale_offset, org.netlib.util.doubleW abnrm, org.netlib.util.doubleW bbnrm, double[] rconde, int _rconde_offset, double[] rcondv, int _rcondv_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + public void dggevx(String balanc, String jobvl, String jobvr, String sense, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] lscale, int offsetlscale, double[] rscale, int offsetrscale, org.netlib.util.doubleW abnrm, org.netlib.util.doubleW bbnrm, double[] rconde, int offsetrconde, double[] rcondv, int offsetrcondv, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info); public void dggglm(int n, int m, int p, double[] a, int lda, double[] b, int ldb, double[] d, double[] x, double[] y, double[] work, int lwork, org.netlib.util.intW info); - public void dggglm(int n, int m, int p, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] d, int _d_offset, double[] x, int _x_offset, double[] y, int _y_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dggglm(int n, int m, int p, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] d, int offsetd, double[] x, int offsetx, double[] y, int offsety, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgghrd(String compq, String compz, int n, int ilo, int ihi, double[] a, int lda, double[] b, int ldb, double[] q, int ldq, double[] z, int ldz, org.netlib.util.intW info); - public void dgghrd(String compq, String compz, int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, org.netlib.util.intW info); + public void dgghrd(String compq, String compz, int n, int ilo, int ihi, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] q, int offsetq, int ldq, double[] z, int offsetz, int ldz, org.netlib.util.intW info); public void dgglse(int m, int n, int p, double[] a, int lda, double[] b, int ldb, double[] c, double[] d, double[] x, double[] work, int lwork, org.netlib.util.intW info); - public void dgglse(int m, int n, int p, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] c, int _c_offset, double[] d, int _d_offset, double[] x, int _x_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dgglse(int m, int n, int p, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] c, int offsetc, double[] d, int offsetd, double[] x, int offsetx, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dggqrf(int n, int m, int p, double[] a, int lda, double[] taua, double[] b, int ldb, double[] taub, double[] work, int lwork, org.netlib.util.intW info); - public void dggqrf(int n, int m, int p, double[] a, int _a_offset, int lda, double[] taua, int _taua_offset, double[] b, int _b_offset, int ldb, double[] taub, int _taub_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dggqrf(int n, int m, int p, double[] a, int offseta, int lda, double[] taua, int offsettaua, double[] b, int offsetb, int ldb, double[] taub, int offsettaub, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dggrqf(int m, int p, int n, double[] a, int lda, double[] taua, double[] b, int ldb, double[] taub, double[] work, int lwork, org.netlib.util.intW info); - public void dggrqf(int m, int p, int n, double[] a, int _a_offset, int lda, double[] taua, int _taua_offset, double[] b, int _b_offset, int ldb, double[] taub, int _taub_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dggrqf(int m, int p, int n, double[] a, int offseta, int lda, double[] taua, int offsettaua, double[] b, int offsetb, int ldb, double[] taub, int offsettaub, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dggsvd(String jobu, String jobv, String jobq, int m, int n, int p, org.netlib.util.intW k, org.netlib.util.intW l, double[] a, int lda, double[] b, int ldb, double[] alpha, double[] beta, double[] u, int ldu, double[] v, int ldv, double[] q, int ldq, double[] work, int[] iwork, org.netlib.util.intW info); - public void dggsvd(String jobu, String jobv, String jobq, int m, int n, int p, org.netlib.util.intW k, org.netlib.util.intW l, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alpha, int _alpha_offset, double[] beta, int _beta_offset, double[] u, int _u_offset, int ldu, double[] v, int _v_offset, int ldv, double[] q, int _q_offset, int ldq, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dggsvd(String jobu, String jobv, String jobq, int m, int n, int p, org.netlib.util.intW k, org.netlib.util.intW l, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alpha, int offsetalpha, double[] beta, int offsetbeta, double[] u, int offsetu, int ldu, double[] v, int offsetv, int ldv, double[] q, int offsetq, int ldq, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dggsvp(String jobu, String jobv, String jobq, int m, int p, int n, double[] a, int lda, double[] b, int ldb, double tola, double tolb, org.netlib.util.intW k, org.netlib.util.intW l, double[] u, int ldu, double[] v, int ldv, double[] q, int ldq, int[] iwork, double[] tau, double[] work, org.netlib.util.intW info); - public void dggsvp(String jobu, String jobv, String jobq, int m, int p, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double tola, double tolb, org.netlib.util.intW k, org.netlib.util.intW l, double[] u, int _u_offset, int ldu, double[] v, int _v_offset, int ldv, double[] q, int _q_offset, int ldq, int[] iwork, int _iwork_offset, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + public void dggsvp(String jobu, String jobv, String jobq, int m, int p, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double tola, double tolb, org.netlib.util.intW k, org.netlib.util.intW l, double[] u, int offsetu, int ldu, double[] v, int offsetv, int ldv, double[] q, int offsetq, int ldq, int[] iwork, int offsetiwork, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); public void dgtcon(String norm, int n, double[] dl, double[] d, double[] du, double[] du2, int[] ipiv, double anorm, org.netlib.util.doubleW rcond, double[] work, int[] iwork, org.netlib.util.intW info); - public void dgtcon(String norm, int n, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dgtcon(String norm, int n, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] du2, int offsetdu2, int[] ipiv, int offsetipiv, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dgtrfs(String trans, int n, int nrhs, double[] dl, double[] d, double[] du, double[] dlf, double[] df, double[] duf, double[] du2, int[] ipiv, double[] b, int ldb, double[] x, int ldx, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info); - public void dgtrfs(String trans, int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] dlf, int _dlf_offset, double[] df, int _df_offset, double[] duf, int _duf_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dgtrfs(String trans, int n, int nrhs, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] dlf, int offsetdlf, double[] df, int offsetdf, double[] duf, int offsetduf, double[] du2, int offsetdu2, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dgtsv(int n, int nrhs, double[] dl, double[] d, double[] du, double[] b, int ldb, org.netlib.util.intW info); - public void dgtsv(int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void dgtsv(int n, int nrhs, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dgtsvx(String fact, String trans, int n, int nrhs, double[] dl, double[] d, double[] du, double[] dlf, double[] df, double[] duf, double[] du2, int[] ipiv, double[] b, int ldb, double[] x, int ldx, org.netlib.util.doubleW rcond, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info); - public void dgtsvx(String fact, String trans, int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] dlf, int _dlf_offset, double[] df, int _df_offset, double[] duf, int _duf_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dgtsvx(String fact, String trans, int n, int nrhs, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] dlf, int offsetdlf, double[] df, int offsetdf, double[] duf, int offsetduf, double[] du2, int offsetdu2, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dgttrf(int n, double[] dl, double[] d, double[] du, double[] du2, int[] ipiv, org.netlib.util.intW info); - public void dgttrf(int n, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + public void dgttrf(int n, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] du2, int offsetdu2, int[] ipiv, int offsetipiv, org.netlib.util.intW info); public void dgttrs(String trans, int n, int nrhs, double[] dl, double[] d, double[] du, double[] du2, int[] ipiv, double[] b, int ldb, org.netlib.util.intW info); - public void dgttrs(String trans, int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void dgttrs(String trans, int n, int nrhs, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] du2, int offsetdu2, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dgtts2(int itrans, int n, int nrhs, double[] dl, double[] d, double[] du, double[] du2, int[] ipiv, double[] b, int ldb); - public void dgtts2(int itrans, int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb); + public void dgtts2(int itrans, int n, int nrhs, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] du2, int offsetdu2, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb); public void dhgeqz(String job, String compq, String compz, int n, int ilo, int ihi, double[] h, int ldh, double[] t, int ldt, double[] alphar, double[] alphai, double[] beta, double[] q, int ldq, double[] z, int ldz, double[] work, int lwork, org.netlib.util.intW info); - public void dhgeqz(String job, String compq, String compz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] t, int _t_offset, int ldt, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dhgeqz(String job, String compq, String compz, int n, int ilo, int ihi, double[] h, int offseth, int ldh, double[] t, int offsett, int ldt, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] q, int offsetq, int ldq, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dhsein(String side, String eigsrc, String initv, boolean[] select, int n, double[] h, int ldh, double[] wr, double[] wi, double[] vl, int ldvl, double[] vr, int ldvr, int mm, org.netlib.util.intW m, double[] work, int[] ifaill, int[] ifailr, org.netlib.util.intW info); - public void dhsein(String side, String eigsrc, String initv, boolean[] select, int _select_offset, int n, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, double[] work, int _work_offset, int[] ifaill, int _ifaill_offset, int[] ifailr, int _ifailr_offset, org.netlib.util.intW info); + public void dhsein(String side, String eigsrc, String initv, boolean[] select, int offsetselect, int n, double[] h, int offseth, int ldh, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, int mm, org.netlib.util.intW m, double[] work, int offsetwork, int[] ifaill, int offsetifaill, int[] ifailr, int offsetifailr, org.netlib.util.intW info); public void dhseqr(String job, String compz, int n, int ilo, int ihi, double[] h, int ldh, double[] wr, double[] wi, double[] z, int ldz, double[] work, int lwork, org.netlib.util.intW info); - public void dhseqr(String job, String compz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dhseqr(String job, String compz, int n, int ilo, int ihi, double[] h, int offseth, int ldh, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public boolean disnan(double din); public void dlabad(org.netlib.util.doubleW small, org.netlib.util.doubleW large); public void dlabrd(int m, int n, int nb, double[] a, int lda, double[] d, double[] e, double[] tauq, double[] taup, double[] x, int ldx, double[] y, int ldy); - public void dlabrd(int m, int n, int nb, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tauq, int _tauq_offset, double[] taup, int _taup_offset, double[] x, int _x_offset, int ldx, double[] y, int _y_offset, int ldy); + public void dlabrd(int m, int n, int nb, double[] a, int offseta, int lda, double[] d, int offsetd, double[] e, int offsete, double[] tauq, int offsettauq, double[] taup, int offsettaup, double[] x, int offsetx, int ldx, double[] y, int offsety, int ldy); public void dlacn2(int n, double[] v, double[] x, int[] isgn, org.netlib.util.doubleW est, org.netlib.util.intW kase, int[] isave); - public void dlacn2(int n, double[] v, int _v_offset, double[] x, int _x_offset, int[] isgn, int _isgn_offset, org.netlib.util.doubleW est, org.netlib.util.intW kase, int[] isave, int _isave_offset); + public void dlacn2(int n, double[] v, int offsetv, double[] x, int offsetx, int[] isgn, int offsetisgn, org.netlib.util.doubleW est, org.netlib.util.intW kase, int[] isave, int offsetisave); public void dlacon(int n, double[] v, double[] x, int[] isgn, org.netlib.util.doubleW est, org.netlib.util.intW kase); - public void dlacon(int n, double[] v, int _v_offset, double[] x, int _x_offset, int[] isgn, int _isgn_offset, org.netlib.util.doubleW est, org.netlib.util.intW kase); + public void dlacon(int n, double[] v, int offsetv, double[] x, int offsetx, int[] isgn, int offsetisgn, org.netlib.util.doubleW est, org.netlib.util.intW kase); public void dlacpy(String uplo, int m, int n, double[] a, int lda, double[] b, int ldb); - public void dlacpy(String uplo, int m, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb); + public void dlacpy(String uplo, int m, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb); public void dladiv(double a, double b, double c, double d, org.netlib.util.doubleW p, org.netlib.util.doubleW q); public void dlae2(double a, double b, double c, org.netlib.util.doubleW rt1, org.netlib.util.doubleW rt2); public void dlaebz(int ijob, int nitmax, int n, int mmax, int minp, int nbmin, double abstol, double reltol, double pivmin, double[] d, double[] e, double[] e2, int[] nval, double[] ab, double[] c, org.netlib.util.intW mout, int[] nab, double[] work, int[] iwork, org.netlib.util.intW info); - public void dlaebz(int ijob, int nitmax, int n, int mmax, int minp, int nbmin, double abstol, double reltol, double pivmin, double[] d, int _d_offset, double[] e, int _e_offset, double[] e2, int _e2_offset, int[] nval, int _nval_offset, double[] ab, int _ab_offset, double[] c, int _c_offset, org.netlib.util.intW mout, int[] nab, int _nab_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dlaebz(int ijob, int nitmax, int n, int mmax, int minp, int nbmin, double abstol, double reltol, double pivmin, double[] d, int offsetd, double[] e, int offsete, double[] e2, int offsete2, int[] nval, int offsetnval, double[] ab, int offsetab, double[] c, int offsetc, org.netlib.util.intW mout, int[] nab, int offsetnab, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dlaed0(int icompq, int qsiz, int n, double[] d, double[] e, double[] q, int ldq, double[] qstore, int ldqs, double[] work, int[] iwork, org.netlib.util.intW info); - public void dlaed0(int icompq, int qsiz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] q, int _q_offset, int ldq, double[] qstore, int _qstore_offset, int ldqs, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dlaed0(int icompq, int qsiz, int n, double[] d, int offsetd, double[] e, int offsete, double[] q, int offsetq, int ldq, double[] qstore, int offsetqstore, int ldqs, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dlaed1(int n, double[] d, double[] q, int ldq, int[] indxq, org.netlib.util.doubleW rho, int cutpnt, double[] work, int[] iwork, org.netlib.util.intW info); - public void dlaed1(int n, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.doubleW rho, int cutpnt, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dlaed1(int n, double[] d, int offsetd, double[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.doubleW rho, int cutpnt, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dlaed2(org.netlib.util.intW k, int n, int n1, double[] d, double[] q, int ldq, int[] indxq, org.netlib.util.doubleW rho, double[] z, double[] dlamda, double[] w, double[] q2, int[] indx, int[] indxc, int[] indxp, int[] coltyp, org.netlib.util.intW info); - public void dlaed2(org.netlib.util.intW k, int n, int n1, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.doubleW rho, double[] z, int _z_offset, double[] dlamda, int _dlamda_offset, double[] w, int _w_offset, double[] q2, int _q2_offset, int[] indx, int _indx_offset, int[] indxc, int _indxc_offset, int[] indxp, int _indxp_offset, int[] coltyp, int _coltyp_offset, org.netlib.util.intW info); + public void dlaed2(org.netlib.util.intW k, int n, int n1, double[] d, int offsetd, double[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.doubleW rho, double[] z, int offsetz, double[] dlamda, int offsetdlamda, double[] w, int offsetw, double[] q2, int offsetq2, int[] indx, int offsetindx, int[] indxc, int offsetindxc, int[] indxp, int offsetindxp, int[] coltyp, int offsetcoltyp, org.netlib.util.intW info); public void dlaed3(int k, int n, int n1, double[] d, double[] q, int ldq, double rho, double[] dlamda, double[] q2, int[] indx, int[] ctot, double[] w, double[] s, org.netlib.util.intW info); - public void dlaed3(int k, int n, int n1, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, double rho, double[] dlamda, int _dlamda_offset, double[] q2, int _q2_offset, int[] indx, int _indx_offset, int[] ctot, int _ctot_offset, double[] w, int _w_offset, double[] s, int _s_offset, org.netlib.util.intW info); + public void dlaed3(int k, int n, int n1, double[] d, int offsetd, double[] q, int offsetq, int ldq, double rho, double[] dlamda, int offsetdlamda, double[] q2, int offsetq2, int[] indx, int offsetindx, int[] ctot, int offsetctot, double[] w, int offsetw, double[] s, int offsets, org.netlib.util.intW info); public void dlaed4(int n, int i, double[] d, double[] z, double[] delta, double rho, org.netlib.util.doubleW dlam, org.netlib.util.intW info); - public void dlaed4(int n, int i, double[] d, int _d_offset, double[] z, int _z_offset, double[] delta, int _delta_offset, double rho, org.netlib.util.doubleW dlam, org.netlib.util.intW info); + public void dlaed4(int n, int i, double[] d, int offsetd, double[] z, int offsetz, double[] delta, int offsetdelta, double rho, org.netlib.util.doubleW dlam, org.netlib.util.intW info); public void dlaed5(int i, double[] d, double[] z, double[] delta, double rho, org.netlib.util.doubleW dlam); - public void dlaed5(int i, double[] d, int _d_offset, double[] z, int _z_offset, double[] delta, int _delta_offset, double rho, org.netlib.util.doubleW dlam); + public void dlaed5(int i, double[] d, int offsetd, double[] z, int offsetz, double[] delta, int offsetdelta, double rho, org.netlib.util.doubleW dlam); public void dlaed6(int kniter, boolean orgati, double rho, double[] d, double[] z, double finit, org.netlib.util.doubleW tau, org.netlib.util.intW info); - public void dlaed6(int kniter, boolean orgati, double rho, double[] d, int _d_offset, double[] z, int _z_offset, double finit, org.netlib.util.doubleW tau, org.netlib.util.intW info); + public void dlaed6(int kniter, boolean orgati, double rho, double[] d, int offsetd, double[] z, int offsetz, double finit, org.netlib.util.doubleW tau, org.netlib.util.intW info); public void dlaed7(int icompq, int n, int qsiz, int tlvls, int curlvl, int curpbm, double[] d, double[] q, int ldq, int[] indxq, org.netlib.util.doubleW rho, int cutpnt, double[] qstore, int[] qptr, int[] prmptr, int[] perm, int[] givptr, int[] givcol, double[] givnum, double[] work, int[] iwork, org.netlib.util.intW info); - public void dlaed7(int icompq, int n, int qsiz, int tlvls, int curlvl, int curpbm, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.doubleW rho, int cutpnt, double[] qstore, int _qstore_offset, int[] qptr, int _qptr_offset, int[] prmptr, int _prmptr_offset, int[] perm, int _perm_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, double[] givnum, int _givnum_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dlaed7(int icompq, int n, int qsiz, int tlvls, int curlvl, int curpbm, double[] d, int offsetd, double[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.doubleW rho, int cutpnt, double[] qstore, int offsetqstore, int[] qptr, int offsetqptr, int[] prmptr, int offsetprmptr, int[] perm, int offsetperm, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, double[] givnum, int offsetgivnum, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dlaed8(int icompq, org.netlib.util.intW k, int n, int qsiz, double[] d, double[] q, int ldq, int[] indxq, org.netlib.util.doubleW rho, int cutpnt, double[] z, double[] dlamda, double[] q2, int ldq2, double[] w, int[] perm, org.netlib.util.intW givptr, int[] givcol, double[] givnum, int[] indxp, int[] indx, org.netlib.util.intW info); - public void dlaed8(int icompq, org.netlib.util.intW k, int n, int qsiz, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.doubleW rho, int cutpnt, double[] z, int _z_offset, double[] dlamda, int _dlamda_offset, double[] q2, int _q2_offset, int ldq2, double[] w, int _w_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, double[] givnum, int _givnum_offset, int[] indxp, int _indxp_offset, int[] indx, int _indx_offset, org.netlib.util.intW info); + public void dlaed8(int icompq, org.netlib.util.intW k, int n, int qsiz, double[] d, int offsetd, double[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.doubleW rho, int cutpnt, double[] z, int offsetz, double[] dlamda, int offsetdlamda, double[] q2, int offsetq2, int ldq2, double[] w, int offsetw, int[] perm, int offsetperm, org.netlib.util.intW givptr, int[] givcol, int offsetgivcol, double[] givnum, int offsetgivnum, int[] indxp, int offsetindxp, int[] indx, int offsetindx, org.netlib.util.intW info); public void dlaed9(int k, int kstart, int kstop, int n, double[] d, double[] q, int ldq, double rho, double[] dlamda, double[] w, double[] s, int lds, org.netlib.util.intW info); - public void dlaed9(int k, int kstart, int kstop, int n, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, double rho, double[] dlamda, int _dlamda_offset, double[] w, int _w_offset, double[] s, int _s_offset, int lds, org.netlib.util.intW info); + public void dlaed9(int k, int kstart, int kstop, int n, double[] d, int offsetd, double[] q, int offsetq, int ldq, double rho, double[] dlamda, int offsetdlamda, double[] w, int offsetw, double[] s, int offsets, int lds, org.netlib.util.intW info); public void dlaeda(int n, int tlvls, int curlvl, int curpbm, int[] prmptr, int[] perm, int[] givptr, int[] givcol, double[] givnum, double[] q, int[] qptr, double[] z, double[] ztemp, org.netlib.util.intW info); - public void dlaeda(int n, int tlvls, int curlvl, int curpbm, int[] prmptr, int _prmptr_offset, int[] perm, int _perm_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, double[] givnum, int _givnum_offset, double[] q, int _q_offset, int[] qptr, int _qptr_offset, double[] z, int _z_offset, double[] ztemp, int _ztemp_offset, org.netlib.util.intW info); + public void dlaeda(int n, int tlvls, int curlvl, int curpbm, int[] prmptr, int offsetprmptr, int[] perm, int offsetperm, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, double[] givnum, int offsetgivnum, double[] q, int offsetq, int[] qptr, int offsetqptr, double[] z, int offsetz, double[] ztemp, int offsetztemp, org.netlib.util.intW info); public void dlaein(boolean rightv, boolean noinit, int n, double[] h, int ldh, double wr, double wi, double[] vr, double[] vi, double[] b, int ldb, double[] work, double eps3, double smlnum, double bignum, org.netlib.util.intW info); - public void dlaein(boolean rightv, boolean noinit, int n, double[] h, int _h_offset, int ldh, double wr, double wi, double[] vr, int _vr_offset, double[] vi, int _vi_offset, double[] b, int _b_offset, int ldb, double[] work, int _work_offset, double eps3, double smlnum, double bignum, org.netlib.util.intW info); + public void dlaein(boolean rightv, boolean noinit, int n, double[] h, int offseth, int ldh, double wr, double wi, double[] vr, int offsetvr, double[] vi, int offsetvi, double[] b, int offsetb, int ldb, double[] work, int offsetwork, double eps3, double smlnum, double bignum, org.netlib.util.intW info); public void dlaev2(double a, double b, double c, org.netlib.util.doubleW rt1, org.netlib.util.doubleW rt2, org.netlib.util.doubleW cs1, org.netlib.util.doubleW sn1); public void dlaexc(boolean wantq, int n, double[] t, int ldt, double[] q, int ldq, int j1, int n1, int n2, double[] work, org.netlib.util.intW info); - public void dlaexc(boolean wantq, int n, double[] t, int _t_offset, int ldt, double[] q, int _q_offset, int ldq, int j1, int n1, int n2, double[] work, int _work_offset, org.netlib.util.intW info); + public void dlaexc(boolean wantq, int n, double[] t, int offsett, int ldt, double[] q, int offsetq, int ldq, int j1, int n1, int n2, double[] work, int offsetwork, org.netlib.util.intW info); public void dlag2(double[] a, int lda, double[] b, int ldb, double safmin, org.netlib.util.doubleW scale1, org.netlib.util.doubleW scale2, org.netlib.util.doubleW wr1, org.netlib.util.doubleW wr2, org.netlib.util.doubleW wi); - public void dlag2(double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double safmin, org.netlib.util.doubleW scale1, org.netlib.util.doubleW scale2, org.netlib.util.doubleW wr1, org.netlib.util.doubleW wr2, org.netlib.util.doubleW wi); + public void dlag2(double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double safmin, org.netlib.util.doubleW scale1, org.netlib.util.doubleW scale2, org.netlib.util.doubleW wr1, org.netlib.util.doubleW wr2, org.netlib.util.doubleW wi); public void dlag2s(int m, int n, double[] a, int lda, float[] sa, int ldsa, org.netlib.util.intW info); - public void dlag2s(int m, int n, double[] a, int _a_offset, int lda, float[] sa, int _sa_offset, int ldsa, org.netlib.util.intW info); + public void dlag2s(int m, int n, double[] a, int offseta, int lda, float[] sa, int offsetsa, int ldsa, org.netlib.util.intW info); public void dlags2(boolean upper, double a1, double a2, double a3, double b1, double b2, double b3, org.netlib.util.doubleW csu, org.netlib.util.doubleW snu, org.netlib.util.doubleW csv, org.netlib.util.doubleW snv, org.netlib.util.doubleW csq, org.netlib.util.doubleW snq); public void dlagtf(int n, double[] a, double lambda, double[] b, double[] c, double tol, double[] d, int[] in, org.netlib.util.intW info); - public void dlagtf(int n, double[] a, int _a_offset, double lambda, double[] b, int _b_offset, double[] c, int _c_offset, double tol, double[] d, int _d_offset, int[] in, int _in_offset, org.netlib.util.intW info); + public void dlagtf(int n, double[] a, int offseta, double lambda, double[] b, int offsetb, double[] c, int offsetc, double tol, double[] d, int offsetd, int[] in, int offsetin, org.netlib.util.intW info); public void dlagtm(String trans, int n, int nrhs, double alpha, double[] dl, double[] d, double[] du, double[] x, int ldx, double beta, double[] b, int ldb); - public void dlagtm(String trans, int n, int nrhs, double alpha, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] x, int _x_offset, int ldx, double beta, double[] b, int _b_offset, int ldb); + public void dlagtm(String trans, int n, int nrhs, double alpha, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] x, int offsetx, int ldx, double beta, double[] b, int offsetb, int ldb); public void dlagts(int job, int n, double[] a, double[] b, double[] c, double[] d, int[] in, double[] y, org.netlib.util.doubleW tol, org.netlib.util.intW info); - public void dlagts(int job, int n, double[] a, int _a_offset, double[] b, int _b_offset, double[] c, int _c_offset, double[] d, int _d_offset, int[] in, int _in_offset, double[] y, int _y_offset, org.netlib.util.doubleW tol, org.netlib.util.intW info); + public void dlagts(int job, int n, double[] a, int offseta, double[] b, int offsetb, double[] c, int offsetc, double[] d, int offsetd, int[] in, int offsetin, double[] y, int offsety, org.netlib.util.doubleW tol, org.netlib.util.intW info); public void dlagv2(double[] a, int lda, double[] b, int ldb, double[] alphar, double[] alphai, double[] beta, org.netlib.util.doubleW csl, org.netlib.util.doubleW snl, org.netlib.util.doubleW csr, org.netlib.util.doubleW snr); - public void dlagv2(double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, org.netlib.util.doubleW csl, org.netlib.util.doubleW snl, org.netlib.util.doubleW csr, org.netlib.util.doubleW snr); + public void dlagv2(double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, org.netlib.util.doubleW csl, org.netlib.util.doubleW snl, org.netlib.util.doubleW csr, org.netlib.util.doubleW snr); public void dlahqr(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int ldh, double[] wr, double[] wi, int iloz, int ihiz, double[] z, int ldz, org.netlib.util.intW info); - public void dlahqr(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, int iloz, int ihiz, double[] z, int _z_offset, int ldz, org.netlib.util.intW info); + public void dlahqr(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int offseth, int ldh, double[] wr, int offsetwr, double[] wi, int offsetwi, int iloz, int ihiz, double[] z, int offsetz, int ldz, org.netlib.util.intW info); public void dlahr2(int n, int k, int nb, double[] a, int lda, double[] tau, double[] t, int ldt, double[] y, int ldy); - public void dlahr2(int n, int k, int nb, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] t, int _t_offset, int ldt, double[] y, int _y_offset, int ldy); + public void dlahr2(int n, int k, int nb, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] t, int offsett, int ldt, double[] y, int offsety, int ldy); public void dlahrd(int n, int k, int nb, double[] a, int lda, double[] tau, double[] t, int ldt, double[] y, int ldy); - public void dlahrd(int n, int k, int nb, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] t, int _t_offset, int ldt, double[] y, int _y_offset, int ldy); + public void dlahrd(int n, int k, int nb, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] t, int offsett, int ldt, double[] y, int offsety, int ldy); public void dlaic1(int job, int j, double[] x, double sest, double[] w, double gamma, org.netlib.util.doubleW sestpr, org.netlib.util.doubleW s, org.netlib.util.doubleW c); - public void dlaic1(int job, int j, double[] x, int _x_offset, double sest, double[] w, int _w_offset, double gamma, org.netlib.util.doubleW sestpr, org.netlib.util.doubleW s, org.netlib.util.doubleW c); + public void dlaic1(int job, int j, double[] x, int offsetx, double sest, double[] w, int offsetw, double gamma, org.netlib.util.doubleW sestpr, org.netlib.util.doubleW s, org.netlib.util.doubleW c); public boolean dlaisnan(double din1, double din2); public void dlaln2(boolean ltrans, int na, int nw, double smin, double ca, double[] a, int lda, double d1, double d2, double[] b, int ldb, double wr, double wi, double[] x, int ldx, org.netlib.util.doubleW scale, org.netlib.util.doubleW xnorm, org.netlib.util.intW info); - public void dlaln2(boolean ltrans, int na, int nw, double smin, double ca, double[] a, int _a_offset, int lda, double d1, double d2, double[] b, int _b_offset, int ldb, double wr, double wi, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW scale, org.netlib.util.doubleW xnorm, org.netlib.util.intW info); + public void dlaln2(boolean ltrans, int na, int nw, double smin, double ca, double[] a, int offseta, int lda, double d1, double d2, double[] b, int offsetb, int ldb, double wr, double wi, double[] x, int offsetx, int ldx, org.netlib.util.doubleW scale, org.netlib.util.doubleW xnorm, org.netlib.util.intW info); public void dlals0(int icompq, int nl, int nr, int sqre, int nrhs, double[] b, int ldb, double[] bx, int ldbx, int[] perm, int givptr, int[] givcol, int ldgcol, double[] givnum, int ldgnum, double[] poles, double[] difl, double[] difr, double[] z, int k, double c, double s, double[] work, org.netlib.util.intW info); - public void dlals0(int icompq, int nl, int nr, int sqre, int nrhs, double[] b, int _b_offset, int ldb, double[] bx, int _bx_offset, int ldbx, int[] perm, int _perm_offset, int givptr, int[] givcol, int _givcol_offset, int ldgcol, double[] givnum, int _givnum_offset, int ldgnum, double[] poles, int _poles_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, double[] z, int _z_offset, int k, double c, double s, double[] work, int _work_offset, org.netlib.util.intW info); + public void dlals0(int icompq, int nl, int nr, int sqre, int nrhs, double[] b, int offsetb, int ldb, double[] bx, int offsetbx, int ldbx, int[] perm, int offsetperm, int givptr, int[] givcol, int offsetgivcol, int ldgcol, double[] givnum, int offsetgivnum, int ldgnum, double[] poles, int offsetpoles, double[] difl, int offsetdifl, double[] difr, int offsetdifr, double[] z, int offsetz, int k, double c, double s, double[] work, int offsetwork, org.netlib.util.intW info); public void dlalsa(int icompq, int smlsiz, int n, int nrhs, double[] b, int ldb, double[] bx, int ldbx, double[] u, int ldu, double[] vt, int[] k, double[] difl, double[] difr, double[] z, double[] poles, int[] givptr, int[] givcol, int ldgcol, int[] perm, double[] givnum, double[] c, double[] s, double[] work, int[] iwork, org.netlib.util.intW info); - public void dlalsa(int icompq, int smlsiz, int n, int nrhs, double[] b, int _b_offset, int ldb, double[] bx, int _bx_offset, int ldbx, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int[] k, int _k_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, double[] z, int _z_offset, double[] poles, int _poles_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, int ldgcol, int[] perm, int _perm_offset, double[] givnum, int _givnum_offset, double[] c, int _c_offset, double[] s, int _s_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dlalsa(int icompq, int smlsiz, int n, int nrhs, double[] b, int offsetb, int ldb, double[] bx, int offsetbx, int ldbx, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int[] k, int offsetk, double[] difl, int offsetdifl, double[] difr, int offsetdifr, double[] z, int offsetz, double[] poles, int offsetpoles, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, int ldgcol, int[] perm, int offsetperm, double[] givnum, int offsetgivnum, double[] c, int offsetc, double[] s, int offsets, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dlalsd(String uplo, int smlsiz, int n, int nrhs, double[] d, double[] e, double[] b, int ldb, double rcond, org.netlib.util.intW rank, double[] work, int[] iwork, org.netlib.util.intW info); - public void dlalsd(String uplo, int smlsiz, int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] b, int _b_offset, int ldb, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dlalsd(String uplo, int smlsiz, int n, int nrhs, double[] d, int offsetd, double[] e, int offsete, double[] b, int offsetb, int ldb, double rcond, org.netlib.util.intW rank, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dlamrg(int n1, int n2, double[] a, int dtrd1, int dtrd2, int[] index); - public void dlamrg(int n1, int n2, double[] a, int _a_offset, int dtrd1, int dtrd2, int[] index, int _index_offset); + public void dlamrg(int n1, int n2, double[] a, int offseta, int dtrd1, int dtrd2, int[] index, int offsetindex); public int dlaneg(int n, double[] d, double[] lld, double sigma, double pivmin, int r); - public int dlaneg(int n, double[] d, int _d_offset, double[] lld, int _lld_offset, double sigma, double pivmin, int r); + public int dlaneg(int n, double[] d, int offsetd, double[] lld, int offsetlld, double sigma, double pivmin, int r); public double dlangb(String norm, int n, int kl, int ku, double[] ab, int ldab, double[] work); - public double dlangb(String norm, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, double[] work, int _work_offset); + public double dlangb(String norm, int n, int kl, int ku, double[] ab, int offsetab, int ldab, double[] work, int offsetwork); public double dlange(String norm, int m, int n, double[] a, int lda, double[] work); - public double dlange(String norm, int m, int n, double[] a, int _a_offset, int lda, double[] work, int _work_offset); + public double dlange(String norm, int m, int n, double[] a, int offseta, int lda, double[] work, int offsetwork); public double dlangt(String norm, int n, double[] dl, double[] d, double[] du); - public double dlangt(String norm, int n, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset); + public double dlangt(String norm, int n, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu); public double dlanhs(String norm, int n, double[] a, int lda, double[] work); - public double dlanhs(String norm, int n, double[] a, int _a_offset, int lda, double[] work, int _work_offset); + public double dlanhs(String norm, int n, double[] a, int offseta, int lda, double[] work, int offsetwork); public double dlansb(String norm, String uplo, int n, int k, double[] ab, int ldab, double[] work); - public double dlansb(String norm, String uplo, int n, int k, double[] ab, int _ab_offset, int ldab, double[] work, int _work_offset); + public double dlansb(String norm, String uplo, int n, int k, double[] ab, int offsetab, int ldab, double[] work, int offsetwork); public double dlansp(String norm, String uplo, int n, double[] ap, double[] work); - public double dlansp(String norm, String uplo, int n, double[] ap, int _ap_offset, double[] work, int _work_offset); + public double dlansp(String norm, String uplo, int n, double[] ap, int offsetap, double[] work, int offsetwork); public double dlanst(String norm, int n, double[] d, double[] e); - public double dlanst(String norm, int n, double[] d, int _d_offset, double[] e, int _e_offset); + public double dlanst(String norm, int n, double[] d, int offsetd, double[] e, int offsete); public double dlansy(String norm, String uplo, int n, double[] a, int lda, double[] work); - public double dlansy(String norm, String uplo, int n, double[] a, int _a_offset, int lda, double[] work, int _work_offset); + public double dlansy(String norm, String uplo, int n, double[] a, int offseta, int lda, double[] work, int offsetwork); public double dlantb(String norm, String uplo, String diag, int n, int k, double[] ab, int ldab, double[] work); - public double dlantb(String norm, String uplo, String diag, int n, int k, double[] ab, int _ab_offset, int ldab, double[] work, int _work_offset); + public double dlantb(String norm, String uplo, String diag, int n, int k, double[] ab, int offsetab, int ldab, double[] work, int offsetwork); public double dlantp(String norm, String uplo, String diag, int n, double[] ap, double[] work); - public double dlantp(String norm, String uplo, String diag, int n, double[] ap, int _ap_offset, double[] work, int _work_offset); + public double dlantp(String norm, String uplo, String diag, int n, double[] ap, int offsetap, double[] work, int offsetwork); public double dlantr(String norm, String uplo, String diag, int m, int n, double[] a, int lda, double[] work); - public double dlantr(String norm, String uplo, String diag, int m, int n, double[] a, int _a_offset, int lda, double[] work, int _work_offset); + public double dlantr(String norm, String uplo, String diag, int m, int n, double[] a, int offseta, int lda, double[] work, int offsetwork); public void dlanv2(org.netlib.util.doubleW a, org.netlib.util.doubleW b, org.netlib.util.doubleW c, org.netlib.util.doubleW d, org.netlib.util.doubleW rt1r, org.netlib.util.doubleW rt1i, org.netlib.util.doubleW rt2r, org.netlib.util.doubleW rt2i, org.netlib.util.doubleW cs, org.netlib.util.doubleW sn); public void dlapll(int n, double[] x, int incx, double[] y, int incy, org.netlib.util.doubleW ssmin); - public void dlapll(int n, double[] x, int _x_offset, int incx, double[] y, int _y_offset, int incy, org.netlib.util.doubleW ssmin); + public void dlapll(int n, double[] x, int offsetx, int incx, double[] y, int offsety, int incy, org.netlib.util.doubleW ssmin); public void dlapmt(boolean forwrd, int m, int n, double[] x, int ldx, int[] k); - public void dlapmt(boolean forwrd, int m, int n, double[] x, int _x_offset, int ldx, int[] k, int _k_offset); + public void dlapmt(boolean forwrd, int m, int n, double[] x, int offsetx, int ldx, int[] k, int offsetk); public double dlapy2(double x, double y); public double dlapy3(double x, double y, double z); public void dlaqgb(int m, int n, int kl, int ku, double[] ab, int ldab, double[] r, double[] c, double rowcnd, double colcnd, double amax, org.netlib.util.StringW equed); - public void dlaqgb(int m, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, double[] r, int _r_offset, double[] c, int _c_offset, double rowcnd, double colcnd, double amax, org.netlib.util.StringW equed); + public void dlaqgb(int m, int n, int kl, int ku, double[] ab, int offsetab, int ldab, double[] r, int offsetr, double[] c, int offsetc, double rowcnd, double colcnd, double amax, org.netlib.util.StringW equed); public void dlaqge(int m, int n, double[] a, int lda, double[] r, double[] c, double rowcnd, double colcnd, double amax, org.netlib.util.StringW equed); - public void dlaqge(int m, int n, double[] a, int _a_offset, int lda, double[] r, int _r_offset, double[] c, int _c_offset, double rowcnd, double colcnd, double amax, org.netlib.util.StringW equed); + public void dlaqge(int m, int n, double[] a, int offseta, int lda, double[] r, int offsetr, double[] c, int offsetc, double rowcnd, double colcnd, double amax, org.netlib.util.StringW equed); public void dlaqp2(int m, int n, int offset, double[] a, int lda, int[] jpvt, double[] tau, double[] vn1, double[] vn2, double[] work); - public void dlaqp2(int m, int n, int offset, double[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, double[] tau, int _tau_offset, double[] vn1, int _vn1_offset, double[] vn2, int _vn2_offset, double[] work, int _work_offset); + public void dlaqp2(int m, int n, int offset, double[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, double[] tau, int offsettau, double[] vn1, int offsetvn1, double[] vn2, int offsetvn2, double[] work, int offsetwork); public void dlaqps(int m, int n, int offset, int nb, org.netlib.util.intW kb, double[] a, int lda, int[] jpvt, double[] tau, double[] vn1, double[] vn2, double[] auxv, double[] f, int ldf); - public void dlaqps(int m, int n, int offset, int nb, org.netlib.util.intW kb, double[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, double[] tau, int _tau_offset, double[] vn1, int _vn1_offset, double[] vn2, int _vn2_offset, double[] auxv, int _auxv_offset, double[] f, int _f_offset, int ldf); + public void dlaqps(int m, int n, int offset, int nb, org.netlib.util.intW kb, double[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, double[] tau, int offsettau, double[] vn1, int offsetvn1, double[] vn2, int offsetvn2, double[] auxv, int offsetauxv, double[] f, int offsetf, int ldf); public void dlaqr0(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int ldh, double[] wr, double[] wi, int iloz, int ihiz, double[] z, int ldz, double[] work, int lwork, org.netlib.util.intW info); - public void dlaqr0(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, int iloz, int ihiz, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dlaqr0(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int offseth, int ldh, double[] wr, int offsetwr, double[] wi, int offsetwi, int iloz, int ihiz, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dlaqr1(int n, double[] h, int ldh, double sr1, double si1, double sr2, double si2, double[] v); - public void dlaqr1(int n, double[] h, int _h_offset, int ldh, double sr1, double si1, double sr2, double si2, double[] v, int _v_offset); + public void dlaqr1(int n, double[] h, int offseth, int ldh, double sr1, double si1, double sr2, double si2, double[] v, int offsetv); public void dlaqr2(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, double[] h, int ldh, int iloz, int ihiz, double[] z, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, double[] sr, double[] si, double[] v, int ldv, int nh, double[] t, int ldt, int nv, double[] wv, int ldwv, double[] work, int lwork); - public void dlaqr2(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, double[] h, int _h_offset, int ldh, int iloz, int ihiz, double[] z, int _z_offset, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, double[] sr, int _sr_offset, double[] si, int _si_offset, double[] v, int _v_offset, int ldv, int nh, double[] t, int _t_offset, int ldt, int nv, double[] wv, int _wv_offset, int ldwv, double[] work, int _work_offset, int lwork); + public void dlaqr2(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, double[] h, int offseth, int ldh, int iloz, int ihiz, double[] z, int offsetz, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, double[] sr, int offsetsr, double[] si, int offsetsi, double[] v, int offsetv, int ldv, int nh, double[] t, int offsett, int ldt, int nv, double[] wv, int offsetwv, int ldwv, double[] work, int offsetwork, int lwork); public void dlaqr3(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, double[] h, int ldh, int iloz, int ihiz, double[] z, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, double[] sr, double[] si, double[] v, int ldv, int nh, double[] t, int ldt, int nv, double[] wv, int ldwv, double[] work, int lwork); - public void dlaqr3(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, double[] h, int _h_offset, int ldh, int iloz, int ihiz, double[] z, int _z_offset, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, double[] sr, int _sr_offset, double[] si, int _si_offset, double[] v, int _v_offset, int ldv, int nh, double[] t, int _t_offset, int ldt, int nv, double[] wv, int _wv_offset, int ldwv, double[] work, int _work_offset, int lwork); + public void dlaqr3(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, double[] h, int offseth, int ldh, int iloz, int ihiz, double[] z, int offsetz, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, double[] sr, int offsetsr, double[] si, int offsetsi, double[] v, int offsetv, int ldv, int nh, double[] t, int offsett, int ldt, int nv, double[] wv, int offsetwv, int ldwv, double[] work, int offsetwork, int lwork); public void dlaqr4(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int ldh, double[] wr, double[] wi, int iloz, int ihiz, double[] z, int ldz, double[] work, int lwork, org.netlib.util.intW info); - public void dlaqr4(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, int iloz, int ihiz, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dlaqr4(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int offseth, int ldh, double[] wr, int offsetwr, double[] wi, int offsetwi, int iloz, int ihiz, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dlaqr5(boolean wantt, boolean wantz, int kacc22, int n, int ktop, int kbot, int nshfts, double[] sr, double[] si, double[] h, int ldh, int iloz, int ihiz, double[] z, int ldz, double[] v, int ldv, double[] u, int ldu, int nv, double[] wv, int ldwv, int nh, double[] wh, int ldwh); - public void dlaqr5(boolean wantt, boolean wantz, int kacc22, int n, int ktop, int kbot, int nshfts, double[] sr, int _sr_offset, double[] si, int _si_offset, double[] h, int _h_offset, int ldh, int iloz, int ihiz, double[] z, int _z_offset, int ldz, double[] v, int _v_offset, int ldv, double[] u, int _u_offset, int ldu, int nv, double[] wv, int _wv_offset, int ldwv, int nh, double[] wh, int _wh_offset, int ldwh); + public void dlaqr5(boolean wantt, boolean wantz, int kacc22, int n, int ktop, int kbot, int nshfts, double[] sr, int offsetsr, double[] si, int offsetsi, double[] h, int offseth, int ldh, int iloz, int ihiz, double[] z, int offsetz, int ldz, double[] v, int offsetv, int ldv, double[] u, int offsetu, int ldu, int nv, double[] wv, int offsetwv, int ldwv, int nh, double[] wh, int offsetwh, int ldwh); public void dlaqsb(String uplo, int n, int kd, double[] ab, int ldab, double[] s, double scond, double amax, org.netlib.util.StringW equed); - public void dlaqsb(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] s, int _s_offset, double scond, double amax, org.netlib.util.StringW equed); + public void dlaqsb(String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double[] s, int offsets, double scond, double amax, org.netlib.util.StringW equed); public void dlaqsp(String uplo, int n, double[] ap, double[] s, double scond, double amax, org.netlib.util.StringW equed); - public void dlaqsp(String uplo, int n, double[] ap, int _ap_offset, double[] s, int _s_offset, double scond, double amax, org.netlib.util.StringW equed); + public void dlaqsp(String uplo, int n, double[] ap, int offsetap, double[] s, int offsets, double scond, double amax, org.netlib.util.StringW equed); public void dlaqsy(String uplo, int n, double[] a, int lda, double[] s, double scond, double amax, org.netlib.util.StringW equed); - public void dlaqsy(String uplo, int n, double[] a, int _a_offset, int lda, double[] s, int _s_offset, double scond, double amax, org.netlib.util.StringW equed); + public void dlaqsy(String uplo, int n, double[] a, int offseta, int lda, double[] s, int offsets, double scond, double amax, org.netlib.util.StringW equed); public void dlaqtr(boolean ltran, boolean lreal, int n, double[] t, int ldt, double[] b, double w, org.netlib.util.doubleW scale, double[] x, double[] work, org.netlib.util.intW info); - public void dlaqtr(boolean ltran, boolean lreal, int n, double[] t, int _t_offset, int ldt, double[] b, int _b_offset, double w, org.netlib.util.doubleW scale, double[] x, int _x_offset, double[] work, int _work_offset, org.netlib.util.intW info); + public void dlaqtr(boolean ltran, boolean lreal, int n, double[] t, int offsett, int ldt, double[] b, int offsetb, double w, org.netlib.util.doubleW scale, double[] x, int offsetx, double[] work, int offsetwork, org.netlib.util.intW info); public void dlar1v(int n, int b1, int bn, double lambda, double[] d, double[] l, double[] ld, double[] lld, double pivmin, double gaptol, double[] z, boolean wantnc, org.netlib.util.intW negcnt, org.netlib.util.doubleW ztz, org.netlib.util.doubleW mingma, org.netlib.util.intW r, int[] isuppz, org.netlib.util.doubleW nrminv, org.netlib.util.doubleW resid, org.netlib.util.doubleW rqcorr, double[] work); - public void dlar1v(int n, int b1, int bn, double lambda, double[] d, int _d_offset, double[] l, int _l_offset, double[] ld, int _ld_offset, double[] lld, int _lld_offset, double pivmin, double gaptol, double[] z, int _z_offset, boolean wantnc, org.netlib.util.intW negcnt, org.netlib.util.doubleW ztz, org.netlib.util.doubleW mingma, org.netlib.util.intW r, int[] isuppz, int _isuppz_offset, org.netlib.util.doubleW nrminv, org.netlib.util.doubleW resid, org.netlib.util.doubleW rqcorr, double[] work, int _work_offset); + public void dlar1v(int n, int b1, int bn, double lambda, double[] d, int offsetd, double[] l, int offsetl, double[] ld, int offsetld, double[] lld, int offsetlld, double pivmin, double gaptol, double[] z, int offsetz, boolean wantnc, org.netlib.util.intW negcnt, org.netlib.util.doubleW ztz, org.netlib.util.doubleW mingma, org.netlib.util.intW r, int[] isuppz, int offsetisuppz, org.netlib.util.doubleW nrminv, org.netlib.util.doubleW resid, org.netlib.util.doubleW rqcorr, double[] work, int offsetwork); public void dlar2v(int n, double[] x, double[] y, double[] z, int incx, double[] c, double[] s, int incc); - public void dlar2v(int n, double[] x, int _x_offset, double[] y, int _y_offset, double[] z, int _z_offset, int incx, double[] c, int _c_offset, double[] s, int _s_offset, int incc); + public void dlar2v(int n, double[] x, int offsetx, double[] y, int offsety, double[] z, int offsetz, int incx, double[] c, int offsetc, double[] s, int offsets, int incc); public void dlarf(String side, int m, int n, double[] v, int incv, double tau, double[] c, int Ldc, double[] work); - public void dlarf(String side, int m, int n, double[] v, int _v_offset, int incv, double tau, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset); + public void dlarf(String side, int m, int n, double[] v, int offsetv, int incv, double tau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork); public void dlarfb(String side, String trans, String direct, String storev, int m, int n, int k, double[] v, int ldv, double[] t, int ldt, double[] c, int Ldc, double[] work, int ldwork); - public void dlarfb(String side, String trans, String direct, String storev, int m, int n, int k, double[] v, int _v_offset, int ldv, double[] t, int _t_offset, int ldt, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int ldwork); + public void dlarfb(String side, String trans, String direct, String storev, int m, int n, int k, double[] v, int offsetv, int ldv, double[] t, int offsett, int ldt, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int ldwork); public void dlarfg(int n, org.netlib.util.doubleW alpha, double[] x, int incx, org.netlib.util.doubleW tau); - public void dlarfg(int n, org.netlib.util.doubleW alpha, double[] x, int _x_offset, int incx, org.netlib.util.doubleW tau); + public void dlarfg(int n, org.netlib.util.doubleW alpha, double[] x, int offsetx, int incx, org.netlib.util.doubleW tau); public void dlarft(String direct, String storev, int n, int k, double[] v, int ldv, double[] tau, double[] t, int ldt); - public void dlarft(String direct, String storev, int n, int k, double[] v, int _v_offset, int ldv, double[] tau, int _tau_offset, double[] t, int _t_offset, int ldt); + public void dlarft(String direct, String storev, int n, int k, double[] v, int offsetv, int ldv, double[] tau, int offsettau, double[] t, int offsett, int ldt); public void dlarfx(String side, int m, int n, double[] v, double tau, double[] c, int Ldc, double[] work); - public void dlarfx(String side, int m, int n, double[] v, int _v_offset, double tau, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset); + public void dlarfx(String side, int m, int n, double[] v, int offsetv, double tau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork); public void dlargv(int n, double[] x, int incx, double[] y, int incy, double[] c, int incc); - public void dlargv(int n, double[] x, int _x_offset, int incx, double[] y, int _y_offset, int incy, double[] c, int _c_offset, int incc); + public void dlargv(int n, double[] x, int offsetx, int incx, double[] y, int offsety, int incy, double[] c, int offsetc, int incc); public void dlarnv(int idist, int[] iseed, int n, double[] x); - public void dlarnv(int idist, int[] iseed, int _iseed_offset, int n, double[] x, int _x_offset); + public void dlarnv(int idist, int[] iseed, int offsetiseed, int n, double[] x, int offsetx); public void dlarra(int n, double[] d, double[] e, double[] e2, double spltol, double tnrm, org.netlib.util.intW nsplit, int[] isplit, org.netlib.util.intW info); - public void dlarra(int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] e2, int _e2_offset, double spltol, double tnrm, org.netlib.util.intW nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW info); + public void dlarra(int n, double[] d, int offsetd, double[] e, int offsete, double[] e2, int offsete2, double spltol, double tnrm, org.netlib.util.intW nsplit, int[] isplit, int offsetisplit, org.netlib.util.intW info); public void dlarrb(int n, double[] d, double[] lld, int ifirst, int ilast, double rtol1, double rtol2, int offset, double[] w, double[] wgap, double[] werr, double[] work, int[] iwork, double pivmin, double spdiam, int twist, org.netlib.util.intW info); - public void dlarrb(int n, double[] d, int _d_offset, double[] lld, int _lld_offset, int ifirst, int ilast, double rtol1, double rtol2, int offset, double[] w, int _w_offset, double[] wgap, int _wgap_offset, double[] werr, int _werr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, double pivmin, double spdiam, int twist, org.netlib.util.intW info); + public void dlarrb(int n, double[] d, int offsetd, double[] lld, int offsetlld, int ifirst, int ilast, double rtol1, double rtol2, int offset, double[] w, int offsetw, double[] wgap, int offsetwgap, double[] werr, int offsetwerr, double[] work, int offsetwork, int[] iwork, int offsetiwork, double pivmin, double spdiam, int twist, org.netlib.util.intW info); public void dlarrc(String jobt, int n, double vl, double vu, double[] d, double[] e, double pivmin, org.netlib.util.intW eigcnt, org.netlib.util.intW lcnt, org.netlib.util.intW rcnt, org.netlib.util.intW info); - public void dlarrc(String jobt, int n, double vl, double vu, double[] d, int _d_offset, double[] e, int _e_offset, double pivmin, org.netlib.util.intW eigcnt, org.netlib.util.intW lcnt, org.netlib.util.intW rcnt, org.netlib.util.intW info); + public void dlarrc(String jobt, int n, double vl, double vu, double[] d, int offsetd, double[] e, int offsete, double pivmin, org.netlib.util.intW eigcnt, org.netlib.util.intW lcnt, org.netlib.util.intW rcnt, org.netlib.util.intW info); public void dlarrd(String range, String order, int n, double vl, double vu, int il, int iu, double[] gers, double reltol, double[] d, double[] e, double[] e2, double pivmin, int nsplit, int[] isplit, org.netlib.util.intW m, double[] w, double[] werr, org.netlib.util.doubleW wl, org.netlib.util.doubleW wu, int[] iblock, int[] indexw, double[] work, int[] iwork, org.netlib.util.intW info); - public void dlarrd(String range, String order, int n, double vl, double vu, int il, int iu, double[] gers, int _gers_offset, double reltol, double[] d, int _d_offset, double[] e, int _e_offset, double[] e2, int _e2_offset, double pivmin, int nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW m, double[] w, int _w_offset, double[] werr, int _werr_offset, org.netlib.util.doubleW wl, org.netlib.util.doubleW wu, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dlarrd(String range, String order, int n, double vl, double vu, int il, int iu, double[] gers, int offsetgers, double reltol, double[] d, int offsetd, double[] e, int offsete, double[] e2, int offsete2, double pivmin, int nsplit, int[] isplit, int offsetisplit, org.netlib.util.intW m, double[] w, int offsetw, double[] werr, int offsetwerr, org.netlib.util.doubleW wl, org.netlib.util.doubleW wu, int[] iblock, int offsetiblock, int[] indexw, int offsetindexw, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dlarre(String range, int n, org.netlib.util.doubleW vl, org.netlib.util.doubleW vu, int il, int iu, double[] d, double[] e, double[] e2, double rtol1, double rtol2, double spltol, org.netlib.util.intW nsplit, int[] isplit, org.netlib.util.intW m, double[] w, double[] werr, double[] wgap, int[] iblock, int[] indexw, double[] gers, org.netlib.util.doubleW pivmin, double[] work, int[] iwork, org.netlib.util.intW info); - public void dlarre(String range, int n, org.netlib.util.doubleW vl, org.netlib.util.doubleW vu, int il, int iu, double[] d, int _d_offset, double[] e, int _e_offset, double[] e2, int _e2_offset, double rtol1, double rtol2, double spltol, org.netlib.util.intW nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW m, double[] w, int _w_offset, double[] werr, int _werr_offset, double[] wgap, int _wgap_offset, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, double[] gers, int _gers_offset, org.netlib.util.doubleW pivmin, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dlarre(String range, int n, org.netlib.util.doubleW vl, org.netlib.util.doubleW vu, int il, int iu, double[] d, int offsetd, double[] e, int offsete, double[] e2, int offsete2, double rtol1, double rtol2, double spltol, org.netlib.util.intW nsplit, int[] isplit, int offsetisplit, org.netlib.util.intW m, double[] w, int offsetw, double[] werr, int offsetwerr, double[] wgap, int offsetwgap, int[] iblock, int offsetiblock, int[] indexw, int offsetindexw, double[] gers, int offsetgers, org.netlib.util.doubleW pivmin, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dlarrf(int n, double[] d, double[] l, double[] ld, int clstrt, int clend, double[] w, double[] wgap, double[] werr, double spdiam, double clgapl, double clgapr, double pivmin, org.netlib.util.doubleW sigma, double[] dplus, double[] lplus, double[] work, org.netlib.util.intW info); - public void dlarrf(int n, double[] d, int _d_offset, double[] l, int _l_offset, double[] ld, int _ld_offset, int clstrt, int clend, double[] w, int _w_offset, double[] wgap, int _wgap_offset, double[] werr, int _werr_offset, double spdiam, double clgapl, double clgapr, double pivmin, org.netlib.util.doubleW sigma, double[] dplus, int _dplus_offset, double[] lplus, int _lplus_offset, double[] work, int _work_offset, org.netlib.util.intW info); + public void dlarrf(int n, double[] d, int offsetd, double[] l, int offsetl, double[] ld, int offsetld, int clstrt, int clend, double[] w, int offsetw, double[] wgap, int offsetwgap, double[] werr, int offsetwerr, double spdiam, double clgapl, double clgapr, double pivmin, org.netlib.util.doubleW sigma, double[] dplus, int offsetdplus, double[] lplus, int offsetlplus, double[] work, int offsetwork, org.netlib.util.intW info); public void dlarrj(int n, double[] d, double[] e2, int ifirst, int ilast, double rtol, int offset, double[] w, double[] werr, double[] work, int[] iwork, double pivmin, double spdiam, org.netlib.util.intW info); - public void dlarrj(int n, double[] d, int _d_offset, double[] e2, int _e2_offset, int ifirst, int ilast, double rtol, int offset, double[] w, int _w_offset, double[] werr, int _werr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, double pivmin, double spdiam, org.netlib.util.intW info); + public void dlarrj(int n, double[] d, int offsetd, double[] e2, int offsete2, int ifirst, int ilast, double rtol, int offset, double[] w, int offsetw, double[] werr, int offsetwerr, double[] work, int offsetwork, int[] iwork, int offsetiwork, double pivmin, double spdiam, org.netlib.util.intW info); public void dlarrk(int n, int iw, double gl, double gu, double[] d, double[] e2, double pivmin, double reltol, org.netlib.util.doubleW w, org.netlib.util.doubleW werr, org.netlib.util.intW info); - public void dlarrk(int n, int iw, double gl, double gu, double[] d, int _d_offset, double[] e2, int _e2_offset, double pivmin, double reltol, org.netlib.util.doubleW w, org.netlib.util.doubleW werr, org.netlib.util.intW info); + public void dlarrk(int n, int iw, double gl, double gu, double[] d, int offsetd, double[] e2, int offsete2, double pivmin, double reltol, org.netlib.util.doubleW w, org.netlib.util.doubleW werr, org.netlib.util.intW info); public void dlarrr(int n, double[] d, double[] e, org.netlib.util.intW info); - public void dlarrr(int n, double[] d, int _d_offset, double[] e, int _e_offset, org.netlib.util.intW info); + public void dlarrr(int n, double[] d, int offsetd, double[] e, int offsete, org.netlib.util.intW info); public void dlarrv(int n, double vl, double vu, double[] d, double[] l, double pivmin, int[] isplit, int m, int dol, int dou, double minrgp, org.netlib.util.doubleW rtol1, org.netlib.util.doubleW rtol2, double[] w, double[] werr, double[] wgap, int[] iblock, int[] indexw, double[] gers, double[] z, int ldz, int[] isuppz, double[] work, int[] iwork, org.netlib.util.intW info); - public void dlarrv(int n, double vl, double vu, double[] d, int _d_offset, double[] l, int _l_offset, double pivmin, int[] isplit, int _isplit_offset, int m, int dol, int dou, double minrgp, org.netlib.util.doubleW rtol1, org.netlib.util.doubleW rtol2, double[] w, int _w_offset, double[] werr, int _werr_offset, double[] wgap, int _wgap_offset, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, double[] gers, int _gers_offset, double[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dlarrv(int n, double vl, double vu, double[] d, int offsetd, double[] l, int offsetl, double pivmin, int[] isplit, int offsetisplit, int m, int dol, int dou, double minrgp, org.netlib.util.doubleW rtol1, org.netlib.util.doubleW rtol2, double[] w, int offsetw, double[] werr, int offsetwerr, double[] wgap, int offsetwgap, int[] iblock, int offsetiblock, int[] indexw, int offsetindexw, double[] gers, int offsetgers, double[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dlartg(double f, double g, org.netlib.util.doubleW cs, org.netlib.util.doubleW sn, org.netlib.util.doubleW r); public void dlartv(int n, double[] x, int incx, double[] y, int incy, double[] c, double[] s, int incc); - public void dlartv(int n, double[] x, int _x_offset, int incx, double[] y, int _y_offset, int incy, double[] c, int _c_offset, double[] s, int _s_offset, int incc); + public void dlartv(int n, double[] x, int offsetx, int incx, double[] y, int offsety, int incy, double[] c, int offsetc, double[] s, int offsets, int incc); public void dlaruv(int[] iseed, int n, double[] x); - public void dlaruv(int[] iseed, int _iseed_offset, int n, double[] x, int _x_offset); + public void dlaruv(int[] iseed, int offsetiseed, int n, double[] x, int offsetx); public void dlarz(String side, int m, int n, int l, double[] v, int incv, double tau, double[] c, int Ldc, double[] work); - public void dlarz(String side, int m, int n, int l, double[] v, int _v_offset, int incv, double tau, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset); + public void dlarz(String side, int m, int n, int l, double[] v, int offsetv, int incv, double tau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork); public void dlarzb(String side, String trans, String direct, String storev, int m, int n, int k, int l, double[] v, int ldv, double[] t, int ldt, double[] c, int Ldc, double[] work, int ldwork); - public void dlarzb(String side, String trans, String direct, String storev, int m, int n, int k, int l, double[] v, int _v_offset, int ldv, double[] t, int _t_offset, int ldt, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int ldwork); + public void dlarzb(String side, String trans, String direct, String storev, int m, int n, int k, int l, double[] v, int offsetv, int ldv, double[] t, int offsett, int ldt, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int ldwork); public void dlarzt(String direct, String storev, int n, int k, double[] v, int ldv, double[] tau, double[] t, int ldt); - public void dlarzt(String direct, String storev, int n, int k, double[] v, int _v_offset, int ldv, double[] tau, int _tau_offset, double[] t, int _t_offset, int ldt); + public void dlarzt(String direct, String storev, int n, int k, double[] v, int offsetv, int ldv, double[] tau, int offsettau, double[] t, int offsett, int ldt); public void dlas2(double f, double g, double h, org.netlib.util.doubleW ssmin, org.netlib.util.doubleW ssmax); public void dlascl(String type, int kl, int ku, double cfrom, double cto, int m, int n, double[] a, int lda, org.netlib.util.intW info); - public void dlascl(String type, int kl, int ku, double cfrom, double cto, int m, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + public void dlascl(String type, int kl, int ku, double cfrom, double cto, int m, int n, double[] a, int offseta, int lda, org.netlib.util.intW info); public void dlasd0(int n, int sqre, double[] d, double[] e, double[] u, int ldu, double[] vt, int ldvt, int smlsiz, int[] iwork, double[] work, org.netlib.util.intW info); - public void dlasd0(int n, int sqre, double[] d, int _d_offset, double[] e, int _e_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, int smlsiz, int[] iwork, int _iwork_offset, double[] work, int _work_offset, org.netlib.util.intW info); + public void dlasd0(int n, int sqre, double[] d, int offsetd, double[] e, int offsete, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int ldvt, int smlsiz, int[] iwork, int offsetiwork, double[] work, int offsetwork, org.netlib.util.intW info); public void dlasd1(int nl, int nr, int sqre, double[] d, org.netlib.util.doubleW alpha, org.netlib.util.doubleW beta, double[] u, int ldu, double[] vt, int ldvt, int[] idxq, int[] iwork, double[] work, org.netlib.util.intW info); - public void dlasd1(int nl, int nr, int sqre, double[] d, int _d_offset, org.netlib.util.doubleW alpha, org.netlib.util.doubleW beta, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, int[] idxq, int _idxq_offset, int[] iwork, int _iwork_offset, double[] work, int _work_offset, org.netlib.util.intW info); + public void dlasd1(int nl, int nr, int sqre, double[] d, int offsetd, org.netlib.util.doubleW alpha, org.netlib.util.doubleW beta, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int ldvt, int[] idxq, int offsetidxq, int[] iwork, int offsetiwork, double[] work, int offsetwork, org.netlib.util.intW info); public void dlasd2(int nl, int nr, int sqre, org.netlib.util.intW k, double[] d, double[] z, double alpha, double beta, double[] u, int ldu, double[] vt, int ldvt, double[] dsigma, double[] u2, int ldu2, double[] vt2, int ldvt2, int[] idxp, int[] idx, int[] idxc, int[] idxq, int[] coltyp, org.netlib.util.intW info); - public void dlasd2(int nl, int nr, int sqre, org.netlib.util.intW k, double[] d, int _d_offset, double[] z, int _z_offset, double alpha, double beta, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, double[] dsigma, int _dsigma_offset, double[] u2, int _u2_offset, int ldu2, double[] vt2, int _vt2_offset, int ldvt2, int[] idxp, int _idxp_offset, int[] idx, int _idx_offset, int[] idxc, int _idxc_offset, int[] idxq, int _idxq_offset, int[] coltyp, int _coltyp_offset, org.netlib.util.intW info); + public void dlasd2(int nl, int nr, int sqre, org.netlib.util.intW k, double[] d, int offsetd, double[] z, int offsetz, double alpha, double beta, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int ldvt, double[] dsigma, int offsetdsigma, double[] u2, int offsetu2, int ldu2, double[] vt2, int offsetvt2, int ldvt2, int[] idxp, int offsetidxp, int[] idx, int offsetidx, int[] idxc, int offsetidxc, int[] idxq, int offsetidxq, int[] coltyp, int offsetcoltyp, org.netlib.util.intW info); public void dlasd3(int nl, int nr, int sqre, int k, double[] d, double[] q, int ldq, double[] dsigma, double[] u, int ldu, double[] u2, int ldu2, double[] vt, int ldvt, double[] vt2, int ldvt2, int[] idxc, int[] ctot, double[] z, org.netlib.util.intW info); - public void dlasd3(int nl, int nr, int sqre, int k, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, double[] dsigma, int _dsigma_offset, double[] u, int _u_offset, int ldu, double[] u2, int _u2_offset, int ldu2, double[] vt, int _vt_offset, int ldvt, double[] vt2, int _vt2_offset, int ldvt2, int[] idxc, int _idxc_offset, int[] ctot, int _ctot_offset, double[] z, int _z_offset, org.netlib.util.intW info); + public void dlasd3(int nl, int nr, int sqre, int k, double[] d, int offsetd, double[] q, int offsetq, int ldq, double[] dsigma, int offsetdsigma, double[] u, int offsetu, int ldu, double[] u2, int offsetu2, int ldu2, double[] vt, int offsetvt, int ldvt, double[] vt2, int offsetvt2, int ldvt2, int[] idxc, int offsetidxc, int[] ctot, int offsetctot, double[] z, int offsetz, org.netlib.util.intW info); public void dlasd4(int n, int i, double[] d, double[] z, double[] delta, double rho, org.netlib.util.doubleW sigma, double[] work, org.netlib.util.intW info); - public void dlasd4(int n, int i, double[] d, int _d_offset, double[] z, int _z_offset, double[] delta, int _delta_offset, double rho, org.netlib.util.doubleW sigma, double[] work, int _work_offset, org.netlib.util.intW info); + public void dlasd4(int n, int i, double[] d, int offsetd, double[] z, int offsetz, double[] delta, int offsetdelta, double rho, org.netlib.util.doubleW sigma, double[] work, int offsetwork, org.netlib.util.intW info); public void dlasd5(int i, double[] d, double[] z, double[] delta, double rho, org.netlib.util.doubleW dsigma, double[] work); - public void dlasd5(int i, double[] d, int _d_offset, double[] z, int _z_offset, double[] delta, int _delta_offset, double rho, org.netlib.util.doubleW dsigma, double[] work, int _work_offset); + public void dlasd5(int i, double[] d, int offsetd, double[] z, int offsetz, double[] delta, int offsetdelta, double rho, org.netlib.util.doubleW dsigma, double[] work, int offsetwork); public void dlasd6(int icompq, int nl, int nr, int sqre, double[] d, double[] vf, double[] vl, org.netlib.util.doubleW alpha, org.netlib.util.doubleW beta, int[] idxq, int[] perm, org.netlib.util.intW givptr, int[] givcol, int ldgcol, double[] givnum, int ldgnum, double[] poles, double[] difl, double[] difr, double[] z, org.netlib.util.intW k, org.netlib.util.doubleW c, org.netlib.util.doubleW s, double[] work, int[] iwork, org.netlib.util.intW info); - public void dlasd6(int icompq, int nl, int nr, int sqre, double[] d, int _d_offset, double[] vf, int _vf_offset, double[] vl, int _vl_offset, org.netlib.util.doubleW alpha, org.netlib.util.doubleW beta, int[] idxq, int _idxq_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, int ldgcol, double[] givnum, int _givnum_offset, int ldgnum, double[] poles, int _poles_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, double[] z, int _z_offset, org.netlib.util.intW k, org.netlib.util.doubleW c, org.netlib.util.doubleW s, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dlasd6(int icompq, int nl, int nr, int sqre, double[] d, int offsetd, double[] vf, int offsetvf, double[] vl, int offsetvl, org.netlib.util.doubleW alpha, org.netlib.util.doubleW beta, int[] idxq, int offsetidxq, int[] perm, int offsetperm, org.netlib.util.intW givptr, int[] givcol, int offsetgivcol, int ldgcol, double[] givnum, int offsetgivnum, int ldgnum, double[] poles, int offsetpoles, double[] difl, int offsetdifl, double[] difr, int offsetdifr, double[] z, int offsetz, org.netlib.util.intW k, org.netlib.util.doubleW c, org.netlib.util.doubleW s, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dlasd7(int icompq, int nl, int nr, int sqre, org.netlib.util.intW k, double[] d, double[] z, double[] zw, double[] vf, double[] vfw, double[] vl, double[] vlw, double alpha, double beta, double[] dsigma, int[] idx, int[] idxp, int[] idxq, int[] perm, org.netlib.util.intW givptr, int[] givcol, int ldgcol, double[] givnum, int ldgnum, org.netlib.util.doubleW c, org.netlib.util.doubleW s, org.netlib.util.intW info); - public void dlasd7(int icompq, int nl, int nr, int sqre, org.netlib.util.intW k, double[] d, int _d_offset, double[] z, int _z_offset, double[] zw, int _zw_offset, double[] vf, int _vf_offset, double[] vfw, int _vfw_offset, double[] vl, int _vl_offset, double[] vlw, int _vlw_offset, double alpha, double beta, double[] dsigma, int _dsigma_offset, int[] idx, int _idx_offset, int[] idxp, int _idxp_offset, int[] idxq, int _idxq_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, int ldgcol, double[] givnum, int _givnum_offset, int ldgnum, org.netlib.util.doubleW c, org.netlib.util.doubleW s, org.netlib.util.intW info); + public void dlasd7(int icompq, int nl, int nr, int sqre, org.netlib.util.intW k, double[] d, int offsetd, double[] z, int offsetz, double[] zw, int offsetzw, double[] vf, int offsetvf, double[] vfw, int offsetvfw, double[] vl, int offsetvl, double[] vlw, int offsetvlw, double alpha, double beta, double[] dsigma, int offsetdsigma, int[] idx, int offsetidx, int[] idxp, int offsetidxp, int[] idxq, int offsetidxq, int[] perm, int offsetperm, org.netlib.util.intW givptr, int[] givcol, int offsetgivcol, int ldgcol, double[] givnum, int offsetgivnum, int ldgnum, org.netlib.util.doubleW c, org.netlib.util.doubleW s, org.netlib.util.intW info); public void dlasd8(int icompq, int k, double[] d, double[] z, double[] vf, double[] vl, double[] difl, double[] difr, int lddifr, double[] dsigma, double[] work, org.netlib.util.intW info); - public void dlasd8(int icompq, int k, double[] d, int _d_offset, double[] z, int _z_offset, double[] vf, int _vf_offset, double[] vl, int _vl_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, int lddifr, double[] dsigma, int _dsigma_offset, double[] work, int _work_offset, org.netlib.util.intW info); + public void dlasd8(int icompq, int k, double[] d, int offsetd, double[] z, int offsetz, double[] vf, int offsetvf, double[] vl, int offsetvl, double[] difl, int offsetdifl, double[] difr, int offsetdifr, int lddifr, double[] dsigma, int offsetdsigma, double[] work, int offsetwork, org.netlib.util.intW info); public void dlasda(int icompq, int smlsiz, int n, int sqre, double[] d, double[] e, double[] u, int ldu, double[] vt, int[] k, double[] difl, double[] difr, double[] z, double[] poles, int[] givptr, int[] givcol, int ldgcol, int[] perm, double[] givnum, double[] c, double[] s, double[] work, int[] iwork, org.netlib.util.intW info); - public void dlasda(int icompq, int smlsiz, int n, int sqre, double[] d, int _d_offset, double[] e, int _e_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int[] k, int _k_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, double[] z, int _z_offset, double[] poles, int _poles_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, int ldgcol, int[] perm, int _perm_offset, double[] givnum, int _givnum_offset, double[] c, int _c_offset, double[] s, int _s_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dlasda(int icompq, int smlsiz, int n, int sqre, double[] d, int offsetd, double[] e, int offsete, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int[] k, int offsetk, double[] difl, int offsetdifl, double[] difr, int offsetdifr, double[] z, int offsetz, double[] poles, int offsetpoles, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, int ldgcol, int[] perm, int offsetperm, double[] givnum, int offsetgivnum, double[] c, int offsetc, double[] s, int offsets, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dlasdq(String uplo, int sqre, int n, int ncvt, int nru, int ncc, double[] d, double[] e, double[] vt, int ldvt, double[] u, int ldu, double[] c, int Ldc, double[] work, org.netlib.util.intW info); - public void dlasdq(String uplo, int sqre, int n, int ncvt, int nru, int ncc, double[] d, int _d_offset, double[] e, int _e_offset, double[] vt, int _vt_offset, int ldvt, double[] u, int _u_offset, int ldu, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + public void dlasdq(String uplo, int sqre, int n, int ncvt, int nru, int ncc, double[] d, int offsetd, double[] e, int offsete, double[] vt, int offsetvt, int ldvt, double[] u, int offsetu, int ldu, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info); public void dlasdt(int n, org.netlib.util.intW lvl, org.netlib.util.intW nd, int[] inode, int[] ndiml, int[] ndimr, int msub); - public void dlasdt(int n, org.netlib.util.intW lvl, org.netlib.util.intW nd, int[] inode, int _inode_offset, int[] ndiml, int _ndiml_offset, int[] ndimr, int _ndimr_offset, int msub); + public void dlasdt(int n, org.netlib.util.intW lvl, org.netlib.util.intW nd, int[] inode, int offsetinode, int[] ndiml, int offsetndiml, int[] ndimr, int offsetndimr, int msub); public void dlaset(String uplo, int m, int n, double alpha, double beta, double[] a, int lda); - public void dlaset(String uplo, int m, int n, double alpha, double beta, double[] a, int _a_offset, int lda); + public void dlaset(String uplo, int m, int n, double alpha, double beta, double[] a, int offseta, int lda); public void dlasq1(int n, double[] d, double[] e, double[] work, org.netlib.util.intW info); - public void dlasq1(int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] work, int _work_offset, org.netlib.util.intW info); + public void dlasq1(int n, double[] d, int offsetd, double[] e, int offsete, double[] work, int offsetwork, org.netlib.util.intW info); public void dlasq2(int n, double[] z, org.netlib.util.intW info); - public void dlasq2(int n, double[] z, int _z_offset, org.netlib.util.intW info); + public void dlasq2(int n, double[] z, int offsetz, org.netlib.util.intW info); public void dlasq3(int i0, org.netlib.util.intW n0, double[] z, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW sigma, org.netlib.util.doubleW desig, org.netlib.util.doubleW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee); - public void dlasq3(int i0, org.netlib.util.intW n0, double[] z, int _z_offset, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW sigma, org.netlib.util.doubleW desig, org.netlib.util.doubleW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee); + public void dlasq3(int i0, org.netlib.util.intW n0, double[] z, int offsetz, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW sigma, org.netlib.util.doubleW desig, org.netlib.util.doubleW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee); public void dlasq4(int i0, int n0, double[] z, int pp, int n0in, double dmin, double dmin1, double dmin2, double dn, double dn1, double dn2, org.netlib.util.doubleW tau, org.netlib.util.intW ttype); - public void dlasq4(int i0, int n0, double[] z, int _z_offset, int pp, int n0in, double dmin, double dmin1, double dmin2, double dn, double dn1, double dn2, org.netlib.util.doubleW tau, org.netlib.util.intW ttype); + public void dlasq4(int i0, int n0, double[] z, int offsetz, int pp, int n0in, double dmin, double dmin1, double dmin2, double dn, double dn1, double dn2, org.netlib.util.doubleW tau, org.netlib.util.intW ttype); public void dlasq5(int i0, int n0, double[] z, int pp, double tau, org.netlib.util.doubleW dmin, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dnm1, org.netlib.util.doubleW dnm2, boolean ieee); - public void dlasq5(int i0, int n0, double[] z, int _z_offset, int pp, double tau, org.netlib.util.doubleW dmin, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dnm1, org.netlib.util.doubleW dnm2, boolean ieee); + public void dlasq5(int i0, int n0, double[] z, int offsetz, int pp, double tau, org.netlib.util.doubleW dmin, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dnm1, org.netlib.util.doubleW dnm2, boolean ieee); public void dlasq6(int i0, int n0, double[] z, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dnm1, org.netlib.util.doubleW dnm2); - public void dlasq6(int i0, int n0, double[] z, int _z_offset, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dnm1, org.netlib.util.doubleW dnm2); + public void dlasq6(int i0, int n0, double[] z, int offsetz, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dnm1, org.netlib.util.doubleW dnm2); public void dlasr(String side, String pivot, String direct, int m, int n, double[] c, double[] s, double[] a, int lda); - public void dlasr(String side, String pivot, String direct, int m, int n, double[] c, int _c_offset, double[] s, int _s_offset, double[] a, int _a_offset, int lda); + public void dlasr(String side, String pivot, String direct, int m, int n, double[] c, int offsetc, double[] s, int offsets, double[] a, int offseta, int lda); public void dlasrt(String id, int n, double[] d, org.netlib.util.intW info); - public void dlasrt(String id, int n, double[] d, int _d_offset, org.netlib.util.intW info); + public void dlasrt(String id, int n, double[] d, int offsetd, org.netlib.util.intW info); public void dlassq(int n, double[] x, int incx, org.netlib.util.doubleW scale, org.netlib.util.doubleW sumsq); - public void dlassq(int n, double[] x, int _x_offset, int incx, org.netlib.util.doubleW scale, org.netlib.util.doubleW sumsq); + public void dlassq(int n, double[] x, int offsetx, int incx, org.netlib.util.doubleW scale, org.netlib.util.doubleW sumsq); public void dlasv2(double f, double g, double h, org.netlib.util.doubleW ssmin, org.netlib.util.doubleW ssmax, org.netlib.util.doubleW snr, org.netlib.util.doubleW csr, org.netlib.util.doubleW snl, org.netlib.util.doubleW csl); public void dlaswp(int n, double[] a, int lda, int k1, int k2, int[] ipiv, int incx); - public void dlaswp(int n, double[] a, int _a_offset, int lda, int k1, int k2, int[] ipiv, int _ipiv_offset, int incx); + public void dlaswp(int n, double[] a, int offseta, int lda, int k1, int k2, int[] ipiv, int offsetipiv, int incx); public void dlasy2(boolean ltranl, boolean ltranr, int isgn, int n1, int n2, double[] tl, int ldtl, double[] tr, int ldtr, double[] b, int ldb, org.netlib.util.doubleW scale, double[] x, int ldx, org.netlib.util.doubleW xnorm, org.netlib.util.intW info); - public void dlasy2(boolean ltranl, boolean ltranr, int isgn, int n1, int n2, double[] tl, int _tl_offset, int ldtl, double[] tr, int _tr_offset, int ldtr, double[] b, int _b_offset, int ldb, org.netlib.util.doubleW scale, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW xnorm, org.netlib.util.intW info); + public void dlasy2(boolean ltranl, boolean ltranr, int isgn, int n1, int n2, double[] tl, int offsettl, int ldtl, double[] tr, int offsettr, int ldtr, double[] b, int offsetb, int ldb, org.netlib.util.doubleW scale, double[] x, int offsetx, int ldx, org.netlib.util.doubleW xnorm, org.netlib.util.intW info); public void dlasyf(String uplo, int n, int nb, org.netlib.util.intW kb, double[] a, int lda, int[] ipiv, double[] w, int ldw, org.netlib.util.intW info); - public void dlasyf(String uplo, int n, int nb, org.netlib.util.intW kb, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] w, int _w_offset, int ldw, org.netlib.util.intW info); + public void dlasyf(String uplo, int n, int nb, org.netlib.util.intW kb, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] w, int offsetw, int ldw, org.netlib.util.intW info); public void dlatbs(String uplo, String trans, String diag, String normin, int n, int kd, double[] ab, int ldab, double[] x, org.netlib.util.doubleW scale, double[] cnorm, org.netlib.util.intW info); - public void dlatbs(String uplo, String trans, String diag, String normin, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] x, int _x_offset, org.netlib.util.doubleW scale, double[] cnorm, int _cnorm_offset, org.netlib.util.intW info); + public void dlatbs(String uplo, String trans, String diag, String normin, int n, int kd, double[] ab, int offsetab, int ldab, double[] x, int offsetx, org.netlib.util.doubleW scale, double[] cnorm, int offsetcnorm, org.netlib.util.intW info); public void dlatdf(int ijob, int n, double[] z, int ldz, double[] rhs, org.netlib.util.doubleW rdsum, org.netlib.util.doubleW rdscal, int[] ipiv, int[] jpiv); - public void dlatdf(int ijob, int n, double[] z, int _z_offset, int ldz, double[] rhs, int _rhs_offset, org.netlib.util.doubleW rdsum, org.netlib.util.doubleW rdscal, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset); + public void dlatdf(int ijob, int n, double[] z, int offsetz, int ldz, double[] rhs, int offsetrhs, org.netlib.util.doubleW rdsum, org.netlib.util.doubleW rdscal, int[] ipiv, int offsetipiv, int[] jpiv, int offsetjpiv); public void dlatps(String uplo, String trans, String diag, String normin, int n, double[] ap, double[] x, org.netlib.util.doubleW scale, double[] cnorm, org.netlib.util.intW info); - public void dlatps(String uplo, String trans, String diag, String normin, int n, double[] ap, int _ap_offset, double[] x, int _x_offset, org.netlib.util.doubleW scale, double[] cnorm, int _cnorm_offset, org.netlib.util.intW info); + public void dlatps(String uplo, String trans, String diag, String normin, int n, double[] ap, int offsetap, double[] x, int offsetx, org.netlib.util.doubleW scale, double[] cnorm, int offsetcnorm, org.netlib.util.intW info); public void dlatrd(String uplo, int n, int nb, double[] a, int lda, double[] e, double[] tau, double[] w, int ldw); - public void dlatrd(String uplo, int n, int nb, double[] a, int _a_offset, int lda, double[] e, int _e_offset, double[] tau, int _tau_offset, double[] w, int _w_offset, int ldw); + public void dlatrd(String uplo, int n, int nb, double[] a, int offseta, int lda, double[] e, int offsete, double[] tau, int offsettau, double[] w, int offsetw, int ldw); public void dlatrs(String uplo, String trans, String diag, String normin, int n, double[] a, int lda, double[] x, org.netlib.util.doubleW scale, double[] cnorm, org.netlib.util.intW info); - public void dlatrs(String uplo, String trans, String diag, String normin, int n, double[] a, int _a_offset, int lda, double[] x, int _x_offset, org.netlib.util.doubleW scale, double[] cnorm, int _cnorm_offset, org.netlib.util.intW info); + public void dlatrs(String uplo, String trans, String diag, String normin, int n, double[] a, int offseta, int lda, double[] x, int offsetx, org.netlib.util.doubleW scale, double[] cnorm, int offsetcnorm, org.netlib.util.intW info); public void dlatrz(int m, int n, int l, double[] a, int lda, double[] tau, double[] work); - public void dlatrz(int m, int n, int l, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset); + public void dlatrz(int m, int n, int l, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork); public void dlatzm(String side, int m, int n, double[] v, int incv, double tau, double[] c1, double[] c2, int Ldc, double[] work); - public void dlatzm(String side, int m, int n, double[] v, int _v_offset, int incv, double tau, double[] c1, int _c1_offset, double[] c2, int _c2_offset, int Ldc, double[] work, int _work_offset); + public void dlatzm(String side, int m, int n, double[] v, int offsetv, int incv, double tau, double[] c1, int offsetc1, double[] c2, int offsetc2, int Ldc, double[] work, int offsetwork); public void dlauu2(String uplo, int n, double[] a, int lda, org.netlib.util.intW info); - public void dlauu2(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + public void dlauu2(String uplo, int n, double[] a, int offseta, int lda, org.netlib.util.intW info); public void dlauum(String uplo, int n, double[] a, int lda, org.netlib.util.intW info); - public void dlauum(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + public void dlauum(String uplo, int n, double[] a, int offseta, int lda, org.netlib.util.intW info); public void dlazq3(int i0, org.netlib.util.intW n0, double[] z, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW sigma, org.netlib.util.doubleW desig, org.netlib.util.doubleW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee, org.netlib.util.intW ttype, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dn1, org.netlib.util.doubleW dn2, org.netlib.util.doubleW tau); - public void dlazq3(int i0, org.netlib.util.intW n0, double[] z, int _z_offset, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW sigma, org.netlib.util.doubleW desig, org.netlib.util.doubleW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee, org.netlib.util.intW ttype, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dn1, org.netlib.util.doubleW dn2, org.netlib.util.doubleW tau); + public void dlazq3(int i0, org.netlib.util.intW n0, double[] z, int offsetz, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW sigma, org.netlib.util.doubleW desig, org.netlib.util.doubleW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee, org.netlib.util.intW ttype, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dn1, org.netlib.util.doubleW dn2, org.netlib.util.doubleW tau); public void dlazq4(int i0, int n0, double[] z, int pp, int n0in, double dmin, double dmin1, double dmin2, double dn, double dn1, double dn2, org.netlib.util.doubleW tau, org.netlib.util.intW ttype, org.netlib.util.doubleW g); - public void dlazq4(int i0, int n0, double[] z, int _z_offset, int pp, int n0in, double dmin, double dmin1, double dmin2, double dn, double dn1, double dn2, org.netlib.util.doubleW tau, org.netlib.util.intW ttype, org.netlib.util.doubleW g); + public void dlazq4(int i0, int n0, double[] z, int offsetz, int pp, int n0in, double dmin, double dmin1, double dmin2, double dn, double dn1, double dn2, org.netlib.util.doubleW tau, org.netlib.util.intW ttype, org.netlib.util.doubleW g); public void dopgtr(String uplo, int n, double[] ap, double[] tau, double[] q, int ldq, double[] work, org.netlib.util.intW info); - public void dopgtr(String uplo, int n, double[] ap, int _ap_offset, double[] tau, int _tau_offset, double[] q, int _q_offset, int ldq, double[] work, int _work_offset, org.netlib.util.intW info); + public void dopgtr(String uplo, int n, double[] ap, int offsetap, double[] tau, int offsettau, double[] q, int offsetq, int ldq, double[] work, int offsetwork, org.netlib.util.intW info); public void dopmtr(String side, String uplo, String trans, int m, int n, double[] ap, double[] tau, double[] c, int Ldc, double[] work, org.netlib.util.intW info); - public void dopmtr(String side, String uplo, String trans, int m, int n, double[] ap, int _ap_offset, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + public void dopmtr(String side, String uplo, String trans, int m, int n, double[] ap, int offsetap, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info); public void dorg2l(int m, int n, int k, double[] a, int lda, double[] tau, double[] work, org.netlib.util.intW info); - public void dorg2l(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + public void dorg2l(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); public void dorg2r(int m, int n, int k, double[] a, int lda, double[] tau, double[] work, org.netlib.util.intW info); - public void dorg2r(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + public void dorg2r(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); public void dorgbr(String vect, int m, int n, int k, double[] a, int lda, double[] tau, double[] work, int lwork, org.netlib.util.intW info); - public void dorgbr(String vect, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dorgbr(String vect, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dorghr(int n, int ilo, int ihi, double[] a, int lda, double[] tau, double[] work, int lwork, org.netlib.util.intW info); - public void dorghr(int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dorghr(int n, int ilo, int ihi, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dorgl2(int m, int n, int k, double[] a, int lda, double[] tau, double[] work, org.netlib.util.intW info); - public void dorgl2(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + public void dorgl2(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); public void dorglq(int m, int n, int k, double[] a, int lda, double[] tau, double[] work, int lwork, org.netlib.util.intW info); - public void dorglq(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dorglq(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dorgql(int m, int n, int k, double[] a, int lda, double[] tau, double[] work, int lwork, org.netlib.util.intW info); - public void dorgql(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dorgql(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dorgqr(int m, int n, int k, double[] a, int lda, double[] tau, double[] work, int lwork, org.netlib.util.intW info); - public void dorgqr(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dorgqr(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dorgr2(int m, int n, int k, double[] a, int lda, double[] tau, double[] work, org.netlib.util.intW info); - public void dorgr2(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + public void dorgr2(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); public void dorgrq(int m, int n, int k, double[] a, int lda, double[] tau, double[] work, int lwork, org.netlib.util.intW info); - public void dorgrq(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dorgrq(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dorgtr(String uplo, int n, double[] a, int lda, double[] tau, double[] work, int lwork, org.netlib.util.intW info); - public void dorgtr(String uplo, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dorgtr(String uplo, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dorm2l(String side, String trans, int m, int n, int k, double[] a, int lda, double[] tau, double[] c, int Ldc, double[] work, org.netlib.util.intW info); - public void dorm2l(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + public void dorm2l(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info); public void dorm2r(String side, String trans, int m, int n, int k, double[] a, int lda, double[] tau, double[] c, int Ldc, double[] work, org.netlib.util.intW info); - public void dorm2r(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + public void dorm2r(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info); public void dormbr(String vect, String side, String trans, int m, int n, int k, double[] a, int lda, double[] tau, double[] c, int Ldc, double[] work, int lwork, org.netlib.util.intW info); - public void dormbr(String vect, String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dormbr(String vect, String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dormhr(String side, String trans, int m, int n, int ilo, int ihi, double[] a, int lda, double[] tau, double[] c, int Ldc, double[] work, int lwork, org.netlib.util.intW info); - public void dormhr(String side, String trans, int m, int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dormhr(String side, String trans, int m, int n, int ilo, int ihi, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dorml2(String side, String trans, int m, int n, int k, double[] a, int lda, double[] tau, double[] c, int Ldc, double[] work, org.netlib.util.intW info); - public void dorml2(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + public void dorml2(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info); public void dormlq(String side, String trans, int m, int n, int k, double[] a, int lda, double[] tau, double[] c, int Ldc, double[] work, int lwork, org.netlib.util.intW info); - public void dormlq(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dormlq(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dormql(String side, String trans, int m, int n, int k, double[] a, int lda, double[] tau, double[] c, int Ldc, double[] work, int lwork, org.netlib.util.intW info); - public void dormql(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dormql(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dormqr(String side, String trans, int m, int n, int k, double[] a, int lda, double[] tau, double[] c, int Ldc, double[] work, int lwork, org.netlib.util.intW info); - public void dormqr(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dormqr(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dormr2(String side, String trans, int m, int n, int k, double[] a, int lda, double[] tau, double[] c, int Ldc, double[] work, org.netlib.util.intW info); - public void dormr2(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + public void dormr2(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info); public void dormr3(String side, String trans, int m, int n, int k, int l, double[] a, int lda, double[] tau, double[] c, int Ldc, double[] work, org.netlib.util.intW info); - public void dormr3(String side, String trans, int m, int n, int k, int l, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + public void dormr3(String side, String trans, int m, int n, int k, int l, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info); public void dormrq(String side, String trans, int m, int n, int k, double[] a, int lda, double[] tau, double[] c, int Ldc, double[] work, int lwork, org.netlib.util.intW info); - public void dormrq(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dormrq(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dormrz(String side, String trans, int m, int n, int k, int l, double[] a, int lda, double[] tau, double[] c, int Ldc, double[] work, int lwork, org.netlib.util.intW info); - public void dormrz(String side, String trans, int m, int n, int k, int l, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dormrz(String side, String trans, int m, int n, int k, int l, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dormtr(String side, String uplo, String trans, int m, int n, double[] a, int lda, double[] tau, double[] c, int Ldc, double[] work, int lwork, org.netlib.util.intW info); - public void dormtr(String side, String uplo, String trans, int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dormtr(String side, String uplo, String trans, int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dpbcon(String uplo, int n, int kd, double[] ab, int ldab, double anorm, org.netlib.util.doubleW rcond, double[] work, int[] iwork, org.netlib.util.intW info); - public void dpbcon(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dpbcon(String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dpbequ(String uplo, int n, int kd, double[] ab, int ldab, double[] s, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info); - public void dpbequ(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] s, int _s_offset, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info); + public void dpbequ(String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double[] s, int offsets, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info); public void dpbrfs(String uplo, int n, int kd, int nrhs, double[] ab, int ldab, double[] afb, int ldafb, double[] b, int ldb, double[] x, int ldx, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info); - public void dpbrfs(String uplo, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] afb, int _afb_offset, int ldafb, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dpbrfs(String uplo, int n, int kd, int nrhs, double[] ab, int offsetab, int ldab, double[] afb, int offsetafb, int ldafb, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dpbstf(String uplo, int n, int kd, double[] ab, int ldab, org.netlib.util.intW info); - public void dpbstf(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, org.netlib.util.intW info); + public void dpbstf(String uplo, int n, int kd, double[] ab, int offsetab, int ldab, org.netlib.util.intW info); public void dpbsv(String uplo, int n, int kd, int nrhs, double[] ab, int ldab, double[] b, int ldb, org.netlib.util.intW info); - public void dpbsv(String uplo, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void dpbsv(String uplo, int n, int kd, int nrhs, double[] ab, int offsetab, int ldab, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dpbsvx(String fact, String uplo, int n, int kd, int nrhs, double[] ab, int ldab, double[] afb, int ldafb, org.netlib.util.StringW equed, double[] s, double[] b, int ldb, double[] x, int ldx, org.netlib.util.doubleW rcond, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info); - public void dpbsvx(String fact, String uplo, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] afb, int _afb_offset, int ldafb, org.netlib.util.StringW equed, double[] s, int _s_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dpbsvx(String fact, String uplo, int n, int kd, int nrhs, double[] ab, int offsetab, int ldab, double[] afb, int offsetafb, int ldafb, org.netlib.util.StringW equed, double[] s, int offsets, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dpbtf2(String uplo, int n, int kd, double[] ab, int ldab, org.netlib.util.intW info); - public void dpbtf2(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, org.netlib.util.intW info); + public void dpbtf2(String uplo, int n, int kd, double[] ab, int offsetab, int ldab, org.netlib.util.intW info); public void dpbtrf(String uplo, int n, int kd, double[] ab, int ldab, org.netlib.util.intW info); - public void dpbtrf(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, org.netlib.util.intW info); + public void dpbtrf(String uplo, int n, int kd, double[] ab, int offsetab, int ldab, org.netlib.util.intW info); public void dpbtrs(String uplo, int n, int kd, int nrhs, double[] ab, int ldab, double[] b, int ldb, org.netlib.util.intW info); - public void dpbtrs(String uplo, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void dpbtrs(String uplo, int n, int kd, int nrhs, double[] ab, int offsetab, int ldab, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dpocon(String uplo, int n, double[] a, int lda, double anorm, org.netlib.util.doubleW rcond, double[] work, int[] iwork, org.netlib.util.intW info); - public void dpocon(String uplo, int n, double[] a, int _a_offset, int lda, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dpocon(String uplo, int n, double[] a, int offseta, int lda, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dpoequ(int n, double[] a, int lda, double[] s, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info); - public void dpoequ(int n, double[] a, int _a_offset, int lda, double[] s, int _s_offset, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info); + public void dpoequ(int n, double[] a, int offseta, int lda, double[] s, int offsets, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info); public void dporfs(String uplo, int n, int nrhs, double[] a, int lda, double[] af, int ldaf, double[] b, int ldb, double[] x, int ldx, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info); - public void dporfs(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dporfs(String uplo, int n, int nrhs, double[] a, int offseta, int lda, double[] af, int offsetaf, int ldaf, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dposv(String uplo, int n, int nrhs, double[] a, int lda, double[] b, int ldb, org.netlib.util.intW info); - public void dposv(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void dposv(String uplo, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dposvx(String fact, String uplo, int n, int nrhs, double[] a, int lda, double[] af, int ldaf, org.netlib.util.StringW equed, double[] s, double[] b, int ldb, double[] x, int ldx, org.netlib.util.doubleW rcond, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info); - public void dposvx(String fact, String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, org.netlib.util.StringW equed, double[] s, int _s_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dposvx(String fact, String uplo, int n, int nrhs, double[] a, int offseta, int lda, double[] af, int offsetaf, int ldaf, org.netlib.util.StringW equed, double[] s, int offsets, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dpotf2(String uplo, int n, double[] a, int lda, org.netlib.util.intW info); - public void dpotf2(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + public void dpotf2(String uplo, int n, double[] a, int offseta, int lda, org.netlib.util.intW info); public void dpotrf(String uplo, int n, double[] a, int lda, org.netlib.util.intW info); - public void dpotrf(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + public void dpotrf(String uplo, int n, double[] a, int offseta, int lda, org.netlib.util.intW info); public void dpotri(String uplo, int n, double[] a, int lda, org.netlib.util.intW info); - public void dpotri(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + public void dpotri(String uplo, int n, double[] a, int offseta, int lda, org.netlib.util.intW info); public void dpotrs(String uplo, int n, int nrhs, double[] a, int lda, double[] b, int ldb, org.netlib.util.intW info); - public void dpotrs(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void dpotrs(String uplo, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dppcon(String uplo, int n, double[] ap, double anorm, org.netlib.util.doubleW rcond, double[] work, int[] iwork, org.netlib.util.intW info); - public void dppcon(String uplo, int n, double[] ap, int _ap_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dppcon(String uplo, int n, double[] ap, int offsetap, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dppequ(String uplo, int n, double[] ap, double[] s, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info); - public void dppequ(String uplo, int n, double[] ap, int _ap_offset, double[] s, int _s_offset, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info); + public void dppequ(String uplo, int n, double[] ap, int offsetap, double[] s, int offsets, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info); public void dpprfs(String uplo, int n, int nrhs, double[] ap, double[] afp, double[] b, int ldb, double[] x, int ldx, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info); - public void dpprfs(String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] afp, int _afp_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dpprfs(String uplo, int n, int nrhs, double[] ap, int offsetap, double[] afp, int offsetafp, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dppsv(String uplo, int n, int nrhs, double[] ap, double[] b, int ldb, org.netlib.util.intW info); - public void dppsv(String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void dppsv(String uplo, int n, int nrhs, double[] ap, int offsetap, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dppsvx(String fact, String uplo, int n, int nrhs, double[] ap, double[] afp, org.netlib.util.StringW equed, double[] s, double[] b, int ldb, double[] x, int ldx, org.netlib.util.doubleW rcond, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info); - public void dppsvx(String fact, String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] afp, int _afp_offset, org.netlib.util.StringW equed, double[] s, int _s_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dppsvx(String fact, String uplo, int n, int nrhs, double[] ap, int offsetap, double[] afp, int offsetafp, org.netlib.util.StringW equed, double[] s, int offsets, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dpptrf(String uplo, int n, double[] ap, org.netlib.util.intW info); - public void dpptrf(String uplo, int n, double[] ap, int _ap_offset, org.netlib.util.intW info); + public void dpptrf(String uplo, int n, double[] ap, int offsetap, org.netlib.util.intW info); public void dpptri(String uplo, int n, double[] ap, org.netlib.util.intW info); - public void dpptri(String uplo, int n, double[] ap, int _ap_offset, org.netlib.util.intW info); + public void dpptri(String uplo, int n, double[] ap, int offsetap, org.netlib.util.intW info); public void dpptrs(String uplo, int n, int nrhs, double[] ap, double[] b, int ldb, org.netlib.util.intW info); - public void dpptrs(String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void dpptrs(String uplo, int n, int nrhs, double[] ap, int offsetap, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dptcon(int n, double[] d, double[] e, double anorm, org.netlib.util.doubleW rcond, double[] work, org.netlib.util.intW info); - public void dptcon(int n, double[] d, int _d_offset, double[] e, int _e_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, org.netlib.util.intW info); + public void dptcon(int n, double[] d, int offsetd, double[] e, int offsete, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, org.netlib.util.intW info); public void dpteqr(String compz, int n, double[] d, double[] e, double[] z, int ldz, double[] work, org.netlib.util.intW info); - public void dpteqr(String compz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info); + public void dpteqr(String compz, int n, double[] d, int offsetd, double[] e, int offsete, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info); public void dptrfs(int n, int nrhs, double[] d, double[] e, double[] df, double[] ef, double[] b, int ldb, double[] x, int ldx, double[] ferr, double[] berr, double[] work, org.netlib.util.intW info); - public void dptrfs(int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] df, int _df_offset, double[] ef, int _ef_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, org.netlib.util.intW info); + public void dptrfs(int n, int nrhs, double[] d, int offsetd, double[] e, int offsete, double[] df, int offsetdf, double[] ef, int offsetef, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, org.netlib.util.intW info); public void dptsv(int n, int nrhs, double[] d, double[] e, double[] b, int ldb, org.netlib.util.intW info); - public void dptsv(int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void dptsv(int n, int nrhs, double[] d, int offsetd, double[] e, int offsete, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dptsvx(String fact, int n, int nrhs, double[] d, double[] e, double[] df, double[] ef, double[] b, int ldb, double[] x, int ldx, org.netlib.util.doubleW rcond, double[] ferr, double[] berr, double[] work, org.netlib.util.intW info); - public void dptsvx(String fact, int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] df, int _df_offset, double[] ef, int _ef_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, org.netlib.util.intW info); + public void dptsvx(String fact, int n, int nrhs, double[] d, int offsetd, double[] e, int offsete, double[] df, int offsetdf, double[] ef, int offsetef, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, org.netlib.util.intW info); public void dpttrf(int n, double[] d, double[] e, org.netlib.util.intW info); - public void dpttrf(int n, double[] d, int _d_offset, double[] e, int _e_offset, org.netlib.util.intW info); + public void dpttrf(int n, double[] d, int offsetd, double[] e, int offsete, org.netlib.util.intW info); public void dpttrs(int n, int nrhs, double[] d, double[] e, double[] b, int ldb, org.netlib.util.intW info); - public void dpttrs(int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void dpttrs(int n, int nrhs, double[] d, int offsetd, double[] e, int offsete, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dptts2(int n, int nrhs, double[] d, double[] e, double[] b, int ldb); - public void dptts2(int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] b, int _b_offset, int ldb); + public void dptts2(int n, int nrhs, double[] d, int offsetd, double[] e, int offsete, double[] b, int offsetb, int ldb); public void drscl(int n, double sa, double[] sx, int incx); - public void drscl(int n, double sa, double[] sx, int _sx_offset, int incx); + public void drscl(int n, double sa, double[] sx, int offsetsx, int incx); public void dsbev(String jobz, String uplo, int n, int kd, double[] ab, int ldab, double[] w, double[] z, int ldz, double[] work, org.netlib.util.intW info); - public void dsbev(String jobz, String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info); + public void dsbev(String jobz, String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info); public void dsbevd(String jobz, String uplo, int n, int kd, double[] ab, int ldab, double[] w, double[] z, int ldz, double[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info); - public void dsbevd(String jobz, String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + public void dsbevd(String jobz, String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void dsbevx(String jobz, String range, String uplo, int n, int kd, double[] ab, int ldab, double[] q, int ldq, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, double[] z, int ldz, double[] work, int[] iwork, int[] ifail, org.netlib.util.intW info); - public void dsbevx(String jobz, String range, String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] q, int _q_offset, int ldq, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + public void dsbevx(String jobz, String range, String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double[] q, int offsetq, int ldq, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void dsbgst(String vect, String uplo, int n, int ka, int kb, double[] ab, int ldab, double[] bb, int ldbb, double[] x, int ldx, double[] work, org.netlib.util.intW info); - public void dsbgst(String vect, String uplo, int n, int ka, int kb, double[] ab, int _ab_offset, int ldab, double[] bb, int _bb_offset, int ldbb, double[] x, int _x_offset, int ldx, double[] work, int _work_offset, org.netlib.util.intW info); + public void dsbgst(String vect, String uplo, int n, int ka, int kb, double[] ab, int offsetab, int ldab, double[] bb, int offsetbb, int ldbb, double[] x, int offsetx, int ldx, double[] work, int offsetwork, org.netlib.util.intW info); public void dsbgv(String jobz, String uplo, int n, int ka, int kb, double[] ab, int ldab, double[] bb, int ldbb, double[] w, double[] z, int ldz, double[] work, org.netlib.util.intW info); - public void dsbgv(String jobz, String uplo, int n, int ka, int kb, double[] ab, int _ab_offset, int ldab, double[] bb, int _bb_offset, int ldbb, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info); + public void dsbgv(String jobz, String uplo, int n, int ka, int kb, double[] ab, int offsetab, int ldab, double[] bb, int offsetbb, int ldbb, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info); public void dsbgvd(String jobz, String uplo, int n, int ka, int kb, double[] ab, int ldab, double[] bb, int ldbb, double[] w, double[] z, int ldz, double[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info); - public void dsbgvd(String jobz, String uplo, int n, int ka, int kb, double[] ab, int _ab_offset, int ldab, double[] bb, int _bb_offset, int ldbb, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + public void dsbgvd(String jobz, String uplo, int n, int ka, int kb, double[] ab, int offsetab, int ldab, double[] bb, int offsetbb, int ldbb, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void dsbgvx(String jobz, String range, String uplo, int n, int ka, int kb, double[] ab, int ldab, double[] bb, int ldbb, double[] q, int ldq, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, double[] z, int ldz, double[] work, int[] iwork, int[] ifail, org.netlib.util.intW info); - public void dsbgvx(String jobz, String range, String uplo, int n, int ka, int kb, double[] ab, int _ab_offset, int ldab, double[] bb, int _bb_offset, int ldbb, double[] q, int _q_offset, int ldq, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + public void dsbgvx(String jobz, String range, String uplo, int n, int ka, int kb, double[] ab, int offsetab, int ldab, double[] bb, int offsetbb, int ldbb, double[] q, int offsetq, int ldq, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void dsbtrd(String vect, String uplo, int n, int kd, double[] ab, int ldab, double[] d, double[] e, double[] q, int ldq, double[] work, org.netlib.util.intW info); - public void dsbtrd(String vect, String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] d, int _d_offset, double[] e, int _e_offset, double[] q, int _q_offset, int ldq, double[] work, int _work_offset, org.netlib.util.intW info); + public void dsbtrd(String vect, String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double[] d, int offsetd, double[] e, int offsete, double[] q, int offsetq, int ldq, double[] work, int offsetwork, org.netlib.util.intW info); public void dsgesv(int n, int nrhs, double[] a, int lda, int[] ipiv, double[] b, int ldb, double[] x, int ldx, double[] work, float[] swork, org.netlib.util.intW iter, org.netlib.util.intW info); - public void dsgesv(int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] work, int _work_offset, float[] swork, int _swork_offset, org.netlib.util.intW iter, org.netlib.util.intW info); + public void dsgesv(int n, int nrhs, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] work, int offsetwork, float[] swork, int offsetswork, org.netlib.util.intW iter, org.netlib.util.intW info); public void dspcon(String uplo, int n, double[] ap, int[] ipiv, double anorm, org.netlib.util.doubleW rcond, double[] work, int[] iwork, org.netlib.util.intW info); - public void dspcon(String uplo, int n, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dspcon(String uplo, int n, double[] ap, int offsetap, int[] ipiv, int offsetipiv, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dspev(String jobz, String uplo, int n, double[] ap, double[] w, double[] z, int ldz, double[] work, org.netlib.util.intW info); - public void dspev(String jobz, String uplo, int n, double[] ap, int _ap_offset, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info); + public void dspev(String jobz, String uplo, int n, double[] ap, int offsetap, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info); public void dspevd(String jobz, String uplo, int n, double[] ap, double[] w, double[] z, int ldz, double[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info); - public void dspevd(String jobz, String uplo, int n, double[] ap, int _ap_offset, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + public void dspevd(String jobz, String uplo, int n, double[] ap, int offsetap, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void dspevx(String jobz, String range, String uplo, int n, double[] ap, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, double[] z, int ldz, double[] work, int[] iwork, int[] ifail, org.netlib.util.intW info); - public void dspevx(String jobz, String range, String uplo, int n, double[] ap, int _ap_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + public void dspevx(String jobz, String range, String uplo, int n, double[] ap, int offsetap, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void dspgst(int itype, String uplo, int n, double[] ap, double[] bp, org.netlib.util.intW info); - public void dspgst(int itype, String uplo, int n, double[] ap, int _ap_offset, double[] bp, int _bp_offset, org.netlib.util.intW info); + public void dspgst(int itype, String uplo, int n, double[] ap, int offsetap, double[] bp, int offsetbp, org.netlib.util.intW info); public void dspgv(int itype, String jobz, String uplo, int n, double[] ap, double[] bp, double[] w, double[] z, int ldz, double[] work, org.netlib.util.intW info); - public void dspgv(int itype, String jobz, String uplo, int n, double[] ap, int _ap_offset, double[] bp, int _bp_offset, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info); + public void dspgv(int itype, String jobz, String uplo, int n, double[] ap, int offsetap, double[] bp, int offsetbp, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info); public void dspgvd(int itype, String jobz, String uplo, int n, double[] ap, double[] bp, double[] w, double[] z, int ldz, double[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info); - public void dspgvd(int itype, String jobz, String uplo, int n, double[] ap, int _ap_offset, double[] bp, int _bp_offset, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + public void dspgvd(int itype, String jobz, String uplo, int n, double[] ap, int offsetap, double[] bp, int offsetbp, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void dspgvx(int itype, String jobz, String range, String uplo, int n, double[] ap, double[] bp, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, double[] z, int ldz, double[] work, int[] iwork, int[] ifail, org.netlib.util.intW info); - public void dspgvx(int itype, String jobz, String range, String uplo, int n, double[] ap, int _ap_offset, double[] bp, int _bp_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + public void dspgvx(int itype, String jobz, String range, String uplo, int n, double[] ap, int offsetap, double[] bp, int offsetbp, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void dsprfs(String uplo, int n, int nrhs, double[] ap, double[] afp, int[] ipiv, double[] b, int ldb, double[] x, int ldx, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info); - public void dsprfs(String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] afp, int _afp_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dsprfs(String uplo, int n, int nrhs, double[] ap, int offsetap, double[] afp, int offsetafp, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dspsv(String uplo, int n, int nrhs, double[] ap, int[] ipiv, double[] b, int ldb, org.netlib.util.intW info); - public void dspsv(String uplo, int n, int nrhs, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void dspsv(String uplo, int n, int nrhs, double[] ap, int offsetap, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dspsvx(String fact, String uplo, int n, int nrhs, double[] ap, double[] afp, int[] ipiv, double[] b, int ldb, double[] x, int ldx, org.netlib.util.doubleW rcond, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info); - public void dspsvx(String fact, String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] afp, int _afp_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dspsvx(String fact, String uplo, int n, int nrhs, double[] ap, int offsetap, double[] afp, int offsetafp, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dsptrd(String uplo, int n, double[] ap, double[] d, double[] e, double[] tau, org.netlib.util.intW info); - public void dsptrd(String uplo, int n, double[] ap, int _ap_offset, double[] d, int _d_offset, double[] e, int _e_offset, double[] tau, int _tau_offset, org.netlib.util.intW info); + public void dsptrd(String uplo, int n, double[] ap, int offsetap, double[] d, int offsetd, double[] e, int offsete, double[] tau, int offsettau, org.netlib.util.intW info); public void dsptrf(String uplo, int n, double[] ap, int[] ipiv, org.netlib.util.intW info); - public void dsptrf(String uplo, int n, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + public void dsptrf(String uplo, int n, double[] ap, int offsetap, int[] ipiv, int offsetipiv, org.netlib.util.intW info); public void dsptri(String uplo, int n, double[] ap, int[] ipiv, double[] work, org.netlib.util.intW info); - public void dsptri(String uplo, int n, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, double[] work, int _work_offset, org.netlib.util.intW info); + public void dsptri(String uplo, int n, double[] ap, int offsetap, int[] ipiv, int offsetipiv, double[] work, int offsetwork, org.netlib.util.intW info); public void dsptrs(String uplo, int n, int nrhs, double[] ap, int[] ipiv, double[] b, int ldb, org.netlib.util.intW info); - public void dsptrs(String uplo, int n, int nrhs, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void dsptrs(String uplo, int n, int nrhs, double[] ap, int offsetap, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dstebz(String range, String order, int n, double vl, double vu, int il, int iu, double abstol, double[] d, double[] e, org.netlib.util.intW m, org.netlib.util.intW nsplit, double[] w, int[] iblock, int[] isplit, double[] work, int[] iwork, org.netlib.util.intW info); - public void dstebz(String range, String order, int n, double vl, double vu, int il, int iu, double abstol, double[] d, int _d_offset, double[] e, int _e_offset, org.netlib.util.intW m, org.netlib.util.intW nsplit, double[] w, int _w_offset, int[] iblock, int _iblock_offset, int[] isplit, int _isplit_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dstebz(String range, String order, int n, double vl, double vu, int il, int iu, double abstol, double[] d, int offsetd, double[] e, int offsete, org.netlib.util.intW m, org.netlib.util.intW nsplit, double[] w, int offsetw, int[] iblock, int offsetiblock, int[] isplit, int offsetisplit, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dstedc(String compz, int n, double[] d, double[] e, double[] z, int ldz, double[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info); - public void dstedc(String compz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + public void dstedc(String compz, int n, double[] d, int offsetd, double[] e, int offsete, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void dstegr(String jobz, String range, int n, double[] d, double[] e, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, double[] z, int ldz, int[] isuppz, double[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info); - public void dstegr(String jobz, String range, int n, double[] d, int _d_offset, double[] e, int _e_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + public void dstegr(String jobz, String range, int n, double[] d, int offsetd, double[] e, int offsete, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void dstein(int n, double[] d, double[] e, int m, double[] w, int[] iblock, int[] isplit, double[] z, int ldz, double[] work, int[] iwork, int[] ifail, org.netlib.util.intW info); - public void dstein(int n, double[] d, int _d_offset, double[] e, int _e_offset, int m, double[] w, int _w_offset, int[] iblock, int _iblock_offset, int[] isplit, int _isplit_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + public void dstein(int n, double[] d, int offsetd, double[] e, int offsete, int m, double[] w, int offsetw, int[] iblock, int offsetiblock, int[] isplit, int offsetisplit, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void dstemr(String jobz, String range, int n, double[] d, double[] e, double vl, double vu, int il, int iu, org.netlib.util.intW m, double[] w, double[] z, int ldz, int nzc, int[] isuppz, org.netlib.util.booleanW tryrac, double[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info); - public void dstemr(String jobz, String range, int n, double[] d, int _d_offset, double[] e, int _e_offset, double vl, double vu, int il, int iu, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, int nzc, int[] isuppz, int _isuppz_offset, org.netlib.util.booleanW tryrac, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + public void dstemr(String jobz, String range, int n, double[] d, int offsetd, double[] e, int offsete, double vl, double vu, int il, int iu, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, int nzc, int[] isuppz, int offsetisuppz, org.netlib.util.booleanW tryrac, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void dsteqr(String compz, int n, double[] d, double[] e, double[] z, int ldz, double[] work, org.netlib.util.intW info); - public void dsteqr(String compz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info); + public void dsteqr(String compz, int n, double[] d, int offsetd, double[] e, int offsete, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info); public void dsterf(int n, double[] d, double[] e, org.netlib.util.intW info); - public void dsterf(int n, double[] d, int _d_offset, double[] e, int _e_offset, org.netlib.util.intW info); + public void dsterf(int n, double[] d, int offsetd, double[] e, int offsete, org.netlib.util.intW info); public void dstev(String jobz, int n, double[] d, double[] e, double[] z, int ldz, double[] work, org.netlib.util.intW info); - public void dstev(String jobz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info); + public void dstev(String jobz, int n, double[] d, int offsetd, double[] e, int offsete, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info); public void dstevd(String jobz, int n, double[] d, double[] e, double[] z, int ldz, double[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info); - public void dstevd(String jobz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + public void dstevd(String jobz, int n, double[] d, int offsetd, double[] e, int offsete, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void dstevr(String jobz, String range, int n, double[] d, double[] e, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, double[] z, int ldz, int[] isuppz, double[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info); - public void dstevr(String jobz, String range, int n, double[] d, int _d_offset, double[] e, int _e_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + public void dstevr(String jobz, String range, int n, double[] d, int offsetd, double[] e, int offsete, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void dstevx(String jobz, String range, int n, double[] d, double[] e, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, double[] z, int ldz, double[] work, int[] iwork, int[] ifail, org.netlib.util.intW info); - public void dstevx(String jobz, String range, int n, double[] d, int _d_offset, double[] e, int _e_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + public void dstevx(String jobz, String range, int n, double[] d, int offsetd, double[] e, int offsete, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void dsycon(String uplo, int n, double[] a, int lda, int[] ipiv, double anorm, org.netlib.util.doubleW rcond, double[] work, int[] iwork, org.netlib.util.intW info); - public void dsycon(String uplo, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dsycon(String uplo, int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dsyev(String jobz, String uplo, int n, double[] a, int lda, double[] w, double[] work, int lwork, org.netlib.util.intW info); - public void dsyev(String jobz, String uplo, int n, double[] a, int _a_offset, int lda, double[] w, int _w_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dsyev(String jobz, String uplo, int n, double[] a, int offseta, int lda, double[] w, int offsetw, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dsyevd(String jobz, String uplo, int n, double[] a, int lda, double[] w, double[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info); - public void dsyevd(String jobz, String uplo, int n, double[] a, int _a_offset, int lda, double[] w, int _w_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + public void dsyevd(String jobz, String uplo, int n, double[] a, int offseta, int lda, double[] w, int offsetw, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void dsyevr(String jobz, String range, String uplo, int n, double[] a, int lda, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, double[] z, int ldz, int[] isuppz, double[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info); - public void dsyevr(String jobz, String range, String uplo, int n, double[] a, int _a_offset, int lda, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + public void dsyevr(String jobz, String range, String uplo, int n, double[] a, int offseta, int lda, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void dsyevx(String jobz, String range, String uplo, int n, double[] a, int lda, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, double[] z, int ldz, double[] work, int lwork, int[] iwork, int[] ifail, org.netlib.util.intW info); - public void dsyevx(String jobz, String range, String uplo, int n, double[] a, int _a_offset, int lda, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + public void dsyevx(String jobz, String range, String uplo, int n, double[] a, int offseta, int lda, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void dsygs2(int itype, String uplo, int n, double[] a, int lda, double[] b, int ldb, org.netlib.util.intW info); - public void dsygs2(int itype, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void dsygs2(int itype, String uplo, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dsygst(int itype, String uplo, int n, double[] a, int lda, double[] b, int ldb, org.netlib.util.intW info); - public void dsygst(int itype, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void dsygst(int itype, String uplo, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dsygv(int itype, String jobz, String uplo, int n, double[] a, int lda, double[] b, int ldb, double[] w, double[] work, int lwork, org.netlib.util.intW info); - public void dsygv(int itype, String jobz, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] w, int _w_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dsygv(int itype, String jobz, String uplo, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] w, int offsetw, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dsygvd(int itype, String jobz, String uplo, int n, double[] a, int lda, double[] b, int ldb, double[] w, double[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info); - public void dsygvd(int itype, String jobz, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] w, int _w_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + public void dsygvd(int itype, String jobz, String uplo, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] w, int offsetw, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void dsygvx(int itype, String jobz, String range, String uplo, int n, double[] a, int lda, double[] b, int ldb, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, double[] z, int ldz, double[] work, int lwork, int[] iwork, int[] ifail, org.netlib.util.intW info); - public void dsygvx(int itype, String jobz, String range, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + public void dsygvx(int itype, String jobz, String range, String uplo, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void dsyrfs(String uplo, int n, int nrhs, double[] a, int lda, double[] af, int ldaf, int[] ipiv, double[] b, int ldb, double[] x, int ldx, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info); - public void dsyrfs(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dsyrfs(String uplo, int n, int nrhs, double[] a, int offseta, int lda, double[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dsysv(String uplo, int n, int nrhs, double[] a, int lda, int[] ipiv, double[] b, int ldb, double[] work, int lwork, org.netlib.util.intW info); - public void dsysv(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dsysv(String uplo, int n, int nrhs, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dsysvx(String fact, String uplo, int n, int nrhs, double[] a, int lda, double[] af, int ldaf, int[] ipiv, double[] b, int ldb, double[] x, int ldx, org.netlib.util.doubleW rcond, double[] ferr, double[] berr, double[] work, int lwork, int[] iwork, org.netlib.util.intW info); - public void dsysvx(String fact, String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dsysvx(String fact, String uplo, int n, int nrhs, double[] a, int offseta, int lda, double[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dsytd2(String uplo, int n, double[] a, int lda, double[] d, double[] e, double[] tau, org.netlib.util.intW info); - public void dsytd2(String uplo, int n, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tau, int _tau_offset, org.netlib.util.intW info); + public void dsytd2(String uplo, int n, double[] a, int offseta, int lda, double[] d, int offsetd, double[] e, int offsete, double[] tau, int offsettau, org.netlib.util.intW info); public void dsytf2(String uplo, int n, double[] a, int lda, int[] ipiv, org.netlib.util.intW info); - public void dsytf2(String uplo, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + public void dsytf2(String uplo, int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, org.netlib.util.intW info); public void dsytrd(String uplo, int n, double[] a, int lda, double[] d, double[] e, double[] tau, double[] work, int lwork, org.netlib.util.intW info); - public void dsytrd(String uplo, int n, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dsytrd(String uplo, int n, double[] a, int offseta, int lda, double[] d, int offsetd, double[] e, int offsete, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dsytrf(String uplo, int n, double[] a, int lda, int[] ipiv, double[] work, int lwork, org.netlib.util.intW info); - public void dsytrf(String uplo, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dsytrf(String uplo, int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dsytri(String uplo, int n, double[] a, int lda, int[] ipiv, double[] work, org.netlib.util.intW info); - public void dsytri(String uplo, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] work, int _work_offset, org.netlib.util.intW info); + public void dsytri(String uplo, int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] work, int offsetwork, org.netlib.util.intW info); public void dsytrs(String uplo, int n, int nrhs, double[] a, int lda, int[] ipiv, double[] b, int ldb, org.netlib.util.intW info); - public void dsytrs(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void dsytrs(String uplo, int n, int nrhs, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dtbcon(String norm, String uplo, String diag, int n, int kd, double[] ab, int ldab, org.netlib.util.doubleW rcond, double[] work, int[] iwork, org.netlib.util.intW info); - public void dtbcon(String norm, String uplo, String diag, int n, int kd, double[] ab, int _ab_offset, int ldab, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dtbcon(String norm, String uplo, String diag, int n, int kd, double[] ab, int offsetab, int ldab, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dtbrfs(String uplo, String trans, String diag, int n, int kd, int nrhs, double[] ab, int ldab, double[] b, int ldb, double[] x, int ldx, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info); - public void dtbrfs(String uplo, String trans, String diag, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dtbrfs(String uplo, String trans, String diag, int n, int kd, int nrhs, double[] ab, int offsetab, int ldab, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dtbtrs(String uplo, String trans, String diag, int n, int kd, int nrhs, double[] ab, int ldab, double[] b, int ldb, org.netlib.util.intW info); - public void dtbtrs(String uplo, String trans, String diag, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void dtbtrs(String uplo, String trans, String diag, int n, int kd, int nrhs, double[] ab, int offsetab, int ldab, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dtgevc(String side, String howmny, boolean[] select, int n, double[] s, int lds, double[] p, int ldp, double[] vl, int ldvl, double[] vr, int ldvr, int mm, org.netlib.util.intW m, double[] work, org.netlib.util.intW info); - public void dtgevc(String side, String howmny, boolean[] select, int _select_offset, int n, double[] s, int _s_offset, int lds, double[] p, int _p_offset, int ldp, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, double[] work, int _work_offset, org.netlib.util.intW info); + public void dtgevc(String side, String howmny, boolean[] select, int offsetselect, int n, double[] s, int offsets, int lds, double[] p, int offsetp, int ldp, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, int mm, org.netlib.util.intW m, double[] work, int offsetwork, org.netlib.util.intW info); public void dtgex2(boolean wantq, boolean wantz, int n, double[] a, int lda, double[] b, int ldb, double[] q, int ldq, double[] z, int ldz, int j1, int n1, int n2, double[] work, int lwork, org.netlib.util.intW info); - public void dtgex2(boolean wantq, boolean wantz, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, int j1, int n1, int n2, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dtgex2(boolean wantq, boolean wantz, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] q, int offsetq, int ldq, double[] z, int offsetz, int ldz, int j1, int n1, int n2, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dtgexc(boolean wantq, boolean wantz, int n, double[] a, int lda, double[] b, int ldb, double[] q, int ldq, double[] z, int ldz, org.netlib.util.intW ifst, org.netlib.util.intW ilst, double[] work, int lwork, org.netlib.util.intW info); - public void dtgexc(boolean wantq, boolean wantz, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, org.netlib.util.intW ifst, org.netlib.util.intW ilst, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dtgexc(boolean wantq, boolean wantz, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] q, int offsetq, int ldq, double[] z, int offsetz, int ldz, org.netlib.util.intW ifst, org.netlib.util.intW ilst, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dtgsen(int ijob, boolean wantq, boolean wantz, boolean[] select, int n, double[] a, int lda, double[] b, int ldb, double[] alphar, double[] alphai, double[] beta, double[] q, int ldq, double[] z, int ldz, org.netlib.util.intW m, org.netlib.util.doubleW pl, org.netlib.util.doubleW pr, double[] dif, double[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info); - public void dtgsen(int ijob, boolean wantq, boolean wantz, boolean[] select, int _select_offset, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, org.netlib.util.intW m, org.netlib.util.doubleW pl, org.netlib.util.doubleW pr, double[] dif, int _dif_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + public void dtgsen(int ijob, boolean wantq, boolean wantz, boolean[] select, int offsetselect, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] q, int offsetq, int ldq, double[] z, int offsetz, int ldz, org.netlib.util.intW m, org.netlib.util.doubleW pl, org.netlib.util.doubleW pr, double[] dif, int offsetdif, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void dtgsja(String jobu, String jobv, String jobq, int m, int p, int n, int k, int l, double[] a, int lda, double[] b, int ldb, double tola, double tolb, double[] alpha, double[] beta, double[] u, int ldu, double[] v, int ldv, double[] q, int ldq, double[] work, org.netlib.util.intW ncycle, org.netlib.util.intW info); - public void dtgsja(String jobu, String jobv, String jobq, int m, int p, int n, int k, int l, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double tola, double tolb, double[] alpha, int _alpha_offset, double[] beta, int _beta_offset, double[] u, int _u_offset, int ldu, double[] v, int _v_offset, int ldv, double[] q, int _q_offset, int ldq, double[] work, int _work_offset, org.netlib.util.intW ncycle, org.netlib.util.intW info); + public void dtgsja(String jobu, String jobv, String jobq, int m, int p, int n, int k, int l, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double tola, double tolb, double[] alpha, int offsetalpha, double[] beta, int offsetbeta, double[] u, int offsetu, int ldu, double[] v, int offsetv, int ldv, double[] q, int offsetq, int ldq, double[] work, int offsetwork, org.netlib.util.intW ncycle, org.netlib.util.intW info); public void dtgsna(String job, String howmny, boolean[] select, int n, double[] a, int lda, double[] b, int ldb, double[] vl, int ldvl, double[] vr, int ldvr, double[] s, double[] dif, int mm, org.netlib.util.intW m, double[] work, int lwork, int[] iwork, org.netlib.util.intW info); - public void dtgsna(String job, String howmny, boolean[] select, int _select_offset, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] s, int _s_offset, double[] dif, int _dif_offset, int mm, org.netlib.util.intW m, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dtgsna(String job, String howmny, boolean[] select, int offsetselect, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, double[] s, int offsets, double[] dif, int offsetdif, int mm, org.netlib.util.intW m, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dtgsy2(String trans, int ijob, int m, int n, double[] a, int lda, double[] b, int ldb, double[] c, int Ldc, double[] d, int ldd, double[] e, int lde, double[] f, int ldf, org.netlib.util.doubleW scale, org.netlib.util.doubleW rdsum, org.netlib.util.doubleW rdscal, int[] iwork, org.netlib.util.intW pq, org.netlib.util.intW info); - public void dtgsy2(String trans, int ijob, int m, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] c, int _c_offset, int Ldc, double[] d, int _d_offset, int ldd, double[] e, int _e_offset, int lde, double[] f, int _f_offset, int ldf, org.netlib.util.doubleW scale, org.netlib.util.doubleW rdsum, org.netlib.util.doubleW rdscal, int[] iwork, int _iwork_offset, org.netlib.util.intW pq, org.netlib.util.intW info); + public void dtgsy2(String trans, int ijob, int m, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] c, int offsetc, int Ldc, double[] d, int offsetd, int ldd, double[] e, int offsete, int lde, double[] f, int offsetf, int ldf, org.netlib.util.doubleW scale, org.netlib.util.doubleW rdsum, org.netlib.util.doubleW rdscal, int[] iwork, int offsetiwork, org.netlib.util.intW pq, org.netlib.util.intW info); public void dtgsyl(String trans, int ijob, int m, int n, double[] a, int lda, double[] b, int ldb, double[] c, int Ldc, double[] d, int ldd, double[] e, int lde, double[] f, int ldf, org.netlib.util.doubleW scale, org.netlib.util.doubleW dif, double[] work, int lwork, int[] iwork, org.netlib.util.intW info); - public void dtgsyl(String trans, int ijob, int m, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] c, int _c_offset, int Ldc, double[] d, int _d_offset, int ldd, double[] e, int _e_offset, int lde, double[] f, int _f_offset, int ldf, org.netlib.util.doubleW scale, org.netlib.util.doubleW dif, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dtgsyl(String trans, int ijob, int m, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] c, int offsetc, int Ldc, double[] d, int offsetd, int ldd, double[] e, int offsete, int lde, double[] f, int offsetf, int ldf, org.netlib.util.doubleW scale, org.netlib.util.doubleW dif, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dtpcon(String norm, String uplo, String diag, int n, double[] ap, org.netlib.util.doubleW rcond, double[] work, int[] iwork, org.netlib.util.intW info); - public void dtpcon(String norm, String uplo, String diag, int n, double[] ap, int _ap_offset, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dtpcon(String norm, String uplo, String diag, int n, double[] ap, int offsetap, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dtprfs(String uplo, String trans, String diag, int n, int nrhs, double[] ap, double[] b, int ldb, double[] x, int ldx, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info); - public void dtprfs(String uplo, String trans, String diag, int n, int nrhs, double[] ap, int _ap_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dtprfs(String uplo, String trans, String diag, int n, int nrhs, double[] ap, int offsetap, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dtptri(String uplo, String diag, int n, double[] ap, org.netlib.util.intW info); - public void dtptri(String uplo, String diag, int n, double[] ap, int _ap_offset, org.netlib.util.intW info); + public void dtptri(String uplo, String diag, int n, double[] ap, int offsetap, org.netlib.util.intW info); public void dtptrs(String uplo, String trans, String diag, int n, int nrhs, double[] ap, double[] b, int ldb, org.netlib.util.intW info); - public void dtptrs(String uplo, String trans, String diag, int n, int nrhs, double[] ap, int _ap_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void dtptrs(String uplo, String trans, String diag, int n, int nrhs, double[] ap, int offsetap, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dtrcon(String norm, String uplo, String diag, int n, double[] a, int lda, org.netlib.util.doubleW rcond, double[] work, int[] iwork, org.netlib.util.intW info); - public void dtrcon(String norm, String uplo, String diag, int n, double[] a, int _a_offset, int lda, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dtrcon(String norm, String uplo, String diag, int n, double[] a, int offseta, int lda, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dtrevc(String side, String howmny, boolean[] select, int n, double[] t, int ldt, double[] vl, int ldvl, double[] vr, int ldvr, int mm, org.netlib.util.intW m, double[] work, org.netlib.util.intW info); - public void dtrevc(String side, String howmny, boolean[] select, int _select_offset, int n, double[] t, int _t_offset, int ldt, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, double[] work, int _work_offset, org.netlib.util.intW info); + public void dtrevc(String side, String howmny, boolean[] select, int offsetselect, int n, double[] t, int offsett, int ldt, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, int mm, org.netlib.util.intW m, double[] work, int offsetwork, org.netlib.util.intW info); public void dtrexc(String compq, int n, double[] t, int ldt, double[] q, int ldq, org.netlib.util.intW ifst, org.netlib.util.intW ilst, double[] work, org.netlib.util.intW info); - public void dtrexc(String compq, int n, double[] t, int _t_offset, int ldt, double[] q, int _q_offset, int ldq, org.netlib.util.intW ifst, org.netlib.util.intW ilst, double[] work, int _work_offset, org.netlib.util.intW info); + public void dtrexc(String compq, int n, double[] t, int offsett, int ldt, double[] q, int offsetq, int ldq, org.netlib.util.intW ifst, org.netlib.util.intW ilst, double[] work, int offsetwork, org.netlib.util.intW info); public void dtrrfs(String uplo, String trans, String diag, int n, int nrhs, double[] a, int lda, double[] b, int ldb, double[] x, int ldx, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info); - public void dtrrfs(String uplo, String trans, String diag, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dtrrfs(String uplo, String trans, String diag, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dtrsen(String job, String compq, boolean[] select, int n, double[] t, int ldt, double[] q, int ldq, double[] wr, double[] wi, org.netlib.util.intW m, org.netlib.util.doubleW s, org.netlib.util.doubleW sep, double[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info); - public void dtrsen(String job, String compq, boolean[] select, int _select_offset, int n, double[] t, int _t_offset, int ldt, double[] q, int _q_offset, int ldq, double[] wr, int _wr_offset, double[] wi, int _wi_offset, org.netlib.util.intW m, org.netlib.util.doubleW s, org.netlib.util.doubleW sep, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + public void dtrsen(String job, String compq, boolean[] select, int offsetselect, int n, double[] t, int offsett, int ldt, double[] q, int offsetq, int ldq, double[] wr, int offsetwr, double[] wi, int offsetwi, org.netlib.util.intW m, org.netlib.util.doubleW s, org.netlib.util.doubleW sep, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void dtrsna(String job, String howmny, boolean[] select, int n, double[] t, int ldt, double[] vl, int ldvl, double[] vr, int ldvr, double[] s, double[] sep, int mm, org.netlib.util.intW m, double[] work, int ldwork, int[] iwork, org.netlib.util.intW info); - public void dtrsna(String job, String howmny, boolean[] select, int _select_offset, int n, double[] t, int _t_offset, int ldt, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] s, int _s_offset, double[] sep, int _sep_offset, int mm, org.netlib.util.intW m, double[] work, int _work_offset, int ldwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void dtrsna(String job, String howmny, boolean[] select, int offsetselect, int n, double[] t, int offsett, int ldt, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, double[] s, int offsets, double[] sep, int offsetsep, int mm, org.netlib.util.intW m, double[] work, int offsetwork, int ldwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dtrsyl(String trana, String tranb, int isgn, int m, int n, double[] a, int lda, double[] b, int ldb, double[] c, int Ldc, org.netlib.util.doubleW scale, org.netlib.util.intW info); - public void dtrsyl(String trana, String tranb, int isgn, int m, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] c, int _c_offset, int Ldc, org.netlib.util.doubleW scale, org.netlib.util.intW info); + public void dtrsyl(String trana, String tranb, int isgn, int m, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] c, int offsetc, int Ldc, org.netlib.util.doubleW scale, org.netlib.util.intW info); public void dtrti2(String uplo, String diag, int n, double[] a, int lda, org.netlib.util.intW info); - public void dtrti2(String uplo, String diag, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + public void dtrti2(String uplo, String diag, int n, double[] a, int offseta, int lda, org.netlib.util.intW info); public void dtrtri(String uplo, String diag, int n, double[] a, int lda, org.netlib.util.intW info); - public void dtrtri(String uplo, String diag, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + public void dtrtri(String uplo, String diag, int n, double[] a, int offseta, int lda, org.netlib.util.intW info); public void dtrtrs(String uplo, String trans, String diag, int n, int nrhs, double[] a, int lda, double[] b, int ldb, org.netlib.util.intW info); - public void dtrtrs(String uplo, String trans, String diag, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void dtrtrs(String uplo, String trans, String diag, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dtzrqf(int m, int n, double[] a, int lda, double[] tau, org.netlib.util.intW info); - public void dtzrqf(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, org.netlib.util.intW info); + public void dtzrqf(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, org.netlib.util.intW info); public void dtzrzf(int m, int n, double[] a, int lda, double[] tau, double[] work, int lwork, org.netlib.util.intW info); - public void dtzrzf(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void dtzrzf(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public int ieeeck(int ispec, float zero, float one); public int ilaenv(int ispec, String name, String opts, int n1, int n2, int n3, int n4); public void ilaver(org.netlib.util.intW vers_major, org.netlib.util.intW vers_minor, org.netlib.util.intW vers_patch); public int iparmq(int ispec, String name, String opts, int n, int ilo, int ihi, int lwork); public boolean lsamen(int n, String ca, String cb); public void sbdsdc(String uplo, String compq, int n, float[] d, float[] e, float[] u, int ldu, float[] vt, int ldvt, float[] q, int[] iq, float[] work, int[] iwork, org.netlib.util.intW info); - public void sbdsdc(String uplo, String compq, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, float[] q, int _q_offset, int[] iq, int _iq_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void sbdsdc(String uplo, String compq, int n, float[] d, int offsetd, float[] e, int offsete, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int ldvt, float[] q, int offsetq, int[] iq, int offsetiq, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sbdsqr(String uplo, int n, int ncvt, int nru, int ncc, float[] d, float[] e, float[] vt, int ldvt, float[] u, int ldu, float[] c, int Ldc, float[] work, org.netlib.util.intW info); - public void sbdsqr(String uplo, int n, int ncvt, int nru, int ncc, float[] d, int _d_offset, float[] e, int _e_offset, float[] vt, int _vt_offset, int ldvt, float[] u, int _u_offset, int ldu, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + public void sbdsqr(String uplo, int n, int ncvt, int nru, int ncc, float[] d, int offsetd, float[] e, int offsete, float[] vt, int offsetvt, int ldvt, float[] u, int offsetu, int ldu, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info); public void sdisna(String job, int m, int n, float[] d, float[] sep, org.netlib.util.intW info); - public void sdisna(String job, int m, int n, float[] d, int _d_offset, float[] sep, int _sep_offset, org.netlib.util.intW info); + public void sdisna(String job, int m, int n, float[] d, int offsetd, float[] sep, int offsetsep, org.netlib.util.intW info); public void sgbbrd(String vect, int m, int n, int ncc, int kl, int ku, float[] ab, int ldab, float[] d, float[] e, float[] q, int ldq, float[] pt, int ldpt, float[] c, int Ldc, float[] work, org.netlib.util.intW info); - public void sgbbrd(String vect, int m, int n, int ncc, int kl, int ku, float[] ab, int _ab_offset, int ldab, float[] d, int _d_offset, float[] e, int _e_offset, float[] q, int _q_offset, int ldq, float[] pt, int _pt_offset, int ldpt, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + public void sgbbrd(String vect, int m, int n, int ncc, int kl, int ku, float[] ab, int offsetab, int ldab, float[] d, int offsetd, float[] e, int offsete, float[] q, int offsetq, int ldq, float[] pt, int offsetpt, int ldpt, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info); public void sgbcon(String norm, int n, int kl, int ku, float[] ab, int ldab, int[] ipiv, float anorm, org.netlib.util.floatW rcond, float[] work, int[] iwork, org.netlib.util.intW info); - public void sgbcon(String norm, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void sgbcon(String norm, int n, int kl, int ku, float[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sgbequ(int m, int n, int kl, int ku, float[] ab, int ldab, float[] r, float[] c, org.netlib.util.floatW rowcnd, org.netlib.util.floatW colcnd, org.netlib.util.floatW amax, org.netlib.util.intW info); - public void sgbequ(int m, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, float[] r, int _r_offset, float[] c, int _c_offset, org.netlib.util.floatW rowcnd, org.netlib.util.floatW colcnd, org.netlib.util.floatW amax, org.netlib.util.intW info); + public void sgbequ(int m, int n, int kl, int ku, float[] ab, int offsetab, int ldab, float[] r, int offsetr, float[] c, int offsetc, org.netlib.util.floatW rowcnd, org.netlib.util.floatW colcnd, org.netlib.util.floatW amax, org.netlib.util.intW info); public void sgbrfs(String trans, int n, int kl, int ku, int nrhs, float[] ab, int ldab, float[] afb, int ldafb, int[] ipiv, float[] b, int ldb, float[] x, int ldx, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info); - public void sgbrfs(String trans, int n, int kl, int ku, int nrhs, float[] ab, int _ab_offset, int ldab, float[] afb, int _afb_offset, int ldafb, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void sgbrfs(String trans, int n, int kl, int ku, int nrhs, float[] ab, int offsetab, int ldab, float[] afb, int offsetafb, int ldafb, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sgbsv(int n, int kl, int ku, int nrhs, float[] ab, int ldab, int[] ipiv, float[] b, int ldb, org.netlib.util.intW info); - public void sgbsv(int n, int kl, int ku, int nrhs, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void sgbsv(int n, int kl, int ku, int nrhs, float[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void sgbsvx(String fact, String trans, int n, int kl, int ku, int nrhs, float[] ab, int ldab, float[] afb, int ldafb, int[] ipiv, org.netlib.util.StringW equed, float[] r, float[] c, float[] b, int ldb, float[] x, int ldx, org.netlib.util.floatW rcond, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info); - public void sgbsvx(String fact, String trans, int n, int kl, int ku, int nrhs, float[] ab, int _ab_offset, int ldab, float[] afb, int _afb_offset, int ldafb, int[] ipiv, int _ipiv_offset, org.netlib.util.StringW equed, float[] r, int _r_offset, float[] c, int _c_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void sgbsvx(String fact, String trans, int n, int kl, int ku, int nrhs, float[] ab, int offsetab, int ldab, float[] afb, int offsetafb, int ldafb, int[] ipiv, int offsetipiv, org.netlib.util.StringW equed, float[] r, int offsetr, float[] c, int offsetc, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sgbtf2(int m, int n, int kl, int ku, float[] ab, int ldab, int[] ipiv, org.netlib.util.intW info); - public void sgbtf2(int m, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + public void sgbtf2(int m, int n, int kl, int ku, float[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, org.netlib.util.intW info); public void sgbtrf(int m, int n, int kl, int ku, float[] ab, int ldab, int[] ipiv, org.netlib.util.intW info); - public void sgbtrf(int m, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + public void sgbtrf(int m, int n, int kl, int ku, float[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, org.netlib.util.intW info); public void sgbtrs(String trans, int n, int kl, int ku, int nrhs, float[] ab, int ldab, int[] ipiv, float[] b, int ldb, org.netlib.util.intW info); - public void sgbtrs(String trans, int n, int kl, int ku, int nrhs, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void sgbtrs(String trans, int n, int kl, int ku, int nrhs, float[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void sgebak(String job, String side, int n, int ilo, int ihi, float[] scale, int m, float[] v, int ldv, org.netlib.util.intW info); - public void sgebak(String job, String side, int n, int ilo, int ihi, float[] scale, int _scale_offset, int m, float[] v, int _v_offset, int ldv, org.netlib.util.intW info); + public void sgebak(String job, String side, int n, int ilo, int ihi, float[] scale, int offsetscale, int m, float[] v, int offsetv, int ldv, org.netlib.util.intW info); public void sgebal(String job, int n, float[] a, int lda, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] scale, org.netlib.util.intW info); - public void sgebal(String job, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] scale, int _scale_offset, org.netlib.util.intW info); + public void sgebal(String job, int n, float[] a, int offseta, int lda, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] scale, int offsetscale, org.netlib.util.intW info); public void sgebd2(int m, int n, float[] a, int lda, float[] d, float[] e, float[] tauq, float[] taup, float[] work, org.netlib.util.intW info); - public void sgebd2(int m, int n, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tauq, int _tauq_offset, float[] taup, int _taup_offset, float[] work, int _work_offset, org.netlib.util.intW info); + public void sgebd2(int m, int n, float[] a, int offseta, int lda, float[] d, int offsetd, float[] e, int offsete, float[] tauq, int offsettauq, float[] taup, int offsettaup, float[] work, int offsetwork, org.netlib.util.intW info); public void sgebrd(int m, int n, float[] a, int lda, float[] d, float[] e, float[] tauq, float[] taup, float[] work, int lwork, org.netlib.util.intW info); - public void sgebrd(int m, int n, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tauq, int _tauq_offset, float[] taup, int _taup_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sgebrd(int m, int n, float[] a, int offseta, int lda, float[] d, int offsetd, float[] e, int offsete, float[] tauq, int offsettauq, float[] taup, int offsettaup, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgecon(String norm, int n, float[] a, int lda, float anorm, org.netlib.util.floatW rcond, float[] work, int[] iwork, org.netlib.util.intW info); - public void sgecon(String norm, int n, float[] a, int _a_offset, int lda, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void sgecon(String norm, int n, float[] a, int offseta, int lda, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sgeequ(int m, int n, float[] a, int lda, float[] r, float[] c, org.netlib.util.floatW rowcnd, org.netlib.util.floatW colcnd, org.netlib.util.floatW amax, org.netlib.util.intW info); - public void sgeequ(int m, int n, float[] a, int _a_offset, int lda, float[] r, int _r_offset, float[] c, int _c_offset, org.netlib.util.floatW rowcnd, org.netlib.util.floatW colcnd, org.netlib.util.floatW amax, org.netlib.util.intW info); + public void sgeequ(int m, int n, float[] a, int offseta, int lda, float[] r, int offsetr, float[] c, int offsetc, org.netlib.util.floatW rowcnd, org.netlib.util.floatW colcnd, org.netlib.util.floatW amax, org.netlib.util.intW info); public void sgees(String jobvs, String sort, java.lang.Object select, int n, float[] a, int lda, org.netlib.util.intW sdim, float[] wr, float[] wi, float[] vs, int ldvs, float[] work, int lwork, boolean[] bwork, org.netlib.util.intW info); - public void sgees(String jobvs, String sort, java.lang.Object select, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW sdim, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vs, int _vs_offset, int ldvs, float[] work, int _work_offset, int lwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + public void sgees(String jobvs, String sort, java.lang.Object select, int n, float[] a, int offseta, int lda, org.netlib.util.intW sdim, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] vs, int offsetvs, int ldvs, float[] work, int offsetwork, int lwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info); public void sgeesx(String jobvs, String sort, java.lang.Object select, String sense, int n, float[] a, int lda, org.netlib.util.intW sdim, float[] wr, float[] wi, float[] vs, int ldvs, org.netlib.util.floatW rconde, org.netlib.util.floatW rcondv, float[] work, int lwork, int[] iwork, int liwork, boolean[] bwork, org.netlib.util.intW info); - public void sgeesx(String jobvs, String sort, java.lang.Object select, String sense, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW sdim, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vs, int _vs_offset, int ldvs, org.netlib.util.floatW rconde, org.netlib.util.floatW rcondv, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + public void sgeesx(String jobvs, String sort, java.lang.Object select, String sense, int n, float[] a, int offseta, int lda, org.netlib.util.intW sdim, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] vs, int offsetvs, int ldvs, org.netlib.util.floatW rconde, org.netlib.util.floatW rcondv, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info); public void sgeev(String jobvl, String jobvr, int n, float[] a, int lda, float[] wr, float[] wi, float[] vl, int ldvl, float[] vr, int ldvr, float[] work, int lwork, org.netlib.util.intW info); - public void sgeev(String jobvl, String jobvr, int n, float[] a, int _a_offset, int lda, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sgeev(String jobvl, String jobvr, int n, float[] a, int offseta, int lda, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgeevx(String balanc, String jobvl, String jobvr, String sense, int n, float[] a, int lda, float[] wr, float[] wi, float[] vl, int ldvl, float[] vr, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] scale, org.netlib.util.floatW abnrm, float[] rconde, float[] rcondv, float[] work, int lwork, int[] iwork, org.netlib.util.intW info); - public void sgeevx(String balanc, String jobvl, String jobvr, String sense, int n, float[] a, int _a_offset, int lda, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] scale, int _scale_offset, org.netlib.util.floatW abnrm, float[] rconde, int _rconde_offset, float[] rcondv, int _rcondv_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void sgeevx(String balanc, String jobvl, String jobvr, String sense, int n, float[] a, int offseta, int lda, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] scale, int offsetscale, org.netlib.util.floatW abnrm, float[] rconde, int offsetrconde, float[] rcondv, int offsetrcondv, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sgegs(String jobvsl, String jobvsr, int n, float[] a, int lda, float[] b, int ldb, float[] alphar, float[] alphai, float[] beta, float[] vsl, int ldvsl, float[] vsr, int ldvsr, float[] work, int lwork, org.netlib.util.intW info); - public void sgegs(String jobvsl, String jobvsr, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vsl, int _vsl_offset, int ldvsl, float[] vsr, int _vsr_offset, int ldvsr, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sgegs(String jobvsl, String jobvsr, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] vsl, int offsetvsl, int ldvsl, float[] vsr, int offsetvsr, int ldvsr, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgegv(String jobvl, String jobvr, int n, float[] a, int lda, float[] b, int ldb, float[] alphar, float[] alphai, float[] beta, float[] vl, int ldvl, float[] vr, int ldvr, float[] work, int lwork, org.netlib.util.intW info); - public void sgegv(String jobvl, String jobvr, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sgegv(String jobvl, String jobvr, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgehd2(int n, int ilo, int ihi, float[] a, int lda, float[] tau, float[] work, org.netlib.util.intW info); - public void sgehd2(int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + public void sgehd2(int n, int ilo, int ihi, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); public void sgehrd(int n, int ilo, int ihi, float[] a, int lda, float[] tau, float[] work, int lwork, org.netlib.util.intW info); - public void sgehrd(int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sgehrd(int n, int ilo, int ihi, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgelq2(int m, int n, float[] a, int lda, float[] tau, float[] work, org.netlib.util.intW info); - public void sgelq2(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + public void sgelq2(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); public void sgelqf(int m, int n, float[] a, int lda, float[] tau, float[] work, int lwork, org.netlib.util.intW info); - public void sgelqf(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sgelqf(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgels(String trans, int m, int n, int nrhs, float[] a, int lda, float[] b, int ldb, float[] work, int lwork, org.netlib.util.intW info); - public void sgels(String trans, int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sgels(String trans, int m, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgelsd(int m, int n, int nrhs, float[] a, int lda, float[] b, int ldb, float[] s, float rcond, org.netlib.util.intW rank, float[] work, int lwork, int[] iwork, org.netlib.util.intW info); - public void sgelsd(int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] s, int _s_offset, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void sgelsd(int m, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] s, int offsets, float rcond, org.netlib.util.intW rank, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sgelss(int m, int n, int nrhs, float[] a, int lda, float[] b, int ldb, float[] s, float rcond, org.netlib.util.intW rank, float[] work, int lwork, org.netlib.util.intW info); - public void sgelss(int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] s, int _s_offset, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sgelss(int m, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] s, int offsets, float rcond, org.netlib.util.intW rank, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgelsx(int m, int n, int nrhs, float[] a, int lda, float[] b, int ldb, int[] jpvt, float rcond, org.netlib.util.intW rank, float[] work, org.netlib.util.intW info); - public void sgelsx(int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, int[] jpvt, int _jpvt_offset, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, org.netlib.util.intW info); + public void sgelsx(int m, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, int[] jpvt, int offsetjpvt, float rcond, org.netlib.util.intW rank, float[] work, int offsetwork, org.netlib.util.intW info); public void sgelsy(int m, int n, int nrhs, float[] a, int lda, float[] b, int ldb, int[] jpvt, float rcond, org.netlib.util.intW rank, float[] work, int lwork, org.netlib.util.intW info); - public void sgelsy(int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, int[] jpvt, int _jpvt_offset, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sgelsy(int m, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, int[] jpvt, int offsetjpvt, float rcond, org.netlib.util.intW rank, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgeql2(int m, int n, float[] a, int lda, float[] tau, float[] work, org.netlib.util.intW info); - public void sgeql2(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + public void sgeql2(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); public void sgeqlf(int m, int n, float[] a, int lda, float[] tau, float[] work, int lwork, org.netlib.util.intW info); - public void sgeqlf(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sgeqlf(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgeqp3(int m, int n, float[] a, int lda, int[] jpvt, float[] tau, float[] work, int lwork, org.netlib.util.intW info); - public void sgeqp3(int m, int n, float[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sgeqp3(int m, int n, float[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgeqpf(int m, int n, float[] a, int lda, int[] jpvt, float[] tau, float[] work, org.netlib.util.intW info); - public void sgeqpf(int m, int n, float[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + public void sgeqpf(int m, int n, float[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); public void sgeqr2(int m, int n, float[] a, int lda, float[] tau, float[] work, org.netlib.util.intW info); - public void sgeqr2(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + public void sgeqr2(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); public void sgeqrf(int m, int n, float[] a, int lda, float[] tau, float[] work, int lwork, org.netlib.util.intW info); - public void sgeqrf(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sgeqrf(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgerfs(String trans, int n, int nrhs, float[] a, int lda, float[] af, int ldaf, int[] ipiv, float[] b, int ldb, float[] x, int ldx, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info); - public void sgerfs(String trans, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void sgerfs(String trans, int n, int nrhs, float[] a, int offseta, int lda, float[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sgerq2(int m, int n, float[] a, int lda, float[] tau, float[] work, org.netlib.util.intW info); - public void sgerq2(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + public void sgerq2(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); public void sgerqf(int m, int n, float[] a, int lda, float[] tau, float[] work, int lwork, org.netlib.util.intW info); - public void sgerqf(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sgerqf(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgesc2(int n, float[] a, int lda, float[] rhs, int[] ipiv, int[] jpiv, org.netlib.util.floatW scale); - public void sgesc2(int n, float[] a, int _a_offset, int lda, float[] rhs, int _rhs_offset, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset, org.netlib.util.floatW scale); + public void sgesc2(int n, float[] a, int offseta, int lda, float[] rhs, int offsetrhs, int[] ipiv, int offsetipiv, int[] jpiv, int offsetjpiv, org.netlib.util.floatW scale); public void sgesdd(String jobz, int m, int n, float[] a, int lda, float[] s, float[] u, int ldu, float[] vt, int ldvt, float[] work, int lwork, int[] iwork, org.netlib.util.intW info); - public void sgesdd(String jobz, int m, int n, float[] a, int _a_offset, int lda, float[] s, int _s_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void sgesdd(String jobz, int m, int n, float[] a, int offseta, int lda, float[] s, int offsets, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int ldvt, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sgesv(int n, int nrhs, float[] a, int lda, int[] ipiv, float[] b, int ldb, org.netlib.util.intW info); - public void sgesv(int n, int nrhs, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void sgesv(int n, int nrhs, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void sgesvd(String jobu, String jobvt, int m, int n, float[] a, int lda, float[] s, float[] u, int ldu, float[] vt, int ldvt, float[] work, int lwork, org.netlib.util.intW info); - public void sgesvd(String jobu, String jobvt, int m, int n, float[] a, int _a_offset, int lda, float[] s, int _s_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sgesvd(String jobu, String jobvt, int m, int n, float[] a, int offseta, int lda, float[] s, int offsets, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int ldvt, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgesvx(String fact, String trans, int n, int nrhs, float[] a, int lda, float[] af, int ldaf, int[] ipiv, org.netlib.util.StringW equed, float[] r, float[] c, float[] b, int ldb, float[] x, int ldx, org.netlib.util.floatW rcond, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info); - public void sgesvx(String fact, String trans, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, org.netlib.util.StringW equed, float[] r, int _r_offset, float[] c, int _c_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void sgesvx(String fact, String trans, int n, int nrhs, float[] a, int offseta, int lda, float[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, org.netlib.util.StringW equed, float[] r, int offsetr, float[] c, int offsetc, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sgetc2(int n, float[] a, int lda, int[] ipiv, int[] jpiv, org.netlib.util.intW info); - public void sgetc2(int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset, org.netlib.util.intW info); + public void sgetc2(int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, int[] jpiv, int offsetjpiv, org.netlib.util.intW info); public void sgetf2(int m, int n, float[] a, int lda, int[] ipiv, org.netlib.util.intW info); - public void sgetf2(int m, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + public void sgetf2(int m, int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, org.netlib.util.intW info); public void sgetrf(int m, int n, float[] a, int lda, int[] ipiv, org.netlib.util.intW info); - public void sgetrf(int m, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + public void sgetrf(int m, int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, org.netlib.util.intW info); public void sgetri(int n, float[] a, int lda, int[] ipiv, float[] work, int lwork, org.netlib.util.intW info); - public void sgetri(int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sgetri(int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgetrs(String trans, int n, int nrhs, float[] a, int lda, int[] ipiv, float[] b, int ldb, org.netlib.util.intW info); - public void sgetrs(String trans, int n, int nrhs, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void sgetrs(String trans, int n, int nrhs, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void sggbak(String job, String side, int n, int ilo, int ihi, float[] lscale, float[] rscale, int m, float[] v, int ldv, org.netlib.util.intW info); - public void sggbak(String job, String side, int n, int ilo, int ihi, float[] lscale, int _lscale_offset, float[] rscale, int _rscale_offset, int m, float[] v, int _v_offset, int ldv, org.netlib.util.intW info); + public void sggbak(String job, String side, int n, int ilo, int ihi, float[] lscale, int offsetlscale, float[] rscale, int offsetrscale, int m, float[] v, int offsetv, int ldv, org.netlib.util.intW info); public void sggbal(String job, int n, float[] a, int lda, float[] b, int ldb, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] lscale, float[] rscale, float[] work, org.netlib.util.intW info); - public void sggbal(String job, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] lscale, int _lscale_offset, float[] rscale, int _rscale_offset, float[] work, int _work_offset, org.netlib.util.intW info); + public void sggbal(String job, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] lscale, int offsetlscale, float[] rscale, int offsetrscale, float[] work, int offsetwork, org.netlib.util.intW info); public void sgges(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, int n, float[] a, int lda, float[] b, int ldb, org.netlib.util.intW sdim, float[] alphar, float[] alphai, float[] beta, float[] vsl, int ldvsl, float[] vsr, int ldvsr, float[] work, int lwork, boolean[] bwork, org.netlib.util.intW info); - public void sgges(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW sdim, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vsl, int _vsl_offset, int ldvsl, float[] vsr, int _vsr_offset, int ldvsr, float[] work, int _work_offset, int lwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + public void sgges(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW sdim, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] vsl, int offsetvsl, int ldvsl, float[] vsr, int offsetvsr, int ldvsr, float[] work, int offsetwork, int lwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info); public void sggesx(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, String sense, int n, float[] a, int lda, float[] b, int ldb, org.netlib.util.intW sdim, float[] alphar, float[] alphai, float[] beta, float[] vsl, int ldvsl, float[] vsr, int ldvsr, float[] rconde, float[] rcondv, float[] work, int lwork, int[] iwork, int liwork, boolean[] bwork, org.netlib.util.intW info); - public void sggesx(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, String sense, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW sdim, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vsl, int _vsl_offset, int ldvsl, float[] vsr, int _vsr_offset, int ldvsr, float[] rconde, int _rconde_offset, float[] rcondv, int _rcondv_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + public void sggesx(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, String sense, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW sdim, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] vsl, int offsetvsl, int ldvsl, float[] vsr, int offsetvsr, int ldvsr, float[] rconde, int offsetrconde, float[] rcondv, int offsetrcondv, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info); public void sggev(String jobvl, String jobvr, int n, float[] a, int lda, float[] b, int ldb, float[] alphar, float[] alphai, float[] beta, float[] vl, int ldvl, float[] vr, int ldvr, float[] work, int lwork, org.netlib.util.intW info); - public void sggev(String jobvl, String jobvr, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sggev(String jobvl, String jobvr, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sggevx(String balanc, String jobvl, String jobvr, String sense, int n, float[] a, int lda, float[] b, int ldb, float[] alphar, float[] alphai, float[] beta, float[] vl, int ldvl, float[] vr, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] lscale, float[] rscale, org.netlib.util.floatW abnrm, org.netlib.util.floatW bbnrm, float[] rconde, float[] rcondv, float[] work, int lwork, int[] iwork, boolean[] bwork, org.netlib.util.intW info); - public void sggevx(String balanc, String jobvl, String jobvr, String sense, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] lscale, int _lscale_offset, float[] rscale, int _rscale_offset, org.netlib.util.floatW abnrm, org.netlib.util.floatW bbnrm, float[] rconde, int _rconde_offset, float[] rcondv, int _rcondv_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + public void sggevx(String balanc, String jobvl, String jobvr, String sense, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] lscale, int offsetlscale, float[] rscale, int offsetrscale, org.netlib.util.floatW abnrm, org.netlib.util.floatW bbnrm, float[] rconde, int offsetrconde, float[] rcondv, int offsetrcondv, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info); public void sggglm(int n, int m, int p, float[] a, int lda, float[] b, int ldb, float[] d, float[] x, float[] y, float[] work, int lwork, org.netlib.util.intW info); - public void sggglm(int n, int m, int p, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] d, int _d_offset, float[] x, int _x_offset, float[] y, int _y_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sggglm(int n, int m, int p, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] d, int offsetd, float[] x, int offsetx, float[] y, int offsety, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgghrd(String compq, String compz, int n, int ilo, int ihi, float[] a, int lda, float[] b, int ldb, float[] q, int ldq, float[] z, int ldz, org.netlib.util.intW info); - public void sgghrd(String compq, String compz, int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, org.netlib.util.intW info); + public void sgghrd(String compq, String compz, int n, int ilo, int ihi, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] q, int offsetq, int ldq, float[] z, int offsetz, int ldz, org.netlib.util.intW info); public void sgglse(int m, int n, int p, float[] a, int lda, float[] b, int ldb, float[] c, float[] d, float[] x, float[] work, int lwork, org.netlib.util.intW info); - public void sgglse(int m, int n, int p, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] c, int _c_offset, float[] d, int _d_offset, float[] x, int _x_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sgglse(int m, int n, int p, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] c, int offsetc, float[] d, int offsetd, float[] x, int offsetx, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sggqrf(int n, int m, int p, float[] a, int lda, float[] taua, float[] b, int ldb, float[] taub, float[] work, int lwork, org.netlib.util.intW info); - public void sggqrf(int n, int m, int p, float[] a, int _a_offset, int lda, float[] taua, int _taua_offset, float[] b, int _b_offset, int ldb, float[] taub, int _taub_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sggqrf(int n, int m, int p, float[] a, int offseta, int lda, float[] taua, int offsettaua, float[] b, int offsetb, int ldb, float[] taub, int offsettaub, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sggrqf(int m, int p, int n, float[] a, int lda, float[] taua, float[] b, int ldb, float[] taub, float[] work, int lwork, org.netlib.util.intW info); - public void sggrqf(int m, int p, int n, float[] a, int _a_offset, int lda, float[] taua, int _taua_offset, float[] b, int _b_offset, int ldb, float[] taub, int _taub_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sggrqf(int m, int p, int n, float[] a, int offseta, int lda, float[] taua, int offsettaua, float[] b, int offsetb, int ldb, float[] taub, int offsettaub, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sggsvd(String jobu, String jobv, String jobq, int m, int n, int p, org.netlib.util.intW k, org.netlib.util.intW l, float[] a, int lda, float[] b, int ldb, float[] alpha, float[] beta, float[] u, int ldu, float[] v, int ldv, float[] q, int ldq, float[] work, int[] iwork, org.netlib.util.intW info); - public void sggsvd(String jobu, String jobv, String jobq, int m, int n, int p, org.netlib.util.intW k, org.netlib.util.intW l, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alpha, int _alpha_offset, float[] beta, int _beta_offset, float[] u, int _u_offset, int ldu, float[] v, int _v_offset, int ldv, float[] q, int _q_offset, int ldq, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void sggsvd(String jobu, String jobv, String jobq, int m, int n, int p, org.netlib.util.intW k, org.netlib.util.intW l, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alpha, int offsetalpha, float[] beta, int offsetbeta, float[] u, int offsetu, int ldu, float[] v, int offsetv, int ldv, float[] q, int offsetq, int ldq, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sggsvp(String jobu, String jobv, String jobq, int m, int p, int n, float[] a, int lda, float[] b, int ldb, float tola, float tolb, org.netlib.util.intW k, org.netlib.util.intW l, float[] u, int ldu, float[] v, int ldv, float[] q, int ldq, int[] iwork, float[] tau, float[] work, org.netlib.util.intW info); - public void sggsvp(String jobu, String jobv, String jobq, int m, int p, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float tola, float tolb, org.netlib.util.intW k, org.netlib.util.intW l, float[] u, int _u_offset, int ldu, float[] v, int _v_offset, int ldv, float[] q, int _q_offset, int ldq, int[] iwork, int _iwork_offset, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + public void sggsvp(String jobu, String jobv, String jobq, int m, int p, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float tola, float tolb, org.netlib.util.intW k, org.netlib.util.intW l, float[] u, int offsetu, int ldu, float[] v, int offsetv, int ldv, float[] q, int offsetq, int ldq, int[] iwork, int offsetiwork, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); public void sgtcon(String norm, int n, float[] dl, float[] d, float[] du, float[] du2, int[] ipiv, float anorm, org.netlib.util.floatW rcond, float[] work, int[] iwork, org.netlib.util.intW info); - public void sgtcon(String norm, int n, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void sgtcon(String norm, int n, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] du2, int offsetdu2, int[] ipiv, int offsetipiv, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sgtrfs(String trans, int n, int nrhs, float[] dl, float[] d, float[] du, float[] dlf, float[] df, float[] duf, float[] du2, int[] ipiv, float[] b, int ldb, float[] x, int ldx, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info); - public void sgtrfs(String trans, int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] dlf, int _dlf_offset, float[] df, int _df_offset, float[] duf, int _duf_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void sgtrfs(String trans, int n, int nrhs, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] dlf, int offsetdlf, float[] df, int offsetdf, float[] duf, int offsetduf, float[] du2, int offsetdu2, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sgtsv(int n, int nrhs, float[] dl, float[] d, float[] du, float[] b, int ldb, org.netlib.util.intW info); - public void sgtsv(int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void sgtsv(int n, int nrhs, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void sgtsvx(String fact, String trans, int n, int nrhs, float[] dl, float[] d, float[] du, float[] dlf, float[] df, float[] duf, float[] du2, int[] ipiv, float[] b, int ldb, float[] x, int ldx, org.netlib.util.floatW rcond, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info); - public void sgtsvx(String fact, String trans, int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] dlf, int _dlf_offset, float[] df, int _df_offset, float[] duf, int _duf_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void sgtsvx(String fact, String trans, int n, int nrhs, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] dlf, int offsetdlf, float[] df, int offsetdf, float[] duf, int offsetduf, float[] du2, int offsetdu2, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sgttrf(int n, float[] dl, float[] d, float[] du, float[] du2, int[] ipiv, org.netlib.util.intW info); - public void sgttrf(int n, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + public void sgttrf(int n, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] du2, int offsetdu2, int[] ipiv, int offsetipiv, org.netlib.util.intW info); public void sgttrs(String trans, int n, int nrhs, float[] dl, float[] d, float[] du, float[] du2, int[] ipiv, float[] b, int ldb, org.netlib.util.intW info); - public void sgttrs(String trans, int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void sgttrs(String trans, int n, int nrhs, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] du2, int offsetdu2, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void sgtts2(int itrans, int n, int nrhs, float[] dl, float[] d, float[] du, float[] du2, int[] ipiv, float[] b, int ldb); - public void sgtts2(int itrans, int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb); + public void sgtts2(int itrans, int n, int nrhs, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] du2, int offsetdu2, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb); public void shgeqz(String job, String compq, String compz, int n, int ilo, int ihi, float[] h, int ldh, float[] t, int ldt, float[] alphar, float[] alphai, float[] beta, float[] q, int ldq, float[] z, int ldz, float[] work, int lwork, org.netlib.util.intW info); - public void shgeqz(String job, String compq, String compz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] t, int _t_offset, int ldt, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void shgeqz(String job, String compq, String compz, int n, int ilo, int ihi, float[] h, int offseth, int ldh, float[] t, int offsett, int ldt, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] q, int offsetq, int ldq, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void shsein(String side, String eigsrc, String initv, boolean[] select, int n, float[] h, int ldh, float[] wr, float[] wi, float[] vl, int ldvl, float[] vr, int ldvr, int mm, org.netlib.util.intW m, float[] work, int[] ifaill, int[] ifailr, org.netlib.util.intW info); - public void shsein(String side, String eigsrc, String initv, boolean[] select, int _select_offset, int n, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, float[] work, int _work_offset, int[] ifaill, int _ifaill_offset, int[] ifailr, int _ifailr_offset, org.netlib.util.intW info); + public void shsein(String side, String eigsrc, String initv, boolean[] select, int offsetselect, int n, float[] h, int offseth, int ldh, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, int mm, org.netlib.util.intW m, float[] work, int offsetwork, int[] ifaill, int offsetifaill, int[] ifailr, int offsetifailr, org.netlib.util.intW info); public void shseqr(String job, String compz, int n, int ilo, int ihi, float[] h, int ldh, float[] wr, float[] wi, float[] z, int ldz, float[] work, int lwork, org.netlib.util.intW info); - public void shseqr(String job, String compz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void shseqr(String job, String compz, int n, int ilo, int ihi, float[] h, int offseth, int ldh, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public boolean sisnan(float sin); public void slabad(org.netlib.util.floatW small, org.netlib.util.floatW large); public void slabrd(int m, int n, int nb, float[] a, int lda, float[] d, float[] e, float[] tauq, float[] taup, float[] x, int ldx, float[] y, int ldy); - public void slabrd(int m, int n, int nb, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tauq, int _tauq_offset, float[] taup, int _taup_offset, float[] x, int _x_offset, int ldx, float[] y, int _y_offset, int ldy); + public void slabrd(int m, int n, int nb, float[] a, int offseta, int lda, float[] d, int offsetd, float[] e, int offsete, float[] tauq, int offsettauq, float[] taup, int offsettaup, float[] x, int offsetx, int ldx, float[] y, int offsety, int ldy); public void slacn2(int n, float[] v, float[] x, int[] isgn, org.netlib.util.floatW est, org.netlib.util.intW kase, int[] isave); - public void slacn2(int n, float[] v, int _v_offset, float[] x, int _x_offset, int[] isgn, int _isgn_offset, org.netlib.util.floatW est, org.netlib.util.intW kase, int[] isave, int _isave_offset); + public void slacn2(int n, float[] v, int offsetv, float[] x, int offsetx, int[] isgn, int offsetisgn, org.netlib.util.floatW est, org.netlib.util.intW kase, int[] isave, int offsetisave); public void slacon(int n, float[] v, float[] x, int[] isgn, org.netlib.util.floatW est, org.netlib.util.intW kase); - public void slacon(int n, float[] v, int _v_offset, float[] x, int _x_offset, int[] isgn, int _isgn_offset, org.netlib.util.floatW est, org.netlib.util.intW kase); + public void slacon(int n, float[] v, int offsetv, float[] x, int offsetx, int[] isgn, int offsetisgn, org.netlib.util.floatW est, org.netlib.util.intW kase); public void slacpy(String uplo, int m, int n, float[] a, int lda, float[] b, int ldb); - public void slacpy(String uplo, int m, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb); + public void slacpy(String uplo, int m, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb); public void sladiv(float a, float b, float c, float d, org.netlib.util.floatW p, org.netlib.util.floatW q); public void slae2(float a, float b, float c, org.netlib.util.floatW rt1, org.netlib.util.floatW rt2); public void slaebz(int ijob, int nitmax, int n, int mmax, int minp, int nbmin, float abstol, float reltol, float pivmin, float[] d, float[] e, float[] e2, int[] nval, float[] ab, float[] c, org.netlib.util.intW mout, int[] nab, float[] work, int[] iwork, org.netlib.util.intW info); - public void slaebz(int ijob, int nitmax, int n, int mmax, int minp, int nbmin, float abstol, float reltol, float pivmin, float[] d, int _d_offset, float[] e, int _e_offset, float[] e2, int _e2_offset, int[] nval, int _nval_offset, float[] ab, int _ab_offset, float[] c, int _c_offset, org.netlib.util.intW mout, int[] nab, int _nab_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void slaebz(int ijob, int nitmax, int n, int mmax, int minp, int nbmin, float abstol, float reltol, float pivmin, float[] d, int offsetd, float[] e, int offsete, float[] e2, int offsete2, int[] nval, int offsetnval, float[] ab, int offsetab, float[] c, int offsetc, org.netlib.util.intW mout, int[] nab, int offsetnab, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void slaed0(int icompq, int qsiz, int n, float[] d, float[] e, float[] q, int ldq, float[] qstore, int ldqs, float[] work, int[] iwork, org.netlib.util.intW info); - public void slaed0(int icompq, int qsiz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] q, int _q_offset, int ldq, float[] qstore, int _qstore_offset, int ldqs, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void slaed0(int icompq, int qsiz, int n, float[] d, int offsetd, float[] e, int offsete, float[] q, int offsetq, int ldq, float[] qstore, int offsetqstore, int ldqs, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void slaed1(int n, float[] d, float[] q, int ldq, int[] indxq, org.netlib.util.floatW rho, int cutpnt, float[] work, int[] iwork, org.netlib.util.intW info); - public void slaed1(int n, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.floatW rho, int cutpnt, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void slaed1(int n, float[] d, int offsetd, float[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.floatW rho, int cutpnt, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void slaed2(org.netlib.util.intW k, int n, int n1, float[] d, float[] q, int ldq, int[] indxq, org.netlib.util.floatW rho, float[] z, float[] dlamda, float[] w, float[] q2, int[] indx, int[] indxc, int[] indxp, int[] coltyp, org.netlib.util.intW info); - public void slaed2(org.netlib.util.intW k, int n, int n1, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.floatW rho, float[] z, int _z_offset, float[] dlamda, int _dlamda_offset, float[] w, int _w_offset, float[] q2, int _q2_offset, int[] indx, int _indx_offset, int[] indxc, int _indxc_offset, int[] indxp, int _indxp_offset, int[] coltyp, int _coltyp_offset, org.netlib.util.intW info); + public void slaed2(org.netlib.util.intW k, int n, int n1, float[] d, int offsetd, float[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.floatW rho, float[] z, int offsetz, float[] dlamda, int offsetdlamda, float[] w, int offsetw, float[] q2, int offsetq2, int[] indx, int offsetindx, int[] indxc, int offsetindxc, int[] indxp, int offsetindxp, int[] coltyp, int offsetcoltyp, org.netlib.util.intW info); public void slaed3(int k, int n, int n1, float[] d, float[] q, int ldq, float rho, float[] dlamda, float[] q2, int[] indx, int[] ctot, float[] w, float[] s, org.netlib.util.intW info); - public void slaed3(int k, int n, int n1, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, float rho, float[] dlamda, int _dlamda_offset, float[] q2, int _q2_offset, int[] indx, int _indx_offset, int[] ctot, int _ctot_offset, float[] w, int _w_offset, float[] s, int _s_offset, org.netlib.util.intW info); + public void slaed3(int k, int n, int n1, float[] d, int offsetd, float[] q, int offsetq, int ldq, float rho, float[] dlamda, int offsetdlamda, float[] q2, int offsetq2, int[] indx, int offsetindx, int[] ctot, int offsetctot, float[] w, int offsetw, float[] s, int offsets, org.netlib.util.intW info); public void slaed4(int n, int i, float[] d, float[] z, float[] delta, float rho, org.netlib.util.floatW dlam, org.netlib.util.intW info); - public void slaed4(int n, int i, float[] d, int _d_offset, float[] z, int _z_offset, float[] delta, int _delta_offset, float rho, org.netlib.util.floatW dlam, org.netlib.util.intW info); + public void slaed4(int n, int i, float[] d, int offsetd, float[] z, int offsetz, float[] delta, int offsetdelta, float rho, org.netlib.util.floatW dlam, org.netlib.util.intW info); public void slaed5(int i, float[] d, float[] z, float[] delta, float rho, org.netlib.util.floatW dlam); - public void slaed5(int i, float[] d, int _d_offset, float[] z, int _z_offset, float[] delta, int _delta_offset, float rho, org.netlib.util.floatW dlam); + public void slaed5(int i, float[] d, int offsetd, float[] z, int offsetz, float[] delta, int offsetdelta, float rho, org.netlib.util.floatW dlam); public void slaed6(int kniter, boolean orgati, float rho, float[] d, float[] z, float finit, org.netlib.util.floatW tau, org.netlib.util.intW info); - public void slaed6(int kniter, boolean orgati, float rho, float[] d, int _d_offset, float[] z, int _z_offset, float finit, org.netlib.util.floatW tau, org.netlib.util.intW info); + public void slaed6(int kniter, boolean orgati, float rho, float[] d, int offsetd, float[] z, int offsetz, float finit, org.netlib.util.floatW tau, org.netlib.util.intW info); public void slaed7(int icompq, int n, int qsiz, int tlvls, int curlvl, int curpbm, float[] d, float[] q, int ldq, int[] indxq, org.netlib.util.floatW rho, int cutpnt, float[] qstore, int[] qptr, int[] prmptr, int[] perm, int[] givptr, int[] givcol, float[] givnum, float[] work, int[] iwork, org.netlib.util.intW info); - public void slaed7(int icompq, int n, int qsiz, int tlvls, int curlvl, int curpbm, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.floatW rho, int cutpnt, float[] qstore, int _qstore_offset, int[] qptr, int _qptr_offset, int[] prmptr, int _prmptr_offset, int[] perm, int _perm_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, float[] givnum, int _givnum_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void slaed7(int icompq, int n, int qsiz, int tlvls, int curlvl, int curpbm, float[] d, int offsetd, float[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.floatW rho, int cutpnt, float[] qstore, int offsetqstore, int[] qptr, int offsetqptr, int[] prmptr, int offsetprmptr, int[] perm, int offsetperm, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, float[] givnum, int offsetgivnum, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void slaed8(int icompq, org.netlib.util.intW k, int n, int qsiz, float[] d, float[] q, int ldq, int[] indxq, org.netlib.util.floatW rho, int cutpnt, float[] z, float[] dlamda, float[] q2, int ldq2, float[] w, int[] perm, org.netlib.util.intW givptr, int[] givcol, float[] givnum, int[] indxp, int[] indx, org.netlib.util.intW info); - public void slaed8(int icompq, org.netlib.util.intW k, int n, int qsiz, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.floatW rho, int cutpnt, float[] z, int _z_offset, float[] dlamda, int _dlamda_offset, float[] q2, int _q2_offset, int ldq2, float[] w, int _w_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, float[] givnum, int _givnum_offset, int[] indxp, int _indxp_offset, int[] indx, int _indx_offset, org.netlib.util.intW info); + public void slaed8(int icompq, org.netlib.util.intW k, int n, int qsiz, float[] d, int offsetd, float[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.floatW rho, int cutpnt, float[] z, int offsetz, float[] dlamda, int offsetdlamda, float[] q2, int offsetq2, int ldq2, float[] w, int offsetw, int[] perm, int offsetperm, org.netlib.util.intW givptr, int[] givcol, int offsetgivcol, float[] givnum, int offsetgivnum, int[] indxp, int offsetindxp, int[] indx, int offsetindx, org.netlib.util.intW info); public void slaed9(int k, int kstart, int kstop, int n, float[] d, float[] q, int ldq, float rho, float[] dlamda, float[] w, float[] s, int lds, org.netlib.util.intW info); - public void slaed9(int k, int kstart, int kstop, int n, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, float rho, float[] dlamda, int _dlamda_offset, float[] w, int _w_offset, float[] s, int _s_offset, int lds, org.netlib.util.intW info); + public void slaed9(int k, int kstart, int kstop, int n, float[] d, int offsetd, float[] q, int offsetq, int ldq, float rho, float[] dlamda, int offsetdlamda, float[] w, int offsetw, float[] s, int offsets, int lds, org.netlib.util.intW info); public void slaeda(int n, int tlvls, int curlvl, int curpbm, int[] prmptr, int[] perm, int[] givptr, int[] givcol, float[] givnum, float[] q, int[] qptr, float[] z, float[] ztemp, org.netlib.util.intW info); - public void slaeda(int n, int tlvls, int curlvl, int curpbm, int[] prmptr, int _prmptr_offset, int[] perm, int _perm_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, float[] givnum, int _givnum_offset, float[] q, int _q_offset, int[] qptr, int _qptr_offset, float[] z, int _z_offset, float[] ztemp, int _ztemp_offset, org.netlib.util.intW info); + public void slaeda(int n, int tlvls, int curlvl, int curpbm, int[] prmptr, int offsetprmptr, int[] perm, int offsetperm, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, float[] givnum, int offsetgivnum, float[] q, int offsetq, int[] qptr, int offsetqptr, float[] z, int offsetz, float[] ztemp, int offsetztemp, org.netlib.util.intW info); public void slaein(boolean rightv, boolean noinit, int n, float[] h, int ldh, float wr, float wi, float[] vr, float[] vi, float[] b, int ldb, float[] work, float eps3, float smlnum, float bignum, org.netlib.util.intW info); - public void slaein(boolean rightv, boolean noinit, int n, float[] h, int _h_offset, int ldh, float wr, float wi, float[] vr, int _vr_offset, float[] vi, int _vi_offset, float[] b, int _b_offset, int ldb, float[] work, int _work_offset, float eps3, float smlnum, float bignum, org.netlib.util.intW info); + public void slaein(boolean rightv, boolean noinit, int n, float[] h, int offseth, int ldh, float wr, float wi, float[] vr, int offsetvr, float[] vi, int offsetvi, float[] b, int offsetb, int ldb, float[] work, int offsetwork, float eps3, float smlnum, float bignum, org.netlib.util.intW info); public void slaev2(float a, float b, float c, org.netlib.util.floatW rt1, org.netlib.util.floatW rt2, org.netlib.util.floatW cs1, org.netlib.util.floatW sn1); public void slaexc(boolean wantq, int n, float[] t, int ldt, float[] q, int ldq, int j1, int n1, int n2, float[] work, org.netlib.util.intW info); - public void slaexc(boolean wantq, int n, float[] t, int _t_offset, int ldt, float[] q, int _q_offset, int ldq, int j1, int n1, int n2, float[] work, int _work_offset, org.netlib.util.intW info); + public void slaexc(boolean wantq, int n, float[] t, int offsett, int ldt, float[] q, int offsetq, int ldq, int j1, int n1, int n2, float[] work, int offsetwork, org.netlib.util.intW info); public void slag2(float[] a, int lda, float[] b, int ldb, float safmin, org.netlib.util.floatW scale1, org.netlib.util.floatW scale2, org.netlib.util.floatW wr1, org.netlib.util.floatW wr2, org.netlib.util.floatW wi); - public void slag2(float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float safmin, org.netlib.util.floatW scale1, org.netlib.util.floatW scale2, org.netlib.util.floatW wr1, org.netlib.util.floatW wr2, org.netlib.util.floatW wi); + public void slag2(float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float safmin, org.netlib.util.floatW scale1, org.netlib.util.floatW scale2, org.netlib.util.floatW wr1, org.netlib.util.floatW wr2, org.netlib.util.floatW wi); public void slag2d(int m, int n, float[] sa, int ldsa, double[] a, int lda, org.netlib.util.intW info); - public void slag2d(int m, int n, float[] sa, int _sa_offset, int ldsa, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + public void slag2d(int m, int n, float[] sa, int offsetsa, int ldsa, double[] a, int offseta, int lda, org.netlib.util.intW info); public void slags2(boolean upper, float a1, float a2, float a3, float b1, float b2, float b3, org.netlib.util.floatW csu, org.netlib.util.floatW snu, org.netlib.util.floatW csv, org.netlib.util.floatW snv, org.netlib.util.floatW csq, org.netlib.util.floatW snq); public void slagtf(int n, float[] a, float lambda, float[] b, float[] c, float tol, float[] d, int[] in, org.netlib.util.intW info); - public void slagtf(int n, float[] a, int _a_offset, float lambda, float[] b, int _b_offset, float[] c, int _c_offset, float tol, float[] d, int _d_offset, int[] in, int _in_offset, org.netlib.util.intW info); + public void slagtf(int n, float[] a, int offseta, float lambda, float[] b, int offsetb, float[] c, int offsetc, float tol, float[] d, int offsetd, int[] in, int offsetin, org.netlib.util.intW info); public void slagtm(String trans, int n, int nrhs, float alpha, float[] dl, float[] d, float[] du, float[] x, int ldx, float beta, float[] b, int ldb); - public void slagtm(String trans, int n, int nrhs, float alpha, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] x, int _x_offset, int ldx, float beta, float[] b, int _b_offset, int ldb); + public void slagtm(String trans, int n, int nrhs, float alpha, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] x, int offsetx, int ldx, float beta, float[] b, int offsetb, int ldb); public void slagts(int job, int n, float[] a, float[] b, float[] c, float[] d, int[] in, float[] y, org.netlib.util.floatW tol, org.netlib.util.intW info); - public void slagts(int job, int n, float[] a, int _a_offset, float[] b, int _b_offset, float[] c, int _c_offset, float[] d, int _d_offset, int[] in, int _in_offset, float[] y, int _y_offset, org.netlib.util.floatW tol, org.netlib.util.intW info); + public void slagts(int job, int n, float[] a, int offseta, float[] b, int offsetb, float[] c, int offsetc, float[] d, int offsetd, int[] in, int offsetin, float[] y, int offsety, org.netlib.util.floatW tol, org.netlib.util.intW info); public void slagv2(float[] a, int lda, float[] b, int ldb, float[] alphar, float[] alphai, float[] beta, org.netlib.util.floatW csl, org.netlib.util.floatW snl, org.netlib.util.floatW csr, org.netlib.util.floatW snr); - public void slagv2(float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, org.netlib.util.floatW csl, org.netlib.util.floatW snl, org.netlib.util.floatW csr, org.netlib.util.floatW snr); + public void slagv2(float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, org.netlib.util.floatW csl, org.netlib.util.floatW snl, org.netlib.util.floatW csr, org.netlib.util.floatW snr); public void slahqr(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int ldh, float[] wr, float[] wi, int iloz, int ihiz, float[] z, int ldz, org.netlib.util.intW info); - public void slahqr(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, int iloz, int ihiz, float[] z, int _z_offset, int ldz, org.netlib.util.intW info); + public void slahqr(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int offseth, int ldh, float[] wr, int offsetwr, float[] wi, int offsetwi, int iloz, int ihiz, float[] z, int offsetz, int ldz, org.netlib.util.intW info); public void slahr2(int n, int k, int nb, float[] a, int lda, float[] tau, float[] t, int ldt, float[] y, int ldy); - public void slahr2(int n, int k, int nb, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] t, int _t_offset, int ldt, float[] y, int _y_offset, int ldy); + public void slahr2(int n, int k, int nb, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] t, int offsett, int ldt, float[] y, int offsety, int ldy); public void slahrd(int n, int k, int nb, float[] a, int lda, float[] tau, float[] t, int ldt, float[] y, int ldy); - public void slahrd(int n, int k, int nb, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] t, int _t_offset, int ldt, float[] y, int _y_offset, int ldy); + public void slahrd(int n, int k, int nb, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] t, int offsett, int ldt, float[] y, int offsety, int ldy); public void slaic1(int job, int j, float[] x, float sest, float[] w, float gamma, org.netlib.util.floatW sestpr, org.netlib.util.floatW s, org.netlib.util.floatW c); - public void slaic1(int job, int j, float[] x, int _x_offset, float sest, float[] w, int _w_offset, float gamma, org.netlib.util.floatW sestpr, org.netlib.util.floatW s, org.netlib.util.floatW c); + public void slaic1(int job, int j, float[] x, int offsetx, float sest, float[] w, int offsetw, float gamma, org.netlib.util.floatW sestpr, org.netlib.util.floatW s, org.netlib.util.floatW c); public boolean slaisnan(float sin1, float sin2); public void slaln2(boolean ltrans, int na, int nw, float smin, float ca, float[] a, int lda, float d1, float d2, float[] b, int ldb, float wr, float wi, float[] x, int ldx, org.netlib.util.floatW scale, org.netlib.util.floatW xnorm, org.netlib.util.intW info); - public void slaln2(boolean ltrans, int na, int nw, float smin, float ca, float[] a, int _a_offset, int lda, float d1, float d2, float[] b, int _b_offset, int ldb, float wr, float wi, float[] x, int _x_offset, int ldx, org.netlib.util.floatW scale, org.netlib.util.floatW xnorm, org.netlib.util.intW info); + public void slaln2(boolean ltrans, int na, int nw, float smin, float ca, float[] a, int offseta, int lda, float d1, float d2, float[] b, int offsetb, int ldb, float wr, float wi, float[] x, int offsetx, int ldx, org.netlib.util.floatW scale, org.netlib.util.floatW xnorm, org.netlib.util.intW info); public void slals0(int icompq, int nl, int nr, int sqre, int nrhs, float[] b, int ldb, float[] bx, int ldbx, int[] perm, int givptr, int[] givcol, int ldgcol, float[] givnum, int ldgnum, float[] poles, float[] difl, float[] difr, float[] z, int k, float c, float s, float[] work, org.netlib.util.intW info); - public void slals0(int icompq, int nl, int nr, int sqre, int nrhs, float[] b, int _b_offset, int ldb, float[] bx, int _bx_offset, int ldbx, int[] perm, int _perm_offset, int givptr, int[] givcol, int _givcol_offset, int ldgcol, float[] givnum, int _givnum_offset, int ldgnum, float[] poles, int _poles_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, float[] z, int _z_offset, int k, float c, float s, float[] work, int _work_offset, org.netlib.util.intW info); + public void slals0(int icompq, int nl, int nr, int sqre, int nrhs, float[] b, int offsetb, int ldb, float[] bx, int offsetbx, int ldbx, int[] perm, int offsetperm, int givptr, int[] givcol, int offsetgivcol, int ldgcol, float[] givnum, int offsetgivnum, int ldgnum, float[] poles, int offsetpoles, float[] difl, int offsetdifl, float[] difr, int offsetdifr, float[] z, int offsetz, int k, float c, float s, float[] work, int offsetwork, org.netlib.util.intW info); public void slalsa(int icompq, int smlsiz, int n, int nrhs, float[] b, int ldb, float[] bx, int ldbx, float[] u, int ldu, float[] vt, int[] k, float[] difl, float[] difr, float[] z, float[] poles, int[] givptr, int[] givcol, int ldgcol, int[] perm, float[] givnum, float[] c, float[] s, float[] work, int[] iwork, org.netlib.util.intW info); - public void slalsa(int icompq, int smlsiz, int n, int nrhs, float[] b, int _b_offset, int ldb, float[] bx, int _bx_offset, int ldbx, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int[] k, int _k_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, float[] z, int _z_offset, float[] poles, int _poles_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, int ldgcol, int[] perm, int _perm_offset, float[] givnum, int _givnum_offset, float[] c, int _c_offset, float[] s, int _s_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void slalsa(int icompq, int smlsiz, int n, int nrhs, float[] b, int offsetb, int ldb, float[] bx, int offsetbx, int ldbx, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int[] k, int offsetk, float[] difl, int offsetdifl, float[] difr, int offsetdifr, float[] z, int offsetz, float[] poles, int offsetpoles, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, int ldgcol, int[] perm, int offsetperm, float[] givnum, int offsetgivnum, float[] c, int offsetc, float[] s, int offsets, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void slalsd(String uplo, int smlsiz, int n, int nrhs, float[] d, float[] e, float[] b, int ldb, float rcond, org.netlib.util.intW rank, float[] work, int[] iwork, org.netlib.util.intW info); - public void slalsd(String uplo, int smlsiz, int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] b, int _b_offset, int ldb, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void slalsd(String uplo, int smlsiz, int n, int nrhs, float[] d, int offsetd, float[] e, int offsete, float[] b, int offsetb, int ldb, float rcond, org.netlib.util.intW rank, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void slamrg(int n1, int n2, float[] a, int strd1, int strd2, int[] index); - public void slamrg(int n1, int n2, float[] a, int _a_offset, int strd1, int strd2, int[] index, int _index_offset); + public void slamrg(int n1, int n2, float[] a, int offseta, int strd1, int strd2, int[] index, int offsetindex); public int slaneg(int n, float[] d, float[] lld, float sigma, float pivmin, int r); - public int slaneg(int n, float[] d, int _d_offset, float[] lld, int _lld_offset, float sigma, float pivmin, int r); + public int slaneg(int n, float[] d, int offsetd, float[] lld, int offsetlld, float sigma, float pivmin, int r); public float slangb(String norm, int n, int kl, int ku, float[] ab, int ldab, float[] work); - public float slangb(String norm, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, float[] work, int _work_offset); + public float slangb(String norm, int n, int kl, int ku, float[] ab, int offsetab, int ldab, float[] work, int offsetwork); public float slange(String norm, int m, int n, float[] a, int lda, float[] work); - public float slange(String norm, int m, int n, float[] a, int _a_offset, int lda, float[] work, int _work_offset); + public float slange(String norm, int m, int n, float[] a, int offseta, int lda, float[] work, int offsetwork); public float slangt(String norm, int n, float[] dl, float[] d, float[] du); - public float slangt(String norm, int n, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset); + public float slangt(String norm, int n, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu); public float slanhs(String norm, int n, float[] a, int lda, float[] work); - public float slanhs(String norm, int n, float[] a, int _a_offset, int lda, float[] work, int _work_offset); + public float slanhs(String norm, int n, float[] a, int offseta, int lda, float[] work, int offsetwork); public float slansb(String norm, String uplo, int n, int k, float[] ab, int ldab, float[] work); - public float slansb(String norm, String uplo, int n, int k, float[] ab, int _ab_offset, int ldab, float[] work, int _work_offset); + public float slansb(String norm, String uplo, int n, int k, float[] ab, int offsetab, int ldab, float[] work, int offsetwork); public float slansp(String norm, String uplo, int n, float[] ap, float[] work); - public float slansp(String norm, String uplo, int n, float[] ap, int _ap_offset, float[] work, int _work_offset); + public float slansp(String norm, String uplo, int n, float[] ap, int offsetap, float[] work, int offsetwork); public float slanst(String norm, int n, float[] d, float[] e); - public float slanst(String norm, int n, float[] d, int _d_offset, float[] e, int _e_offset); + public float slanst(String norm, int n, float[] d, int offsetd, float[] e, int offsete); public float slansy(String norm, String uplo, int n, float[] a, int lda, float[] work); - public float slansy(String norm, String uplo, int n, float[] a, int _a_offset, int lda, float[] work, int _work_offset); + public float slansy(String norm, String uplo, int n, float[] a, int offseta, int lda, float[] work, int offsetwork); public float slantb(String norm, String uplo, String diag, int n, int k, float[] ab, int ldab, float[] work); - public float slantb(String norm, String uplo, String diag, int n, int k, float[] ab, int _ab_offset, int ldab, float[] work, int _work_offset); + public float slantb(String norm, String uplo, String diag, int n, int k, float[] ab, int offsetab, int ldab, float[] work, int offsetwork); public float slantp(String norm, String uplo, String diag, int n, float[] ap, float[] work); - public float slantp(String norm, String uplo, String diag, int n, float[] ap, int _ap_offset, float[] work, int _work_offset); + public float slantp(String norm, String uplo, String diag, int n, float[] ap, int offsetap, float[] work, int offsetwork); public float slantr(String norm, String uplo, String diag, int m, int n, float[] a, int lda, float[] work); - public float slantr(String norm, String uplo, String diag, int m, int n, float[] a, int _a_offset, int lda, float[] work, int _work_offset); + public float slantr(String norm, String uplo, String diag, int m, int n, float[] a, int offseta, int lda, float[] work, int offsetwork); public void slanv2(org.netlib.util.floatW a, org.netlib.util.floatW b, org.netlib.util.floatW c, org.netlib.util.floatW d, org.netlib.util.floatW rt1r, org.netlib.util.floatW rt1i, org.netlib.util.floatW rt2r, org.netlib.util.floatW rt2i, org.netlib.util.floatW cs, org.netlib.util.floatW sn); public void slapll(int n, float[] x, int incx, float[] y, int incy, org.netlib.util.floatW ssmin); - public void slapll(int n, float[] x, int _x_offset, int incx, float[] y, int _y_offset, int incy, org.netlib.util.floatW ssmin); + public void slapll(int n, float[] x, int offsetx, int incx, float[] y, int offsety, int incy, org.netlib.util.floatW ssmin); public void slapmt(boolean forwrd, int m, int n, float[] x, int ldx, int[] k); - public void slapmt(boolean forwrd, int m, int n, float[] x, int _x_offset, int ldx, int[] k, int _k_offset); + public void slapmt(boolean forwrd, int m, int n, float[] x, int offsetx, int ldx, int[] k, int offsetk); public float slapy2(float x, float y); public float slapy3(float x, float y, float z); public void slaqgb(int m, int n, int kl, int ku, float[] ab, int ldab, float[] r, float[] c, float rowcnd, float colcnd, float amax, org.netlib.util.StringW equed); - public void slaqgb(int m, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, float[] r, int _r_offset, float[] c, int _c_offset, float rowcnd, float colcnd, float amax, org.netlib.util.StringW equed); + public void slaqgb(int m, int n, int kl, int ku, float[] ab, int offsetab, int ldab, float[] r, int offsetr, float[] c, int offsetc, float rowcnd, float colcnd, float amax, org.netlib.util.StringW equed); public void slaqge(int m, int n, float[] a, int lda, float[] r, float[] c, float rowcnd, float colcnd, float amax, org.netlib.util.StringW equed); - public void slaqge(int m, int n, float[] a, int _a_offset, int lda, float[] r, int _r_offset, float[] c, int _c_offset, float rowcnd, float colcnd, float amax, org.netlib.util.StringW equed); + public void slaqge(int m, int n, float[] a, int offseta, int lda, float[] r, int offsetr, float[] c, int offsetc, float rowcnd, float colcnd, float amax, org.netlib.util.StringW equed); public void slaqp2(int m, int n, int offset, float[] a, int lda, int[] jpvt, float[] tau, float[] vn1, float[] vn2, float[] work); - public void slaqp2(int m, int n, int offset, float[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, float[] tau, int _tau_offset, float[] vn1, int _vn1_offset, float[] vn2, int _vn2_offset, float[] work, int _work_offset); + public void slaqp2(int m, int n, int offset, float[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, float[] tau, int offsettau, float[] vn1, int offsetvn1, float[] vn2, int offsetvn2, float[] work, int offsetwork); public void slaqps(int m, int n, int offset, int nb, org.netlib.util.intW kb, float[] a, int lda, int[] jpvt, float[] tau, float[] vn1, float[] vn2, float[] auxv, float[] f, int ldf); - public void slaqps(int m, int n, int offset, int nb, org.netlib.util.intW kb, float[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, float[] tau, int _tau_offset, float[] vn1, int _vn1_offset, float[] vn2, int _vn2_offset, float[] auxv, int _auxv_offset, float[] f, int _f_offset, int ldf); + public void slaqps(int m, int n, int offset, int nb, org.netlib.util.intW kb, float[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, float[] tau, int offsettau, float[] vn1, int offsetvn1, float[] vn2, int offsetvn2, float[] auxv, int offsetauxv, float[] f, int offsetf, int ldf); public void slaqr0(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int ldh, float[] wr, float[] wi, int iloz, int ihiz, float[] z, int ldz, float[] work, int lwork, org.netlib.util.intW info); - public void slaqr0(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, int iloz, int ihiz, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void slaqr0(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int offseth, int ldh, float[] wr, int offsetwr, float[] wi, int offsetwi, int iloz, int ihiz, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void slaqr1(int n, float[] h, int ldh, float sr1, float si1, float sr2, float si2, float[] v); - public void slaqr1(int n, float[] h, int _h_offset, int ldh, float sr1, float si1, float sr2, float si2, float[] v, int _v_offset); + public void slaqr1(int n, float[] h, int offseth, int ldh, float sr1, float si1, float sr2, float si2, float[] v, int offsetv); public void slaqr2(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, float[] h, int ldh, int iloz, int ihiz, float[] z, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, float[] sr, float[] si, float[] v, int ldv, int nh, float[] t, int ldt, int nv, float[] wv, int ldwv, float[] work, int lwork); - public void slaqr2(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, float[] h, int _h_offset, int ldh, int iloz, int ihiz, float[] z, int _z_offset, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, float[] sr, int _sr_offset, float[] si, int _si_offset, float[] v, int _v_offset, int ldv, int nh, float[] t, int _t_offset, int ldt, int nv, float[] wv, int _wv_offset, int ldwv, float[] work, int _work_offset, int lwork); + public void slaqr2(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, float[] h, int offseth, int ldh, int iloz, int ihiz, float[] z, int offsetz, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, float[] sr, int offsetsr, float[] si, int offsetsi, float[] v, int offsetv, int ldv, int nh, float[] t, int offsett, int ldt, int nv, float[] wv, int offsetwv, int ldwv, float[] work, int offsetwork, int lwork); public void slaqr3(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, float[] h, int ldh, int iloz, int ihiz, float[] z, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, float[] sr, float[] si, float[] v, int ldv, int nh, float[] t, int ldt, int nv, float[] wv, int ldwv, float[] work, int lwork); - public void slaqr3(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, float[] h, int _h_offset, int ldh, int iloz, int ihiz, float[] z, int _z_offset, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, float[] sr, int _sr_offset, float[] si, int _si_offset, float[] v, int _v_offset, int ldv, int nh, float[] t, int _t_offset, int ldt, int nv, float[] wv, int _wv_offset, int ldwv, float[] work, int _work_offset, int lwork); + public void slaqr3(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, float[] h, int offseth, int ldh, int iloz, int ihiz, float[] z, int offsetz, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, float[] sr, int offsetsr, float[] si, int offsetsi, float[] v, int offsetv, int ldv, int nh, float[] t, int offsett, int ldt, int nv, float[] wv, int offsetwv, int ldwv, float[] work, int offsetwork, int lwork); public void slaqr4(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int ldh, float[] wr, float[] wi, int iloz, int ihiz, float[] z, int ldz, float[] work, int lwork, org.netlib.util.intW info); - public void slaqr4(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, int iloz, int ihiz, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void slaqr4(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int offseth, int ldh, float[] wr, int offsetwr, float[] wi, int offsetwi, int iloz, int ihiz, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void slaqr5(boolean wantt, boolean wantz, int kacc22, int n, int ktop, int kbot, int nshfts, float[] sr, float[] si, float[] h, int ldh, int iloz, int ihiz, float[] z, int ldz, float[] v, int ldv, float[] u, int ldu, int nv, float[] wv, int ldwv, int nh, float[] wh, int ldwh); - public void slaqr5(boolean wantt, boolean wantz, int kacc22, int n, int ktop, int kbot, int nshfts, float[] sr, int _sr_offset, float[] si, int _si_offset, float[] h, int _h_offset, int ldh, int iloz, int ihiz, float[] z, int _z_offset, int ldz, float[] v, int _v_offset, int ldv, float[] u, int _u_offset, int ldu, int nv, float[] wv, int _wv_offset, int ldwv, int nh, float[] wh, int _wh_offset, int ldwh); + public void slaqr5(boolean wantt, boolean wantz, int kacc22, int n, int ktop, int kbot, int nshfts, float[] sr, int offsetsr, float[] si, int offsetsi, float[] h, int offseth, int ldh, int iloz, int ihiz, float[] z, int offsetz, int ldz, float[] v, int offsetv, int ldv, float[] u, int offsetu, int ldu, int nv, float[] wv, int offsetwv, int ldwv, int nh, float[] wh, int offsetwh, int ldwh); public void slaqsb(String uplo, int n, int kd, float[] ab, int ldab, float[] s, float scond, float amax, org.netlib.util.StringW equed); - public void slaqsb(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] s, int _s_offset, float scond, float amax, org.netlib.util.StringW equed); + public void slaqsb(String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float[] s, int offsets, float scond, float amax, org.netlib.util.StringW equed); public void slaqsp(String uplo, int n, float[] ap, float[] s, float scond, float amax, org.netlib.util.StringW equed); - public void slaqsp(String uplo, int n, float[] ap, int _ap_offset, float[] s, int _s_offset, float scond, float amax, org.netlib.util.StringW equed); + public void slaqsp(String uplo, int n, float[] ap, int offsetap, float[] s, int offsets, float scond, float amax, org.netlib.util.StringW equed); public void slaqsy(String uplo, int n, float[] a, int lda, float[] s, float scond, float amax, org.netlib.util.StringW equed); - public void slaqsy(String uplo, int n, float[] a, int _a_offset, int lda, float[] s, int _s_offset, float scond, float amax, org.netlib.util.StringW equed); + public void slaqsy(String uplo, int n, float[] a, int offseta, int lda, float[] s, int offsets, float scond, float amax, org.netlib.util.StringW equed); public void slaqtr(boolean ltran, boolean lreal, int n, float[] t, int ldt, float[] b, float w, org.netlib.util.floatW scale, float[] x, float[] work, org.netlib.util.intW info); - public void slaqtr(boolean ltran, boolean lreal, int n, float[] t, int _t_offset, int ldt, float[] b, int _b_offset, float w, org.netlib.util.floatW scale, float[] x, int _x_offset, float[] work, int _work_offset, org.netlib.util.intW info); + public void slaqtr(boolean ltran, boolean lreal, int n, float[] t, int offsett, int ldt, float[] b, int offsetb, float w, org.netlib.util.floatW scale, float[] x, int offsetx, float[] work, int offsetwork, org.netlib.util.intW info); public void slar1v(int n, int b1, int bn, float lambda, float[] d, float[] l, float[] ld, float[] lld, float pivmin, float gaptol, float[] z, boolean wantnc, org.netlib.util.intW negcnt, org.netlib.util.floatW ztz, org.netlib.util.floatW mingma, org.netlib.util.intW r, int[] isuppz, org.netlib.util.floatW nrminv, org.netlib.util.floatW resid, org.netlib.util.floatW rqcorr, float[] work); - public void slar1v(int n, int b1, int bn, float lambda, float[] d, int _d_offset, float[] l, int _l_offset, float[] ld, int _ld_offset, float[] lld, int _lld_offset, float pivmin, float gaptol, float[] z, int _z_offset, boolean wantnc, org.netlib.util.intW negcnt, org.netlib.util.floatW ztz, org.netlib.util.floatW mingma, org.netlib.util.intW r, int[] isuppz, int _isuppz_offset, org.netlib.util.floatW nrminv, org.netlib.util.floatW resid, org.netlib.util.floatW rqcorr, float[] work, int _work_offset); + public void slar1v(int n, int b1, int bn, float lambda, float[] d, int offsetd, float[] l, int offsetl, float[] ld, int offsetld, float[] lld, int offsetlld, float pivmin, float gaptol, float[] z, int offsetz, boolean wantnc, org.netlib.util.intW negcnt, org.netlib.util.floatW ztz, org.netlib.util.floatW mingma, org.netlib.util.intW r, int[] isuppz, int offsetisuppz, org.netlib.util.floatW nrminv, org.netlib.util.floatW resid, org.netlib.util.floatW rqcorr, float[] work, int offsetwork); public void slar2v(int n, float[] x, float[] y, float[] z, int incx, float[] c, float[] s, int incc); - public void slar2v(int n, float[] x, int _x_offset, float[] y, int _y_offset, float[] z, int _z_offset, int incx, float[] c, int _c_offset, float[] s, int _s_offset, int incc); + public void slar2v(int n, float[] x, int offsetx, float[] y, int offsety, float[] z, int offsetz, int incx, float[] c, int offsetc, float[] s, int offsets, int incc); public void slarf(String side, int m, int n, float[] v, int incv, float tau, float[] c, int Ldc, float[] work); - public void slarf(String side, int m, int n, float[] v, int _v_offset, int incv, float tau, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset); + public void slarf(String side, int m, int n, float[] v, int offsetv, int incv, float tau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork); public void slarfb(String side, String trans, String direct, String storev, int m, int n, int k, float[] v, int ldv, float[] t, int ldt, float[] c, int Ldc, float[] work, int ldwork); - public void slarfb(String side, String trans, String direct, String storev, int m, int n, int k, float[] v, int _v_offset, int ldv, float[] t, int _t_offset, int ldt, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int ldwork); + public void slarfb(String side, String trans, String direct, String storev, int m, int n, int k, float[] v, int offsetv, int ldv, float[] t, int offsett, int ldt, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int ldwork); public void slarfg(int n, org.netlib.util.floatW alpha, float[] x, int incx, org.netlib.util.floatW tau); - public void slarfg(int n, org.netlib.util.floatW alpha, float[] x, int _x_offset, int incx, org.netlib.util.floatW tau); + public void slarfg(int n, org.netlib.util.floatW alpha, float[] x, int offsetx, int incx, org.netlib.util.floatW tau); public void slarft(String direct, String storev, int n, int k, float[] v, int ldv, float[] tau, float[] t, int ldt); - public void slarft(String direct, String storev, int n, int k, float[] v, int _v_offset, int ldv, float[] tau, int _tau_offset, float[] t, int _t_offset, int ldt); + public void slarft(String direct, String storev, int n, int k, float[] v, int offsetv, int ldv, float[] tau, int offsettau, float[] t, int offsett, int ldt); public void slarfx(String side, int m, int n, float[] v, float tau, float[] c, int Ldc, float[] work); - public void slarfx(String side, int m, int n, float[] v, int _v_offset, float tau, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset); + public void slarfx(String side, int m, int n, float[] v, int offsetv, float tau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork); public void slargv(int n, float[] x, int incx, float[] y, int incy, float[] c, int incc); - public void slargv(int n, float[] x, int _x_offset, int incx, float[] y, int _y_offset, int incy, float[] c, int _c_offset, int incc); + public void slargv(int n, float[] x, int offsetx, int incx, float[] y, int offsety, int incy, float[] c, int offsetc, int incc); public void slarnv(int idist, int[] iseed, int n, float[] x); - public void slarnv(int idist, int[] iseed, int _iseed_offset, int n, float[] x, int _x_offset); + public void slarnv(int idist, int[] iseed, int offsetiseed, int n, float[] x, int offsetx); public void slarra(int n, float[] d, float[] e, float[] e2, float spltol, float tnrm, org.netlib.util.intW nsplit, int[] isplit, org.netlib.util.intW info); - public void slarra(int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] e2, int _e2_offset, float spltol, float tnrm, org.netlib.util.intW nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW info); + public void slarra(int n, float[] d, int offsetd, float[] e, int offsete, float[] e2, int offsete2, float spltol, float tnrm, org.netlib.util.intW nsplit, int[] isplit, int offsetisplit, org.netlib.util.intW info); public void slarrb(int n, float[] d, float[] lld, int ifirst, int ilast, float rtol1, float rtol2, int offset, float[] w, float[] wgap, float[] werr, float[] work, int[] iwork, float pivmin, float spdiam, int twist, org.netlib.util.intW info); - public void slarrb(int n, float[] d, int _d_offset, float[] lld, int _lld_offset, int ifirst, int ilast, float rtol1, float rtol2, int offset, float[] w, int _w_offset, float[] wgap, int _wgap_offset, float[] werr, int _werr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, float pivmin, float spdiam, int twist, org.netlib.util.intW info); + public void slarrb(int n, float[] d, int offsetd, float[] lld, int offsetlld, int ifirst, int ilast, float rtol1, float rtol2, int offset, float[] w, int offsetw, float[] wgap, int offsetwgap, float[] werr, int offsetwerr, float[] work, int offsetwork, int[] iwork, int offsetiwork, float pivmin, float spdiam, int twist, org.netlib.util.intW info); public void slarrc(String jobt, int n, float vl, float vu, float[] d, float[] e, float pivmin, org.netlib.util.intW eigcnt, org.netlib.util.intW lcnt, org.netlib.util.intW rcnt, org.netlib.util.intW info); - public void slarrc(String jobt, int n, float vl, float vu, float[] d, int _d_offset, float[] e, int _e_offset, float pivmin, org.netlib.util.intW eigcnt, org.netlib.util.intW lcnt, org.netlib.util.intW rcnt, org.netlib.util.intW info); + public void slarrc(String jobt, int n, float vl, float vu, float[] d, int offsetd, float[] e, int offsete, float pivmin, org.netlib.util.intW eigcnt, org.netlib.util.intW lcnt, org.netlib.util.intW rcnt, org.netlib.util.intW info); public void slarrd(String range, String order, int n, float vl, float vu, int il, int iu, float[] gers, float reltol, float[] d, float[] e, float[] e2, float pivmin, int nsplit, int[] isplit, org.netlib.util.intW m, float[] w, float[] werr, org.netlib.util.floatW wl, org.netlib.util.floatW wu, int[] iblock, int[] indexw, float[] work, int[] iwork, org.netlib.util.intW info); - public void slarrd(String range, String order, int n, float vl, float vu, int il, int iu, float[] gers, int _gers_offset, float reltol, float[] d, int _d_offset, float[] e, int _e_offset, float[] e2, int _e2_offset, float pivmin, int nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW m, float[] w, int _w_offset, float[] werr, int _werr_offset, org.netlib.util.floatW wl, org.netlib.util.floatW wu, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void slarrd(String range, String order, int n, float vl, float vu, int il, int iu, float[] gers, int offsetgers, float reltol, float[] d, int offsetd, float[] e, int offsete, float[] e2, int offsete2, float pivmin, int nsplit, int[] isplit, int offsetisplit, org.netlib.util.intW m, float[] w, int offsetw, float[] werr, int offsetwerr, org.netlib.util.floatW wl, org.netlib.util.floatW wu, int[] iblock, int offsetiblock, int[] indexw, int offsetindexw, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void slarre(String range, int n, org.netlib.util.floatW vl, org.netlib.util.floatW vu, int il, int iu, float[] d, float[] e, float[] e2, float rtol1, float rtol2, float spltol, org.netlib.util.intW nsplit, int[] isplit, org.netlib.util.intW m, float[] w, float[] werr, float[] wgap, int[] iblock, int[] indexw, float[] gers, org.netlib.util.floatW pivmin, float[] work, int[] iwork, org.netlib.util.intW info); - public void slarre(String range, int n, org.netlib.util.floatW vl, org.netlib.util.floatW vu, int il, int iu, float[] d, int _d_offset, float[] e, int _e_offset, float[] e2, int _e2_offset, float rtol1, float rtol2, float spltol, org.netlib.util.intW nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW m, float[] w, int _w_offset, float[] werr, int _werr_offset, float[] wgap, int _wgap_offset, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, float[] gers, int _gers_offset, org.netlib.util.floatW pivmin, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void slarre(String range, int n, org.netlib.util.floatW vl, org.netlib.util.floatW vu, int il, int iu, float[] d, int offsetd, float[] e, int offsete, float[] e2, int offsete2, float rtol1, float rtol2, float spltol, org.netlib.util.intW nsplit, int[] isplit, int offsetisplit, org.netlib.util.intW m, float[] w, int offsetw, float[] werr, int offsetwerr, float[] wgap, int offsetwgap, int[] iblock, int offsetiblock, int[] indexw, int offsetindexw, float[] gers, int offsetgers, org.netlib.util.floatW pivmin, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void slarrf(int n, float[] d, float[] l, float[] ld, int clstrt, int clend, float[] w, float[] wgap, float[] werr, float spdiam, float clgapl, float clgapr, float pivmin, org.netlib.util.floatW sigma, float[] dplus, float[] lplus, float[] work, org.netlib.util.intW info); - public void slarrf(int n, float[] d, int _d_offset, float[] l, int _l_offset, float[] ld, int _ld_offset, int clstrt, int clend, float[] w, int _w_offset, float[] wgap, int _wgap_offset, float[] werr, int _werr_offset, float spdiam, float clgapl, float clgapr, float pivmin, org.netlib.util.floatW sigma, float[] dplus, int _dplus_offset, float[] lplus, int _lplus_offset, float[] work, int _work_offset, org.netlib.util.intW info); + public void slarrf(int n, float[] d, int offsetd, float[] l, int offsetl, float[] ld, int offsetld, int clstrt, int clend, float[] w, int offsetw, float[] wgap, int offsetwgap, float[] werr, int offsetwerr, float spdiam, float clgapl, float clgapr, float pivmin, org.netlib.util.floatW sigma, float[] dplus, int offsetdplus, float[] lplus, int offsetlplus, float[] work, int offsetwork, org.netlib.util.intW info); public void slarrj(int n, float[] d, float[] e2, int ifirst, int ilast, float rtol, int offset, float[] w, float[] werr, float[] work, int[] iwork, float pivmin, float spdiam, org.netlib.util.intW info); - public void slarrj(int n, float[] d, int _d_offset, float[] e2, int _e2_offset, int ifirst, int ilast, float rtol, int offset, float[] w, int _w_offset, float[] werr, int _werr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, float pivmin, float spdiam, org.netlib.util.intW info); + public void slarrj(int n, float[] d, int offsetd, float[] e2, int offsete2, int ifirst, int ilast, float rtol, int offset, float[] w, int offsetw, float[] werr, int offsetwerr, float[] work, int offsetwork, int[] iwork, int offsetiwork, float pivmin, float spdiam, org.netlib.util.intW info); public void slarrk(int n, int iw, float gl, float gu, float[] d, float[] e2, float pivmin, float reltol, org.netlib.util.floatW w, org.netlib.util.floatW werr, org.netlib.util.intW info); - public void slarrk(int n, int iw, float gl, float gu, float[] d, int _d_offset, float[] e2, int _e2_offset, float pivmin, float reltol, org.netlib.util.floatW w, org.netlib.util.floatW werr, org.netlib.util.intW info); + public void slarrk(int n, int iw, float gl, float gu, float[] d, int offsetd, float[] e2, int offsete2, float pivmin, float reltol, org.netlib.util.floatW w, org.netlib.util.floatW werr, org.netlib.util.intW info); public void slarrr(int n, float[] d, float[] e, org.netlib.util.intW info); - public void slarrr(int n, float[] d, int _d_offset, float[] e, int _e_offset, org.netlib.util.intW info); + public void slarrr(int n, float[] d, int offsetd, float[] e, int offsete, org.netlib.util.intW info); public void slarrv(int n, float vl, float vu, float[] d, float[] l, float pivmin, int[] isplit, int m, int dol, int dou, float minrgp, org.netlib.util.floatW rtol1, org.netlib.util.floatW rtol2, float[] w, float[] werr, float[] wgap, int[] iblock, int[] indexw, float[] gers, float[] z, int ldz, int[] isuppz, float[] work, int[] iwork, org.netlib.util.intW info); - public void slarrv(int n, float vl, float vu, float[] d, int _d_offset, float[] l, int _l_offset, float pivmin, int[] isplit, int _isplit_offset, int m, int dol, int dou, float minrgp, org.netlib.util.floatW rtol1, org.netlib.util.floatW rtol2, float[] w, int _w_offset, float[] werr, int _werr_offset, float[] wgap, int _wgap_offset, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, float[] gers, int _gers_offset, float[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void slarrv(int n, float vl, float vu, float[] d, int offsetd, float[] l, int offsetl, float pivmin, int[] isplit, int offsetisplit, int m, int dol, int dou, float minrgp, org.netlib.util.floatW rtol1, org.netlib.util.floatW rtol2, float[] w, int offsetw, float[] werr, int offsetwerr, float[] wgap, int offsetwgap, int[] iblock, int offsetiblock, int[] indexw, int offsetindexw, float[] gers, int offsetgers, float[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void slartg(float f, float g, org.netlib.util.floatW cs, org.netlib.util.floatW sn, org.netlib.util.floatW r); public void slartv(int n, float[] x, int incx, float[] y, int incy, float[] c, float[] s, int incc); - public void slartv(int n, float[] x, int _x_offset, int incx, float[] y, int _y_offset, int incy, float[] c, int _c_offset, float[] s, int _s_offset, int incc); + public void slartv(int n, float[] x, int offsetx, int incx, float[] y, int offsety, int incy, float[] c, int offsetc, float[] s, int offsets, int incc); public void slaruv(int[] iseed, int n, float[] x); - public void slaruv(int[] iseed, int _iseed_offset, int n, float[] x, int _x_offset); + public void slaruv(int[] iseed, int offsetiseed, int n, float[] x, int offsetx); public void slarz(String side, int m, int n, int l, float[] v, int incv, float tau, float[] c, int Ldc, float[] work); - public void slarz(String side, int m, int n, int l, float[] v, int _v_offset, int incv, float tau, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset); + public void slarz(String side, int m, int n, int l, float[] v, int offsetv, int incv, float tau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork); public void slarzb(String side, String trans, String direct, String storev, int m, int n, int k, int l, float[] v, int ldv, float[] t, int ldt, float[] c, int Ldc, float[] work, int ldwork); - public void slarzb(String side, String trans, String direct, String storev, int m, int n, int k, int l, float[] v, int _v_offset, int ldv, float[] t, int _t_offset, int ldt, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int ldwork); + public void slarzb(String side, String trans, String direct, String storev, int m, int n, int k, int l, float[] v, int offsetv, int ldv, float[] t, int offsett, int ldt, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int ldwork); public void slarzt(String direct, String storev, int n, int k, float[] v, int ldv, float[] tau, float[] t, int ldt); - public void slarzt(String direct, String storev, int n, int k, float[] v, int _v_offset, int ldv, float[] tau, int _tau_offset, float[] t, int _t_offset, int ldt); + public void slarzt(String direct, String storev, int n, int k, float[] v, int offsetv, int ldv, float[] tau, int offsettau, float[] t, int offsett, int ldt); public void slas2(float f, float g, float h, org.netlib.util.floatW ssmin, org.netlib.util.floatW ssmax); public void slascl(String type, int kl, int ku, float cfrom, float cto, int m, int n, float[] a, int lda, org.netlib.util.intW info); - public void slascl(String type, int kl, int ku, float cfrom, float cto, int m, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + public void slascl(String type, int kl, int ku, float cfrom, float cto, int m, int n, float[] a, int offseta, int lda, org.netlib.util.intW info); public void slasd0(int n, int sqre, float[] d, float[] e, float[] u, int ldu, float[] vt, int ldvt, int smlsiz, int[] iwork, float[] work, org.netlib.util.intW info); - public void slasd0(int n, int sqre, float[] d, int _d_offset, float[] e, int _e_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, int smlsiz, int[] iwork, int _iwork_offset, float[] work, int _work_offset, org.netlib.util.intW info); + public void slasd0(int n, int sqre, float[] d, int offsetd, float[] e, int offsete, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int ldvt, int smlsiz, int[] iwork, int offsetiwork, float[] work, int offsetwork, org.netlib.util.intW info); public void slasd1(int nl, int nr, int sqre, float[] d, org.netlib.util.floatW alpha, org.netlib.util.floatW beta, float[] u, int ldu, float[] vt, int ldvt, int[] idxq, int[] iwork, float[] work, org.netlib.util.intW info); - public void slasd1(int nl, int nr, int sqre, float[] d, int _d_offset, org.netlib.util.floatW alpha, org.netlib.util.floatW beta, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, int[] idxq, int _idxq_offset, int[] iwork, int _iwork_offset, float[] work, int _work_offset, org.netlib.util.intW info); + public void slasd1(int nl, int nr, int sqre, float[] d, int offsetd, org.netlib.util.floatW alpha, org.netlib.util.floatW beta, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int ldvt, int[] idxq, int offsetidxq, int[] iwork, int offsetiwork, float[] work, int offsetwork, org.netlib.util.intW info); public void slasd2(int nl, int nr, int sqre, org.netlib.util.intW k, float[] d, float[] z, float alpha, float beta, float[] u, int ldu, float[] vt, int ldvt, float[] dsigma, float[] u2, int ldu2, float[] vt2, int ldvt2, int[] idxp, int[] idx, int[] idxc, int[] idxq, int[] coltyp, org.netlib.util.intW info); - public void slasd2(int nl, int nr, int sqre, org.netlib.util.intW k, float[] d, int _d_offset, float[] z, int _z_offset, float alpha, float beta, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, float[] dsigma, int _dsigma_offset, float[] u2, int _u2_offset, int ldu2, float[] vt2, int _vt2_offset, int ldvt2, int[] idxp, int _idxp_offset, int[] idx, int _idx_offset, int[] idxc, int _idxc_offset, int[] idxq, int _idxq_offset, int[] coltyp, int _coltyp_offset, org.netlib.util.intW info); + public void slasd2(int nl, int nr, int sqre, org.netlib.util.intW k, float[] d, int offsetd, float[] z, int offsetz, float alpha, float beta, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int ldvt, float[] dsigma, int offsetdsigma, float[] u2, int offsetu2, int ldu2, float[] vt2, int offsetvt2, int ldvt2, int[] idxp, int offsetidxp, int[] idx, int offsetidx, int[] idxc, int offsetidxc, int[] idxq, int offsetidxq, int[] coltyp, int offsetcoltyp, org.netlib.util.intW info); public void slasd3(int nl, int nr, int sqre, int k, float[] d, float[] q, int ldq, float[] dsigma, float[] u, int ldu, float[] u2, int ldu2, float[] vt, int ldvt, float[] vt2, int ldvt2, int[] idxc, int[] ctot, float[] z, org.netlib.util.intW info); - public void slasd3(int nl, int nr, int sqre, int k, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, float[] dsigma, int _dsigma_offset, float[] u, int _u_offset, int ldu, float[] u2, int _u2_offset, int ldu2, float[] vt, int _vt_offset, int ldvt, float[] vt2, int _vt2_offset, int ldvt2, int[] idxc, int _idxc_offset, int[] ctot, int _ctot_offset, float[] z, int _z_offset, org.netlib.util.intW info); + public void slasd3(int nl, int nr, int sqre, int k, float[] d, int offsetd, float[] q, int offsetq, int ldq, float[] dsigma, int offsetdsigma, float[] u, int offsetu, int ldu, float[] u2, int offsetu2, int ldu2, float[] vt, int offsetvt, int ldvt, float[] vt2, int offsetvt2, int ldvt2, int[] idxc, int offsetidxc, int[] ctot, int offsetctot, float[] z, int offsetz, org.netlib.util.intW info); public void slasd4(int n, int i, float[] d, float[] z, float[] delta, float rho, org.netlib.util.floatW sigma, float[] work, org.netlib.util.intW info); - public void slasd4(int n, int i, float[] d, int _d_offset, float[] z, int _z_offset, float[] delta, int _delta_offset, float rho, org.netlib.util.floatW sigma, float[] work, int _work_offset, org.netlib.util.intW info); + public void slasd4(int n, int i, float[] d, int offsetd, float[] z, int offsetz, float[] delta, int offsetdelta, float rho, org.netlib.util.floatW sigma, float[] work, int offsetwork, org.netlib.util.intW info); public void slasd5(int i, float[] d, float[] z, float[] delta, float rho, org.netlib.util.floatW dsigma, float[] work); - public void slasd5(int i, float[] d, int _d_offset, float[] z, int _z_offset, float[] delta, int _delta_offset, float rho, org.netlib.util.floatW dsigma, float[] work, int _work_offset); + public void slasd5(int i, float[] d, int offsetd, float[] z, int offsetz, float[] delta, int offsetdelta, float rho, org.netlib.util.floatW dsigma, float[] work, int offsetwork); public void slasd6(int icompq, int nl, int nr, int sqre, float[] d, float[] vf, float[] vl, org.netlib.util.floatW alpha, org.netlib.util.floatW beta, int[] idxq, int[] perm, org.netlib.util.intW givptr, int[] givcol, int ldgcol, float[] givnum, int ldgnum, float[] poles, float[] difl, float[] difr, float[] z, org.netlib.util.intW k, org.netlib.util.floatW c, org.netlib.util.floatW s, float[] work, int[] iwork, org.netlib.util.intW info); - public void slasd6(int icompq, int nl, int nr, int sqre, float[] d, int _d_offset, float[] vf, int _vf_offset, float[] vl, int _vl_offset, org.netlib.util.floatW alpha, org.netlib.util.floatW beta, int[] idxq, int _idxq_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, int ldgcol, float[] givnum, int _givnum_offset, int ldgnum, float[] poles, int _poles_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, float[] z, int _z_offset, org.netlib.util.intW k, org.netlib.util.floatW c, org.netlib.util.floatW s, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void slasd6(int icompq, int nl, int nr, int sqre, float[] d, int offsetd, float[] vf, int offsetvf, float[] vl, int offsetvl, org.netlib.util.floatW alpha, org.netlib.util.floatW beta, int[] idxq, int offsetidxq, int[] perm, int offsetperm, org.netlib.util.intW givptr, int[] givcol, int offsetgivcol, int ldgcol, float[] givnum, int offsetgivnum, int ldgnum, float[] poles, int offsetpoles, float[] difl, int offsetdifl, float[] difr, int offsetdifr, float[] z, int offsetz, org.netlib.util.intW k, org.netlib.util.floatW c, org.netlib.util.floatW s, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void slasd7(int icompq, int nl, int nr, int sqre, org.netlib.util.intW k, float[] d, float[] z, float[] zw, float[] vf, float[] vfw, float[] vl, float[] vlw, float alpha, float beta, float[] dsigma, int[] idx, int[] idxp, int[] idxq, int[] perm, org.netlib.util.intW givptr, int[] givcol, int ldgcol, float[] givnum, int ldgnum, org.netlib.util.floatW c, org.netlib.util.floatW s, org.netlib.util.intW info); - public void slasd7(int icompq, int nl, int nr, int sqre, org.netlib.util.intW k, float[] d, int _d_offset, float[] z, int _z_offset, float[] zw, int _zw_offset, float[] vf, int _vf_offset, float[] vfw, int _vfw_offset, float[] vl, int _vl_offset, float[] vlw, int _vlw_offset, float alpha, float beta, float[] dsigma, int _dsigma_offset, int[] idx, int _idx_offset, int[] idxp, int _idxp_offset, int[] idxq, int _idxq_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, int ldgcol, float[] givnum, int _givnum_offset, int ldgnum, org.netlib.util.floatW c, org.netlib.util.floatW s, org.netlib.util.intW info); + public void slasd7(int icompq, int nl, int nr, int sqre, org.netlib.util.intW k, float[] d, int offsetd, float[] z, int offsetz, float[] zw, int offsetzw, float[] vf, int offsetvf, float[] vfw, int offsetvfw, float[] vl, int offsetvl, float[] vlw, int offsetvlw, float alpha, float beta, float[] dsigma, int offsetdsigma, int[] idx, int offsetidx, int[] idxp, int offsetidxp, int[] idxq, int offsetidxq, int[] perm, int offsetperm, org.netlib.util.intW givptr, int[] givcol, int offsetgivcol, int ldgcol, float[] givnum, int offsetgivnum, int ldgnum, org.netlib.util.floatW c, org.netlib.util.floatW s, org.netlib.util.intW info); public void slasd8(int icompq, int k, float[] d, float[] z, float[] vf, float[] vl, float[] difl, float[] difr, int lddifr, float[] dsigma, float[] work, org.netlib.util.intW info); - public void slasd8(int icompq, int k, float[] d, int _d_offset, float[] z, int _z_offset, float[] vf, int _vf_offset, float[] vl, int _vl_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, int lddifr, float[] dsigma, int _dsigma_offset, float[] work, int _work_offset, org.netlib.util.intW info); + public void slasd8(int icompq, int k, float[] d, int offsetd, float[] z, int offsetz, float[] vf, int offsetvf, float[] vl, int offsetvl, float[] difl, int offsetdifl, float[] difr, int offsetdifr, int lddifr, float[] dsigma, int offsetdsigma, float[] work, int offsetwork, org.netlib.util.intW info); public void slasda(int icompq, int smlsiz, int n, int sqre, float[] d, float[] e, float[] u, int ldu, float[] vt, int[] k, float[] difl, float[] difr, float[] z, float[] poles, int[] givptr, int[] givcol, int ldgcol, int[] perm, float[] givnum, float[] c, float[] s, float[] work, int[] iwork, org.netlib.util.intW info); - public void slasda(int icompq, int smlsiz, int n, int sqre, float[] d, int _d_offset, float[] e, int _e_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int[] k, int _k_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, float[] z, int _z_offset, float[] poles, int _poles_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, int ldgcol, int[] perm, int _perm_offset, float[] givnum, int _givnum_offset, float[] c, int _c_offset, float[] s, int _s_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void slasda(int icompq, int smlsiz, int n, int sqre, float[] d, int offsetd, float[] e, int offsete, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int[] k, int offsetk, float[] difl, int offsetdifl, float[] difr, int offsetdifr, float[] z, int offsetz, float[] poles, int offsetpoles, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, int ldgcol, int[] perm, int offsetperm, float[] givnum, int offsetgivnum, float[] c, int offsetc, float[] s, int offsets, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void slasdq(String uplo, int sqre, int n, int ncvt, int nru, int ncc, float[] d, float[] e, float[] vt, int ldvt, float[] u, int ldu, float[] c, int Ldc, float[] work, org.netlib.util.intW info); - public void slasdq(String uplo, int sqre, int n, int ncvt, int nru, int ncc, float[] d, int _d_offset, float[] e, int _e_offset, float[] vt, int _vt_offset, int ldvt, float[] u, int _u_offset, int ldu, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + public void slasdq(String uplo, int sqre, int n, int ncvt, int nru, int ncc, float[] d, int offsetd, float[] e, int offsete, float[] vt, int offsetvt, int ldvt, float[] u, int offsetu, int ldu, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info); public void slasdt(int n, org.netlib.util.intW lvl, org.netlib.util.intW nd, int[] inode, int[] ndiml, int[] ndimr, int msub); - public void slasdt(int n, org.netlib.util.intW lvl, org.netlib.util.intW nd, int[] inode, int _inode_offset, int[] ndiml, int _ndiml_offset, int[] ndimr, int _ndimr_offset, int msub); + public void slasdt(int n, org.netlib.util.intW lvl, org.netlib.util.intW nd, int[] inode, int offsetinode, int[] ndiml, int offsetndiml, int[] ndimr, int offsetndimr, int msub); public void slaset(String uplo, int m, int n, float alpha, float beta, float[] a, int lda); - public void slaset(String uplo, int m, int n, float alpha, float beta, float[] a, int _a_offset, int lda); + public void slaset(String uplo, int m, int n, float alpha, float beta, float[] a, int offseta, int lda); public void slasq1(int n, float[] d, float[] e, float[] work, org.netlib.util.intW info); - public void slasq1(int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] work, int _work_offset, org.netlib.util.intW info); + public void slasq1(int n, float[] d, int offsetd, float[] e, int offsete, float[] work, int offsetwork, org.netlib.util.intW info); public void slasq2(int n, float[] z, org.netlib.util.intW info); - public void slasq2(int n, float[] z, int _z_offset, org.netlib.util.intW info); + public void slasq2(int n, float[] z, int offsetz, org.netlib.util.intW info); public void slasq3(int i0, org.netlib.util.intW n0, float[] z, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW sigma, org.netlib.util.floatW desig, org.netlib.util.floatW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee); - public void slasq3(int i0, org.netlib.util.intW n0, float[] z, int _z_offset, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW sigma, org.netlib.util.floatW desig, org.netlib.util.floatW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee); + public void slasq3(int i0, org.netlib.util.intW n0, float[] z, int offsetz, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW sigma, org.netlib.util.floatW desig, org.netlib.util.floatW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee); public void slasq4(int i0, int n0, float[] z, int pp, int n0in, float dmin, float dmin1, float dmin2, float dn, float dn1, float dn2, org.netlib.util.floatW tau, org.netlib.util.intW ttype); - public void slasq4(int i0, int n0, float[] z, int _z_offset, int pp, int n0in, float dmin, float dmin1, float dmin2, float dn, float dn1, float dn2, org.netlib.util.floatW tau, org.netlib.util.intW ttype); + public void slasq4(int i0, int n0, float[] z, int offsetz, int pp, int n0in, float dmin, float dmin1, float dmin2, float dn, float dn1, float dn2, org.netlib.util.floatW tau, org.netlib.util.intW ttype); public void slasq5(int i0, int n0, float[] z, int pp, float tau, org.netlib.util.floatW dmin, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dnm1, org.netlib.util.floatW dnm2, boolean ieee); - public void slasq5(int i0, int n0, float[] z, int _z_offset, int pp, float tau, org.netlib.util.floatW dmin, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dnm1, org.netlib.util.floatW dnm2, boolean ieee); + public void slasq5(int i0, int n0, float[] z, int offsetz, int pp, float tau, org.netlib.util.floatW dmin, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dnm1, org.netlib.util.floatW dnm2, boolean ieee); public void slasq6(int i0, int n0, float[] z, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dnm1, org.netlib.util.floatW dnm2); - public void slasq6(int i0, int n0, float[] z, int _z_offset, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dnm1, org.netlib.util.floatW dnm2); + public void slasq6(int i0, int n0, float[] z, int offsetz, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dnm1, org.netlib.util.floatW dnm2); public void slasr(String side, String pivot, String direct, int m, int n, float[] c, float[] s, float[] a, int lda); - public void slasr(String side, String pivot, String direct, int m, int n, float[] c, int _c_offset, float[] s, int _s_offset, float[] a, int _a_offset, int lda); + public void slasr(String side, String pivot, String direct, int m, int n, float[] c, int offsetc, float[] s, int offsets, float[] a, int offseta, int lda); public void slasrt(String id, int n, float[] d, org.netlib.util.intW info); - public void slasrt(String id, int n, float[] d, int _d_offset, org.netlib.util.intW info); + public void slasrt(String id, int n, float[] d, int offsetd, org.netlib.util.intW info); public void slassq(int n, float[] x, int incx, org.netlib.util.floatW scale, org.netlib.util.floatW sumsq); - public void slassq(int n, float[] x, int _x_offset, int incx, org.netlib.util.floatW scale, org.netlib.util.floatW sumsq); + public void slassq(int n, float[] x, int offsetx, int incx, org.netlib.util.floatW scale, org.netlib.util.floatW sumsq); public void slasv2(float f, float g, float h, org.netlib.util.floatW ssmin, org.netlib.util.floatW ssmax, org.netlib.util.floatW snr, org.netlib.util.floatW csr, org.netlib.util.floatW snl, org.netlib.util.floatW csl); public void slaswp(int n, float[] a, int lda, int k1, int k2, int[] ipiv, int incx); - public void slaswp(int n, float[] a, int _a_offset, int lda, int k1, int k2, int[] ipiv, int _ipiv_offset, int incx); + public void slaswp(int n, float[] a, int offseta, int lda, int k1, int k2, int[] ipiv, int offsetipiv, int incx); public void slasy2(boolean ltranl, boolean ltranr, int isgn, int n1, int n2, float[] tl, int ldtl, float[] tr, int ldtr, float[] b, int ldb, org.netlib.util.floatW scale, float[] x, int ldx, org.netlib.util.floatW xnorm, org.netlib.util.intW info); - public void slasy2(boolean ltranl, boolean ltranr, int isgn, int n1, int n2, float[] tl, int _tl_offset, int ldtl, float[] tr, int _tr_offset, int ldtr, float[] b, int _b_offset, int ldb, org.netlib.util.floatW scale, float[] x, int _x_offset, int ldx, org.netlib.util.floatW xnorm, org.netlib.util.intW info); + public void slasy2(boolean ltranl, boolean ltranr, int isgn, int n1, int n2, float[] tl, int offsettl, int ldtl, float[] tr, int offsettr, int ldtr, float[] b, int offsetb, int ldb, org.netlib.util.floatW scale, float[] x, int offsetx, int ldx, org.netlib.util.floatW xnorm, org.netlib.util.intW info); public void slasyf(String uplo, int n, int nb, org.netlib.util.intW kb, float[] a, int lda, int[] ipiv, float[] w, int ldw, org.netlib.util.intW info); - public void slasyf(String uplo, int n, int nb, org.netlib.util.intW kb, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] w, int _w_offset, int ldw, org.netlib.util.intW info); + public void slasyf(String uplo, int n, int nb, org.netlib.util.intW kb, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] w, int offsetw, int ldw, org.netlib.util.intW info); public void slatbs(String uplo, String trans, String diag, String normin, int n, int kd, float[] ab, int ldab, float[] x, org.netlib.util.floatW scale, float[] cnorm, org.netlib.util.intW info); - public void slatbs(String uplo, String trans, String diag, String normin, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] x, int _x_offset, org.netlib.util.floatW scale, float[] cnorm, int _cnorm_offset, org.netlib.util.intW info); + public void slatbs(String uplo, String trans, String diag, String normin, int n, int kd, float[] ab, int offsetab, int ldab, float[] x, int offsetx, org.netlib.util.floatW scale, float[] cnorm, int offsetcnorm, org.netlib.util.intW info); public void slatdf(int ijob, int n, float[] z, int ldz, float[] rhs, org.netlib.util.floatW rdsum, org.netlib.util.floatW rdscal, int[] ipiv, int[] jpiv); - public void slatdf(int ijob, int n, float[] z, int _z_offset, int ldz, float[] rhs, int _rhs_offset, org.netlib.util.floatW rdsum, org.netlib.util.floatW rdscal, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset); + public void slatdf(int ijob, int n, float[] z, int offsetz, int ldz, float[] rhs, int offsetrhs, org.netlib.util.floatW rdsum, org.netlib.util.floatW rdscal, int[] ipiv, int offsetipiv, int[] jpiv, int offsetjpiv); public void slatps(String uplo, String trans, String diag, String normin, int n, float[] ap, float[] x, org.netlib.util.floatW scale, float[] cnorm, org.netlib.util.intW info); - public void slatps(String uplo, String trans, String diag, String normin, int n, float[] ap, int _ap_offset, float[] x, int _x_offset, org.netlib.util.floatW scale, float[] cnorm, int _cnorm_offset, org.netlib.util.intW info); + public void slatps(String uplo, String trans, String diag, String normin, int n, float[] ap, int offsetap, float[] x, int offsetx, org.netlib.util.floatW scale, float[] cnorm, int offsetcnorm, org.netlib.util.intW info); public void slatrd(String uplo, int n, int nb, float[] a, int lda, float[] e, float[] tau, float[] w, int ldw); - public void slatrd(String uplo, int n, int nb, float[] a, int _a_offset, int lda, float[] e, int _e_offset, float[] tau, int _tau_offset, float[] w, int _w_offset, int ldw); + public void slatrd(String uplo, int n, int nb, float[] a, int offseta, int lda, float[] e, int offsete, float[] tau, int offsettau, float[] w, int offsetw, int ldw); public void slatrs(String uplo, String trans, String diag, String normin, int n, float[] a, int lda, float[] x, org.netlib.util.floatW scale, float[] cnorm, org.netlib.util.intW info); - public void slatrs(String uplo, String trans, String diag, String normin, int n, float[] a, int _a_offset, int lda, float[] x, int _x_offset, org.netlib.util.floatW scale, float[] cnorm, int _cnorm_offset, org.netlib.util.intW info); + public void slatrs(String uplo, String trans, String diag, String normin, int n, float[] a, int offseta, int lda, float[] x, int offsetx, org.netlib.util.floatW scale, float[] cnorm, int offsetcnorm, org.netlib.util.intW info); public void slatrz(int m, int n, int l, float[] a, int lda, float[] tau, float[] work); - public void slatrz(int m, int n, int l, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset); + public void slatrz(int m, int n, int l, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork); public void slatzm(String side, int m, int n, float[] v, int incv, float tau, float[] c1, float[] c2, int Ldc, float[] work); - public void slatzm(String side, int m, int n, float[] v, int _v_offset, int incv, float tau, float[] c1, int _c1_offset, float[] c2, int _c2_offset, int Ldc, float[] work, int _work_offset); + public void slatzm(String side, int m, int n, float[] v, int offsetv, int incv, float tau, float[] c1, int offsetc1, float[] c2, int offsetc2, int Ldc, float[] work, int offsetwork); public void slauu2(String uplo, int n, float[] a, int lda, org.netlib.util.intW info); - public void slauu2(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + public void slauu2(String uplo, int n, float[] a, int offseta, int lda, org.netlib.util.intW info); public void slauum(String uplo, int n, float[] a, int lda, org.netlib.util.intW info); - public void slauum(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + public void slauum(String uplo, int n, float[] a, int offseta, int lda, org.netlib.util.intW info); public void slazq3(int i0, org.netlib.util.intW n0, float[] z, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW sigma, org.netlib.util.floatW desig, org.netlib.util.floatW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee, org.netlib.util.intW ttype, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dn1, org.netlib.util.floatW dn2, org.netlib.util.floatW tau); - public void slazq3(int i0, org.netlib.util.intW n0, float[] z, int _z_offset, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW sigma, org.netlib.util.floatW desig, org.netlib.util.floatW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee, org.netlib.util.intW ttype, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dn1, org.netlib.util.floatW dn2, org.netlib.util.floatW tau); + public void slazq3(int i0, org.netlib.util.intW n0, float[] z, int offsetz, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW sigma, org.netlib.util.floatW desig, org.netlib.util.floatW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee, org.netlib.util.intW ttype, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dn1, org.netlib.util.floatW dn2, org.netlib.util.floatW tau); public void slazq4(int i0, int n0, float[] z, int pp, int n0in, float dmin, float dmin1, float dmin2, float dn, float dn1, float dn2, org.netlib.util.floatW tau, org.netlib.util.intW ttype, org.netlib.util.floatW g); - public void slazq4(int i0, int n0, float[] z, int _z_offset, int pp, int n0in, float dmin, float dmin1, float dmin2, float dn, float dn1, float dn2, org.netlib.util.floatW tau, org.netlib.util.intW ttype, org.netlib.util.floatW g); + public void slazq4(int i0, int n0, float[] z, int offsetz, int pp, int n0in, float dmin, float dmin1, float dmin2, float dn, float dn1, float dn2, org.netlib.util.floatW tau, org.netlib.util.intW ttype, org.netlib.util.floatW g); public void sopgtr(String uplo, int n, float[] ap, float[] tau, float[] q, int ldq, float[] work, org.netlib.util.intW info); - public void sopgtr(String uplo, int n, float[] ap, int _ap_offset, float[] tau, int _tau_offset, float[] q, int _q_offset, int ldq, float[] work, int _work_offset, org.netlib.util.intW info); + public void sopgtr(String uplo, int n, float[] ap, int offsetap, float[] tau, int offsettau, float[] q, int offsetq, int ldq, float[] work, int offsetwork, org.netlib.util.intW info); public void sopmtr(String side, String uplo, String trans, int m, int n, float[] ap, float[] tau, float[] c, int Ldc, float[] work, org.netlib.util.intW info); - public void sopmtr(String side, String uplo, String trans, int m, int n, float[] ap, int _ap_offset, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + public void sopmtr(String side, String uplo, String trans, int m, int n, float[] ap, int offsetap, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info); public void sorg2l(int m, int n, int k, float[] a, int lda, float[] tau, float[] work, org.netlib.util.intW info); - public void sorg2l(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + public void sorg2l(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); public void sorg2r(int m, int n, int k, float[] a, int lda, float[] tau, float[] work, org.netlib.util.intW info); - public void sorg2r(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + public void sorg2r(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); public void sorgbr(String vect, int m, int n, int k, float[] a, int lda, float[] tau, float[] work, int lwork, org.netlib.util.intW info); - public void sorgbr(String vect, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sorgbr(String vect, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sorghr(int n, int ilo, int ihi, float[] a, int lda, float[] tau, float[] work, int lwork, org.netlib.util.intW info); - public void sorghr(int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sorghr(int n, int ilo, int ihi, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sorgl2(int m, int n, int k, float[] a, int lda, float[] tau, float[] work, org.netlib.util.intW info); - public void sorgl2(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + public void sorgl2(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); public void sorglq(int m, int n, int k, float[] a, int lda, float[] tau, float[] work, int lwork, org.netlib.util.intW info); - public void sorglq(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sorglq(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sorgql(int m, int n, int k, float[] a, int lda, float[] tau, float[] work, int lwork, org.netlib.util.intW info); - public void sorgql(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sorgql(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sorgqr(int m, int n, int k, float[] a, int lda, float[] tau, float[] work, int lwork, org.netlib.util.intW info); - public void sorgqr(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sorgqr(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sorgr2(int m, int n, int k, float[] a, int lda, float[] tau, float[] work, org.netlib.util.intW info); - public void sorgr2(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + public void sorgr2(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); public void sorgrq(int m, int n, int k, float[] a, int lda, float[] tau, float[] work, int lwork, org.netlib.util.intW info); - public void sorgrq(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sorgrq(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sorgtr(String uplo, int n, float[] a, int lda, float[] tau, float[] work, int lwork, org.netlib.util.intW info); - public void sorgtr(String uplo, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sorgtr(String uplo, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sorm2l(String side, String trans, int m, int n, int k, float[] a, int lda, float[] tau, float[] c, int Ldc, float[] work, org.netlib.util.intW info); - public void sorm2l(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + public void sorm2l(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info); public void sorm2r(String side, String trans, int m, int n, int k, float[] a, int lda, float[] tau, float[] c, int Ldc, float[] work, org.netlib.util.intW info); - public void sorm2r(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + public void sorm2r(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info); public void sormbr(String vect, String side, String trans, int m, int n, int k, float[] a, int lda, float[] tau, float[] c, int Ldc, float[] work, int lwork, org.netlib.util.intW info); - public void sormbr(String vect, String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sormbr(String vect, String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sormhr(String side, String trans, int m, int n, int ilo, int ihi, float[] a, int lda, float[] tau, float[] c, int Ldc, float[] work, int lwork, org.netlib.util.intW info); - public void sormhr(String side, String trans, int m, int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sormhr(String side, String trans, int m, int n, int ilo, int ihi, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sorml2(String side, String trans, int m, int n, int k, float[] a, int lda, float[] tau, float[] c, int Ldc, float[] work, org.netlib.util.intW info); - public void sorml2(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + public void sorml2(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info); public void sormlq(String side, String trans, int m, int n, int k, float[] a, int lda, float[] tau, float[] c, int Ldc, float[] work, int lwork, org.netlib.util.intW info); - public void sormlq(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sormlq(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sormql(String side, String trans, int m, int n, int k, float[] a, int lda, float[] tau, float[] c, int Ldc, float[] work, int lwork, org.netlib.util.intW info); - public void sormql(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sormql(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sormqr(String side, String trans, int m, int n, int k, float[] a, int lda, float[] tau, float[] c, int Ldc, float[] work, int lwork, org.netlib.util.intW info); - public void sormqr(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sormqr(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sormr2(String side, String trans, int m, int n, int k, float[] a, int lda, float[] tau, float[] c, int Ldc, float[] work, org.netlib.util.intW info); - public void sormr2(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + public void sormr2(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info); public void sormr3(String side, String trans, int m, int n, int k, int l, float[] a, int lda, float[] tau, float[] c, int Ldc, float[] work, org.netlib.util.intW info); - public void sormr3(String side, String trans, int m, int n, int k, int l, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + public void sormr3(String side, String trans, int m, int n, int k, int l, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info); public void sormrq(String side, String trans, int m, int n, int k, float[] a, int lda, float[] tau, float[] c, int Ldc, float[] work, int lwork, org.netlib.util.intW info); - public void sormrq(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sormrq(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sormrz(String side, String trans, int m, int n, int k, int l, float[] a, int lda, float[] tau, float[] c, int Ldc, float[] work, int lwork, org.netlib.util.intW info); - public void sormrz(String side, String trans, int m, int n, int k, int l, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sormrz(String side, String trans, int m, int n, int k, int l, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sormtr(String side, String uplo, String trans, int m, int n, float[] a, int lda, float[] tau, float[] c, int Ldc, float[] work, int lwork, org.netlib.util.intW info); - public void sormtr(String side, String uplo, String trans, int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void sormtr(String side, String uplo, String trans, int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void spbcon(String uplo, int n, int kd, float[] ab, int ldab, float anorm, org.netlib.util.floatW rcond, float[] work, int[] iwork, org.netlib.util.intW info); - public void spbcon(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void spbcon(String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void spbequ(String uplo, int n, int kd, float[] ab, int ldab, float[] s, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info); - public void spbequ(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] s, int _s_offset, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info); + public void spbequ(String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float[] s, int offsets, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info); public void spbrfs(String uplo, int n, int kd, int nrhs, float[] ab, int ldab, float[] afb, int ldafb, float[] b, int ldb, float[] x, int ldx, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info); - public void spbrfs(String uplo, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] afb, int _afb_offset, int ldafb, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void spbrfs(String uplo, int n, int kd, int nrhs, float[] ab, int offsetab, int ldab, float[] afb, int offsetafb, int ldafb, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void spbstf(String uplo, int n, int kd, float[] ab, int ldab, org.netlib.util.intW info); - public void spbstf(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, org.netlib.util.intW info); + public void spbstf(String uplo, int n, int kd, float[] ab, int offsetab, int ldab, org.netlib.util.intW info); public void spbsv(String uplo, int n, int kd, int nrhs, float[] ab, int ldab, float[] b, int ldb, org.netlib.util.intW info); - public void spbsv(String uplo, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void spbsv(String uplo, int n, int kd, int nrhs, float[] ab, int offsetab, int ldab, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void spbsvx(String fact, String uplo, int n, int kd, int nrhs, float[] ab, int ldab, float[] afb, int ldafb, org.netlib.util.StringW equed, float[] s, float[] b, int ldb, float[] x, int ldx, org.netlib.util.floatW rcond, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info); - public void spbsvx(String fact, String uplo, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] afb, int _afb_offset, int ldafb, org.netlib.util.StringW equed, float[] s, int _s_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void spbsvx(String fact, String uplo, int n, int kd, int nrhs, float[] ab, int offsetab, int ldab, float[] afb, int offsetafb, int ldafb, org.netlib.util.StringW equed, float[] s, int offsets, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void spbtf2(String uplo, int n, int kd, float[] ab, int ldab, org.netlib.util.intW info); - public void spbtf2(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, org.netlib.util.intW info); + public void spbtf2(String uplo, int n, int kd, float[] ab, int offsetab, int ldab, org.netlib.util.intW info); public void spbtrf(String uplo, int n, int kd, float[] ab, int ldab, org.netlib.util.intW info); - public void spbtrf(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, org.netlib.util.intW info); + public void spbtrf(String uplo, int n, int kd, float[] ab, int offsetab, int ldab, org.netlib.util.intW info); public void spbtrs(String uplo, int n, int kd, int nrhs, float[] ab, int ldab, float[] b, int ldb, org.netlib.util.intW info); - public void spbtrs(String uplo, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void spbtrs(String uplo, int n, int kd, int nrhs, float[] ab, int offsetab, int ldab, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void spocon(String uplo, int n, float[] a, int lda, float anorm, org.netlib.util.floatW rcond, float[] work, int[] iwork, org.netlib.util.intW info); - public void spocon(String uplo, int n, float[] a, int _a_offset, int lda, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void spocon(String uplo, int n, float[] a, int offseta, int lda, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void spoequ(int n, float[] a, int lda, float[] s, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info); - public void spoequ(int n, float[] a, int _a_offset, int lda, float[] s, int _s_offset, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info); + public void spoequ(int n, float[] a, int offseta, int lda, float[] s, int offsets, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info); public void sporfs(String uplo, int n, int nrhs, float[] a, int lda, float[] af, int ldaf, float[] b, int ldb, float[] x, int ldx, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info); - public void sporfs(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void sporfs(String uplo, int n, int nrhs, float[] a, int offseta, int lda, float[] af, int offsetaf, int ldaf, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sposv(String uplo, int n, int nrhs, float[] a, int lda, float[] b, int ldb, org.netlib.util.intW info); - public void sposv(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void sposv(String uplo, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void sposvx(String fact, String uplo, int n, int nrhs, float[] a, int lda, float[] af, int ldaf, org.netlib.util.StringW equed, float[] s, float[] b, int ldb, float[] x, int ldx, org.netlib.util.floatW rcond, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info); - public void sposvx(String fact, String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, org.netlib.util.StringW equed, float[] s, int _s_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void sposvx(String fact, String uplo, int n, int nrhs, float[] a, int offseta, int lda, float[] af, int offsetaf, int ldaf, org.netlib.util.StringW equed, float[] s, int offsets, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void spotf2(String uplo, int n, float[] a, int lda, org.netlib.util.intW info); - public void spotf2(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + public void spotf2(String uplo, int n, float[] a, int offseta, int lda, org.netlib.util.intW info); public void spotrf(String uplo, int n, float[] a, int lda, org.netlib.util.intW info); - public void spotrf(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + public void spotrf(String uplo, int n, float[] a, int offseta, int lda, org.netlib.util.intW info); public void spotri(String uplo, int n, float[] a, int lda, org.netlib.util.intW info); - public void spotri(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + public void spotri(String uplo, int n, float[] a, int offseta, int lda, org.netlib.util.intW info); public void spotrs(String uplo, int n, int nrhs, float[] a, int lda, float[] b, int ldb, org.netlib.util.intW info); - public void spotrs(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void spotrs(String uplo, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void sppcon(String uplo, int n, float[] ap, float anorm, org.netlib.util.floatW rcond, float[] work, int[] iwork, org.netlib.util.intW info); - public void sppcon(String uplo, int n, float[] ap, int _ap_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void sppcon(String uplo, int n, float[] ap, int offsetap, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sppequ(String uplo, int n, float[] ap, float[] s, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info); - public void sppequ(String uplo, int n, float[] ap, int _ap_offset, float[] s, int _s_offset, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info); + public void sppequ(String uplo, int n, float[] ap, int offsetap, float[] s, int offsets, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info); public void spprfs(String uplo, int n, int nrhs, float[] ap, float[] afp, float[] b, int ldb, float[] x, int ldx, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info); - public void spprfs(String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] afp, int _afp_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void spprfs(String uplo, int n, int nrhs, float[] ap, int offsetap, float[] afp, int offsetafp, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sppsv(String uplo, int n, int nrhs, float[] ap, float[] b, int ldb, org.netlib.util.intW info); - public void sppsv(String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void sppsv(String uplo, int n, int nrhs, float[] ap, int offsetap, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void sppsvx(String fact, String uplo, int n, int nrhs, float[] ap, float[] afp, org.netlib.util.StringW equed, float[] s, float[] b, int ldb, float[] x, int ldx, org.netlib.util.floatW rcond, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info); - public void sppsvx(String fact, String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] afp, int _afp_offset, org.netlib.util.StringW equed, float[] s, int _s_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void sppsvx(String fact, String uplo, int n, int nrhs, float[] ap, int offsetap, float[] afp, int offsetafp, org.netlib.util.StringW equed, float[] s, int offsets, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void spptrf(String uplo, int n, float[] ap, org.netlib.util.intW info); - public void spptrf(String uplo, int n, float[] ap, int _ap_offset, org.netlib.util.intW info); + public void spptrf(String uplo, int n, float[] ap, int offsetap, org.netlib.util.intW info); public void spptri(String uplo, int n, float[] ap, org.netlib.util.intW info); - public void spptri(String uplo, int n, float[] ap, int _ap_offset, org.netlib.util.intW info); + public void spptri(String uplo, int n, float[] ap, int offsetap, org.netlib.util.intW info); public void spptrs(String uplo, int n, int nrhs, float[] ap, float[] b, int ldb, org.netlib.util.intW info); - public void spptrs(String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void spptrs(String uplo, int n, int nrhs, float[] ap, int offsetap, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void sptcon(int n, float[] d, float[] e, float anorm, org.netlib.util.floatW rcond, float[] work, org.netlib.util.intW info); - public void sptcon(int n, float[] d, int _d_offset, float[] e, int _e_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, org.netlib.util.intW info); + public void sptcon(int n, float[] d, int offsetd, float[] e, int offsete, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, org.netlib.util.intW info); public void spteqr(String compz, int n, float[] d, float[] e, float[] z, int ldz, float[] work, org.netlib.util.intW info); - public void spteqr(String compz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info); + public void spteqr(String compz, int n, float[] d, int offsetd, float[] e, int offsete, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info); public void sptrfs(int n, int nrhs, float[] d, float[] e, float[] df, float[] ef, float[] b, int ldb, float[] x, int ldx, float[] ferr, float[] berr, float[] work, org.netlib.util.intW info); - public void sptrfs(int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] df, int _df_offset, float[] ef, int _ef_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, org.netlib.util.intW info); + public void sptrfs(int n, int nrhs, float[] d, int offsetd, float[] e, int offsete, float[] df, int offsetdf, float[] ef, int offsetef, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, org.netlib.util.intW info); public void sptsv(int n, int nrhs, float[] d, float[] e, float[] b, int ldb, org.netlib.util.intW info); - public void sptsv(int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void sptsv(int n, int nrhs, float[] d, int offsetd, float[] e, int offsete, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void sptsvx(String fact, int n, int nrhs, float[] d, float[] e, float[] df, float[] ef, float[] b, int ldb, float[] x, int ldx, org.netlib.util.floatW rcond, float[] ferr, float[] berr, float[] work, org.netlib.util.intW info); - public void sptsvx(String fact, int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] df, int _df_offset, float[] ef, int _ef_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, org.netlib.util.intW info); + public void sptsvx(String fact, int n, int nrhs, float[] d, int offsetd, float[] e, int offsete, float[] df, int offsetdf, float[] ef, int offsetef, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, org.netlib.util.intW info); public void spttrf(int n, float[] d, float[] e, org.netlib.util.intW info); - public void spttrf(int n, float[] d, int _d_offset, float[] e, int _e_offset, org.netlib.util.intW info); + public void spttrf(int n, float[] d, int offsetd, float[] e, int offsete, org.netlib.util.intW info); public void spttrs(int n, int nrhs, float[] d, float[] e, float[] b, int ldb, org.netlib.util.intW info); - public void spttrs(int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void spttrs(int n, int nrhs, float[] d, int offsetd, float[] e, int offsete, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void sptts2(int n, int nrhs, float[] d, float[] e, float[] b, int ldb); - public void sptts2(int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] b, int _b_offset, int ldb); + public void sptts2(int n, int nrhs, float[] d, int offsetd, float[] e, int offsete, float[] b, int offsetb, int ldb); public void srscl(int n, float sa, float[] sx, int incx); - public void srscl(int n, float sa, float[] sx, int _sx_offset, int incx); + public void srscl(int n, float sa, float[] sx, int offsetsx, int incx); public void ssbev(String jobz, String uplo, int n, int kd, float[] ab, int ldab, float[] w, float[] z, int ldz, float[] work, org.netlib.util.intW info); - public void ssbev(String jobz, String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info); + public void ssbev(String jobz, String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info); public void ssbevd(String jobz, String uplo, int n, int kd, float[] ab, int ldab, float[] w, float[] z, int ldz, float[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info); - public void ssbevd(String jobz, String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + public void ssbevd(String jobz, String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void ssbevx(String jobz, String range, String uplo, int n, int kd, float[] ab, int ldab, float[] q, int ldq, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, float[] z, int ldz, float[] work, int[] iwork, int[] ifail, org.netlib.util.intW info); - public void ssbevx(String jobz, String range, String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] q, int _q_offset, int ldq, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + public void ssbevx(String jobz, String range, String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float[] q, int offsetq, int ldq, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void ssbgst(String vect, String uplo, int n, int ka, int kb, float[] ab, int ldab, float[] bb, int ldbb, float[] x, int ldx, float[] work, org.netlib.util.intW info); - public void ssbgst(String vect, String uplo, int n, int ka, int kb, float[] ab, int _ab_offset, int ldab, float[] bb, int _bb_offset, int ldbb, float[] x, int _x_offset, int ldx, float[] work, int _work_offset, org.netlib.util.intW info); + public void ssbgst(String vect, String uplo, int n, int ka, int kb, float[] ab, int offsetab, int ldab, float[] bb, int offsetbb, int ldbb, float[] x, int offsetx, int ldx, float[] work, int offsetwork, org.netlib.util.intW info); public void ssbgv(String jobz, String uplo, int n, int ka, int kb, float[] ab, int ldab, float[] bb, int ldbb, float[] w, float[] z, int ldz, float[] work, org.netlib.util.intW info); - public void ssbgv(String jobz, String uplo, int n, int ka, int kb, float[] ab, int _ab_offset, int ldab, float[] bb, int _bb_offset, int ldbb, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info); + public void ssbgv(String jobz, String uplo, int n, int ka, int kb, float[] ab, int offsetab, int ldab, float[] bb, int offsetbb, int ldbb, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info); public void ssbgvd(String jobz, String uplo, int n, int ka, int kb, float[] ab, int ldab, float[] bb, int ldbb, float[] w, float[] z, int ldz, float[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info); - public void ssbgvd(String jobz, String uplo, int n, int ka, int kb, float[] ab, int _ab_offset, int ldab, float[] bb, int _bb_offset, int ldbb, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + public void ssbgvd(String jobz, String uplo, int n, int ka, int kb, float[] ab, int offsetab, int ldab, float[] bb, int offsetbb, int ldbb, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void ssbgvx(String jobz, String range, String uplo, int n, int ka, int kb, float[] ab, int ldab, float[] bb, int ldbb, float[] q, int ldq, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, float[] z, int ldz, float[] work, int[] iwork, int[] ifail, org.netlib.util.intW info); - public void ssbgvx(String jobz, String range, String uplo, int n, int ka, int kb, float[] ab, int _ab_offset, int ldab, float[] bb, int _bb_offset, int ldbb, float[] q, int _q_offset, int ldq, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + public void ssbgvx(String jobz, String range, String uplo, int n, int ka, int kb, float[] ab, int offsetab, int ldab, float[] bb, int offsetbb, int ldbb, float[] q, int offsetq, int ldq, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void ssbtrd(String vect, String uplo, int n, int kd, float[] ab, int ldab, float[] d, float[] e, float[] q, int ldq, float[] work, org.netlib.util.intW info); - public void ssbtrd(String vect, String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] d, int _d_offset, float[] e, int _e_offset, float[] q, int _q_offset, int ldq, float[] work, int _work_offset, org.netlib.util.intW info); + public void ssbtrd(String vect, String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float[] d, int offsetd, float[] e, int offsete, float[] q, int offsetq, int ldq, float[] work, int offsetwork, org.netlib.util.intW info); public void sspcon(String uplo, int n, float[] ap, int[] ipiv, float anorm, org.netlib.util.floatW rcond, float[] work, int[] iwork, org.netlib.util.intW info); - public void sspcon(String uplo, int n, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void sspcon(String uplo, int n, float[] ap, int offsetap, int[] ipiv, int offsetipiv, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sspev(String jobz, String uplo, int n, float[] ap, float[] w, float[] z, int ldz, float[] work, org.netlib.util.intW info); - public void sspev(String jobz, String uplo, int n, float[] ap, int _ap_offset, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info); + public void sspev(String jobz, String uplo, int n, float[] ap, int offsetap, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info); public void sspevd(String jobz, String uplo, int n, float[] ap, float[] w, float[] z, int ldz, float[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info); - public void sspevd(String jobz, String uplo, int n, float[] ap, int _ap_offset, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + public void sspevd(String jobz, String uplo, int n, float[] ap, int offsetap, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void sspevx(String jobz, String range, String uplo, int n, float[] ap, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, float[] z, int ldz, float[] work, int[] iwork, int[] ifail, org.netlib.util.intW info); - public void sspevx(String jobz, String range, String uplo, int n, float[] ap, int _ap_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + public void sspevx(String jobz, String range, String uplo, int n, float[] ap, int offsetap, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void sspgst(int itype, String uplo, int n, float[] ap, float[] bp, org.netlib.util.intW info); - public void sspgst(int itype, String uplo, int n, float[] ap, int _ap_offset, float[] bp, int _bp_offset, org.netlib.util.intW info); + public void sspgst(int itype, String uplo, int n, float[] ap, int offsetap, float[] bp, int offsetbp, org.netlib.util.intW info); public void sspgv(int itype, String jobz, String uplo, int n, float[] ap, float[] bp, float[] w, float[] z, int ldz, float[] work, org.netlib.util.intW info); - public void sspgv(int itype, String jobz, String uplo, int n, float[] ap, int _ap_offset, float[] bp, int _bp_offset, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info); + public void sspgv(int itype, String jobz, String uplo, int n, float[] ap, int offsetap, float[] bp, int offsetbp, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info); public void sspgvd(int itype, String jobz, String uplo, int n, float[] ap, float[] bp, float[] w, float[] z, int ldz, float[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info); - public void sspgvd(int itype, String jobz, String uplo, int n, float[] ap, int _ap_offset, float[] bp, int _bp_offset, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + public void sspgvd(int itype, String jobz, String uplo, int n, float[] ap, int offsetap, float[] bp, int offsetbp, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void sspgvx(int itype, String jobz, String range, String uplo, int n, float[] ap, float[] bp, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, float[] z, int ldz, float[] work, int[] iwork, int[] ifail, org.netlib.util.intW info); - public void sspgvx(int itype, String jobz, String range, String uplo, int n, float[] ap, int _ap_offset, float[] bp, int _bp_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + public void sspgvx(int itype, String jobz, String range, String uplo, int n, float[] ap, int offsetap, float[] bp, int offsetbp, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void ssprfs(String uplo, int n, int nrhs, float[] ap, float[] afp, int[] ipiv, float[] b, int ldb, float[] x, int ldx, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info); - public void ssprfs(String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] afp, int _afp_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void ssprfs(String uplo, int n, int nrhs, float[] ap, int offsetap, float[] afp, int offsetafp, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sspsv(String uplo, int n, int nrhs, float[] ap, int[] ipiv, float[] b, int ldb, org.netlib.util.intW info); - public void sspsv(String uplo, int n, int nrhs, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void sspsv(String uplo, int n, int nrhs, float[] ap, int offsetap, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void sspsvx(String fact, String uplo, int n, int nrhs, float[] ap, float[] afp, int[] ipiv, float[] b, int ldb, float[] x, int ldx, org.netlib.util.floatW rcond, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info); - public void sspsvx(String fact, String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] afp, int _afp_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void sspsvx(String fact, String uplo, int n, int nrhs, float[] ap, int offsetap, float[] afp, int offsetafp, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void ssptrd(String uplo, int n, float[] ap, float[] d, float[] e, float[] tau, org.netlib.util.intW info); - public void ssptrd(String uplo, int n, float[] ap, int _ap_offset, float[] d, int _d_offset, float[] e, int _e_offset, float[] tau, int _tau_offset, org.netlib.util.intW info); + public void ssptrd(String uplo, int n, float[] ap, int offsetap, float[] d, int offsetd, float[] e, int offsete, float[] tau, int offsettau, org.netlib.util.intW info); public void ssptrf(String uplo, int n, float[] ap, int[] ipiv, org.netlib.util.intW info); - public void ssptrf(String uplo, int n, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + public void ssptrf(String uplo, int n, float[] ap, int offsetap, int[] ipiv, int offsetipiv, org.netlib.util.intW info); public void ssptri(String uplo, int n, float[] ap, int[] ipiv, float[] work, org.netlib.util.intW info); - public void ssptri(String uplo, int n, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, float[] work, int _work_offset, org.netlib.util.intW info); + public void ssptri(String uplo, int n, float[] ap, int offsetap, int[] ipiv, int offsetipiv, float[] work, int offsetwork, org.netlib.util.intW info); public void ssptrs(String uplo, int n, int nrhs, float[] ap, int[] ipiv, float[] b, int ldb, org.netlib.util.intW info); - public void ssptrs(String uplo, int n, int nrhs, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void ssptrs(String uplo, int n, int nrhs, float[] ap, int offsetap, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void sstebz(String range, String order, int n, float vl, float vu, int il, int iu, float abstol, float[] d, float[] e, org.netlib.util.intW m, org.netlib.util.intW nsplit, float[] w, int[] iblock, int[] isplit, float[] work, int[] iwork, org.netlib.util.intW info); - public void sstebz(String range, String order, int n, float vl, float vu, int il, int iu, float abstol, float[] d, int _d_offset, float[] e, int _e_offset, org.netlib.util.intW m, org.netlib.util.intW nsplit, float[] w, int _w_offset, int[] iblock, int _iblock_offset, int[] isplit, int _isplit_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void sstebz(String range, String order, int n, float vl, float vu, int il, int iu, float abstol, float[] d, int offsetd, float[] e, int offsete, org.netlib.util.intW m, org.netlib.util.intW nsplit, float[] w, int offsetw, int[] iblock, int offsetiblock, int[] isplit, int offsetisplit, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sstedc(String compz, int n, float[] d, float[] e, float[] z, int ldz, float[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info); - public void sstedc(String compz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + public void sstedc(String compz, int n, float[] d, int offsetd, float[] e, int offsete, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void sstegr(String jobz, String range, int n, float[] d, float[] e, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, float[] z, int ldz, int[] isuppz, float[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info); - public void sstegr(String jobz, String range, int n, float[] d, int _d_offset, float[] e, int _e_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + public void sstegr(String jobz, String range, int n, float[] d, int offsetd, float[] e, int offsete, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void sstein(int n, float[] d, float[] e, int m, float[] w, int[] iblock, int[] isplit, float[] z, int ldz, float[] work, int[] iwork, int[] ifail, org.netlib.util.intW info); - public void sstein(int n, float[] d, int _d_offset, float[] e, int _e_offset, int m, float[] w, int _w_offset, int[] iblock, int _iblock_offset, int[] isplit, int _isplit_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + public void sstein(int n, float[] d, int offsetd, float[] e, int offsete, int m, float[] w, int offsetw, int[] iblock, int offsetiblock, int[] isplit, int offsetisplit, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void sstemr(String jobz, String range, int n, float[] d, float[] e, float vl, float vu, int il, int iu, org.netlib.util.intW m, float[] w, float[] z, int ldz, int nzc, int[] isuppz, org.netlib.util.booleanW tryrac, float[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info); - public void sstemr(String jobz, String range, int n, float[] d, int _d_offset, float[] e, int _e_offset, float vl, float vu, int il, int iu, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, int nzc, int[] isuppz, int _isuppz_offset, org.netlib.util.booleanW tryrac, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + public void sstemr(String jobz, String range, int n, float[] d, int offsetd, float[] e, int offsete, float vl, float vu, int il, int iu, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, int nzc, int[] isuppz, int offsetisuppz, org.netlib.util.booleanW tryrac, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void ssteqr(String compz, int n, float[] d, float[] e, float[] z, int ldz, float[] work, org.netlib.util.intW info); - public void ssteqr(String compz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info); + public void ssteqr(String compz, int n, float[] d, int offsetd, float[] e, int offsete, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info); public void ssterf(int n, float[] d, float[] e, org.netlib.util.intW info); - public void ssterf(int n, float[] d, int _d_offset, float[] e, int _e_offset, org.netlib.util.intW info); + public void ssterf(int n, float[] d, int offsetd, float[] e, int offsete, org.netlib.util.intW info); public void sstev(String jobz, int n, float[] d, float[] e, float[] z, int ldz, float[] work, org.netlib.util.intW info); - public void sstev(String jobz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info); + public void sstev(String jobz, int n, float[] d, int offsetd, float[] e, int offsete, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info); public void sstevd(String jobz, int n, float[] d, float[] e, float[] z, int ldz, float[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info); - public void sstevd(String jobz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + public void sstevd(String jobz, int n, float[] d, int offsetd, float[] e, int offsete, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void sstevr(String jobz, String range, int n, float[] d, float[] e, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, float[] z, int ldz, int[] isuppz, float[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info); - public void sstevr(String jobz, String range, int n, float[] d, int _d_offset, float[] e, int _e_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + public void sstevr(String jobz, String range, int n, float[] d, int offsetd, float[] e, int offsete, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void sstevx(String jobz, String range, int n, float[] d, float[] e, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, float[] z, int ldz, float[] work, int[] iwork, int[] ifail, org.netlib.util.intW info); - public void sstevx(String jobz, String range, int n, float[] d, int _d_offset, float[] e, int _e_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + public void sstevx(String jobz, String range, int n, float[] d, int offsetd, float[] e, int offsete, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void ssycon(String uplo, int n, float[] a, int lda, int[] ipiv, float anorm, org.netlib.util.floatW rcond, float[] work, int[] iwork, org.netlib.util.intW info); - public void ssycon(String uplo, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void ssycon(String uplo, int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void ssyev(String jobz, String uplo, int n, float[] a, int lda, float[] w, float[] work, int lwork, org.netlib.util.intW info); - public void ssyev(String jobz, String uplo, int n, float[] a, int _a_offset, int lda, float[] w, int _w_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void ssyev(String jobz, String uplo, int n, float[] a, int offseta, int lda, float[] w, int offsetw, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void ssyevd(String jobz, String uplo, int n, float[] a, int lda, float[] w, float[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info); - public void ssyevd(String jobz, String uplo, int n, float[] a, int _a_offset, int lda, float[] w, int _w_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + public void ssyevd(String jobz, String uplo, int n, float[] a, int offseta, int lda, float[] w, int offsetw, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void ssyevr(String jobz, String range, String uplo, int n, float[] a, int lda, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, float[] z, int ldz, int[] isuppz, float[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info); - public void ssyevr(String jobz, String range, String uplo, int n, float[] a, int _a_offset, int lda, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + public void ssyevr(String jobz, String range, String uplo, int n, float[] a, int offseta, int lda, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void ssyevx(String jobz, String range, String uplo, int n, float[] a, int lda, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, float[] z, int ldz, float[] work, int lwork, int[] iwork, int[] ifail, org.netlib.util.intW info); - public void ssyevx(String jobz, String range, String uplo, int n, float[] a, int _a_offset, int lda, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + public void ssyevx(String jobz, String range, String uplo, int n, float[] a, int offseta, int lda, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void ssygs2(int itype, String uplo, int n, float[] a, int lda, float[] b, int ldb, org.netlib.util.intW info); - public void ssygs2(int itype, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void ssygs2(int itype, String uplo, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void ssygst(int itype, String uplo, int n, float[] a, int lda, float[] b, int ldb, org.netlib.util.intW info); - public void ssygst(int itype, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void ssygst(int itype, String uplo, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void ssygv(int itype, String jobz, String uplo, int n, float[] a, int lda, float[] b, int ldb, float[] w, float[] work, int lwork, org.netlib.util.intW info); - public void ssygv(int itype, String jobz, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] w, int _w_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void ssygv(int itype, String jobz, String uplo, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] w, int offsetw, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void ssygvd(int itype, String jobz, String uplo, int n, float[] a, int lda, float[] b, int ldb, float[] w, float[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info); - public void ssygvd(int itype, String jobz, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] w, int _w_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + public void ssygvd(int itype, String jobz, String uplo, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] w, int offsetw, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void ssygvx(int itype, String jobz, String range, String uplo, int n, float[] a, int lda, float[] b, int ldb, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, float[] z, int ldz, float[] work, int lwork, int[] iwork, int[] ifail, org.netlib.util.intW info); - public void ssygvx(int itype, String jobz, String range, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + public void ssygvx(int itype, String jobz, String range, String uplo, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void ssyrfs(String uplo, int n, int nrhs, float[] a, int lda, float[] af, int ldaf, int[] ipiv, float[] b, int ldb, float[] x, int ldx, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info); - public void ssyrfs(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void ssyrfs(String uplo, int n, int nrhs, float[] a, int offseta, int lda, float[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void ssysv(String uplo, int n, int nrhs, float[] a, int lda, int[] ipiv, float[] b, int ldb, float[] work, int lwork, org.netlib.util.intW info); - public void ssysv(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void ssysv(String uplo, int n, int nrhs, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void ssysvx(String fact, String uplo, int n, int nrhs, float[] a, int lda, float[] af, int ldaf, int[] ipiv, float[] b, int ldb, float[] x, int ldx, org.netlib.util.floatW rcond, float[] ferr, float[] berr, float[] work, int lwork, int[] iwork, org.netlib.util.intW info); - public void ssysvx(String fact, String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void ssysvx(String fact, String uplo, int n, int nrhs, float[] a, int offseta, int lda, float[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void ssytd2(String uplo, int n, float[] a, int lda, float[] d, float[] e, float[] tau, org.netlib.util.intW info); - public void ssytd2(String uplo, int n, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tau, int _tau_offset, org.netlib.util.intW info); + public void ssytd2(String uplo, int n, float[] a, int offseta, int lda, float[] d, int offsetd, float[] e, int offsete, float[] tau, int offsettau, org.netlib.util.intW info); public void ssytf2(String uplo, int n, float[] a, int lda, int[] ipiv, org.netlib.util.intW info); - public void ssytf2(String uplo, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + public void ssytf2(String uplo, int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, org.netlib.util.intW info); public void ssytrd(String uplo, int n, float[] a, int lda, float[] d, float[] e, float[] tau, float[] work, int lwork, org.netlib.util.intW info); - public void ssytrd(String uplo, int n, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void ssytrd(String uplo, int n, float[] a, int offseta, int lda, float[] d, int offsetd, float[] e, int offsete, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void ssytrf(String uplo, int n, float[] a, int lda, int[] ipiv, float[] work, int lwork, org.netlib.util.intW info); - public void ssytrf(String uplo, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void ssytrf(String uplo, int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void ssytri(String uplo, int n, float[] a, int lda, int[] ipiv, float[] work, org.netlib.util.intW info); - public void ssytri(String uplo, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] work, int _work_offset, org.netlib.util.intW info); + public void ssytri(String uplo, int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] work, int offsetwork, org.netlib.util.intW info); public void ssytrs(String uplo, int n, int nrhs, float[] a, int lda, int[] ipiv, float[] b, int ldb, org.netlib.util.intW info); - public void ssytrs(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void ssytrs(String uplo, int n, int nrhs, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void stbcon(String norm, String uplo, String diag, int n, int kd, float[] ab, int ldab, org.netlib.util.floatW rcond, float[] work, int[] iwork, org.netlib.util.intW info); - public void stbcon(String norm, String uplo, String diag, int n, int kd, float[] ab, int _ab_offset, int ldab, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void stbcon(String norm, String uplo, String diag, int n, int kd, float[] ab, int offsetab, int ldab, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void stbrfs(String uplo, String trans, String diag, int n, int kd, int nrhs, float[] ab, int ldab, float[] b, int ldb, float[] x, int ldx, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info); - public void stbrfs(String uplo, String trans, String diag, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void stbrfs(String uplo, String trans, String diag, int n, int kd, int nrhs, float[] ab, int offsetab, int ldab, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void stbtrs(String uplo, String trans, String diag, int n, int kd, int nrhs, float[] ab, int ldab, float[] b, int ldb, org.netlib.util.intW info); - public void stbtrs(String uplo, String trans, String diag, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void stbtrs(String uplo, String trans, String diag, int n, int kd, int nrhs, float[] ab, int offsetab, int ldab, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void stgevc(String side, String howmny, boolean[] select, int n, float[] s, int lds, float[] p, int ldp, float[] vl, int ldvl, float[] vr, int ldvr, int mm, org.netlib.util.intW m, float[] work, org.netlib.util.intW info); - public void stgevc(String side, String howmny, boolean[] select, int _select_offset, int n, float[] s, int _s_offset, int lds, float[] p, int _p_offset, int ldp, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, float[] work, int _work_offset, org.netlib.util.intW info); + public void stgevc(String side, String howmny, boolean[] select, int offsetselect, int n, float[] s, int offsets, int lds, float[] p, int offsetp, int ldp, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, int mm, org.netlib.util.intW m, float[] work, int offsetwork, org.netlib.util.intW info); public void stgex2(boolean wantq, boolean wantz, int n, float[] a, int lda, float[] b, int ldb, float[] q, int ldq, float[] z, int ldz, int j1, int n1, int n2, float[] work, int lwork, org.netlib.util.intW info); - public void stgex2(boolean wantq, boolean wantz, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, int j1, int n1, int n2, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void stgex2(boolean wantq, boolean wantz, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] q, int offsetq, int ldq, float[] z, int offsetz, int ldz, int j1, int n1, int n2, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void stgexc(boolean wantq, boolean wantz, int n, float[] a, int lda, float[] b, int ldb, float[] q, int ldq, float[] z, int ldz, org.netlib.util.intW ifst, org.netlib.util.intW ilst, float[] work, int lwork, org.netlib.util.intW info); - public void stgexc(boolean wantq, boolean wantz, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, org.netlib.util.intW ifst, org.netlib.util.intW ilst, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void stgexc(boolean wantq, boolean wantz, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] q, int offsetq, int ldq, float[] z, int offsetz, int ldz, org.netlib.util.intW ifst, org.netlib.util.intW ilst, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void stgsen(int ijob, boolean wantq, boolean wantz, boolean[] select, int n, float[] a, int lda, float[] b, int ldb, float[] alphar, float[] alphai, float[] beta, float[] q, int ldq, float[] z, int ldz, org.netlib.util.intW m, org.netlib.util.floatW pl, org.netlib.util.floatW pr, float[] dif, float[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info); - public void stgsen(int ijob, boolean wantq, boolean wantz, boolean[] select, int _select_offset, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, org.netlib.util.intW m, org.netlib.util.floatW pl, org.netlib.util.floatW pr, float[] dif, int _dif_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + public void stgsen(int ijob, boolean wantq, boolean wantz, boolean[] select, int offsetselect, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] q, int offsetq, int ldq, float[] z, int offsetz, int ldz, org.netlib.util.intW m, org.netlib.util.floatW pl, org.netlib.util.floatW pr, float[] dif, int offsetdif, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void stgsja(String jobu, String jobv, String jobq, int m, int p, int n, int k, int l, float[] a, int lda, float[] b, int ldb, float tola, float tolb, float[] alpha, float[] beta, float[] u, int ldu, float[] v, int ldv, float[] q, int ldq, float[] work, org.netlib.util.intW ncycle, org.netlib.util.intW info); - public void stgsja(String jobu, String jobv, String jobq, int m, int p, int n, int k, int l, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float tola, float tolb, float[] alpha, int _alpha_offset, float[] beta, int _beta_offset, float[] u, int _u_offset, int ldu, float[] v, int _v_offset, int ldv, float[] q, int _q_offset, int ldq, float[] work, int _work_offset, org.netlib.util.intW ncycle, org.netlib.util.intW info); + public void stgsja(String jobu, String jobv, String jobq, int m, int p, int n, int k, int l, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float tola, float tolb, float[] alpha, int offsetalpha, float[] beta, int offsetbeta, float[] u, int offsetu, int ldu, float[] v, int offsetv, int ldv, float[] q, int offsetq, int ldq, float[] work, int offsetwork, org.netlib.util.intW ncycle, org.netlib.util.intW info); public void stgsna(String job, String howmny, boolean[] select, int n, float[] a, int lda, float[] b, int ldb, float[] vl, int ldvl, float[] vr, int ldvr, float[] s, float[] dif, int mm, org.netlib.util.intW m, float[] work, int lwork, int[] iwork, org.netlib.util.intW info); - public void stgsna(String job, String howmny, boolean[] select, int _select_offset, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] s, int _s_offset, float[] dif, int _dif_offset, int mm, org.netlib.util.intW m, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void stgsna(String job, String howmny, boolean[] select, int offsetselect, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, float[] s, int offsets, float[] dif, int offsetdif, int mm, org.netlib.util.intW m, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void stgsy2(String trans, int ijob, int m, int n, float[] a, int lda, float[] b, int ldb, float[] c, int Ldc, float[] d, int ldd, float[] e, int lde, float[] f, int ldf, org.netlib.util.floatW scale, org.netlib.util.floatW rdsum, org.netlib.util.floatW rdscal, int[] iwork, org.netlib.util.intW pq, org.netlib.util.intW info); - public void stgsy2(String trans, int ijob, int m, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] c, int _c_offset, int Ldc, float[] d, int _d_offset, int ldd, float[] e, int _e_offset, int lde, float[] f, int _f_offset, int ldf, org.netlib.util.floatW scale, org.netlib.util.floatW rdsum, org.netlib.util.floatW rdscal, int[] iwork, int _iwork_offset, org.netlib.util.intW pq, org.netlib.util.intW info); + public void stgsy2(String trans, int ijob, int m, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] c, int offsetc, int Ldc, float[] d, int offsetd, int ldd, float[] e, int offsete, int lde, float[] f, int offsetf, int ldf, org.netlib.util.floatW scale, org.netlib.util.floatW rdsum, org.netlib.util.floatW rdscal, int[] iwork, int offsetiwork, org.netlib.util.intW pq, org.netlib.util.intW info); public void stgsyl(String trans, int ijob, int m, int n, float[] a, int lda, float[] b, int ldb, float[] c, int Ldc, float[] d, int ldd, float[] e, int lde, float[] f, int ldf, org.netlib.util.floatW scale, org.netlib.util.floatW dif, float[] work, int lwork, int[] iwork, org.netlib.util.intW info); - public void stgsyl(String trans, int ijob, int m, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] c, int _c_offset, int Ldc, float[] d, int _d_offset, int ldd, float[] e, int _e_offset, int lde, float[] f, int _f_offset, int ldf, org.netlib.util.floatW scale, org.netlib.util.floatW dif, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void stgsyl(String trans, int ijob, int m, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] c, int offsetc, int Ldc, float[] d, int offsetd, int ldd, float[] e, int offsete, int lde, float[] f, int offsetf, int ldf, org.netlib.util.floatW scale, org.netlib.util.floatW dif, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void stpcon(String norm, String uplo, String diag, int n, float[] ap, org.netlib.util.floatW rcond, float[] work, int[] iwork, org.netlib.util.intW info); - public void stpcon(String norm, String uplo, String diag, int n, float[] ap, int _ap_offset, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void stpcon(String norm, String uplo, String diag, int n, float[] ap, int offsetap, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void stprfs(String uplo, String trans, String diag, int n, int nrhs, float[] ap, float[] b, int ldb, float[] x, int ldx, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info); - public void stprfs(String uplo, String trans, String diag, int n, int nrhs, float[] ap, int _ap_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void stprfs(String uplo, String trans, String diag, int n, int nrhs, float[] ap, int offsetap, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void stptri(String uplo, String diag, int n, float[] ap, org.netlib.util.intW info); - public void stptri(String uplo, String diag, int n, float[] ap, int _ap_offset, org.netlib.util.intW info); + public void stptri(String uplo, String diag, int n, float[] ap, int offsetap, org.netlib.util.intW info); public void stptrs(String uplo, String trans, String diag, int n, int nrhs, float[] ap, float[] b, int ldb, org.netlib.util.intW info); - public void stptrs(String uplo, String trans, String diag, int n, int nrhs, float[] ap, int _ap_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void stptrs(String uplo, String trans, String diag, int n, int nrhs, float[] ap, int offsetap, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void strcon(String norm, String uplo, String diag, int n, float[] a, int lda, org.netlib.util.floatW rcond, float[] work, int[] iwork, org.netlib.util.intW info); - public void strcon(String norm, String uplo, String diag, int n, float[] a, int _a_offset, int lda, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void strcon(String norm, String uplo, String diag, int n, float[] a, int offseta, int lda, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void strevc(String side, String howmny, boolean[] select, int n, float[] t, int ldt, float[] vl, int ldvl, float[] vr, int ldvr, int mm, org.netlib.util.intW m, float[] work, org.netlib.util.intW info); - public void strevc(String side, String howmny, boolean[] select, int _select_offset, int n, float[] t, int _t_offset, int ldt, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, float[] work, int _work_offset, org.netlib.util.intW info); + public void strevc(String side, String howmny, boolean[] select, int offsetselect, int n, float[] t, int offsett, int ldt, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, int mm, org.netlib.util.intW m, float[] work, int offsetwork, org.netlib.util.intW info); public void strexc(String compq, int n, float[] t, int ldt, float[] q, int ldq, org.netlib.util.intW ifst, org.netlib.util.intW ilst, float[] work, org.netlib.util.intW info); - public void strexc(String compq, int n, float[] t, int _t_offset, int ldt, float[] q, int _q_offset, int ldq, org.netlib.util.intW ifst, org.netlib.util.intW ilst, float[] work, int _work_offset, org.netlib.util.intW info); + public void strexc(String compq, int n, float[] t, int offsett, int ldt, float[] q, int offsetq, int ldq, org.netlib.util.intW ifst, org.netlib.util.intW ilst, float[] work, int offsetwork, org.netlib.util.intW info); public void strrfs(String uplo, String trans, String diag, int n, int nrhs, float[] a, int lda, float[] b, int ldb, float[] x, int ldx, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info); - public void strrfs(String uplo, String trans, String diag, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void strrfs(String uplo, String trans, String diag, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void strsen(String job, String compq, boolean[] select, int n, float[] t, int ldt, float[] q, int ldq, float[] wr, float[] wi, org.netlib.util.intW m, org.netlib.util.floatW s, org.netlib.util.floatW sep, float[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info); - public void strsen(String job, String compq, boolean[] select, int _select_offset, int n, float[] t, int _t_offset, int ldt, float[] q, int _q_offset, int ldq, float[] wr, int _wr_offset, float[] wi, int _wi_offset, org.netlib.util.intW m, org.netlib.util.floatW s, org.netlib.util.floatW sep, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + public void strsen(String job, String compq, boolean[] select, int offsetselect, int n, float[] t, int offsett, int ldt, float[] q, int offsetq, int ldq, float[] wr, int offsetwr, float[] wi, int offsetwi, org.netlib.util.intW m, org.netlib.util.floatW s, org.netlib.util.floatW sep, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void strsna(String job, String howmny, boolean[] select, int n, float[] t, int ldt, float[] vl, int ldvl, float[] vr, int ldvr, float[] s, float[] sep, int mm, org.netlib.util.intW m, float[] work, int ldwork, int[] iwork, org.netlib.util.intW info); - public void strsna(String job, String howmny, boolean[] select, int _select_offset, int n, float[] t, int _t_offset, int ldt, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] s, int _s_offset, float[] sep, int _sep_offset, int mm, org.netlib.util.intW m, float[] work, int _work_offset, int ldwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + public void strsna(String job, String howmny, boolean[] select, int offsetselect, int n, float[] t, int offsett, int ldt, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, float[] s, int offsets, float[] sep, int offsetsep, int mm, org.netlib.util.intW m, float[] work, int offsetwork, int ldwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void strsyl(String trana, String tranb, int isgn, int m, int n, float[] a, int lda, float[] b, int ldb, float[] c, int Ldc, org.netlib.util.floatW scale, org.netlib.util.intW info); - public void strsyl(String trana, String tranb, int isgn, int m, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] c, int _c_offset, int Ldc, org.netlib.util.floatW scale, org.netlib.util.intW info); + public void strsyl(String trana, String tranb, int isgn, int m, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] c, int offsetc, int Ldc, org.netlib.util.floatW scale, org.netlib.util.intW info); public void strti2(String uplo, String diag, int n, float[] a, int lda, org.netlib.util.intW info); - public void strti2(String uplo, String diag, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + public void strti2(String uplo, String diag, int n, float[] a, int offseta, int lda, org.netlib.util.intW info); public void strtri(String uplo, String diag, int n, float[] a, int lda, org.netlib.util.intW info); - public void strtri(String uplo, String diag, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + public void strtri(String uplo, String diag, int n, float[] a, int offseta, int lda, org.netlib.util.intW info); public void strtrs(String uplo, String trans, String diag, int n, int nrhs, float[] a, int lda, float[] b, int ldb, org.netlib.util.intW info); - public void strtrs(String uplo, String trans, String diag, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + public void strtrs(String uplo, String trans, String diag, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void stzrqf(int m, int n, float[] a, int lda, float[] tau, org.netlib.util.intW info); - public void stzrqf(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, org.netlib.util.intW info); + public void stzrqf(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, org.netlib.util.intW info); public void stzrzf(int m, int n, float[] a, int lda, float[] tau, float[] work, int lwork, org.netlib.util.intW info); - public void stzrzf(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + public void stzrzf(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public double dlamch(String cmach); public void dlamc1(org.netlib.util.intW beta, org.netlib.util.intW t, org.netlib.util.booleanW rnd, org.netlib.util.booleanW ieee1); public void dlamc2(org.netlib.util.intW beta, org.netlib.util.intW t, org.netlib.util.booleanW rnd, org.netlib.util.doubleW eps, org.netlib.util.intW emin, org.netlib.util.doubleW rmin, org.netlib.util.intW emax, org.netlib.util.doubleW rmax); diff --git a/lapack/src/main/java/dev/ludovic/netlib/lapack/AbstractLAPACK.java b/lapack/src/main/java/dev/ludovic/netlib/lapack/AbstractLAPACK.java index f6f96424..69b55dab 100644 --- a/lapack/src/main/java/dev/ludovic/netlib/lapack/AbstractLAPACK.java +++ b/lapack/src/main/java/dev/ludovic/netlib/lapack/AbstractLAPACK.java @@ -33,826 +33,826 @@ public void dbdsdc(String uplo, String compq, int n, double[] d, double[] e, dou dbdsdc(uplo, compq, n, d, 0, e, 0, u, 0, ldu, vt, 0, ldvt, q, 0, iq, 0, work, 0, iwork, 0, info); } - public void dbdsdc(String uplo, String compq, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, double[] q, int _q_offset, int[] iq, int _iq_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dbdsdc(String uplo, String compq, int n, double[] d, int offsetd, double[] e, int offsete, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int ldvt, double[] q, int offsetq, int[] iq, int offsetiq, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dbdsdcK(uplo, compq, n, d, _d_offset, e, _e_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, q, _q_offset, iq, _iq_offset, work, _work_offset, iwork, _iwork_offset, info); + dbdsdcK(uplo, compq, n, d, offsetd, e, offsete, u, offsetu, ldu, vt, offsetvt, ldvt, q, offsetq, iq, offsetiq, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dbdsdcK(String uplo, String compq, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, double[] q, int _q_offset, int[] iq, int _iq_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dbdsdcK(String uplo, String compq, int n, double[] d, int offsetd, double[] e, int offsete, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int ldvt, double[] q, int offsetq, int[] iq, int offsetiq, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dbdsqr(String uplo, int n, int ncvt, int nru, int ncc, double[] d, double[] e, double[] vt, int ldvt, double[] u, int ldu, double[] c, int Ldc, double[] work, org.netlib.util.intW info) { dbdsqr(uplo, n, ncvt, nru, ncc, d, 0, e, 0, vt, 0, ldvt, u, 0, ldu, c, 0, Ldc, work, 0, info); } - public void dbdsqr(String uplo, int n, int ncvt, int nru, int ncc, double[] d, int _d_offset, double[] e, int _e_offset, double[] vt, int _vt_offset, int ldvt, double[] u, int _u_offset, int ldu, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dbdsqr(String uplo, int n, int ncvt, int nru, int ncc, double[] d, int offsetd, double[] e, int offsete, double[] vt, int offsetvt, int ldvt, double[] u, int offsetu, int ldu, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dbdsqrK(uplo, n, ncvt, nru, ncc, d, _d_offset, e, _e_offset, vt, _vt_offset, ldvt, u, _u_offset, ldu, c, _c_offset, Ldc, work, _work_offset, info); + dbdsqrK(uplo, n, ncvt, nru, ncc, d, offsetd, e, offsete, vt, offsetvt, ldvt, u, offsetu, ldu, c, offsetc, Ldc, work, offsetwork, info); } - protected abstract void dbdsqrK(String uplo, int n, int ncvt, int nru, int ncc, double[] d, int _d_offset, double[] e, int _e_offset, double[] vt, int _vt_offset, int ldvt, double[] u, int _u_offset, int ldu, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dbdsqrK(String uplo, int n, int ncvt, int nru, int ncc, double[] d, int offsetd, double[] e, int offsete, double[] vt, int offsetvt, int ldvt, double[] u, int offsetu, int ldu, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info); public void ddisna(String job, int m, int n, double[] d, double[] sep, org.netlib.util.intW info) { ddisna(job, m, n, d, 0, sep, 0, info); } - public void ddisna(String job, int m, int n, double[] d, int _d_offset, double[] sep, int _sep_offset, org.netlib.util.intW info) { + public void ddisna(String job, int m, int n, double[] d, int offsetd, double[] sep, int offsetsep, org.netlib.util.intW info) { //FIXME Add arguments check - ddisnaK(job, m, n, d, _d_offset, sep, _sep_offset, info); + ddisnaK(job, m, n, d, offsetd, sep, offsetsep, info); } - protected abstract void ddisnaK(String job, int m, int n, double[] d, int _d_offset, double[] sep, int _sep_offset, org.netlib.util.intW info); + protected abstract void ddisnaK(String job, int m, int n, double[] d, int offsetd, double[] sep, int offsetsep, org.netlib.util.intW info); public void dgbbrd(String vect, int m, int n, int ncc, int kl, int ku, double[] ab, int ldab, double[] d, double[] e, double[] q, int ldq, double[] pt, int ldpt, double[] c, int Ldc, double[] work, org.netlib.util.intW info) { dgbbrd(vect, m, n, ncc, kl, ku, ab, 0, ldab, d, 0, e, 0, q, 0, ldq, pt, 0, ldpt, c, 0, Ldc, work, 0, info); } - public void dgbbrd(String vect, int m, int n, int ncc, int kl, int ku, double[] ab, int _ab_offset, int ldab, double[] d, int _d_offset, double[] e, int _e_offset, double[] q, int _q_offset, int ldq, double[] pt, int _pt_offset, int ldpt, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dgbbrd(String vect, int m, int n, int ncc, int kl, int ku, double[] ab, int offsetab, int ldab, double[] d, int offsetd, double[] e, int offsete, double[] q, int offsetq, int ldq, double[] pt, int offsetpt, int ldpt, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgbbrdK(vect, m, n, ncc, kl, ku, ab, _ab_offset, ldab, d, _d_offset, e, _e_offset, q, _q_offset, ldq, pt, _pt_offset, ldpt, c, _c_offset, Ldc, work, _work_offset, info); + dgbbrdK(vect, m, n, ncc, kl, ku, ab, offsetab, ldab, d, offsetd, e, offsete, q, offsetq, ldq, pt, offsetpt, ldpt, c, offsetc, Ldc, work, offsetwork, info); } - protected abstract void dgbbrdK(String vect, int m, int n, int ncc, int kl, int ku, double[] ab, int _ab_offset, int ldab, double[] d, int _d_offset, double[] e, int _e_offset, double[] q, int _q_offset, int ldq, double[] pt, int _pt_offset, int ldpt, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dgbbrdK(String vect, int m, int n, int ncc, int kl, int ku, double[] ab, int offsetab, int ldab, double[] d, int offsetd, double[] e, int offsete, double[] q, int offsetq, int ldq, double[] pt, int offsetpt, int ldpt, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info); public void dgbcon(String norm, int n, int kl, int ku, double[] ab, int ldab, int[] ipiv, double anorm, org.netlib.util.doubleW rcond, double[] work, int[] iwork, org.netlib.util.intW info) { dgbcon(norm, n, kl, ku, ab, 0, ldab, ipiv, 0, anorm, rcond, work, 0, iwork, 0, info); } - public void dgbcon(String norm, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dgbcon(String norm, int n, int kl, int ku, double[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgbconK(norm, n, kl, ku, ab, _ab_offset, ldab, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + dgbconK(norm, n, kl, ku, ab, offsetab, ldab, ipiv, offsetipiv, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dgbconK(String norm, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dgbconK(String norm, int n, int kl, int ku, double[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dgbequ(int m, int n, int kl, int ku, double[] ab, int ldab, double[] r, double[] c, org.netlib.util.doubleW rowcnd, org.netlib.util.doubleW colcnd, org.netlib.util.doubleW amax, org.netlib.util.intW info) { dgbequ(m, n, kl, ku, ab, 0, ldab, r, 0, c, 0, rowcnd, colcnd, amax, info); } - public void dgbequ(int m, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, double[] r, int _r_offset, double[] c, int _c_offset, org.netlib.util.doubleW rowcnd, org.netlib.util.doubleW colcnd, org.netlib.util.doubleW amax, org.netlib.util.intW info) { + public void dgbequ(int m, int n, int kl, int ku, double[] ab, int offsetab, int ldab, double[] r, int offsetr, double[] c, int offsetc, org.netlib.util.doubleW rowcnd, org.netlib.util.doubleW colcnd, org.netlib.util.doubleW amax, org.netlib.util.intW info) { //FIXME Add arguments check - dgbequK(m, n, kl, ku, ab, _ab_offset, ldab, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, info); + dgbequK(m, n, kl, ku, ab, offsetab, ldab, r, offsetr, c, offsetc, rowcnd, colcnd, amax, info); } - protected abstract void dgbequK(int m, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, double[] r, int _r_offset, double[] c, int _c_offset, org.netlib.util.doubleW rowcnd, org.netlib.util.doubleW colcnd, org.netlib.util.doubleW amax, org.netlib.util.intW info); + protected abstract void dgbequK(int m, int n, int kl, int ku, double[] ab, int offsetab, int ldab, double[] r, int offsetr, double[] c, int offsetc, org.netlib.util.doubleW rowcnd, org.netlib.util.doubleW colcnd, org.netlib.util.doubleW amax, org.netlib.util.intW info); public void dgbrfs(String trans, int n, int kl, int ku, int nrhs, double[] ab, int ldab, double[] afb, int ldafb, int[] ipiv, double[] b, int ldb, double[] x, int ldx, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info) { dgbrfs(trans, n, kl, ku, nrhs, ab, 0, ldab, afb, 0, ldafb, ipiv, 0, b, 0, ldb, x, 0, ldx, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void dgbrfs(String trans, int n, int kl, int ku, int nrhs, double[] ab, int _ab_offset, int ldab, double[] afb, int _afb_offset, int ldafb, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dgbrfs(String trans, int n, int kl, int ku, int nrhs, double[] ab, int offsetab, int ldab, double[] afb, int offsetafb, int ldafb, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgbrfsK(trans, n, kl, ku, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + dgbrfsK(trans, n, kl, ku, nrhs, ab, offsetab, ldab, afb, offsetafb, ldafb, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dgbrfsK(String trans, int n, int kl, int ku, int nrhs, double[] ab, int _ab_offset, int ldab, double[] afb, int _afb_offset, int ldafb, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dgbrfsK(String trans, int n, int kl, int ku, int nrhs, double[] ab, int offsetab, int ldab, double[] afb, int offsetafb, int ldafb, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dgbsv(int n, int kl, int ku, int nrhs, double[] ab, int ldab, int[] ipiv, double[] b, int ldb, org.netlib.util.intW info) { dgbsv(n, kl, ku, nrhs, ab, 0, ldab, ipiv, 0, b, 0, ldb, info); } - public void dgbsv(int n, int kl, int ku, int nrhs, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void dgbsv(int n, int kl, int ku, int nrhs, double[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - dgbsvK(n, kl, ku, nrhs, ab, _ab_offset, ldab, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + dgbsvK(n, kl, ku, nrhs, ab, offsetab, ldab, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected abstract void dgbsvK(int n, int kl, int ku, int nrhs, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void dgbsvK(int n, int kl, int ku, int nrhs, double[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dgbsvx(String fact, String trans, int n, int kl, int ku, int nrhs, double[] ab, int ldab, double[] afb, int ldafb, int[] ipiv, org.netlib.util.StringW equed, double[] r, double[] c, double[] b, int ldb, double[] x, int ldx, org.netlib.util.doubleW rcond, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info) { dgbsvx(fact, trans, n, kl, ku, nrhs, ab, 0, ldab, afb, 0, ldafb, ipiv, 0, equed, r, 0, c, 0, b, 0, ldb, x, 0, ldx, rcond, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void dgbsvx(String fact, String trans, int n, int kl, int ku, int nrhs, double[] ab, int _ab_offset, int ldab, double[] afb, int _afb_offset, int ldafb, int[] ipiv, int _ipiv_offset, org.netlib.util.StringW equed, double[] r, int _r_offset, double[] c, int _c_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dgbsvx(String fact, String trans, int n, int kl, int ku, int nrhs, double[] ab, int offsetab, int ldab, double[] afb, int offsetafb, int ldafb, int[] ipiv, int offsetipiv, org.netlib.util.StringW equed, double[] r, int offsetr, double[] c, int offsetc, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgbsvxK(fact, trans, n, kl, ku, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, ipiv, _ipiv_offset, equed, r, _r_offset, c, _c_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + dgbsvxK(fact, trans, n, kl, ku, nrhs, ab, offsetab, ldab, afb, offsetafb, ldafb, ipiv, offsetipiv, equed, r, offsetr, c, offsetc, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dgbsvxK(String fact, String trans, int n, int kl, int ku, int nrhs, double[] ab, int _ab_offset, int ldab, double[] afb, int _afb_offset, int ldafb, int[] ipiv, int _ipiv_offset, org.netlib.util.StringW equed, double[] r, int _r_offset, double[] c, int _c_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dgbsvxK(String fact, String trans, int n, int kl, int ku, int nrhs, double[] ab, int offsetab, int ldab, double[] afb, int offsetafb, int ldafb, int[] ipiv, int offsetipiv, org.netlib.util.StringW equed, double[] r, int offsetr, double[] c, int offsetc, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dgbtf2(int m, int n, int kl, int ku, double[] ab, int ldab, int[] ipiv, org.netlib.util.intW info) { dgbtf2(m, n, kl, ku, ab, 0, ldab, ipiv, 0, info); } - public void dgbtf2(int m, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { + public void dgbtf2(int m, int n, int kl, int ku, double[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, org.netlib.util.intW info) { //FIXME Add arguments check - dgbtf2K(m, n, kl, ku, ab, _ab_offset, ldab, ipiv, _ipiv_offset, info); + dgbtf2K(m, n, kl, ku, ab, offsetab, ldab, ipiv, offsetipiv, info); } - protected abstract void dgbtf2K(int m, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + protected abstract void dgbtf2K(int m, int n, int kl, int ku, double[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, org.netlib.util.intW info); public void dgbtrf(int m, int n, int kl, int ku, double[] ab, int ldab, int[] ipiv, org.netlib.util.intW info) { dgbtrf(m, n, kl, ku, ab, 0, ldab, ipiv, 0, info); } - public void dgbtrf(int m, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { + public void dgbtrf(int m, int n, int kl, int ku, double[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, org.netlib.util.intW info) { //FIXME Add arguments check - dgbtrfK(m, n, kl, ku, ab, _ab_offset, ldab, ipiv, _ipiv_offset, info); + dgbtrfK(m, n, kl, ku, ab, offsetab, ldab, ipiv, offsetipiv, info); } - protected abstract void dgbtrfK(int m, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + protected abstract void dgbtrfK(int m, int n, int kl, int ku, double[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, org.netlib.util.intW info); public void dgbtrs(String trans, int n, int kl, int ku, int nrhs, double[] ab, int ldab, int[] ipiv, double[] b, int ldb, org.netlib.util.intW info) { dgbtrs(trans, n, kl, ku, nrhs, ab, 0, ldab, ipiv, 0, b, 0, ldb, info); } - public void dgbtrs(String trans, int n, int kl, int ku, int nrhs, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void dgbtrs(String trans, int n, int kl, int ku, int nrhs, double[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - dgbtrsK(trans, n, kl, ku, nrhs, ab, _ab_offset, ldab, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + dgbtrsK(trans, n, kl, ku, nrhs, ab, offsetab, ldab, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected abstract void dgbtrsK(String trans, int n, int kl, int ku, int nrhs, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void dgbtrsK(String trans, int n, int kl, int ku, int nrhs, double[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dgebak(String job, String side, int n, int ilo, int ihi, double[] scale, int m, double[] v, int ldv, org.netlib.util.intW info) { dgebak(job, side, n, ilo, ihi, scale, 0, m, v, 0, ldv, info); } - public void dgebak(String job, String side, int n, int ilo, int ihi, double[] scale, int _scale_offset, int m, double[] v, int _v_offset, int ldv, org.netlib.util.intW info) { + public void dgebak(String job, String side, int n, int ilo, int ihi, double[] scale, int offsetscale, int m, double[] v, int offsetv, int ldv, org.netlib.util.intW info) { //FIXME Add arguments check - dgebakK(job, side, n, ilo, ihi, scale, _scale_offset, m, v, _v_offset, ldv, info); + dgebakK(job, side, n, ilo, ihi, scale, offsetscale, m, v, offsetv, ldv, info); } - protected abstract void dgebakK(String job, String side, int n, int ilo, int ihi, double[] scale, int _scale_offset, int m, double[] v, int _v_offset, int ldv, org.netlib.util.intW info); + protected abstract void dgebakK(String job, String side, int n, int ilo, int ihi, double[] scale, int offsetscale, int m, double[] v, int offsetv, int ldv, org.netlib.util.intW info); public void dgebal(String job, int n, double[] a, int lda, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] scale, org.netlib.util.intW info) { dgebal(job, n, a, 0, lda, ilo, ihi, scale, 0, info); } - public void dgebal(String job, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] scale, int _scale_offset, org.netlib.util.intW info) { + public void dgebal(String job, int n, double[] a, int offseta, int lda, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] scale, int offsetscale, org.netlib.util.intW info) { //FIXME Add arguments check - dgebalK(job, n, a, _a_offset, lda, ilo, ihi, scale, _scale_offset, info); + dgebalK(job, n, a, offseta, lda, ilo, ihi, scale, offsetscale, info); } - protected abstract void dgebalK(String job, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] scale, int _scale_offset, org.netlib.util.intW info); + protected abstract void dgebalK(String job, int n, double[] a, int offseta, int lda, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] scale, int offsetscale, org.netlib.util.intW info); public void dgebd2(int m, int n, double[] a, int lda, double[] d, double[] e, double[] tauq, double[] taup, double[] work, org.netlib.util.intW info) { dgebd2(m, n, a, 0, lda, d, 0, e, 0, tauq, 0, taup, 0, work, 0, info); } - public void dgebd2(int m, int n, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tauq, int _tauq_offset, double[] taup, int _taup_offset, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dgebd2(int m, int n, double[] a, int offseta, int lda, double[] d, int offsetd, double[] e, int offsete, double[] tauq, int offsettauq, double[] taup, int offsettaup, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgebd2K(m, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tauq, _tauq_offset, taup, _taup_offset, work, _work_offset, info); + dgebd2K(m, n, a, offseta, lda, d, offsetd, e, offsete, tauq, offsettauq, taup, offsettaup, work, offsetwork, info); } - protected abstract void dgebd2K(int m, int n, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tauq, int _tauq_offset, double[] taup, int _taup_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dgebd2K(int m, int n, double[] a, int offseta, int lda, double[] d, int offsetd, double[] e, int offsete, double[] tauq, int offsettauq, double[] taup, int offsettaup, double[] work, int offsetwork, org.netlib.util.intW info); public void dgebrd(int m, int n, double[] a, int lda, double[] d, double[] e, double[] tauq, double[] taup, double[] work, int lwork, org.netlib.util.intW info) { dgebrd(m, n, a, 0, lda, d, 0, e, 0, tauq, 0, taup, 0, work, 0, lwork, info); } - public void dgebrd(int m, int n, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tauq, int _tauq_offset, double[] taup, int _taup_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dgebrd(int m, int n, double[] a, int offseta, int lda, double[] d, int offsetd, double[] e, int offsete, double[] tauq, int offsettauq, double[] taup, int offsettaup, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgebrdK(m, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tauq, _tauq_offset, taup, _taup_offset, work, _work_offset, lwork, info); + dgebrdK(m, n, a, offseta, lda, d, offsetd, e, offsete, tauq, offsettauq, taup, offsettaup, work, offsetwork, lwork, info); } - protected abstract void dgebrdK(int m, int n, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tauq, int _tauq_offset, double[] taup, int _taup_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dgebrdK(int m, int n, double[] a, int offseta, int lda, double[] d, int offsetd, double[] e, int offsete, double[] tauq, int offsettauq, double[] taup, int offsettaup, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgecon(String norm, int n, double[] a, int lda, double anorm, org.netlib.util.doubleW rcond, double[] work, int[] iwork, org.netlib.util.intW info) { dgecon(norm, n, a, 0, lda, anorm, rcond, work, 0, iwork, 0, info); } - public void dgecon(String norm, int n, double[] a, int _a_offset, int lda, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dgecon(String norm, int n, double[] a, int offseta, int lda, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgeconK(norm, n, a, _a_offset, lda, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + dgeconK(norm, n, a, offseta, lda, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dgeconK(String norm, int n, double[] a, int _a_offset, int lda, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dgeconK(String norm, int n, double[] a, int offseta, int lda, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dgeequ(int m, int n, double[] a, int lda, double[] r, double[] c, org.netlib.util.doubleW rowcnd, org.netlib.util.doubleW colcnd, org.netlib.util.doubleW amax, org.netlib.util.intW info) { dgeequ(m, n, a, 0, lda, r, 0, c, 0, rowcnd, colcnd, amax, info); } - public void dgeequ(int m, int n, double[] a, int _a_offset, int lda, double[] r, int _r_offset, double[] c, int _c_offset, org.netlib.util.doubleW rowcnd, org.netlib.util.doubleW colcnd, org.netlib.util.doubleW amax, org.netlib.util.intW info) { + public void dgeequ(int m, int n, double[] a, int offseta, int lda, double[] r, int offsetr, double[] c, int offsetc, org.netlib.util.doubleW rowcnd, org.netlib.util.doubleW colcnd, org.netlib.util.doubleW amax, org.netlib.util.intW info) { //FIXME Add arguments check - dgeequK(m, n, a, _a_offset, lda, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, info); + dgeequK(m, n, a, offseta, lda, r, offsetr, c, offsetc, rowcnd, colcnd, amax, info); } - protected abstract void dgeequK(int m, int n, double[] a, int _a_offset, int lda, double[] r, int _r_offset, double[] c, int _c_offset, org.netlib.util.doubleW rowcnd, org.netlib.util.doubleW colcnd, org.netlib.util.doubleW amax, org.netlib.util.intW info); + protected abstract void dgeequK(int m, int n, double[] a, int offseta, int lda, double[] r, int offsetr, double[] c, int offsetc, org.netlib.util.doubleW rowcnd, org.netlib.util.doubleW colcnd, org.netlib.util.doubleW amax, org.netlib.util.intW info); public void dgees(String jobvs, String sort, java.lang.Object select, int n, double[] a, int lda, org.netlib.util.intW sdim, double[] wr, double[] wi, double[] vs, int ldvs, double[] work, int lwork, boolean[] bwork, org.netlib.util.intW info) { dgees(jobvs, sort, select, n, a, 0, lda, sdim, wr, 0, wi, 0, vs, 0, ldvs, work, 0, lwork, bwork, 0, info); } - public void dgees(String jobvs, String sort, java.lang.Object select, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW sdim, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vs, int _vs_offset, int ldvs, double[] work, int _work_offset, int lwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info) { + public void dgees(String jobvs, String sort, java.lang.Object select, int n, double[] a, int offseta, int lda, org.netlib.util.intW sdim, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] vs, int offsetvs, int ldvs, double[] work, int offsetwork, int lwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgeesK(jobvs, sort, select, n, a, _a_offset, lda, sdim, wr, _wr_offset, wi, _wi_offset, vs, _vs_offset, ldvs, work, _work_offset, lwork, bwork, _bwork_offset, info); + dgeesK(jobvs, sort, select, n, a, offseta, lda, sdim, wr, offsetwr, wi, offsetwi, vs, offsetvs, ldvs, work, offsetwork, lwork, bwork, offsetbwork, info); } - protected abstract void dgeesK(String jobvs, String sort, java.lang.Object select, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW sdim, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vs, int _vs_offset, int ldvs, double[] work, int _work_offset, int lwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + protected abstract void dgeesK(String jobvs, String sort, java.lang.Object select, int n, double[] a, int offseta, int lda, org.netlib.util.intW sdim, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] vs, int offsetvs, int ldvs, double[] work, int offsetwork, int lwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info); public void dgeesx(String jobvs, String sort, java.lang.Object select, String sense, int n, double[] a, int lda, org.netlib.util.intW sdim, double[] wr, double[] wi, double[] vs, int ldvs, org.netlib.util.doubleW rconde, org.netlib.util.doubleW rcondv, double[] work, int lwork, int[] iwork, int liwork, boolean[] bwork, org.netlib.util.intW info) { dgeesx(jobvs, sort, select, sense, n, a, 0, lda, sdim, wr, 0, wi, 0, vs, 0, ldvs, rconde, rcondv, work, 0, lwork, iwork, 0, liwork, bwork, 0, info); } - public void dgeesx(String jobvs, String sort, java.lang.Object select, String sense, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW sdim, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vs, int _vs_offset, int ldvs, org.netlib.util.doubleW rconde, org.netlib.util.doubleW rcondv, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info) { + public void dgeesx(String jobvs, String sort, java.lang.Object select, String sense, int n, double[] a, int offseta, int lda, org.netlib.util.intW sdim, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] vs, int offsetvs, int ldvs, org.netlib.util.doubleW rconde, org.netlib.util.doubleW rcondv, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgeesxK(jobvs, sort, select, sense, n, a, _a_offset, lda, sdim, wr, _wr_offset, wi, _wi_offset, vs, _vs_offset, ldvs, rconde, rcondv, work, _work_offset, lwork, iwork, _iwork_offset, liwork, bwork, _bwork_offset, info); + dgeesxK(jobvs, sort, select, sense, n, a, offseta, lda, sdim, wr, offsetwr, wi, offsetwi, vs, offsetvs, ldvs, rconde, rcondv, work, offsetwork, lwork, iwork, offsetiwork, liwork, bwork, offsetbwork, info); } - protected abstract void dgeesxK(String jobvs, String sort, java.lang.Object select, String sense, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW sdim, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vs, int _vs_offset, int ldvs, org.netlib.util.doubleW rconde, org.netlib.util.doubleW rcondv, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + protected abstract void dgeesxK(String jobvs, String sort, java.lang.Object select, String sense, int n, double[] a, int offseta, int lda, org.netlib.util.intW sdim, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] vs, int offsetvs, int ldvs, org.netlib.util.doubleW rconde, org.netlib.util.doubleW rcondv, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info); public void dgeev(String jobvl, String jobvr, int n, double[] a, int lda, double[] wr, double[] wi, double[] vl, int ldvl, double[] vr, int ldvr, double[] work, int lwork, org.netlib.util.intW info) { dgeev(jobvl, jobvr, n, a, 0, lda, wr, 0, wi, 0, vl, 0, ldvl, vr, 0, ldvr, work, 0, lwork, info); } - public void dgeev(String jobvl, String jobvr, int n, double[] a, int _a_offset, int lda, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dgeev(String jobvl, String jobvr, int n, double[] a, int offseta, int lda, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgeevK(jobvl, jobvr, n, a, _a_offset, lda, wr, _wr_offset, wi, _wi_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, work, _work_offset, lwork, info); + dgeevK(jobvl, jobvr, n, a, offseta, lda, wr, offsetwr, wi, offsetwi, vl, offsetvl, ldvl, vr, offsetvr, ldvr, work, offsetwork, lwork, info); } - protected abstract void dgeevK(String jobvl, String jobvr, int n, double[] a, int _a_offset, int lda, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dgeevK(String jobvl, String jobvr, int n, double[] a, int offseta, int lda, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgeevx(String balanc, String jobvl, String jobvr, String sense, int n, double[] a, int lda, double[] wr, double[] wi, double[] vl, int ldvl, double[] vr, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] scale, org.netlib.util.doubleW abnrm, double[] rconde, double[] rcondv, double[] work, int lwork, int[] iwork, org.netlib.util.intW info) { dgeevx(balanc, jobvl, jobvr, sense, n, a, 0, lda, wr, 0, wi, 0, vl, 0, ldvl, vr, 0, ldvr, ilo, ihi, scale, 0, abnrm, rconde, 0, rcondv, 0, work, 0, lwork, iwork, 0, info); } - public void dgeevx(String balanc, String jobvl, String jobvr, String sense, int n, double[] a, int _a_offset, int lda, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] scale, int _scale_offset, org.netlib.util.doubleW abnrm, double[] rconde, int _rconde_offset, double[] rcondv, int _rcondv_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dgeevx(String balanc, String jobvl, String jobvr, String sense, int n, double[] a, int offseta, int lda, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] scale, int offsetscale, org.netlib.util.doubleW abnrm, double[] rconde, int offsetrconde, double[] rcondv, int offsetrcondv, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgeevxK(balanc, jobvl, jobvr, sense, n, a, _a_offset, lda, wr, _wr_offset, wi, _wi_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, ilo, ihi, scale, _scale_offset, abnrm, rconde, _rconde_offset, rcondv, _rcondv_offset, work, _work_offset, lwork, iwork, _iwork_offset, info); + dgeevxK(balanc, jobvl, jobvr, sense, n, a, offseta, lda, wr, offsetwr, wi, offsetwi, vl, offsetvl, ldvl, vr, offsetvr, ldvr, ilo, ihi, scale, offsetscale, abnrm, rconde, offsetrconde, rcondv, offsetrcondv, work, offsetwork, lwork, iwork, offsetiwork, info); } - protected abstract void dgeevxK(String balanc, String jobvl, String jobvr, String sense, int n, double[] a, int _a_offset, int lda, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] scale, int _scale_offset, org.netlib.util.doubleW abnrm, double[] rconde, int _rconde_offset, double[] rcondv, int _rcondv_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dgeevxK(String balanc, String jobvl, String jobvr, String sense, int n, double[] a, int offseta, int lda, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] scale, int offsetscale, org.netlib.util.doubleW abnrm, double[] rconde, int offsetrconde, double[] rcondv, int offsetrcondv, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dgegs(String jobvsl, String jobvsr, int n, double[] a, int lda, double[] b, int ldb, double[] alphar, double[] alphai, double[] beta, double[] vsl, int ldvsl, double[] vsr, int ldvsr, double[] work, int lwork, org.netlib.util.intW info) { dgegs(jobvsl, jobvsr, n, a, 0, lda, b, 0, ldb, alphar, 0, alphai, 0, beta, 0, vsl, 0, ldvsl, vsr, 0, ldvsr, work, 0, lwork, info); } - public void dgegs(String jobvsl, String jobvsr, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vsl, int _vsl_offset, int ldvsl, double[] vsr, int _vsr_offset, int ldvsr, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dgegs(String jobvsl, String jobvsr, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] vsl, int offsetvsl, int ldvsl, double[] vsr, int offsetvsr, int ldvsr, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgegsK(jobvsl, jobvsr, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vsl, _vsl_offset, ldvsl, vsr, _vsr_offset, ldvsr, work, _work_offset, lwork, info); + dgegsK(jobvsl, jobvsr, n, a, offseta, lda, b, offsetb, ldb, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, vsl, offsetvsl, ldvsl, vsr, offsetvsr, ldvsr, work, offsetwork, lwork, info); } - protected abstract void dgegsK(String jobvsl, String jobvsr, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vsl, int _vsl_offset, int ldvsl, double[] vsr, int _vsr_offset, int ldvsr, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dgegsK(String jobvsl, String jobvsr, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] vsl, int offsetvsl, int ldvsl, double[] vsr, int offsetvsr, int ldvsr, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgegv(String jobvl, String jobvr, int n, double[] a, int lda, double[] b, int ldb, double[] alphar, double[] alphai, double[] beta, double[] vl, int ldvl, double[] vr, int ldvr, double[] work, int lwork, org.netlib.util.intW info) { dgegv(jobvl, jobvr, n, a, 0, lda, b, 0, ldb, alphar, 0, alphai, 0, beta, 0, vl, 0, ldvl, vr, 0, ldvr, work, 0, lwork, info); } - public void dgegv(String jobvl, String jobvr, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dgegv(String jobvl, String jobvr, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgegvK(jobvl, jobvr, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, work, _work_offset, lwork, info); + dgegvK(jobvl, jobvr, n, a, offseta, lda, b, offsetb, ldb, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, vl, offsetvl, ldvl, vr, offsetvr, ldvr, work, offsetwork, lwork, info); } - protected abstract void dgegvK(String jobvl, String jobvr, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dgegvK(String jobvl, String jobvr, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgehd2(int n, int ilo, int ihi, double[] a, int lda, double[] tau, double[] work, org.netlib.util.intW info) { dgehd2(n, ilo, ihi, a, 0, lda, tau, 0, work, 0, info); } - public void dgehd2(int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dgehd2(int n, int ilo, int ihi, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgehd2K(n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + dgehd2K(n, ilo, ihi, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected abstract void dgehd2K(int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dgehd2K(int n, int ilo, int ihi, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); public void dgehrd(int n, int ilo, int ihi, double[] a, int lda, double[] tau, double[] work, int lwork, org.netlib.util.intW info) { dgehrd(n, ilo, ihi, a, 0, lda, tau, 0, work, 0, lwork, info); } - public void dgehrd(int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dgehrd(int n, int ilo, int ihi, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgehrdK(n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + dgehrdK(n, ilo, ihi, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected abstract void dgehrdK(int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dgehrdK(int n, int ilo, int ihi, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgelq2(int m, int n, double[] a, int lda, double[] tau, double[] work, org.netlib.util.intW info) { dgelq2(m, n, a, 0, lda, tau, 0, work, 0, info); } - public void dgelq2(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dgelq2(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgelq2K(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + dgelq2K(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected abstract void dgelq2K(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dgelq2K(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); public void dgelqf(int m, int n, double[] a, int lda, double[] tau, double[] work, int lwork, org.netlib.util.intW info) { dgelqf(m, n, a, 0, lda, tau, 0, work, 0, lwork, info); } - public void dgelqf(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dgelqf(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgelqfK(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + dgelqfK(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected abstract void dgelqfK(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dgelqfK(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgels(String trans, int m, int n, int nrhs, double[] a, int lda, double[] b, int ldb, double[] work, int lwork, org.netlib.util.intW info) { dgels(trans, m, n, nrhs, a, 0, lda, b, 0, ldb, work, 0, lwork, info); } - public void dgels(String trans, int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dgels(String trans, int m, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgelsK(trans, m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, work, _work_offset, lwork, info); + dgelsK(trans, m, n, nrhs, a, offseta, lda, b, offsetb, ldb, work, offsetwork, lwork, info); } - protected abstract void dgelsK(String trans, int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dgelsK(String trans, int m, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgelsd(int m, int n, int nrhs, double[] a, int lda, double[] b, int ldb, double[] s, double rcond, org.netlib.util.intW rank, double[] work, int lwork, int[] iwork, org.netlib.util.intW info) { dgelsd(m, n, nrhs, a, 0, lda, b, 0, ldb, s, 0, rcond, rank, work, 0, lwork, iwork, 0, info); } - public void dgelsd(int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] s, int _s_offset, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dgelsd(int m, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] s, int offsets, double rcond, org.netlib.util.intW rank, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgelsdK(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, s, _s_offset, rcond, rank, work, _work_offset, lwork, iwork, _iwork_offset, info); + dgelsdK(m, n, nrhs, a, offseta, lda, b, offsetb, ldb, s, offsets, rcond, rank, work, offsetwork, lwork, iwork, offsetiwork, info); } - protected abstract void dgelsdK(int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] s, int _s_offset, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dgelsdK(int m, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] s, int offsets, double rcond, org.netlib.util.intW rank, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dgelss(int m, int n, int nrhs, double[] a, int lda, double[] b, int ldb, double[] s, double rcond, org.netlib.util.intW rank, double[] work, int lwork, org.netlib.util.intW info) { dgelss(m, n, nrhs, a, 0, lda, b, 0, ldb, s, 0, rcond, rank, work, 0, lwork, info); } - public void dgelss(int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] s, int _s_offset, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dgelss(int m, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] s, int offsets, double rcond, org.netlib.util.intW rank, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgelssK(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, s, _s_offset, rcond, rank, work, _work_offset, lwork, info); + dgelssK(m, n, nrhs, a, offseta, lda, b, offsetb, ldb, s, offsets, rcond, rank, work, offsetwork, lwork, info); } - protected abstract void dgelssK(int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] s, int _s_offset, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dgelssK(int m, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] s, int offsets, double rcond, org.netlib.util.intW rank, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgelsx(int m, int n, int nrhs, double[] a, int lda, double[] b, int ldb, int[] jpvt, double rcond, org.netlib.util.intW rank, double[] work, org.netlib.util.intW info) { dgelsx(m, n, nrhs, a, 0, lda, b, 0, ldb, jpvt, 0, rcond, rank, work, 0, info); } - public void dgelsx(int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, int[] jpvt, int _jpvt_offset, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dgelsx(int m, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, int[] jpvt, int offsetjpvt, double rcond, org.netlib.util.intW rank, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgelsxK(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, jpvt, _jpvt_offset, rcond, rank, work, _work_offset, info); + dgelsxK(m, n, nrhs, a, offseta, lda, b, offsetb, ldb, jpvt, offsetjpvt, rcond, rank, work, offsetwork, info); } - protected abstract void dgelsxK(int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, int[] jpvt, int _jpvt_offset, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dgelsxK(int m, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, int[] jpvt, int offsetjpvt, double rcond, org.netlib.util.intW rank, double[] work, int offsetwork, org.netlib.util.intW info); public void dgelsy(int m, int n, int nrhs, double[] a, int lda, double[] b, int ldb, int[] jpvt, double rcond, org.netlib.util.intW rank, double[] work, int lwork, org.netlib.util.intW info) { dgelsy(m, n, nrhs, a, 0, lda, b, 0, ldb, jpvt, 0, rcond, rank, work, 0, lwork, info); } - public void dgelsy(int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, int[] jpvt, int _jpvt_offset, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dgelsy(int m, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, int[] jpvt, int offsetjpvt, double rcond, org.netlib.util.intW rank, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgelsyK(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, jpvt, _jpvt_offset, rcond, rank, work, _work_offset, lwork, info); + dgelsyK(m, n, nrhs, a, offseta, lda, b, offsetb, ldb, jpvt, offsetjpvt, rcond, rank, work, offsetwork, lwork, info); } - protected abstract void dgelsyK(int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, int[] jpvt, int _jpvt_offset, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dgelsyK(int m, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, int[] jpvt, int offsetjpvt, double rcond, org.netlib.util.intW rank, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgeql2(int m, int n, double[] a, int lda, double[] tau, double[] work, org.netlib.util.intW info) { dgeql2(m, n, a, 0, lda, tau, 0, work, 0, info); } - public void dgeql2(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dgeql2(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgeql2K(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + dgeql2K(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected abstract void dgeql2K(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dgeql2K(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); public void dgeqlf(int m, int n, double[] a, int lda, double[] tau, double[] work, int lwork, org.netlib.util.intW info) { dgeqlf(m, n, a, 0, lda, tau, 0, work, 0, lwork, info); } - public void dgeqlf(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dgeqlf(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgeqlfK(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + dgeqlfK(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected abstract void dgeqlfK(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dgeqlfK(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgeqp3(int m, int n, double[] a, int lda, int[] jpvt, double[] tau, double[] work, int lwork, org.netlib.util.intW info) { dgeqp3(m, n, a, 0, lda, jpvt, 0, tau, 0, work, 0, lwork, info); } - public void dgeqp3(int m, int n, double[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dgeqp3(int m, int n, double[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgeqp3K(m, n, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, work, _work_offset, lwork, info); + dgeqp3K(m, n, a, offseta, lda, jpvt, offsetjpvt, tau, offsettau, work, offsetwork, lwork, info); } - protected abstract void dgeqp3K(int m, int n, double[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dgeqp3K(int m, int n, double[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgeqpf(int m, int n, double[] a, int lda, int[] jpvt, double[] tau, double[] work, org.netlib.util.intW info) { dgeqpf(m, n, a, 0, lda, jpvt, 0, tau, 0, work, 0, info); } - public void dgeqpf(int m, int n, double[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dgeqpf(int m, int n, double[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgeqpfK(m, n, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, work, _work_offset, info); + dgeqpfK(m, n, a, offseta, lda, jpvt, offsetjpvt, tau, offsettau, work, offsetwork, info); } - protected abstract void dgeqpfK(int m, int n, double[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dgeqpfK(int m, int n, double[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); public void dgeqr2(int m, int n, double[] a, int lda, double[] tau, double[] work, org.netlib.util.intW info) { dgeqr2(m, n, a, 0, lda, tau, 0, work, 0, info); } - public void dgeqr2(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dgeqr2(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgeqr2K(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + dgeqr2K(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected abstract void dgeqr2K(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dgeqr2K(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); public void dgeqrf(int m, int n, double[] a, int lda, double[] tau, double[] work, int lwork, org.netlib.util.intW info) { dgeqrf(m, n, a, 0, lda, tau, 0, work, 0, lwork, info); } - public void dgeqrf(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dgeqrf(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgeqrfK(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + dgeqrfK(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected abstract void dgeqrfK(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dgeqrfK(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgerfs(String trans, int n, int nrhs, double[] a, int lda, double[] af, int ldaf, int[] ipiv, double[] b, int ldb, double[] x, int ldx, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info) { dgerfs(trans, n, nrhs, a, 0, lda, af, 0, ldaf, ipiv, 0, b, 0, ldb, x, 0, ldx, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void dgerfs(String trans, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dgerfs(String trans, int n, int nrhs, double[] a, int offseta, int lda, double[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgerfsK(trans, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + dgerfsK(trans, n, nrhs, a, offseta, lda, af, offsetaf, ldaf, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dgerfsK(String trans, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dgerfsK(String trans, int n, int nrhs, double[] a, int offseta, int lda, double[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dgerq2(int m, int n, double[] a, int lda, double[] tau, double[] work, org.netlib.util.intW info) { dgerq2(m, n, a, 0, lda, tau, 0, work, 0, info); } - public void dgerq2(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dgerq2(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgerq2K(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + dgerq2K(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected abstract void dgerq2K(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dgerq2K(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); public void dgerqf(int m, int n, double[] a, int lda, double[] tau, double[] work, int lwork, org.netlib.util.intW info) { dgerqf(m, n, a, 0, lda, tau, 0, work, 0, lwork, info); } - public void dgerqf(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dgerqf(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgerqfK(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + dgerqfK(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected abstract void dgerqfK(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dgerqfK(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgesc2(int n, double[] a, int lda, double[] rhs, int[] ipiv, int[] jpiv, org.netlib.util.doubleW scale) { dgesc2(n, a, 0, lda, rhs, 0, ipiv, 0, jpiv, 0, scale); } - public void dgesc2(int n, double[] a, int _a_offset, int lda, double[] rhs, int _rhs_offset, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset, org.netlib.util.doubleW scale) { + public void dgesc2(int n, double[] a, int offseta, int lda, double[] rhs, int offsetrhs, int[] ipiv, int offsetipiv, int[] jpiv, int offsetjpiv, org.netlib.util.doubleW scale) { //FIXME Add arguments check - dgesc2K(n, a, _a_offset, lda, rhs, _rhs_offset, ipiv, _ipiv_offset, jpiv, _jpiv_offset, scale); + dgesc2K(n, a, offseta, lda, rhs, offsetrhs, ipiv, offsetipiv, jpiv, offsetjpiv, scale); } - protected abstract void dgesc2K(int n, double[] a, int _a_offset, int lda, double[] rhs, int _rhs_offset, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset, org.netlib.util.doubleW scale); + protected abstract void dgesc2K(int n, double[] a, int offseta, int lda, double[] rhs, int offsetrhs, int[] ipiv, int offsetipiv, int[] jpiv, int offsetjpiv, org.netlib.util.doubleW scale); public void dgesdd(String jobz, int m, int n, double[] a, int lda, double[] s, double[] u, int ldu, double[] vt, int ldvt, double[] work, int lwork, int[] iwork, org.netlib.util.intW info) { dgesdd(jobz, m, n, a, 0, lda, s, 0, u, 0, ldu, vt, 0, ldvt, work, 0, lwork, iwork, 0, info); } - public void dgesdd(String jobz, int m, int n, double[] a, int _a_offset, int lda, double[] s, int _s_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dgesdd(String jobz, int m, int n, double[] a, int offseta, int lda, double[] s, int offsets, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int ldvt, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgesddK(jobz, m, n, a, _a_offset, lda, s, _s_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, work, _work_offset, lwork, iwork, _iwork_offset, info); + dgesddK(jobz, m, n, a, offseta, lda, s, offsets, u, offsetu, ldu, vt, offsetvt, ldvt, work, offsetwork, lwork, iwork, offsetiwork, info); } - protected abstract void dgesddK(String jobz, int m, int n, double[] a, int _a_offset, int lda, double[] s, int _s_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dgesddK(String jobz, int m, int n, double[] a, int offseta, int lda, double[] s, int offsets, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int ldvt, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dgesv(int n, int nrhs, double[] a, int lda, int[] ipiv, double[] b, int ldb, org.netlib.util.intW info) { dgesv(n, nrhs, a, 0, lda, ipiv, 0, b, 0, ldb, info); } - public void dgesv(int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void dgesv(int n, int nrhs, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - dgesvK(n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + dgesvK(n, nrhs, a, offseta, lda, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected abstract void dgesvK(int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void dgesvK(int n, int nrhs, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dgesvd(String jobu, String jobvt, int m, int n, double[] a, int lda, double[] s, double[] u, int ldu, double[] vt, int ldvt, double[] work, int lwork, org.netlib.util.intW info) { dgesvd(jobu, jobvt, m, n, a, 0, lda, s, 0, u, 0, ldu, vt, 0, ldvt, work, 0, lwork, info); } - public void dgesvd(String jobu, String jobvt, int m, int n, double[] a, int _a_offset, int lda, double[] s, int _s_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dgesvd(String jobu, String jobvt, int m, int n, double[] a, int offseta, int lda, double[] s, int offsets, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int ldvt, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgesvdK(jobu, jobvt, m, n, a, _a_offset, lda, s, _s_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, work, _work_offset, lwork, info); + dgesvdK(jobu, jobvt, m, n, a, offseta, lda, s, offsets, u, offsetu, ldu, vt, offsetvt, ldvt, work, offsetwork, lwork, info); } - protected abstract void dgesvdK(String jobu, String jobvt, int m, int n, double[] a, int _a_offset, int lda, double[] s, int _s_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dgesvdK(String jobu, String jobvt, int m, int n, double[] a, int offseta, int lda, double[] s, int offsets, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int ldvt, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgesvx(String fact, String trans, int n, int nrhs, double[] a, int lda, double[] af, int ldaf, int[] ipiv, org.netlib.util.StringW equed, double[] r, double[] c, double[] b, int ldb, double[] x, int ldx, org.netlib.util.doubleW rcond, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info) { dgesvx(fact, trans, n, nrhs, a, 0, lda, af, 0, ldaf, ipiv, 0, equed, r, 0, c, 0, b, 0, ldb, x, 0, ldx, rcond, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void dgesvx(String fact, String trans, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, org.netlib.util.StringW equed, double[] r, int _r_offset, double[] c, int _c_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dgesvx(String fact, String trans, int n, int nrhs, double[] a, int offseta, int lda, double[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, org.netlib.util.StringW equed, double[] r, int offsetr, double[] c, int offsetc, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgesvxK(fact, trans, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, equed, r, _r_offset, c, _c_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + dgesvxK(fact, trans, n, nrhs, a, offseta, lda, af, offsetaf, ldaf, ipiv, offsetipiv, equed, r, offsetr, c, offsetc, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dgesvxK(String fact, String trans, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, org.netlib.util.StringW equed, double[] r, int _r_offset, double[] c, int _c_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dgesvxK(String fact, String trans, int n, int nrhs, double[] a, int offseta, int lda, double[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, org.netlib.util.StringW equed, double[] r, int offsetr, double[] c, int offsetc, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dgetc2(int n, double[] a, int lda, int[] ipiv, int[] jpiv, org.netlib.util.intW info) { dgetc2(n, a, 0, lda, ipiv, 0, jpiv, 0, info); } - public void dgetc2(int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset, org.netlib.util.intW info) { + public void dgetc2(int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, int[] jpiv, int offsetjpiv, org.netlib.util.intW info) { //FIXME Add arguments check - dgetc2K(n, a, _a_offset, lda, ipiv, _ipiv_offset, jpiv, _jpiv_offset, info); + dgetc2K(n, a, offseta, lda, ipiv, offsetipiv, jpiv, offsetjpiv, info); } - protected abstract void dgetc2K(int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset, org.netlib.util.intW info); + protected abstract void dgetc2K(int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, int[] jpiv, int offsetjpiv, org.netlib.util.intW info); public void dgetf2(int m, int n, double[] a, int lda, int[] ipiv, org.netlib.util.intW info) { dgetf2(m, n, a, 0, lda, ipiv, 0, info); } - public void dgetf2(int m, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { + public void dgetf2(int m, int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, org.netlib.util.intW info) { //FIXME Add arguments check - dgetf2K(m, n, a, _a_offset, lda, ipiv, _ipiv_offset, info); + dgetf2K(m, n, a, offseta, lda, ipiv, offsetipiv, info); } - protected abstract void dgetf2K(int m, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + protected abstract void dgetf2K(int m, int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, org.netlib.util.intW info); public void dgetrf(int m, int n, double[] a, int lda, int[] ipiv, org.netlib.util.intW info) { dgetrf(m, n, a, 0, lda, ipiv, 0, info); } - public void dgetrf(int m, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { + public void dgetrf(int m, int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, org.netlib.util.intW info) { //FIXME Add arguments check - dgetrfK(m, n, a, _a_offset, lda, ipiv, _ipiv_offset, info); + dgetrfK(m, n, a, offseta, lda, ipiv, offsetipiv, info); } - protected abstract void dgetrfK(int m, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + protected abstract void dgetrfK(int m, int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, org.netlib.util.intW info); public void dgetri(int n, double[] a, int lda, int[] ipiv, double[] work, int lwork, org.netlib.util.intW info) { dgetri(n, a, 0, lda, ipiv, 0, work, 0, lwork, info); } - public void dgetri(int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dgetri(int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgetriK(n, a, _a_offset, lda, ipiv, _ipiv_offset, work, _work_offset, lwork, info); + dgetriK(n, a, offseta, lda, ipiv, offsetipiv, work, offsetwork, lwork, info); } - protected abstract void dgetriK(int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dgetriK(int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgetrs(String trans, int n, int nrhs, double[] a, int lda, int[] ipiv, double[] b, int ldb, org.netlib.util.intW info) { dgetrs(trans, n, nrhs, a, 0, lda, ipiv, 0, b, 0, ldb, info); } - public void dgetrs(String trans, int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void dgetrs(String trans, int n, int nrhs, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - dgetrsK(trans, n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + dgetrsK(trans, n, nrhs, a, offseta, lda, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected abstract void dgetrsK(String trans, int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void dgetrsK(String trans, int n, int nrhs, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dggbak(String job, String side, int n, int ilo, int ihi, double[] lscale, double[] rscale, int m, double[] v, int ldv, org.netlib.util.intW info) { dggbak(job, side, n, ilo, ihi, lscale, 0, rscale, 0, m, v, 0, ldv, info); } - public void dggbak(String job, String side, int n, int ilo, int ihi, double[] lscale, int _lscale_offset, double[] rscale, int _rscale_offset, int m, double[] v, int _v_offset, int ldv, org.netlib.util.intW info) { + public void dggbak(String job, String side, int n, int ilo, int ihi, double[] lscale, int offsetlscale, double[] rscale, int offsetrscale, int m, double[] v, int offsetv, int ldv, org.netlib.util.intW info) { //FIXME Add arguments check - dggbakK(job, side, n, ilo, ihi, lscale, _lscale_offset, rscale, _rscale_offset, m, v, _v_offset, ldv, info); + dggbakK(job, side, n, ilo, ihi, lscale, offsetlscale, rscale, offsetrscale, m, v, offsetv, ldv, info); } - protected abstract void dggbakK(String job, String side, int n, int ilo, int ihi, double[] lscale, int _lscale_offset, double[] rscale, int _rscale_offset, int m, double[] v, int _v_offset, int ldv, org.netlib.util.intW info); + protected abstract void dggbakK(String job, String side, int n, int ilo, int ihi, double[] lscale, int offsetlscale, double[] rscale, int offsetrscale, int m, double[] v, int offsetv, int ldv, org.netlib.util.intW info); public void dggbal(String job, int n, double[] a, int lda, double[] b, int ldb, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] lscale, double[] rscale, double[] work, org.netlib.util.intW info) { dggbal(job, n, a, 0, lda, b, 0, ldb, ilo, ihi, lscale, 0, rscale, 0, work, 0, info); } - public void dggbal(String job, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] lscale, int _lscale_offset, double[] rscale, int _rscale_offset, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dggbal(String job, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] lscale, int offsetlscale, double[] rscale, int offsetrscale, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dggbalK(job, n, a, _a_offset, lda, b, _b_offset, ldb, ilo, ihi, lscale, _lscale_offset, rscale, _rscale_offset, work, _work_offset, info); + dggbalK(job, n, a, offseta, lda, b, offsetb, ldb, ilo, ihi, lscale, offsetlscale, rscale, offsetrscale, work, offsetwork, info); } - protected abstract void dggbalK(String job, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] lscale, int _lscale_offset, double[] rscale, int _rscale_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dggbalK(String job, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] lscale, int offsetlscale, double[] rscale, int offsetrscale, double[] work, int offsetwork, org.netlib.util.intW info); public void dgges(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, int n, double[] a, int lda, double[] b, int ldb, org.netlib.util.intW sdim, double[] alphar, double[] alphai, double[] beta, double[] vsl, int ldvsl, double[] vsr, int ldvsr, double[] work, int lwork, boolean[] bwork, org.netlib.util.intW info) { dgges(jobvsl, jobvsr, sort, selctg, n, a, 0, lda, b, 0, ldb, sdim, alphar, 0, alphai, 0, beta, 0, vsl, 0, ldvsl, vsr, 0, ldvsr, work, 0, lwork, bwork, 0, info); } - public void dgges(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW sdim, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vsl, int _vsl_offset, int ldvsl, double[] vsr, int _vsr_offset, int ldvsr, double[] work, int _work_offset, int lwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info) { + public void dgges(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW sdim, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] vsl, int offsetvsl, int ldvsl, double[] vsr, int offsetvsr, int ldvsr, double[] work, int offsetwork, int lwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info) { //FIXME Add arguments check - dggesK(jobvsl, jobvsr, sort, selctg, n, a, _a_offset, lda, b, _b_offset, ldb, sdim, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vsl, _vsl_offset, ldvsl, vsr, _vsr_offset, ldvsr, work, _work_offset, lwork, bwork, _bwork_offset, info); + dggesK(jobvsl, jobvsr, sort, selctg, n, a, offseta, lda, b, offsetb, ldb, sdim, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, vsl, offsetvsl, ldvsl, vsr, offsetvsr, ldvsr, work, offsetwork, lwork, bwork, offsetbwork, info); } - protected abstract void dggesK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW sdim, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vsl, int _vsl_offset, int ldvsl, double[] vsr, int _vsr_offset, int ldvsr, double[] work, int _work_offset, int lwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + protected abstract void dggesK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW sdim, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] vsl, int offsetvsl, int ldvsl, double[] vsr, int offsetvsr, int ldvsr, double[] work, int offsetwork, int lwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info); public void dggesx(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, String sense, int n, double[] a, int lda, double[] b, int ldb, org.netlib.util.intW sdim, double[] alphar, double[] alphai, double[] beta, double[] vsl, int ldvsl, double[] vsr, int ldvsr, double[] rconde, double[] rcondv, double[] work, int lwork, int[] iwork, int liwork, boolean[] bwork, org.netlib.util.intW info) { dggesx(jobvsl, jobvsr, sort, selctg, sense, n, a, 0, lda, b, 0, ldb, sdim, alphar, 0, alphai, 0, beta, 0, vsl, 0, ldvsl, vsr, 0, ldvsr, rconde, 0, rcondv, 0, work, 0, lwork, iwork, 0, liwork, bwork, 0, info); } - public void dggesx(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, String sense, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW sdim, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vsl, int _vsl_offset, int ldvsl, double[] vsr, int _vsr_offset, int ldvsr, double[] rconde, int _rconde_offset, double[] rcondv, int _rcondv_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info) { + public void dggesx(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, String sense, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW sdim, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] vsl, int offsetvsl, int ldvsl, double[] vsr, int offsetvsr, int ldvsr, double[] rconde, int offsetrconde, double[] rcondv, int offsetrcondv, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info) { //FIXME Add arguments check - dggesxK(jobvsl, jobvsr, sort, selctg, sense, n, a, _a_offset, lda, b, _b_offset, ldb, sdim, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vsl, _vsl_offset, ldvsl, vsr, _vsr_offset, ldvsr, rconde, _rconde_offset, rcondv, _rcondv_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, bwork, _bwork_offset, info); + dggesxK(jobvsl, jobvsr, sort, selctg, sense, n, a, offseta, lda, b, offsetb, ldb, sdim, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, vsl, offsetvsl, ldvsl, vsr, offsetvsr, ldvsr, rconde, offsetrconde, rcondv, offsetrcondv, work, offsetwork, lwork, iwork, offsetiwork, liwork, bwork, offsetbwork, info); } - protected abstract void dggesxK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, String sense, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW sdim, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vsl, int _vsl_offset, int ldvsl, double[] vsr, int _vsr_offset, int ldvsr, double[] rconde, int _rconde_offset, double[] rcondv, int _rcondv_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + protected abstract void dggesxK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, String sense, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW sdim, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] vsl, int offsetvsl, int ldvsl, double[] vsr, int offsetvsr, int ldvsr, double[] rconde, int offsetrconde, double[] rcondv, int offsetrcondv, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info); public void dggev(String jobvl, String jobvr, int n, double[] a, int lda, double[] b, int ldb, double[] alphar, double[] alphai, double[] beta, double[] vl, int ldvl, double[] vr, int ldvr, double[] work, int lwork, org.netlib.util.intW info) { dggev(jobvl, jobvr, n, a, 0, lda, b, 0, ldb, alphar, 0, alphai, 0, beta, 0, vl, 0, ldvl, vr, 0, ldvr, work, 0, lwork, info); } - public void dggev(String jobvl, String jobvr, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dggev(String jobvl, String jobvr, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dggevK(jobvl, jobvr, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, work, _work_offset, lwork, info); + dggevK(jobvl, jobvr, n, a, offseta, lda, b, offsetb, ldb, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, vl, offsetvl, ldvl, vr, offsetvr, ldvr, work, offsetwork, lwork, info); } - protected abstract void dggevK(String jobvl, String jobvr, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dggevK(String jobvl, String jobvr, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dggevx(String balanc, String jobvl, String jobvr, String sense, int n, double[] a, int lda, double[] b, int ldb, double[] alphar, double[] alphai, double[] beta, double[] vl, int ldvl, double[] vr, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] lscale, double[] rscale, org.netlib.util.doubleW abnrm, org.netlib.util.doubleW bbnrm, double[] rconde, double[] rcondv, double[] work, int lwork, int[] iwork, boolean[] bwork, org.netlib.util.intW info) { dggevx(balanc, jobvl, jobvr, sense, n, a, 0, lda, b, 0, ldb, alphar, 0, alphai, 0, beta, 0, vl, 0, ldvl, vr, 0, ldvr, ilo, ihi, lscale, 0, rscale, 0, abnrm, bbnrm, rconde, 0, rcondv, 0, work, 0, lwork, iwork, 0, bwork, 0, info); } - public void dggevx(String balanc, String jobvl, String jobvr, String sense, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] lscale, int _lscale_offset, double[] rscale, int _rscale_offset, org.netlib.util.doubleW abnrm, org.netlib.util.doubleW bbnrm, double[] rconde, int _rconde_offset, double[] rcondv, int _rcondv_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info) { + public void dggevx(String balanc, String jobvl, String jobvr, String sense, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] lscale, int offsetlscale, double[] rscale, int offsetrscale, org.netlib.util.doubleW abnrm, org.netlib.util.doubleW bbnrm, double[] rconde, int offsetrconde, double[] rcondv, int offsetrcondv, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info) { //FIXME Add arguments check - dggevxK(balanc, jobvl, jobvr, sense, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, ilo, ihi, lscale, _lscale_offset, rscale, _rscale_offset, abnrm, bbnrm, rconde, _rconde_offset, rcondv, _rcondv_offset, work, _work_offset, lwork, iwork, _iwork_offset, bwork, _bwork_offset, info); + dggevxK(balanc, jobvl, jobvr, sense, n, a, offseta, lda, b, offsetb, ldb, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, vl, offsetvl, ldvl, vr, offsetvr, ldvr, ilo, ihi, lscale, offsetlscale, rscale, offsetrscale, abnrm, bbnrm, rconde, offsetrconde, rcondv, offsetrcondv, work, offsetwork, lwork, iwork, offsetiwork, bwork, offsetbwork, info); } - protected abstract void dggevxK(String balanc, String jobvl, String jobvr, String sense, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] lscale, int _lscale_offset, double[] rscale, int _rscale_offset, org.netlib.util.doubleW abnrm, org.netlib.util.doubleW bbnrm, double[] rconde, int _rconde_offset, double[] rcondv, int _rcondv_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + protected abstract void dggevxK(String balanc, String jobvl, String jobvr, String sense, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] lscale, int offsetlscale, double[] rscale, int offsetrscale, org.netlib.util.doubleW abnrm, org.netlib.util.doubleW bbnrm, double[] rconde, int offsetrconde, double[] rcondv, int offsetrcondv, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info); public void dggglm(int n, int m, int p, double[] a, int lda, double[] b, int ldb, double[] d, double[] x, double[] y, double[] work, int lwork, org.netlib.util.intW info) { dggglm(n, m, p, a, 0, lda, b, 0, ldb, d, 0, x, 0, y, 0, work, 0, lwork, info); } - public void dggglm(int n, int m, int p, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] d, int _d_offset, double[] x, int _x_offset, double[] y, int _y_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dggglm(int n, int m, int p, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] d, int offsetd, double[] x, int offsetx, double[] y, int offsety, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dggglmK(n, m, p, a, _a_offset, lda, b, _b_offset, ldb, d, _d_offset, x, _x_offset, y, _y_offset, work, _work_offset, lwork, info); + dggglmK(n, m, p, a, offseta, lda, b, offsetb, ldb, d, offsetd, x, offsetx, y, offsety, work, offsetwork, lwork, info); } - protected abstract void dggglmK(int n, int m, int p, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] d, int _d_offset, double[] x, int _x_offset, double[] y, int _y_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dggglmK(int n, int m, int p, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] d, int offsetd, double[] x, int offsetx, double[] y, int offsety, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dgghrd(String compq, String compz, int n, int ilo, int ihi, double[] a, int lda, double[] b, int ldb, double[] q, int ldq, double[] z, int ldz, org.netlib.util.intW info) { dgghrd(compq, compz, n, ilo, ihi, a, 0, lda, b, 0, ldb, q, 0, ldq, z, 0, ldz, info); } - public void dgghrd(String compq, String compz, int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, org.netlib.util.intW info) { + public void dgghrd(String compq, String compz, int n, int ilo, int ihi, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] q, int offsetq, int ldq, double[] z, int offsetz, int ldz, org.netlib.util.intW info) { //FIXME Add arguments check - dgghrdK(compq, compz, n, ilo, ihi, a, _a_offset, lda, b, _b_offset, ldb, q, _q_offset, ldq, z, _z_offset, ldz, info); + dgghrdK(compq, compz, n, ilo, ihi, a, offseta, lda, b, offsetb, ldb, q, offsetq, ldq, z, offsetz, ldz, info); } - protected abstract void dgghrdK(String compq, String compz, int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, org.netlib.util.intW info); + protected abstract void dgghrdK(String compq, String compz, int n, int ilo, int ihi, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] q, int offsetq, int ldq, double[] z, int offsetz, int ldz, org.netlib.util.intW info); public void dgglse(int m, int n, int p, double[] a, int lda, double[] b, int ldb, double[] c, double[] d, double[] x, double[] work, int lwork, org.netlib.util.intW info) { dgglse(m, n, p, a, 0, lda, b, 0, ldb, c, 0, d, 0, x, 0, work, 0, lwork, info); } - public void dgglse(int m, int n, int p, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] c, int _c_offset, double[] d, int _d_offset, double[] x, int _x_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dgglse(int m, int n, int p, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] c, int offsetc, double[] d, int offsetd, double[] x, int offsetx, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgglseK(m, n, p, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, d, _d_offset, x, _x_offset, work, _work_offset, lwork, info); + dgglseK(m, n, p, a, offseta, lda, b, offsetb, ldb, c, offsetc, d, offsetd, x, offsetx, work, offsetwork, lwork, info); } - protected abstract void dgglseK(int m, int n, int p, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] c, int _c_offset, double[] d, int _d_offset, double[] x, int _x_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dgglseK(int m, int n, int p, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] c, int offsetc, double[] d, int offsetd, double[] x, int offsetx, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dggqrf(int n, int m, int p, double[] a, int lda, double[] taua, double[] b, int ldb, double[] taub, double[] work, int lwork, org.netlib.util.intW info) { dggqrf(n, m, p, a, 0, lda, taua, 0, b, 0, ldb, taub, 0, work, 0, lwork, info); } - public void dggqrf(int n, int m, int p, double[] a, int _a_offset, int lda, double[] taua, int _taua_offset, double[] b, int _b_offset, int ldb, double[] taub, int _taub_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dggqrf(int n, int m, int p, double[] a, int offseta, int lda, double[] taua, int offsettaua, double[] b, int offsetb, int ldb, double[] taub, int offsettaub, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dggqrfK(n, m, p, a, _a_offset, lda, taua, _taua_offset, b, _b_offset, ldb, taub, _taub_offset, work, _work_offset, lwork, info); + dggqrfK(n, m, p, a, offseta, lda, taua, offsettaua, b, offsetb, ldb, taub, offsettaub, work, offsetwork, lwork, info); } - protected abstract void dggqrfK(int n, int m, int p, double[] a, int _a_offset, int lda, double[] taua, int _taua_offset, double[] b, int _b_offset, int ldb, double[] taub, int _taub_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dggqrfK(int n, int m, int p, double[] a, int offseta, int lda, double[] taua, int offsettaua, double[] b, int offsetb, int ldb, double[] taub, int offsettaub, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dggrqf(int m, int p, int n, double[] a, int lda, double[] taua, double[] b, int ldb, double[] taub, double[] work, int lwork, org.netlib.util.intW info) { dggrqf(m, p, n, a, 0, lda, taua, 0, b, 0, ldb, taub, 0, work, 0, lwork, info); } - public void dggrqf(int m, int p, int n, double[] a, int _a_offset, int lda, double[] taua, int _taua_offset, double[] b, int _b_offset, int ldb, double[] taub, int _taub_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dggrqf(int m, int p, int n, double[] a, int offseta, int lda, double[] taua, int offsettaua, double[] b, int offsetb, int ldb, double[] taub, int offsettaub, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dggrqfK(m, p, n, a, _a_offset, lda, taua, _taua_offset, b, _b_offset, ldb, taub, _taub_offset, work, _work_offset, lwork, info); + dggrqfK(m, p, n, a, offseta, lda, taua, offsettaua, b, offsetb, ldb, taub, offsettaub, work, offsetwork, lwork, info); } - protected abstract void dggrqfK(int m, int p, int n, double[] a, int _a_offset, int lda, double[] taua, int _taua_offset, double[] b, int _b_offset, int ldb, double[] taub, int _taub_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dggrqfK(int m, int p, int n, double[] a, int offseta, int lda, double[] taua, int offsettaua, double[] b, int offsetb, int ldb, double[] taub, int offsettaub, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dggsvd(String jobu, String jobv, String jobq, int m, int n, int p, org.netlib.util.intW k, org.netlib.util.intW l, double[] a, int lda, double[] b, int ldb, double[] alpha, double[] beta, double[] u, int ldu, double[] v, int ldv, double[] q, int ldq, double[] work, int[] iwork, org.netlib.util.intW info) { dggsvd(jobu, jobv, jobq, m, n, p, k, l, a, 0, lda, b, 0, ldb, alpha, 0, beta, 0, u, 0, ldu, v, 0, ldv, q, 0, ldq, work, 0, iwork, 0, info); } - public void dggsvd(String jobu, String jobv, String jobq, int m, int n, int p, org.netlib.util.intW k, org.netlib.util.intW l, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alpha, int _alpha_offset, double[] beta, int _beta_offset, double[] u, int _u_offset, int ldu, double[] v, int _v_offset, int ldv, double[] q, int _q_offset, int ldq, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dggsvd(String jobu, String jobv, String jobq, int m, int n, int p, org.netlib.util.intW k, org.netlib.util.intW l, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alpha, int offsetalpha, double[] beta, int offsetbeta, double[] u, int offsetu, int ldu, double[] v, int offsetv, int ldv, double[] q, int offsetq, int ldq, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dggsvdK(jobu, jobv, jobq, m, n, p, k, l, a, _a_offset, lda, b, _b_offset, ldb, alpha, _alpha_offset, beta, _beta_offset, u, _u_offset, ldu, v, _v_offset, ldv, q, _q_offset, ldq, work, _work_offset, iwork, _iwork_offset, info); + dggsvdK(jobu, jobv, jobq, m, n, p, k, l, a, offseta, lda, b, offsetb, ldb, alpha, offsetalpha, beta, offsetbeta, u, offsetu, ldu, v, offsetv, ldv, q, offsetq, ldq, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dggsvdK(String jobu, String jobv, String jobq, int m, int n, int p, org.netlib.util.intW k, org.netlib.util.intW l, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alpha, int _alpha_offset, double[] beta, int _beta_offset, double[] u, int _u_offset, int ldu, double[] v, int _v_offset, int ldv, double[] q, int _q_offset, int ldq, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dggsvdK(String jobu, String jobv, String jobq, int m, int n, int p, org.netlib.util.intW k, org.netlib.util.intW l, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alpha, int offsetalpha, double[] beta, int offsetbeta, double[] u, int offsetu, int ldu, double[] v, int offsetv, int ldv, double[] q, int offsetq, int ldq, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dggsvp(String jobu, String jobv, String jobq, int m, int p, int n, double[] a, int lda, double[] b, int ldb, double tola, double tolb, org.netlib.util.intW k, org.netlib.util.intW l, double[] u, int ldu, double[] v, int ldv, double[] q, int ldq, int[] iwork, double[] tau, double[] work, org.netlib.util.intW info) { dggsvp(jobu, jobv, jobq, m, p, n, a, 0, lda, b, 0, ldb, tola, tolb, k, l, u, 0, ldu, v, 0, ldv, q, 0, ldq, iwork, 0, tau, 0, work, 0, info); } - public void dggsvp(String jobu, String jobv, String jobq, int m, int p, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double tola, double tolb, org.netlib.util.intW k, org.netlib.util.intW l, double[] u, int _u_offset, int ldu, double[] v, int _v_offset, int ldv, double[] q, int _q_offset, int ldq, int[] iwork, int _iwork_offset, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dggsvp(String jobu, String jobv, String jobq, int m, int p, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double tola, double tolb, org.netlib.util.intW k, org.netlib.util.intW l, double[] u, int offsetu, int ldu, double[] v, int offsetv, int ldv, double[] q, int offsetq, int ldq, int[] iwork, int offsetiwork, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dggsvpK(jobu, jobv, jobq, m, p, n, a, _a_offset, lda, b, _b_offset, ldb, tola, tolb, k, l, u, _u_offset, ldu, v, _v_offset, ldv, q, _q_offset, ldq, iwork, _iwork_offset, tau, _tau_offset, work, _work_offset, info); + dggsvpK(jobu, jobv, jobq, m, p, n, a, offseta, lda, b, offsetb, ldb, tola, tolb, k, l, u, offsetu, ldu, v, offsetv, ldv, q, offsetq, ldq, iwork, offsetiwork, tau, offsettau, work, offsetwork, info); } - protected abstract void dggsvpK(String jobu, String jobv, String jobq, int m, int p, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double tola, double tolb, org.netlib.util.intW k, org.netlib.util.intW l, double[] u, int _u_offset, int ldu, double[] v, int _v_offset, int ldv, double[] q, int _q_offset, int ldq, int[] iwork, int _iwork_offset, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dggsvpK(String jobu, String jobv, String jobq, int m, int p, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double tola, double tolb, org.netlib.util.intW k, org.netlib.util.intW l, double[] u, int offsetu, int ldu, double[] v, int offsetv, int ldv, double[] q, int offsetq, int ldq, int[] iwork, int offsetiwork, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); public void dgtcon(String norm, int n, double[] dl, double[] d, double[] du, double[] du2, int[] ipiv, double anorm, org.netlib.util.doubleW rcond, double[] work, int[] iwork, org.netlib.util.intW info) { dgtcon(norm, n, dl, 0, d, 0, du, 0, du2, 0, ipiv, 0, anorm, rcond, work, 0, iwork, 0, info); } - public void dgtcon(String norm, int n, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dgtcon(String norm, int n, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] du2, int offsetdu2, int[] ipiv, int offsetipiv, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgtconK(norm, n, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + dgtconK(norm, n, dl, offsetdl, d, offsetd, du, offsetdu, du2, offsetdu2, ipiv, offsetipiv, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dgtconK(String norm, int n, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dgtconK(String norm, int n, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] du2, int offsetdu2, int[] ipiv, int offsetipiv, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dgtrfs(String trans, int n, int nrhs, double[] dl, double[] d, double[] du, double[] dlf, double[] df, double[] duf, double[] du2, int[] ipiv, double[] b, int ldb, double[] x, int ldx, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info) { dgtrfs(trans, n, nrhs, dl, 0, d, 0, du, 0, dlf, 0, df, 0, duf, 0, du2, 0, ipiv, 0, b, 0, ldb, x, 0, ldx, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void dgtrfs(String trans, int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] dlf, int _dlf_offset, double[] df, int _df_offset, double[] duf, int _duf_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dgtrfs(String trans, int n, int nrhs, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] dlf, int offsetdlf, double[] df, int offsetdf, double[] duf, int offsetduf, double[] du2, int offsetdu2, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgtrfsK(trans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, dlf, _dlf_offset, df, _df_offset, duf, _duf_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + dgtrfsK(trans, n, nrhs, dl, offsetdl, d, offsetd, du, offsetdu, dlf, offsetdlf, df, offsetdf, duf, offsetduf, du2, offsetdu2, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dgtrfsK(String trans, int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] dlf, int _dlf_offset, double[] df, int _df_offset, double[] duf, int _duf_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dgtrfsK(String trans, int n, int nrhs, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] dlf, int offsetdlf, double[] df, int offsetdf, double[] duf, int offsetduf, double[] du2, int offsetdu2, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dgtsv(int n, int nrhs, double[] dl, double[] d, double[] du, double[] b, int ldb, org.netlib.util.intW info) { dgtsv(n, nrhs, dl, 0, d, 0, du, 0, b, 0, ldb, info); } - public void dgtsv(int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void dgtsv(int n, int nrhs, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - dgtsvK(n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, b, _b_offset, ldb, info); + dgtsvK(n, nrhs, dl, offsetdl, d, offsetd, du, offsetdu, b, offsetb, ldb, info); } - protected abstract void dgtsvK(int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void dgtsvK(int n, int nrhs, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dgtsvx(String fact, String trans, int n, int nrhs, double[] dl, double[] d, double[] du, double[] dlf, double[] df, double[] duf, double[] du2, int[] ipiv, double[] b, int ldb, double[] x, int ldx, org.netlib.util.doubleW rcond, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info) { dgtsvx(fact, trans, n, nrhs, dl, 0, d, 0, du, 0, dlf, 0, df, 0, duf, 0, du2, 0, ipiv, 0, b, 0, ldb, x, 0, ldx, rcond, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void dgtsvx(String fact, String trans, int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] dlf, int _dlf_offset, double[] df, int _df_offset, double[] duf, int _duf_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dgtsvx(String fact, String trans, int n, int nrhs, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] dlf, int offsetdlf, double[] df, int offsetdf, double[] duf, int offsetduf, double[] du2, int offsetdu2, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dgtsvxK(fact, trans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, dlf, _dlf_offset, df, _df_offset, duf, _duf_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + dgtsvxK(fact, trans, n, nrhs, dl, offsetdl, d, offsetd, du, offsetdu, dlf, offsetdlf, df, offsetdf, duf, offsetduf, du2, offsetdu2, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dgtsvxK(String fact, String trans, int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] dlf, int _dlf_offset, double[] df, int _df_offset, double[] duf, int _duf_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dgtsvxK(String fact, String trans, int n, int nrhs, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] dlf, int offsetdlf, double[] df, int offsetdf, double[] duf, int offsetduf, double[] du2, int offsetdu2, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dgttrf(int n, double[] dl, double[] d, double[] du, double[] du2, int[] ipiv, org.netlib.util.intW info) { dgttrf(n, dl, 0, d, 0, du, 0, du2, 0, ipiv, 0, info); } - public void dgttrf(int n, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { + public void dgttrf(int n, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] du2, int offsetdu2, int[] ipiv, int offsetipiv, org.netlib.util.intW info) { //FIXME Add arguments check - dgttrfK(n, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, info); + dgttrfK(n, dl, offsetdl, d, offsetd, du, offsetdu, du2, offsetdu2, ipiv, offsetipiv, info); } - protected abstract void dgttrfK(int n, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + protected abstract void dgttrfK(int n, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] du2, int offsetdu2, int[] ipiv, int offsetipiv, org.netlib.util.intW info); public void dgttrs(String trans, int n, int nrhs, double[] dl, double[] d, double[] du, double[] du2, int[] ipiv, double[] b, int ldb, org.netlib.util.intW info) { dgttrs(trans, n, nrhs, dl, 0, d, 0, du, 0, du2, 0, ipiv, 0, b, 0, ldb, info); } - public void dgttrs(String trans, int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void dgttrs(String trans, int n, int nrhs, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] du2, int offsetdu2, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - dgttrsK(trans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + dgttrsK(trans, n, nrhs, dl, offsetdl, d, offsetd, du, offsetdu, du2, offsetdu2, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected abstract void dgttrsK(String trans, int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void dgttrsK(String trans, int n, int nrhs, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] du2, int offsetdu2, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dgtts2(int itrans, int n, int nrhs, double[] dl, double[] d, double[] du, double[] du2, int[] ipiv, double[] b, int ldb) { dgtts2(itrans, n, nrhs, dl, 0, d, 0, du, 0, du2, 0, ipiv, 0, b, 0, ldb); } - public void dgtts2(int itrans, int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb) { + public void dgtts2(int itrans, int n, int nrhs, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] du2, int offsetdu2, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb) { //FIXME Add arguments check - dgtts2K(itrans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb); + dgtts2K(itrans, n, nrhs, dl, offsetdl, d, offsetd, du, offsetdu, du2, offsetdu2, ipiv, offsetipiv, b, offsetb, ldb); } - protected abstract void dgtts2K(int itrans, int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb); + protected abstract void dgtts2K(int itrans, int n, int nrhs, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] du2, int offsetdu2, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb); public void dhgeqz(String job, String compq, String compz, int n, int ilo, int ihi, double[] h, int ldh, double[] t, int ldt, double[] alphar, double[] alphai, double[] beta, double[] q, int ldq, double[] z, int ldz, double[] work, int lwork, org.netlib.util.intW info) { dhgeqz(job, compq, compz, n, ilo, ihi, h, 0, ldh, t, 0, ldt, alphar, 0, alphai, 0, beta, 0, q, 0, ldq, z, 0, ldz, work, 0, lwork, info); } - public void dhgeqz(String job, String compq, String compz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] t, int _t_offset, int ldt, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dhgeqz(String job, String compq, String compz, int n, int ilo, int ihi, double[] h, int offseth, int ldh, double[] t, int offsett, int ldt, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] q, int offsetq, int ldq, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dhgeqzK(job, compq, compz, n, ilo, ihi, h, _h_offset, ldh, t, _t_offset, ldt, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, q, _q_offset, ldq, z, _z_offset, ldz, work, _work_offset, lwork, info); + dhgeqzK(job, compq, compz, n, ilo, ihi, h, offseth, ldh, t, offsett, ldt, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, q, offsetq, ldq, z, offsetz, ldz, work, offsetwork, lwork, info); } - protected abstract void dhgeqzK(String job, String compq, String compz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] t, int _t_offset, int ldt, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dhgeqzK(String job, String compq, String compz, int n, int ilo, int ihi, double[] h, int offseth, int ldh, double[] t, int offsett, int ldt, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] q, int offsetq, int ldq, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dhsein(String side, String eigsrc, String initv, boolean[] select, int n, double[] h, int ldh, double[] wr, double[] wi, double[] vl, int ldvl, double[] vr, int ldvr, int mm, org.netlib.util.intW m, double[] work, int[] ifaill, int[] ifailr, org.netlib.util.intW info) { dhsein(side, eigsrc, initv, select, 0, n, h, 0, ldh, wr, 0, wi, 0, vl, 0, ldvl, vr, 0, ldvr, mm, m, work, 0, ifaill, 0, ifailr, 0, info); } - public void dhsein(String side, String eigsrc, String initv, boolean[] select, int _select_offset, int n, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, double[] work, int _work_offset, int[] ifaill, int _ifaill_offset, int[] ifailr, int _ifailr_offset, org.netlib.util.intW info) { + public void dhsein(String side, String eigsrc, String initv, boolean[] select, int offsetselect, int n, double[] h, int offseth, int ldh, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, int mm, org.netlib.util.intW m, double[] work, int offsetwork, int[] ifaill, int offsetifaill, int[] ifailr, int offsetifailr, org.netlib.util.intW info) { //FIXME Add arguments check - dhseinK(side, eigsrc, initv, select, _select_offset, n, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, mm, m, work, _work_offset, ifaill, _ifaill_offset, ifailr, _ifailr_offset, info); + dhseinK(side, eigsrc, initv, select, offsetselect, n, h, offseth, ldh, wr, offsetwr, wi, offsetwi, vl, offsetvl, ldvl, vr, offsetvr, ldvr, mm, m, work, offsetwork, ifaill, offsetifaill, ifailr, offsetifailr, info); } - protected abstract void dhseinK(String side, String eigsrc, String initv, boolean[] select, int _select_offset, int n, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, double[] work, int _work_offset, int[] ifaill, int _ifaill_offset, int[] ifailr, int _ifailr_offset, org.netlib.util.intW info); + protected abstract void dhseinK(String side, String eigsrc, String initv, boolean[] select, int offsetselect, int n, double[] h, int offseth, int ldh, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, int mm, org.netlib.util.intW m, double[] work, int offsetwork, int[] ifaill, int offsetifaill, int[] ifailr, int offsetifailr, org.netlib.util.intW info); public void dhseqr(String job, String compz, int n, int ilo, int ihi, double[] h, int ldh, double[] wr, double[] wi, double[] z, int ldz, double[] work, int lwork, org.netlib.util.intW info) { dhseqr(job, compz, n, ilo, ihi, h, 0, ldh, wr, 0, wi, 0, z, 0, ldz, work, 0, lwork, info); } - public void dhseqr(String job, String compz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dhseqr(String job, String compz, int n, int ilo, int ihi, double[] h, int offseth, int ldh, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dhseqrK(job, compz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, z, _z_offset, ldz, work, _work_offset, lwork, info); + dhseqrK(job, compz, n, ilo, ihi, h, offseth, ldh, wr, offsetwr, wi, offsetwi, z, offsetz, ldz, work, offsetwork, lwork, info); } - protected abstract void dhseqrK(String job, String compz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dhseqrK(String job, String compz, int n, int ilo, int ihi, double[] h, int offseth, int ldh, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public boolean disnan(double din) { return disnanK(din); @@ -870,45 +870,45 @@ public void dlabrd(int m, int n, int nb, double[] a, int lda, double[] d, double dlabrd(m, n, nb, a, 0, lda, d, 0, e, 0, tauq, 0, taup, 0, x, 0, ldx, y, 0, ldy); } - public void dlabrd(int m, int n, int nb, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tauq, int _tauq_offset, double[] taup, int _taup_offset, double[] x, int _x_offset, int ldx, double[] y, int _y_offset, int ldy) { + public void dlabrd(int m, int n, int nb, double[] a, int offseta, int lda, double[] d, int offsetd, double[] e, int offsete, double[] tauq, int offsettauq, double[] taup, int offsettaup, double[] x, int offsetx, int ldx, double[] y, int offsety, int ldy) { //FIXME Add arguments check - dlabrdK(m, n, nb, a, _a_offset, lda, d, _d_offset, e, _e_offset, tauq, _tauq_offset, taup, _taup_offset, x, _x_offset, ldx, y, _y_offset, ldy); + dlabrdK(m, n, nb, a, offseta, lda, d, offsetd, e, offsete, tauq, offsettauq, taup, offsettaup, x, offsetx, ldx, y, offsety, ldy); } - protected abstract void dlabrdK(int m, int n, int nb, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tauq, int _tauq_offset, double[] taup, int _taup_offset, double[] x, int _x_offset, int ldx, double[] y, int _y_offset, int ldy); + protected abstract void dlabrdK(int m, int n, int nb, double[] a, int offseta, int lda, double[] d, int offsetd, double[] e, int offsete, double[] tauq, int offsettauq, double[] taup, int offsettaup, double[] x, int offsetx, int ldx, double[] y, int offsety, int ldy); public void dlacn2(int n, double[] v, double[] x, int[] isgn, org.netlib.util.doubleW est, org.netlib.util.intW kase, int[] isave) { dlacn2(n, v, 0, x, 0, isgn, 0, est, kase, isave, 0); } - public void dlacn2(int n, double[] v, int _v_offset, double[] x, int _x_offset, int[] isgn, int _isgn_offset, org.netlib.util.doubleW est, org.netlib.util.intW kase, int[] isave, int _isave_offset) { + public void dlacn2(int n, double[] v, int offsetv, double[] x, int offsetx, int[] isgn, int offsetisgn, org.netlib.util.doubleW est, org.netlib.util.intW kase, int[] isave, int offsetisave) { //FIXME Add arguments check - dlacn2K(n, v, _v_offset, x, _x_offset, isgn, _isgn_offset, est, kase, isave, _isave_offset); + dlacn2K(n, v, offsetv, x, offsetx, isgn, offsetisgn, est, kase, isave, offsetisave); } - protected abstract void dlacn2K(int n, double[] v, int _v_offset, double[] x, int _x_offset, int[] isgn, int _isgn_offset, org.netlib.util.doubleW est, org.netlib.util.intW kase, int[] isave, int _isave_offset); + protected abstract void dlacn2K(int n, double[] v, int offsetv, double[] x, int offsetx, int[] isgn, int offsetisgn, org.netlib.util.doubleW est, org.netlib.util.intW kase, int[] isave, int offsetisave); public void dlacon(int n, double[] v, double[] x, int[] isgn, org.netlib.util.doubleW est, org.netlib.util.intW kase) { dlacon(n, v, 0, x, 0, isgn, 0, est, kase); } - public void dlacon(int n, double[] v, int _v_offset, double[] x, int _x_offset, int[] isgn, int _isgn_offset, org.netlib.util.doubleW est, org.netlib.util.intW kase) { + public void dlacon(int n, double[] v, int offsetv, double[] x, int offsetx, int[] isgn, int offsetisgn, org.netlib.util.doubleW est, org.netlib.util.intW kase) { //FIXME Add arguments check - dlaconK(n, v, _v_offset, x, _x_offset, isgn, _isgn_offset, est, kase); + dlaconK(n, v, offsetv, x, offsetx, isgn, offsetisgn, est, kase); } - protected abstract void dlaconK(int n, double[] v, int _v_offset, double[] x, int _x_offset, int[] isgn, int _isgn_offset, org.netlib.util.doubleW est, org.netlib.util.intW kase); + protected abstract void dlaconK(int n, double[] v, int offsetv, double[] x, int offsetx, int[] isgn, int offsetisgn, org.netlib.util.doubleW est, org.netlib.util.intW kase); public void dlacpy(String uplo, int m, int n, double[] a, int lda, double[] b, int ldb) { dlacpy(uplo, m, n, a, 0, lda, b, 0, ldb); } - public void dlacpy(String uplo, int m, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb) { + public void dlacpy(String uplo, int m, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb) { //FIXME Add arguments check - dlacpyK(uplo, m, n, a, _a_offset, lda, b, _b_offset, ldb); + dlacpyK(uplo, m, n, a, offseta, lda, b, offsetb, ldb); } - protected abstract void dlacpyK(String uplo, int m, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb); + protected abstract void dlacpyK(String uplo, int m, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb); public void dladiv(double a, double b, double c, double d, org.netlib.util.doubleW p, org.netlib.util.doubleW q) { dladivK(a, b, c, d, p, q); @@ -926,144 +926,144 @@ public void dlaebz(int ijob, int nitmax, int n, int mmax, int minp, int nbmin, d dlaebz(ijob, nitmax, n, mmax, minp, nbmin, abstol, reltol, pivmin, d, 0, e, 0, e2, 0, nval, 0, ab, 0, c, 0, mout, nab, 0, work, 0, iwork, 0, info); } - public void dlaebz(int ijob, int nitmax, int n, int mmax, int minp, int nbmin, double abstol, double reltol, double pivmin, double[] d, int _d_offset, double[] e, int _e_offset, double[] e2, int _e2_offset, int[] nval, int _nval_offset, double[] ab, int _ab_offset, double[] c, int _c_offset, org.netlib.util.intW mout, int[] nab, int _nab_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dlaebz(int ijob, int nitmax, int n, int mmax, int minp, int nbmin, double abstol, double reltol, double pivmin, double[] d, int offsetd, double[] e, int offsete, double[] e2, int offsete2, int[] nval, int offsetnval, double[] ab, int offsetab, double[] c, int offsetc, org.netlib.util.intW mout, int[] nab, int offsetnab, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dlaebzK(ijob, nitmax, n, mmax, minp, nbmin, abstol, reltol, pivmin, d, _d_offset, e, _e_offset, e2, _e2_offset, nval, _nval_offset, ab, _ab_offset, c, _c_offset, mout, nab, _nab_offset, work, _work_offset, iwork, _iwork_offset, info); + dlaebzK(ijob, nitmax, n, mmax, minp, nbmin, abstol, reltol, pivmin, d, offsetd, e, offsete, e2, offsete2, nval, offsetnval, ab, offsetab, c, offsetc, mout, nab, offsetnab, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dlaebzK(int ijob, int nitmax, int n, int mmax, int minp, int nbmin, double abstol, double reltol, double pivmin, double[] d, int _d_offset, double[] e, int _e_offset, double[] e2, int _e2_offset, int[] nval, int _nval_offset, double[] ab, int _ab_offset, double[] c, int _c_offset, org.netlib.util.intW mout, int[] nab, int _nab_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dlaebzK(int ijob, int nitmax, int n, int mmax, int minp, int nbmin, double abstol, double reltol, double pivmin, double[] d, int offsetd, double[] e, int offsete, double[] e2, int offsete2, int[] nval, int offsetnval, double[] ab, int offsetab, double[] c, int offsetc, org.netlib.util.intW mout, int[] nab, int offsetnab, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dlaed0(int icompq, int qsiz, int n, double[] d, double[] e, double[] q, int ldq, double[] qstore, int ldqs, double[] work, int[] iwork, org.netlib.util.intW info) { dlaed0(icompq, qsiz, n, d, 0, e, 0, q, 0, ldq, qstore, 0, ldqs, work, 0, iwork, 0, info); } - public void dlaed0(int icompq, int qsiz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] q, int _q_offset, int ldq, double[] qstore, int _qstore_offset, int ldqs, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dlaed0(int icompq, int qsiz, int n, double[] d, int offsetd, double[] e, int offsete, double[] q, int offsetq, int ldq, double[] qstore, int offsetqstore, int ldqs, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dlaed0K(icompq, qsiz, n, d, _d_offset, e, _e_offset, q, _q_offset, ldq, qstore, _qstore_offset, ldqs, work, _work_offset, iwork, _iwork_offset, info); + dlaed0K(icompq, qsiz, n, d, offsetd, e, offsete, q, offsetq, ldq, qstore, offsetqstore, ldqs, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dlaed0K(int icompq, int qsiz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] q, int _q_offset, int ldq, double[] qstore, int _qstore_offset, int ldqs, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dlaed0K(int icompq, int qsiz, int n, double[] d, int offsetd, double[] e, int offsete, double[] q, int offsetq, int ldq, double[] qstore, int offsetqstore, int ldqs, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dlaed1(int n, double[] d, double[] q, int ldq, int[] indxq, org.netlib.util.doubleW rho, int cutpnt, double[] work, int[] iwork, org.netlib.util.intW info) { dlaed1(n, d, 0, q, 0, ldq, indxq, 0, rho, cutpnt, work, 0, iwork, 0, info); } - public void dlaed1(int n, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.doubleW rho, int cutpnt, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dlaed1(int n, double[] d, int offsetd, double[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.doubleW rho, int cutpnt, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dlaed1K(n, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, cutpnt, work, _work_offset, iwork, _iwork_offset, info); + dlaed1K(n, d, offsetd, q, offsetq, ldq, indxq, offsetindxq, rho, cutpnt, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dlaed1K(int n, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.doubleW rho, int cutpnt, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dlaed1K(int n, double[] d, int offsetd, double[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.doubleW rho, int cutpnt, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dlaed2(org.netlib.util.intW k, int n, int n1, double[] d, double[] q, int ldq, int[] indxq, org.netlib.util.doubleW rho, double[] z, double[] dlamda, double[] w, double[] q2, int[] indx, int[] indxc, int[] indxp, int[] coltyp, org.netlib.util.intW info) { dlaed2(k, n, n1, d, 0, q, 0, ldq, indxq, 0, rho, z, 0, dlamda, 0, w, 0, q2, 0, indx, 0, indxc, 0, indxp, 0, coltyp, 0, info); } - public void dlaed2(org.netlib.util.intW k, int n, int n1, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.doubleW rho, double[] z, int _z_offset, double[] dlamda, int _dlamda_offset, double[] w, int _w_offset, double[] q2, int _q2_offset, int[] indx, int _indx_offset, int[] indxc, int _indxc_offset, int[] indxp, int _indxp_offset, int[] coltyp, int _coltyp_offset, org.netlib.util.intW info) { + public void dlaed2(org.netlib.util.intW k, int n, int n1, double[] d, int offsetd, double[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.doubleW rho, double[] z, int offsetz, double[] dlamda, int offsetdlamda, double[] w, int offsetw, double[] q2, int offsetq2, int[] indx, int offsetindx, int[] indxc, int offsetindxc, int[] indxp, int offsetindxp, int[] coltyp, int offsetcoltyp, org.netlib.util.intW info) { //FIXME Add arguments check - dlaed2K(k, n, n1, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, z, _z_offset, dlamda, _dlamda_offset, w, _w_offset, q2, _q2_offset, indx, _indx_offset, indxc, _indxc_offset, indxp, _indxp_offset, coltyp, _coltyp_offset, info); + dlaed2K(k, n, n1, d, offsetd, q, offsetq, ldq, indxq, offsetindxq, rho, z, offsetz, dlamda, offsetdlamda, w, offsetw, q2, offsetq2, indx, offsetindx, indxc, offsetindxc, indxp, offsetindxp, coltyp, offsetcoltyp, info); } - protected abstract void dlaed2K(org.netlib.util.intW k, int n, int n1, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.doubleW rho, double[] z, int _z_offset, double[] dlamda, int _dlamda_offset, double[] w, int _w_offset, double[] q2, int _q2_offset, int[] indx, int _indx_offset, int[] indxc, int _indxc_offset, int[] indxp, int _indxp_offset, int[] coltyp, int _coltyp_offset, org.netlib.util.intW info); + protected abstract void dlaed2K(org.netlib.util.intW k, int n, int n1, double[] d, int offsetd, double[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.doubleW rho, double[] z, int offsetz, double[] dlamda, int offsetdlamda, double[] w, int offsetw, double[] q2, int offsetq2, int[] indx, int offsetindx, int[] indxc, int offsetindxc, int[] indxp, int offsetindxp, int[] coltyp, int offsetcoltyp, org.netlib.util.intW info); public void dlaed3(int k, int n, int n1, double[] d, double[] q, int ldq, double rho, double[] dlamda, double[] q2, int[] indx, int[] ctot, double[] w, double[] s, org.netlib.util.intW info) { dlaed3(k, n, n1, d, 0, q, 0, ldq, rho, dlamda, 0, q2, 0, indx, 0, ctot, 0, w, 0, s, 0, info); } - public void dlaed3(int k, int n, int n1, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, double rho, double[] dlamda, int _dlamda_offset, double[] q2, int _q2_offset, int[] indx, int _indx_offset, int[] ctot, int _ctot_offset, double[] w, int _w_offset, double[] s, int _s_offset, org.netlib.util.intW info) { + public void dlaed3(int k, int n, int n1, double[] d, int offsetd, double[] q, int offsetq, int ldq, double rho, double[] dlamda, int offsetdlamda, double[] q2, int offsetq2, int[] indx, int offsetindx, int[] ctot, int offsetctot, double[] w, int offsetw, double[] s, int offsets, org.netlib.util.intW info) { //FIXME Add arguments check - dlaed3K(k, n, n1, d, _d_offset, q, _q_offset, ldq, rho, dlamda, _dlamda_offset, q2, _q2_offset, indx, _indx_offset, ctot, _ctot_offset, w, _w_offset, s, _s_offset, info); + dlaed3K(k, n, n1, d, offsetd, q, offsetq, ldq, rho, dlamda, offsetdlamda, q2, offsetq2, indx, offsetindx, ctot, offsetctot, w, offsetw, s, offsets, info); } - protected abstract void dlaed3K(int k, int n, int n1, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, double rho, double[] dlamda, int _dlamda_offset, double[] q2, int _q2_offset, int[] indx, int _indx_offset, int[] ctot, int _ctot_offset, double[] w, int _w_offset, double[] s, int _s_offset, org.netlib.util.intW info); + protected abstract void dlaed3K(int k, int n, int n1, double[] d, int offsetd, double[] q, int offsetq, int ldq, double rho, double[] dlamda, int offsetdlamda, double[] q2, int offsetq2, int[] indx, int offsetindx, int[] ctot, int offsetctot, double[] w, int offsetw, double[] s, int offsets, org.netlib.util.intW info); public void dlaed4(int n, int i, double[] d, double[] z, double[] delta, double rho, org.netlib.util.doubleW dlam, org.netlib.util.intW info) { dlaed4(n, i, d, 0, z, 0, delta, 0, rho, dlam, info); } - public void dlaed4(int n, int i, double[] d, int _d_offset, double[] z, int _z_offset, double[] delta, int _delta_offset, double rho, org.netlib.util.doubleW dlam, org.netlib.util.intW info) { + public void dlaed4(int n, int i, double[] d, int offsetd, double[] z, int offsetz, double[] delta, int offsetdelta, double rho, org.netlib.util.doubleW dlam, org.netlib.util.intW info) { //FIXME Add arguments check - dlaed4K(n, i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, dlam, info); + dlaed4K(n, i, d, offsetd, z, offsetz, delta, offsetdelta, rho, dlam, info); } - protected abstract void dlaed4K(int n, int i, double[] d, int _d_offset, double[] z, int _z_offset, double[] delta, int _delta_offset, double rho, org.netlib.util.doubleW dlam, org.netlib.util.intW info); + protected abstract void dlaed4K(int n, int i, double[] d, int offsetd, double[] z, int offsetz, double[] delta, int offsetdelta, double rho, org.netlib.util.doubleW dlam, org.netlib.util.intW info); public void dlaed5(int i, double[] d, double[] z, double[] delta, double rho, org.netlib.util.doubleW dlam) { dlaed5(i, d, 0, z, 0, delta, 0, rho, dlam); } - public void dlaed5(int i, double[] d, int _d_offset, double[] z, int _z_offset, double[] delta, int _delta_offset, double rho, org.netlib.util.doubleW dlam) { + public void dlaed5(int i, double[] d, int offsetd, double[] z, int offsetz, double[] delta, int offsetdelta, double rho, org.netlib.util.doubleW dlam) { //FIXME Add arguments check - dlaed5K(i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, dlam); + dlaed5K(i, d, offsetd, z, offsetz, delta, offsetdelta, rho, dlam); } - protected abstract void dlaed5K(int i, double[] d, int _d_offset, double[] z, int _z_offset, double[] delta, int _delta_offset, double rho, org.netlib.util.doubleW dlam); + protected abstract void dlaed5K(int i, double[] d, int offsetd, double[] z, int offsetz, double[] delta, int offsetdelta, double rho, org.netlib.util.doubleW dlam); public void dlaed6(int kniter, boolean orgati, double rho, double[] d, double[] z, double finit, org.netlib.util.doubleW tau, org.netlib.util.intW info) { dlaed6(kniter, orgati, rho, d, 0, z, 0, finit, tau, info); } - public void dlaed6(int kniter, boolean orgati, double rho, double[] d, int _d_offset, double[] z, int _z_offset, double finit, org.netlib.util.doubleW tau, org.netlib.util.intW info) { + public void dlaed6(int kniter, boolean orgati, double rho, double[] d, int offsetd, double[] z, int offsetz, double finit, org.netlib.util.doubleW tau, org.netlib.util.intW info) { //FIXME Add arguments check - dlaed6K(kniter, orgati, rho, d, _d_offset, z, _z_offset, finit, tau, info); + dlaed6K(kniter, orgati, rho, d, offsetd, z, offsetz, finit, tau, info); } - protected abstract void dlaed6K(int kniter, boolean orgati, double rho, double[] d, int _d_offset, double[] z, int _z_offset, double finit, org.netlib.util.doubleW tau, org.netlib.util.intW info); + protected abstract void dlaed6K(int kniter, boolean orgati, double rho, double[] d, int offsetd, double[] z, int offsetz, double finit, org.netlib.util.doubleW tau, org.netlib.util.intW info); public void dlaed7(int icompq, int n, int qsiz, int tlvls, int curlvl, int curpbm, double[] d, double[] q, int ldq, int[] indxq, org.netlib.util.doubleW rho, int cutpnt, double[] qstore, int[] qptr, int[] prmptr, int[] perm, int[] givptr, int[] givcol, double[] givnum, double[] work, int[] iwork, org.netlib.util.intW info) { dlaed7(icompq, n, qsiz, tlvls, curlvl, curpbm, d, 0, q, 0, ldq, indxq, 0, rho, cutpnt, qstore, 0, qptr, 0, prmptr, 0, perm, 0, givptr, 0, givcol, 0, givnum, 0, work, 0, iwork, 0, info); } - public void dlaed7(int icompq, int n, int qsiz, int tlvls, int curlvl, int curpbm, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.doubleW rho, int cutpnt, double[] qstore, int _qstore_offset, int[] qptr, int _qptr_offset, int[] prmptr, int _prmptr_offset, int[] perm, int _perm_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, double[] givnum, int _givnum_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dlaed7(int icompq, int n, int qsiz, int tlvls, int curlvl, int curpbm, double[] d, int offsetd, double[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.doubleW rho, int cutpnt, double[] qstore, int offsetqstore, int[] qptr, int offsetqptr, int[] prmptr, int offsetprmptr, int[] perm, int offsetperm, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, double[] givnum, int offsetgivnum, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dlaed7K(icompq, n, qsiz, tlvls, curlvl, curpbm, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, cutpnt, qstore, _qstore_offset, qptr, _qptr_offset, prmptr, _prmptr_offset, perm, _perm_offset, givptr, _givptr_offset, givcol, _givcol_offset, givnum, _givnum_offset, work, _work_offset, iwork, _iwork_offset, info); + dlaed7K(icompq, n, qsiz, tlvls, curlvl, curpbm, d, offsetd, q, offsetq, ldq, indxq, offsetindxq, rho, cutpnt, qstore, offsetqstore, qptr, offsetqptr, prmptr, offsetprmptr, perm, offsetperm, givptr, offsetgivptr, givcol, offsetgivcol, givnum, offsetgivnum, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dlaed7K(int icompq, int n, int qsiz, int tlvls, int curlvl, int curpbm, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.doubleW rho, int cutpnt, double[] qstore, int _qstore_offset, int[] qptr, int _qptr_offset, int[] prmptr, int _prmptr_offset, int[] perm, int _perm_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, double[] givnum, int _givnum_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dlaed7K(int icompq, int n, int qsiz, int tlvls, int curlvl, int curpbm, double[] d, int offsetd, double[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.doubleW rho, int cutpnt, double[] qstore, int offsetqstore, int[] qptr, int offsetqptr, int[] prmptr, int offsetprmptr, int[] perm, int offsetperm, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, double[] givnum, int offsetgivnum, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dlaed8(int icompq, org.netlib.util.intW k, int n, int qsiz, double[] d, double[] q, int ldq, int[] indxq, org.netlib.util.doubleW rho, int cutpnt, double[] z, double[] dlamda, double[] q2, int ldq2, double[] w, int[] perm, org.netlib.util.intW givptr, int[] givcol, double[] givnum, int[] indxp, int[] indx, org.netlib.util.intW info) { dlaed8(icompq, k, n, qsiz, d, 0, q, 0, ldq, indxq, 0, rho, cutpnt, z, 0, dlamda, 0, q2, 0, ldq2, w, 0, perm, 0, givptr, givcol, 0, givnum, 0, indxp, 0, indx, 0, info); } - public void dlaed8(int icompq, org.netlib.util.intW k, int n, int qsiz, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.doubleW rho, int cutpnt, double[] z, int _z_offset, double[] dlamda, int _dlamda_offset, double[] q2, int _q2_offset, int ldq2, double[] w, int _w_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, double[] givnum, int _givnum_offset, int[] indxp, int _indxp_offset, int[] indx, int _indx_offset, org.netlib.util.intW info) { + public void dlaed8(int icompq, org.netlib.util.intW k, int n, int qsiz, double[] d, int offsetd, double[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.doubleW rho, int cutpnt, double[] z, int offsetz, double[] dlamda, int offsetdlamda, double[] q2, int offsetq2, int ldq2, double[] w, int offsetw, int[] perm, int offsetperm, org.netlib.util.intW givptr, int[] givcol, int offsetgivcol, double[] givnum, int offsetgivnum, int[] indxp, int offsetindxp, int[] indx, int offsetindx, org.netlib.util.intW info) { //FIXME Add arguments check - dlaed8K(icompq, k, n, qsiz, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, cutpnt, z, _z_offset, dlamda, _dlamda_offset, q2, _q2_offset, ldq2, w, _w_offset, perm, _perm_offset, givptr, givcol, _givcol_offset, givnum, _givnum_offset, indxp, _indxp_offset, indx, _indx_offset, info); + dlaed8K(icompq, k, n, qsiz, d, offsetd, q, offsetq, ldq, indxq, offsetindxq, rho, cutpnt, z, offsetz, dlamda, offsetdlamda, q2, offsetq2, ldq2, w, offsetw, perm, offsetperm, givptr, givcol, offsetgivcol, givnum, offsetgivnum, indxp, offsetindxp, indx, offsetindx, info); } - protected abstract void dlaed8K(int icompq, org.netlib.util.intW k, int n, int qsiz, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.doubleW rho, int cutpnt, double[] z, int _z_offset, double[] dlamda, int _dlamda_offset, double[] q2, int _q2_offset, int ldq2, double[] w, int _w_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, double[] givnum, int _givnum_offset, int[] indxp, int _indxp_offset, int[] indx, int _indx_offset, org.netlib.util.intW info); + protected abstract void dlaed8K(int icompq, org.netlib.util.intW k, int n, int qsiz, double[] d, int offsetd, double[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.doubleW rho, int cutpnt, double[] z, int offsetz, double[] dlamda, int offsetdlamda, double[] q2, int offsetq2, int ldq2, double[] w, int offsetw, int[] perm, int offsetperm, org.netlib.util.intW givptr, int[] givcol, int offsetgivcol, double[] givnum, int offsetgivnum, int[] indxp, int offsetindxp, int[] indx, int offsetindx, org.netlib.util.intW info); public void dlaed9(int k, int kstart, int kstop, int n, double[] d, double[] q, int ldq, double rho, double[] dlamda, double[] w, double[] s, int lds, org.netlib.util.intW info) { dlaed9(k, kstart, kstop, n, d, 0, q, 0, ldq, rho, dlamda, 0, w, 0, s, 0, lds, info); } - public void dlaed9(int k, int kstart, int kstop, int n, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, double rho, double[] dlamda, int _dlamda_offset, double[] w, int _w_offset, double[] s, int _s_offset, int lds, org.netlib.util.intW info) { + public void dlaed9(int k, int kstart, int kstop, int n, double[] d, int offsetd, double[] q, int offsetq, int ldq, double rho, double[] dlamda, int offsetdlamda, double[] w, int offsetw, double[] s, int offsets, int lds, org.netlib.util.intW info) { //FIXME Add arguments check - dlaed9K(k, kstart, kstop, n, d, _d_offset, q, _q_offset, ldq, rho, dlamda, _dlamda_offset, w, _w_offset, s, _s_offset, lds, info); + dlaed9K(k, kstart, kstop, n, d, offsetd, q, offsetq, ldq, rho, dlamda, offsetdlamda, w, offsetw, s, offsets, lds, info); } - protected abstract void dlaed9K(int k, int kstart, int kstop, int n, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, double rho, double[] dlamda, int _dlamda_offset, double[] w, int _w_offset, double[] s, int _s_offset, int lds, org.netlib.util.intW info); + protected abstract void dlaed9K(int k, int kstart, int kstop, int n, double[] d, int offsetd, double[] q, int offsetq, int ldq, double rho, double[] dlamda, int offsetdlamda, double[] w, int offsetw, double[] s, int offsets, int lds, org.netlib.util.intW info); public void dlaeda(int n, int tlvls, int curlvl, int curpbm, int[] prmptr, int[] perm, int[] givptr, int[] givcol, double[] givnum, double[] q, int[] qptr, double[] z, double[] ztemp, org.netlib.util.intW info) { dlaeda(n, tlvls, curlvl, curpbm, prmptr, 0, perm, 0, givptr, 0, givcol, 0, givnum, 0, q, 0, qptr, 0, z, 0, ztemp, 0, info); } - public void dlaeda(int n, int tlvls, int curlvl, int curpbm, int[] prmptr, int _prmptr_offset, int[] perm, int _perm_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, double[] givnum, int _givnum_offset, double[] q, int _q_offset, int[] qptr, int _qptr_offset, double[] z, int _z_offset, double[] ztemp, int _ztemp_offset, org.netlib.util.intW info) { + public void dlaeda(int n, int tlvls, int curlvl, int curpbm, int[] prmptr, int offsetprmptr, int[] perm, int offsetperm, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, double[] givnum, int offsetgivnum, double[] q, int offsetq, int[] qptr, int offsetqptr, double[] z, int offsetz, double[] ztemp, int offsetztemp, org.netlib.util.intW info) { //FIXME Add arguments check - dlaedaK(n, tlvls, curlvl, curpbm, prmptr, _prmptr_offset, perm, _perm_offset, givptr, _givptr_offset, givcol, _givcol_offset, givnum, _givnum_offset, q, _q_offset, qptr, _qptr_offset, z, _z_offset, ztemp, _ztemp_offset, info); + dlaedaK(n, tlvls, curlvl, curpbm, prmptr, offsetprmptr, perm, offsetperm, givptr, offsetgivptr, givcol, offsetgivcol, givnum, offsetgivnum, q, offsetq, qptr, offsetqptr, z, offsetz, ztemp, offsetztemp, info); } - protected abstract void dlaedaK(int n, int tlvls, int curlvl, int curpbm, int[] prmptr, int _prmptr_offset, int[] perm, int _perm_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, double[] givnum, int _givnum_offset, double[] q, int _q_offset, int[] qptr, int _qptr_offset, double[] z, int _z_offset, double[] ztemp, int _ztemp_offset, org.netlib.util.intW info); + protected abstract void dlaedaK(int n, int tlvls, int curlvl, int curpbm, int[] prmptr, int offsetprmptr, int[] perm, int offsetperm, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, double[] givnum, int offsetgivnum, double[] q, int offsetq, int[] qptr, int offsetqptr, double[] z, int offsetz, double[] ztemp, int offsetztemp, org.netlib.util.intW info); public void dlaein(boolean rightv, boolean noinit, int n, double[] h, int ldh, double wr, double wi, double[] vr, double[] vi, double[] b, int ldb, double[] work, double eps3, double smlnum, double bignum, org.netlib.util.intW info) { dlaein(rightv, noinit, n, h, 0, ldh, wr, wi, vr, 0, vi, 0, b, 0, ldb, work, 0, eps3, smlnum, bignum, info); } - public void dlaein(boolean rightv, boolean noinit, int n, double[] h, int _h_offset, int ldh, double wr, double wi, double[] vr, int _vr_offset, double[] vi, int _vi_offset, double[] b, int _b_offset, int ldb, double[] work, int _work_offset, double eps3, double smlnum, double bignum, org.netlib.util.intW info) { + public void dlaein(boolean rightv, boolean noinit, int n, double[] h, int offseth, int ldh, double wr, double wi, double[] vr, int offsetvr, double[] vi, int offsetvi, double[] b, int offsetb, int ldb, double[] work, int offsetwork, double eps3, double smlnum, double bignum, org.netlib.util.intW info) { //FIXME Add arguments check - dlaeinK(rightv, noinit, n, h, _h_offset, ldh, wr, wi, vr, _vr_offset, vi, _vi_offset, b, _b_offset, ldb, work, _work_offset, eps3, smlnum, bignum, info); + dlaeinK(rightv, noinit, n, h, offseth, ldh, wr, wi, vr, offsetvr, vi, offsetvi, b, offsetb, ldb, work, offsetwork, eps3, smlnum, bignum, info); } - protected abstract void dlaeinK(boolean rightv, boolean noinit, int n, double[] h, int _h_offset, int ldh, double wr, double wi, double[] vr, int _vr_offset, double[] vi, int _vi_offset, double[] b, int _b_offset, int ldb, double[] work, int _work_offset, double eps3, double smlnum, double bignum, org.netlib.util.intW info); + protected abstract void dlaeinK(boolean rightv, boolean noinit, int n, double[] h, int offseth, int ldh, double wr, double wi, double[] vr, int offsetvr, double[] vi, int offsetvi, double[] b, int offsetb, int ldb, double[] work, int offsetwork, double eps3, double smlnum, double bignum, org.netlib.util.intW info); public void dlaev2(double a, double b, double c, org.netlib.util.doubleW rt1, org.netlib.util.doubleW rt2, org.netlib.util.doubleW cs1, org.netlib.util.doubleW sn1) { dlaev2K(a, b, c, rt1, rt2, cs1, sn1); @@ -1075,34 +1075,34 @@ public void dlaexc(boolean wantq, int n, double[] t, int ldt, double[] q, int ld dlaexc(wantq, n, t, 0, ldt, q, 0, ldq, j1, n1, n2, work, 0, info); } - public void dlaexc(boolean wantq, int n, double[] t, int _t_offset, int ldt, double[] q, int _q_offset, int ldq, int j1, int n1, int n2, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dlaexc(boolean wantq, int n, double[] t, int offsett, int ldt, double[] q, int offsetq, int ldq, int j1, int n1, int n2, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dlaexcK(wantq, n, t, _t_offset, ldt, q, _q_offset, ldq, j1, n1, n2, work, _work_offset, info); + dlaexcK(wantq, n, t, offsett, ldt, q, offsetq, ldq, j1, n1, n2, work, offsetwork, info); } - protected abstract void dlaexcK(boolean wantq, int n, double[] t, int _t_offset, int ldt, double[] q, int _q_offset, int ldq, int j1, int n1, int n2, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dlaexcK(boolean wantq, int n, double[] t, int offsett, int ldt, double[] q, int offsetq, int ldq, int j1, int n1, int n2, double[] work, int offsetwork, org.netlib.util.intW info); public void dlag2(double[] a, int lda, double[] b, int ldb, double safmin, org.netlib.util.doubleW scale1, org.netlib.util.doubleW scale2, org.netlib.util.doubleW wr1, org.netlib.util.doubleW wr2, org.netlib.util.doubleW wi) { dlag2(a, 0, lda, b, 0, ldb, safmin, scale1, scale2, wr1, wr2, wi); } - public void dlag2(double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double safmin, org.netlib.util.doubleW scale1, org.netlib.util.doubleW scale2, org.netlib.util.doubleW wr1, org.netlib.util.doubleW wr2, org.netlib.util.doubleW wi) { + public void dlag2(double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double safmin, org.netlib.util.doubleW scale1, org.netlib.util.doubleW scale2, org.netlib.util.doubleW wr1, org.netlib.util.doubleW wr2, org.netlib.util.doubleW wi) { //FIXME Add arguments check - dlag2K(a, _a_offset, lda, b, _b_offset, ldb, safmin, scale1, scale2, wr1, wr2, wi); + dlag2K(a, offseta, lda, b, offsetb, ldb, safmin, scale1, scale2, wr1, wr2, wi); } - protected abstract void dlag2K(double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double safmin, org.netlib.util.doubleW scale1, org.netlib.util.doubleW scale2, org.netlib.util.doubleW wr1, org.netlib.util.doubleW wr2, org.netlib.util.doubleW wi); + protected abstract void dlag2K(double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double safmin, org.netlib.util.doubleW scale1, org.netlib.util.doubleW scale2, org.netlib.util.doubleW wr1, org.netlib.util.doubleW wr2, org.netlib.util.doubleW wi); public void dlag2s(int m, int n, double[] a, int lda, float[] sa, int ldsa, org.netlib.util.intW info) { dlag2s(m, n, a, 0, lda, sa, 0, ldsa, info); } - public void dlag2s(int m, int n, double[] a, int _a_offset, int lda, float[] sa, int _sa_offset, int ldsa, org.netlib.util.intW info) { + public void dlag2s(int m, int n, double[] a, int offseta, int lda, float[] sa, int offsetsa, int ldsa, org.netlib.util.intW info) { //FIXME Add arguments check - dlag2sK(m, n, a, _a_offset, lda, sa, _sa_offset, ldsa, info); + dlag2sK(m, n, a, offseta, lda, sa, offsetsa, ldsa, info); } - protected abstract void dlag2sK(int m, int n, double[] a, int _a_offset, int lda, float[] sa, int _sa_offset, int ldsa, org.netlib.util.intW info); + protected abstract void dlag2sK(int m, int n, double[] a, int offseta, int lda, float[] sa, int offsetsa, int ldsa, org.netlib.util.intW info); public void dlags2(boolean upper, double a1, double a2, double a3, double b1, double b2, double b3, org.netlib.util.doubleW csu, org.netlib.util.doubleW snu, org.netlib.util.doubleW csv, org.netlib.util.doubleW snv, org.netlib.util.doubleW csq, org.netlib.util.doubleW snq) { dlags2K(upper, a1, a2, a3, b1, b2, b3, csu, snu, csv, snv, csq, snq); @@ -1114,89 +1114,89 @@ public void dlagtf(int n, double[] a, double lambda, double[] b, double[] c, dou dlagtf(n, a, 0, lambda, b, 0, c, 0, tol, d, 0, in, 0, info); } - public void dlagtf(int n, double[] a, int _a_offset, double lambda, double[] b, int _b_offset, double[] c, int _c_offset, double tol, double[] d, int _d_offset, int[] in, int _in_offset, org.netlib.util.intW info) { + public void dlagtf(int n, double[] a, int offseta, double lambda, double[] b, int offsetb, double[] c, int offsetc, double tol, double[] d, int offsetd, int[] in, int offsetin, org.netlib.util.intW info) { //FIXME Add arguments check - dlagtfK(n, a, _a_offset, lambda, b, _b_offset, c, _c_offset, tol, d, _d_offset, in, _in_offset, info); + dlagtfK(n, a, offseta, lambda, b, offsetb, c, offsetc, tol, d, offsetd, in, offsetin, info); } - protected abstract void dlagtfK(int n, double[] a, int _a_offset, double lambda, double[] b, int _b_offset, double[] c, int _c_offset, double tol, double[] d, int _d_offset, int[] in, int _in_offset, org.netlib.util.intW info); + protected abstract void dlagtfK(int n, double[] a, int offseta, double lambda, double[] b, int offsetb, double[] c, int offsetc, double tol, double[] d, int offsetd, int[] in, int offsetin, org.netlib.util.intW info); public void dlagtm(String trans, int n, int nrhs, double alpha, double[] dl, double[] d, double[] du, double[] x, int ldx, double beta, double[] b, int ldb) { dlagtm(trans, n, nrhs, alpha, dl, 0, d, 0, du, 0, x, 0, ldx, beta, b, 0, ldb); } - public void dlagtm(String trans, int n, int nrhs, double alpha, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] x, int _x_offset, int ldx, double beta, double[] b, int _b_offset, int ldb) { + public void dlagtm(String trans, int n, int nrhs, double alpha, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] x, int offsetx, int ldx, double beta, double[] b, int offsetb, int ldb) { //FIXME Add arguments check - dlagtmK(trans, n, nrhs, alpha, dl, _dl_offset, d, _d_offset, du, _du_offset, x, _x_offset, ldx, beta, b, _b_offset, ldb); + dlagtmK(trans, n, nrhs, alpha, dl, offsetdl, d, offsetd, du, offsetdu, x, offsetx, ldx, beta, b, offsetb, ldb); } - protected abstract void dlagtmK(String trans, int n, int nrhs, double alpha, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] x, int _x_offset, int ldx, double beta, double[] b, int _b_offset, int ldb); + protected abstract void dlagtmK(String trans, int n, int nrhs, double alpha, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] x, int offsetx, int ldx, double beta, double[] b, int offsetb, int ldb); public void dlagts(int job, int n, double[] a, double[] b, double[] c, double[] d, int[] in, double[] y, org.netlib.util.doubleW tol, org.netlib.util.intW info) { dlagts(job, n, a, 0, b, 0, c, 0, d, 0, in, 0, y, 0, tol, info); } - public void dlagts(int job, int n, double[] a, int _a_offset, double[] b, int _b_offset, double[] c, int _c_offset, double[] d, int _d_offset, int[] in, int _in_offset, double[] y, int _y_offset, org.netlib.util.doubleW tol, org.netlib.util.intW info) { + public void dlagts(int job, int n, double[] a, int offseta, double[] b, int offsetb, double[] c, int offsetc, double[] d, int offsetd, int[] in, int offsetin, double[] y, int offsety, org.netlib.util.doubleW tol, org.netlib.util.intW info) { //FIXME Add arguments check - dlagtsK(job, n, a, _a_offset, b, _b_offset, c, _c_offset, d, _d_offset, in, _in_offset, y, _y_offset, tol, info); + dlagtsK(job, n, a, offseta, b, offsetb, c, offsetc, d, offsetd, in, offsetin, y, offsety, tol, info); } - protected abstract void dlagtsK(int job, int n, double[] a, int _a_offset, double[] b, int _b_offset, double[] c, int _c_offset, double[] d, int _d_offset, int[] in, int _in_offset, double[] y, int _y_offset, org.netlib.util.doubleW tol, org.netlib.util.intW info); + protected abstract void dlagtsK(int job, int n, double[] a, int offseta, double[] b, int offsetb, double[] c, int offsetc, double[] d, int offsetd, int[] in, int offsetin, double[] y, int offsety, org.netlib.util.doubleW tol, org.netlib.util.intW info); public void dlagv2(double[] a, int lda, double[] b, int ldb, double[] alphar, double[] alphai, double[] beta, org.netlib.util.doubleW csl, org.netlib.util.doubleW snl, org.netlib.util.doubleW csr, org.netlib.util.doubleW snr) { dlagv2(a, 0, lda, b, 0, ldb, alphar, 0, alphai, 0, beta, 0, csl, snl, csr, snr); } - public void dlagv2(double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, org.netlib.util.doubleW csl, org.netlib.util.doubleW snl, org.netlib.util.doubleW csr, org.netlib.util.doubleW snr) { + public void dlagv2(double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, org.netlib.util.doubleW csl, org.netlib.util.doubleW snl, org.netlib.util.doubleW csr, org.netlib.util.doubleW snr) { //FIXME Add arguments check - dlagv2K(a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, csl, snl, csr, snr); + dlagv2K(a, offseta, lda, b, offsetb, ldb, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, csl, snl, csr, snr); } - protected abstract void dlagv2K(double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, org.netlib.util.doubleW csl, org.netlib.util.doubleW snl, org.netlib.util.doubleW csr, org.netlib.util.doubleW snr); + protected abstract void dlagv2K(double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, org.netlib.util.doubleW csl, org.netlib.util.doubleW snl, org.netlib.util.doubleW csr, org.netlib.util.doubleW snr); public void dlahqr(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int ldh, double[] wr, double[] wi, int iloz, int ihiz, double[] z, int ldz, org.netlib.util.intW info) { dlahqr(wantt, wantz, n, ilo, ihi, h, 0, ldh, wr, 0, wi, 0, iloz, ihiz, z, 0, ldz, info); } - public void dlahqr(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, int iloz, int ihiz, double[] z, int _z_offset, int ldz, org.netlib.util.intW info) { + public void dlahqr(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int offseth, int ldh, double[] wr, int offsetwr, double[] wi, int offsetwi, int iloz, int ihiz, double[] z, int offsetz, int ldz, org.netlib.util.intW info) { //FIXME Add arguments check - dlahqrK(wantt, wantz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, iloz, ihiz, z, _z_offset, ldz, info); + dlahqrK(wantt, wantz, n, ilo, ihi, h, offseth, ldh, wr, offsetwr, wi, offsetwi, iloz, ihiz, z, offsetz, ldz, info); } - protected abstract void dlahqrK(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, int iloz, int ihiz, double[] z, int _z_offset, int ldz, org.netlib.util.intW info); + protected abstract void dlahqrK(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int offseth, int ldh, double[] wr, int offsetwr, double[] wi, int offsetwi, int iloz, int ihiz, double[] z, int offsetz, int ldz, org.netlib.util.intW info); public void dlahr2(int n, int k, int nb, double[] a, int lda, double[] tau, double[] t, int ldt, double[] y, int ldy) { dlahr2(n, k, nb, a, 0, lda, tau, 0, t, 0, ldt, y, 0, ldy); } - public void dlahr2(int n, int k, int nb, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] t, int _t_offset, int ldt, double[] y, int _y_offset, int ldy) { + public void dlahr2(int n, int k, int nb, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] t, int offsett, int ldt, double[] y, int offsety, int ldy) { //FIXME Add arguments check - dlahr2K(n, k, nb, a, _a_offset, lda, tau, _tau_offset, t, _t_offset, ldt, y, _y_offset, ldy); + dlahr2K(n, k, nb, a, offseta, lda, tau, offsettau, t, offsett, ldt, y, offsety, ldy); } - protected abstract void dlahr2K(int n, int k, int nb, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] t, int _t_offset, int ldt, double[] y, int _y_offset, int ldy); + protected abstract void dlahr2K(int n, int k, int nb, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] t, int offsett, int ldt, double[] y, int offsety, int ldy); public void dlahrd(int n, int k, int nb, double[] a, int lda, double[] tau, double[] t, int ldt, double[] y, int ldy) { dlahrd(n, k, nb, a, 0, lda, tau, 0, t, 0, ldt, y, 0, ldy); } - public void dlahrd(int n, int k, int nb, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] t, int _t_offset, int ldt, double[] y, int _y_offset, int ldy) { + public void dlahrd(int n, int k, int nb, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] t, int offsett, int ldt, double[] y, int offsety, int ldy) { //FIXME Add arguments check - dlahrdK(n, k, nb, a, _a_offset, lda, tau, _tau_offset, t, _t_offset, ldt, y, _y_offset, ldy); + dlahrdK(n, k, nb, a, offseta, lda, tau, offsettau, t, offsett, ldt, y, offsety, ldy); } - protected abstract void dlahrdK(int n, int k, int nb, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] t, int _t_offset, int ldt, double[] y, int _y_offset, int ldy); + protected abstract void dlahrdK(int n, int k, int nb, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] t, int offsett, int ldt, double[] y, int offsety, int ldy); public void dlaic1(int job, int j, double[] x, double sest, double[] w, double gamma, org.netlib.util.doubleW sestpr, org.netlib.util.doubleW s, org.netlib.util.doubleW c) { dlaic1(job, j, x, 0, sest, w, 0, gamma, sestpr, s, c); } - public void dlaic1(int job, int j, double[] x, int _x_offset, double sest, double[] w, int _w_offset, double gamma, org.netlib.util.doubleW sestpr, org.netlib.util.doubleW s, org.netlib.util.doubleW c) { + public void dlaic1(int job, int j, double[] x, int offsetx, double sest, double[] w, int offsetw, double gamma, org.netlib.util.doubleW sestpr, org.netlib.util.doubleW s, org.netlib.util.doubleW c) { //FIXME Add arguments check - dlaic1K(job, j, x, _x_offset, sest, w, _w_offset, gamma, sestpr, s, c); + dlaic1K(job, j, x, offsetx, sest, w, offsetw, gamma, sestpr, s, c); } - protected abstract void dlaic1K(int job, int j, double[] x, int _x_offset, double sest, double[] w, int _w_offset, double gamma, org.netlib.util.doubleW sestpr, org.netlib.util.doubleW s, org.netlib.util.doubleW c); + protected abstract void dlaic1K(int job, int j, double[] x, int offsetx, double sest, double[] w, int offsetw, double gamma, org.netlib.util.doubleW sestpr, org.netlib.util.doubleW s, org.netlib.util.doubleW c); public boolean dlaisnan(double din1, double din2) { return dlaisnanK(din1, din2); @@ -1208,188 +1208,188 @@ public void dlaln2(boolean ltrans, int na, int nw, double smin, double ca, doubl dlaln2(ltrans, na, nw, smin, ca, a, 0, lda, d1, d2, b, 0, ldb, wr, wi, x, 0, ldx, scale, xnorm, info); } - public void dlaln2(boolean ltrans, int na, int nw, double smin, double ca, double[] a, int _a_offset, int lda, double d1, double d2, double[] b, int _b_offset, int ldb, double wr, double wi, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW scale, org.netlib.util.doubleW xnorm, org.netlib.util.intW info) { + public void dlaln2(boolean ltrans, int na, int nw, double smin, double ca, double[] a, int offseta, int lda, double d1, double d2, double[] b, int offsetb, int ldb, double wr, double wi, double[] x, int offsetx, int ldx, org.netlib.util.doubleW scale, org.netlib.util.doubleW xnorm, org.netlib.util.intW info) { //FIXME Add arguments check - dlaln2K(ltrans, na, nw, smin, ca, a, _a_offset, lda, d1, d2, b, _b_offset, ldb, wr, wi, x, _x_offset, ldx, scale, xnorm, info); + dlaln2K(ltrans, na, nw, smin, ca, a, offseta, lda, d1, d2, b, offsetb, ldb, wr, wi, x, offsetx, ldx, scale, xnorm, info); } - protected abstract void dlaln2K(boolean ltrans, int na, int nw, double smin, double ca, double[] a, int _a_offset, int lda, double d1, double d2, double[] b, int _b_offset, int ldb, double wr, double wi, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW scale, org.netlib.util.doubleW xnorm, org.netlib.util.intW info); + protected abstract void dlaln2K(boolean ltrans, int na, int nw, double smin, double ca, double[] a, int offseta, int lda, double d1, double d2, double[] b, int offsetb, int ldb, double wr, double wi, double[] x, int offsetx, int ldx, org.netlib.util.doubleW scale, org.netlib.util.doubleW xnorm, org.netlib.util.intW info); public void dlals0(int icompq, int nl, int nr, int sqre, int nrhs, double[] b, int ldb, double[] bx, int ldbx, int[] perm, int givptr, int[] givcol, int ldgcol, double[] givnum, int ldgnum, double[] poles, double[] difl, double[] difr, double[] z, int k, double c, double s, double[] work, org.netlib.util.intW info) { dlals0(icompq, nl, nr, sqre, nrhs, b, 0, ldb, bx, 0, ldbx, perm, 0, givptr, givcol, 0, ldgcol, givnum, 0, ldgnum, poles, 0, difl, 0, difr, 0, z, 0, k, c, s, work, 0, info); } - public void dlals0(int icompq, int nl, int nr, int sqre, int nrhs, double[] b, int _b_offset, int ldb, double[] bx, int _bx_offset, int ldbx, int[] perm, int _perm_offset, int givptr, int[] givcol, int _givcol_offset, int ldgcol, double[] givnum, int _givnum_offset, int ldgnum, double[] poles, int _poles_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, double[] z, int _z_offset, int k, double c, double s, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dlals0(int icompq, int nl, int nr, int sqre, int nrhs, double[] b, int offsetb, int ldb, double[] bx, int offsetbx, int ldbx, int[] perm, int offsetperm, int givptr, int[] givcol, int offsetgivcol, int ldgcol, double[] givnum, int offsetgivnum, int ldgnum, double[] poles, int offsetpoles, double[] difl, int offsetdifl, double[] difr, int offsetdifr, double[] z, int offsetz, int k, double c, double s, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dlals0K(icompq, nl, nr, sqre, nrhs, b, _b_offset, ldb, bx, _bx_offset, ldbx, perm, _perm_offset, givptr, givcol, _givcol_offset, ldgcol, givnum, _givnum_offset, ldgnum, poles, _poles_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, k, c, s, work, _work_offset, info); + dlals0K(icompq, nl, nr, sqre, nrhs, b, offsetb, ldb, bx, offsetbx, ldbx, perm, offsetperm, givptr, givcol, offsetgivcol, ldgcol, givnum, offsetgivnum, ldgnum, poles, offsetpoles, difl, offsetdifl, difr, offsetdifr, z, offsetz, k, c, s, work, offsetwork, info); } - protected abstract void dlals0K(int icompq, int nl, int nr, int sqre, int nrhs, double[] b, int _b_offset, int ldb, double[] bx, int _bx_offset, int ldbx, int[] perm, int _perm_offset, int givptr, int[] givcol, int _givcol_offset, int ldgcol, double[] givnum, int _givnum_offset, int ldgnum, double[] poles, int _poles_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, double[] z, int _z_offset, int k, double c, double s, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dlals0K(int icompq, int nl, int nr, int sqre, int nrhs, double[] b, int offsetb, int ldb, double[] bx, int offsetbx, int ldbx, int[] perm, int offsetperm, int givptr, int[] givcol, int offsetgivcol, int ldgcol, double[] givnum, int offsetgivnum, int ldgnum, double[] poles, int offsetpoles, double[] difl, int offsetdifl, double[] difr, int offsetdifr, double[] z, int offsetz, int k, double c, double s, double[] work, int offsetwork, org.netlib.util.intW info); public void dlalsa(int icompq, int smlsiz, int n, int nrhs, double[] b, int ldb, double[] bx, int ldbx, double[] u, int ldu, double[] vt, int[] k, double[] difl, double[] difr, double[] z, double[] poles, int[] givptr, int[] givcol, int ldgcol, int[] perm, double[] givnum, double[] c, double[] s, double[] work, int[] iwork, org.netlib.util.intW info) { dlalsa(icompq, smlsiz, n, nrhs, b, 0, ldb, bx, 0, ldbx, u, 0, ldu, vt, 0, k, 0, difl, 0, difr, 0, z, 0, poles, 0, givptr, 0, givcol, 0, ldgcol, perm, 0, givnum, 0, c, 0, s, 0, work, 0, iwork, 0, info); } - public void dlalsa(int icompq, int smlsiz, int n, int nrhs, double[] b, int _b_offset, int ldb, double[] bx, int _bx_offset, int ldbx, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int[] k, int _k_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, double[] z, int _z_offset, double[] poles, int _poles_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, int ldgcol, int[] perm, int _perm_offset, double[] givnum, int _givnum_offset, double[] c, int _c_offset, double[] s, int _s_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dlalsa(int icompq, int smlsiz, int n, int nrhs, double[] b, int offsetb, int ldb, double[] bx, int offsetbx, int ldbx, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int[] k, int offsetk, double[] difl, int offsetdifl, double[] difr, int offsetdifr, double[] z, int offsetz, double[] poles, int offsetpoles, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, int ldgcol, int[] perm, int offsetperm, double[] givnum, int offsetgivnum, double[] c, int offsetc, double[] s, int offsets, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dlalsaK(icompq, smlsiz, n, nrhs, b, _b_offset, ldb, bx, _bx_offset, ldbx, u, _u_offset, ldu, vt, _vt_offset, k, _k_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, poles, _poles_offset, givptr, _givptr_offset, givcol, _givcol_offset, ldgcol, perm, _perm_offset, givnum, _givnum_offset, c, _c_offset, s, _s_offset, work, _work_offset, iwork, _iwork_offset, info); + dlalsaK(icompq, smlsiz, n, nrhs, b, offsetb, ldb, bx, offsetbx, ldbx, u, offsetu, ldu, vt, offsetvt, k, offsetk, difl, offsetdifl, difr, offsetdifr, z, offsetz, poles, offsetpoles, givptr, offsetgivptr, givcol, offsetgivcol, ldgcol, perm, offsetperm, givnum, offsetgivnum, c, offsetc, s, offsets, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dlalsaK(int icompq, int smlsiz, int n, int nrhs, double[] b, int _b_offset, int ldb, double[] bx, int _bx_offset, int ldbx, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int[] k, int _k_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, double[] z, int _z_offset, double[] poles, int _poles_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, int ldgcol, int[] perm, int _perm_offset, double[] givnum, int _givnum_offset, double[] c, int _c_offset, double[] s, int _s_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dlalsaK(int icompq, int smlsiz, int n, int nrhs, double[] b, int offsetb, int ldb, double[] bx, int offsetbx, int ldbx, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int[] k, int offsetk, double[] difl, int offsetdifl, double[] difr, int offsetdifr, double[] z, int offsetz, double[] poles, int offsetpoles, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, int ldgcol, int[] perm, int offsetperm, double[] givnum, int offsetgivnum, double[] c, int offsetc, double[] s, int offsets, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dlalsd(String uplo, int smlsiz, int n, int nrhs, double[] d, double[] e, double[] b, int ldb, double rcond, org.netlib.util.intW rank, double[] work, int[] iwork, org.netlib.util.intW info) { dlalsd(uplo, smlsiz, n, nrhs, d, 0, e, 0, b, 0, ldb, rcond, rank, work, 0, iwork, 0, info); } - public void dlalsd(String uplo, int smlsiz, int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] b, int _b_offset, int ldb, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dlalsd(String uplo, int smlsiz, int n, int nrhs, double[] d, int offsetd, double[] e, int offsete, double[] b, int offsetb, int ldb, double rcond, org.netlib.util.intW rank, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dlalsdK(uplo, smlsiz, n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb, rcond, rank, work, _work_offset, iwork, _iwork_offset, info); + dlalsdK(uplo, smlsiz, n, nrhs, d, offsetd, e, offsete, b, offsetb, ldb, rcond, rank, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dlalsdK(String uplo, int smlsiz, int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] b, int _b_offset, int ldb, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dlalsdK(String uplo, int smlsiz, int n, int nrhs, double[] d, int offsetd, double[] e, int offsete, double[] b, int offsetb, int ldb, double rcond, org.netlib.util.intW rank, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dlamrg(int n1, int n2, double[] a, int dtrd1, int dtrd2, int[] index) { dlamrg(n1, n2, a, 0, dtrd1, dtrd2, index, 0); } - public void dlamrg(int n1, int n2, double[] a, int _a_offset, int dtrd1, int dtrd2, int[] index, int _index_offset) { + public void dlamrg(int n1, int n2, double[] a, int offseta, int dtrd1, int dtrd2, int[] index, int offsetindex) { //FIXME Add arguments check - dlamrgK(n1, n2, a, _a_offset, dtrd1, dtrd2, index, _index_offset); + dlamrgK(n1, n2, a, offseta, dtrd1, dtrd2, index, offsetindex); } - protected abstract void dlamrgK(int n1, int n2, double[] a, int _a_offset, int dtrd1, int dtrd2, int[] index, int _index_offset); + protected abstract void dlamrgK(int n1, int n2, double[] a, int offseta, int dtrd1, int dtrd2, int[] index, int offsetindex); public int dlaneg(int n, double[] d, double[] lld, double sigma, double pivmin, int r) { return dlaneg(n, d, 0, lld, 0, sigma, pivmin, r); } - public int dlaneg(int n, double[] d, int _d_offset, double[] lld, int _lld_offset, double sigma, double pivmin, int r) { + public int dlaneg(int n, double[] d, int offsetd, double[] lld, int offsetlld, double sigma, double pivmin, int r) { //FIXME Add arguments check - return dlanegK(n, d, _d_offset, lld, _lld_offset, sigma, pivmin, r); + return dlanegK(n, d, offsetd, lld, offsetlld, sigma, pivmin, r); } - protected abstract int dlanegK(int n, double[] d, int _d_offset, double[] lld, int _lld_offset, double sigma, double pivmin, int r); + protected abstract int dlanegK(int n, double[] d, int offsetd, double[] lld, int offsetlld, double sigma, double pivmin, int r); public double dlangb(String norm, int n, int kl, int ku, double[] ab, int ldab, double[] work) { return dlangb(norm, n, kl, ku, ab, 0, ldab, work, 0); } - public double dlangb(String norm, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, double[] work, int _work_offset) { + public double dlangb(String norm, int n, int kl, int ku, double[] ab, int offsetab, int ldab, double[] work, int offsetwork) { //FIXME Add arguments check - return dlangbK(norm, n, kl, ku, ab, _ab_offset, ldab, work, _work_offset); + return dlangbK(norm, n, kl, ku, ab, offsetab, ldab, work, offsetwork); } - protected abstract double dlangbK(String norm, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, double[] work, int _work_offset); + protected abstract double dlangbK(String norm, int n, int kl, int ku, double[] ab, int offsetab, int ldab, double[] work, int offsetwork); public double dlange(String norm, int m, int n, double[] a, int lda, double[] work) { return dlange(norm, m, n, a, 0, lda, work, 0); } - public double dlange(String norm, int m, int n, double[] a, int _a_offset, int lda, double[] work, int _work_offset) { + public double dlange(String norm, int m, int n, double[] a, int offseta, int lda, double[] work, int offsetwork) { //FIXME Add arguments check - return dlangeK(norm, m, n, a, _a_offset, lda, work, _work_offset); + return dlangeK(norm, m, n, a, offseta, lda, work, offsetwork); } - protected abstract double dlangeK(String norm, int m, int n, double[] a, int _a_offset, int lda, double[] work, int _work_offset); + protected abstract double dlangeK(String norm, int m, int n, double[] a, int offseta, int lda, double[] work, int offsetwork); public double dlangt(String norm, int n, double[] dl, double[] d, double[] du) { return dlangt(norm, n, dl, 0, d, 0, du, 0); } - public double dlangt(String norm, int n, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset) { + public double dlangt(String norm, int n, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu) { //FIXME Add arguments check - return dlangtK(norm, n, dl, _dl_offset, d, _d_offset, du, _du_offset); + return dlangtK(norm, n, dl, offsetdl, d, offsetd, du, offsetdu); } - protected abstract double dlangtK(String norm, int n, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset); + protected abstract double dlangtK(String norm, int n, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu); public double dlanhs(String norm, int n, double[] a, int lda, double[] work) { return dlanhs(norm, n, a, 0, lda, work, 0); } - public double dlanhs(String norm, int n, double[] a, int _a_offset, int lda, double[] work, int _work_offset) { + public double dlanhs(String norm, int n, double[] a, int offseta, int lda, double[] work, int offsetwork) { //FIXME Add arguments check - return dlanhsK(norm, n, a, _a_offset, lda, work, _work_offset); + return dlanhsK(norm, n, a, offseta, lda, work, offsetwork); } - protected abstract double dlanhsK(String norm, int n, double[] a, int _a_offset, int lda, double[] work, int _work_offset); + protected abstract double dlanhsK(String norm, int n, double[] a, int offseta, int lda, double[] work, int offsetwork); public double dlansb(String norm, String uplo, int n, int k, double[] ab, int ldab, double[] work) { return dlansb(norm, uplo, n, k, ab, 0, ldab, work, 0); } - public double dlansb(String norm, String uplo, int n, int k, double[] ab, int _ab_offset, int ldab, double[] work, int _work_offset) { + public double dlansb(String norm, String uplo, int n, int k, double[] ab, int offsetab, int ldab, double[] work, int offsetwork) { //FIXME Add arguments check - return dlansbK(norm, uplo, n, k, ab, _ab_offset, ldab, work, _work_offset); + return dlansbK(norm, uplo, n, k, ab, offsetab, ldab, work, offsetwork); } - protected abstract double dlansbK(String norm, String uplo, int n, int k, double[] ab, int _ab_offset, int ldab, double[] work, int _work_offset); + protected abstract double dlansbK(String norm, String uplo, int n, int k, double[] ab, int offsetab, int ldab, double[] work, int offsetwork); public double dlansp(String norm, String uplo, int n, double[] ap, double[] work) { return dlansp(norm, uplo, n, ap, 0, work, 0); } - public double dlansp(String norm, String uplo, int n, double[] ap, int _ap_offset, double[] work, int _work_offset) { + public double dlansp(String norm, String uplo, int n, double[] ap, int offsetap, double[] work, int offsetwork) { //FIXME Add arguments check - return dlanspK(norm, uplo, n, ap, _ap_offset, work, _work_offset); + return dlanspK(norm, uplo, n, ap, offsetap, work, offsetwork); } - protected abstract double dlanspK(String norm, String uplo, int n, double[] ap, int _ap_offset, double[] work, int _work_offset); + protected abstract double dlanspK(String norm, String uplo, int n, double[] ap, int offsetap, double[] work, int offsetwork); public double dlanst(String norm, int n, double[] d, double[] e) { return dlanst(norm, n, d, 0, e, 0); } - public double dlanst(String norm, int n, double[] d, int _d_offset, double[] e, int _e_offset) { + public double dlanst(String norm, int n, double[] d, int offsetd, double[] e, int offsete) { //FIXME Add arguments check - return dlanstK(norm, n, d, _d_offset, e, _e_offset); + return dlanstK(norm, n, d, offsetd, e, offsete); } - protected abstract double dlanstK(String norm, int n, double[] d, int _d_offset, double[] e, int _e_offset); + protected abstract double dlanstK(String norm, int n, double[] d, int offsetd, double[] e, int offsete); public double dlansy(String norm, String uplo, int n, double[] a, int lda, double[] work) { return dlansy(norm, uplo, n, a, 0, lda, work, 0); } - public double dlansy(String norm, String uplo, int n, double[] a, int _a_offset, int lda, double[] work, int _work_offset) { + public double dlansy(String norm, String uplo, int n, double[] a, int offseta, int lda, double[] work, int offsetwork) { //FIXME Add arguments check - return dlansyK(norm, uplo, n, a, _a_offset, lda, work, _work_offset); + return dlansyK(norm, uplo, n, a, offseta, lda, work, offsetwork); } - protected abstract double dlansyK(String norm, String uplo, int n, double[] a, int _a_offset, int lda, double[] work, int _work_offset); + protected abstract double dlansyK(String norm, String uplo, int n, double[] a, int offseta, int lda, double[] work, int offsetwork); public double dlantb(String norm, String uplo, String diag, int n, int k, double[] ab, int ldab, double[] work) { return dlantb(norm, uplo, diag, n, k, ab, 0, ldab, work, 0); } - public double dlantb(String norm, String uplo, String diag, int n, int k, double[] ab, int _ab_offset, int ldab, double[] work, int _work_offset) { + public double dlantb(String norm, String uplo, String diag, int n, int k, double[] ab, int offsetab, int ldab, double[] work, int offsetwork) { //FIXME Add arguments check - return dlantbK(norm, uplo, diag, n, k, ab, _ab_offset, ldab, work, _work_offset); + return dlantbK(norm, uplo, diag, n, k, ab, offsetab, ldab, work, offsetwork); } - protected abstract double dlantbK(String norm, String uplo, String diag, int n, int k, double[] ab, int _ab_offset, int ldab, double[] work, int _work_offset); + protected abstract double dlantbK(String norm, String uplo, String diag, int n, int k, double[] ab, int offsetab, int ldab, double[] work, int offsetwork); public double dlantp(String norm, String uplo, String diag, int n, double[] ap, double[] work) { return dlantp(norm, uplo, diag, n, ap, 0, work, 0); } - public double dlantp(String norm, String uplo, String diag, int n, double[] ap, int _ap_offset, double[] work, int _work_offset) { + public double dlantp(String norm, String uplo, String diag, int n, double[] ap, int offsetap, double[] work, int offsetwork) { //FIXME Add arguments check - return dlantpK(norm, uplo, diag, n, ap, _ap_offset, work, _work_offset); + return dlantpK(norm, uplo, diag, n, ap, offsetap, work, offsetwork); } - protected abstract double dlantpK(String norm, String uplo, String diag, int n, double[] ap, int _ap_offset, double[] work, int _work_offset); + protected abstract double dlantpK(String norm, String uplo, String diag, int n, double[] ap, int offsetap, double[] work, int offsetwork); public double dlantr(String norm, String uplo, String diag, int m, int n, double[] a, int lda, double[] work) { return dlantr(norm, uplo, diag, m, n, a, 0, lda, work, 0); } - public double dlantr(String norm, String uplo, String diag, int m, int n, double[] a, int _a_offset, int lda, double[] work, int _work_offset) { + public double dlantr(String norm, String uplo, String diag, int m, int n, double[] a, int offseta, int lda, double[] work, int offsetwork) { //FIXME Add arguments check - return dlantrK(norm, uplo, diag, m, n, a, _a_offset, lda, work, _work_offset); + return dlantrK(norm, uplo, diag, m, n, a, offseta, lda, work, offsetwork); } - protected abstract double dlantrK(String norm, String uplo, String diag, int m, int n, double[] a, int _a_offset, int lda, double[] work, int _work_offset); + protected abstract double dlantrK(String norm, String uplo, String diag, int m, int n, double[] a, int offseta, int lda, double[] work, int offsetwork); public void dlanv2(org.netlib.util.doubleW a, org.netlib.util.doubleW b, org.netlib.util.doubleW c, org.netlib.util.doubleW d, org.netlib.util.doubleW rt1r, org.netlib.util.doubleW rt1i, org.netlib.util.doubleW rt2r, org.netlib.util.doubleW rt2i, org.netlib.util.doubleW cs, org.netlib.util.doubleW sn) { dlanv2K(a, b, c, d, rt1r, rt1i, rt2r, rt2i, cs, sn); @@ -1401,23 +1401,23 @@ public void dlapll(int n, double[] x, int incx, double[] y, int incy, org.netlib dlapll(n, x, 0, incx, y, 0, incy, ssmin); } - public void dlapll(int n, double[] x, int _x_offset, int incx, double[] y, int _y_offset, int incy, org.netlib.util.doubleW ssmin) { + public void dlapll(int n, double[] x, int offsetx, int incx, double[] y, int offsety, int incy, org.netlib.util.doubleW ssmin) { //FIXME Add arguments check - dlapllK(n, x, _x_offset, incx, y, _y_offset, incy, ssmin); + dlapllK(n, x, offsetx, incx, y, offsety, incy, ssmin); } - protected abstract void dlapllK(int n, double[] x, int _x_offset, int incx, double[] y, int _y_offset, int incy, org.netlib.util.doubleW ssmin); + protected abstract void dlapllK(int n, double[] x, int offsetx, int incx, double[] y, int offsety, int incy, org.netlib.util.doubleW ssmin); public void dlapmt(boolean forwrd, int m, int n, double[] x, int ldx, int[] k) { dlapmt(forwrd, m, n, x, 0, ldx, k, 0); } - public void dlapmt(boolean forwrd, int m, int n, double[] x, int _x_offset, int ldx, int[] k, int _k_offset) { + public void dlapmt(boolean forwrd, int m, int n, double[] x, int offsetx, int ldx, int[] k, int offsetk) { //FIXME Add arguments check - dlapmtK(forwrd, m, n, x, _x_offset, ldx, k, _k_offset); + dlapmtK(forwrd, m, n, x, offsetx, ldx, k, offsetk); } - protected abstract void dlapmtK(boolean forwrd, int m, int n, double[] x, int _x_offset, int ldx, int[] k, int _k_offset); + protected abstract void dlapmtK(boolean forwrd, int m, int n, double[] x, int offsetx, int ldx, int[] k, int offsetk); public double dlapy2(double x, double y) { return dlapy2K(x, y); @@ -1435,364 +1435,364 @@ public void dlaqgb(int m, int n, int kl, int ku, double[] ab, int ldab, double[] dlaqgb(m, n, kl, ku, ab, 0, ldab, r, 0, c, 0, rowcnd, colcnd, amax, equed); } - public void dlaqgb(int m, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, double[] r, int _r_offset, double[] c, int _c_offset, double rowcnd, double colcnd, double amax, org.netlib.util.StringW equed) { + public void dlaqgb(int m, int n, int kl, int ku, double[] ab, int offsetab, int ldab, double[] r, int offsetr, double[] c, int offsetc, double rowcnd, double colcnd, double amax, org.netlib.util.StringW equed) { //FIXME Add arguments check - dlaqgbK(m, n, kl, ku, ab, _ab_offset, ldab, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, equed); + dlaqgbK(m, n, kl, ku, ab, offsetab, ldab, r, offsetr, c, offsetc, rowcnd, colcnd, amax, equed); } - protected abstract void dlaqgbK(int m, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, double[] r, int _r_offset, double[] c, int _c_offset, double rowcnd, double colcnd, double amax, org.netlib.util.StringW equed); + protected abstract void dlaqgbK(int m, int n, int kl, int ku, double[] ab, int offsetab, int ldab, double[] r, int offsetr, double[] c, int offsetc, double rowcnd, double colcnd, double amax, org.netlib.util.StringW equed); public void dlaqge(int m, int n, double[] a, int lda, double[] r, double[] c, double rowcnd, double colcnd, double amax, org.netlib.util.StringW equed) { dlaqge(m, n, a, 0, lda, r, 0, c, 0, rowcnd, colcnd, amax, equed); } - public void dlaqge(int m, int n, double[] a, int _a_offset, int lda, double[] r, int _r_offset, double[] c, int _c_offset, double rowcnd, double colcnd, double amax, org.netlib.util.StringW equed) { + public void dlaqge(int m, int n, double[] a, int offseta, int lda, double[] r, int offsetr, double[] c, int offsetc, double rowcnd, double colcnd, double amax, org.netlib.util.StringW equed) { //FIXME Add arguments check - dlaqgeK(m, n, a, _a_offset, lda, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, equed); + dlaqgeK(m, n, a, offseta, lda, r, offsetr, c, offsetc, rowcnd, colcnd, amax, equed); } - protected abstract void dlaqgeK(int m, int n, double[] a, int _a_offset, int lda, double[] r, int _r_offset, double[] c, int _c_offset, double rowcnd, double colcnd, double amax, org.netlib.util.StringW equed); + protected abstract void dlaqgeK(int m, int n, double[] a, int offseta, int lda, double[] r, int offsetr, double[] c, int offsetc, double rowcnd, double colcnd, double amax, org.netlib.util.StringW equed); public void dlaqp2(int m, int n, int offset, double[] a, int lda, int[] jpvt, double[] tau, double[] vn1, double[] vn2, double[] work) { dlaqp2(m, n, offset, a, 0, lda, jpvt, 0, tau, 0, vn1, 0, vn2, 0, work, 0); } - public void dlaqp2(int m, int n, int offset, double[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, double[] tau, int _tau_offset, double[] vn1, int _vn1_offset, double[] vn2, int _vn2_offset, double[] work, int _work_offset) { + public void dlaqp2(int m, int n, int offset, double[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, double[] tau, int offsettau, double[] vn1, int offsetvn1, double[] vn2, int offsetvn2, double[] work, int offsetwork) { //FIXME Add arguments check - dlaqp2K(m, n, offset, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, vn1, _vn1_offset, vn2, _vn2_offset, work, _work_offset); + dlaqp2K(m, n, offset, a, offseta, lda, jpvt, offsetjpvt, tau, offsettau, vn1, offsetvn1, vn2, offsetvn2, work, offsetwork); } - protected abstract void dlaqp2K(int m, int n, int offset, double[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, double[] tau, int _tau_offset, double[] vn1, int _vn1_offset, double[] vn2, int _vn2_offset, double[] work, int _work_offset); + protected abstract void dlaqp2K(int m, int n, int offset, double[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, double[] tau, int offsettau, double[] vn1, int offsetvn1, double[] vn2, int offsetvn2, double[] work, int offsetwork); public void dlaqps(int m, int n, int offset, int nb, org.netlib.util.intW kb, double[] a, int lda, int[] jpvt, double[] tau, double[] vn1, double[] vn2, double[] auxv, double[] f, int ldf) { dlaqps(m, n, offset, nb, kb, a, 0, lda, jpvt, 0, tau, 0, vn1, 0, vn2, 0, auxv, 0, f, 0, ldf); } - public void dlaqps(int m, int n, int offset, int nb, org.netlib.util.intW kb, double[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, double[] tau, int _tau_offset, double[] vn1, int _vn1_offset, double[] vn2, int _vn2_offset, double[] auxv, int _auxv_offset, double[] f, int _f_offset, int ldf) { + public void dlaqps(int m, int n, int offset, int nb, org.netlib.util.intW kb, double[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, double[] tau, int offsettau, double[] vn1, int offsetvn1, double[] vn2, int offsetvn2, double[] auxv, int offsetauxv, double[] f, int offsetf, int ldf) { //FIXME Add arguments check - dlaqpsK(m, n, offset, nb, kb, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, vn1, _vn1_offset, vn2, _vn2_offset, auxv, _auxv_offset, f, _f_offset, ldf); + dlaqpsK(m, n, offset, nb, kb, a, offseta, lda, jpvt, offsetjpvt, tau, offsettau, vn1, offsetvn1, vn2, offsetvn2, auxv, offsetauxv, f, offsetf, ldf); } - protected abstract void dlaqpsK(int m, int n, int offset, int nb, org.netlib.util.intW kb, double[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, double[] tau, int _tau_offset, double[] vn1, int _vn1_offset, double[] vn2, int _vn2_offset, double[] auxv, int _auxv_offset, double[] f, int _f_offset, int ldf); + protected abstract void dlaqpsK(int m, int n, int offset, int nb, org.netlib.util.intW kb, double[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, double[] tau, int offsettau, double[] vn1, int offsetvn1, double[] vn2, int offsetvn2, double[] auxv, int offsetauxv, double[] f, int offsetf, int ldf); public void dlaqr0(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int ldh, double[] wr, double[] wi, int iloz, int ihiz, double[] z, int ldz, double[] work, int lwork, org.netlib.util.intW info) { dlaqr0(wantt, wantz, n, ilo, ihi, h, 0, ldh, wr, 0, wi, 0, iloz, ihiz, z, 0, ldz, work, 0, lwork, info); } - public void dlaqr0(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, int iloz, int ihiz, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dlaqr0(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int offseth, int ldh, double[] wr, int offsetwr, double[] wi, int offsetwi, int iloz, int ihiz, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dlaqr0K(wantt, wantz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, iloz, ihiz, z, _z_offset, ldz, work, _work_offset, lwork, info); + dlaqr0K(wantt, wantz, n, ilo, ihi, h, offseth, ldh, wr, offsetwr, wi, offsetwi, iloz, ihiz, z, offsetz, ldz, work, offsetwork, lwork, info); } - protected abstract void dlaqr0K(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, int iloz, int ihiz, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dlaqr0K(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int offseth, int ldh, double[] wr, int offsetwr, double[] wi, int offsetwi, int iloz, int ihiz, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dlaqr1(int n, double[] h, int ldh, double sr1, double si1, double sr2, double si2, double[] v) { dlaqr1(n, h, 0, ldh, sr1, si1, sr2, si2, v, 0); } - public void dlaqr1(int n, double[] h, int _h_offset, int ldh, double sr1, double si1, double sr2, double si2, double[] v, int _v_offset) { + public void dlaqr1(int n, double[] h, int offseth, int ldh, double sr1, double si1, double sr2, double si2, double[] v, int offsetv) { //FIXME Add arguments check - dlaqr1K(n, h, _h_offset, ldh, sr1, si1, sr2, si2, v, _v_offset); + dlaqr1K(n, h, offseth, ldh, sr1, si1, sr2, si2, v, offsetv); } - protected abstract void dlaqr1K(int n, double[] h, int _h_offset, int ldh, double sr1, double si1, double sr2, double si2, double[] v, int _v_offset); + protected abstract void dlaqr1K(int n, double[] h, int offseth, int ldh, double sr1, double si1, double sr2, double si2, double[] v, int offsetv); public void dlaqr2(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, double[] h, int ldh, int iloz, int ihiz, double[] z, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, double[] sr, double[] si, double[] v, int ldv, int nh, double[] t, int ldt, int nv, double[] wv, int ldwv, double[] work, int lwork) { dlaqr2(wantt, wantz, n, ktop, kbot, nw, h, 0, ldh, iloz, ihiz, z, 0, ldz, ns, nd, sr, 0, si, 0, v, 0, ldv, nh, t, 0, ldt, nv, wv, 0, ldwv, work, 0, lwork); } - public void dlaqr2(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, double[] h, int _h_offset, int ldh, int iloz, int ihiz, double[] z, int _z_offset, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, double[] sr, int _sr_offset, double[] si, int _si_offset, double[] v, int _v_offset, int ldv, int nh, double[] t, int _t_offset, int ldt, int nv, double[] wv, int _wv_offset, int ldwv, double[] work, int _work_offset, int lwork) { + public void dlaqr2(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, double[] h, int offseth, int ldh, int iloz, int ihiz, double[] z, int offsetz, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, double[] sr, int offsetsr, double[] si, int offsetsi, double[] v, int offsetv, int ldv, int nh, double[] t, int offsett, int ldt, int nv, double[] wv, int offsetwv, int ldwv, double[] work, int offsetwork, int lwork) { //FIXME Add arguments check - dlaqr2K(wantt, wantz, n, ktop, kbot, nw, h, _h_offset, ldh, iloz, ihiz, z, _z_offset, ldz, ns, nd, sr, _sr_offset, si, _si_offset, v, _v_offset, ldv, nh, t, _t_offset, ldt, nv, wv, _wv_offset, ldwv, work, _work_offset, lwork); + dlaqr2K(wantt, wantz, n, ktop, kbot, nw, h, offseth, ldh, iloz, ihiz, z, offsetz, ldz, ns, nd, sr, offsetsr, si, offsetsi, v, offsetv, ldv, nh, t, offsett, ldt, nv, wv, offsetwv, ldwv, work, offsetwork, lwork); } - protected abstract void dlaqr2K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, double[] h, int _h_offset, int ldh, int iloz, int ihiz, double[] z, int _z_offset, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, double[] sr, int _sr_offset, double[] si, int _si_offset, double[] v, int _v_offset, int ldv, int nh, double[] t, int _t_offset, int ldt, int nv, double[] wv, int _wv_offset, int ldwv, double[] work, int _work_offset, int lwork); + protected abstract void dlaqr2K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, double[] h, int offseth, int ldh, int iloz, int ihiz, double[] z, int offsetz, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, double[] sr, int offsetsr, double[] si, int offsetsi, double[] v, int offsetv, int ldv, int nh, double[] t, int offsett, int ldt, int nv, double[] wv, int offsetwv, int ldwv, double[] work, int offsetwork, int lwork); public void dlaqr3(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, double[] h, int ldh, int iloz, int ihiz, double[] z, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, double[] sr, double[] si, double[] v, int ldv, int nh, double[] t, int ldt, int nv, double[] wv, int ldwv, double[] work, int lwork) { dlaqr3(wantt, wantz, n, ktop, kbot, nw, h, 0, ldh, iloz, ihiz, z, 0, ldz, ns, nd, sr, 0, si, 0, v, 0, ldv, nh, t, 0, ldt, nv, wv, 0, ldwv, work, 0, lwork); } - public void dlaqr3(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, double[] h, int _h_offset, int ldh, int iloz, int ihiz, double[] z, int _z_offset, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, double[] sr, int _sr_offset, double[] si, int _si_offset, double[] v, int _v_offset, int ldv, int nh, double[] t, int _t_offset, int ldt, int nv, double[] wv, int _wv_offset, int ldwv, double[] work, int _work_offset, int lwork) { + public void dlaqr3(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, double[] h, int offseth, int ldh, int iloz, int ihiz, double[] z, int offsetz, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, double[] sr, int offsetsr, double[] si, int offsetsi, double[] v, int offsetv, int ldv, int nh, double[] t, int offsett, int ldt, int nv, double[] wv, int offsetwv, int ldwv, double[] work, int offsetwork, int lwork) { //FIXME Add arguments check - dlaqr3K(wantt, wantz, n, ktop, kbot, nw, h, _h_offset, ldh, iloz, ihiz, z, _z_offset, ldz, ns, nd, sr, _sr_offset, si, _si_offset, v, _v_offset, ldv, nh, t, _t_offset, ldt, nv, wv, _wv_offset, ldwv, work, _work_offset, lwork); + dlaqr3K(wantt, wantz, n, ktop, kbot, nw, h, offseth, ldh, iloz, ihiz, z, offsetz, ldz, ns, nd, sr, offsetsr, si, offsetsi, v, offsetv, ldv, nh, t, offsett, ldt, nv, wv, offsetwv, ldwv, work, offsetwork, lwork); } - protected abstract void dlaqr3K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, double[] h, int _h_offset, int ldh, int iloz, int ihiz, double[] z, int _z_offset, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, double[] sr, int _sr_offset, double[] si, int _si_offset, double[] v, int _v_offset, int ldv, int nh, double[] t, int _t_offset, int ldt, int nv, double[] wv, int _wv_offset, int ldwv, double[] work, int _work_offset, int lwork); + protected abstract void dlaqr3K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, double[] h, int offseth, int ldh, int iloz, int ihiz, double[] z, int offsetz, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, double[] sr, int offsetsr, double[] si, int offsetsi, double[] v, int offsetv, int ldv, int nh, double[] t, int offsett, int ldt, int nv, double[] wv, int offsetwv, int ldwv, double[] work, int offsetwork, int lwork); public void dlaqr4(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int ldh, double[] wr, double[] wi, int iloz, int ihiz, double[] z, int ldz, double[] work, int lwork, org.netlib.util.intW info) { dlaqr4(wantt, wantz, n, ilo, ihi, h, 0, ldh, wr, 0, wi, 0, iloz, ihiz, z, 0, ldz, work, 0, lwork, info); } - public void dlaqr4(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, int iloz, int ihiz, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dlaqr4(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int offseth, int ldh, double[] wr, int offsetwr, double[] wi, int offsetwi, int iloz, int ihiz, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dlaqr4K(wantt, wantz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, iloz, ihiz, z, _z_offset, ldz, work, _work_offset, lwork, info); + dlaqr4K(wantt, wantz, n, ilo, ihi, h, offseth, ldh, wr, offsetwr, wi, offsetwi, iloz, ihiz, z, offsetz, ldz, work, offsetwork, lwork, info); } - protected abstract void dlaqr4K(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, int iloz, int ihiz, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dlaqr4K(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int offseth, int ldh, double[] wr, int offsetwr, double[] wi, int offsetwi, int iloz, int ihiz, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dlaqr5(boolean wantt, boolean wantz, int kacc22, int n, int ktop, int kbot, int nshfts, double[] sr, double[] si, double[] h, int ldh, int iloz, int ihiz, double[] z, int ldz, double[] v, int ldv, double[] u, int ldu, int nv, double[] wv, int ldwv, int nh, double[] wh, int ldwh) { dlaqr5(wantt, wantz, kacc22, n, ktop, kbot, nshfts, sr, 0, si, 0, h, 0, ldh, iloz, ihiz, z, 0, ldz, v, 0, ldv, u, 0, ldu, nv, wv, 0, ldwv, nh, wh, 0, ldwh); } - public void dlaqr5(boolean wantt, boolean wantz, int kacc22, int n, int ktop, int kbot, int nshfts, double[] sr, int _sr_offset, double[] si, int _si_offset, double[] h, int _h_offset, int ldh, int iloz, int ihiz, double[] z, int _z_offset, int ldz, double[] v, int _v_offset, int ldv, double[] u, int _u_offset, int ldu, int nv, double[] wv, int _wv_offset, int ldwv, int nh, double[] wh, int _wh_offset, int ldwh) { + public void dlaqr5(boolean wantt, boolean wantz, int kacc22, int n, int ktop, int kbot, int nshfts, double[] sr, int offsetsr, double[] si, int offsetsi, double[] h, int offseth, int ldh, int iloz, int ihiz, double[] z, int offsetz, int ldz, double[] v, int offsetv, int ldv, double[] u, int offsetu, int ldu, int nv, double[] wv, int offsetwv, int ldwv, int nh, double[] wh, int offsetwh, int ldwh) { //FIXME Add arguments check - dlaqr5K(wantt, wantz, kacc22, n, ktop, kbot, nshfts, sr, _sr_offset, si, _si_offset, h, _h_offset, ldh, iloz, ihiz, z, _z_offset, ldz, v, _v_offset, ldv, u, _u_offset, ldu, nv, wv, _wv_offset, ldwv, nh, wh, _wh_offset, ldwh); + dlaqr5K(wantt, wantz, kacc22, n, ktop, kbot, nshfts, sr, offsetsr, si, offsetsi, h, offseth, ldh, iloz, ihiz, z, offsetz, ldz, v, offsetv, ldv, u, offsetu, ldu, nv, wv, offsetwv, ldwv, nh, wh, offsetwh, ldwh); } - protected abstract void dlaqr5K(boolean wantt, boolean wantz, int kacc22, int n, int ktop, int kbot, int nshfts, double[] sr, int _sr_offset, double[] si, int _si_offset, double[] h, int _h_offset, int ldh, int iloz, int ihiz, double[] z, int _z_offset, int ldz, double[] v, int _v_offset, int ldv, double[] u, int _u_offset, int ldu, int nv, double[] wv, int _wv_offset, int ldwv, int nh, double[] wh, int _wh_offset, int ldwh); + protected abstract void dlaqr5K(boolean wantt, boolean wantz, int kacc22, int n, int ktop, int kbot, int nshfts, double[] sr, int offsetsr, double[] si, int offsetsi, double[] h, int offseth, int ldh, int iloz, int ihiz, double[] z, int offsetz, int ldz, double[] v, int offsetv, int ldv, double[] u, int offsetu, int ldu, int nv, double[] wv, int offsetwv, int ldwv, int nh, double[] wh, int offsetwh, int ldwh); public void dlaqsb(String uplo, int n, int kd, double[] ab, int ldab, double[] s, double scond, double amax, org.netlib.util.StringW equed) { dlaqsb(uplo, n, kd, ab, 0, ldab, s, 0, scond, amax, equed); } - public void dlaqsb(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] s, int _s_offset, double scond, double amax, org.netlib.util.StringW equed) { + public void dlaqsb(String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double[] s, int offsets, double scond, double amax, org.netlib.util.StringW equed) { //FIXME Add arguments check - dlaqsbK(uplo, n, kd, ab, _ab_offset, ldab, s, _s_offset, scond, amax, equed); + dlaqsbK(uplo, n, kd, ab, offsetab, ldab, s, offsets, scond, amax, equed); } - protected abstract void dlaqsbK(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] s, int _s_offset, double scond, double amax, org.netlib.util.StringW equed); + protected abstract void dlaqsbK(String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double[] s, int offsets, double scond, double amax, org.netlib.util.StringW equed); public void dlaqsp(String uplo, int n, double[] ap, double[] s, double scond, double amax, org.netlib.util.StringW equed) { dlaqsp(uplo, n, ap, 0, s, 0, scond, amax, equed); } - public void dlaqsp(String uplo, int n, double[] ap, int _ap_offset, double[] s, int _s_offset, double scond, double amax, org.netlib.util.StringW equed) { + public void dlaqsp(String uplo, int n, double[] ap, int offsetap, double[] s, int offsets, double scond, double amax, org.netlib.util.StringW equed) { //FIXME Add arguments check - dlaqspK(uplo, n, ap, _ap_offset, s, _s_offset, scond, amax, equed); + dlaqspK(uplo, n, ap, offsetap, s, offsets, scond, amax, equed); } - protected abstract void dlaqspK(String uplo, int n, double[] ap, int _ap_offset, double[] s, int _s_offset, double scond, double amax, org.netlib.util.StringW equed); + protected abstract void dlaqspK(String uplo, int n, double[] ap, int offsetap, double[] s, int offsets, double scond, double amax, org.netlib.util.StringW equed); public void dlaqsy(String uplo, int n, double[] a, int lda, double[] s, double scond, double amax, org.netlib.util.StringW equed) { dlaqsy(uplo, n, a, 0, lda, s, 0, scond, amax, equed); } - public void dlaqsy(String uplo, int n, double[] a, int _a_offset, int lda, double[] s, int _s_offset, double scond, double amax, org.netlib.util.StringW equed) { + public void dlaqsy(String uplo, int n, double[] a, int offseta, int lda, double[] s, int offsets, double scond, double amax, org.netlib.util.StringW equed) { //FIXME Add arguments check - dlaqsyK(uplo, n, a, _a_offset, lda, s, _s_offset, scond, amax, equed); + dlaqsyK(uplo, n, a, offseta, lda, s, offsets, scond, amax, equed); } - protected abstract void dlaqsyK(String uplo, int n, double[] a, int _a_offset, int lda, double[] s, int _s_offset, double scond, double amax, org.netlib.util.StringW equed); + protected abstract void dlaqsyK(String uplo, int n, double[] a, int offseta, int lda, double[] s, int offsets, double scond, double amax, org.netlib.util.StringW equed); public void dlaqtr(boolean ltran, boolean lreal, int n, double[] t, int ldt, double[] b, double w, org.netlib.util.doubleW scale, double[] x, double[] work, org.netlib.util.intW info) { dlaqtr(ltran, lreal, n, t, 0, ldt, b, 0, w, scale, x, 0, work, 0, info); } - public void dlaqtr(boolean ltran, boolean lreal, int n, double[] t, int _t_offset, int ldt, double[] b, int _b_offset, double w, org.netlib.util.doubleW scale, double[] x, int _x_offset, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dlaqtr(boolean ltran, boolean lreal, int n, double[] t, int offsett, int ldt, double[] b, int offsetb, double w, org.netlib.util.doubleW scale, double[] x, int offsetx, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dlaqtrK(ltran, lreal, n, t, _t_offset, ldt, b, _b_offset, w, scale, x, _x_offset, work, _work_offset, info); + dlaqtrK(ltran, lreal, n, t, offsett, ldt, b, offsetb, w, scale, x, offsetx, work, offsetwork, info); } - protected abstract void dlaqtrK(boolean ltran, boolean lreal, int n, double[] t, int _t_offset, int ldt, double[] b, int _b_offset, double w, org.netlib.util.doubleW scale, double[] x, int _x_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dlaqtrK(boolean ltran, boolean lreal, int n, double[] t, int offsett, int ldt, double[] b, int offsetb, double w, org.netlib.util.doubleW scale, double[] x, int offsetx, double[] work, int offsetwork, org.netlib.util.intW info); public void dlar1v(int n, int b1, int bn, double lambda, double[] d, double[] l, double[] ld, double[] lld, double pivmin, double gaptol, double[] z, boolean wantnc, org.netlib.util.intW negcnt, org.netlib.util.doubleW ztz, org.netlib.util.doubleW mingma, org.netlib.util.intW r, int[] isuppz, org.netlib.util.doubleW nrminv, org.netlib.util.doubleW resid, org.netlib.util.doubleW rqcorr, double[] work) { dlar1v(n, b1, bn, lambda, d, 0, l, 0, ld, 0, lld, 0, pivmin, gaptol, z, 0, wantnc, negcnt, ztz, mingma, r, isuppz, 0, nrminv, resid, rqcorr, work, 0); } - public void dlar1v(int n, int b1, int bn, double lambda, double[] d, int _d_offset, double[] l, int _l_offset, double[] ld, int _ld_offset, double[] lld, int _lld_offset, double pivmin, double gaptol, double[] z, int _z_offset, boolean wantnc, org.netlib.util.intW negcnt, org.netlib.util.doubleW ztz, org.netlib.util.doubleW mingma, org.netlib.util.intW r, int[] isuppz, int _isuppz_offset, org.netlib.util.doubleW nrminv, org.netlib.util.doubleW resid, org.netlib.util.doubleW rqcorr, double[] work, int _work_offset) { + public void dlar1v(int n, int b1, int bn, double lambda, double[] d, int offsetd, double[] l, int offsetl, double[] ld, int offsetld, double[] lld, int offsetlld, double pivmin, double gaptol, double[] z, int offsetz, boolean wantnc, org.netlib.util.intW negcnt, org.netlib.util.doubleW ztz, org.netlib.util.doubleW mingma, org.netlib.util.intW r, int[] isuppz, int offsetisuppz, org.netlib.util.doubleW nrminv, org.netlib.util.doubleW resid, org.netlib.util.doubleW rqcorr, double[] work, int offsetwork) { //FIXME Add arguments check - dlar1vK(n, b1, bn, lambda, d, _d_offset, l, _l_offset, ld, _ld_offset, lld, _lld_offset, pivmin, gaptol, z, _z_offset, wantnc, negcnt, ztz, mingma, r, isuppz, _isuppz_offset, nrminv, resid, rqcorr, work, _work_offset); + dlar1vK(n, b1, bn, lambda, d, offsetd, l, offsetl, ld, offsetld, lld, offsetlld, pivmin, gaptol, z, offsetz, wantnc, negcnt, ztz, mingma, r, isuppz, offsetisuppz, nrminv, resid, rqcorr, work, offsetwork); } - protected abstract void dlar1vK(int n, int b1, int bn, double lambda, double[] d, int _d_offset, double[] l, int _l_offset, double[] ld, int _ld_offset, double[] lld, int _lld_offset, double pivmin, double gaptol, double[] z, int _z_offset, boolean wantnc, org.netlib.util.intW negcnt, org.netlib.util.doubleW ztz, org.netlib.util.doubleW mingma, org.netlib.util.intW r, int[] isuppz, int _isuppz_offset, org.netlib.util.doubleW nrminv, org.netlib.util.doubleW resid, org.netlib.util.doubleW rqcorr, double[] work, int _work_offset); + protected abstract void dlar1vK(int n, int b1, int bn, double lambda, double[] d, int offsetd, double[] l, int offsetl, double[] ld, int offsetld, double[] lld, int offsetlld, double pivmin, double gaptol, double[] z, int offsetz, boolean wantnc, org.netlib.util.intW negcnt, org.netlib.util.doubleW ztz, org.netlib.util.doubleW mingma, org.netlib.util.intW r, int[] isuppz, int offsetisuppz, org.netlib.util.doubleW nrminv, org.netlib.util.doubleW resid, org.netlib.util.doubleW rqcorr, double[] work, int offsetwork); public void dlar2v(int n, double[] x, double[] y, double[] z, int incx, double[] c, double[] s, int incc) { dlar2v(n, x, 0, y, 0, z, 0, incx, c, 0, s, 0, incc); } - public void dlar2v(int n, double[] x, int _x_offset, double[] y, int _y_offset, double[] z, int _z_offset, int incx, double[] c, int _c_offset, double[] s, int _s_offset, int incc) { + public void dlar2v(int n, double[] x, int offsetx, double[] y, int offsety, double[] z, int offsetz, int incx, double[] c, int offsetc, double[] s, int offsets, int incc) { //FIXME Add arguments check - dlar2vK(n, x, _x_offset, y, _y_offset, z, _z_offset, incx, c, _c_offset, s, _s_offset, incc); + dlar2vK(n, x, offsetx, y, offsety, z, offsetz, incx, c, offsetc, s, offsets, incc); } - protected abstract void dlar2vK(int n, double[] x, int _x_offset, double[] y, int _y_offset, double[] z, int _z_offset, int incx, double[] c, int _c_offset, double[] s, int _s_offset, int incc); + protected abstract void dlar2vK(int n, double[] x, int offsetx, double[] y, int offsety, double[] z, int offsetz, int incx, double[] c, int offsetc, double[] s, int offsets, int incc); public void dlarf(String side, int m, int n, double[] v, int incv, double tau, double[] c, int Ldc, double[] work) { dlarf(side, m, n, v, 0, incv, tau, c, 0, Ldc, work, 0); } - public void dlarf(String side, int m, int n, double[] v, int _v_offset, int incv, double tau, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset) { + public void dlarf(String side, int m, int n, double[] v, int offsetv, int incv, double tau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork) { //FIXME Add arguments check - dlarfK(side, m, n, v, _v_offset, incv, tau, c, _c_offset, Ldc, work, _work_offset); + dlarfK(side, m, n, v, offsetv, incv, tau, c, offsetc, Ldc, work, offsetwork); } - protected abstract void dlarfK(String side, int m, int n, double[] v, int _v_offset, int incv, double tau, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset); + protected abstract void dlarfK(String side, int m, int n, double[] v, int offsetv, int incv, double tau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork); public void dlarfb(String side, String trans, String direct, String storev, int m, int n, int k, double[] v, int ldv, double[] t, int ldt, double[] c, int Ldc, double[] work, int ldwork) { dlarfb(side, trans, direct, storev, m, n, k, v, 0, ldv, t, 0, ldt, c, 0, Ldc, work, 0, ldwork); } - public void dlarfb(String side, String trans, String direct, String storev, int m, int n, int k, double[] v, int _v_offset, int ldv, double[] t, int _t_offset, int ldt, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int ldwork) { + public void dlarfb(String side, String trans, String direct, String storev, int m, int n, int k, double[] v, int offsetv, int ldv, double[] t, int offsett, int ldt, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int ldwork) { //FIXME Add arguments check - dlarfbK(side, trans, direct, storev, m, n, k, v, _v_offset, ldv, t, _t_offset, ldt, c, _c_offset, Ldc, work, _work_offset, ldwork); + dlarfbK(side, trans, direct, storev, m, n, k, v, offsetv, ldv, t, offsett, ldt, c, offsetc, Ldc, work, offsetwork, ldwork); } - protected abstract void dlarfbK(String side, String trans, String direct, String storev, int m, int n, int k, double[] v, int _v_offset, int ldv, double[] t, int _t_offset, int ldt, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int ldwork); + protected abstract void dlarfbK(String side, String trans, String direct, String storev, int m, int n, int k, double[] v, int offsetv, int ldv, double[] t, int offsett, int ldt, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int ldwork); public void dlarfg(int n, org.netlib.util.doubleW alpha, double[] x, int incx, org.netlib.util.doubleW tau) { dlarfg(n, alpha, x, 0, incx, tau); } - public void dlarfg(int n, org.netlib.util.doubleW alpha, double[] x, int _x_offset, int incx, org.netlib.util.doubleW tau) { + public void dlarfg(int n, org.netlib.util.doubleW alpha, double[] x, int offsetx, int incx, org.netlib.util.doubleW tau) { //FIXME Add arguments check - dlarfgK(n, alpha, x, _x_offset, incx, tau); + dlarfgK(n, alpha, x, offsetx, incx, tau); } - protected abstract void dlarfgK(int n, org.netlib.util.doubleW alpha, double[] x, int _x_offset, int incx, org.netlib.util.doubleW tau); + protected abstract void dlarfgK(int n, org.netlib.util.doubleW alpha, double[] x, int offsetx, int incx, org.netlib.util.doubleW tau); public void dlarft(String direct, String storev, int n, int k, double[] v, int ldv, double[] tau, double[] t, int ldt) { dlarft(direct, storev, n, k, v, 0, ldv, tau, 0, t, 0, ldt); } - public void dlarft(String direct, String storev, int n, int k, double[] v, int _v_offset, int ldv, double[] tau, int _tau_offset, double[] t, int _t_offset, int ldt) { + public void dlarft(String direct, String storev, int n, int k, double[] v, int offsetv, int ldv, double[] tau, int offsettau, double[] t, int offsett, int ldt) { //FIXME Add arguments check - dlarftK(direct, storev, n, k, v, _v_offset, ldv, tau, _tau_offset, t, _t_offset, ldt); + dlarftK(direct, storev, n, k, v, offsetv, ldv, tau, offsettau, t, offsett, ldt); } - protected abstract void dlarftK(String direct, String storev, int n, int k, double[] v, int _v_offset, int ldv, double[] tau, int _tau_offset, double[] t, int _t_offset, int ldt); + protected abstract void dlarftK(String direct, String storev, int n, int k, double[] v, int offsetv, int ldv, double[] tau, int offsettau, double[] t, int offsett, int ldt); public void dlarfx(String side, int m, int n, double[] v, double tau, double[] c, int Ldc, double[] work) { dlarfx(side, m, n, v, 0, tau, c, 0, Ldc, work, 0); } - public void dlarfx(String side, int m, int n, double[] v, int _v_offset, double tau, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset) { + public void dlarfx(String side, int m, int n, double[] v, int offsetv, double tau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork) { //FIXME Add arguments check - dlarfxK(side, m, n, v, _v_offset, tau, c, _c_offset, Ldc, work, _work_offset); + dlarfxK(side, m, n, v, offsetv, tau, c, offsetc, Ldc, work, offsetwork); } - protected abstract void dlarfxK(String side, int m, int n, double[] v, int _v_offset, double tau, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset); + protected abstract void dlarfxK(String side, int m, int n, double[] v, int offsetv, double tau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork); public void dlargv(int n, double[] x, int incx, double[] y, int incy, double[] c, int incc) { dlargv(n, x, 0, incx, y, 0, incy, c, 0, incc); } - public void dlargv(int n, double[] x, int _x_offset, int incx, double[] y, int _y_offset, int incy, double[] c, int _c_offset, int incc) { + public void dlargv(int n, double[] x, int offsetx, int incx, double[] y, int offsety, int incy, double[] c, int offsetc, int incc) { //FIXME Add arguments check - dlargvK(n, x, _x_offset, incx, y, _y_offset, incy, c, _c_offset, incc); + dlargvK(n, x, offsetx, incx, y, offsety, incy, c, offsetc, incc); } - protected abstract void dlargvK(int n, double[] x, int _x_offset, int incx, double[] y, int _y_offset, int incy, double[] c, int _c_offset, int incc); + protected abstract void dlargvK(int n, double[] x, int offsetx, int incx, double[] y, int offsety, int incy, double[] c, int offsetc, int incc); public void dlarnv(int idist, int[] iseed, int n, double[] x) { dlarnv(idist, iseed, 0, n, x, 0); } - public void dlarnv(int idist, int[] iseed, int _iseed_offset, int n, double[] x, int _x_offset) { + public void dlarnv(int idist, int[] iseed, int offsetiseed, int n, double[] x, int offsetx) { //FIXME Add arguments check - dlarnvK(idist, iseed, _iseed_offset, n, x, _x_offset); + dlarnvK(idist, iseed, offsetiseed, n, x, offsetx); } - protected abstract void dlarnvK(int idist, int[] iseed, int _iseed_offset, int n, double[] x, int _x_offset); + protected abstract void dlarnvK(int idist, int[] iseed, int offsetiseed, int n, double[] x, int offsetx); public void dlarra(int n, double[] d, double[] e, double[] e2, double spltol, double tnrm, org.netlib.util.intW nsplit, int[] isplit, org.netlib.util.intW info) { dlarra(n, d, 0, e, 0, e2, 0, spltol, tnrm, nsplit, isplit, 0, info); } - public void dlarra(int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] e2, int _e2_offset, double spltol, double tnrm, org.netlib.util.intW nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW info) { + public void dlarra(int n, double[] d, int offsetd, double[] e, int offsete, double[] e2, int offsete2, double spltol, double tnrm, org.netlib.util.intW nsplit, int[] isplit, int offsetisplit, org.netlib.util.intW info) { //FIXME Add arguments check - dlarraK(n, d, _d_offset, e, _e_offset, e2, _e2_offset, spltol, tnrm, nsplit, isplit, _isplit_offset, info); + dlarraK(n, d, offsetd, e, offsete, e2, offsete2, spltol, tnrm, nsplit, isplit, offsetisplit, info); } - protected abstract void dlarraK(int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] e2, int _e2_offset, double spltol, double tnrm, org.netlib.util.intW nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW info); + protected abstract void dlarraK(int n, double[] d, int offsetd, double[] e, int offsete, double[] e2, int offsete2, double spltol, double tnrm, org.netlib.util.intW nsplit, int[] isplit, int offsetisplit, org.netlib.util.intW info); public void dlarrb(int n, double[] d, double[] lld, int ifirst, int ilast, double rtol1, double rtol2, int offset, double[] w, double[] wgap, double[] werr, double[] work, int[] iwork, double pivmin, double spdiam, int twist, org.netlib.util.intW info) { dlarrb(n, d, 0, lld, 0, ifirst, ilast, rtol1, rtol2, offset, w, 0, wgap, 0, werr, 0, work, 0, iwork, 0, pivmin, spdiam, twist, info); } - public void dlarrb(int n, double[] d, int _d_offset, double[] lld, int _lld_offset, int ifirst, int ilast, double rtol1, double rtol2, int offset, double[] w, int _w_offset, double[] wgap, int _wgap_offset, double[] werr, int _werr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, double pivmin, double spdiam, int twist, org.netlib.util.intW info) { + public void dlarrb(int n, double[] d, int offsetd, double[] lld, int offsetlld, int ifirst, int ilast, double rtol1, double rtol2, int offset, double[] w, int offsetw, double[] wgap, int offsetwgap, double[] werr, int offsetwerr, double[] work, int offsetwork, int[] iwork, int offsetiwork, double pivmin, double spdiam, int twist, org.netlib.util.intW info) { //FIXME Add arguments check - dlarrbK(n, d, _d_offset, lld, _lld_offset, ifirst, ilast, rtol1, rtol2, offset, w, _w_offset, wgap, _wgap_offset, werr, _werr_offset, work, _work_offset, iwork, _iwork_offset, pivmin, spdiam, twist, info); + dlarrbK(n, d, offsetd, lld, offsetlld, ifirst, ilast, rtol1, rtol2, offset, w, offsetw, wgap, offsetwgap, werr, offsetwerr, work, offsetwork, iwork, offsetiwork, pivmin, spdiam, twist, info); } - protected abstract void dlarrbK(int n, double[] d, int _d_offset, double[] lld, int _lld_offset, int ifirst, int ilast, double rtol1, double rtol2, int offset, double[] w, int _w_offset, double[] wgap, int _wgap_offset, double[] werr, int _werr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, double pivmin, double spdiam, int twist, org.netlib.util.intW info); + protected abstract void dlarrbK(int n, double[] d, int offsetd, double[] lld, int offsetlld, int ifirst, int ilast, double rtol1, double rtol2, int offset, double[] w, int offsetw, double[] wgap, int offsetwgap, double[] werr, int offsetwerr, double[] work, int offsetwork, int[] iwork, int offsetiwork, double pivmin, double spdiam, int twist, org.netlib.util.intW info); public void dlarrc(String jobt, int n, double vl, double vu, double[] d, double[] e, double pivmin, org.netlib.util.intW eigcnt, org.netlib.util.intW lcnt, org.netlib.util.intW rcnt, org.netlib.util.intW info) { dlarrc(jobt, n, vl, vu, d, 0, e, 0, pivmin, eigcnt, lcnt, rcnt, info); } - public void dlarrc(String jobt, int n, double vl, double vu, double[] d, int _d_offset, double[] e, int _e_offset, double pivmin, org.netlib.util.intW eigcnt, org.netlib.util.intW lcnt, org.netlib.util.intW rcnt, org.netlib.util.intW info) { + public void dlarrc(String jobt, int n, double vl, double vu, double[] d, int offsetd, double[] e, int offsete, double pivmin, org.netlib.util.intW eigcnt, org.netlib.util.intW lcnt, org.netlib.util.intW rcnt, org.netlib.util.intW info) { //FIXME Add arguments check - dlarrcK(jobt, n, vl, vu, d, _d_offset, e, _e_offset, pivmin, eigcnt, lcnt, rcnt, info); + dlarrcK(jobt, n, vl, vu, d, offsetd, e, offsete, pivmin, eigcnt, lcnt, rcnt, info); } - protected abstract void dlarrcK(String jobt, int n, double vl, double vu, double[] d, int _d_offset, double[] e, int _e_offset, double pivmin, org.netlib.util.intW eigcnt, org.netlib.util.intW lcnt, org.netlib.util.intW rcnt, org.netlib.util.intW info); + protected abstract void dlarrcK(String jobt, int n, double vl, double vu, double[] d, int offsetd, double[] e, int offsete, double pivmin, org.netlib.util.intW eigcnt, org.netlib.util.intW lcnt, org.netlib.util.intW rcnt, org.netlib.util.intW info); public void dlarrd(String range, String order, int n, double vl, double vu, int il, int iu, double[] gers, double reltol, double[] d, double[] e, double[] e2, double pivmin, int nsplit, int[] isplit, org.netlib.util.intW m, double[] w, double[] werr, org.netlib.util.doubleW wl, org.netlib.util.doubleW wu, int[] iblock, int[] indexw, double[] work, int[] iwork, org.netlib.util.intW info) { dlarrd(range, order, n, vl, vu, il, iu, gers, 0, reltol, d, 0, e, 0, e2, 0, pivmin, nsplit, isplit, 0, m, w, 0, werr, 0, wl, wu, iblock, 0, indexw, 0, work, 0, iwork, 0, info); } - public void dlarrd(String range, String order, int n, double vl, double vu, int il, int iu, double[] gers, int _gers_offset, double reltol, double[] d, int _d_offset, double[] e, int _e_offset, double[] e2, int _e2_offset, double pivmin, int nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW m, double[] w, int _w_offset, double[] werr, int _werr_offset, org.netlib.util.doubleW wl, org.netlib.util.doubleW wu, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dlarrd(String range, String order, int n, double vl, double vu, int il, int iu, double[] gers, int offsetgers, double reltol, double[] d, int offsetd, double[] e, int offsete, double[] e2, int offsete2, double pivmin, int nsplit, int[] isplit, int offsetisplit, org.netlib.util.intW m, double[] w, int offsetw, double[] werr, int offsetwerr, org.netlib.util.doubleW wl, org.netlib.util.doubleW wu, int[] iblock, int offsetiblock, int[] indexw, int offsetindexw, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dlarrdK(range, order, n, vl, vu, il, iu, gers, _gers_offset, reltol, d, _d_offset, e, _e_offset, e2, _e2_offset, pivmin, nsplit, isplit, _isplit_offset, m, w, _w_offset, werr, _werr_offset, wl, wu, iblock, _iblock_offset, indexw, _indexw_offset, work, _work_offset, iwork, _iwork_offset, info); + dlarrdK(range, order, n, vl, vu, il, iu, gers, offsetgers, reltol, d, offsetd, e, offsete, e2, offsete2, pivmin, nsplit, isplit, offsetisplit, m, w, offsetw, werr, offsetwerr, wl, wu, iblock, offsetiblock, indexw, offsetindexw, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dlarrdK(String range, String order, int n, double vl, double vu, int il, int iu, double[] gers, int _gers_offset, double reltol, double[] d, int _d_offset, double[] e, int _e_offset, double[] e2, int _e2_offset, double pivmin, int nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW m, double[] w, int _w_offset, double[] werr, int _werr_offset, org.netlib.util.doubleW wl, org.netlib.util.doubleW wu, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dlarrdK(String range, String order, int n, double vl, double vu, int il, int iu, double[] gers, int offsetgers, double reltol, double[] d, int offsetd, double[] e, int offsete, double[] e2, int offsete2, double pivmin, int nsplit, int[] isplit, int offsetisplit, org.netlib.util.intW m, double[] w, int offsetw, double[] werr, int offsetwerr, org.netlib.util.doubleW wl, org.netlib.util.doubleW wu, int[] iblock, int offsetiblock, int[] indexw, int offsetindexw, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dlarre(String range, int n, org.netlib.util.doubleW vl, org.netlib.util.doubleW vu, int il, int iu, double[] d, double[] e, double[] e2, double rtol1, double rtol2, double spltol, org.netlib.util.intW nsplit, int[] isplit, org.netlib.util.intW m, double[] w, double[] werr, double[] wgap, int[] iblock, int[] indexw, double[] gers, org.netlib.util.doubleW pivmin, double[] work, int[] iwork, org.netlib.util.intW info) { dlarre(range, n, vl, vu, il, iu, d, 0, e, 0, e2, 0, rtol1, rtol2, spltol, nsplit, isplit, 0, m, w, 0, werr, 0, wgap, 0, iblock, 0, indexw, 0, gers, 0, pivmin, work, 0, iwork, 0, info); } - public void dlarre(String range, int n, org.netlib.util.doubleW vl, org.netlib.util.doubleW vu, int il, int iu, double[] d, int _d_offset, double[] e, int _e_offset, double[] e2, int _e2_offset, double rtol1, double rtol2, double spltol, org.netlib.util.intW nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW m, double[] w, int _w_offset, double[] werr, int _werr_offset, double[] wgap, int _wgap_offset, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, double[] gers, int _gers_offset, org.netlib.util.doubleW pivmin, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dlarre(String range, int n, org.netlib.util.doubleW vl, org.netlib.util.doubleW vu, int il, int iu, double[] d, int offsetd, double[] e, int offsete, double[] e2, int offsete2, double rtol1, double rtol2, double spltol, org.netlib.util.intW nsplit, int[] isplit, int offsetisplit, org.netlib.util.intW m, double[] w, int offsetw, double[] werr, int offsetwerr, double[] wgap, int offsetwgap, int[] iblock, int offsetiblock, int[] indexw, int offsetindexw, double[] gers, int offsetgers, org.netlib.util.doubleW pivmin, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dlarreK(range, n, vl, vu, il, iu, d, _d_offset, e, _e_offset, e2, _e2_offset, rtol1, rtol2, spltol, nsplit, isplit, _isplit_offset, m, w, _w_offset, werr, _werr_offset, wgap, _wgap_offset, iblock, _iblock_offset, indexw, _indexw_offset, gers, _gers_offset, pivmin, work, _work_offset, iwork, _iwork_offset, info); + dlarreK(range, n, vl, vu, il, iu, d, offsetd, e, offsete, e2, offsete2, rtol1, rtol2, spltol, nsplit, isplit, offsetisplit, m, w, offsetw, werr, offsetwerr, wgap, offsetwgap, iblock, offsetiblock, indexw, offsetindexw, gers, offsetgers, pivmin, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dlarreK(String range, int n, org.netlib.util.doubleW vl, org.netlib.util.doubleW vu, int il, int iu, double[] d, int _d_offset, double[] e, int _e_offset, double[] e2, int _e2_offset, double rtol1, double rtol2, double spltol, org.netlib.util.intW nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW m, double[] w, int _w_offset, double[] werr, int _werr_offset, double[] wgap, int _wgap_offset, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, double[] gers, int _gers_offset, org.netlib.util.doubleW pivmin, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dlarreK(String range, int n, org.netlib.util.doubleW vl, org.netlib.util.doubleW vu, int il, int iu, double[] d, int offsetd, double[] e, int offsete, double[] e2, int offsete2, double rtol1, double rtol2, double spltol, org.netlib.util.intW nsplit, int[] isplit, int offsetisplit, org.netlib.util.intW m, double[] w, int offsetw, double[] werr, int offsetwerr, double[] wgap, int offsetwgap, int[] iblock, int offsetiblock, int[] indexw, int offsetindexw, double[] gers, int offsetgers, org.netlib.util.doubleW pivmin, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dlarrf(int n, double[] d, double[] l, double[] ld, int clstrt, int clend, double[] w, double[] wgap, double[] werr, double spdiam, double clgapl, double clgapr, double pivmin, org.netlib.util.doubleW sigma, double[] dplus, double[] lplus, double[] work, org.netlib.util.intW info) { dlarrf(n, d, 0, l, 0, ld, 0, clstrt, clend, w, 0, wgap, 0, werr, 0, spdiam, clgapl, clgapr, pivmin, sigma, dplus, 0, lplus, 0, work, 0, info); } - public void dlarrf(int n, double[] d, int _d_offset, double[] l, int _l_offset, double[] ld, int _ld_offset, int clstrt, int clend, double[] w, int _w_offset, double[] wgap, int _wgap_offset, double[] werr, int _werr_offset, double spdiam, double clgapl, double clgapr, double pivmin, org.netlib.util.doubleW sigma, double[] dplus, int _dplus_offset, double[] lplus, int _lplus_offset, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dlarrf(int n, double[] d, int offsetd, double[] l, int offsetl, double[] ld, int offsetld, int clstrt, int clend, double[] w, int offsetw, double[] wgap, int offsetwgap, double[] werr, int offsetwerr, double spdiam, double clgapl, double clgapr, double pivmin, org.netlib.util.doubleW sigma, double[] dplus, int offsetdplus, double[] lplus, int offsetlplus, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dlarrfK(n, d, _d_offset, l, _l_offset, ld, _ld_offset, clstrt, clend, w, _w_offset, wgap, _wgap_offset, werr, _werr_offset, spdiam, clgapl, clgapr, pivmin, sigma, dplus, _dplus_offset, lplus, _lplus_offset, work, _work_offset, info); + dlarrfK(n, d, offsetd, l, offsetl, ld, offsetld, clstrt, clend, w, offsetw, wgap, offsetwgap, werr, offsetwerr, spdiam, clgapl, clgapr, pivmin, sigma, dplus, offsetdplus, lplus, offsetlplus, work, offsetwork, info); } - protected abstract void dlarrfK(int n, double[] d, int _d_offset, double[] l, int _l_offset, double[] ld, int _ld_offset, int clstrt, int clend, double[] w, int _w_offset, double[] wgap, int _wgap_offset, double[] werr, int _werr_offset, double spdiam, double clgapl, double clgapr, double pivmin, org.netlib.util.doubleW sigma, double[] dplus, int _dplus_offset, double[] lplus, int _lplus_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dlarrfK(int n, double[] d, int offsetd, double[] l, int offsetl, double[] ld, int offsetld, int clstrt, int clend, double[] w, int offsetw, double[] wgap, int offsetwgap, double[] werr, int offsetwerr, double spdiam, double clgapl, double clgapr, double pivmin, org.netlib.util.doubleW sigma, double[] dplus, int offsetdplus, double[] lplus, int offsetlplus, double[] work, int offsetwork, org.netlib.util.intW info); public void dlarrj(int n, double[] d, double[] e2, int ifirst, int ilast, double rtol, int offset, double[] w, double[] werr, double[] work, int[] iwork, double pivmin, double spdiam, org.netlib.util.intW info) { dlarrj(n, d, 0, e2, 0, ifirst, ilast, rtol, offset, w, 0, werr, 0, work, 0, iwork, 0, pivmin, spdiam, info); } - public void dlarrj(int n, double[] d, int _d_offset, double[] e2, int _e2_offset, int ifirst, int ilast, double rtol, int offset, double[] w, int _w_offset, double[] werr, int _werr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, double pivmin, double spdiam, org.netlib.util.intW info) { + public void dlarrj(int n, double[] d, int offsetd, double[] e2, int offsete2, int ifirst, int ilast, double rtol, int offset, double[] w, int offsetw, double[] werr, int offsetwerr, double[] work, int offsetwork, int[] iwork, int offsetiwork, double pivmin, double spdiam, org.netlib.util.intW info) { //FIXME Add arguments check - dlarrjK(n, d, _d_offset, e2, _e2_offset, ifirst, ilast, rtol, offset, w, _w_offset, werr, _werr_offset, work, _work_offset, iwork, _iwork_offset, pivmin, spdiam, info); + dlarrjK(n, d, offsetd, e2, offsete2, ifirst, ilast, rtol, offset, w, offsetw, werr, offsetwerr, work, offsetwork, iwork, offsetiwork, pivmin, spdiam, info); } - protected abstract void dlarrjK(int n, double[] d, int _d_offset, double[] e2, int _e2_offset, int ifirst, int ilast, double rtol, int offset, double[] w, int _w_offset, double[] werr, int _werr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, double pivmin, double spdiam, org.netlib.util.intW info); + protected abstract void dlarrjK(int n, double[] d, int offsetd, double[] e2, int offsete2, int ifirst, int ilast, double rtol, int offset, double[] w, int offsetw, double[] werr, int offsetwerr, double[] work, int offsetwork, int[] iwork, int offsetiwork, double pivmin, double spdiam, org.netlib.util.intW info); public void dlarrk(int n, int iw, double gl, double gu, double[] d, double[] e2, double pivmin, double reltol, org.netlib.util.doubleW w, org.netlib.util.doubleW werr, org.netlib.util.intW info) { dlarrk(n, iw, gl, gu, d, 0, e2, 0, pivmin, reltol, w, werr, info); } - public void dlarrk(int n, int iw, double gl, double gu, double[] d, int _d_offset, double[] e2, int _e2_offset, double pivmin, double reltol, org.netlib.util.doubleW w, org.netlib.util.doubleW werr, org.netlib.util.intW info) { + public void dlarrk(int n, int iw, double gl, double gu, double[] d, int offsetd, double[] e2, int offsete2, double pivmin, double reltol, org.netlib.util.doubleW w, org.netlib.util.doubleW werr, org.netlib.util.intW info) { //FIXME Add arguments check - dlarrkK(n, iw, gl, gu, d, _d_offset, e2, _e2_offset, pivmin, reltol, w, werr, info); + dlarrkK(n, iw, gl, gu, d, offsetd, e2, offsete2, pivmin, reltol, w, werr, info); } - protected abstract void dlarrkK(int n, int iw, double gl, double gu, double[] d, int _d_offset, double[] e2, int _e2_offset, double pivmin, double reltol, org.netlib.util.doubleW w, org.netlib.util.doubleW werr, org.netlib.util.intW info); + protected abstract void dlarrkK(int n, int iw, double gl, double gu, double[] d, int offsetd, double[] e2, int offsete2, double pivmin, double reltol, org.netlib.util.doubleW w, org.netlib.util.doubleW werr, org.netlib.util.intW info); public void dlarrr(int n, double[] d, double[] e, org.netlib.util.intW info) { dlarrr(n, d, 0, e, 0, info); } - public void dlarrr(int n, double[] d, int _d_offset, double[] e, int _e_offset, org.netlib.util.intW info) { + public void dlarrr(int n, double[] d, int offsetd, double[] e, int offsete, org.netlib.util.intW info) { //FIXME Add arguments check - dlarrrK(n, d, _d_offset, e, _e_offset, info); + dlarrrK(n, d, offsetd, e, offsete, info); } - protected abstract void dlarrrK(int n, double[] d, int _d_offset, double[] e, int _e_offset, org.netlib.util.intW info); + protected abstract void dlarrrK(int n, double[] d, int offsetd, double[] e, int offsete, org.netlib.util.intW info); public void dlarrv(int n, double vl, double vu, double[] d, double[] l, double pivmin, int[] isplit, int m, int dol, int dou, double minrgp, org.netlib.util.doubleW rtol1, org.netlib.util.doubleW rtol2, double[] w, double[] werr, double[] wgap, int[] iblock, int[] indexw, double[] gers, double[] z, int ldz, int[] isuppz, double[] work, int[] iwork, org.netlib.util.intW info) { dlarrv(n, vl, vu, d, 0, l, 0, pivmin, isplit, 0, m, dol, dou, minrgp, rtol1, rtol2, w, 0, werr, 0, wgap, 0, iblock, 0, indexw, 0, gers, 0, z, 0, ldz, isuppz, 0, work, 0, iwork, 0, info); } - public void dlarrv(int n, double vl, double vu, double[] d, int _d_offset, double[] l, int _l_offset, double pivmin, int[] isplit, int _isplit_offset, int m, int dol, int dou, double minrgp, org.netlib.util.doubleW rtol1, org.netlib.util.doubleW rtol2, double[] w, int _w_offset, double[] werr, int _werr_offset, double[] wgap, int _wgap_offset, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, double[] gers, int _gers_offset, double[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dlarrv(int n, double vl, double vu, double[] d, int offsetd, double[] l, int offsetl, double pivmin, int[] isplit, int offsetisplit, int m, int dol, int dou, double minrgp, org.netlib.util.doubleW rtol1, org.netlib.util.doubleW rtol2, double[] w, int offsetw, double[] werr, int offsetwerr, double[] wgap, int offsetwgap, int[] iblock, int offsetiblock, int[] indexw, int offsetindexw, double[] gers, int offsetgers, double[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dlarrvK(n, vl, vu, d, _d_offset, l, _l_offset, pivmin, isplit, _isplit_offset, m, dol, dou, minrgp, rtol1, rtol2, w, _w_offset, werr, _werr_offset, wgap, _wgap_offset, iblock, _iblock_offset, indexw, _indexw_offset, gers, _gers_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, iwork, _iwork_offset, info); + dlarrvK(n, vl, vu, d, offsetd, l, offsetl, pivmin, isplit, offsetisplit, m, dol, dou, minrgp, rtol1, rtol2, w, offsetw, werr, offsetwerr, wgap, offsetwgap, iblock, offsetiblock, indexw, offsetindexw, gers, offsetgers, z, offsetz, ldz, isuppz, offsetisuppz, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dlarrvK(int n, double vl, double vu, double[] d, int _d_offset, double[] l, int _l_offset, double pivmin, int[] isplit, int _isplit_offset, int m, int dol, int dou, double minrgp, org.netlib.util.doubleW rtol1, org.netlib.util.doubleW rtol2, double[] w, int _w_offset, double[] werr, int _werr_offset, double[] wgap, int _wgap_offset, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, double[] gers, int _gers_offset, double[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dlarrvK(int n, double vl, double vu, double[] d, int offsetd, double[] l, int offsetl, double pivmin, int[] isplit, int offsetisplit, int m, int dol, int dou, double minrgp, org.netlib.util.doubleW rtol1, org.netlib.util.doubleW rtol2, double[] w, int offsetw, double[] werr, int offsetwerr, double[] wgap, int offsetwgap, int[] iblock, int offsetiblock, int[] indexw, int offsetindexw, double[] gers, int offsetgers, double[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dlartg(double f, double g, org.netlib.util.doubleW cs, org.netlib.util.doubleW sn, org.netlib.util.doubleW r) { dlartgK(f, g, cs, sn, r); @@ -1804,56 +1804,56 @@ public void dlartv(int n, double[] x, int incx, double[] y, int incy, double[] c dlartv(n, x, 0, incx, y, 0, incy, c, 0, s, 0, incc); } - public void dlartv(int n, double[] x, int _x_offset, int incx, double[] y, int _y_offset, int incy, double[] c, int _c_offset, double[] s, int _s_offset, int incc) { + public void dlartv(int n, double[] x, int offsetx, int incx, double[] y, int offsety, int incy, double[] c, int offsetc, double[] s, int offsets, int incc) { //FIXME Add arguments check - dlartvK(n, x, _x_offset, incx, y, _y_offset, incy, c, _c_offset, s, _s_offset, incc); + dlartvK(n, x, offsetx, incx, y, offsety, incy, c, offsetc, s, offsets, incc); } - protected abstract void dlartvK(int n, double[] x, int _x_offset, int incx, double[] y, int _y_offset, int incy, double[] c, int _c_offset, double[] s, int _s_offset, int incc); + protected abstract void dlartvK(int n, double[] x, int offsetx, int incx, double[] y, int offsety, int incy, double[] c, int offsetc, double[] s, int offsets, int incc); public void dlaruv(int[] iseed, int n, double[] x) { dlaruv(iseed, 0, n, x, 0); } - public void dlaruv(int[] iseed, int _iseed_offset, int n, double[] x, int _x_offset) { + public void dlaruv(int[] iseed, int offsetiseed, int n, double[] x, int offsetx) { //FIXME Add arguments check - dlaruvK(iseed, _iseed_offset, n, x, _x_offset); + dlaruvK(iseed, offsetiseed, n, x, offsetx); } - protected abstract void dlaruvK(int[] iseed, int _iseed_offset, int n, double[] x, int _x_offset); + protected abstract void dlaruvK(int[] iseed, int offsetiseed, int n, double[] x, int offsetx); public void dlarz(String side, int m, int n, int l, double[] v, int incv, double tau, double[] c, int Ldc, double[] work) { dlarz(side, m, n, l, v, 0, incv, tau, c, 0, Ldc, work, 0); } - public void dlarz(String side, int m, int n, int l, double[] v, int _v_offset, int incv, double tau, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset) { + public void dlarz(String side, int m, int n, int l, double[] v, int offsetv, int incv, double tau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork) { //FIXME Add arguments check - dlarzK(side, m, n, l, v, _v_offset, incv, tau, c, _c_offset, Ldc, work, _work_offset); + dlarzK(side, m, n, l, v, offsetv, incv, tau, c, offsetc, Ldc, work, offsetwork); } - protected abstract void dlarzK(String side, int m, int n, int l, double[] v, int _v_offset, int incv, double tau, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset); + protected abstract void dlarzK(String side, int m, int n, int l, double[] v, int offsetv, int incv, double tau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork); public void dlarzb(String side, String trans, String direct, String storev, int m, int n, int k, int l, double[] v, int ldv, double[] t, int ldt, double[] c, int Ldc, double[] work, int ldwork) { dlarzb(side, trans, direct, storev, m, n, k, l, v, 0, ldv, t, 0, ldt, c, 0, Ldc, work, 0, ldwork); } - public void dlarzb(String side, String trans, String direct, String storev, int m, int n, int k, int l, double[] v, int _v_offset, int ldv, double[] t, int _t_offset, int ldt, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int ldwork) { + public void dlarzb(String side, String trans, String direct, String storev, int m, int n, int k, int l, double[] v, int offsetv, int ldv, double[] t, int offsett, int ldt, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int ldwork) { //FIXME Add arguments check - dlarzbK(side, trans, direct, storev, m, n, k, l, v, _v_offset, ldv, t, _t_offset, ldt, c, _c_offset, Ldc, work, _work_offset, ldwork); + dlarzbK(side, trans, direct, storev, m, n, k, l, v, offsetv, ldv, t, offsett, ldt, c, offsetc, Ldc, work, offsetwork, ldwork); } - protected abstract void dlarzbK(String side, String trans, String direct, String storev, int m, int n, int k, int l, double[] v, int _v_offset, int ldv, double[] t, int _t_offset, int ldt, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int ldwork); + protected abstract void dlarzbK(String side, String trans, String direct, String storev, int m, int n, int k, int l, double[] v, int offsetv, int ldv, double[] t, int offsett, int ldt, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int ldwork); public void dlarzt(String direct, String storev, int n, int k, double[] v, int ldv, double[] tau, double[] t, int ldt) { dlarzt(direct, storev, n, k, v, 0, ldv, tau, 0, t, 0, ldt); } - public void dlarzt(String direct, String storev, int n, int k, double[] v, int _v_offset, int ldv, double[] tau, int _tau_offset, double[] t, int _t_offset, int ldt) { + public void dlarzt(String direct, String storev, int n, int k, double[] v, int offsetv, int ldv, double[] tau, int offsettau, double[] t, int offsett, int ldt) { //FIXME Add arguments check - dlarztK(direct, storev, n, k, v, _v_offset, ldv, tau, _tau_offset, t, _t_offset, ldt); + dlarztK(direct, storev, n, k, v, offsetv, ldv, tau, offsettau, t, offsett, ldt); } - protected abstract void dlarztK(String direct, String storev, int n, int k, double[] v, int _v_offset, int ldv, double[] tau, int _tau_offset, double[] t, int _t_offset, int ldt); + protected abstract void dlarztK(String direct, String storev, int n, int k, double[] v, int offsetv, int ldv, double[] tau, int offsettau, double[] t, int offsett, int ldt); public void dlas2(double f, double g, double h, org.netlib.util.doubleW ssmin, org.netlib.util.doubleW ssmax) { dlas2K(f, g, h, ssmin, ssmax); @@ -1865,254 +1865,254 @@ public void dlascl(String type, int kl, int ku, double cfrom, double cto, int m, dlascl(type, kl, ku, cfrom, cto, m, n, a, 0, lda, info); } - public void dlascl(String type, int kl, int ku, double cfrom, double cto, int m, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info) { + public void dlascl(String type, int kl, int ku, double cfrom, double cto, int m, int n, double[] a, int offseta, int lda, org.netlib.util.intW info) { //FIXME Add arguments check - dlasclK(type, kl, ku, cfrom, cto, m, n, a, _a_offset, lda, info); + dlasclK(type, kl, ku, cfrom, cto, m, n, a, offseta, lda, info); } - protected abstract void dlasclK(String type, int kl, int ku, double cfrom, double cto, int m, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected abstract void dlasclK(String type, int kl, int ku, double cfrom, double cto, int m, int n, double[] a, int offseta, int lda, org.netlib.util.intW info); public void dlasd0(int n, int sqre, double[] d, double[] e, double[] u, int ldu, double[] vt, int ldvt, int smlsiz, int[] iwork, double[] work, org.netlib.util.intW info) { dlasd0(n, sqre, d, 0, e, 0, u, 0, ldu, vt, 0, ldvt, smlsiz, iwork, 0, work, 0, info); } - public void dlasd0(int n, int sqre, double[] d, int _d_offset, double[] e, int _e_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, int smlsiz, int[] iwork, int _iwork_offset, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dlasd0(int n, int sqre, double[] d, int offsetd, double[] e, int offsete, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int ldvt, int smlsiz, int[] iwork, int offsetiwork, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dlasd0K(n, sqre, d, _d_offset, e, _e_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, smlsiz, iwork, _iwork_offset, work, _work_offset, info); + dlasd0K(n, sqre, d, offsetd, e, offsete, u, offsetu, ldu, vt, offsetvt, ldvt, smlsiz, iwork, offsetiwork, work, offsetwork, info); } - protected abstract void dlasd0K(int n, int sqre, double[] d, int _d_offset, double[] e, int _e_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, int smlsiz, int[] iwork, int _iwork_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dlasd0K(int n, int sqre, double[] d, int offsetd, double[] e, int offsete, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int ldvt, int smlsiz, int[] iwork, int offsetiwork, double[] work, int offsetwork, org.netlib.util.intW info); public void dlasd1(int nl, int nr, int sqre, double[] d, org.netlib.util.doubleW alpha, org.netlib.util.doubleW beta, double[] u, int ldu, double[] vt, int ldvt, int[] idxq, int[] iwork, double[] work, org.netlib.util.intW info) { dlasd1(nl, nr, sqre, d, 0, alpha, beta, u, 0, ldu, vt, 0, ldvt, idxq, 0, iwork, 0, work, 0, info); } - public void dlasd1(int nl, int nr, int sqre, double[] d, int _d_offset, org.netlib.util.doubleW alpha, org.netlib.util.doubleW beta, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, int[] idxq, int _idxq_offset, int[] iwork, int _iwork_offset, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dlasd1(int nl, int nr, int sqre, double[] d, int offsetd, org.netlib.util.doubleW alpha, org.netlib.util.doubleW beta, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int ldvt, int[] idxq, int offsetidxq, int[] iwork, int offsetiwork, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dlasd1K(nl, nr, sqre, d, _d_offset, alpha, beta, u, _u_offset, ldu, vt, _vt_offset, ldvt, idxq, _idxq_offset, iwork, _iwork_offset, work, _work_offset, info); + dlasd1K(nl, nr, sqre, d, offsetd, alpha, beta, u, offsetu, ldu, vt, offsetvt, ldvt, idxq, offsetidxq, iwork, offsetiwork, work, offsetwork, info); } - protected abstract void dlasd1K(int nl, int nr, int sqre, double[] d, int _d_offset, org.netlib.util.doubleW alpha, org.netlib.util.doubleW beta, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, int[] idxq, int _idxq_offset, int[] iwork, int _iwork_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dlasd1K(int nl, int nr, int sqre, double[] d, int offsetd, org.netlib.util.doubleW alpha, org.netlib.util.doubleW beta, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int ldvt, int[] idxq, int offsetidxq, int[] iwork, int offsetiwork, double[] work, int offsetwork, org.netlib.util.intW info); public void dlasd2(int nl, int nr, int sqre, org.netlib.util.intW k, double[] d, double[] z, double alpha, double beta, double[] u, int ldu, double[] vt, int ldvt, double[] dsigma, double[] u2, int ldu2, double[] vt2, int ldvt2, int[] idxp, int[] idx, int[] idxc, int[] idxq, int[] coltyp, org.netlib.util.intW info) { dlasd2(nl, nr, sqre, k, d, 0, z, 0, alpha, beta, u, 0, ldu, vt, 0, ldvt, dsigma, 0, u2, 0, ldu2, vt2, 0, ldvt2, idxp, 0, idx, 0, idxc, 0, idxq, 0, coltyp, 0, info); } - public void dlasd2(int nl, int nr, int sqre, org.netlib.util.intW k, double[] d, int _d_offset, double[] z, int _z_offset, double alpha, double beta, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, double[] dsigma, int _dsigma_offset, double[] u2, int _u2_offset, int ldu2, double[] vt2, int _vt2_offset, int ldvt2, int[] idxp, int _idxp_offset, int[] idx, int _idx_offset, int[] idxc, int _idxc_offset, int[] idxq, int _idxq_offset, int[] coltyp, int _coltyp_offset, org.netlib.util.intW info) { + public void dlasd2(int nl, int nr, int sqre, org.netlib.util.intW k, double[] d, int offsetd, double[] z, int offsetz, double alpha, double beta, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int ldvt, double[] dsigma, int offsetdsigma, double[] u2, int offsetu2, int ldu2, double[] vt2, int offsetvt2, int ldvt2, int[] idxp, int offsetidxp, int[] idx, int offsetidx, int[] idxc, int offsetidxc, int[] idxq, int offsetidxq, int[] coltyp, int offsetcoltyp, org.netlib.util.intW info) { //FIXME Add arguments check - dlasd2K(nl, nr, sqre, k, d, _d_offset, z, _z_offset, alpha, beta, u, _u_offset, ldu, vt, _vt_offset, ldvt, dsigma, _dsigma_offset, u2, _u2_offset, ldu2, vt2, _vt2_offset, ldvt2, idxp, _idxp_offset, idx, _idx_offset, idxc, _idxc_offset, idxq, _idxq_offset, coltyp, _coltyp_offset, info); + dlasd2K(nl, nr, sqre, k, d, offsetd, z, offsetz, alpha, beta, u, offsetu, ldu, vt, offsetvt, ldvt, dsigma, offsetdsigma, u2, offsetu2, ldu2, vt2, offsetvt2, ldvt2, idxp, offsetidxp, idx, offsetidx, idxc, offsetidxc, idxq, offsetidxq, coltyp, offsetcoltyp, info); } - protected abstract void dlasd2K(int nl, int nr, int sqre, org.netlib.util.intW k, double[] d, int _d_offset, double[] z, int _z_offset, double alpha, double beta, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, double[] dsigma, int _dsigma_offset, double[] u2, int _u2_offset, int ldu2, double[] vt2, int _vt2_offset, int ldvt2, int[] idxp, int _idxp_offset, int[] idx, int _idx_offset, int[] idxc, int _idxc_offset, int[] idxq, int _idxq_offset, int[] coltyp, int _coltyp_offset, org.netlib.util.intW info); + protected abstract void dlasd2K(int nl, int nr, int sqre, org.netlib.util.intW k, double[] d, int offsetd, double[] z, int offsetz, double alpha, double beta, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int ldvt, double[] dsigma, int offsetdsigma, double[] u2, int offsetu2, int ldu2, double[] vt2, int offsetvt2, int ldvt2, int[] idxp, int offsetidxp, int[] idx, int offsetidx, int[] idxc, int offsetidxc, int[] idxq, int offsetidxq, int[] coltyp, int offsetcoltyp, org.netlib.util.intW info); public void dlasd3(int nl, int nr, int sqre, int k, double[] d, double[] q, int ldq, double[] dsigma, double[] u, int ldu, double[] u2, int ldu2, double[] vt, int ldvt, double[] vt2, int ldvt2, int[] idxc, int[] ctot, double[] z, org.netlib.util.intW info) { dlasd3(nl, nr, sqre, k, d, 0, q, 0, ldq, dsigma, 0, u, 0, ldu, u2, 0, ldu2, vt, 0, ldvt, vt2, 0, ldvt2, idxc, 0, ctot, 0, z, 0, info); } - public void dlasd3(int nl, int nr, int sqre, int k, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, double[] dsigma, int _dsigma_offset, double[] u, int _u_offset, int ldu, double[] u2, int _u2_offset, int ldu2, double[] vt, int _vt_offset, int ldvt, double[] vt2, int _vt2_offset, int ldvt2, int[] idxc, int _idxc_offset, int[] ctot, int _ctot_offset, double[] z, int _z_offset, org.netlib.util.intW info) { + public void dlasd3(int nl, int nr, int sqre, int k, double[] d, int offsetd, double[] q, int offsetq, int ldq, double[] dsigma, int offsetdsigma, double[] u, int offsetu, int ldu, double[] u2, int offsetu2, int ldu2, double[] vt, int offsetvt, int ldvt, double[] vt2, int offsetvt2, int ldvt2, int[] idxc, int offsetidxc, int[] ctot, int offsetctot, double[] z, int offsetz, org.netlib.util.intW info) { //FIXME Add arguments check - dlasd3K(nl, nr, sqre, k, d, _d_offset, q, _q_offset, ldq, dsigma, _dsigma_offset, u, _u_offset, ldu, u2, _u2_offset, ldu2, vt, _vt_offset, ldvt, vt2, _vt2_offset, ldvt2, idxc, _idxc_offset, ctot, _ctot_offset, z, _z_offset, info); + dlasd3K(nl, nr, sqre, k, d, offsetd, q, offsetq, ldq, dsigma, offsetdsigma, u, offsetu, ldu, u2, offsetu2, ldu2, vt, offsetvt, ldvt, vt2, offsetvt2, ldvt2, idxc, offsetidxc, ctot, offsetctot, z, offsetz, info); } - protected abstract void dlasd3K(int nl, int nr, int sqre, int k, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, double[] dsigma, int _dsigma_offset, double[] u, int _u_offset, int ldu, double[] u2, int _u2_offset, int ldu2, double[] vt, int _vt_offset, int ldvt, double[] vt2, int _vt2_offset, int ldvt2, int[] idxc, int _idxc_offset, int[] ctot, int _ctot_offset, double[] z, int _z_offset, org.netlib.util.intW info); + protected abstract void dlasd3K(int nl, int nr, int sqre, int k, double[] d, int offsetd, double[] q, int offsetq, int ldq, double[] dsigma, int offsetdsigma, double[] u, int offsetu, int ldu, double[] u2, int offsetu2, int ldu2, double[] vt, int offsetvt, int ldvt, double[] vt2, int offsetvt2, int ldvt2, int[] idxc, int offsetidxc, int[] ctot, int offsetctot, double[] z, int offsetz, org.netlib.util.intW info); public void dlasd4(int n, int i, double[] d, double[] z, double[] delta, double rho, org.netlib.util.doubleW sigma, double[] work, org.netlib.util.intW info) { dlasd4(n, i, d, 0, z, 0, delta, 0, rho, sigma, work, 0, info); } - public void dlasd4(int n, int i, double[] d, int _d_offset, double[] z, int _z_offset, double[] delta, int _delta_offset, double rho, org.netlib.util.doubleW sigma, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dlasd4(int n, int i, double[] d, int offsetd, double[] z, int offsetz, double[] delta, int offsetdelta, double rho, org.netlib.util.doubleW sigma, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dlasd4K(n, i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, sigma, work, _work_offset, info); + dlasd4K(n, i, d, offsetd, z, offsetz, delta, offsetdelta, rho, sigma, work, offsetwork, info); } - protected abstract void dlasd4K(int n, int i, double[] d, int _d_offset, double[] z, int _z_offset, double[] delta, int _delta_offset, double rho, org.netlib.util.doubleW sigma, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dlasd4K(int n, int i, double[] d, int offsetd, double[] z, int offsetz, double[] delta, int offsetdelta, double rho, org.netlib.util.doubleW sigma, double[] work, int offsetwork, org.netlib.util.intW info); public void dlasd5(int i, double[] d, double[] z, double[] delta, double rho, org.netlib.util.doubleW dsigma, double[] work) { dlasd5(i, d, 0, z, 0, delta, 0, rho, dsigma, work, 0); } - public void dlasd5(int i, double[] d, int _d_offset, double[] z, int _z_offset, double[] delta, int _delta_offset, double rho, org.netlib.util.doubleW dsigma, double[] work, int _work_offset) { + public void dlasd5(int i, double[] d, int offsetd, double[] z, int offsetz, double[] delta, int offsetdelta, double rho, org.netlib.util.doubleW dsigma, double[] work, int offsetwork) { //FIXME Add arguments check - dlasd5K(i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, dsigma, work, _work_offset); + dlasd5K(i, d, offsetd, z, offsetz, delta, offsetdelta, rho, dsigma, work, offsetwork); } - protected abstract void dlasd5K(int i, double[] d, int _d_offset, double[] z, int _z_offset, double[] delta, int _delta_offset, double rho, org.netlib.util.doubleW dsigma, double[] work, int _work_offset); + protected abstract void dlasd5K(int i, double[] d, int offsetd, double[] z, int offsetz, double[] delta, int offsetdelta, double rho, org.netlib.util.doubleW dsigma, double[] work, int offsetwork); public void dlasd6(int icompq, int nl, int nr, int sqre, double[] d, double[] vf, double[] vl, org.netlib.util.doubleW alpha, org.netlib.util.doubleW beta, int[] idxq, int[] perm, org.netlib.util.intW givptr, int[] givcol, int ldgcol, double[] givnum, int ldgnum, double[] poles, double[] difl, double[] difr, double[] z, org.netlib.util.intW k, org.netlib.util.doubleW c, org.netlib.util.doubleW s, double[] work, int[] iwork, org.netlib.util.intW info) { dlasd6(icompq, nl, nr, sqre, d, 0, vf, 0, vl, 0, alpha, beta, idxq, 0, perm, 0, givptr, givcol, 0, ldgcol, givnum, 0, ldgnum, poles, 0, difl, 0, difr, 0, z, 0, k, c, s, work, 0, iwork, 0, info); } - public void dlasd6(int icompq, int nl, int nr, int sqre, double[] d, int _d_offset, double[] vf, int _vf_offset, double[] vl, int _vl_offset, org.netlib.util.doubleW alpha, org.netlib.util.doubleW beta, int[] idxq, int _idxq_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, int ldgcol, double[] givnum, int _givnum_offset, int ldgnum, double[] poles, int _poles_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, double[] z, int _z_offset, org.netlib.util.intW k, org.netlib.util.doubleW c, org.netlib.util.doubleW s, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dlasd6(int icompq, int nl, int nr, int sqre, double[] d, int offsetd, double[] vf, int offsetvf, double[] vl, int offsetvl, org.netlib.util.doubleW alpha, org.netlib.util.doubleW beta, int[] idxq, int offsetidxq, int[] perm, int offsetperm, org.netlib.util.intW givptr, int[] givcol, int offsetgivcol, int ldgcol, double[] givnum, int offsetgivnum, int ldgnum, double[] poles, int offsetpoles, double[] difl, int offsetdifl, double[] difr, int offsetdifr, double[] z, int offsetz, org.netlib.util.intW k, org.netlib.util.doubleW c, org.netlib.util.doubleW s, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dlasd6K(icompq, nl, nr, sqre, d, _d_offset, vf, _vf_offset, vl, _vl_offset, alpha, beta, idxq, _idxq_offset, perm, _perm_offset, givptr, givcol, _givcol_offset, ldgcol, givnum, _givnum_offset, ldgnum, poles, _poles_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, k, c, s, work, _work_offset, iwork, _iwork_offset, info); + dlasd6K(icompq, nl, nr, sqre, d, offsetd, vf, offsetvf, vl, offsetvl, alpha, beta, idxq, offsetidxq, perm, offsetperm, givptr, givcol, offsetgivcol, ldgcol, givnum, offsetgivnum, ldgnum, poles, offsetpoles, difl, offsetdifl, difr, offsetdifr, z, offsetz, k, c, s, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dlasd6K(int icompq, int nl, int nr, int sqre, double[] d, int _d_offset, double[] vf, int _vf_offset, double[] vl, int _vl_offset, org.netlib.util.doubleW alpha, org.netlib.util.doubleW beta, int[] idxq, int _idxq_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, int ldgcol, double[] givnum, int _givnum_offset, int ldgnum, double[] poles, int _poles_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, double[] z, int _z_offset, org.netlib.util.intW k, org.netlib.util.doubleW c, org.netlib.util.doubleW s, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dlasd6K(int icompq, int nl, int nr, int sqre, double[] d, int offsetd, double[] vf, int offsetvf, double[] vl, int offsetvl, org.netlib.util.doubleW alpha, org.netlib.util.doubleW beta, int[] idxq, int offsetidxq, int[] perm, int offsetperm, org.netlib.util.intW givptr, int[] givcol, int offsetgivcol, int ldgcol, double[] givnum, int offsetgivnum, int ldgnum, double[] poles, int offsetpoles, double[] difl, int offsetdifl, double[] difr, int offsetdifr, double[] z, int offsetz, org.netlib.util.intW k, org.netlib.util.doubleW c, org.netlib.util.doubleW s, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dlasd7(int icompq, int nl, int nr, int sqre, org.netlib.util.intW k, double[] d, double[] z, double[] zw, double[] vf, double[] vfw, double[] vl, double[] vlw, double alpha, double beta, double[] dsigma, int[] idx, int[] idxp, int[] idxq, int[] perm, org.netlib.util.intW givptr, int[] givcol, int ldgcol, double[] givnum, int ldgnum, org.netlib.util.doubleW c, org.netlib.util.doubleW s, org.netlib.util.intW info) { dlasd7(icompq, nl, nr, sqre, k, d, 0, z, 0, zw, 0, vf, 0, vfw, 0, vl, 0, vlw, 0, alpha, beta, dsigma, 0, idx, 0, idxp, 0, idxq, 0, perm, 0, givptr, givcol, 0, ldgcol, givnum, 0, ldgnum, c, s, info); } - public void dlasd7(int icompq, int nl, int nr, int sqre, org.netlib.util.intW k, double[] d, int _d_offset, double[] z, int _z_offset, double[] zw, int _zw_offset, double[] vf, int _vf_offset, double[] vfw, int _vfw_offset, double[] vl, int _vl_offset, double[] vlw, int _vlw_offset, double alpha, double beta, double[] dsigma, int _dsigma_offset, int[] idx, int _idx_offset, int[] idxp, int _idxp_offset, int[] idxq, int _idxq_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, int ldgcol, double[] givnum, int _givnum_offset, int ldgnum, org.netlib.util.doubleW c, org.netlib.util.doubleW s, org.netlib.util.intW info) { + public void dlasd7(int icompq, int nl, int nr, int sqre, org.netlib.util.intW k, double[] d, int offsetd, double[] z, int offsetz, double[] zw, int offsetzw, double[] vf, int offsetvf, double[] vfw, int offsetvfw, double[] vl, int offsetvl, double[] vlw, int offsetvlw, double alpha, double beta, double[] dsigma, int offsetdsigma, int[] idx, int offsetidx, int[] idxp, int offsetidxp, int[] idxq, int offsetidxq, int[] perm, int offsetperm, org.netlib.util.intW givptr, int[] givcol, int offsetgivcol, int ldgcol, double[] givnum, int offsetgivnum, int ldgnum, org.netlib.util.doubleW c, org.netlib.util.doubleW s, org.netlib.util.intW info) { //FIXME Add arguments check - dlasd7K(icompq, nl, nr, sqre, k, d, _d_offset, z, _z_offset, zw, _zw_offset, vf, _vf_offset, vfw, _vfw_offset, vl, _vl_offset, vlw, _vlw_offset, alpha, beta, dsigma, _dsigma_offset, idx, _idx_offset, idxp, _idxp_offset, idxq, _idxq_offset, perm, _perm_offset, givptr, givcol, _givcol_offset, ldgcol, givnum, _givnum_offset, ldgnum, c, s, info); + dlasd7K(icompq, nl, nr, sqre, k, d, offsetd, z, offsetz, zw, offsetzw, vf, offsetvf, vfw, offsetvfw, vl, offsetvl, vlw, offsetvlw, alpha, beta, dsigma, offsetdsigma, idx, offsetidx, idxp, offsetidxp, idxq, offsetidxq, perm, offsetperm, givptr, givcol, offsetgivcol, ldgcol, givnum, offsetgivnum, ldgnum, c, s, info); } - protected abstract void dlasd7K(int icompq, int nl, int nr, int sqre, org.netlib.util.intW k, double[] d, int _d_offset, double[] z, int _z_offset, double[] zw, int _zw_offset, double[] vf, int _vf_offset, double[] vfw, int _vfw_offset, double[] vl, int _vl_offset, double[] vlw, int _vlw_offset, double alpha, double beta, double[] dsigma, int _dsigma_offset, int[] idx, int _idx_offset, int[] idxp, int _idxp_offset, int[] idxq, int _idxq_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, int ldgcol, double[] givnum, int _givnum_offset, int ldgnum, org.netlib.util.doubleW c, org.netlib.util.doubleW s, org.netlib.util.intW info); + protected abstract void dlasd7K(int icompq, int nl, int nr, int sqre, org.netlib.util.intW k, double[] d, int offsetd, double[] z, int offsetz, double[] zw, int offsetzw, double[] vf, int offsetvf, double[] vfw, int offsetvfw, double[] vl, int offsetvl, double[] vlw, int offsetvlw, double alpha, double beta, double[] dsigma, int offsetdsigma, int[] idx, int offsetidx, int[] idxp, int offsetidxp, int[] idxq, int offsetidxq, int[] perm, int offsetperm, org.netlib.util.intW givptr, int[] givcol, int offsetgivcol, int ldgcol, double[] givnum, int offsetgivnum, int ldgnum, org.netlib.util.doubleW c, org.netlib.util.doubleW s, org.netlib.util.intW info); public void dlasd8(int icompq, int k, double[] d, double[] z, double[] vf, double[] vl, double[] difl, double[] difr, int lddifr, double[] dsigma, double[] work, org.netlib.util.intW info) { dlasd8(icompq, k, d, 0, z, 0, vf, 0, vl, 0, difl, 0, difr, 0, lddifr, dsigma, 0, work, 0, info); } - public void dlasd8(int icompq, int k, double[] d, int _d_offset, double[] z, int _z_offset, double[] vf, int _vf_offset, double[] vl, int _vl_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, int lddifr, double[] dsigma, int _dsigma_offset, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dlasd8(int icompq, int k, double[] d, int offsetd, double[] z, int offsetz, double[] vf, int offsetvf, double[] vl, int offsetvl, double[] difl, int offsetdifl, double[] difr, int offsetdifr, int lddifr, double[] dsigma, int offsetdsigma, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dlasd8K(icompq, k, d, _d_offset, z, _z_offset, vf, _vf_offset, vl, _vl_offset, difl, _difl_offset, difr, _difr_offset, lddifr, dsigma, _dsigma_offset, work, _work_offset, info); + dlasd8K(icompq, k, d, offsetd, z, offsetz, vf, offsetvf, vl, offsetvl, difl, offsetdifl, difr, offsetdifr, lddifr, dsigma, offsetdsigma, work, offsetwork, info); } - protected abstract void dlasd8K(int icompq, int k, double[] d, int _d_offset, double[] z, int _z_offset, double[] vf, int _vf_offset, double[] vl, int _vl_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, int lddifr, double[] dsigma, int _dsigma_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dlasd8K(int icompq, int k, double[] d, int offsetd, double[] z, int offsetz, double[] vf, int offsetvf, double[] vl, int offsetvl, double[] difl, int offsetdifl, double[] difr, int offsetdifr, int lddifr, double[] dsigma, int offsetdsigma, double[] work, int offsetwork, org.netlib.util.intW info); public void dlasda(int icompq, int smlsiz, int n, int sqre, double[] d, double[] e, double[] u, int ldu, double[] vt, int[] k, double[] difl, double[] difr, double[] z, double[] poles, int[] givptr, int[] givcol, int ldgcol, int[] perm, double[] givnum, double[] c, double[] s, double[] work, int[] iwork, org.netlib.util.intW info) { dlasda(icompq, smlsiz, n, sqre, d, 0, e, 0, u, 0, ldu, vt, 0, k, 0, difl, 0, difr, 0, z, 0, poles, 0, givptr, 0, givcol, 0, ldgcol, perm, 0, givnum, 0, c, 0, s, 0, work, 0, iwork, 0, info); } - public void dlasda(int icompq, int smlsiz, int n, int sqre, double[] d, int _d_offset, double[] e, int _e_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int[] k, int _k_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, double[] z, int _z_offset, double[] poles, int _poles_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, int ldgcol, int[] perm, int _perm_offset, double[] givnum, int _givnum_offset, double[] c, int _c_offset, double[] s, int _s_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dlasda(int icompq, int smlsiz, int n, int sqre, double[] d, int offsetd, double[] e, int offsete, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int[] k, int offsetk, double[] difl, int offsetdifl, double[] difr, int offsetdifr, double[] z, int offsetz, double[] poles, int offsetpoles, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, int ldgcol, int[] perm, int offsetperm, double[] givnum, int offsetgivnum, double[] c, int offsetc, double[] s, int offsets, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dlasdaK(icompq, smlsiz, n, sqre, d, _d_offset, e, _e_offset, u, _u_offset, ldu, vt, _vt_offset, k, _k_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, poles, _poles_offset, givptr, _givptr_offset, givcol, _givcol_offset, ldgcol, perm, _perm_offset, givnum, _givnum_offset, c, _c_offset, s, _s_offset, work, _work_offset, iwork, _iwork_offset, info); + dlasdaK(icompq, smlsiz, n, sqre, d, offsetd, e, offsete, u, offsetu, ldu, vt, offsetvt, k, offsetk, difl, offsetdifl, difr, offsetdifr, z, offsetz, poles, offsetpoles, givptr, offsetgivptr, givcol, offsetgivcol, ldgcol, perm, offsetperm, givnum, offsetgivnum, c, offsetc, s, offsets, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dlasdaK(int icompq, int smlsiz, int n, int sqre, double[] d, int _d_offset, double[] e, int _e_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int[] k, int _k_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, double[] z, int _z_offset, double[] poles, int _poles_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, int ldgcol, int[] perm, int _perm_offset, double[] givnum, int _givnum_offset, double[] c, int _c_offset, double[] s, int _s_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dlasdaK(int icompq, int smlsiz, int n, int sqre, double[] d, int offsetd, double[] e, int offsete, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int[] k, int offsetk, double[] difl, int offsetdifl, double[] difr, int offsetdifr, double[] z, int offsetz, double[] poles, int offsetpoles, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, int ldgcol, int[] perm, int offsetperm, double[] givnum, int offsetgivnum, double[] c, int offsetc, double[] s, int offsets, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dlasdq(String uplo, int sqre, int n, int ncvt, int nru, int ncc, double[] d, double[] e, double[] vt, int ldvt, double[] u, int ldu, double[] c, int Ldc, double[] work, org.netlib.util.intW info) { dlasdq(uplo, sqre, n, ncvt, nru, ncc, d, 0, e, 0, vt, 0, ldvt, u, 0, ldu, c, 0, Ldc, work, 0, info); } - public void dlasdq(String uplo, int sqre, int n, int ncvt, int nru, int ncc, double[] d, int _d_offset, double[] e, int _e_offset, double[] vt, int _vt_offset, int ldvt, double[] u, int _u_offset, int ldu, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dlasdq(String uplo, int sqre, int n, int ncvt, int nru, int ncc, double[] d, int offsetd, double[] e, int offsete, double[] vt, int offsetvt, int ldvt, double[] u, int offsetu, int ldu, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dlasdqK(uplo, sqre, n, ncvt, nru, ncc, d, _d_offset, e, _e_offset, vt, _vt_offset, ldvt, u, _u_offset, ldu, c, _c_offset, Ldc, work, _work_offset, info); + dlasdqK(uplo, sqre, n, ncvt, nru, ncc, d, offsetd, e, offsete, vt, offsetvt, ldvt, u, offsetu, ldu, c, offsetc, Ldc, work, offsetwork, info); } - protected abstract void dlasdqK(String uplo, int sqre, int n, int ncvt, int nru, int ncc, double[] d, int _d_offset, double[] e, int _e_offset, double[] vt, int _vt_offset, int ldvt, double[] u, int _u_offset, int ldu, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dlasdqK(String uplo, int sqre, int n, int ncvt, int nru, int ncc, double[] d, int offsetd, double[] e, int offsete, double[] vt, int offsetvt, int ldvt, double[] u, int offsetu, int ldu, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info); public void dlasdt(int n, org.netlib.util.intW lvl, org.netlib.util.intW nd, int[] inode, int[] ndiml, int[] ndimr, int msub) { dlasdt(n, lvl, nd, inode, 0, ndiml, 0, ndimr, 0, msub); } - public void dlasdt(int n, org.netlib.util.intW lvl, org.netlib.util.intW nd, int[] inode, int _inode_offset, int[] ndiml, int _ndiml_offset, int[] ndimr, int _ndimr_offset, int msub) { + public void dlasdt(int n, org.netlib.util.intW lvl, org.netlib.util.intW nd, int[] inode, int offsetinode, int[] ndiml, int offsetndiml, int[] ndimr, int offsetndimr, int msub) { //FIXME Add arguments check - dlasdtK(n, lvl, nd, inode, _inode_offset, ndiml, _ndiml_offset, ndimr, _ndimr_offset, msub); + dlasdtK(n, lvl, nd, inode, offsetinode, ndiml, offsetndiml, ndimr, offsetndimr, msub); } - protected abstract void dlasdtK(int n, org.netlib.util.intW lvl, org.netlib.util.intW nd, int[] inode, int _inode_offset, int[] ndiml, int _ndiml_offset, int[] ndimr, int _ndimr_offset, int msub); + protected abstract void dlasdtK(int n, org.netlib.util.intW lvl, org.netlib.util.intW nd, int[] inode, int offsetinode, int[] ndiml, int offsetndiml, int[] ndimr, int offsetndimr, int msub); public void dlaset(String uplo, int m, int n, double alpha, double beta, double[] a, int lda) { dlaset(uplo, m, n, alpha, beta, a, 0, lda); } - public void dlaset(String uplo, int m, int n, double alpha, double beta, double[] a, int _a_offset, int lda) { + public void dlaset(String uplo, int m, int n, double alpha, double beta, double[] a, int offseta, int lda) { //FIXME Add arguments check - dlasetK(uplo, m, n, alpha, beta, a, _a_offset, lda); + dlasetK(uplo, m, n, alpha, beta, a, offseta, lda); } - protected abstract void dlasetK(String uplo, int m, int n, double alpha, double beta, double[] a, int _a_offset, int lda); + protected abstract void dlasetK(String uplo, int m, int n, double alpha, double beta, double[] a, int offseta, int lda); public void dlasq1(int n, double[] d, double[] e, double[] work, org.netlib.util.intW info) { dlasq1(n, d, 0, e, 0, work, 0, info); } - public void dlasq1(int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dlasq1(int n, double[] d, int offsetd, double[] e, int offsete, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dlasq1K(n, d, _d_offset, e, _e_offset, work, _work_offset, info); + dlasq1K(n, d, offsetd, e, offsete, work, offsetwork, info); } - protected abstract void dlasq1K(int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dlasq1K(int n, double[] d, int offsetd, double[] e, int offsete, double[] work, int offsetwork, org.netlib.util.intW info); public void dlasq2(int n, double[] z, org.netlib.util.intW info) { dlasq2(n, z, 0, info); } - public void dlasq2(int n, double[] z, int _z_offset, org.netlib.util.intW info) { + public void dlasq2(int n, double[] z, int offsetz, org.netlib.util.intW info) { //FIXME Add arguments check - dlasq2K(n, z, _z_offset, info); + dlasq2K(n, z, offsetz, info); } - protected abstract void dlasq2K(int n, double[] z, int _z_offset, org.netlib.util.intW info); + protected abstract void dlasq2K(int n, double[] z, int offsetz, org.netlib.util.intW info); public void dlasq3(int i0, org.netlib.util.intW n0, double[] z, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW sigma, org.netlib.util.doubleW desig, org.netlib.util.doubleW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee) { dlasq3(i0, n0, z, 0, pp, dmin, sigma, desig, qmax, nfail, iter, ndiv, ieee); } - public void dlasq3(int i0, org.netlib.util.intW n0, double[] z, int _z_offset, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW sigma, org.netlib.util.doubleW desig, org.netlib.util.doubleW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee) { + public void dlasq3(int i0, org.netlib.util.intW n0, double[] z, int offsetz, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW sigma, org.netlib.util.doubleW desig, org.netlib.util.doubleW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee) { //FIXME Add arguments check - dlasq3K(i0, n0, z, _z_offset, pp, dmin, sigma, desig, qmax, nfail, iter, ndiv, ieee); + dlasq3K(i0, n0, z, offsetz, pp, dmin, sigma, desig, qmax, nfail, iter, ndiv, ieee); } - protected abstract void dlasq3K(int i0, org.netlib.util.intW n0, double[] z, int _z_offset, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW sigma, org.netlib.util.doubleW desig, org.netlib.util.doubleW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee); + protected abstract void dlasq3K(int i0, org.netlib.util.intW n0, double[] z, int offsetz, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW sigma, org.netlib.util.doubleW desig, org.netlib.util.doubleW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee); public void dlasq4(int i0, int n0, double[] z, int pp, int n0in, double dmin, double dmin1, double dmin2, double dn, double dn1, double dn2, org.netlib.util.doubleW tau, org.netlib.util.intW ttype) { dlasq4(i0, n0, z, 0, pp, n0in, dmin, dmin1, dmin2, dn, dn1, dn2, tau, ttype); } - public void dlasq4(int i0, int n0, double[] z, int _z_offset, int pp, int n0in, double dmin, double dmin1, double dmin2, double dn, double dn1, double dn2, org.netlib.util.doubleW tau, org.netlib.util.intW ttype) { + public void dlasq4(int i0, int n0, double[] z, int offsetz, int pp, int n0in, double dmin, double dmin1, double dmin2, double dn, double dn1, double dn2, org.netlib.util.doubleW tau, org.netlib.util.intW ttype) { //FIXME Add arguments check - dlasq4K(i0, n0, z, _z_offset, pp, n0in, dmin, dmin1, dmin2, dn, dn1, dn2, tau, ttype); + dlasq4K(i0, n0, z, offsetz, pp, n0in, dmin, dmin1, dmin2, dn, dn1, dn2, tau, ttype); } - protected abstract void dlasq4K(int i0, int n0, double[] z, int _z_offset, int pp, int n0in, double dmin, double dmin1, double dmin2, double dn, double dn1, double dn2, org.netlib.util.doubleW tau, org.netlib.util.intW ttype); + protected abstract void dlasq4K(int i0, int n0, double[] z, int offsetz, int pp, int n0in, double dmin, double dmin1, double dmin2, double dn, double dn1, double dn2, org.netlib.util.doubleW tau, org.netlib.util.intW ttype); public void dlasq5(int i0, int n0, double[] z, int pp, double tau, org.netlib.util.doubleW dmin, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dnm1, org.netlib.util.doubleW dnm2, boolean ieee) { dlasq5(i0, n0, z, 0, pp, tau, dmin, dmin1, dmin2, dn, dnm1, dnm2, ieee); } - public void dlasq5(int i0, int n0, double[] z, int _z_offset, int pp, double tau, org.netlib.util.doubleW dmin, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dnm1, org.netlib.util.doubleW dnm2, boolean ieee) { + public void dlasq5(int i0, int n0, double[] z, int offsetz, int pp, double tau, org.netlib.util.doubleW dmin, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dnm1, org.netlib.util.doubleW dnm2, boolean ieee) { //FIXME Add arguments check - dlasq5K(i0, n0, z, _z_offset, pp, tau, dmin, dmin1, dmin2, dn, dnm1, dnm2, ieee); + dlasq5K(i0, n0, z, offsetz, pp, tau, dmin, dmin1, dmin2, dn, dnm1, dnm2, ieee); } - protected abstract void dlasq5K(int i0, int n0, double[] z, int _z_offset, int pp, double tau, org.netlib.util.doubleW dmin, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dnm1, org.netlib.util.doubleW dnm2, boolean ieee); + protected abstract void dlasq5K(int i0, int n0, double[] z, int offsetz, int pp, double tau, org.netlib.util.doubleW dmin, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dnm1, org.netlib.util.doubleW dnm2, boolean ieee); public void dlasq6(int i0, int n0, double[] z, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dnm1, org.netlib.util.doubleW dnm2) { dlasq6(i0, n0, z, 0, pp, dmin, dmin1, dmin2, dn, dnm1, dnm2); } - public void dlasq6(int i0, int n0, double[] z, int _z_offset, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dnm1, org.netlib.util.doubleW dnm2) { + public void dlasq6(int i0, int n0, double[] z, int offsetz, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dnm1, org.netlib.util.doubleW dnm2) { //FIXME Add arguments check - dlasq6K(i0, n0, z, _z_offset, pp, dmin, dmin1, dmin2, dn, dnm1, dnm2); + dlasq6K(i0, n0, z, offsetz, pp, dmin, dmin1, dmin2, dn, dnm1, dnm2); } - protected abstract void dlasq6K(int i0, int n0, double[] z, int _z_offset, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dnm1, org.netlib.util.doubleW dnm2); + protected abstract void dlasq6K(int i0, int n0, double[] z, int offsetz, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dnm1, org.netlib.util.doubleW dnm2); public void dlasr(String side, String pivot, String direct, int m, int n, double[] c, double[] s, double[] a, int lda) { dlasr(side, pivot, direct, m, n, c, 0, s, 0, a, 0, lda); } - public void dlasr(String side, String pivot, String direct, int m, int n, double[] c, int _c_offset, double[] s, int _s_offset, double[] a, int _a_offset, int lda) { + public void dlasr(String side, String pivot, String direct, int m, int n, double[] c, int offsetc, double[] s, int offsets, double[] a, int offseta, int lda) { //FIXME Add arguments check - dlasrK(side, pivot, direct, m, n, c, _c_offset, s, _s_offset, a, _a_offset, lda); + dlasrK(side, pivot, direct, m, n, c, offsetc, s, offsets, a, offseta, lda); } - protected abstract void dlasrK(String side, String pivot, String direct, int m, int n, double[] c, int _c_offset, double[] s, int _s_offset, double[] a, int _a_offset, int lda); + protected abstract void dlasrK(String side, String pivot, String direct, int m, int n, double[] c, int offsetc, double[] s, int offsets, double[] a, int offseta, int lda); public void dlasrt(String id, int n, double[] d, org.netlib.util.intW info) { dlasrt(id, n, d, 0, info); } - public void dlasrt(String id, int n, double[] d, int _d_offset, org.netlib.util.intW info) { + public void dlasrt(String id, int n, double[] d, int offsetd, org.netlib.util.intW info) { //FIXME Add arguments check - dlasrtK(id, n, d, _d_offset, info); + dlasrtK(id, n, d, offsetd, info); } - protected abstract void dlasrtK(String id, int n, double[] d, int _d_offset, org.netlib.util.intW info); + protected abstract void dlasrtK(String id, int n, double[] d, int offsetd, org.netlib.util.intW info); public void dlassq(int n, double[] x, int incx, org.netlib.util.doubleW scale, org.netlib.util.doubleW sumsq) { dlassq(n, x, 0, incx, scale, sumsq); } - public void dlassq(int n, double[] x, int _x_offset, int incx, org.netlib.util.doubleW scale, org.netlib.util.doubleW sumsq) { + public void dlassq(int n, double[] x, int offsetx, int incx, org.netlib.util.doubleW scale, org.netlib.util.doubleW sumsq) { //FIXME Add arguments check - dlassqK(n, x, _x_offset, incx, scale, sumsq); + dlassqK(n, x, offsetx, incx, scale, sumsq); } - protected abstract void dlassqK(int n, double[] x, int _x_offset, int incx, org.netlib.util.doubleW scale, org.netlib.util.doubleW sumsq); + protected abstract void dlassqK(int n, double[] x, int offsetx, int incx, org.netlib.util.doubleW scale, org.netlib.util.doubleW sumsq); public void dlasv2(double f, double g, double h, org.netlib.util.doubleW ssmin, org.netlib.util.doubleW ssmax, org.netlib.util.doubleW snr, org.netlib.util.doubleW csr, org.netlib.util.doubleW snl, org.netlib.util.doubleW csl) { dlasv2K(f, g, h, ssmin, ssmax, snr, csr, snl, csl); @@ -2124,1717 +2124,1717 @@ public void dlaswp(int n, double[] a, int lda, int k1, int k2, int[] ipiv, int i dlaswp(n, a, 0, lda, k1, k2, ipiv, 0, incx); } - public void dlaswp(int n, double[] a, int _a_offset, int lda, int k1, int k2, int[] ipiv, int _ipiv_offset, int incx) { + public void dlaswp(int n, double[] a, int offseta, int lda, int k1, int k2, int[] ipiv, int offsetipiv, int incx) { //FIXME Add arguments check - dlaswpK(n, a, _a_offset, lda, k1, k2, ipiv, _ipiv_offset, incx); + dlaswpK(n, a, offseta, lda, k1, k2, ipiv, offsetipiv, incx); } - protected abstract void dlaswpK(int n, double[] a, int _a_offset, int lda, int k1, int k2, int[] ipiv, int _ipiv_offset, int incx); + protected abstract void dlaswpK(int n, double[] a, int offseta, int lda, int k1, int k2, int[] ipiv, int offsetipiv, int incx); public void dlasy2(boolean ltranl, boolean ltranr, int isgn, int n1, int n2, double[] tl, int ldtl, double[] tr, int ldtr, double[] b, int ldb, org.netlib.util.doubleW scale, double[] x, int ldx, org.netlib.util.doubleW xnorm, org.netlib.util.intW info) { dlasy2(ltranl, ltranr, isgn, n1, n2, tl, 0, ldtl, tr, 0, ldtr, b, 0, ldb, scale, x, 0, ldx, xnorm, info); } - public void dlasy2(boolean ltranl, boolean ltranr, int isgn, int n1, int n2, double[] tl, int _tl_offset, int ldtl, double[] tr, int _tr_offset, int ldtr, double[] b, int _b_offset, int ldb, org.netlib.util.doubleW scale, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW xnorm, org.netlib.util.intW info) { + public void dlasy2(boolean ltranl, boolean ltranr, int isgn, int n1, int n2, double[] tl, int offsettl, int ldtl, double[] tr, int offsettr, int ldtr, double[] b, int offsetb, int ldb, org.netlib.util.doubleW scale, double[] x, int offsetx, int ldx, org.netlib.util.doubleW xnorm, org.netlib.util.intW info) { //FIXME Add arguments check - dlasy2K(ltranl, ltranr, isgn, n1, n2, tl, _tl_offset, ldtl, tr, _tr_offset, ldtr, b, _b_offset, ldb, scale, x, _x_offset, ldx, xnorm, info); + dlasy2K(ltranl, ltranr, isgn, n1, n2, tl, offsettl, ldtl, tr, offsettr, ldtr, b, offsetb, ldb, scale, x, offsetx, ldx, xnorm, info); } - protected abstract void dlasy2K(boolean ltranl, boolean ltranr, int isgn, int n1, int n2, double[] tl, int _tl_offset, int ldtl, double[] tr, int _tr_offset, int ldtr, double[] b, int _b_offset, int ldb, org.netlib.util.doubleW scale, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW xnorm, org.netlib.util.intW info); + protected abstract void dlasy2K(boolean ltranl, boolean ltranr, int isgn, int n1, int n2, double[] tl, int offsettl, int ldtl, double[] tr, int offsettr, int ldtr, double[] b, int offsetb, int ldb, org.netlib.util.doubleW scale, double[] x, int offsetx, int ldx, org.netlib.util.doubleW xnorm, org.netlib.util.intW info); public void dlasyf(String uplo, int n, int nb, org.netlib.util.intW kb, double[] a, int lda, int[] ipiv, double[] w, int ldw, org.netlib.util.intW info) { dlasyf(uplo, n, nb, kb, a, 0, lda, ipiv, 0, w, 0, ldw, info); } - public void dlasyf(String uplo, int n, int nb, org.netlib.util.intW kb, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] w, int _w_offset, int ldw, org.netlib.util.intW info) { + public void dlasyf(String uplo, int n, int nb, org.netlib.util.intW kb, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] w, int offsetw, int ldw, org.netlib.util.intW info) { //FIXME Add arguments check - dlasyfK(uplo, n, nb, kb, a, _a_offset, lda, ipiv, _ipiv_offset, w, _w_offset, ldw, info); + dlasyfK(uplo, n, nb, kb, a, offseta, lda, ipiv, offsetipiv, w, offsetw, ldw, info); } - protected abstract void dlasyfK(String uplo, int n, int nb, org.netlib.util.intW kb, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] w, int _w_offset, int ldw, org.netlib.util.intW info); + protected abstract void dlasyfK(String uplo, int n, int nb, org.netlib.util.intW kb, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] w, int offsetw, int ldw, org.netlib.util.intW info); public void dlatbs(String uplo, String trans, String diag, String normin, int n, int kd, double[] ab, int ldab, double[] x, org.netlib.util.doubleW scale, double[] cnorm, org.netlib.util.intW info) { dlatbs(uplo, trans, diag, normin, n, kd, ab, 0, ldab, x, 0, scale, cnorm, 0, info); } - public void dlatbs(String uplo, String trans, String diag, String normin, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] x, int _x_offset, org.netlib.util.doubleW scale, double[] cnorm, int _cnorm_offset, org.netlib.util.intW info) { + public void dlatbs(String uplo, String trans, String diag, String normin, int n, int kd, double[] ab, int offsetab, int ldab, double[] x, int offsetx, org.netlib.util.doubleW scale, double[] cnorm, int offsetcnorm, org.netlib.util.intW info) { //FIXME Add arguments check - dlatbsK(uplo, trans, diag, normin, n, kd, ab, _ab_offset, ldab, x, _x_offset, scale, cnorm, _cnorm_offset, info); + dlatbsK(uplo, trans, diag, normin, n, kd, ab, offsetab, ldab, x, offsetx, scale, cnorm, offsetcnorm, info); } - protected abstract void dlatbsK(String uplo, String trans, String diag, String normin, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] x, int _x_offset, org.netlib.util.doubleW scale, double[] cnorm, int _cnorm_offset, org.netlib.util.intW info); + protected abstract void dlatbsK(String uplo, String trans, String diag, String normin, int n, int kd, double[] ab, int offsetab, int ldab, double[] x, int offsetx, org.netlib.util.doubleW scale, double[] cnorm, int offsetcnorm, org.netlib.util.intW info); public void dlatdf(int ijob, int n, double[] z, int ldz, double[] rhs, org.netlib.util.doubleW rdsum, org.netlib.util.doubleW rdscal, int[] ipiv, int[] jpiv) { dlatdf(ijob, n, z, 0, ldz, rhs, 0, rdsum, rdscal, ipiv, 0, jpiv, 0); } - public void dlatdf(int ijob, int n, double[] z, int _z_offset, int ldz, double[] rhs, int _rhs_offset, org.netlib.util.doubleW rdsum, org.netlib.util.doubleW rdscal, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset) { + public void dlatdf(int ijob, int n, double[] z, int offsetz, int ldz, double[] rhs, int offsetrhs, org.netlib.util.doubleW rdsum, org.netlib.util.doubleW rdscal, int[] ipiv, int offsetipiv, int[] jpiv, int offsetjpiv) { //FIXME Add arguments check - dlatdfK(ijob, n, z, _z_offset, ldz, rhs, _rhs_offset, rdsum, rdscal, ipiv, _ipiv_offset, jpiv, _jpiv_offset); + dlatdfK(ijob, n, z, offsetz, ldz, rhs, offsetrhs, rdsum, rdscal, ipiv, offsetipiv, jpiv, offsetjpiv); } - protected abstract void dlatdfK(int ijob, int n, double[] z, int _z_offset, int ldz, double[] rhs, int _rhs_offset, org.netlib.util.doubleW rdsum, org.netlib.util.doubleW rdscal, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset); + protected abstract void dlatdfK(int ijob, int n, double[] z, int offsetz, int ldz, double[] rhs, int offsetrhs, org.netlib.util.doubleW rdsum, org.netlib.util.doubleW rdscal, int[] ipiv, int offsetipiv, int[] jpiv, int offsetjpiv); public void dlatps(String uplo, String trans, String diag, String normin, int n, double[] ap, double[] x, org.netlib.util.doubleW scale, double[] cnorm, org.netlib.util.intW info) { dlatps(uplo, trans, diag, normin, n, ap, 0, x, 0, scale, cnorm, 0, info); } - public void dlatps(String uplo, String trans, String diag, String normin, int n, double[] ap, int _ap_offset, double[] x, int _x_offset, org.netlib.util.doubleW scale, double[] cnorm, int _cnorm_offset, org.netlib.util.intW info) { + public void dlatps(String uplo, String trans, String diag, String normin, int n, double[] ap, int offsetap, double[] x, int offsetx, org.netlib.util.doubleW scale, double[] cnorm, int offsetcnorm, org.netlib.util.intW info) { //FIXME Add arguments check - dlatpsK(uplo, trans, diag, normin, n, ap, _ap_offset, x, _x_offset, scale, cnorm, _cnorm_offset, info); + dlatpsK(uplo, trans, diag, normin, n, ap, offsetap, x, offsetx, scale, cnorm, offsetcnorm, info); } - protected abstract void dlatpsK(String uplo, String trans, String diag, String normin, int n, double[] ap, int _ap_offset, double[] x, int _x_offset, org.netlib.util.doubleW scale, double[] cnorm, int _cnorm_offset, org.netlib.util.intW info); + protected abstract void dlatpsK(String uplo, String trans, String diag, String normin, int n, double[] ap, int offsetap, double[] x, int offsetx, org.netlib.util.doubleW scale, double[] cnorm, int offsetcnorm, org.netlib.util.intW info); public void dlatrd(String uplo, int n, int nb, double[] a, int lda, double[] e, double[] tau, double[] w, int ldw) { dlatrd(uplo, n, nb, a, 0, lda, e, 0, tau, 0, w, 0, ldw); } - public void dlatrd(String uplo, int n, int nb, double[] a, int _a_offset, int lda, double[] e, int _e_offset, double[] tau, int _tau_offset, double[] w, int _w_offset, int ldw) { + public void dlatrd(String uplo, int n, int nb, double[] a, int offseta, int lda, double[] e, int offsete, double[] tau, int offsettau, double[] w, int offsetw, int ldw) { //FIXME Add arguments check - dlatrdK(uplo, n, nb, a, _a_offset, lda, e, _e_offset, tau, _tau_offset, w, _w_offset, ldw); + dlatrdK(uplo, n, nb, a, offseta, lda, e, offsete, tau, offsettau, w, offsetw, ldw); } - protected abstract void dlatrdK(String uplo, int n, int nb, double[] a, int _a_offset, int lda, double[] e, int _e_offset, double[] tau, int _tau_offset, double[] w, int _w_offset, int ldw); + protected abstract void dlatrdK(String uplo, int n, int nb, double[] a, int offseta, int lda, double[] e, int offsete, double[] tau, int offsettau, double[] w, int offsetw, int ldw); public void dlatrs(String uplo, String trans, String diag, String normin, int n, double[] a, int lda, double[] x, org.netlib.util.doubleW scale, double[] cnorm, org.netlib.util.intW info) { dlatrs(uplo, trans, diag, normin, n, a, 0, lda, x, 0, scale, cnorm, 0, info); } - public void dlatrs(String uplo, String trans, String diag, String normin, int n, double[] a, int _a_offset, int lda, double[] x, int _x_offset, org.netlib.util.doubleW scale, double[] cnorm, int _cnorm_offset, org.netlib.util.intW info) { + public void dlatrs(String uplo, String trans, String diag, String normin, int n, double[] a, int offseta, int lda, double[] x, int offsetx, org.netlib.util.doubleW scale, double[] cnorm, int offsetcnorm, org.netlib.util.intW info) { //FIXME Add arguments check - dlatrsK(uplo, trans, diag, normin, n, a, _a_offset, lda, x, _x_offset, scale, cnorm, _cnorm_offset, info); + dlatrsK(uplo, trans, diag, normin, n, a, offseta, lda, x, offsetx, scale, cnorm, offsetcnorm, info); } - protected abstract void dlatrsK(String uplo, String trans, String diag, String normin, int n, double[] a, int _a_offset, int lda, double[] x, int _x_offset, org.netlib.util.doubleW scale, double[] cnorm, int _cnorm_offset, org.netlib.util.intW info); + protected abstract void dlatrsK(String uplo, String trans, String diag, String normin, int n, double[] a, int offseta, int lda, double[] x, int offsetx, org.netlib.util.doubleW scale, double[] cnorm, int offsetcnorm, org.netlib.util.intW info); public void dlatrz(int m, int n, int l, double[] a, int lda, double[] tau, double[] work) { dlatrz(m, n, l, a, 0, lda, tau, 0, work, 0); } - public void dlatrz(int m, int n, int l, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset) { + public void dlatrz(int m, int n, int l, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork) { //FIXME Add arguments check - dlatrzK(m, n, l, a, _a_offset, lda, tau, _tau_offset, work, _work_offset); + dlatrzK(m, n, l, a, offseta, lda, tau, offsettau, work, offsetwork); } - protected abstract void dlatrzK(int m, int n, int l, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset); + protected abstract void dlatrzK(int m, int n, int l, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork); public void dlatzm(String side, int m, int n, double[] v, int incv, double tau, double[] c1, double[] c2, int Ldc, double[] work) { dlatzm(side, m, n, v, 0, incv, tau, c1, 0, c2, 0, Ldc, work, 0); } - public void dlatzm(String side, int m, int n, double[] v, int _v_offset, int incv, double tau, double[] c1, int _c1_offset, double[] c2, int _c2_offset, int Ldc, double[] work, int _work_offset) { + public void dlatzm(String side, int m, int n, double[] v, int offsetv, int incv, double tau, double[] c1, int offsetc1, double[] c2, int offsetc2, int Ldc, double[] work, int offsetwork) { //FIXME Add arguments check - dlatzmK(side, m, n, v, _v_offset, incv, tau, c1, _c1_offset, c2, _c2_offset, Ldc, work, _work_offset); + dlatzmK(side, m, n, v, offsetv, incv, tau, c1, offsetc1, c2, offsetc2, Ldc, work, offsetwork); } - protected abstract void dlatzmK(String side, int m, int n, double[] v, int _v_offset, int incv, double tau, double[] c1, int _c1_offset, double[] c2, int _c2_offset, int Ldc, double[] work, int _work_offset); + protected abstract void dlatzmK(String side, int m, int n, double[] v, int offsetv, int incv, double tau, double[] c1, int offsetc1, double[] c2, int offsetc2, int Ldc, double[] work, int offsetwork); public void dlauu2(String uplo, int n, double[] a, int lda, org.netlib.util.intW info) { dlauu2(uplo, n, a, 0, lda, info); } - public void dlauu2(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info) { + public void dlauu2(String uplo, int n, double[] a, int offseta, int lda, org.netlib.util.intW info) { //FIXME Add arguments check - dlauu2K(uplo, n, a, _a_offset, lda, info); + dlauu2K(uplo, n, a, offseta, lda, info); } - protected abstract void dlauu2K(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected abstract void dlauu2K(String uplo, int n, double[] a, int offseta, int lda, org.netlib.util.intW info); public void dlauum(String uplo, int n, double[] a, int lda, org.netlib.util.intW info) { dlauum(uplo, n, a, 0, lda, info); } - public void dlauum(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info) { + public void dlauum(String uplo, int n, double[] a, int offseta, int lda, org.netlib.util.intW info) { //FIXME Add arguments check - dlauumK(uplo, n, a, _a_offset, lda, info); + dlauumK(uplo, n, a, offseta, lda, info); } - protected abstract void dlauumK(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected abstract void dlauumK(String uplo, int n, double[] a, int offseta, int lda, org.netlib.util.intW info); public void dlazq3(int i0, org.netlib.util.intW n0, double[] z, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW sigma, org.netlib.util.doubleW desig, org.netlib.util.doubleW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee, org.netlib.util.intW ttype, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dn1, org.netlib.util.doubleW dn2, org.netlib.util.doubleW tau) { dlazq3(i0, n0, z, 0, pp, dmin, sigma, desig, qmax, nfail, iter, ndiv, ieee, ttype, dmin1, dmin2, dn, dn1, dn2, tau); } - public void dlazq3(int i0, org.netlib.util.intW n0, double[] z, int _z_offset, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW sigma, org.netlib.util.doubleW desig, org.netlib.util.doubleW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee, org.netlib.util.intW ttype, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dn1, org.netlib.util.doubleW dn2, org.netlib.util.doubleW tau) { + public void dlazq3(int i0, org.netlib.util.intW n0, double[] z, int offsetz, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW sigma, org.netlib.util.doubleW desig, org.netlib.util.doubleW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee, org.netlib.util.intW ttype, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dn1, org.netlib.util.doubleW dn2, org.netlib.util.doubleW tau) { //FIXME Add arguments check - dlazq3K(i0, n0, z, _z_offset, pp, dmin, sigma, desig, qmax, nfail, iter, ndiv, ieee, ttype, dmin1, dmin2, dn, dn1, dn2, tau); + dlazq3K(i0, n0, z, offsetz, pp, dmin, sigma, desig, qmax, nfail, iter, ndiv, ieee, ttype, dmin1, dmin2, dn, dn1, dn2, tau); } - protected abstract void dlazq3K(int i0, org.netlib.util.intW n0, double[] z, int _z_offset, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW sigma, org.netlib.util.doubleW desig, org.netlib.util.doubleW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee, org.netlib.util.intW ttype, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dn1, org.netlib.util.doubleW dn2, org.netlib.util.doubleW tau); + protected abstract void dlazq3K(int i0, org.netlib.util.intW n0, double[] z, int offsetz, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW sigma, org.netlib.util.doubleW desig, org.netlib.util.doubleW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee, org.netlib.util.intW ttype, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dn1, org.netlib.util.doubleW dn2, org.netlib.util.doubleW tau); public void dlazq4(int i0, int n0, double[] z, int pp, int n0in, double dmin, double dmin1, double dmin2, double dn, double dn1, double dn2, org.netlib.util.doubleW tau, org.netlib.util.intW ttype, org.netlib.util.doubleW g) { dlazq4(i0, n0, z, 0, pp, n0in, dmin, dmin1, dmin2, dn, dn1, dn2, tau, ttype, g); } - public void dlazq4(int i0, int n0, double[] z, int _z_offset, int pp, int n0in, double dmin, double dmin1, double dmin2, double dn, double dn1, double dn2, org.netlib.util.doubleW tau, org.netlib.util.intW ttype, org.netlib.util.doubleW g) { + public void dlazq4(int i0, int n0, double[] z, int offsetz, int pp, int n0in, double dmin, double dmin1, double dmin2, double dn, double dn1, double dn2, org.netlib.util.doubleW tau, org.netlib.util.intW ttype, org.netlib.util.doubleW g) { //FIXME Add arguments check - dlazq4K(i0, n0, z, _z_offset, pp, n0in, dmin, dmin1, dmin2, dn, dn1, dn2, tau, ttype, g); + dlazq4K(i0, n0, z, offsetz, pp, n0in, dmin, dmin1, dmin2, dn, dn1, dn2, tau, ttype, g); } - protected abstract void dlazq4K(int i0, int n0, double[] z, int _z_offset, int pp, int n0in, double dmin, double dmin1, double dmin2, double dn, double dn1, double dn2, org.netlib.util.doubleW tau, org.netlib.util.intW ttype, org.netlib.util.doubleW g); + protected abstract void dlazq4K(int i0, int n0, double[] z, int offsetz, int pp, int n0in, double dmin, double dmin1, double dmin2, double dn, double dn1, double dn2, org.netlib.util.doubleW tau, org.netlib.util.intW ttype, org.netlib.util.doubleW g); public void dopgtr(String uplo, int n, double[] ap, double[] tau, double[] q, int ldq, double[] work, org.netlib.util.intW info) { dopgtr(uplo, n, ap, 0, tau, 0, q, 0, ldq, work, 0, info); } - public void dopgtr(String uplo, int n, double[] ap, int _ap_offset, double[] tau, int _tau_offset, double[] q, int _q_offset, int ldq, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dopgtr(String uplo, int n, double[] ap, int offsetap, double[] tau, int offsettau, double[] q, int offsetq, int ldq, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dopgtrK(uplo, n, ap, _ap_offset, tau, _tau_offset, q, _q_offset, ldq, work, _work_offset, info); + dopgtrK(uplo, n, ap, offsetap, tau, offsettau, q, offsetq, ldq, work, offsetwork, info); } - protected abstract void dopgtrK(String uplo, int n, double[] ap, int _ap_offset, double[] tau, int _tau_offset, double[] q, int _q_offset, int ldq, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dopgtrK(String uplo, int n, double[] ap, int offsetap, double[] tau, int offsettau, double[] q, int offsetq, int ldq, double[] work, int offsetwork, org.netlib.util.intW info); public void dopmtr(String side, String uplo, String trans, int m, int n, double[] ap, double[] tau, double[] c, int Ldc, double[] work, org.netlib.util.intW info) { dopmtr(side, uplo, trans, m, n, ap, 0, tau, 0, c, 0, Ldc, work, 0, info); } - public void dopmtr(String side, String uplo, String trans, int m, int n, double[] ap, int _ap_offset, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dopmtr(String side, String uplo, String trans, int m, int n, double[] ap, int offsetap, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dopmtrK(side, uplo, trans, m, n, ap, _ap_offset, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + dopmtrK(side, uplo, trans, m, n, ap, offsetap, tau, offsettau, c, offsetc, Ldc, work, offsetwork, info); } - protected abstract void dopmtrK(String side, String uplo, String trans, int m, int n, double[] ap, int _ap_offset, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dopmtrK(String side, String uplo, String trans, int m, int n, double[] ap, int offsetap, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info); public void dorg2l(int m, int n, int k, double[] a, int lda, double[] tau, double[] work, org.netlib.util.intW info) { dorg2l(m, n, k, a, 0, lda, tau, 0, work, 0, info); } - public void dorg2l(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dorg2l(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dorg2lK(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + dorg2lK(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected abstract void dorg2lK(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dorg2lK(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); public void dorg2r(int m, int n, int k, double[] a, int lda, double[] tau, double[] work, org.netlib.util.intW info) { dorg2r(m, n, k, a, 0, lda, tau, 0, work, 0, info); } - public void dorg2r(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dorg2r(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dorg2rK(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + dorg2rK(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected abstract void dorg2rK(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dorg2rK(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); public void dorgbr(String vect, int m, int n, int k, double[] a, int lda, double[] tau, double[] work, int lwork, org.netlib.util.intW info) { dorgbr(vect, m, n, k, a, 0, lda, tau, 0, work, 0, lwork, info); } - public void dorgbr(String vect, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dorgbr(String vect, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dorgbrK(vect, m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + dorgbrK(vect, m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected abstract void dorgbrK(String vect, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dorgbrK(String vect, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dorghr(int n, int ilo, int ihi, double[] a, int lda, double[] tau, double[] work, int lwork, org.netlib.util.intW info) { dorghr(n, ilo, ihi, a, 0, lda, tau, 0, work, 0, lwork, info); } - public void dorghr(int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dorghr(int n, int ilo, int ihi, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dorghrK(n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + dorghrK(n, ilo, ihi, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected abstract void dorghrK(int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dorghrK(int n, int ilo, int ihi, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dorgl2(int m, int n, int k, double[] a, int lda, double[] tau, double[] work, org.netlib.util.intW info) { dorgl2(m, n, k, a, 0, lda, tau, 0, work, 0, info); } - public void dorgl2(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dorgl2(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dorgl2K(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + dorgl2K(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected abstract void dorgl2K(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dorgl2K(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); public void dorglq(int m, int n, int k, double[] a, int lda, double[] tau, double[] work, int lwork, org.netlib.util.intW info) { dorglq(m, n, k, a, 0, lda, tau, 0, work, 0, lwork, info); } - public void dorglq(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dorglq(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dorglqK(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + dorglqK(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected abstract void dorglqK(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dorglqK(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dorgql(int m, int n, int k, double[] a, int lda, double[] tau, double[] work, int lwork, org.netlib.util.intW info) { dorgql(m, n, k, a, 0, lda, tau, 0, work, 0, lwork, info); } - public void dorgql(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dorgql(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dorgqlK(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + dorgqlK(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected abstract void dorgqlK(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dorgqlK(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dorgqr(int m, int n, int k, double[] a, int lda, double[] tau, double[] work, int lwork, org.netlib.util.intW info) { dorgqr(m, n, k, a, 0, lda, tau, 0, work, 0, lwork, info); } - public void dorgqr(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dorgqr(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dorgqrK(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + dorgqrK(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected abstract void dorgqrK(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dorgqrK(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dorgr2(int m, int n, int k, double[] a, int lda, double[] tau, double[] work, org.netlib.util.intW info) { dorgr2(m, n, k, a, 0, lda, tau, 0, work, 0, info); } - public void dorgr2(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dorgr2(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dorgr2K(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + dorgr2K(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected abstract void dorgr2K(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dorgr2K(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); public void dorgrq(int m, int n, int k, double[] a, int lda, double[] tau, double[] work, int lwork, org.netlib.util.intW info) { dorgrq(m, n, k, a, 0, lda, tau, 0, work, 0, lwork, info); } - public void dorgrq(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dorgrq(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dorgrqK(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + dorgrqK(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected abstract void dorgrqK(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dorgrqK(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dorgtr(String uplo, int n, double[] a, int lda, double[] tau, double[] work, int lwork, org.netlib.util.intW info) { dorgtr(uplo, n, a, 0, lda, tau, 0, work, 0, lwork, info); } - public void dorgtr(String uplo, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dorgtr(String uplo, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dorgtrK(uplo, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + dorgtrK(uplo, n, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected abstract void dorgtrK(String uplo, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dorgtrK(String uplo, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dorm2l(String side, String trans, int m, int n, int k, double[] a, int lda, double[] tau, double[] c, int Ldc, double[] work, org.netlib.util.intW info) { dorm2l(side, trans, m, n, k, a, 0, lda, tau, 0, c, 0, Ldc, work, 0, info); } - public void dorm2l(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dorm2l(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dorm2lK(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + dorm2lK(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, info); } - protected abstract void dorm2lK(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dorm2lK(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info); public void dorm2r(String side, String trans, int m, int n, int k, double[] a, int lda, double[] tau, double[] c, int Ldc, double[] work, org.netlib.util.intW info) { dorm2r(side, trans, m, n, k, a, 0, lda, tau, 0, c, 0, Ldc, work, 0, info); } - public void dorm2r(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dorm2r(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dorm2rK(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + dorm2rK(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, info); } - protected abstract void dorm2rK(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dorm2rK(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info); public void dormbr(String vect, String side, String trans, int m, int n, int k, double[] a, int lda, double[] tau, double[] c, int Ldc, double[] work, int lwork, org.netlib.util.intW info) { dormbr(vect, side, trans, m, n, k, a, 0, lda, tau, 0, c, 0, Ldc, work, 0, lwork, info); } - public void dormbr(String vect, String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dormbr(String vect, String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dormbrK(vect, side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + dormbrK(vect, side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected abstract void dormbrK(String vect, String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dormbrK(String vect, String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dormhr(String side, String trans, int m, int n, int ilo, int ihi, double[] a, int lda, double[] tau, double[] c, int Ldc, double[] work, int lwork, org.netlib.util.intW info) { dormhr(side, trans, m, n, ilo, ihi, a, 0, lda, tau, 0, c, 0, Ldc, work, 0, lwork, info); } - public void dormhr(String side, String trans, int m, int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dormhr(String side, String trans, int m, int n, int ilo, int ihi, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dormhrK(side, trans, m, n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + dormhrK(side, trans, m, n, ilo, ihi, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected abstract void dormhrK(String side, String trans, int m, int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dormhrK(String side, String trans, int m, int n, int ilo, int ihi, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dorml2(String side, String trans, int m, int n, int k, double[] a, int lda, double[] tau, double[] c, int Ldc, double[] work, org.netlib.util.intW info) { dorml2(side, trans, m, n, k, a, 0, lda, tau, 0, c, 0, Ldc, work, 0, info); } - public void dorml2(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dorml2(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dorml2K(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + dorml2K(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, info); } - protected abstract void dorml2K(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dorml2K(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info); public void dormlq(String side, String trans, int m, int n, int k, double[] a, int lda, double[] tau, double[] c, int Ldc, double[] work, int lwork, org.netlib.util.intW info) { dormlq(side, trans, m, n, k, a, 0, lda, tau, 0, c, 0, Ldc, work, 0, lwork, info); } - public void dormlq(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dormlq(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dormlqK(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + dormlqK(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected abstract void dormlqK(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dormlqK(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dormql(String side, String trans, int m, int n, int k, double[] a, int lda, double[] tau, double[] c, int Ldc, double[] work, int lwork, org.netlib.util.intW info) { dormql(side, trans, m, n, k, a, 0, lda, tau, 0, c, 0, Ldc, work, 0, lwork, info); } - public void dormql(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dormql(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dormqlK(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + dormqlK(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected abstract void dormqlK(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dormqlK(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dormqr(String side, String trans, int m, int n, int k, double[] a, int lda, double[] tau, double[] c, int Ldc, double[] work, int lwork, org.netlib.util.intW info) { dormqr(side, trans, m, n, k, a, 0, lda, tau, 0, c, 0, Ldc, work, 0, lwork, info); } - public void dormqr(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dormqr(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dormqrK(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + dormqrK(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected abstract void dormqrK(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dormqrK(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dormr2(String side, String trans, int m, int n, int k, double[] a, int lda, double[] tau, double[] c, int Ldc, double[] work, org.netlib.util.intW info) { dormr2(side, trans, m, n, k, a, 0, lda, tau, 0, c, 0, Ldc, work, 0, info); } - public void dormr2(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dormr2(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dormr2K(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + dormr2K(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, info); } - protected abstract void dormr2K(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dormr2K(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info); public void dormr3(String side, String trans, int m, int n, int k, int l, double[] a, int lda, double[] tau, double[] c, int Ldc, double[] work, org.netlib.util.intW info) { dormr3(side, trans, m, n, k, l, a, 0, lda, tau, 0, c, 0, Ldc, work, 0, info); } - public void dormr3(String side, String trans, int m, int n, int k, int l, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dormr3(String side, String trans, int m, int n, int k, int l, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dormr3K(side, trans, m, n, k, l, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + dormr3K(side, trans, m, n, k, l, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, info); } - protected abstract void dormr3K(String side, String trans, int m, int n, int k, int l, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dormr3K(String side, String trans, int m, int n, int k, int l, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info); public void dormrq(String side, String trans, int m, int n, int k, double[] a, int lda, double[] tau, double[] c, int Ldc, double[] work, int lwork, org.netlib.util.intW info) { dormrq(side, trans, m, n, k, a, 0, lda, tau, 0, c, 0, Ldc, work, 0, lwork, info); } - public void dormrq(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dormrq(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dormrqK(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + dormrqK(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected abstract void dormrqK(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dormrqK(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dormrz(String side, String trans, int m, int n, int k, int l, double[] a, int lda, double[] tau, double[] c, int Ldc, double[] work, int lwork, org.netlib.util.intW info) { dormrz(side, trans, m, n, k, l, a, 0, lda, tau, 0, c, 0, Ldc, work, 0, lwork, info); } - public void dormrz(String side, String trans, int m, int n, int k, int l, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dormrz(String side, String trans, int m, int n, int k, int l, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dormrzK(side, trans, m, n, k, l, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + dormrzK(side, trans, m, n, k, l, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected abstract void dormrzK(String side, String trans, int m, int n, int k, int l, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dormrzK(String side, String trans, int m, int n, int k, int l, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dormtr(String side, String uplo, String trans, int m, int n, double[] a, int lda, double[] tau, double[] c, int Ldc, double[] work, int lwork, org.netlib.util.intW info) { dormtr(side, uplo, trans, m, n, a, 0, lda, tau, 0, c, 0, Ldc, work, 0, lwork, info); } - public void dormtr(String side, String uplo, String trans, int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dormtr(String side, String uplo, String trans, int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dormtrK(side, uplo, trans, m, n, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + dormtrK(side, uplo, trans, m, n, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected abstract void dormtrK(String side, String uplo, String trans, int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dormtrK(String side, String uplo, String trans, int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dpbcon(String uplo, int n, int kd, double[] ab, int ldab, double anorm, org.netlib.util.doubleW rcond, double[] work, int[] iwork, org.netlib.util.intW info) { dpbcon(uplo, n, kd, ab, 0, ldab, anorm, rcond, work, 0, iwork, 0, info); } - public void dpbcon(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dpbcon(String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dpbconK(uplo, n, kd, ab, _ab_offset, ldab, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + dpbconK(uplo, n, kd, ab, offsetab, ldab, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dpbconK(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dpbconK(String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dpbequ(String uplo, int n, int kd, double[] ab, int ldab, double[] s, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info) { dpbequ(uplo, n, kd, ab, 0, ldab, s, 0, scond, amax, info); } - public void dpbequ(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] s, int _s_offset, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info) { + public void dpbequ(String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double[] s, int offsets, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info) { //FIXME Add arguments check - dpbequK(uplo, n, kd, ab, _ab_offset, ldab, s, _s_offset, scond, amax, info); + dpbequK(uplo, n, kd, ab, offsetab, ldab, s, offsets, scond, amax, info); } - protected abstract void dpbequK(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] s, int _s_offset, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info); + protected abstract void dpbequK(String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double[] s, int offsets, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info); public void dpbrfs(String uplo, int n, int kd, int nrhs, double[] ab, int ldab, double[] afb, int ldafb, double[] b, int ldb, double[] x, int ldx, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info) { dpbrfs(uplo, n, kd, nrhs, ab, 0, ldab, afb, 0, ldafb, b, 0, ldb, x, 0, ldx, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void dpbrfs(String uplo, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] afb, int _afb_offset, int ldafb, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dpbrfs(String uplo, int n, int kd, int nrhs, double[] ab, int offsetab, int ldab, double[] afb, int offsetafb, int ldafb, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dpbrfsK(uplo, n, kd, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + dpbrfsK(uplo, n, kd, nrhs, ab, offsetab, ldab, afb, offsetafb, ldafb, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dpbrfsK(String uplo, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] afb, int _afb_offset, int ldafb, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dpbrfsK(String uplo, int n, int kd, int nrhs, double[] ab, int offsetab, int ldab, double[] afb, int offsetafb, int ldafb, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dpbstf(String uplo, int n, int kd, double[] ab, int ldab, org.netlib.util.intW info) { dpbstf(uplo, n, kd, ab, 0, ldab, info); } - public void dpbstf(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, org.netlib.util.intW info) { + public void dpbstf(String uplo, int n, int kd, double[] ab, int offsetab, int ldab, org.netlib.util.intW info) { //FIXME Add arguments check - dpbstfK(uplo, n, kd, ab, _ab_offset, ldab, info); + dpbstfK(uplo, n, kd, ab, offsetab, ldab, info); } - protected abstract void dpbstfK(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, org.netlib.util.intW info); + protected abstract void dpbstfK(String uplo, int n, int kd, double[] ab, int offsetab, int ldab, org.netlib.util.intW info); public void dpbsv(String uplo, int n, int kd, int nrhs, double[] ab, int ldab, double[] b, int ldb, org.netlib.util.intW info) { dpbsv(uplo, n, kd, nrhs, ab, 0, ldab, b, 0, ldb, info); } - public void dpbsv(String uplo, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void dpbsv(String uplo, int n, int kd, int nrhs, double[] ab, int offsetab, int ldab, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - dpbsvK(uplo, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, info); + dpbsvK(uplo, n, kd, nrhs, ab, offsetab, ldab, b, offsetb, ldb, info); } - protected abstract void dpbsvK(String uplo, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void dpbsvK(String uplo, int n, int kd, int nrhs, double[] ab, int offsetab, int ldab, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dpbsvx(String fact, String uplo, int n, int kd, int nrhs, double[] ab, int ldab, double[] afb, int ldafb, org.netlib.util.StringW equed, double[] s, double[] b, int ldb, double[] x, int ldx, org.netlib.util.doubleW rcond, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info) { dpbsvx(fact, uplo, n, kd, nrhs, ab, 0, ldab, afb, 0, ldafb, equed, s, 0, b, 0, ldb, x, 0, ldx, rcond, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void dpbsvx(String fact, String uplo, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] afb, int _afb_offset, int ldafb, org.netlib.util.StringW equed, double[] s, int _s_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dpbsvx(String fact, String uplo, int n, int kd, int nrhs, double[] ab, int offsetab, int ldab, double[] afb, int offsetafb, int ldafb, org.netlib.util.StringW equed, double[] s, int offsets, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dpbsvxK(fact, uplo, n, kd, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, equed, s, _s_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + dpbsvxK(fact, uplo, n, kd, nrhs, ab, offsetab, ldab, afb, offsetafb, ldafb, equed, s, offsets, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dpbsvxK(String fact, String uplo, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] afb, int _afb_offset, int ldafb, org.netlib.util.StringW equed, double[] s, int _s_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dpbsvxK(String fact, String uplo, int n, int kd, int nrhs, double[] ab, int offsetab, int ldab, double[] afb, int offsetafb, int ldafb, org.netlib.util.StringW equed, double[] s, int offsets, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dpbtf2(String uplo, int n, int kd, double[] ab, int ldab, org.netlib.util.intW info) { dpbtf2(uplo, n, kd, ab, 0, ldab, info); } - public void dpbtf2(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, org.netlib.util.intW info) { + public void dpbtf2(String uplo, int n, int kd, double[] ab, int offsetab, int ldab, org.netlib.util.intW info) { //FIXME Add arguments check - dpbtf2K(uplo, n, kd, ab, _ab_offset, ldab, info); + dpbtf2K(uplo, n, kd, ab, offsetab, ldab, info); } - protected abstract void dpbtf2K(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, org.netlib.util.intW info); + protected abstract void dpbtf2K(String uplo, int n, int kd, double[] ab, int offsetab, int ldab, org.netlib.util.intW info); public void dpbtrf(String uplo, int n, int kd, double[] ab, int ldab, org.netlib.util.intW info) { dpbtrf(uplo, n, kd, ab, 0, ldab, info); } - public void dpbtrf(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, org.netlib.util.intW info) { + public void dpbtrf(String uplo, int n, int kd, double[] ab, int offsetab, int ldab, org.netlib.util.intW info) { //FIXME Add arguments check - dpbtrfK(uplo, n, kd, ab, _ab_offset, ldab, info); + dpbtrfK(uplo, n, kd, ab, offsetab, ldab, info); } - protected abstract void dpbtrfK(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, org.netlib.util.intW info); + protected abstract void dpbtrfK(String uplo, int n, int kd, double[] ab, int offsetab, int ldab, org.netlib.util.intW info); public void dpbtrs(String uplo, int n, int kd, int nrhs, double[] ab, int ldab, double[] b, int ldb, org.netlib.util.intW info) { dpbtrs(uplo, n, kd, nrhs, ab, 0, ldab, b, 0, ldb, info); } - public void dpbtrs(String uplo, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void dpbtrs(String uplo, int n, int kd, int nrhs, double[] ab, int offsetab, int ldab, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - dpbtrsK(uplo, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, info); + dpbtrsK(uplo, n, kd, nrhs, ab, offsetab, ldab, b, offsetb, ldb, info); } - protected abstract void dpbtrsK(String uplo, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void dpbtrsK(String uplo, int n, int kd, int nrhs, double[] ab, int offsetab, int ldab, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dpocon(String uplo, int n, double[] a, int lda, double anorm, org.netlib.util.doubleW rcond, double[] work, int[] iwork, org.netlib.util.intW info) { dpocon(uplo, n, a, 0, lda, anorm, rcond, work, 0, iwork, 0, info); } - public void dpocon(String uplo, int n, double[] a, int _a_offset, int lda, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dpocon(String uplo, int n, double[] a, int offseta, int lda, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dpoconK(uplo, n, a, _a_offset, lda, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + dpoconK(uplo, n, a, offseta, lda, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dpoconK(String uplo, int n, double[] a, int _a_offset, int lda, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dpoconK(String uplo, int n, double[] a, int offseta, int lda, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dpoequ(int n, double[] a, int lda, double[] s, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info) { dpoequ(n, a, 0, lda, s, 0, scond, amax, info); } - public void dpoequ(int n, double[] a, int _a_offset, int lda, double[] s, int _s_offset, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info) { + public void dpoequ(int n, double[] a, int offseta, int lda, double[] s, int offsets, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info) { //FIXME Add arguments check - dpoequK(n, a, _a_offset, lda, s, _s_offset, scond, amax, info); + dpoequK(n, a, offseta, lda, s, offsets, scond, amax, info); } - protected abstract void dpoequK(int n, double[] a, int _a_offset, int lda, double[] s, int _s_offset, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info); + protected abstract void dpoequK(int n, double[] a, int offseta, int lda, double[] s, int offsets, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info); public void dporfs(String uplo, int n, int nrhs, double[] a, int lda, double[] af, int ldaf, double[] b, int ldb, double[] x, int ldx, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info) { dporfs(uplo, n, nrhs, a, 0, lda, af, 0, ldaf, b, 0, ldb, x, 0, ldx, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void dporfs(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dporfs(String uplo, int n, int nrhs, double[] a, int offseta, int lda, double[] af, int offsetaf, int ldaf, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dporfsK(uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + dporfsK(uplo, n, nrhs, a, offseta, lda, af, offsetaf, ldaf, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dporfsK(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dporfsK(String uplo, int n, int nrhs, double[] a, int offseta, int lda, double[] af, int offsetaf, int ldaf, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dposv(String uplo, int n, int nrhs, double[] a, int lda, double[] b, int ldb, org.netlib.util.intW info) { dposv(uplo, n, nrhs, a, 0, lda, b, 0, ldb, info); } - public void dposv(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void dposv(String uplo, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - dposvK(uplo, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, info); + dposvK(uplo, n, nrhs, a, offseta, lda, b, offsetb, ldb, info); } - protected abstract void dposvK(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void dposvK(String uplo, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dposvx(String fact, String uplo, int n, int nrhs, double[] a, int lda, double[] af, int ldaf, org.netlib.util.StringW equed, double[] s, double[] b, int ldb, double[] x, int ldx, org.netlib.util.doubleW rcond, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info) { dposvx(fact, uplo, n, nrhs, a, 0, lda, af, 0, ldaf, equed, s, 0, b, 0, ldb, x, 0, ldx, rcond, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void dposvx(String fact, String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, org.netlib.util.StringW equed, double[] s, int _s_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dposvx(String fact, String uplo, int n, int nrhs, double[] a, int offseta, int lda, double[] af, int offsetaf, int ldaf, org.netlib.util.StringW equed, double[] s, int offsets, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dposvxK(fact, uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, equed, s, _s_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + dposvxK(fact, uplo, n, nrhs, a, offseta, lda, af, offsetaf, ldaf, equed, s, offsets, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dposvxK(String fact, String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, org.netlib.util.StringW equed, double[] s, int _s_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dposvxK(String fact, String uplo, int n, int nrhs, double[] a, int offseta, int lda, double[] af, int offsetaf, int ldaf, org.netlib.util.StringW equed, double[] s, int offsets, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dpotf2(String uplo, int n, double[] a, int lda, org.netlib.util.intW info) { dpotf2(uplo, n, a, 0, lda, info); } - public void dpotf2(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info) { + public void dpotf2(String uplo, int n, double[] a, int offseta, int lda, org.netlib.util.intW info) { //FIXME Add arguments check - dpotf2K(uplo, n, a, _a_offset, lda, info); + dpotf2K(uplo, n, a, offseta, lda, info); } - protected abstract void dpotf2K(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected abstract void dpotf2K(String uplo, int n, double[] a, int offseta, int lda, org.netlib.util.intW info); public void dpotrf(String uplo, int n, double[] a, int lda, org.netlib.util.intW info) { dpotrf(uplo, n, a, 0, lda, info); } - public void dpotrf(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info) { + public void dpotrf(String uplo, int n, double[] a, int offseta, int lda, org.netlib.util.intW info) { //FIXME Add arguments check - dpotrfK(uplo, n, a, _a_offset, lda, info); + dpotrfK(uplo, n, a, offseta, lda, info); } - protected abstract void dpotrfK(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected abstract void dpotrfK(String uplo, int n, double[] a, int offseta, int lda, org.netlib.util.intW info); public void dpotri(String uplo, int n, double[] a, int lda, org.netlib.util.intW info) { dpotri(uplo, n, a, 0, lda, info); } - public void dpotri(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info) { + public void dpotri(String uplo, int n, double[] a, int offseta, int lda, org.netlib.util.intW info) { //FIXME Add arguments check - dpotriK(uplo, n, a, _a_offset, lda, info); + dpotriK(uplo, n, a, offseta, lda, info); } - protected abstract void dpotriK(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected abstract void dpotriK(String uplo, int n, double[] a, int offseta, int lda, org.netlib.util.intW info); public void dpotrs(String uplo, int n, int nrhs, double[] a, int lda, double[] b, int ldb, org.netlib.util.intW info) { dpotrs(uplo, n, nrhs, a, 0, lda, b, 0, ldb, info); } - public void dpotrs(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void dpotrs(String uplo, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - dpotrsK(uplo, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, info); + dpotrsK(uplo, n, nrhs, a, offseta, lda, b, offsetb, ldb, info); } - protected abstract void dpotrsK(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void dpotrsK(String uplo, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dppcon(String uplo, int n, double[] ap, double anorm, org.netlib.util.doubleW rcond, double[] work, int[] iwork, org.netlib.util.intW info) { dppcon(uplo, n, ap, 0, anorm, rcond, work, 0, iwork, 0, info); } - public void dppcon(String uplo, int n, double[] ap, int _ap_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dppcon(String uplo, int n, double[] ap, int offsetap, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dppconK(uplo, n, ap, _ap_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + dppconK(uplo, n, ap, offsetap, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dppconK(String uplo, int n, double[] ap, int _ap_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dppconK(String uplo, int n, double[] ap, int offsetap, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dppequ(String uplo, int n, double[] ap, double[] s, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info) { dppequ(uplo, n, ap, 0, s, 0, scond, amax, info); } - public void dppequ(String uplo, int n, double[] ap, int _ap_offset, double[] s, int _s_offset, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info) { + public void dppequ(String uplo, int n, double[] ap, int offsetap, double[] s, int offsets, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info) { //FIXME Add arguments check - dppequK(uplo, n, ap, _ap_offset, s, _s_offset, scond, amax, info); + dppequK(uplo, n, ap, offsetap, s, offsets, scond, amax, info); } - protected abstract void dppequK(String uplo, int n, double[] ap, int _ap_offset, double[] s, int _s_offset, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info); + protected abstract void dppequK(String uplo, int n, double[] ap, int offsetap, double[] s, int offsets, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info); public void dpprfs(String uplo, int n, int nrhs, double[] ap, double[] afp, double[] b, int ldb, double[] x, int ldx, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info) { dpprfs(uplo, n, nrhs, ap, 0, afp, 0, b, 0, ldb, x, 0, ldx, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void dpprfs(String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] afp, int _afp_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dpprfs(String uplo, int n, int nrhs, double[] ap, int offsetap, double[] afp, int offsetafp, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dpprfsK(uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + dpprfsK(uplo, n, nrhs, ap, offsetap, afp, offsetafp, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dpprfsK(String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] afp, int _afp_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dpprfsK(String uplo, int n, int nrhs, double[] ap, int offsetap, double[] afp, int offsetafp, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dppsv(String uplo, int n, int nrhs, double[] ap, double[] b, int ldb, org.netlib.util.intW info) { dppsv(uplo, n, nrhs, ap, 0, b, 0, ldb, info); } - public void dppsv(String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void dppsv(String uplo, int n, int nrhs, double[] ap, int offsetap, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - dppsvK(uplo, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, info); + dppsvK(uplo, n, nrhs, ap, offsetap, b, offsetb, ldb, info); } - protected abstract void dppsvK(String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void dppsvK(String uplo, int n, int nrhs, double[] ap, int offsetap, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dppsvx(String fact, String uplo, int n, int nrhs, double[] ap, double[] afp, org.netlib.util.StringW equed, double[] s, double[] b, int ldb, double[] x, int ldx, org.netlib.util.doubleW rcond, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info) { dppsvx(fact, uplo, n, nrhs, ap, 0, afp, 0, equed, s, 0, b, 0, ldb, x, 0, ldx, rcond, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void dppsvx(String fact, String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] afp, int _afp_offset, org.netlib.util.StringW equed, double[] s, int _s_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dppsvx(String fact, String uplo, int n, int nrhs, double[] ap, int offsetap, double[] afp, int offsetafp, org.netlib.util.StringW equed, double[] s, int offsets, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dppsvxK(fact, uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, equed, s, _s_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + dppsvxK(fact, uplo, n, nrhs, ap, offsetap, afp, offsetafp, equed, s, offsets, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dppsvxK(String fact, String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] afp, int _afp_offset, org.netlib.util.StringW equed, double[] s, int _s_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dppsvxK(String fact, String uplo, int n, int nrhs, double[] ap, int offsetap, double[] afp, int offsetafp, org.netlib.util.StringW equed, double[] s, int offsets, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dpptrf(String uplo, int n, double[] ap, org.netlib.util.intW info) { dpptrf(uplo, n, ap, 0, info); } - public void dpptrf(String uplo, int n, double[] ap, int _ap_offset, org.netlib.util.intW info) { + public void dpptrf(String uplo, int n, double[] ap, int offsetap, org.netlib.util.intW info) { //FIXME Add arguments check - dpptrfK(uplo, n, ap, _ap_offset, info); + dpptrfK(uplo, n, ap, offsetap, info); } - protected abstract void dpptrfK(String uplo, int n, double[] ap, int _ap_offset, org.netlib.util.intW info); + protected abstract void dpptrfK(String uplo, int n, double[] ap, int offsetap, org.netlib.util.intW info); public void dpptri(String uplo, int n, double[] ap, org.netlib.util.intW info) { dpptri(uplo, n, ap, 0, info); } - public void dpptri(String uplo, int n, double[] ap, int _ap_offset, org.netlib.util.intW info) { + public void dpptri(String uplo, int n, double[] ap, int offsetap, org.netlib.util.intW info) { //FIXME Add arguments check - dpptriK(uplo, n, ap, _ap_offset, info); + dpptriK(uplo, n, ap, offsetap, info); } - protected abstract void dpptriK(String uplo, int n, double[] ap, int _ap_offset, org.netlib.util.intW info); + protected abstract void dpptriK(String uplo, int n, double[] ap, int offsetap, org.netlib.util.intW info); public void dpptrs(String uplo, int n, int nrhs, double[] ap, double[] b, int ldb, org.netlib.util.intW info) { dpptrs(uplo, n, nrhs, ap, 0, b, 0, ldb, info); } - public void dpptrs(String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void dpptrs(String uplo, int n, int nrhs, double[] ap, int offsetap, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - dpptrsK(uplo, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, info); + dpptrsK(uplo, n, nrhs, ap, offsetap, b, offsetb, ldb, info); } - protected abstract void dpptrsK(String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void dpptrsK(String uplo, int n, int nrhs, double[] ap, int offsetap, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dptcon(int n, double[] d, double[] e, double anorm, org.netlib.util.doubleW rcond, double[] work, org.netlib.util.intW info) { dptcon(n, d, 0, e, 0, anorm, rcond, work, 0, info); } - public void dptcon(int n, double[] d, int _d_offset, double[] e, int _e_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dptcon(int n, double[] d, int offsetd, double[] e, int offsete, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dptconK(n, d, _d_offset, e, _e_offset, anorm, rcond, work, _work_offset, info); + dptconK(n, d, offsetd, e, offsete, anorm, rcond, work, offsetwork, info); } - protected abstract void dptconK(int n, double[] d, int _d_offset, double[] e, int _e_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dptconK(int n, double[] d, int offsetd, double[] e, int offsete, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, org.netlib.util.intW info); public void dpteqr(String compz, int n, double[] d, double[] e, double[] z, int ldz, double[] work, org.netlib.util.intW info) { dpteqr(compz, n, d, 0, e, 0, z, 0, ldz, work, 0, info); } - public void dpteqr(String compz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dpteqr(String compz, int n, double[] d, int offsetd, double[] e, int offsete, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dpteqrK(compz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, info); + dpteqrK(compz, n, d, offsetd, e, offsete, z, offsetz, ldz, work, offsetwork, info); } - protected abstract void dpteqrK(String compz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dpteqrK(String compz, int n, double[] d, int offsetd, double[] e, int offsete, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info); public void dptrfs(int n, int nrhs, double[] d, double[] e, double[] df, double[] ef, double[] b, int ldb, double[] x, int ldx, double[] ferr, double[] berr, double[] work, org.netlib.util.intW info) { dptrfs(n, nrhs, d, 0, e, 0, df, 0, ef, 0, b, 0, ldb, x, 0, ldx, ferr, 0, berr, 0, work, 0, info); } - public void dptrfs(int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] df, int _df_offset, double[] ef, int _ef_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dptrfs(int n, int nrhs, double[] d, int offsetd, double[] e, int offsete, double[] df, int offsetdf, double[] ef, int offsetef, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dptrfsK(n, nrhs, d, _d_offset, e, _e_offset, df, _df_offset, ef, _ef_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, info); + dptrfsK(n, nrhs, d, offsetd, e, offsete, df, offsetdf, ef, offsetef, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, info); } - protected abstract void dptrfsK(int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] df, int _df_offset, double[] ef, int _ef_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dptrfsK(int n, int nrhs, double[] d, int offsetd, double[] e, int offsete, double[] df, int offsetdf, double[] ef, int offsetef, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, org.netlib.util.intW info); public void dptsv(int n, int nrhs, double[] d, double[] e, double[] b, int ldb, org.netlib.util.intW info) { dptsv(n, nrhs, d, 0, e, 0, b, 0, ldb, info); } - public void dptsv(int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void dptsv(int n, int nrhs, double[] d, int offsetd, double[] e, int offsete, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - dptsvK(n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb, info); + dptsvK(n, nrhs, d, offsetd, e, offsete, b, offsetb, ldb, info); } - protected abstract void dptsvK(int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void dptsvK(int n, int nrhs, double[] d, int offsetd, double[] e, int offsete, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dptsvx(String fact, int n, int nrhs, double[] d, double[] e, double[] df, double[] ef, double[] b, int ldb, double[] x, int ldx, org.netlib.util.doubleW rcond, double[] ferr, double[] berr, double[] work, org.netlib.util.intW info) { dptsvx(fact, n, nrhs, d, 0, e, 0, df, 0, ef, 0, b, 0, ldb, x, 0, ldx, rcond, ferr, 0, berr, 0, work, 0, info); } - public void dptsvx(String fact, int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] df, int _df_offset, double[] ef, int _ef_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dptsvx(String fact, int n, int nrhs, double[] d, int offsetd, double[] e, int offsete, double[] df, int offsetdf, double[] ef, int offsetef, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dptsvxK(fact, n, nrhs, d, _d_offset, e, _e_offset, df, _df_offset, ef, _ef_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, info); + dptsvxK(fact, n, nrhs, d, offsetd, e, offsete, df, offsetdf, ef, offsetef, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, info); } - protected abstract void dptsvxK(String fact, int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] df, int _df_offset, double[] ef, int _ef_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dptsvxK(String fact, int n, int nrhs, double[] d, int offsetd, double[] e, int offsete, double[] df, int offsetdf, double[] ef, int offsetef, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, org.netlib.util.intW info); public void dpttrf(int n, double[] d, double[] e, org.netlib.util.intW info) { dpttrf(n, d, 0, e, 0, info); } - public void dpttrf(int n, double[] d, int _d_offset, double[] e, int _e_offset, org.netlib.util.intW info) { + public void dpttrf(int n, double[] d, int offsetd, double[] e, int offsete, org.netlib.util.intW info) { //FIXME Add arguments check - dpttrfK(n, d, _d_offset, e, _e_offset, info); + dpttrfK(n, d, offsetd, e, offsete, info); } - protected abstract void dpttrfK(int n, double[] d, int _d_offset, double[] e, int _e_offset, org.netlib.util.intW info); + protected abstract void dpttrfK(int n, double[] d, int offsetd, double[] e, int offsete, org.netlib.util.intW info); public void dpttrs(int n, int nrhs, double[] d, double[] e, double[] b, int ldb, org.netlib.util.intW info) { dpttrs(n, nrhs, d, 0, e, 0, b, 0, ldb, info); } - public void dpttrs(int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void dpttrs(int n, int nrhs, double[] d, int offsetd, double[] e, int offsete, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - dpttrsK(n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb, info); + dpttrsK(n, nrhs, d, offsetd, e, offsete, b, offsetb, ldb, info); } - protected abstract void dpttrsK(int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void dpttrsK(int n, int nrhs, double[] d, int offsetd, double[] e, int offsete, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dptts2(int n, int nrhs, double[] d, double[] e, double[] b, int ldb) { dptts2(n, nrhs, d, 0, e, 0, b, 0, ldb); } - public void dptts2(int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] b, int _b_offset, int ldb) { + public void dptts2(int n, int nrhs, double[] d, int offsetd, double[] e, int offsete, double[] b, int offsetb, int ldb) { //FIXME Add arguments check - dptts2K(n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb); + dptts2K(n, nrhs, d, offsetd, e, offsete, b, offsetb, ldb); } - protected abstract void dptts2K(int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] b, int _b_offset, int ldb); + protected abstract void dptts2K(int n, int nrhs, double[] d, int offsetd, double[] e, int offsete, double[] b, int offsetb, int ldb); public void drscl(int n, double sa, double[] sx, int incx) { drscl(n, sa, sx, 0, incx); } - public void drscl(int n, double sa, double[] sx, int _sx_offset, int incx) { + public void drscl(int n, double sa, double[] sx, int offsetsx, int incx) { //FIXME Add arguments check - drsclK(n, sa, sx, _sx_offset, incx); + drsclK(n, sa, sx, offsetsx, incx); } - protected abstract void drsclK(int n, double sa, double[] sx, int _sx_offset, int incx); + protected abstract void drsclK(int n, double sa, double[] sx, int offsetsx, int incx); public void dsbev(String jobz, String uplo, int n, int kd, double[] ab, int ldab, double[] w, double[] z, int ldz, double[] work, org.netlib.util.intW info) { dsbev(jobz, uplo, n, kd, ab, 0, ldab, w, 0, z, 0, ldz, work, 0, info); } - public void dsbev(String jobz, String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dsbev(String jobz, String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dsbevK(jobz, uplo, n, kd, ab, _ab_offset, ldab, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); + dsbevK(jobz, uplo, n, kd, ab, offsetab, ldab, w, offsetw, z, offsetz, ldz, work, offsetwork, info); } - protected abstract void dsbevK(String jobz, String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dsbevK(String jobz, String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info); public void dsbevd(String jobz, String uplo, int n, int kd, double[] ab, int ldab, double[] w, double[] z, int ldz, double[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info) { dsbevd(jobz, uplo, n, kd, ab, 0, ldab, w, 0, z, 0, ldz, work, 0, lwork, iwork, 0, liwork, info); } - public void dsbevd(String jobz, String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { + public void dsbevd(String jobz, String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { //FIXME Add arguments check - dsbevdK(jobz, uplo, n, kd, ab, _ab_offset, ldab, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + dsbevdK(jobz, uplo, n, kd, ab, offsetab, ldab, w, offsetw, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected abstract void dsbevdK(String jobz, String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected abstract void dsbevdK(String jobz, String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void dsbevx(String jobz, String range, String uplo, int n, int kd, double[] ab, int ldab, double[] q, int ldq, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, double[] z, int ldz, double[] work, int[] iwork, int[] ifail, org.netlib.util.intW info) { dsbevx(jobz, range, uplo, n, kd, ab, 0, ldab, q, 0, ldq, vl, vu, il, iu, abstol, m, w, 0, z, 0, ldz, work, 0, iwork, 0, ifail, 0, info); } - public void dsbevx(String jobz, String range, String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] q, int _q_offset, int ldq, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { + public void dsbevx(String jobz, String range, String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double[] q, int offsetq, int ldq, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { //FIXME Add arguments check - dsbevxK(jobz, range, uplo, n, kd, ab, _ab_offset, ldab, q, _q_offset, ldq, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + dsbevxK(jobz, range, uplo, n, kd, ab, offsetab, ldab, q, offsetq, ldq, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, work, offsetwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected abstract void dsbevxK(String jobz, String range, String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] q, int _q_offset, int ldq, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected abstract void dsbevxK(String jobz, String range, String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double[] q, int offsetq, int ldq, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void dsbgst(String vect, String uplo, int n, int ka, int kb, double[] ab, int ldab, double[] bb, int ldbb, double[] x, int ldx, double[] work, org.netlib.util.intW info) { dsbgst(vect, uplo, n, ka, kb, ab, 0, ldab, bb, 0, ldbb, x, 0, ldx, work, 0, info); } - public void dsbgst(String vect, String uplo, int n, int ka, int kb, double[] ab, int _ab_offset, int ldab, double[] bb, int _bb_offset, int ldbb, double[] x, int _x_offset, int ldx, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dsbgst(String vect, String uplo, int n, int ka, int kb, double[] ab, int offsetab, int ldab, double[] bb, int offsetbb, int ldbb, double[] x, int offsetx, int ldx, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dsbgstK(vect, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, x, _x_offset, ldx, work, _work_offset, info); + dsbgstK(vect, uplo, n, ka, kb, ab, offsetab, ldab, bb, offsetbb, ldbb, x, offsetx, ldx, work, offsetwork, info); } - protected abstract void dsbgstK(String vect, String uplo, int n, int ka, int kb, double[] ab, int _ab_offset, int ldab, double[] bb, int _bb_offset, int ldbb, double[] x, int _x_offset, int ldx, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dsbgstK(String vect, String uplo, int n, int ka, int kb, double[] ab, int offsetab, int ldab, double[] bb, int offsetbb, int ldbb, double[] x, int offsetx, int ldx, double[] work, int offsetwork, org.netlib.util.intW info); public void dsbgv(String jobz, String uplo, int n, int ka, int kb, double[] ab, int ldab, double[] bb, int ldbb, double[] w, double[] z, int ldz, double[] work, org.netlib.util.intW info) { dsbgv(jobz, uplo, n, ka, kb, ab, 0, ldab, bb, 0, ldbb, w, 0, z, 0, ldz, work, 0, info); } - public void dsbgv(String jobz, String uplo, int n, int ka, int kb, double[] ab, int _ab_offset, int ldab, double[] bb, int _bb_offset, int ldbb, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dsbgv(String jobz, String uplo, int n, int ka, int kb, double[] ab, int offsetab, int ldab, double[] bb, int offsetbb, int ldbb, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dsbgvK(jobz, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); + dsbgvK(jobz, uplo, n, ka, kb, ab, offsetab, ldab, bb, offsetbb, ldbb, w, offsetw, z, offsetz, ldz, work, offsetwork, info); } - protected abstract void dsbgvK(String jobz, String uplo, int n, int ka, int kb, double[] ab, int _ab_offset, int ldab, double[] bb, int _bb_offset, int ldbb, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dsbgvK(String jobz, String uplo, int n, int ka, int kb, double[] ab, int offsetab, int ldab, double[] bb, int offsetbb, int ldbb, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info); public void dsbgvd(String jobz, String uplo, int n, int ka, int kb, double[] ab, int ldab, double[] bb, int ldbb, double[] w, double[] z, int ldz, double[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info) { dsbgvd(jobz, uplo, n, ka, kb, ab, 0, ldab, bb, 0, ldbb, w, 0, z, 0, ldz, work, 0, lwork, iwork, 0, liwork, info); } - public void dsbgvd(String jobz, String uplo, int n, int ka, int kb, double[] ab, int _ab_offset, int ldab, double[] bb, int _bb_offset, int ldbb, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { + public void dsbgvd(String jobz, String uplo, int n, int ka, int kb, double[] ab, int offsetab, int ldab, double[] bb, int offsetbb, int ldbb, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { //FIXME Add arguments check - dsbgvdK(jobz, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + dsbgvdK(jobz, uplo, n, ka, kb, ab, offsetab, ldab, bb, offsetbb, ldbb, w, offsetw, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected abstract void dsbgvdK(String jobz, String uplo, int n, int ka, int kb, double[] ab, int _ab_offset, int ldab, double[] bb, int _bb_offset, int ldbb, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected abstract void dsbgvdK(String jobz, String uplo, int n, int ka, int kb, double[] ab, int offsetab, int ldab, double[] bb, int offsetbb, int ldbb, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void dsbgvx(String jobz, String range, String uplo, int n, int ka, int kb, double[] ab, int ldab, double[] bb, int ldbb, double[] q, int ldq, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, double[] z, int ldz, double[] work, int[] iwork, int[] ifail, org.netlib.util.intW info) { dsbgvx(jobz, range, uplo, n, ka, kb, ab, 0, ldab, bb, 0, ldbb, q, 0, ldq, vl, vu, il, iu, abstol, m, w, 0, z, 0, ldz, work, 0, iwork, 0, ifail, 0, info); } - public void dsbgvx(String jobz, String range, String uplo, int n, int ka, int kb, double[] ab, int _ab_offset, int ldab, double[] bb, int _bb_offset, int ldbb, double[] q, int _q_offset, int ldq, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { + public void dsbgvx(String jobz, String range, String uplo, int n, int ka, int kb, double[] ab, int offsetab, int ldab, double[] bb, int offsetbb, int ldbb, double[] q, int offsetq, int ldq, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { //FIXME Add arguments check - dsbgvxK(jobz, range, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, q, _q_offset, ldq, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + dsbgvxK(jobz, range, uplo, n, ka, kb, ab, offsetab, ldab, bb, offsetbb, ldbb, q, offsetq, ldq, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, work, offsetwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected abstract void dsbgvxK(String jobz, String range, String uplo, int n, int ka, int kb, double[] ab, int _ab_offset, int ldab, double[] bb, int _bb_offset, int ldbb, double[] q, int _q_offset, int ldq, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected abstract void dsbgvxK(String jobz, String range, String uplo, int n, int ka, int kb, double[] ab, int offsetab, int ldab, double[] bb, int offsetbb, int ldbb, double[] q, int offsetq, int ldq, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void dsbtrd(String vect, String uplo, int n, int kd, double[] ab, int ldab, double[] d, double[] e, double[] q, int ldq, double[] work, org.netlib.util.intW info) { dsbtrd(vect, uplo, n, kd, ab, 0, ldab, d, 0, e, 0, q, 0, ldq, work, 0, info); } - public void dsbtrd(String vect, String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] d, int _d_offset, double[] e, int _e_offset, double[] q, int _q_offset, int ldq, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dsbtrd(String vect, String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double[] d, int offsetd, double[] e, int offsete, double[] q, int offsetq, int ldq, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dsbtrdK(vect, uplo, n, kd, ab, _ab_offset, ldab, d, _d_offset, e, _e_offset, q, _q_offset, ldq, work, _work_offset, info); + dsbtrdK(vect, uplo, n, kd, ab, offsetab, ldab, d, offsetd, e, offsete, q, offsetq, ldq, work, offsetwork, info); } - protected abstract void dsbtrdK(String vect, String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] d, int _d_offset, double[] e, int _e_offset, double[] q, int _q_offset, int ldq, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dsbtrdK(String vect, String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double[] d, int offsetd, double[] e, int offsete, double[] q, int offsetq, int ldq, double[] work, int offsetwork, org.netlib.util.intW info); public void dsgesv(int n, int nrhs, double[] a, int lda, int[] ipiv, double[] b, int ldb, double[] x, int ldx, double[] work, float[] swork, org.netlib.util.intW iter, org.netlib.util.intW info) { dsgesv(n, nrhs, a, 0, lda, ipiv, 0, b, 0, ldb, x, 0, ldx, work, 0, swork, 0, iter, info); } - public void dsgesv(int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] work, int _work_offset, float[] swork, int _swork_offset, org.netlib.util.intW iter, org.netlib.util.intW info) { + public void dsgesv(int n, int nrhs, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] work, int offsetwork, float[] swork, int offsetswork, org.netlib.util.intW iter, org.netlib.util.intW info) { //FIXME Add arguments check - dsgesvK(n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, work, _work_offset, swork, _swork_offset, iter, info); + dsgesvK(n, nrhs, a, offseta, lda, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, work, offsetwork, swork, offsetswork, iter, info); } - protected abstract void dsgesvK(int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] work, int _work_offset, float[] swork, int _swork_offset, org.netlib.util.intW iter, org.netlib.util.intW info); + protected abstract void dsgesvK(int n, int nrhs, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] work, int offsetwork, float[] swork, int offsetswork, org.netlib.util.intW iter, org.netlib.util.intW info); public void dspcon(String uplo, int n, double[] ap, int[] ipiv, double anorm, org.netlib.util.doubleW rcond, double[] work, int[] iwork, org.netlib.util.intW info) { dspcon(uplo, n, ap, 0, ipiv, 0, anorm, rcond, work, 0, iwork, 0, info); } - public void dspcon(String uplo, int n, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dspcon(String uplo, int n, double[] ap, int offsetap, int[] ipiv, int offsetipiv, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dspconK(uplo, n, ap, _ap_offset, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + dspconK(uplo, n, ap, offsetap, ipiv, offsetipiv, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dspconK(String uplo, int n, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dspconK(String uplo, int n, double[] ap, int offsetap, int[] ipiv, int offsetipiv, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dspev(String jobz, String uplo, int n, double[] ap, double[] w, double[] z, int ldz, double[] work, org.netlib.util.intW info) { dspev(jobz, uplo, n, ap, 0, w, 0, z, 0, ldz, work, 0, info); } - public void dspev(String jobz, String uplo, int n, double[] ap, int _ap_offset, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dspev(String jobz, String uplo, int n, double[] ap, int offsetap, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dspevK(jobz, uplo, n, ap, _ap_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); + dspevK(jobz, uplo, n, ap, offsetap, w, offsetw, z, offsetz, ldz, work, offsetwork, info); } - protected abstract void dspevK(String jobz, String uplo, int n, double[] ap, int _ap_offset, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dspevK(String jobz, String uplo, int n, double[] ap, int offsetap, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info); public void dspevd(String jobz, String uplo, int n, double[] ap, double[] w, double[] z, int ldz, double[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info) { dspevd(jobz, uplo, n, ap, 0, w, 0, z, 0, ldz, work, 0, lwork, iwork, 0, liwork, info); } - public void dspevd(String jobz, String uplo, int n, double[] ap, int _ap_offset, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { + public void dspevd(String jobz, String uplo, int n, double[] ap, int offsetap, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { //FIXME Add arguments check - dspevdK(jobz, uplo, n, ap, _ap_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + dspevdK(jobz, uplo, n, ap, offsetap, w, offsetw, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected abstract void dspevdK(String jobz, String uplo, int n, double[] ap, int _ap_offset, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected abstract void dspevdK(String jobz, String uplo, int n, double[] ap, int offsetap, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void dspevx(String jobz, String range, String uplo, int n, double[] ap, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, double[] z, int ldz, double[] work, int[] iwork, int[] ifail, org.netlib.util.intW info) { dspevx(jobz, range, uplo, n, ap, 0, vl, vu, il, iu, abstol, m, w, 0, z, 0, ldz, work, 0, iwork, 0, ifail, 0, info); } - public void dspevx(String jobz, String range, String uplo, int n, double[] ap, int _ap_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { + public void dspevx(String jobz, String range, String uplo, int n, double[] ap, int offsetap, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { //FIXME Add arguments check - dspevxK(jobz, range, uplo, n, ap, _ap_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + dspevxK(jobz, range, uplo, n, ap, offsetap, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, work, offsetwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected abstract void dspevxK(String jobz, String range, String uplo, int n, double[] ap, int _ap_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected abstract void dspevxK(String jobz, String range, String uplo, int n, double[] ap, int offsetap, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void dspgst(int itype, String uplo, int n, double[] ap, double[] bp, org.netlib.util.intW info) { dspgst(itype, uplo, n, ap, 0, bp, 0, info); } - public void dspgst(int itype, String uplo, int n, double[] ap, int _ap_offset, double[] bp, int _bp_offset, org.netlib.util.intW info) { + public void dspgst(int itype, String uplo, int n, double[] ap, int offsetap, double[] bp, int offsetbp, org.netlib.util.intW info) { //FIXME Add arguments check - dspgstK(itype, uplo, n, ap, _ap_offset, bp, _bp_offset, info); + dspgstK(itype, uplo, n, ap, offsetap, bp, offsetbp, info); } - protected abstract void dspgstK(int itype, String uplo, int n, double[] ap, int _ap_offset, double[] bp, int _bp_offset, org.netlib.util.intW info); + protected abstract void dspgstK(int itype, String uplo, int n, double[] ap, int offsetap, double[] bp, int offsetbp, org.netlib.util.intW info); public void dspgv(int itype, String jobz, String uplo, int n, double[] ap, double[] bp, double[] w, double[] z, int ldz, double[] work, org.netlib.util.intW info) { dspgv(itype, jobz, uplo, n, ap, 0, bp, 0, w, 0, z, 0, ldz, work, 0, info); } - public void dspgv(int itype, String jobz, String uplo, int n, double[] ap, int _ap_offset, double[] bp, int _bp_offset, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dspgv(int itype, String jobz, String uplo, int n, double[] ap, int offsetap, double[] bp, int offsetbp, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dspgvK(itype, jobz, uplo, n, ap, _ap_offset, bp, _bp_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); + dspgvK(itype, jobz, uplo, n, ap, offsetap, bp, offsetbp, w, offsetw, z, offsetz, ldz, work, offsetwork, info); } - protected abstract void dspgvK(int itype, String jobz, String uplo, int n, double[] ap, int _ap_offset, double[] bp, int _bp_offset, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dspgvK(int itype, String jobz, String uplo, int n, double[] ap, int offsetap, double[] bp, int offsetbp, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info); public void dspgvd(int itype, String jobz, String uplo, int n, double[] ap, double[] bp, double[] w, double[] z, int ldz, double[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info) { dspgvd(itype, jobz, uplo, n, ap, 0, bp, 0, w, 0, z, 0, ldz, work, 0, lwork, iwork, 0, liwork, info); } - public void dspgvd(int itype, String jobz, String uplo, int n, double[] ap, int _ap_offset, double[] bp, int _bp_offset, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { + public void dspgvd(int itype, String jobz, String uplo, int n, double[] ap, int offsetap, double[] bp, int offsetbp, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { //FIXME Add arguments check - dspgvdK(itype, jobz, uplo, n, ap, _ap_offset, bp, _bp_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + dspgvdK(itype, jobz, uplo, n, ap, offsetap, bp, offsetbp, w, offsetw, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected abstract void dspgvdK(int itype, String jobz, String uplo, int n, double[] ap, int _ap_offset, double[] bp, int _bp_offset, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected abstract void dspgvdK(int itype, String jobz, String uplo, int n, double[] ap, int offsetap, double[] bp, int offsetbp, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void dspgvx(int itype, String jobz, String range, String uplo, int n, double[] ap, double[] bp, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, double[] z, int ldz, double[] work, int[] iwork, int[] ifail, org.netlib.util.intW info) { dspgvx(itype, jobz, range, uplo, n, ap, 0, bp, 0, vl, vu, il, iu, abstol, m, w, 0, z, 0, ldz, work, 0, iwork, 0, ifail, 0, info); } - public void dspgvx(int itype, String jobz, String range, String uplo, int n, double[] ap, int _ap_offset, double[] bp, int _bp_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { + public void dspgvx(int itype, String jobz, String range, String uplo, int n, double[] ap, int offsetap, double[] bp, int offsetbp, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { //FIXME Add arguments check - dspgvxK(itype, jobz, range, uplo, n, ap, _ap_offset, bp, _bp_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + dspgvxK(itype, jobz, range, uplo, n, ap, offsetap, bp, offsetbp, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, work, offsetwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected abstract void dspgvxK(int itype, String jobz, String range, String uplo, int n, double[] ap, int _ap_offset, double[] bp, int _bp_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected abstract void dspgvxK(int itype, String jobz, String range, String uplo, int n, double[] ap, int offsetap, double[] bp, int offsetbp, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void dsprfs(String uplo, int n, int nrhs, double[] ap, double[] afp, int[] ipiv, double[] b, int ldb, double[] x, int ldx, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info) { dsprfs(uplo, n, nrhs, ap, 0, afp, 0, ipiv, 0, b, 0, ldb, x, 0, ldx, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void dsprfs(String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] afp, int _afp_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dsprfs(String uplo, int n, int nrhs, double[] ap, int offsetap, double[] afp, int offsetafp, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dsprfsK(uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + dsprfsK(uplo, n, nrhs, ap, offsetap, afp, offsetafp, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dsprfsK(String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] afp, int _afp_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dsprfsK(String uplo, int n, int nrhs, double[] ap, int offsetap, double[] afp, int offsetafp, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dspsv(String uplo, int n, int nrhs, double[] ap, int[] ipiv, double[] b, int ldb, org.netlib.util.intW info) { dspsv(uplo, n, nrhs, ap, 0, ipiv, 0, b, 0, ldb, info); } - public void dspsv(String uplo, int n, int nrhs, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void dspsv(String uplo, int n, int nrhs, double[] ap, int offsetap, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - dspsvK(uplo, n, nrhs, ap, _ap_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + dspsvK(uplo, n, nrhs, ap, offsetap, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected abstract void dspsvK(String uplo, int n, int nrhs, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void dspsvK(String uplo, int n, int nrhs, double[] ap, int offsetap, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dspsvx(String fact, String uplo, int n, int nrhs, double[] ap, double[] afp, int[] ipiv, double[] b, int ldb, double[] x, int ldx, org.netlib.util.doubleW rcond, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info) { dspsvx(fact, uplo, n, nrhs, ap, 0, afp, 0, ipiv, 0, b, 0, ldb, x, 0, ldx, rcond, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void dspsvx(String fact, String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] afp, int _afp_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dspsvx(String fact, String uplo, int n, int nrhs, double[] ap, int offsetap, double[] afp, int offsetafp, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dspsvxK(fact, uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + dspsvxK(fact, uplo, n, nrhs, ap, offsetap, afp, offsetafp, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dspsvxK(String fact, String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] afp, int _afp_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dspsvxK(String fact, String uplo, int n, int nrhs, double[] ap, int offsetap, double[] afp, int offsetafp, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dsptrd(String uplo, int n, double[] ap, double[] d, double[] e, double[] tau, org.netlib.util.intW info) { dsptrd(uplo, n, ap, 0, d, 0, e, 0, tau, 0, info); } - public void dsptrd(String uplo, int n, double[] ap, int _ap_offset, double[] d, int _d_offset, double[] e, int _e_offset, double[] tau, int _tau_offset, org.netlib.util.intW info) { + public void dsptrd(String uplo, int n, double[] ap, int offsetap, double[] d, int offsetd, double[] e, int offsete, double[] tau, int offsettau, org.netlib.util.intW info) { //FIXME Add arguments check - dsptrdK(uplo, n, ap, _ap_offset, d, _d_offset, e, _e_offset, tau, _tau_offset, info); + dsptrdK(uplo, n, ap, offsetap, d, offsetd, e, offsete, tau, offsettau, info); } - protected abstract void dsptrdK(String uplo, int n, double[] ap, int _ap_offset, double[] d, int _d_offset, double[] e, int _e_offset, double[] tau, int _tau_offset, org.netlib.util.intW info); + protected abstract void dsptrdK(String uplo, int n, double[] ap, int offsetap, double[] d, int offsetd, double[] e, int offsete, double[] tau, int offsettau, org.netlib.util.intW info); public void dsptrf(String uplo, int n, double[] ap, int[] ipiv, org.netlib.util.intW info) { dsptrf(uplo, n, ap, 0, ipiv, 0, info); } - public void dsptrf(String uplo, int n, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { + public void dsptrf(String uplo, int n, double[] ap, int offsetap, int[] ipiv, int offsetipiv, org.netlib.util.intW info) { //FIXME Add arguments check - dsptrfK(uplo, n, ap, _ap_offset, ipiv, _ipiv_offset, info); + dsptrfK(uplo, n, ap, offsetap, ipiv, offsetipiv, info); } - protected abstract void dsptrfK(String uplo, int n, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + protected abstract void dsptrfK(String uplo, int n, double[] ap, int offsetap, int[] ipiv, int offsetipiv, org.netlib.util.intW info); public void dsptri(String uplo, int n, double[] ap, int[] ipiv, double[] work, org.netlib.util.intW info) { dsptri(uplo, n, ap, 0, ipiv, 0, work, 0, info); } - public void dsptri(String uplo, int n, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dsptri(String uplo, int n, double[] ap, int offsetap, int[] ipiv, int offsetipiv, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dsptriK(uplo, n, ap, _ap_offset, ipiv, _ipiv_offset, work, _work_offset, info); + dsptriK(uplo, n, ap, offsetap, ipiv, offsetipiv, work, offsetwork, info); } - protected abstract void dsptriK(String uplo, int n, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dsptriK(String uplo, int n, double[] ap, int offsetap, int[] ipiv, int offsetipiv, double[] work, int offsetwork, org.netlib.util.intW info); public void dsptrs(String uplo, int n, int nrhs, double[] ap, int[] ipiv, double[] b, int ldb, org.netlib.util.intW info) { dsptrs(uplo, n, nrhs, ap, 0, ipiv, 0, b, 0, ldb, info); } - public void dsptrs(String uplo, int n, int nrhs, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void dsptrs(String uplo, int n, int nrhs, double[] ap, int offsetap, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - dsptrsK(uplo, n, nrhs, ap, _ap_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + dsptrsK(uplo, n, nrhs, ap, offsetap, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected abstract void dsptrsK(String uplo, int n, int nrhs, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void dsptrsK(String uplo, int n, int nrhs, double[] ap, int offsetap, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dstebz(String range, String order, int n, double vl, double vu, int il, int iu, double abstol, double[] d, double[] e, org.netlib.util.intW m, org.netlib.util.intW nsplit, double[] w, int[] iblock, int[] isplit, double[] work, int[] iwork, org.netlib.util.intW info) { dstebz(range, order, n, vl, vu, il, iu, abstol, d, 0, e, 0, m, nsplit, w, 0, iblock, 0, isplit, 0, work, 0, iwork, 0, info); } - public void dstebz(String range, String order, int n, double vl, double vu, int il, int iu, double abstol, double[] d, int _d_offset, double[] e, int _e_offset, org.netlib.util.intW m, org.netlib.util.intW nsplit, double[] w, int _w_offset, int[] iblock, int _iblock_offset, int[] isplit, int _isplit_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dstebz(String range, String order, int n, double vl, double vu, int il, int iu, double abstol, double[] d, int offsetd, double[] e, int offsete, org.netlib.util.intW m, org.netlib.util.intW nsplit, double[] w, int offsetw, int[] iblock, int offsetiblock, int[] isplit, int offsetisplit, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dstebzK(range, order, n, vl, vu, il, iu, abstol, d, _d_offset, e, _e_offset, m, nsplit, w, _w_offset, iblock, _iblock_offset, isplit, _isplit_offset, work, _work_offset, iwork, _iwork_offset, info); + dstebzK(range, order, n, vl, vu, il, iu, abstol, d, offsetd, e, offsete, m, nsplit, w, offsetw, iblock, offsetiblock, isplit, offsetisplit, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dstebzK(String range, String order, int n, double vl, double vu, int il, int iu, double abstol, double[] d, int _d_offset, double[] e, int _e_offset, org.netlib.util.intW m, org.netlib.util.intW nsplit, double[] w, int _w_offset, int[] iblock, int _iblock_offset, int[] isplit, int _isplit_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dstebzK(String range, String order, int n, double vl, double vu, int il, int iu, double abstol, double[] d, int offsetd, double[] e, int offsete, org.netlib.util.intW m, org.netlib.util.intW nsplit, double[] w, int offsetw, int[] iblock, int offsetiblock, int[] isplit, int offsetisplit, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dstedc(String compz, int n, double[] d, double[] e, double[] z, int ldz, double[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info) { dstedc(compz, n, d, 0, e, 0, z, 0, ldz, work, 0, lwork, iwork, 0, liwork, info); } - public void dstedc(String compz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { + public void dstedc(String compz, int n, double[] d, int offsetd, double[] e, int offsete, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { //FIXME Add arguments check - dstedcK(compz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + dstedcK(compz, n, d, offsetd, e, offsete, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected abstract void dstedcK(String compz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected abstract void dstedcK(String compz, int n, double[] d, int offsetd, double[] e, int offsete, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void dstegr(String jobz, String range, int n, double[] d, double[] e, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, double[] z, int ldz, int[] isuppz, double[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info) { dstegr(jobz, range, n, d, 0, e, 0, vl, vu, il, iu, abstol, m, w, 0, z, 0, ldz, isuppz, 0, work, 0, lwork, iwork, 0, liwork, info); } - public void dstegr(String jobz, String range, int n, double[] d, int _d_offset, double[] e, int _e_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { + public void dstegr(String jobz, String range, int n, double[] d, int offsetd, double[] e, int offsete, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { //FIXME Add arguments check - dstegrK(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + dstegrK(jobz, range, n, d, offsetd, e, offsete, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, isuppz, offsetisuppz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected abstract void dstegrK(String jobz, String range, int n, double[] d, int _d_offset, double[] e, int _e_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected abstract void dstegrK(String jobz, String range, int n, double[] d, int offsetd, double[] e, int offsete, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void dstein(int n, double[] d, double[] e, int m, double[] w, int[] iblock, int[] isplit, double[] z, int ldz, double[] work, int[] iwork, int[] ifail, org.netlib.util.intW info) { dstein(n, d, 0, e, 0, m, w, 0, iblock, 0, isplit, 0, z, 0, ldz, work, 0, iwork, 0, ifail, 0, info); } - public void dstein(int n, double[] d, int _d_offset, double[] e, int _e_offset, int m, double[] w, int _w_offset, int[] iblock, int _iblock_offset, int[] isplit, int _isplit_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { + public void dstein(int n, double[] d, int offsetd, double[] e, int offsete, int m, double[] w, int offsetw, int[] iblock, int offsetiblock, int[] isplit, int offsetisplit, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { //FIXME Add arguments check - dsteinK(n, d, _d_offset, e, _e_offset, m, w, _w_offset, iblock, _iblock_offset, isplit, _isplit_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + dsteinK(n, d, offsetd, e, offsete, m, w, offsetw, iblock, offsetiblock, isplit, offsetisplit, z, offsetz, ldz, work, offsetwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected abstract void dsteinK(int n, double[] d, int _d_offset, double[] e, int _e_offset, int m, double[] w, int _w_offset, int[] iblock, int _iblock_offset, int[] isplit, int _isplit_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected abstract void dsteinK(int n, double[] d, int offsetd, double[] e, int offsete, int m, double[] w, int offsetw, int[] iblock, int offsetiblock, int[] isplit, int offsetisplit, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void dstemr(String jobz, String range, int n, double[] d, double[] e, double vl, double vu, int il, int iu, org.netlib.util.intW m, double[] w, double[] z, int ldz, int nzc, int[] isuppz, org.netlib.util.booleanW tryrac, double[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info) { dstemr(jobz, range, n, d, 0, e, 0, vl, vu, il, iu, m, w, 0, z, 0, ldz, nzc, isuppz, 0, tryrac, work, 0, lwork, iwork, 0, liwork, info); } - public void dstemr(String jobz, String range, int n, double[] d, int _d_offset, double[] e, int _e_offset, double vl, double vu, int il, int iu, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, int nzc, int[] isuppz, int _isuppz_offset, org.netlib.util.booleanW tryrac, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { + public void dstemr(String jobz, String range, int n, double[] d, int offsetd, double[] e, int offsete, double vl, double vu, int il, int iu, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, int nzc, int[] isuppz, int offsetisuppz, org.netlib.util.booleanW tryrac, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { //FIXME Add arguments check - dstemrK(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, m, w, _w_offset, z, _z_offset, ldz, nzc, isuppz, _isuppz_offset, tryrac, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + dstemrK(jobz, range, n, d, offsetd, e, offsete, vl, vu, il, iu, m, w, offsetw, z, offsetz, ldz, nzc, isuppz, offsetisuppz, tryrac, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected abstract void dstemrK(String jobz, String range, int n, double[] d, int _d_offset, double[] e, int _e_offset, double vl, double vu, int il, int iu, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, int nzc, int[] isuppz, int _isuppz_offset, org.netlib.util.booleanW tryrac, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected abstract void dstemrK(String jobz, String range, int n, double[] d, int offsetd, double[] e, int offsete, double vl, double vu, int il, int iu, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, int nzc, int[] isuppz, int offsetisuppz, org.netlib.util.booleanW tryrac, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void dsteqr(String compz, int n, double[] d, double[] e, double[] z, int ldz, double[] work, org.netlib.util.intW info) { dsteqr(compz, n, d, 0, e, 0, z, 0, ldz, work, 0, info); } - public void dsteqr(String compz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dsteqr(String compz, int n, double[] d, int offsetd, double[] e, int offsete, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dsteqrK(compz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, info); + dsteqrK(compz, n, d, offsetd, e, offsete, z, offsetz, ldz, work, offsetwork, info); } - protected abstract void dsteqrK(String compz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dsteqrK(String compz, int n, double[] d, int offsetd, double[] e, int offsete, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info); public void dsterf(int n, double[] d, double[] e, org.netlib.util.intW info) { dsterf(n, d, 0, e, 0, info); } - public void dsterf(int n, double[] d, int _d_offset, double[] e, int _e_offset, org.netlib.util.intW info) { + public void dsterf(int n, double[] d, int offsetd, double[] e, int offsete, org.netlib.util.intW info) { //FIXME Add arguments check - dsterfK(n, d, _d_offset, e, _e_offset, info); + dsterfK(n, d, offsetd, e, offsete, info); } - protected abstract void dsterfK(int n, double[] d, int _d_offset, double[] e, int _e_offset, org.netlib.util.intW info); + protected abstract void dsterfK(int n, double[] d, int offsetd, double[] e, int offsete, org.netlib.util.intW info); public void dstev(String jobz, int n, double[] d, double[] e, double[] z, int ldz, double[] work, org.netlib.util.intW info) { dstev(jobz, n, d, 0, e, 0, z, 0, ldz, work, 0, info); } - public void dstev(String jobz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dstev(String jobz, int n, double[] d, int offsetd, double[] e, int offsete, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dstevK(jobz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, info); + dstevK(jobz, n, d, offsetd, e, offsete, z, offsetz, ldz, work, offsetwork, info); } - protected abstract void dstevK(String jobz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dstevK(String jobz, int n, double[] d, int offsetd, double[] e, int offsete, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info); public void dstevd(String jobz, int n, double[] d, double[] e, double[] z, int ldz, double[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info) { dstevd(jobz, n, d, 0, e, 0, z, 0, ldz, work, 0, lwork, iwork, 0, liwork, info); } - public void dstevd(String jobz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { + public void dstevd(String jobz, int n, double[] d, int offsetd, double[] e, int offsete, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { //FIXME Add arguments check - dstevdK(jobz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + dstevdK(jobz, n, d, offsetd, e, offsete, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected abstract void dstevdK(String jobz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected abstract void dstevdK(String jobz, int n, double[] d, int offsetd, double[] e, int offsete, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void dstevr(String jobz, String range, int n, double[] d, double[] e, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, double[] z, int ldz, int[] isuppz, double[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info) { dstevr(jobz, range, n, d, 0, e, 0, vl, vu, il, iu, abstol, m, w, 0, z, 0, ldz, isuppz, 0, work, 0, lwork, iwork, 0, liwork, info); } - public void dstevr(String jobz, String range, int n, double[] d, int _d_offset, double[] e, int _e_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { + public void dstevr(String jobz, String range, int n, double[] d, int offsetd, double[] e, int offsete, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { //FIXME Add arguments check - dstevrK(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + dstevrK(jobz, range, n, d, offsetd, e, offsete, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, isuppz, offsetisuppz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected abstract void dstevrK(String jobz, String range, int n, double[] d, int _d_offset, double[] e, int _e_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected abstract void dstevrK(String jobz, String range, int n, double[] d, int offsetd, double[] e, int offsete, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void dstevx(String jobz, String range, int n, double[] d, double[] e, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, double[] z, int ldz, double[] work, int[] iwork, int[] ifail, org.netlib.util.intW info) { dstevx(jobz, range, n, d, 0, e, 0, vl, vu, il, iu, abstol, m, w, 0, z, 0, ldz, work, 0, iwork, 0, ifail, 0, info); } - public void dstevx(String jobz, String range, int n, double[] d, int _d_offset, double[] e, int _e_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { + public void dstevx(String jobz, String range, int n, double[] d, int offsetd, double[] e, int offsete, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { //FIXME Add arguments check - dstevxK(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + dstevxK(jobz, range, n, d, offsetd, e, offsete, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, work, offsetwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected abstract void dstevxK(String jobz, String range, int n, double[] d, int _d_offset, double[] e, int _e_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected abstract void dstevxK(String jobz, String range, int n, double[] d, int offsetd, double[] e, int offsete, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void dsycon(String uplo, int n, double[] a, int lda, int[] ipiv, double anorm, org.netlib.util.doubleW rcond, double[] work, int[] iwork, org.netlib.util.intW info) { dsycon(uplo, n, a, 0, lda, ipiv, 0, anorm, rcond, work, 0, iwork, 0, info); } - public void dsycon(String uplo, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dsycon(String uplo, int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dsyconK(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + dsyconK(uplo, n, a, offseta, lda, ipiv, offsetipiv, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dsyconK(String uplo, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dsyconK(String uplo, int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dsyev(String jobz, String uplo, int n, double[] a, int lda, double[] w, double[] work, int lwork, org.netlib.util.intW info) { dsyev(jobz, uplo, n, a, 0, lda, w, 0, work, 0, lwork, info); } - public void dsyev(String jobz, String uplo, int n, double[] a, int _a_offset, int lda, double[] w, int _w_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dsyev(String jobz, String uplo, int n, double[] a, int offseta, int lda, double[] w, int offsetw, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dsyevK(jobz, uplo, n, a, _a_offset, lda, w, _w_offset, work, _work_offset, lwork, info); + dsyevK(jobz, uplo, n, a, offseta, lda, w, offsetw, work, offsetwork, lwork, info); } - protected abstract void dsyevK(String jobz, String uplo, int n, double[] a, int _a_offset, int lda, double[] w, int _w_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dsyevK(String jobz, String uplo, int n, double[] a, int offseta, int lda, double[] w, int offsetw, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dsyevd(String jobz, String uplo, int n, double[] a, int lda, double[] w, double[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info) { dsyevd(jobz, uplo, n, a, 0, lda, w, 0, work, 0, lwork, iwork, 0, liwork, info); } - public void dsyevd(String jobz, String uplo, int n, double[] a, int _a_offset, int lda, double[] w, int _w_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { + public void dsyevd(String jobz, String uplo, int n, double[] a, int offseta, int lda, double[] w, int offsetw, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { //FIXME Add arguments check - dsyevdK(jobz, uplo, n, a, _a_offset, lda, w, _w_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + dsyevdK(jobz, uplo, n, a, offseta, lda, w, offsetw, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected abstract void dsyevdK(String jobz, String uplo, int n, double[] a, int _a_offset, int lda, double[] w, int _w_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected abstract void dsyevdK(String jobz, String uplo, int n, double[] a, int offseta, int lda, double[] w, int offsetw, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void dsyevr(String jobz, String range, String uplo, int n, double[] a, int lda, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, double[] z, int ldz, int[] isuppz, double[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info) { dsyevr(jobz, range, uplo, n, a, 0, lda, vl, vu, il, iu, abstol, m, w, 0, z, 0, ldz, isuppz, 0, work, 0, lwork, iwork, 0, liwork, info); } - public void dsyevr(String jobz, String range, String uplo, int n, double[] a, int _a_offset, int lda, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { + public void dsyevr(String jobz, String range, String uplo, int n, double[] a, int offseta, int lda, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { //FIXME Add arguments check - dsyevrK(jobz, range, uplo, n, a, _a_offset, lda, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + dsyevrK(jobz, range, uplo, n, a, offseta, lda, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, isuppz, offsetisuppz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected abstract void dsyevrK(String jobz, String range, String uplo, int n, double[] a, int _a_offset, int lda, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected abstract void dsyevrK(String jobz, String range, String uplo, int n, double[] a, int offseta, int lda, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void dsyevx(String jobz, String range, String uplo, int n, double[] a, int lda, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, double[] z, int ldz, double[] work, int lwork, int[] iwork, int[] ifail, org.netlib.util.intW info) { dsyevx(jobz, range, uplo, n, a, 0, lda, vl, vu, il, iu, abstol, m, w, 0, z, 0, ldz, work, 0, lwork, iwork, 0, ifail, 0, info); } - public void dsyevx(String jobz, String range, String uplo, int n, double[] a, int _a_offset, int lda, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { + public void dsyevx(String jobz, String range, String uplo, int n, double[] a, int offseta, int lda, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { //FIXME Add arguments check - dsyevxK(jobz, range, uplo, n, a, _a_offset, lda, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, ifail, _ifail_offset, info); + dsyevxK(jobz, range, uplo, n, a, offseta, lda, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected abstract void dsyevxK(String jobz, String range, String uplo, int n, double[] a, int _a_offset, int lda, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected abstract void dsyevxK(String jobz, String range, String uplo, int n, double[] a, int offseta, int lda, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void dsygs2(int itype, String uplo, int n, double[] a, int lda, double[] b, int ldb, org.netlib.util.intW info) { dsygs2(itype, uplo, n, a, 0, lda, b, 0, ldb, info); } - public void dsygs2(int itype, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void dsygs2(int itype, String uplo, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - dsygs2K(itype, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, info); + dsygs2K(itype, uplo, n, a, offseta, lda, b, offsetb, ldb, info); } - protected abstract void dsygs2K(int itype, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void dsygs2K(int itype, String uplo, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dsygst(int itype, String uplo, int n, double[] a, int lda, double[] b, int ldb, org.netlib.util.intW info) { dsygst(itype, uplo, n, a, 0, lda, b, 0, ldb, info); } - public void dsygst(int itype, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void dsygst(int itype, String uplo, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - dsygstK(itype, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, info); + dsygstK(itype, uplo, n, a, offseta, lda, b, offsetb, ldb, info); } - protected abstract void dsygstK(int itype, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void dsygstK(int itype, String uplo, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dsygv(int itype, String jobz, String uplo, int n, double[] a, int lda, double[] b, int ldb, double[] w, double[] work, int lwork, org.netlib.util.intW info) { dsygv(itype, jobz, uplo, n, a, 0, lda, b, 0, ldb, w, 0, work, 0, lwork, info); } - public void dsygv(int itype, String jobz, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] w, int _w_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dsygv(int itype, String jobz, String uplo, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] w, int offsetw, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dsygvK(itype, jobz, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, w, _w_offset, work, _work_offset, lwork, info); + dsygvK(itype, jobz, uplo, n, a, offseta, lda, b, offsetb, ldb, w, offsetw, work, offsetwork, lwork, info); } - protected abstract void dsygvK(int itype, String jobz, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] w, int _w_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dsygvK(int itype, String jobz, String uplo, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] w, int offsetw, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dsygvd(int itype, String jobz, String uplo, int n, double[] a, int lda, double[] b, int ldb, double[] w, double[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info) { dsygvd(itype, jobz, uplo, n, a, 0, lda, b, 0, ldb, w, 0, work, 0, lwork, iwork, 0, liwork, info); } - public void dsygvd(int itype, String jobz, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] w, int _w_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { + public void dsygvd(int itype, String jobz, String uplo, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] w, int offsetw, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { //FIXME Add arguments check - dsygvdK(itype, jobz, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, w, _w_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + dsygvdK(itype, jobz, uplo, n, a, offseta, lda, b, offsetb, ldb, w, offsetw, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected abstract void dsygvdK(int itype, String jobz, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] w, int _w_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected abstract void dsygvdK(int itype, String jobz, String uplo, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] w, int offsetw, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void dsygvx(int itype, String jobz, String range, String uplo, int n, double[] a, int lda, double[] b, int ldb, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, double[] z, int ldz, double[] work, int lwork, int[] iwork, int[] ifail, org.netlib.util.intW info) { dsygvx(itype, jobz, range, uplo, n, a, 0, lda, b, 0, ldb, vl, vu, il, iu, abstol, m, w, 0, z, 0, ldz, work, 0, lwork, iwork, 0, ifail, 0, info); } - public void dsygvx(int itype, String jobz, String range, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { + public void dsygvx(int itype, String jobz, String range, String uplo, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { //FIXME Add arguments check - dsygvxK(itype, jobz, range, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, ifail, _ifail_offset, info); + dsygvxK(itype, jobz, range, uplo, n, a, offseta, lda, b, offsetb, ldb, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected abstract void dsygvxK(int itype, String jobz, String range, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected abstract void dsygvxK(int itype, String jobz, String range, String uplo, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void dsyrfs(String uplo, int n, int nrhs, double[] a, int lda, double[] af, int ldaf, int[] ipiv, double[] b, int ldb, double[] x, int ldx, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info) { dsyrfs(uplo, n, nrhs, a, 0, lda, af, 0, ldaf, ipiv, 0, b, 0, ldb, x, 0, ldx, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void dsyrfs(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dsyrfs(String uplo, int n, int nrhs, double[] a, int offseta, int lda, double[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dsyrfsK(uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + dsyrfsK(uplo, n, nrhs, a, offseta, lda, af, offsetaf, ldaf, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dsyrfsK(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dsyrfsK(String uplo, int n, int nrhs, double[] a, int offseta, int lda, double[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dsysv(String uplo, int n, int nrhs, double[] a, int lda, int[] ipiv, double[] b, int ldb, double[] work, int lwork, org.netlib.util.intW info) { dsysv(uplo, n, nrhs, a, 0, lda, ipiv, 0, b, 0, ldb, work, 0, lwork, info); } - public void dsysv(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dsysv(String uplo, int n, int nrhs, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dsysvK(uplo, n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, work, _work_offset, lwork, info); + dsysvK(uplo, n, nrhs, a, offseta, lda, ipiv, offsetipiv, b, offsetb, ldb, work, offsetwork, lwork, info); } - protected abstract void dsysvK(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dsysvK(String uplo, int n, int nrhs, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dsysvx(String fact, String uplo, int n, int nrhs, double[] a, int lda, double[] af, int ldaf, int[] ipiv, double[] b, int ldb, double[] x, int ldx, org.netlib.util.doubleW rcond, double[] ferr, double[] berr, double[] work, int lwork, int[] iwork, org.netlib.util.intW info) { dsysvx(fact, uplo, n, nrhs, a, 0, lda, af, 0, ldaf, ipiv, 0, b, 0, ldb, x, 0, ldx, rcond, ferr, 0, berr, 0, work, 0, lwork, iwork, 0, info); } - public void dsysvx(String fact, String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dsysvx(String fact, String uplo, int n, int nrhs, double[] a, int offseta, int lda, double[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dsysvxK(fact, uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, lwork, iwork, _iwork_offset, info); + dsysvxK(fact, uplo, n, nrhs, a, offseta, lda, af, offsetaf, ldaf, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, lwork, iwork, offsetiwork, info); } - protected abstract void dsysvxK(String fact, String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dsysvxK(String fact, String uplo, int n, int nrhs, double[] a, int offseta, int lda, double[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dsytd2(String uplo, int n, double[] a, int lda, double[] d, double[] e, double[] tau, org.netlib.util.intW info) { dsytd2(uplo, n, a, 0, lda, d, 0, e, 0, tau, 0, info); } - public void dsytd2(String uplo, int n, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tau, int _tau_offset, org.netlib.util.intW info) { + public void dsytd2(String uplo, int n, double[] a, int offseta, int lda, double[] d, int offsetd, double[] e, int offsete, double[] tau, int offsettau, org.netlib.util.intW info) { //FIXME Add arguments check - dsytd2K(uplo, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tau, _tau_offset, info); + dsytd2K(uplo, n, a, offseta, lda, d, offsetd, e, offsete, tau, offsettau, info); } - protected abstract void dsytd2K(String uplo, int n, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tau, int _tau_offset, org.netlib.util.intW info); + protected abstract void dsytd2K(String uplo, int n, double[] a, int offseta, int lda, double[] d, int offsetd, double[] e, int offsete, double[] tau, int offsettau, org.netlib.util.intW info); public void dsytf2(String uplo, int n, double[] a, int lda, int[] ipiv, org.netlib.util.intW info) { dsytf2(uplo, n, a, 0, lda, ipiv, 0, info); } - public void dsytf2(String uplo, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { + public void dsytf2(String uplo, int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, org.netlib.util.intW info) { //FIXME Add arguments check - dsytf2K(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, info); + dsytf2K(uplo, n, a, offseta, lda, ipiv, offsetipiv, info); } - protected abstract void dsytf2K(String uplo, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + protected abstract void dsytf2K(String uplo, int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, org.netlib.util.intW info); public void dsytrd(String uplo, int n, double[] a, int lda, double[] d, double[] e, double[] tau, double[] work, int lwork, org.netlib.util.intW info) { dsytrd(uplo, n, a, 0, lda, d, 0, e, 0, tau, 0, work, 0, lwork, info); } - public void dsytrd(String uplo, int n, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dsytrd(String uplo, int n, double[] a, int offseta, int lda, double[] d, int offsetd, double[] e, int offsete, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dsytrdK(uplo, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tau, _tau_offset, work, _work_offset, lwork, info); + dsytrdK(uplo, n, a, offseta, lda, d, offsetd, e, offsete, tau, offsettau, work, offsetwork, lwork, info); } - protected abstract void dsytrdK(String uplo, int n, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dsytrdK(String uplo, int n, double[] a, int offseta, int lda, double[] d, int offsetd, double[] e, int offsete, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dsytrf(String uplo, int n, double[] a, int lda, int[] ipiv, double[] work, int lwork, org.netlib.util.intW info) { dsytrf(uplo, n, a, 0, lda, ipiv, 0, work, 0, lwork, info); } - public void dsytrf(String uplo, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dsytrf(String uplo, int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dsytrfK(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, work, _work_offset, lwork, info); + dsytrfK(uplo, n, a, offseta, lda, ipiv, offsetipiv, work, offsetwork, lwork, info); } - protected abstract void dsytrfK(String uplo, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dsytrfK(String uplo, int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dsytri(String uplo, int n, double[] a, int lda, int[] ipiv, double[] work, org.netlib.util.intW info) { dsytri(uplo, n, a, 0, lda, ipiv, 0, work, 0, info); } - public void dsytri(String uplo, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dsytri(String uplo, int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dsytriK(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, work, _work_offset, info); + dsytriK(uplo, n, a, offseta, lda, ipiv, offsetipiv, work, offsetwork, info); } - protected abstract void dsytriK(String uplo, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dsytriK(String uplo, int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] work, int offsetwork, org.netlib.util.intW info); public void dsytrs(String uplo, int n, int nrhs, double[] a, int lda, int[] ipiv, double[] b, int ldb, org.netlib.util.intW info) { dsytrs(uplo, n, nrhs, a, 0, lda, ipiv, 0, b, 0, ldb, info); } - public void dsytrs(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void dsytrs(String uplo, int n, int nrhs, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - dsytrsK(uplo, n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + dsytrsK(uplo, n, nrhs, a, offseta, lda, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected abstract void dsytrsK(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void dsytrsK(String uplo, int n, int nrhs, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dtbcon(String norm, String uplo, String diag, int n, int kd, double[] ab, int ldab, org.netlib.util.doubleW rcond, double[] work, int[] iwork, org.netlib.util.intW info) { dtbcon(norm, uplo, diag, n, kd, ab, 0, ldab, rcond, work, 0, iwork, 0, info); } - public void dtbcon(String norm, String uplo, String diag, int n, int kd, double[] ab, int _ab_offset, int ldab, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dtbcon(String norm, String uplo, String diag, int n, int kd, double[] ab, int offsetab, int ldab, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dtbconK(norm, uplo, diag, n, kd, ab, _ab_offset, ldab, rcond, work, _work_offset, iwork, _iwork_offset, info); + dtbconK(norm, uplo, diag, n, kd, ab, offsetab, ldab, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dtbconK(String norm, String uplo, String diag, int n, int kd, double[] ab, int _ab_offset, int ldab, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dtbconK(String norm, String uplo, String diag, int n, int kd, double[] ab, int offsetab, int ldab, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dtbrfs(String uplo, String trans, String diag, int n, int kd, int nrhs, double[] ab, int ldab, double[] b, int ldb, double[] x, int ldx, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info) { dtbrfs(uplo, trans, diag, n, kd, nrhs, ab, 0, ldab, b, 0, ldb, x, 0, ldx, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void dtbrfs(String uplo, String trans, String diag, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dtbrfs(String uplo, String trans, String diag, int n, int kd, int nrhs, double[] ab, int offsetab, int ldab, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dtbrfsK(uplo, trans, diag, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + dtbrfsK(uplo, trans, diag, n, kd, nrhs, ab, offsetab, ldab, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dtbrfsK(String uplo, String trans, String diag, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dtbrfsK(String uplo, String trans, String diag, int n, int kd, int nrhs, double[] ab, int offsetab, int ldab, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dtbtrs(String uplo, String trans, String diag, int n, int kd, int nrhs, double[] ab, int ldab, double[] b, int ldb, org.netlib.util.intW info) { dtbtrs(uplo, trans, diag, n, kd, nrhs, ab, 0, ldab, b, 0, ldb, info); } - public void dtbtrs(String uplo, String trans, String diag, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void dtbtrs(String uplo, String trans, String diag, int n, int kd, int nrhs, double[] ab, int offsetab, int ldab, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - dtbtrsK(uplo, trans, diag, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, info); + dtbtrsK(uplo, trans, diag, n, kd, nrhs, ab, offsetab, ldab, b, offsetb, ldb, info); } - protected abstract void dtbtrsK(String uplo, String trans, String diag, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void dtbtrsK(String uplo, String trans, String diag, int n, int kd, int nrhs, double[] ab, int offsetab, int ldab, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dtgevc(String side, String howmny, boolean[] select, int n, double[] s, int lds, double[] p, int ldp, double[] vl, int ldvl, double[] vr, int ldvr, int mm, org.netlib.util.intW m, double[] work, org.netlib.util.intW info) { dtgevc(side, howmny, select, 0, n, s, 0, lds, p, 0, ldp, vl, 0, ldvl, vr, 0, ldvr, mm, m, work, 0, info); } - public void dtgevc(String side, String howmny, boolean[] select, int _select_offset, int n, double[] s, int _s_offset, int lds, double[] p, int _p_offset, int ldp, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dtgevc(String side, String howmny, boolean[] select, int offsetselect, int n, double[] s, int offsets, int lds, double[] p, int offsetp, int ldp, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, int mm, org.netlib.util.intW m, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dtgevcK(side, howmny, select, _select_offset, n, s, _s_offset, lds, p, _p_offset, ldp, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, mm, m, work, _work_offset, info); + dtgevcK(side, howmny, select, offsetselect, n, s, offsets, lds, p, offsetp, ldp, vl, offsetvl, ldvl, vr, offsetvr, ldvr, mm, m, work, offsetwork, info); } - protected abstract void dtgevcK(String side, String howmny, boolean[] select, int _select_offset, int n, double[] s, int _s_offset, int lds, double[] p, int _p_offset, int ldp, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dtgevcK(String side, String howmny, boolean[] select, int offsetselect, int n, double[] s, int offsets, int lds, double[] p, int offsetp, int ldp, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, int mm, org.netlib.util.intW m, double[] work, int offsetwork, org.netlib.util.intW info); public void dtgex2(boolean wantq, boolean wantz, int n, double[] a, int lda, double[] b, int ldb, double[] q, int ldq, double[] z, int ldz, int j1, int n1, int n2, double[] work, int lwork, org.netlib.util.intW info) { dtgex2(wantq, wantz, n, a, 0, lda, b, 0, ldb, q, 0, ldq, z, 0, ldz, j1, n1, n2, work, 0, lwork, info); } - public void dtgex2(boolean wantq, boolean wantz, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, int j1, int n1, int n2, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dtgex2(boolean wantq, boolean wantz, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] q, int offsetq, int ldq, double[] z, int offsetz, int ldz, int j1, int n1, int n2, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dtgex2K(wantq, wantz, n, a, _a_offset, lda, b, _b_offset, ldb, q, _q_offset, ldq, z, _z_offset, ldz, j1, n1, n2, work, _work_offset, lwork, info); + dtgex2K(wantq, wantz, n, a, offseta, lda, b, offsetb, ldb, q, offsetq, ldq, z, offsetz, ldz, j1, n1, n2, work, offsetwork, lwork, info); } - protected abstract void dtgex2K(boolean wantq, boolean wantz, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, int j1, int n1, int n2, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dtgex2K(boolean wantq, boolean wantz, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] q, int offsetq, int ldq, double[] z, int offsetz, int ldz, int j1, int n1, int n2, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dtgexc(boolean wantq, boolean wantz, int n, double[] a, int lda, double[] b, int ldb, double[] q, int ldq, double[] z, int ldz, org.netlib.util.intW ifst, org.netlib.util.intW ilst, double[] work, int lwork, org.netlib.util.intW info) { dtgexc(wantq, wantz, n, a, 0, lda, b, 0, ldb, q, 0, ldq, z, 0, ldz, ifst, ilst, work, 0, lwork, info); } - public void dtgexc(boolean wantq, boolean wantz, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, org.netlib.util.intW ifst, org.netlib.util.intW ilst, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dtgexc(boolean wantq, boolean wantz, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] q, int offsetq, int ldq, double[] z, int offsetz, int ldz, org.netlib.util.intW ifst, org.netlib.util.intW ilst, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dtgexcK(wantq, wantz, n, a, _a_offset, lda, b, _b_offset, ldb, q, _q_offset, ldq, z, _z_offset, ldz, ifst, ilst, work, _work_offset, lwork, info); + dtgexcK(wantq, wantz, n, a, offseta, lda, b, offsetb, ldb, q, offsetq, ldq, z, offsetz, ldz, ifst, ilst, work, offsetwork, lwork, info); } - protected abstract void dtgexcK(boolean wantq, boolean wantz, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, org.netlib.util.intW ifst, org.netlib.util.intW ilst, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dtgexcK(boolean wantq, boolean wantz, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] q, int offsetq, int ldq, double[] z, int offsetz, int ldz, org.netlib.util.intW ifst, org.netlib.util.intW ilst, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void dtgsen(int ijob, boolean wantq, boolean wantz, boolean[] select, int n, double[] a, int lda, double[] b, int ldb, double[] alphar, double[] alphai, double[] beta, double[] q, int ldq, double[] z, int ldz, org.netlib.util.intW m, org.netlib.util.doubleW pl, org.netlib.util.doubleW pr, double[] dif, double[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info) { dtgsen(ijob, wantq, wantz, select, 0, n, a, 0, lda, b, 0, ldb, alphar, 0, alphai, 0, beta, 0, q, 0, ldq, z, 0, ldz, m, pl, pr, dif, 0, work, 0, lwork, iwork, 0, liwork, info); } - public void dtgsen(int ijob, boolean wantq, boolean wantz, boolean[] select, int _select_offset, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, org.netlib.util.intW m, org.netlib.util.doubleW pl, org.netlib.util.doubleW pr, double[] dif, int _dif_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { + public void dtgsen(int ijob, boolean wantq, boolean wantz, boolean[] select, int offsetselect, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] q, int offsetq, int ldq, double[] z, int offsetz, int ldz, org.netlib.util.intW m, org.netlib.util.doubleW pl, org.netlib.util.doubleW pr, double[] dif, int offsetdif, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { //FIXME Add arguments check - dtgsenK(ijob, wantq, wantz, select, _select_offset, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, q, _q_offset, ldq, z, _z_offset, ldz, m, pl, pr, dif, _dif_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + dtgsenK(ijob, wantq, wantz, select, offsetselect, n, a, offseta, lda, b, offsetb, ldb, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, q, offsetq, ldq, z, offsetz, ldz, m, pl, pr, dif, offsetdif, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected abstract void dtgsenK(int ijob, boolean wantq, boolean wantz, boolean[] select, int _select_offset, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, org.netlib.util.intW m, org.netlib.util.doubleW pl, org.netlib.util.doubleW pr, double[] dif, int _dif_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected abstract void dtgsenK(int ijob, boolean wantq, boolean wantz, boolean[] select, int offsetselect, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] q, int offsetq, int ldq, double[] z, int offsetz, int ldz, org.netlib.util.intW m, org.netlib.util.doubleW pl, org.netlib.util.doubleW pr, double[] dif, int offsetdif, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void dtgsja(String jobu, String jobv, String jobq, int m, int p, int n, int k, int l, double[] a, int lda, double[] b, int ldb, double tola, double tolb, double[] alpha, double[] beta, double[] u, int ldu, double[] v, int ldv, double[] q, int ldq, double[] work, org.netlib.util.intW ncycle, org.netlib.util.intW info) { dtgsja(jobu, jobv, jobq, m, p, n, k, l, a, 0, lda, b, 0, ldb, tola, tolb, alpha, 0, beta, 0, u, 0, ldu, v, 0, ldv, q, 0, ldq, work, 0, ncycle, info); } - public void dtgsja(String jobu, String jobv, String jobq, int m, int p, int n, int k, int l, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double tola, double tolb, double[] alpha, int _alpha_offset, double[] beta, int _beta_offset, double[] u, int _u_offset, int ldu, double[] v, int _v_offset, int ldv, double[] q, int _q_offset, int ldq, double[] work, int _work_offset, org.netlib.util.intW ncycle, org.netlib.util.intW info) { + public void dtgsja(String jobu, String jobv, String jobq, int m, int p, int n, int k, int l, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double tola, double tolb, double[] alpha, int offsetalpha, double[] beta, int offsetbeta, double[] u, int offsetu, int ldu, double[] v, int offsetv, int ldv, double[] q, int offsetq, int ldq, double[] work, int offsetwork, org.netlib.util.intW ncycle, org.netlib.util.intW info) { //FIXME Add arguments check - dtgsjaK(jobu, jobv, jobq, m, p, n, k, l, a, _a_offset, lda, b, _b_offset, ldb, tola, tolb, alpha, _alpha_offset, beta, _beta_offset, u, _u_offset, ldu, v, _v_offset, ldv, q, _q_offset, ldq, work, _work_offset, ncycle, info); + dtgsjaK(jobu, jobv, jobq, m, p, n, k, l, a, offseta, lda, b, offsetb, ldb, tola, tolb, alpha, offsetalpha, beta, offsetbeta, u, offsetu, ldu, v, offsetv, ldv, q, offsetq, ldq, work, offsetwork, ncycle, info); } - protected abstract void dtgsjaK(String jobu, String jobv, String jobq, int m, int p, int n, int k, int l, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double tola, double tolb, double[] alpha, int _alpha_offset, double[] beta, int _beta_offset, double[] u, int _u_offset, int ldu, double[] v, int _v_offset, int ldv, double[] q, int _q_offset, int ldq, double[] work, int _work_offset, org.netlib.util.intW ncycle, org.netlib.util.intW info); + protected abstract void dtgsjaK(String jobu, String jobv, String jobq, int m, int p, int n, int k, int l, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double tola, double tolb, double[] alpha, int offsetalpha, double[] beta, int offsetbeta, double[] u, int offsetu, int ldu, double[] v, int offsetv, int ldv, double[] q, int offsetq, int ldq, double[] work, int offsetwork, org.netlib.util.intW ncycle, org.netlib.util.intW info); public void dtgsna(String job, String howmny, boolean[] select, int n, double[] a, int lda, double[] b, int ldb, double[] vl, int ldvl, double[] vr, int ldvr, double[] s, double[] dif, int mm, org.netlib.util.intW m, double[] work, int lwork, int[] iwork, org.netlib.util.intW info) { dtgsna(job, howmny, select, 0, n, a, 0, lda, b, 0, ldb, vl, 0, ldvl, vr, 0, ldvr, s, 0, dif, 0, mm, m, work, 0, lwork, iwork, 0, info); } - public void dtgsna(String job, String howmny, boolean[] select, int _select_offset, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] s, int _s_offset, double[] dif, int _dif_offset, int mm, org.netlib.util.intW m, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dtgsna(String job, String howmny, boolean[] select, int offsetselect, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, double[] s, int offsets, double[] dif, int offsetdif, int mm, org.netlib.util.intW m, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dtgsnaK(job, howmny, select, _select_offset, n, a, _a_offset, lda, b, _b_offset, ldb, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, s, _s_offset, dif, _dif_offset, mm, m, work, _work_offset, lwork, iwork, _iwork_offset, info); + dtgsnaK(job, howmny, select, offsetselect, n, a, offseta, lda, b, offsetb, ldb, vl, offsetvl, ldvl, vr, offsetvr, ldvr, s, offsets, dif, offsetdif, mm, m, work, offsetwork, lwork, iwork, offsetiwork, info); } - protected abstract void dtgsnaK(String job, String howmny, boolean[] select, int _select_offset, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] s, int _s_offset, double[] dif, int _dif_offset, int mm, org.netlib.util.intW m, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dtgsnaK(String job, String howmny, boolean[] select, int offsetselect, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, double[] s, int offsets, double[] dif, int offsetdif, int mm, org.netlib.util.intW m, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dtgsy2(String trans, int ijob, int m, int n, double[] a, int lda, double[] b, int ldb, double[] c, int Ldc, double[] d, int ldd, double[] e, int lde, double[] f, int ldf, org.netlib.util.doubleW scale, org.netlib.util.doubleW rdsum, org.netlib.util.doubleW rdscal, int[] iwork, org.netlib.util.intW pq, org.netlib.util.intW info) { dtgsy2(trans, ijob, m, n, a, 0, lda, b, 0, ldb, c, 0, Ldc, d, 0, ldd, e, 0, lde, f, 0, ldf, scale, rdsum, rdscal, iwork, 0, pq, info); } - public void dtgsy2(String trans, int ijob, int m, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] c, int _c_offset, int Ldc, double[] d, int _d_offset, int ldd, double[] e, int _e_offset, int lde, double[] f, int _f_offset, int ldf, org.netlib.util.doubleW scale, org.netlib.util.doubleW rdsum, org.netlib.util.doubleW rdscal, int[] iwork, int _iwork_offset, org.netlib.util.intW pq, org.netlib.util.intW info) { + public void dtgsy2(String trans, int ijob, int m, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] c, int offsetc, int Ldc, double[] d, int offsetd, int ldd, double[] e, int offsete, int lde, double[] f, int offsetf, int ldf, org.netlib.util.doubleW scale, org.netlib.util.doubleW rdsum, org.netlib.util.doubleW rdscal, int[] iwork, int offsetiwork, org.netlib.util.intW pq, org.netlib.util.intW info) { //FIXME Add arguments check - dtgsy2K(trans, ijob, m, n, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, Ldc, d, _d_offset, ldd, e, _e_offset, lde, f, _f_offset, ldf, scale, rdsum, rdscal, iwork, _iwork_offset, pq, info); + dtgsy2K(trans, ijob, m, n, a, offseta, lda, b, offsetb, ldb, c, offsetc, Ldc, d, offsetd, ldd, e, offsete, lde, f, offsetf, ldf, scale, rdsum, rdscal, iwork, offsetiwork, pq, info); } - protected abstract void dtgsy2K(String trans, int ijob, int m, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] c, int _c_offset, int Ldc, double[] d, int _d_offset, int ldd, double[] e, int _e_offset, int lde, double[] f, int _f_offset, int ldf, org.netlib.util.doubleW scale, org.netlib.util.doubleW rdsum, org.netlib.util.doubleW rdscal, int[] iwork, int _iwork_offset, org.netlib.util.intW pq, org.netlib.util.intW info); + protected abstract void dtgsy2K(String trans, int ijob, int m, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] c, int offsetc, int Ldc, double[] d, int offsetd, int ldd, double[] e, int offsete, int lde, double[] f, int offsetf, int ldf, org.netlib.util.doubleW scale, org.netlib.util.doubleW rdsum, org.netlib.util.doubleW rdscal, int[] iwork, int offsetiwork, org.netlib.util.intW pq, org.netlib.util.intW info); public void dtgsyl(String trans, int ijob, int m, int n, double[] a, int lda, double[] b, int ldb, double[] c, int Ldc, double[] d, int ldd, double[] e, int lde, double[] f, int ldf, org.netlib.util.doubleW scale, org.netlib.util.doubleW dif, double[] work, int lwork, int[] iwork, org.netlib.util.intW info) { dtgsyl(trans, ijob, m, n, a, 0, lda, b, 0, ldb, c, 0, Ldc, d, 0, ldd, e, 0, lde, f, 0, ldf, scale, dif, work, 0, lwork, iwork, 0, info); } - public void dtgsyl(String trans, int ijob, int m, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] c, int _c_offset, int Ldc, double[] d, int _d_offset, int ldd, double[] e, int _e_offset, int lde, double[] f, int _f_offset, int ldf, org.netlib.util.doubleW scale, org.netlib.util.doubleW dif, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dtgsyl(String trans, int ijob, int m, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] c, int offsetc, int Ldc, double[] d, int offsetd, int ldd, double[] e, int offsete, int lde, double[] f, int offsetf, int ldf, org.netlib.util.doubleW scale, org.netlib.util.doubleW dif, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dtgsylK(trans, ijob, m, n, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, Ldc, d, _d_offset, ldd, e, _e_offset, lde, f, _f_offset, ldf, scale, dif, work, _work_offset, lwork, iwork, _iwork_offset, info); + dtgsylK(trans, ijob, m, n, a, offseta, lda, b, offsetb, ldb, c, offsetc, Ldc, d, offsetd, ldd, e, offsete, lde, f, offsetf, ldf, scale, dif, work, offsetwork, lwork, iwork, offsetiwork, info); } - protected abstract void dtgsylK(String trans, int ijob, int m, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] c, int _c_offset, int Ldc, double[] d, int _d_offset, int ldd, double[] e, int _e_offset, int lde, double[] f, int _f_offset, int ldf, org.netlib.util.doubleW scale, org.netlib.util.doubleW dif, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dtgsylK(String trans, int ijob, int m, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] c, int offsetc, int Ldc, double[] d, int offsetd, int ldd, double[] e, int offsete, int lde, double[] f, int offsetf, int ldf, org.netlib.util.doubleW scale, org.netlib.util.doubleW dif, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dtpcon(String norm, String uplo, String diag, int n, double[] ap, org.netlib.util.doubleW rcond, double[] work, int[] iwork, org.netlib.util.intW info) { dtpcon(norm, uplo, diag, n, ap, 0, rcond, work, 0, iwork, 0, info); } - public void dtpcon(String norm, String uplo, String diag, int n, double[] ap, int _ap_offset, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dtpcon(String norm, String uplo, String diag, int n, double[] ap, int offsetap, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dtpconK(norm, uplo, diag, n, ap, _ap_offset, rcond, work, _work_offset, iwork, _iwork_offset, info); + dtpconK(norm, uplo, diag, n, ap, offsetap, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dtpconK(String norm, String uplo, String diag, int n, double[] ap, int _ap_offset, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dtpconK(String norm, String uplo, String diag, int n, double[] ap, int offsetap, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dtprfs(String uplo, String trans, String diag, int n, int nrhs, double[] ap, double[] b, int ldb, double[] x, int ldx, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info) { dtprfs(uplo, trans, diag, n, nrhs, ap, 0, b, 0, ldb, x, 0, ldx, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void dtprfs(String uplo, String trans, String diag, int n, int nrhs, double[] ap, int _ap_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dtprfs(String uplo, String trans, String diag, int n, int nrhs, double[] ap, int offsetap, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dtprfsK(uplo, trans, diag, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + dtprfsK(uplo, trans, diag, n, nrhs, ap, offsetap, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dtprfsK(String uplo, String trans, String diag, int n, int nrhs, double[] ap, int _ap_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dtprfsK(String uplo, String trans, String diag, int n, int nrhs, double[] ap, int offsetap, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dtptri(String uplo, String diag, int n, double[] ap, org.netlib.util.intW info) { dtptri(uplo, diag, n, ap, 0, info); } - public void dtptri(String uplo, String diag, int n, double[] ap, int _ap_offset, org.netlib.util.intW info) { + public void dtptri(String uplo, String diag, int n, double[] ap, int offsetap, org.netlib.util.intW info) { //FIXME Add arguments check - dtptriK(uplo, diag, n, ap, _ap_offset, info); + dtptriK(uplo, diag, n, ap, offsetap, info); } - protected abstract void dtptriK(String uplo, String diag, int n, double[] ap, int _ap_offset, org.netlib.util.intW info); + protected abstract void dtptriK(String uplo, String diag, int n, double[] ap, int offsetap, org.netlib.util.intW info); public void dtptrs(String uplo, String trans, String diag, int n, int nrhs, double[] ap, double[] b, int ldb, org.netlib.util.intW info) { dtptrs(uplo, trans, diag, n, nrhs, ap, 0, b, 0, ldb, info); } - public void dtptrs(String uplo, String trans, String diag, int n, int nrhs, double[] ap, int _ap_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void dtptrs(String uplo, String trans, String diag, int n, int nrhs, double[] ap, int offsetap, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - dtptrsK(uplo, trans, diag, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, info); + dtptrsK(uplo, trans, diag, n, nrhs, ap, offsetap, b, offsetb, ldb, info); } - protected abstract void dtptrsK(String uplo, String trans, String diag, int n, int nrhs, double[] ap, int _ap_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void dtptrsK(String uplo, String trans, String diag, int n, int nrhs, double[] ap, int offsetap, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dtrcon(String norm, String uplo, String diag, int n, double[] a, int lda, org.netlib.util.doubleW rcond, double[] work, int[] iwork, org.netlib.util.intW info) { dtrcon(norm, uplo, diag, n, a, 0, lda, rcond, work, 0, iwork, 0, info); } - public void dtrcon(String norm, String uplo, String diag, int n, double[] a, int _a_offset, int lda, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dtrcon(String norm, String uplo, String diag, int n, double[] a, int offseta, int lda, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dtrconK(norm, uplo, diag, n, a, _a_offset, lda, rcond, work, _work_offset, iwork, _iwork_offset, info); + dtrconK(norm, uplo, diag, n, a, offseta, lda, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dtrconK(String norm, String uplo, String diag, int n, double[] a, int _a_offset, int lda, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dtrconK(String norm, String uplo, String diag, int n, double[] a, int offseta, int lda, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dtrevc(String side, String howmny, boolean[] select, int n, double[] t, int ldt, double[] vl, int ldvl, double[] vr, int ldvr, int mm, org.netlib.util.intW m, double[] work, org.netlib.util.intW info) { dtrevc(side, howmny, select, 0, n, t, 0, ldt, vl, 0, ldvl, vr, 0, ldvr, mm, m, work, 0, info); } - public void dtrevc(String side, String howmny, boolean[] select, int _select_offset, int n, double[] t, int _t_offset, int ldt, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dtrevc(String side, String howmny, boolean[] select, int offsetselect, int n, double[] t, int offsett, int ldt, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, int mm, org.netlib.util.intW m, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dtrevcK(side, howmny, select, _select_offset, n, t, _t_offset, ldt, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, mm, m, work, _work_offset, info); + dtrevcK(side, howmny, select, offsetselect, n, t, offsett, ldt, vl, offsetvl, ldvl, vr, offsetvr, ldvr, mm, m, work, offsetwork, info); } - protected abstract void dtrevcK(String side, String howmny, boolean[] select, int _select_offset, int n, double[] t, int _t_offset, int ldt, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dtrevcK(String side, String howmny, boolean[] select, int offsetselect, int n, double[] t, int offsett, int ldt, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, int mm, org.netlib.util.intW m, double[] work, int offsetwork, org.netlib.util.intW info); public void dtrexc(String compq, int n, double[] t, int ldt, double[] q, int ldq, org.netlib.util.intW ifst, org.netlib.util.intW ilst, double[] work, org.netlib.util.intW info) { dtrexc(compq, n, t, 0, ldt, q, 0, ldq, ifst, ilst, work, 0, info); } - public void dtrexc(String compq, int n, double[] t, int _t_offset, int ldt, double[] q, int _q_offset, int ldq, org.netlib.util.intW ifst, org.netlib.util.intW ilst, double[] work, int _work_offset, org.netlib.util.intW info) { + public void dtrexc(String compq, int n, double[] t, int offsett, int ldt, double[] q, int offsetq, int ldq, org.netlib.util.intW ifst, org.netlib.util.intW ilst, double[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - dtrexcK(compq, n, t, _t_offset, ldt, q, _q_offset, ldq, ifst, ilst, work, _work_offset, info); + dtrexcK(compq, n, t, offsett, ldt, q, offsetq, ldq, ifst, ilst, work, offsetwork, info); } - protected abstract void dtrexcK(String compq, int n, double[] t, int _t_offset, int ldt, double[] q, int _q_offset, int ldq, org.netlib.util.intW ifst, org.netlib.util.intW ilst, double[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void dtrexcK(String compq, int n, double[] t, int offsett, int ldt, double[] q, int offsetq, int ldq, org.netlib.util.intW ifst, org.netlib.util.intW ilst, double[] work, int offsetwork, org.netlib.util.intW info); public void dtrrfs(String uplo, String trans, String diag, int n, int nrhs, double[] a, int lda, double[] b, int ldb, double[] x, int ldx, double[] ferr, double[] berr, double[] work, int[] iwork, org.netlib.util.intW info) { dtrrfs(uplo, trans, diag, n, nrhs, a, 0, lda, b, 0, ldb, x, 0, ldx, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void dtrrfs(String uplo, String trans, String diag, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dtrrfs(String uplo, String trans, String diag, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dtrrfsK(uplo, trans, diag, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + dtrrfsK(uplo, trans, diag, n, nrhs, a, offseta, lda, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void dtrrfsK(String uplo, String trans, String diag, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dtrrfsK(String uplo, String trans, String diag, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dtrsen(String job, String compq, boolean[] select, int n, double[] t, int ldt, double[] q, int ldq, double[] wr, double[] wi, org.netlib.util.intW m, org.netlib.util.doubleW s, org.netlib.util.doubleW sep, double[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info) { dtrsen(job, compq, select, 0, n, t, 0, ldt, q, 0, ldq, wr, 0, wi, 0, m, s, sep, work, 0, lwork, iwork, 0, liwork, info); } - public void dtrsen(String job, String compq, boolean[] select, int _select_offset, int n, double[] t, int _t_offset, int ldt, double[] q, int _q_offset, int ldq, double[] wr, int _wr_offset, double[] wi, int _wi_offset, org.netlib.util.intW m, org.netlib.util.doubleW s, org.netlib.util.doubleW sep, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { + public void dtrsen(String job, String compq, boolean[] select, int offsetselect, int n, double[] t, int offsett, int ldt, double[] q, int offsetq, int ldq, double[] wr, int offsetwr, double[] wi, int offsetwi, org.netlib.util.intW m, org.netlib.util.doubleW s, org.netlib.util.doubleW sep, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { //FIXME Add arguments check - dtrsenK(job, compq, select, _select_offset, n, t, _t_offset, ldt, q, _q_offset, ldq, wr, _wr_offset, wi, _wi_offset, m, s, sep, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + dtrsenK(job, compq, select, offsetselect, n, t, offsett, ldt, q, offsetq, ldq, wr, offsetwr, wi, offsetwi, m, s, sep, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected abstract void dtrsenK(String job, String compq, boolean[] select, int _select_offset, int n, double[] t, int _t_offset, int ldt, double[] q, int _q_offset, int ldq, double[] wr, int _wr_offset, double[] wi, int _wi_offset, org.netlib.util.intW m, org.netlib.util.doubleW s, org.netlib.util.doubleW sep, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected abstract void dtrsenK(String job, String compq, boolean[] select, int offsetselect, int n, double[] t, int offsett, int ldt, double[] q, int offsetq, int ldq, double[] wr, int offsetwr, double[] wi, int offsetwi, org.netlib.util.intW m, org.netlib.util.doubleW s, org.netlib.util.doubleW sep, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void dtrsna(String job, String howmny, boolean[] select, int n, double[] t, int ldt, double[] vl, int ldvl, double[] vr, int ldvr, double[] s, double[] sep, int mm, org.netlib.util.intW m, double[] work, int ldwork, int[] iwork, org.netlib.util.intW info) { dtrsna(job, howmny, select, 0, n, t, 0, ldt, vl, 0, ldvl, vr, 0, ldvr, s, 0, sep, 0, mm, m, work, 0, ldwork, iwork, 0, info); } - public void dtrsna(String job, String howmny, boolean[] select, int _select_offset, int n, double[] t, int _t_offset, int ldt, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] s, int _s_offset, double[] sep, int _sep_offset, int mm, org.netlib.util.intW m, double[] work, int _work_offset, int ldwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void dtrsna(String job, String howmny, boolean[] select, int offsetselect, int n, double[] t, int offsett, int ldt, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, double[] s, int offsets, double[] sep, int offsetsep, int mm, org.netlib.util.intW m, double[] work, int offsetwork, int ldwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - dtrsnaK(job, howmny, select, _select_offset, n, t, _t_offset, ldt, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, s, _s_offset, sep, _sep_offset, mm, m, work, _work_offset, ldwork, iwork, _iwork_offset, info); + dtrsnaK(job, howmny, select, offsetselect, n, t, offsett, ldt, vl, offsetvl, ldvl, vr, offsetvr, ldvr, s, offsets, sep, offsetsep, mm, m, work, offsetwork, ldwork, iwork, offsetiwork, info); } - protected abstract void dtrsnaK(String job, String howmny, boolean[] select, int _select_offset, int n, double[] t, int _t_offset, int ldt, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] s, int _s_offset, double[] sep, int _sep_offset, int mm, org.netlib.util.intW m, double[] work, int _work_offset, int ldwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void dtrsnaK(String job, String howmny, boolean[] select, int offsetselect, int n, double[] t, int offsett, int ldt, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, double[] s, int offsets, double[] sep, int offsetsep, int mm, org.netlib.util.intW m, double[] work, int offsetwork, int ldwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void dtrsyl(String trana, String tranb, int isgn, int m, int n, double[] a, int lda, double[] b, int ldb, double[] c, int Ldc, org.netlib.util.doubleW scale, org.netlib.util.intW info) { dtrsyl(trana, tranb, isgn, m, n, a, 0, lda, b, 0, ldb, c, 0, Ldc, scale, info); } - public void dtrsyl(String trana, String tranb, int isgn, int m, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] c, int _c_offset, int Ldc, org.netlib.util.doubleW scale, org.netlib.util.intW info) { + public void dtrsyl(String trana, String tranb, int isgn, int m, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] c, int offsetc, int Ldc, org.netlib.util.doubleW scale, org.netlib.util.intW info) { //FIXME Add arguments check - dtrsylK(trana, tranb, isgn, m, n, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, Ldc, scale, info); + dtrsylK(trana, tranb, isgn, m, n, a, offseta, lda, b, offsetb, ldb, c, offsetc, Ldc, scale, info); } - protected abstract void dtrsylK(String trana, String tranb, int isgn, int m, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] c, int _c_offset, int Ldc, org.netlib.util.doubleW scale, org.netlib.util.intW info); + protected abstract void dtrsylK(String trana, String tranb, int isgn, int m, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] c, int offsetc, int Ldc, org.netlib.util.doubleW scale, org.netlib.util.intW info); public void dtrti2(String uplo, String diag, int n, double[] a, int lda, org.netlib.util.intW info) { dtrti2(uplo, diag, n, a, 0, lda, info); } - public void dtrti2(String uplo, String diag, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info) { + public void dtrti2(String uplo, String diag, int n, double[] a, int offseta, int lda, org.netlib.util.intW info) { //FIXME Add arguments check - dtrti2K(uplo, diag, n, a, _a_offset, lda, info); + dtrti2K(uplo, diag, n, a, offseta, lda, info); } - protected abstract void dtrti2K(String uplo, String diag, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected abstract void dtrti2K(String uplo, String diag, int n, double[] a, int offseta, int lda, org.netlib.util.intW info); public void dtrtri(String uplo, String diag, int n, double[] a, int lda, org.netlib.util.intW info) { dtrtri(uplo, diag, n, a, 0, lda, info); } - public void dtrtri(String uplo, String diag, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info) { + public void dtrtri(String uplo, String diag, int n, double[] a, int offseta, int lda, org.netlib.util.intW info) { //FIXME Add arguments check - dtrtriK(uplo, diag, n, a, _a_offset, lda, info); + dtrtriK(uplo, diag, n, a, offseta, lda, info); } - protected abstract void dtrtriK(String uplo, String diag, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected abstract void dtrtriK(String uplo, String diag, int n, double[] a, int offseta, int lda, org.netlib.util.intW info); public void dtrtrs(String uplo, String trans, String diag, int n, int nrhs, double[] a, int lda, double[] b, int ldb, org.netlib.util.intW info) { dtrtrs(uplo, trans, diag, n, nrhs, a, 0, lda, b, 0, ldb, info); } - public void dtrtrs(String uplo, String trans, String diag, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void dtrtrs(String uplo, String trans, String diag, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - dtrtrsK(uplo, trans, diag, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, info); + dtrtrsK(uplo, trans, diag, n, nrhs, a, offseta, lda, b, offsetb, ldb, info); } - protected abstract void dtrtrsK(String uplo, String trans, String diag, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void dtrtrsK(String uplo, String trans, String diag, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW info); public void dtzrqf(int m, int n, double[] a, int lda, double[] tau, org.netlib.util.intW info) { dtzrqf(m, n, a, 0, lda, tau, 0, info); } - public void dtzrqf(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, org.netlib.util.intW info) { + public void dtzrqf(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, org.netlib.util.intW info) { //FIXME Add arguments check - dtzrqfK(m, n, a, _a_offset, lda, tau, _tau_offset, info); + dtzrqfK(m, n, a, offseta, lda, tau, offsettau, info); } - protected abstract void dtzrqfK(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, org.netlib.util.intW info); + protected abstract void dtzrqfK(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, org.netlib.util.intW info); public void dtzrzf(int m, int n, double[] a, int lda, double[] tau, double[] work, int lwork, org.netlib.util.intW info) { dtzrzf(m, n, a, 0, lda, tau, 0, work, 0, lwork, info); } - public void dtzrzf(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void dtzrzf(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - dtzrzfK(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + dtzrzfK(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected abstract void dtzrzfK(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void dtzrzfK(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); public int ieeeck(int ispec, float zero, float one) { return ieeeckK(ispec, zero, one); @@ -3870,826 +3870,826 @@ public void sbdsdc(String uplo, String compq, int n, float[] d, float[] e, float sbdsdc(uplo, compq, n, d, 0, e, 0, u, 0, ldu, vt, 0, ldvt, q, 0, iq, 0, work, 0, iwork, 0, info); } - public void sbdsdc(String uplo, String compq, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, float[] q, int _q_offset, int[] iq, int _iq_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void sbdsdc(String uplo, String compq, int n, float[] d, int offsetd, float[] e, int offsete, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int ldvt, float[] q, int offsetq, int[] iq, int offsetiq, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - sbdsdcK(uplo, compq, n, d, _d_offset, e, _e_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, q, _q_offset, iq, _iq_offset, work, _work_offset, iwork, _iwork_offset, info); + sbdsdcK(uplo, compq, n, d, offsetd, e, offsete, u, offsetu, ldu, vt, offsetvt, ldvt, q, offsetq, iq, offsetiq, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void sbdsdcK(String uplo, String compq, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, float[] q, int _q_offset, int[] iq, int _iq_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void sbdsdcK(String uplo, String compq, int n, float[] d, int offsetd, float[] e, int offsete, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int ldvt, float[] q, int offsetq, int[] iq, int offsetiq, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sbdsqr(String uplo, int n, int ncvt, int nru, int ncc, float[] d, float[] e, float[] vt, int ldvt, float[] u, int ldu, float[] c, int Ldc, float[] work, org.netlib.util.intW info) { sbdsqr(uplo, n, ncvt, nru, ncc, d, 0, e, 0, vt, 0, ldvt, u, 0, ldu, c, 0, Ldc, work, 0, info); } - public void sbdsqr(String uplo, int n, int ncvt, int nru, int ncc, float[] d, int _d_offset, float[] e, int _e_offset, float[] vt, int _vt_offset, int ldvt, float[] u, int _u_offset, int ldu, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info) { + public void sbdsqr(String uplo, int n, int ncvt, int nru, int ncc, float[] d, int offsetd, float[] e, int offsete, float[] vt, int offsetvt, int ldvt, float[] u, int offsetu, int ldu, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - sbdsqrK(uplo, n, ncvt, nru, ncc, d, _d_offset, e, _e_offset, vt, _vt_offset, ldvt, u, _u_offset, ldu, c, _c_offset, Ldc, work, _work_offset, info); + sbdsqrK(uplo, n, ncvt, nru, ncc, d, offsetd, e, offsete, vt, offsetvt, ldvt, u, offsetu, ldu, c, offsetc, Ldc, work, offsetwork, info); } - protected abstract void sbdsqrK(String uplo, int n, int ncvt, int nru, int ncc, float[] d, int _d_offset, float[] e, int _e_offset, float[] vt, int _vt_offset, int ldvt, float[] u, int _u_offset, int ldu, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void sbdsqrK(String uplo, int n, int ncvt, int nru, int ncc, float[] d, int offsetd, float[] e, int offsete, float[] vt, int offsetvt, int ldvt, float[] u, int offsetu, int ldu, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info); public void sdisna(String job, int m, int n, float[] d, float[] sep, org.netlib.util.intW info) { sdisna(job, m, n, d, 0, sep, 0, info); } - public void sdisna(String job, int m, int n, float[] d, int _d_offset, float[] sep, int _sep_offset, org.netlib.util.intW info) { + public void sdisna(String job, int m, int n, float[] d, int offsetd, float[] sep, int offsetsep, org.netlib.util.intW info) { //FIXME Add arguments check - sdisnaK(job, m, n, d, _d_offset, sep, _sep_offset, info); + sdisnaK(job, m, n, d, offsetd, sep, offsetsep, info); } - protected abstract void sdisnaK(String job, int m, int n, float[] d, int _d_offset, float[] sep, int _sep_offset, org.netlib.util.intW info); + protected abstract void sdisnaK(String job, int m, int n, float[] d, int offsetd, float[] sep, int offsetsep, org.netlib.util.intW info); public void sgbbrd(String vect, int m, int n, int ncc, int kl, int ku, float[] ab, int ldab, float[] d, float[] e, float[] q, int ldq, float[] pt, int ldpt, float[] c, int Ldc, float[] work, org.netlib.util.intW info) { sgbbrd(vect, m, n, ncc, kl, ku, ab, 0, ldab, d, 0, e, 0, q, 0, ldq, pt, 0, ldpt, c, 0, Ldc, work, 0, info); } - public void sgbbrd(String vect, int m, int n, int ncc, int kl, int ku, float[] ab, int _ab_offset, int ldab, float[] d, int _d_offset, float[] e, int _e_offset, float[] q, int _q_offset, int ldq, float[] pt, int _pt_offset, int ldpt, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info) { + public void sgbbrd(String vect, int m, int n, int ncc, int kl, int ku, float[] ab, int offsetab, int ldab, float[] d, int offsetd, float[] e, int offsete, float[] q, int offsetq, int ldq, float[] pt, int offsetpt, int ldpt, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgbbrdK(vect, m, n, ncc, kl, ku, ab, _ab_offset, ldab, d, _d_offset, e, _e_offset, q, _q_offset, ldq, pt, _pt_offset, ldpt, c, _c_offset, Ldc, work, _work_offset, info); + sgbbrdK(vect, m, n, ncc, kl, ku, ab, offsetab, ldab, d, offsetd, e, offsete, q, offsetq, ldq, pt, offsetpt, ldpt, c, offsetc, Ldc, work, offsetwork, info); } - protected abstract void sgbbrdK(String vect, int m, int n, int ncc, int kl, int ku, float[] ab, int _ab_offset, int ldab, float[] d, int _d_offset, float[] e, int _e_offset, float[] q, int _q_offset, int ldq, float[] pt, int _pt_offset, int ldpt, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void sgbbrdK(String vect, int m, int n, int ncc, int kl, int ku, float[] ab, int offsetab, int ldab, float[] d, int offsetd, float[] e, int offsete, float[] q, int offsetq, int ldq, float[] pt, int offsetpt, int ldpt, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info); public void sgbcon(String norm, int n, int kl, int ku, float[] ab, int ldab, int[] ipiv, float anorm, org.netlib.util.floatW rcond, float[] work, int[] iwork, org.netlib.util.intW info) { sgbcon(norm, n, kl, ku, ab, 0, ldab, ipiv, 0, anorm, rcond, work, 0, iwork, 0, info); } - public void sgbcon(String norm, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void sgbcon(String norm, int n, int kl, int ku, float[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgbconK(norm, n, kl, ku, ab, _ab_offset, ldab, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + sgbconK(norm, n, kl, ku, ab, offsetab, ldab, ipiv, offsetipiv, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void sgbconK(String norm, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void sgbconK(String norm, int n, int kl, int ku, float[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sgbequ(int m, int n, int kl, int ku, float[] ab, int ldab, float[] r, float[] c, org.netlib.util.floatW rowcnd, org.netlib.util.floatW colcnd, org.netlib.util.floatW amax, org.netlib.util.intW info) { sgbequ(m, n, kl, ku, ab, 0, ldab, r, 0, c, 0, rowcnd, colcnd, amax, info); } - public void sgbequ(int m, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, float[] r, int _r_offset, float[] c, int _c_offset, org.netlib.util.floatW rowcnd, org.netlib.util.floatW colcnd, org.netlib.util.floatW amax, org.netlib.util.intW info) { + public void sgbequ(int m, int n, int kl, int ku, float[] ab, int offsetab, int ldab, float[] r, int offsetr, float[] c, int offsetc, org.netlib.util.floatW rowcnd, org.netlib.util.floatW colcnd, org.netlib.util.floatW amax, org.netlib.util.intW info) { //FIXME Add arguments check - sgbequK(m, n, kl, ku, ab, _ab_offset, ldab, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, info); + sgbequK(m, n, kl, ku, ab, offsetab, ldab, r, offsetr, c, offsetc, rowcnd, colcnd, amax, info); } - protected abstract void sgbequK(int m, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, float[] r, int _r_offset, float[] c, int _c_offset, org.netlib.util.floatW rowcnd, org.netlib.util.floatW colcnd, org.netlib.util.floatW amax, org.netlib.util.intW info); + protected abstract void sgbequK(int m, int n, int kl, int ku, float[] ab, int offsetab, int ldab, float[] r, int offsetr, float[] c, int offsetc, org.netlib.util.floatW rowcnd, org.netlib.util.floatW colcnd, org.netlib.util.floatW amax, org.netlib.util.intW info); public void sgbrfs(String trans, int n, int kl, int ku, int nrhs, float[] ab, int ldab, float[] afb, int ldafb, int[] ipiv, float[] b, int ldb, float[] x, int ldx, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info) { sgbrfs(trans, n, kl, ku, nrhs, ab, 0, ldab, afb, 0, ldafb, ipiv, 0, b, 0, ldb, x, 0, ldx, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void sgbrfs(String trans, int n, int kl, int ku, int nrhs, float[] ab, int _ab_offset, int ldab, float[] afb, int _afb_offset, int ldafb, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void sgbrfs(String trans, int n, int kl, int ku, int nrhs, float[] ab, int offsetab, int ldab, float[] afb, int offsetafb, int ldafb, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgbrfsK(trans, n, kl, ku, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + sgbrfsK(trans, n, kl, ku, nrhs, ab, offsetab, ldab, afb, offsetafb, ldafb, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void sgbrfsK(String trans, int n, int kl, int ku, int nrhs, float[] ab, int _ab_offset, int ldab, float[] afb, int _afb_offset, int ldafb, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void sgbrfsK(String trans, int n, int kl, int ku, int nrhs, float[] ab, int offsetab, int ldab, float[] afb, int offsetafb, int ldafb, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sgbsv(int n, int kl, int ku, int nrhs, float[] ab, int ldab, int[] ipiv, float[] b, int ldb, org.netlib.util.intW info) { sgbsv(n, kl, ku, nrhs, ab, 0, ldab, ipiv, 0, b, 0, ldb, info); } - public void sgbsv(int n, int kl, int ku, int nrhs, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void sgbsv(int n, int kl, int ku, int nrhs, float[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - sgbsvK(n, kl, ku, nrhs, ab, _ab_offset, ldab, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + sgbsvK(n, kl, ku, nrhs, ab, offsetab, ldab, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected abstract void sgbsvK(int n, int kl, int ku, int nrhs, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void sgbsvK(int n, int kl, int ku, int nrhs, float[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void sgbsvx(String fact, String trans, int n, int kl, int ku, int nrhs, float[] ab, int ldab, float[] afb, int ldafb, int[] ipiv, org.netlib.util.StringW equed, float[] r, float[] c, float[] b, int ldb, float[] x, int ldx, org.netlib.util.floatW rcond, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info) { sgbsvx(fact, trans, n, kl, ku, nrhs, ab, 0, ldab, afb, 0, ldafb, ipiv, 0, equed, r, 0, c, 0, b, 0, ldb, x, 0, ldx, rcond, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void sgbsvx(String fact, String trans, int n, int kl, int ku, int nrhs, float[] ab, int _ab_offset, int ldab, float[] afb, int _afb_offset, int ldafb, int[] ipiv, int _ipiv_offset, org.netlib.util.StringW equed, float[] r, int _r_offset, float[] c, int _c_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void sgbsvx(String fact, String trans, int n, int kl, int ku, int nrhs, float[] ab, int offsetab, int ldab, float[] afb, int offsetafb, int ldafb, int[] ipiv, int offsetipiv, org.netlib.util.StringW equed, float[] r, int offsetr, float[] c, int offsetc, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgbsvxK(fact, trans, n, kl, ku, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, ipiv, _ipiv_offset, equed, r, _r_offset, c, _c_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + sgbsvxK(fact, trans, n, kl, ku, nrhs, ab, offsetab, ldab, afb, offsetafb, ldafb, ipiv, offsetipiv, equed, r, offsetr, c, offsetc, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void sgbsvxK(String fact, String trans, int n, int kl, int ku, int nrhs, float[] ab, int _ab_offset, int ldab, float[] afb, int _afb_offset, int ldafb, int[] ipiv, int _ipiv_offset, org.netlib.util.StringW equed, float[] r, int _r_offset, float[] c, int _c_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void sgbsvxK(String fact, String trans, int n, int kl, int ku, int nrhs, float[] ab, int offsetab, int ldab, float[] afb, int offsetafb, int ldafb, int[] ipiv, int offsetipiv, org.netlib.util.StringW equed, float[] r, int offsetr, float[] c, int offsetc, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sgbtf2(int m, int n, int kl, int ku, float[] ab, int ldab, int[] ipiv, org.netlib.util.intW info) { sgbtf2(m, n, kl, ku, ab, 0, ldab, ipiv, 0, info); } - public void sgbtf2(int m, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { + public void sgbtf2(int m, int n, int kl, int ku, float[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, org.netlib.util.intW info) { //FIXME Add arguments check - sgbtf2K(m, n, kl, ku, ab, _ab_offset, ldab, ipiv, _ipiv_offset, info); + sgbtf2K(m, n, kl, ku, ab, offsetab, ldab, ipiv, offsetipiv, info); } - protected abstract void sgbtf2K(int m, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + protected abstract void sgbtf2K(int m, int n, int kl, int ku, float[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, org.netlib.util.intW info); public void sgbtrf(int m, int n, int kl, int ku, float[] ab, int ldab, int[] ipiv, org.netlib.util.intW info) { sgbtrf(m, n, kl, ku, ab, 0, ldab, ipiv, 0, info); } - public void sgbtrf(int m, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { + public void sgbtrf(int m, int n, int kl, int ku, float[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, org.netlib.util.intW info) { //FIXME Add arguments check - sgbtrfK(m, n, kl, ku, ab, _ab_offset, ldab, ipiv, _ipiv_offset, info); + sgbtrfK(m, n, kl, ku, ab, offsetab, ldab, ipiv, offsetipiv, info); } - protected abstract void sgbtrfK(int m, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + protected abstract void sgbtrfK(int m, int n, int kl, int ku, float[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, org.netlib.util.intW info); public void sgbtrs(String trans, int n, int kl, int ku, int nrhs, float[] ab, int ldab, int[] ipiv, float[] b, int ldb, org.netlib.util.intW info) { sgbtrs(trans, n, kl, ku, nrhs, ab, 0, ldab, ipiv, 0, b, 0, ldb, info); } - public void sgbtrs(String trans, int n, int kl, int ku, int nrhs, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void sgbtrs(String trans, int n, int kl, int ku, int nrhs, float[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - sgbtrsK(trans, n, kl, ku, nrhs, ab, _ab_offset, ldab, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + sgbtrsK(trans, n, kl, ku, nrhs, ab, offsetab, ldab, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected abstract void sgbtrsK(String trans, int n, int kl, int ku, int nrhs, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void sgbtrsK(String trans, int n, int kl, int ku, int nrhs, float[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void sgebak(String job, String side, int n, int ilo, int ihi, float[] scale, int m, float[] v, int ldv, org.netlib.util.intW info) { sgebak(job, side, n, ilo, ihi, scale, 0, m, v, 0, ldv, info); } - public void sgebak(String job, String side, int n, int ilo, int ihi, float[] scale, int _scale_offset, int m, float[] v, int _v_offset, int ldv, org.netlib.util.intW info) { + public void sgebak(String job, String side, int n, int ilo, int ihi, float[] scale, int offsetscale, int m, float[] v, int offsetv, int ldv, org.netlib.util.intW info) { //FIXME Add arguments check - sgebakK(job, side, n, ilo, ihi, scale, _scale_offset, m, v, _v_offset, ldv, info); + sgebakK(job, side, n, ilo, ihi, scale, offsetscale, m, v, offsetv, ldv, info); } - protected abstract void sgebakK(String job, String side, int n, int ilo, int ihi, float[] scale, int _scale_offset, int m, float[] v, int _v_offset, int ldv, org.netlib.util.intW info); + protected abstract void sgebakK(String job, String side, int n, int ilo, int ihi, float[] scale, int offsetscale, int m, float[] v, int offsetv, int ldv, org.netlib.util.intW info); public void sgebal(String job, int n, float[] a, int lda, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] scale, org.netlib.util.intW info) { sgebal(job, n, a, 0, lda, ilo, ihi, scale, 0, info); } - public void sgebal(String job, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] scale, int _scale_offset, org.netlib.util.intW info) { + public void sgebal(String job, int n, float[] a, int offseta, int lda, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] scale, int offsetscale, org.netlib.util.intW info) { //FIXME Add arguments check - sgebalK(job, n, a, _a_offset, lda, ilo, ihi, scale, _scale_offset, info); + sgebalK(job, n, a, offseta, lda, ilo, ihi, scale, offsetscale, info); } - protected abstract void sgebalK(String job, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] scale, int _scale_offset, org.netlib.util.intW info); + protected abstract void sgebalK(String job, int n, float[] a, int offseta, int lda, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] scale, int offsetscale, org.netlib.util.intW info); public void sgebd2(int m, int n, float[] a, int lda, float[] d, float[] e, float[] tauq, float[] taup, float[] work, org.netlib.util.intW info) { sgebd2(m, n, a, 0, lda, d, 0, e, 0, tauq, 0, taup, 0, work, 0, info); } - public void sgebd2(int m, int n, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tauq, int _tauq_offset, float[] taup, int _taup_offset, float[] work, int _work_offset, org.netlib.util.intW info) { + public void sgebd2(int m, int n, float[] a, int offseta, int lda, float[] d, int offsetd, float[] e, int offsete, float[] tauq, int offsettauq, float[] taup, int offsettaup, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgebd2K(m, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tauq, _tauq_offset, taup, _taup_offset, work, _work_offset, info); + sgebd2K(m, n, a, offseta, lda, d, offsetd, e, offsete, tauq, offsettauq, taup, offsettaup, work, offsetwork, info); } - protected abstract void sgebd2K(int m, int n, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tauq, int _tauq_offset, float[] taup, int _taup_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void sgebd2K(int m, int n, float[] a, int offseta, int lda, float[] d, int offsetd, float[] e, int offsete, float[] tauq, int offsettauq, float[] taup, int offsettaup, float[] work, int offsetwork, org.netlib.util.intW info); public void sgebrd(int m, int n, float[] a, int lda, float[] d, float[] e, float[] tauq, float[] taup, float[] work, int lwork, org.netlib.util.intW info) { sgebrd(m, n, a, 0, lda, d, 0, e, 0, tauq, 0, taup, 0, work, 0, lwork, info); } - public void sgebrd(int m, int n, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tauq, int _tauq_offset, float[] taup, int _taup_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sgebrd(int m, int n, float[] a, int offseta, int lda, float[] d, int offsetd, float[] e, int offsete, float[] tauq, int offsettauq, float[] taup, int offsettaup, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgebrdK(m, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tauq, _tauq_offset, taup, _taup_offset, work, _work_offset, lwork, info); + sgebrdK(m, n, a, offseta, lda, d, offsetd, e, offsete, tauq, offsettauq, taup, offsettaup, work, offsetwork, lwork, info); } - protected abstract void sgebrdK(int m, int n, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tauq, int _tauq_offset, float[] taup, int _taup_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sgebrdK(int m, int n, float[] a, int offseta, int lda, float[] d, int offsetd, float[] e, int offsete, float[] tauq, int offsettauq, float[] taup, int offsettaup, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgecon(String norm, int n, float[] a, int lda, float anorm, org.netlib.util.floatW rcond, float[] work, int[] iwork, org.netlib.util.intW info) { sgecon(norm, n, a, 0, lda, anorm, rcond, work, 0, iwork, 0, info); } - public void sgecon(String norm, int n, float[] a, int _a_offset, int lda, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void sgecon(String norm, int n, float[] a, int offseta, int lda, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgeconK(norm, n, a, _a_offset, lda, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + sgeconK(norm, n, a, offseta, lda, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void sgeconK(String norm, int n, float[] a, int _a_offset, int lda, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void sgeconK(String norm, int n, float[] a, int offseta, int lda, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sgeequ(int m, int n, float[] a, int lda, float[] r, float[] c, org.netlib.util.floatW rowcnd, org.netlib.util.floatW colcnd, org.netlib.util.floatW amax, org.netlib.util.intW info) { sgeequ(m, n, a, 0, lda, r, 0, c, 0, rowcnd, colcnd, amax, info); } - public void sgeequ(int m, int n, float[] a, int _a_offset, int lda, float[] r, int _r_offset, float[] c, int _c_offset, org.netlib.util.floatW rowcnd, org.netlib.util.floatW colcnd, org.netlib.util.floatW amax, org.netlib.util.intW info) { + public void sgeequ(int m, int n, float[] a, int offseta, int lda, float[] r, int offsetr, float[] c, int offsetc, org.netlib.util.floatW rowcnd, org.netlib.util.floatW colcnd, org.netlib.util.floatW amax, org.netlib.util.intW info) { //FIXME Add arguments check - sgeequK(m, n, a, _a_offset, lda, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, info); + sgeequK(m, n, a, offseta, lda, r, offsetr, c, offsetc, rowcnd, colcnd, amax, info); } - protected abstract void sgeequK(int m, int n, float[] a, int _a_offset, int lda, float[] r, int _r_offset, float[] c, int _c_offset, org.netlib.util.floatW rowcnd, org.netlib.util.floatW colcnd, org.netlib.util.floatW amax, org.netlib.util.intW info); + protected abstract void sgeequK(int m, int n, float[] a, int offseta, int lda, float[] r, int offsetr, float[] c, int offsetc, org.netlib.util.floatW rowcnd, org.netlib.util.floatW colcnd, org.netlib.util.floatW amax, org.netlib.util.intW info); public void sgees(String jobvs, String sort, java.lang.Object select, int n, float[] a, int lda, org.netlib.util.intW sdim, float[] wr, float[] wi, float[] vs, int ldvs, float[] work, int lwork, boolean[] bwork, org.netlib.util.intW info) { sgees(jobvs, sort, select, n, a, 0, lda, sdim, wr, 0, wi, 0, vs, 0, ldvs, work, 0, lwork, bwork, 0, info); } - public void sgees(String jobvs, String sort, java.lang.Object select, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW sdim, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vs, int _vs_offset, int ldvs, float[] work, int _work_offset, int lwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info) { + public void sgees(String jobvs, String sort, java.lang.Object select, int n, float[] a, int offseta, int lda, org.netlib.util.intW sdim, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] vs, int offsetvs, int ldvs, float[] work, int offsetwork, int lwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgeesK(jobvs, sort, select, n, a, _a_offset, lda, sdim, wr, _wr_offset, wi, _wi_offset, vs, _vs_offset, ldvs, work, _work_offset, lwork, bwork, _bwork_offset, info); + sgeesK(jobvs, sort, select, n, a, offseta, lda, sdim, wr, offsetwr, wi, offsetwi, vs, offsetvs, ldvs, work, offsetwork, lwork, bwork, offsetbwork, info); } - protected abstract void sgeesK(String jobvs, String sort, java.lang.Object select, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW sdim, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vs, int _vs_offset, int ldvs, float[] work, int _work_offset, int lwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + protected abstract void sgeesK(String jobvs, String sort, java.lang.Object select, int n, float[] a, int offseta, int lda, org.netlib.util.intW sdim, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] vs, int offsetvs, int ldvs, float[] work, int offsetwork, int lwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info); public void sgeesx(String jobvs, String sort, java.lang.Object select, String sense, int n, float[] a, int lda, org.netlib.util.intW sdim, float[] wr, float[] wi, float[] vs, int ldvs, org.netlib.util.floatW rconde, org.netlib.util.floatW rcondv, float[] work, int lwork, int[] iwork, int liwork, boolean[] bwork, org.netlib.util.intW info) { sgeesx(jobvs, sort, select, sense, n, a, 0, lda, sdim, wr, 0, wi, 0, vs, 0, ldvs, rconde, rcondv, work, 0, lwork, iwork, 0, liwork, bwork, 0, info); } - public void sgeesx(String jobvs, String sort, java.lang.Object select, String sense, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW sdim, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vs, int _vs_offset, int ldvs, org.netlib.util.floatW rconde, org.netlib.util.floatW rcondv, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info) { + public void sgeesx(String jobvs, String sort, java.lang.Object select, String sense, int n, float[] a, int offseta, int lda, org.netlib.util.intW sdim, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] vs, int offsetvs, int ldvs, org.netlib.util.floatW rconde, org.netlib.util.floatW rcondv, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgeesxK(jobvs, sort, select, sense, n, a, _a_offset, lda, sdim, wr, _wr_offset, wi, _wi_offset, vs, _vs_offset, ldvs, rconde, rcondv, work, _work_offset, lwork, iwork, _iwork_offset, liwork, bwork, _bwork_offset, info); + sgeesxK(jobvs, sort, select, sense, n, a, offseta, lda, sdim, wr, offsetwr, wi, offsetwi, vs, offsetvs, ldvs, rconde, rcondv, work, offsetwork, lwork, iwork, offsetiwork, liwork, bwork, offsetbwork, info); } - protected abstract void sgeesxK(String jobvs, String sort, java.lang.Object select, String sense, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW sdim, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vs, int _vs_offset, int ldvs, org.netlib.util.floatW rconde, org.netlib.util.floatW rcondv, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + protected abstract void sgeesxK(String jobvs, String sort, java.lang.Object select, String sense, int n, float[] a, int offseta, int lda, org.netlib.util.intW sdim, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] vs, int offsetvs, int ldvs, org.netlib.util.floatW rconde, org.netlib.util.floatW rcondv, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info); public void sgeev(String jobvl, String jobvr, int n, float[] a, int lda, float[] wr, float[] wi, float[] vl, int ldvl, float[] vr, int ldvr, float[] work, int lwork, org.netlib.util.intW info) { sgeev(jobvl, jobvr, n, a, 0, lda, wr, 0, wi, 0, vl, 0, ldvl, vr, 0, ldvr, work, 0, lwork, info); } - public void sgeev(String jobvl, String jobvr, int n, float[] a, int _a_offset, int lda, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sgeev(String jobvl, String jobvr, int n, float[] a, int offseta, int lda, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgeevK(jobvl, jobvr, n, a, _a_offset, lda, wr, _wr_offset, wi, _wi_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, work, _work_offset, lwork, info); + sgeevK(jobvl, jobvr, n, a, offseta, lda, wr, offsetwr, wi, offsetwi, vl, offsetvl, ldvl, vr, offsetvr, ldvr, work, offsetwork, lwork, info); } - protected abstract void sgeevK(String jobvl, String jobvr, int n, float[] a, int _a_offset, int lda, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sgeevK(String jobvl, String jobvr, int n, float[] a, int offseta, int lda, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgeevx(String balanc, String jobvl, String jobvr, String sense, int n, float[] a, int lda, float[] wr, float[] wi, float[] vl, int ldvl, float[] vr, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] scale, org.netlib.util.floatW abnrm, float[] rconde, float[] rcondv, float[] work, int lwork, int[] iwork, org.netlib.util.intW info) { sgeevx(balanc, jobvl, jobvr, sense, n, a, 0, lda, wr, 0, wi, 0, vl, 0, ldvl, vr, 0, ldvr, ilo, ihi, scale, 0, abnrm, rconde, 0, rcondv, 0, work, 0, lwork, iwork, 0, info); } - public void sgeevx(String balanc, String jobvl, String jobvr, String sense, int n, float[] a, int _a_offset, int lda, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] scale, int _scale_offset, org.netlib.util.floatW abnrm, float[] rconde, int _rconde_offset, float[] rcondv, int _rcondv_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void sgeevx(String balanc, String jobvl, String jobvr, String sense, int n, float[] a, int offseta, int lda, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] scale, int offsetscale, org.netlib.util.floatW abnrm, float[] rconde, int offsetrconde, float[] rcondv, int offsetrcondv, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgeevxK(balanc, jobvl, jobvr, sense, n, a, _a_offset, lda, wr, _wr_offset, wi, _wi_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, ilo, ihi, scale, _scale_offset, abnrm, rconde, _rconde_offset, rcondv, _rcondv_offset, work, _work_offset, lwork, iwork, _iwork_offset, info); + sgeevxK(balanc, jobvl, jobvr, sense, n, a, offseta, lda, wr, offsetwr, wi, offsetwi, vl, offsetvl, ldvl, vr, offsetvr, ldvr, ilo, ihi, scale, offsetscale, abnrm, rconde, offsetrconde, rcondv, offsetrcondv, work, offsetwork, lwork, iwork, offsetiwork, info); } - protected abstract void sgeevxK(String balanc, String jobvl, String jobvr, String sense, int n, float[] a, int _a_offset, int lda, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] scale, int _scale_offset, org.netlib.util.floatW abnrm, float[] rconde, int _rconde_offset, float[] rcondv, int _rcondv_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void sgeevxK(String balanc, String jobvl, String jobvr, String sense, int n, float[] a, int offseta, int lda, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] scale, int offsetscale, org.netlib.util.floatW abnrm, float[] rconde, int offsetrconde, float[] rcondv, int offsetrcondv, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sgegs(String jobvsl, String jobvsr, int n, float[] a, int lda, float[] b, int ldb, float[] alphar, float[] alphai, float[] beta, float[] vsl, int ldvsl, float[] vsr, int ldvsr, float[] work, int lwork, org.netlib.util.intW info) { sgegs(jobvsl, jobvsr, n, a, 0, lda, b, 0, ldb, alphar, 0, alphai, 0, beta, 0, vsl, 0, ldvsl, vsr, 0, ldvsr, work, 0, lwork, info); } - public void sgegs(String jobvsl, String jobvsr, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vsl, int _vsl_offset, int ldvsl, float[] vsr, int _vsr_offset, int ldvsr, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sgegs(String jobvsl, String jobvsr, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] vsl, int offsetvsl, int ldvsl, float[] vsr, int offsetvsr, int ldvsr, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgegsK(jobvsl, jobvsr, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vsl, _vsl_offset, ldvsl, vsr, _vsr_offset, ldvsr, work, _work_offset, lwork, info); + sgegsK(jobvsl, jobvsr, n, a, offseta, lda, b, offsetb, ldb, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, vsl, offsetvsl, ldvsl, vsr, offsetvsr, ldvsr, work, offsetwork, lwork, info); } - protected abstract void sgegsK(String jobvsl, String jobvsr, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vsl, int _vsl_offset, int ldvsl, float[] vsr, int _vsr_offset, int ldvsr, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sgegsK(String jobvsl, String jobvsr, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] vsl, int offsetvsl, int ldvsl, float[] vsr, int offsetvsr, int ldvsr, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgegv(String jobvl, String jobvr, int n, float[] a, int lda, float[] b, int ldb, float[] alphar, float[] alphai, float[] beta, float[] vl, int ldvl, float[] vr, int ldvr, float[] work, int lwork, org.netlib.util.intW info) { sgegv(jobvl, jobvr, n, a, 0, lda, b, 0, ldb, alphar, 0, alphai, 0, beta, 0, vl, 0, ldvl, vr, 0, ldvr, work, 0, lwork, info); } - public void sgegv(String jobvl, String jobvr, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sgegv(String jobvl, String jobvr, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgegvK(jobvl, jobvr, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, work, _work_offset, lwork, info); + sgegvK(jobvl, jobvr, n, a, offseta, lda, b, offsetb, ldb, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, vl, offsetvl, ldvl, vr, offsetvr, ldvr, work, offsetwork, lwork, info); } - protected abstract void sgegvK(String jobvl, String jobvr, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sgegvK(String jobvl, String jobvr, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgehd2(int n, int ilo, int ihi, float[] a, int lda, float[] tau, float[] work, org.netlib.util.intW info) { sgehd2(n, ilo, ihi, a, 0, lda, tau, 0, work, 0, info); } - public void sgehd2(int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { + public void sgehd2(int n, int ilo, int ihi, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgehd2K(n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + sgehd2K(n, ilo, ihi, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected abstract void sgehd2K(int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void sgehd2K(int n, int ilo, int ihi, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); public void sgehrd(int n, int ilo, int ihi, float[] a, int lda, float[] tau, float[] work, int lwork, org.netlib.util.intW info) { sgehrd(n, ilo, ihi, a, 0, lda, tau, 0, work, 0, lwork, info); } - public void sgehrd(int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sgehrd(int n, int ilo, int ihi, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgehrdK(n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + sgehrdK(n, ilo, ihi, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected abstract void sgehrdK(int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sgehrdK(int n, int ilo, int ihi, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgelq2(int m, int n, float[] a, int lda, float[] tau, float[] work, org.netlib.util.intW info) { sgelq2(m, n, a, 0, lda, tau, 0, work, 0, info); } - public void sgelq2(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { + public void sgelq2(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgelq2K(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + sgelq2K(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected abstract void sgelq2K(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void sgelq2K(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); public void sgelqf(int m, int n, float[] a, int lda, float[] tau, float[] work, int lwork, org.netlib.util.intW info) { sgelqf(m, n, a, 0, lda, tau, 0, work, 0, lwork, info); } - public void sgelqf(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sgelqf(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgelqfK(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + sgelqfK(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected abstract void sgelqfK(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sgelqfK(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgels(String trans, int m, int n, int nrhs, float[] a, int lda, float[] b, int ldb, float[] work, int lwork, org.netlib.util.intW info) { sgels(trans, m, n, nrhs, a, 0, lda, b, 0, ldb, work, 0, lwork, info); } - public void sgels(String trans, int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sgels(String trans, int m, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgelsK(trans, m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, work, _work_offset, lwork, info); + sgelsK(trans, m, n, nrhs, a, offseta, lda, b, offsetb, ldb, work, offsetwork, lwork, info); } - protected abstract void sgelsK(String trans, int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sgelsK(String trans, int m, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgelsd(int m, int n, int nrhs, float[] a, int lda, float[] b, int ldb, float[] s, float rcond, org.netlib.util.intW rank, float[] work, int lwork, int[] iwork, org.netlib.util.intW info) { sgelsd(m, n, nrhs, a, 0, lda, b, 0, ldb, s, 0, rcond, rank, work, 0, lwork, iwork, 0, info); } - public void sgelsd(int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] s, int _s_offset, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void sgelsd(int m, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] s, int offsets, float rcond, org.netlib.util.intW rank, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgelsdK(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, s, _s_offset, rcond, rank, work, _work_offset, lwork, iwork, _iwork_offset, info); + sgelsdK(m, n, nrhs, a, offseta, lda, b, offsetb, ldb, s, offsets, rcond, rank, work, offsetwork, lwork, iwork, offsetiwork, info); } - protected abstract void sgelsdK(int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] s, int _s_offset, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void sgelsdK(int m, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] s, int offsets, float rcond, org.netlib.util.intW rank, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sgelss(int m, int n, int nrhs, float[] a, int lda, float[] b, int ldb, float[] s, float rcond, org.netlib.util.intW rank, float[] work, int lwork, org.netlib.util.intW info) { sgelss(m, n, nrhs, a, 0, lda, b, 0, ldb, s, 0, rcond, rank, work, 0, lwork, info); } - public void sgelss(int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] s, int _s_offset, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sgelss(int m, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] s, int offsets, float rcond, org.netlib.util.intW rank, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgelssK(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, s, _s_offset, rcond, rank, work, _work_offset, lwork, info); + sgelssK(m, n, nrhs, a, offseta, lda, b, offsetb, ldb, s, offsets, rcond, rank, work, offsetwork, lwork, info); } - protected abstract void sgelssK(int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] s, int _s_offset, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sgelssK(int m, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] s, int offsets, float rcond, org.netlib.util.intW rank, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgelsx(int m, int n, int nrhs, float[] a, int lda, float[] b, int ldb, int[] jpvt, float rcond, org.netlib.util.intW rank, float[] work, org.netlib.util.intW info) { sgelsx(m, n, nrhs, a, 0, lda, b, 0, ldb, jpvt, 0, rcond, rank, work, 0, info); } - public void sgelsx(int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, int[] jpvt, int _jpvt_offset, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, org.netlib.util.intW info) { + public void sgelsx(int m, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, int[] jpvt, int offsetjpvt, float rcond, org.netlib.util.intW rank, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgelsxK(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, jpvt, _jpvt_offset, rcond, rank, work, _work_offset, info); + sgelsxK(m, n, nrhs, a, offseta, lda, b, offsetb, ldb, jpvt, offsetjpvt, rcond, rank, work, offsetwork, info); } - protected abstract void sgelsxK(int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, int[] jpvt, int _jpvt_offset, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void sgelsxK(int m, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, int[] jpvt, int offsetjpvt, float rcond, org.netlib.util.intW rank, float[] work, int offsetwork, org.netlib.util.intW info); public void sgelsy(int m, int n, int nrhs, float[] a, int lda, float[] b, int ldb, int[] jpvt, float rcond, org.netlib.util.intW rank, float[] work, int lwork, org.netlib.util.intW info) { sgelsy(m, n, nrhs, a, 0, lda, b, 0, ldb, jpvt, 0, rcond, rank, work, 0, lwork, info); } - public void sgelsy(int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, int[] jpvt, int _jpvt_offset, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sgelsy(int m, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, int[] jpvt, int offsetjpvt, float rcond, org.netlib.util.intW rank, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgelsyK(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, jpvt, _jpvt_offset, rcond, rank, work, _work_offset, lwork, info); + sgelsyK(m, n, nrhs, a, offseta, lda, b, offsetb, ldb, jpvt, offsetjpvt, rcond, rank, work, offsetwork, lwork, info); } - protected abstract void sgelsyK(int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, int[] jpvt, int _jpvt_offset, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sgelsyK(int m, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, int[] jpvt, int offsetjpvt, float rcond, org.netlib.util.intW rank, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgeql2(int m, int n, float[] a, int lda, float[] tau, float[] work, org.netlib.util.intW info) { sgeql2(m, n, a, 0, lda, tau, 0, work, 0, info); } - public void sgeql2(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { + public void sgeql2(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgeql2K(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + sgeql2K(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected abstract void sgeql2K(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void sgeql2K(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); public void sgeqlf(int m, int n, float[] a, int lda, float[] tau, float[] work, int lwork, org.netlib.util.intW info) { sgeqlf(m, n, a, 0, lda, tau, 0, work, 0, lwork, info); } - public void sgeqlf(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sgeqlf(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgeqlfK(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + sgeqlfK(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected abstract void sgeqlfK(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sgeqlfK(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgeqp3(int m, int n, float[] a, int lda, int[] jpvt, float[] tau, float[] work, int lwork, org.netlib.util.intW info) { sgeqp3(m, n, a, 0, lda, jpvt, 0, tau, 0, work, 0, lwork, info); } - public void sgeqp3(int m, int n, float[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sgeqp3(int m, int n, float[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgeqp3K(m, n, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, work, _work_offset, lwork, info); + sgeqp3K(m, n, a, offseta, lda, jpvt, offsetjpvt, tau, offsettau, work, offsetwork, lwork, info); } - protected abstract void sgeqp3K(int m, int n, float[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sgeqp3K(int m, int n, float[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgeqpf(int m, int n, float[] a, int lda, int[] jpvt, float[] tau, float[] work, org.netlib.util.intW info) { sgeqpf(m, n, a, 0, lda, jpvt, 0, tau, 0, work, 0, info); } - public void sgeqpf(int m, int n, float[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { + public void sgeqpf(int m, int n, float[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgeqpfK(m, n, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, work, _work_offset, info); + sgeqpfK(m, n, a, offseta, lda, jpvt, offsetjpvt, tau, offsettau, work, offsetwork, info); } - protected abstract void sgeqpfK(int m, int n, float[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void sgeqpfK(int m, int n, float[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); public void sgeqr2(int m, int n, float[] a, int lda, float[] tau, float[] work, org.netlib.util.intW info) { sgeqr2(m, n, a, 0, lda, tau, 0, work, 0, info); } - public void sgeqr2(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { + public void sgeqr2(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgeqr2K(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + sgeqr2K(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected abstract void sgeqr2K(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void sgeqr2K(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); public void sgeqrf(int m, int n, float[] a, int lda, float[] tau, float[] work, int lwork, org.netlib.util.intW info) { sgeqrf(m, n, a, 0, lda, tau, 0, work, 0, lwork, info); } - public void sgeqrf(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sgeqrf(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgeqrfK(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + sgeqrfK(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected abstract void sgeqrfK(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sgeqrfK(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgerfs(String trans, int n, int nrhs, float[] a, int lda, float[] af, int ldaf, int[] ipiv, float[] b, int ldb, float[] x, int ldx, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info) { sgerfs(trans, n, nrhs, a, 0, lda, af, 0, ldaf, ipiv, 0, b, 0, ldb, x, 0, ldx, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void sgerfs(String trans, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void sgerfs(String trans, int n, int nrhs, float[] a, int offseta, int lda, float[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgerfsK(trans, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + sgerfsK(trans, n, nrhs, a, offseta, lda, af, offsetaf, ldaf, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void sgerfsK(String trans, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void sgerfsK(String trans, int n, int nrhs, float[] a, int offseta, int lda, float[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sgerq2(int m, int n, float[] a, int lda, float[] tau, float[] work, org.netlib.util.intW info) { sgerq2(m, n, a, 0, lda, tau, 0, work, 0, info); } - public void sgerq2(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { + public void sgerq2(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgerq2K(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + sgerq2K(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected abstract void sgerq2K(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void sgerq2K(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); public void sgerqf(int m, int n, float[] a, int lda, float[] tau, float[] work, int lwork, org.netlib.util.intW info) { sgerqf(m, n, a, 0, lda, tau, 0, work, 0, lwork, info); } - public void sgerqf(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sgerqf(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgerqfK(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + sgerqfK(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected abstract void sgerqfK(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sgerqfK(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgesc2(int n, float[] a, int lda, float[] rhs, int[] ipiv, int[] jpiv, org.netlib.util.floatW scale) { sgesc2(n, a, 0, lda, rhs, 0, ipiv, 0, jpiv, 0, scale); } - public void sgesc2(int n, float[] a, int _a_offset, int lda, float[] rhs, int _rhs_offset, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset, org.netlib.util.floatW scale) { + public void sgesc2(int n, float[] a, int offseta, int lda, float[] rhs, int offsetrhs, int[] ipiv, int offsetipiv, int[] jpiv, int offsetjpiv, org.netlib.util.floatW scale) { //FIXME Add arguments check - sgesc2K(n, a, _a_offset, lda, rhs, _rhs_offset, ipiv, _ipiv_offset, jpiv, _jpiv_offset, scale); + sgesc2K(n, a, offseta, lda, rhs, offsetrhs, ipiv, offsetipiv, jpiv, offsetjpiv, scale); } - protected abstract void sgesc2K(int n, float[] a, int _a_offset, int lda, float[] rhs, int _rhs_offset, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset, org.netlib.util.floatW scale); + protected abstract void sgesc2K(int n, float[] a, int offseta, int lda, float[] rhs, int offsetrhs, int[] ipiv, int offsetipiv, int[] jpiv, int offsetjpiv, org.netlib.util.floatW scale); public void sgesdd(String jobz, int m, int n, float[] a, int lda, float[] s, float[] u, int ldu, float[] vt, int ldvt, float[] work, int lwork, int[] iwork, org.netlib.util.intW info) { sgesdd(jobz, m, n, a, 0, lda, s, 0, u, 0, ldu, vt, 0, ldvt, work, 0, lwork, iwork, 0, info); } - public void sgesdd(String jobz, int m, int n, float[] a, int _a_offset, int lda, float[] s, int _s_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void sgesdd(String jobz, int m, int n, float[] a, int offseta, int lda, float[] s, int offsets, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int ldvt, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgesddK(jobz, m, n, a, _a_offset, lda, s, _s_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, work, _work_offset, lwork, iwork, _iwork_offset, info); + sgesddK(jobz, m, n, a, offseta, lda, s, offsets, u, offsetu, ldu, vt, offsetvt, ldvt, work, offsetwork, lwork, iwork, offsetiwork, info); } - protected abstract void sgesddK(String jobz, int m, int n, float[] a, int _a_offset, int lda, float[] s, int _s_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void sgesddK(String jobz, int m, int n, float[] a, int offseta, int lda, float[] s, int offsets, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int ldvt, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sgesv(int n, int nrhs, float[] a, int lda, int[] ipiv, float[] b, int ldb, org.netlib.util.intW info) { sgesv(n, nrhs, a, 0, lda, ipiv, 0, b, 0, ldb, info); } - public void sgesv(int n, int nrhs, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void sgesv(int n, int nrhs, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - sgesvK(n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + sgesvK(n, nrhs, a, offseta, lda, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected abstract void sgesvK(int n, int nrhs, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void sgesvK(int n, int nrhs, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void sgesvd(String jobu, String jobvt, int m, int n, float[] a, int lda, float[] s, float[] u, int ldu, float[] vt, int ldvt, float[] work, int lwork, org.netlib.util.intW info) { sgesvd(jobu, jobvt, m, n, a, 0, lda, s, 0, u, 0, ldu, vt, 0, ldvt, work, 0, lwork, info); } - public void sgesvd(String jobu, String jobvt, int m, int n, float[] a, int _a_offset, int lda, float[] s, int _s_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sgesvd(String jobu, String jobvt, int m, int n, float[] a, int offseta, int lda, float[] s, int offsets, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int ldvt, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgesvdK(jobu, jobvt, m, n, a, _a_offset, lda, s, _s_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, work, _work_offset, lwork, info); + sgesvdK(jobu, jobvt, m, n, a, offseta, lda, s, offsets, u, offsetu, ldu, vt, offsetvt, ldvt, work, offsetwork, lwork, info); } - protected abstract void sgesvdK(String jobu, String jobvt, int m, int n, float[] a, int _a_offset, int lda, float[] s, int _s_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sgesvdK(String jobu, String jobvt, int m, int n, float[] a, int offseta, int lda, float[] s, int offsets, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int ldvt, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgesvx(String fact, String trans, int n, int nrhs, float[] a, int lda, float[] af, int ldaf, int[] ipiv, org.netlib.util.StringW equed, float[] r, float[] c, float[] b, int ldb, float[] x, int ldx, org.netlib.util.floatW rcond, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info) { sgesvx(fact, trans, n, nrhs, a, 0, lda, af, 0, ldaf, ipiv, 0, equed, r, 0, c, 0, b, 0, ldb, x, 0, ldx, rcond, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void sgesvx(String fact, String trans, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, org.netlib.util.StringW equed, float[] r, int _r_offset, float[] c, int _c_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void sgesvx(String fact, String trans, int n, int nrhs, float[] a, int offseta, int lda, float[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, org.netlib.util.StringW equed, float[] r, int offsetr, float[] c, int offsetc, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgesvxK(fact, trans, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, equed, r, _r_offset, c, _c_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + sgesvxK(fact, trans, n, nrhs, a, offseta, lda, af, offsetaf, ldaf, ipiv, offsetipiv, equed, r, offsetr, c, offsetc, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void sgesvxK(String fact, String trans, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, org.netlib.util.StringW equed, float[] r, int _r_offset, float[] c, int _c_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void sgesvxK(String fact, String trans, int n, int nrhs, float[] a, int offseta, int lda, float[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, org.netlib.util.StringW equed, float[] r, int offsetr, float[] c, int offsetc, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sgetc2(int n, float[] a, int lda, int[] ipiv, int[] jpiv, org.netlib.util.intW info) { sgetc2(n, a, 0, lda, ipiv, 0, jpiv, 0, info); } - public void sgetc2(int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset, org.netlib.util.intW info) { + public void sgetc2(int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, int[] jpiv, int offsetjpiv, org.netlib.util.intW info) { //FIXME Add arguments check - sgetc2K(n, a, _a_offset, lda, ipiv, _ipiv_offset, jpiv, _jpiv_offset, info); + sgetc2K(n, a, offseta, lda, ipiv, offsetipiv, jpiv, offsetjpiv, info); } - protected abstract void sgetc2K(int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset, org.netlib.util.intW info); + protected abstract void sgetc2K(int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, int[] jpiv, int offsetjpiv, org.netlib.util.intW info); public void sgetf2(int m, int n, float[] a, int lda, int[] ipiv, org.netlib.util.intW info) { sgetf2(m, n, a, 0, lda, ipiv, 0, info); } - public void sgetf2(int m, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { + public void sgetf2(int m, int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, org.netlib.util.intW info) { //FIXME Add arguments check - sgetf2K(m, n, a, _a_offset, lda, ipiv, _ipiv_offset, info); + sgetf2K(m, n, a, offseta, lda, ipiv, offsetipiv, info); } - protected abstract void sgetf2K(int m, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + protected abstract void sgetf2K(int m, int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, org.netlib.util.intW info); public void sgetrf(int m, int n, float[] a, int lda, int[] ipiv, org.netlib.util.intW info) { sgetrf(m, n, a, 0, lda, ipiv, 0, info); } - public void sgetrf(int m, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { + public void sgetrf(int m, int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, org.netlib.util.intW info) { //FIXME Add arguments check - sgetrfK(m, n, a, _a_offset, lda, ipiv, _ipiv_offset, info); + sgetrfK(m, n, a, offseta, lda, ipiv, offsetipiv, info); } - protected abstract void sgetrfK(int m, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + protected abstract void sgetrfK(int m, int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, org.netlib.util.intW info); public void sgetri(int n, float[] a, int lda, int[] ipiv, float[] work, int lwork, org.netlib.util.intW info) { sgetri(n, a, 0, lda, ipiv, 0, work, 0, lwork, info); } - public void sgetri(int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sgetri(int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgetriK(n, a, _a_offset, lda, ipiv, _ipiv_offset, work, _work_offset, lwork, info); + sgetriK(n, a, offseta, lda, ipiv, offsetipiv, work, offsetwork, lwork, info); } - protected abstract void sgetriK(int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sgetriK(int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgetrs(String trans, int n, int nrhs, float[] a, int lda, int[] ipiv, float[] b, int ldb, org.netlib.util.intW info) { sgetrs(trans, n, nrhs, a, 0, lda, ipiv, 0, b, 0, ldb, info); } - public void sgetrs(String trans, int n, int nrhs, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void sgetrs(String trans, int n, int nrhs, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - sgetrsK(trans, n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + sgetrsK(trans, n, nrhs, a, offseta, lda, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected abstract void sgetrsK(String trans, int n, int nrhs, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void sgetrsK(String trans, int n, int nrhs, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void sggbak(String job, String side, int n, int ilo, int ihi, float[] lscale, float[] rscale, int m, float[] v, int ldv, org.netlib.util.intW info) { sggbak(job, side, n, ilo, ihi, lscale, 0, rscale, 0, m, v, 0, ldv, info); } - public void sggbak(String job, String side, int n, int ilo, int ihi, float[] lscale, int _lscale_offset, float[] rscale, int _rscale_offset, int m, float[] v, int _v_offset, int ldv, org.netlib.util.intW info) { + public void sggbak(String job, String side, int n, int ilo, int ihi, float[] lscale, int offsetlscale, float[] rscale, int offsetrscale, int m, float[] v, int offsetv, int ldv, org.netlib.util.intW info) { //FIXME Add arguments check - sggbakK(job, side, n, ilo, ihi, lscale, _lscale_offset, rscale, _rscale_offset, m, v, _v_offset, ldv, info); + sggbakK(job, side, n, ilo, ihi, lscale, offsetlscale, rscale, offsetrscale, m, v, offsetv, ldv, info); } - protected abstract void sggbakK(String job, String side, int n, int ilo, int ihi, float[] lscale, int _lscale_offset, float[] rscale, int _rscale_offset, int m, float[] v, int _v_offset, int ldv, org.netlib.util.intW info); + protected abstract void sggbakK(String job, String side, int n, int ilo, int ihi, float[] lscale, int offsetlscale, float[] rscale, int offsetrscale, int m, float[] v, int offsetv, int ldv, org.netlib.util.intW info); public void sggbal(String job, int n, float[] a, int lda, float[] b, int ldb, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] lscale, float[] rscale, float[] work, org.netlib.util.intW info) { sggbal(job, n, a, 0, lda, b, 0, ldb, ilo, ihi, lscale, 0, rscale, 0, work, 0, info); } - public void sggbal(String job, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] lscale, int _lscale_offset, float[] rscale, int _rscale_offset, float[] work, int _work_offset, org.netlib.util.intW info) { + public void sggbal(String job, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] lscale, int offsetlscale, float[] rscale, int offsetrscale, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - sggbalK(job, n, a, _a_offset, lda, b, _b_offset, ldb, ilo, ihi, lscale, _lscale_offset, rscale, _rscale_offset, work, _work_offset, info); + sggbalK(job, n, a, offseta, lda, b, offsetb, ldb, ilo, ihi, lscale, offsetlscale, rscale, offsetrscale, work, offsetwork, info); } - protected abstract void sggbalK(String job, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] lscale, int _lscale_offset, float[] rscale, int _rscale_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void sggbalK(String job, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] lscale, int offsetlscale, float[] rscale, int offsetrscale, float[] work, int offsetwork, org.netlib.util.intW info); public void sgges(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, int n, float[] a, int lda, float[] b, int ldb, org.netlib.util.intW sdim, float[] alphar, float[] alphai, float[] beta, float[] vsl, int ldvsl, float[] vsr, int ldvsr, float[] work, int lwork, boolean[] bwork, org.netlib.util.intW info) { sgges(jobvsl, jobvsr, sort, selctg, n, a, 0, lda, b, 0, ldb, sdim, alphar, 0, alphai, 0, beta, 0, vsl, 0, ldvsl, vsr, 0, ldvsr, work, 0, lwork, bwork, 0, info); } - public void sgges(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW sdim, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vsl, int _vsl_offset, int ldvsl, float[] vsr, int _vsr_offset, int ldvsr, float[] work, int _work_offset, int lwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info) { + public void sgges(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW sdim, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] vsl, int offsetvsl, int ldvsl, float[] vsr, int offsetvsr, int ldvsr, float[] work, int offsetwork, int lwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info) { //FIXME Add arguments check - sggesK(jobvsl, jobvsr, sort, selctg, n, a, _a_offset, lda, b, _b_offset, ldb, sdim, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vsl, _vsl_offset, ldvsl, vsr, _vsr_offset, ldvsr, work, _work_offset, lwork, bwork, _bwork_offset, info); + sggesK(jobvsl, jobvsr, sort, selctg, n, a, offseta, lda, b, offsetb, ldb, sdim, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, vsl, offsetvsl, ldvsl, vsr, offsetvsr, ldvsr, work, offsetwork, lwork, bwork, offsetbwork, info); } - protected abstract void sggesK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW sdim, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vsl, int _vsl_offset, int ldvsl, float[] vsr, int _vsr_offset, int ldvsr, float[] work, int _work_offset, int lwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + protected abstract void sggesK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW sdim, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] vsl, int offsetvsl, int ldvsl, float[] vsr, int offsetvsr, int ldvsr, float[] work, int offsetwork, int lwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info); public void sggesx(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, String sense, int n, float[] a, int lda, float[] b, int ldb, org.netlib.util.intW sdim, float[] alphar, float[] alphai, float[] beta, float[] vsl, int ldvsl, float[] vsr, int ldvsr, float[] rconde, float[] rcondv, float[] work, int lwork, int[] iwork, int liwork, boolean[] bwork, org.netlib.util.intW info) { sggesx(jobvsl, jobvsr, sort, selctg, sense, n, a, 0, lda, b, 0, ldb, sdim, alphar, 0, alphai, 0, beta, 0, vsl, 0, ldvsl, vsr, 0, ldvsr, rconde, 0, rcondv, 0, work, 0, lwork, iwork, 0, liwork, bwork, 0, info); } - public void sggesx(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, String sense, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW sdim, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vsl, int _vsl_offset, int ldvsl, float[] vsr, int _vsr_offset, int ldvsr, float[] rconde, int _rconde_offset, float[] rcondv, int _rcondv_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info) { + public void sggesx(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, String sense, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW sdim, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] vsl, int offsetvsl, int ldvsl, float[] vsr, int offsetvsr, int ldvsr, float[] rconde, int offsetrconde, float[] rcondv, int offsetrcondv, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info) { //FIXME Add arguments check - sggesxK(jobvsl, jobvsr, sort, selctg, sense, n, a, _a_offset, lda, b, _b_offset, ldb, sdim, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vsl, _vsl_offset, ldvsl, vsr, _vsr_offset, ldvsr, rconde, _rconde_offset, rcondv, _rcondv_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, bwork, _bwork_offset, info); + sggesxK(jobvsl, jobvsr, sort, selctg, sense, n, a, offseta, lda, b, offsetb, ldb, sdim, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, vsl, offsetvsl, ldvsl, vsr, offsetvsr, ldvsr, rconde, offsetrconde, rcondv, offsetrcondv, work, offsetwork, lwork, iwork, offsetiwork, liwork, bwork, offsetbwork, info); } - protected abstract void sggesxK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, String sense, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW sdim, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vsl, int _vsl_offset, int ldvsl, float[] vsr, int _vsr_offset, int ldvsr, float[] rconde, int _rconde_offset, float[] rcondv, int _rcondv_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + protected abstract void sggesxK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, String sense, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW sdim, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] vsl, int offsetvsl, int ldvsl, float[] vsr, int offsetvsr, int ldvsr, float[] rconde, int offsetrconde, float[] rcondv, int offsetrcondv, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info); public void sggev(String jobvl, String jobvr, int n, float[] a, int lda, float[] b, int ldb, float[] alphar, float[] alphai, float[] beta, float[] vl, int ldvl, float[] vr, int ldvr, float[] work, int lwork, org.netlib.util.intW info) { sggev(jobvl, jobvr, n, a, 0, lda, b, 0, ldb, alphar, 0, alphai, 0, beta, 0, vl, 0, ldvl, vr, 0, ldvr, work, 0, lwork, info); } - public void sggev(String jobvl, String jobvr, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sggev(String jobvl, String jobvr, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sggevK(jobvl, jobvr, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, work, _work_offset, lwork, info); + sggevK(jobvl, jobvr, n, a, offseta, lda, b, offsetb, ldb, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, vl, offsetvl, ldvl, vr, offsetvr, ldvr, work, offsetwork, lwork, info); } - protected abstract void sggevK(String jobvl, String jobvr, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sggevK(String jobvl, String jobvr, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sggevx(String balanc, String jobvl, String jobvr, String sense, int n, float[] a, int lda, float[] b, int ldb, float[] alphar, float[] alphai, float[] beta, float[] vl, int ldvl, float[] vr, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] lscale, float[] rscale, org.netlib.util.floatW abnrm, org.netlib.util.floatW bbnrm, float[] rconde, float[] rcondv, float[] work, int lwork, int[] iwork, boolean[] bwork, org.netlib.util.intW info) { sggevx(balanc, jobvl, jobvr, sense, n, a, 0, lda, b, 0, ldb, alphar, 0, alphai, 0, beta, 0, vl, 0, ldvl, vr, 0, ldvr, ilo, ihi, lscale, 0, rscale, 0, abnrm, bbnrm, rconde, 0, rcondv, 0, work, 0, lwork, iwork, 0, bwork, 0, info); } - public void sggevx(String balanc, String jobvl, String jobvr, String sense, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] lscale, int _lscale_offset, float[] rscale, int _rscale_offset, org.netlib.util.floatW abnrm, org.netlib.util.floatW bbnrm, float[] rconde, int _rconde_offset, float[] rcondv, int _rcondv_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info) { + public void sggevx(String balanc, String jobvl, String jobvr, String sense, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] lscale, int offsetlscale, float[] rscale, int offsetrscale, org.netlib.util.floatW abnrm, org.netlib.util.floatW bbnrm, float[] rconde, int offsetrconde, float[] rcondv, int offsetrcondv, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info) { //FIXME Add arguments check - sggevxK(balanc, jobvl, jobvr, sense, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, ilo, ihi, lscale, _lscale_offset, rscale, _rscale_offset, abnrm, bbnrm, rconde, _rconde_offset, rcondv, _rcondv_offset, work, _work_offset, lwork, iwork, _iwork_offset, bwork, _bwork_offset, info); + sggevxK(balanc, jobvl, jobvr, sense, n, a, offseta, lda, b, offsetb, ldb, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, vl, offsetvl, ldvl, vr, offsetvr, ldvr, ilo, ihi, lscale, offsetlscale, rscale, offsetrscale, abnrm, bbnrm, rconde, offsetrconde, rcondv, offsetrcondv, work, offsetwork, lwork, iwork, offsetiwork, bwork, offsetbwork, info); } - protected abstract void sggevxK(String balanc, String jobvl, String jobvr, String sense, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] lscale, int _lscale_offset, float[] rscale, int _rscale_offset, org.netlib.util.floatW abnrm, org.netlib.util.floatW bbnrm, float[] rconde, int _rconde_offset, float[] rcondv, int _rcondv_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + protected abstract void sggevxK(String balanc, String jobvl, String jobvr, String sense, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] lscale, int offsetlscale, float[] rscale, int offsetrscale, org.netlib.util.floatW abnrm, org.netlib.util.floatW bbnrm, float[] rconde, int offsetrconde, float[] rcondv, int offsetrcondv, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info); public void sggglm(int n, int m, int p, float[] a, int lda, float[] b, int ldb, float[] d, float[] x, float[] y, float[] work, int lwork, org.netlib.util.intW info) { sggglm(n, m, p, a, 0, lda, b, 0, ldb, d, 0, x, 0, y, 0, work, 0, lwork, info); } - public void sggglm(int n, int m, int p, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] d, int _d_offset, float[] x, int _x_offset, float[] y, int _y_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sggglm(int n, int m, int p, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] d, int offsetd, float[] x, int offsetx, float[] y, int offsety, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sggglmK(n, m, p, a, _a_offset, lda, b, _b_offset, ldb, d, _d_offset, x, _x_offset, y, _y_offset, work, _work_offset, lwork, info); + sggglmK(n, m, p, a, offseta, lda, b, offsetb, ldb, d, offsetd, x, offsetx, y, offsety, work, offsetwork, lwork, info); } - protected abstract void sggglmK(int n, int m, int p, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] d, int _d_offset, float[] x, int _x_offset, float[] y, int _y_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sggglmK(int n, int m, int p, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] d, int offsetd, float[] x, int offsetx, float[] y, int offsety, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sgghrd(String compq, String compz, int n, int ilo, int ihi, float[] a, int lda, float[] b, int ldb, float[] q, int ldq, float[] z, int ldz, org.netlib.util.intW info) { sgghrd(compq, compz, n, ilo, ihi, a, 0, lda, b, 0, ldb, q, 0, ldq, z, 0, ldz, info); } - public void sgghrd(String compq, String compz, int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, org.netlib.util.intW info) { + public void sgghrd(String compq, String compz, int n, int ilo, int ihi, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] q, int offsetq, int ldq, float[] z, int offsetz, int ldz, org.netlib.util.intW info) { //FIXME Add arguments check - sgghrdK(compq, compz, n, ilo, ihi, a, _a_offset, lda, b, _b_offset, ldb, q, _q_offset, ldq, z, _z_offset, ldz, info); + sgghrdK(compq, compz, n, ilo, ihi, a, offseta, lda, b, offsetb, ldb, q, offsetq, ldq, z, offsetz, ldz, info); } - protected abstract void sgghrdK(String compq, String compz, int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, org.netlib.util.intW info); + protected abstract void sgghrdK(String compq, String compz, int n, int ilo, int ihi, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] q, int offsetq, int ldq, float[] z, int offsetz, int ldz, org.netlib.util.intW info); public void sgglse(int m, int n, int p, float[] a, int lda, float[] b, int ldb, float[] c, float[] d, float[] x, float[] work, int lwork, org.netlib.util.intW info) { sgglse(m, n, p, a, 0, lda, b, 0, ldb, c, 0, d, 0, x, 0, work, 0, lwork, info); } - public void sgglse(int m, int n, int p, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] c, int _c_offset, float[] d, int _d_offset, float[] x, int _x_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sgglse(int m, int n, int p, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] c, int offsetc, float[] d, int offsetd, float[] x, int offsetx, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgglseK(m, n, p, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, d, _d_offset, x, _x_offset, work, _work_offset, lwork, info); + sgglseK(m, n, p, a, offseta, lda, b, offsetb, ldb, c, offsetc, d, offsetd, x, offsetx, work, offsetwork, lwork, info); } - protected abstract void sgglseK(int m, int n, int p, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] c, int _c_offset, float[] d, int _d_offset, float[] x, int _x_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sgglseK(int m, int n, int p, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] c, int offsetc, float[] d, int offsetd, float[] x, int offsetx, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sggqrf(int n, int m, int p, float[] a, int lda, float[] taua, float[] b, int ldb, float[] taub, float[] work, int lwork, org.netlib.util.intW info) { sggqrf(n, m, p, a, 0, lda, taua, 0, b, 0, ldb, taub, 0, work, 0, lwork, info); } - public void sggqrf(int n, int m, int p, float[] a, int _a_offset, int lda, float[] taua, int _taua_offset, float[] b, int _b_offset, int ldb, float[] taub, int _taub_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sggqrf(int n, int m, int p, float[] a, int offseta, int lda, float[] taua, int offsettaua, float[] b, int offsetb, int ldb, float[] taub, int offsettaub, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sggqrfK(n, m, p, a, _a_offset, lda, taua, _taua_offset, b, _b_offset, ldb, taub, _taub_offset, work, _work_offset, lwork, info); + sggqrfK(n, m, p, a, offseta, lda, taua, offsettaua, b, offsetb, ldb, taub, offsettaub, work, offsetwork, lwork, info); } - protected abstract void sggqrfK(int n, int m, int p, float[] a, int _a_offset, int lda, float[] taua, int _taua_offset, float[] b, int _b_offset, int ldb, float[] taub, int _taub_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sggqrfK(int n, int m, int p, float[] a, int offseta, int lda, float[] taua, int offsettaua, float[] b, int offsetb, int ldb, float[] taub, int offsettaub, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sggrqf(int m, int p, int n, float[] a, int lda, float[] taua, float[] b, int ldb, float[] taub, float[] work, int lwork, org.netlib.util.intW info) { sggrqf(m, p, n, a, 0, lda, taua, 0, b, 0, ldb, taub, 0, work, 0, lwork, info); } - public void sggrqf(int m, int p, int n, float[] a, int _a_offset, int lda, float[] taua, int _taua_offset, float[] b, int _b_offset, int ldb, float[] taub, int _taub_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sggrqf(int m, int p, int n, float[] a, int offseta, int lda, float[] taua, int offsettaua, float[] b, int offsetb, int ldb, float[] taub, int offsettaub, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sggrqfK(m, p, n, a, _a_offset, lda, taua, _taua_offset, b, _b_offset, ldb, taub, _taub_offset, work, _work_offset, lwork, info); + sggrqfK(m, p, n, a, offseta, lda, taua, offsettaua, b, offsetb, ldb, taub, offsettaub, work, offsetwork, lwork, info); } - protected abstract void sggrqfK(int m, int p, int n, float[] a, int _a_offset, int lda, float[] taua, int _taua_offset, float[] b, int _b_offset, int ldb, float[] taub, int _taub_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sggrqfK(int m, int p, int n, float[] a, int offseta, int lda, float[] taua, int offsettaua, float[] b, int offsetb, int ldb, float[] taub, int offsettaub, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sggsvd(String jobu, String jobv, String jobq, int m, int n, int p, org.netlib.util.intW k, org.netlib.util.intW l, float[] a, int lda, float[] b, int ldb, float[] alpha, float[] beta, float[] u, int ldu, float[] v, int ldv, float[] q, int ldq, float[] work, int[] iwork, org.netlib.util.intW info) { sggsvd(jobu, jobv, jobq, m, n, p, k, l, a, 0, lda, b, 0, ldb, alpha, 0, beta, 0, u, 0, ldu, v, 0, ldv, q, 0, ldq, work, 0, iwork, 0, info); } - public void sggsvd(String jobu, String jobv, String jobq, int m, int n, int p, org.netlib.util.intW k, org.netlib.util.intW l, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alpha, int _alpha_offset, float[] beta, int _beta_offset, float[] u, int _u_offset, int ldu, float[] v, int _v_offset, int ldv, float[] q, int _q_offset, int ldq, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void sggsvd(String jobu, String jobv, String jobq, int m, int n, int p, org.netlib.util.intW k, org.netlib.util.intW l, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alpha, int offsetalpha, float[] beta, int offsetbeta, float[] u, int offsetu, int ldu, float[] v, int offsetv, int ldv, float[] q, int offsetq, int ldq, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - sggsvdK(jobu, jobv, jobq, m, n, p, k, l, a, _a_offset, lda, b, _b_offset, ldb, alpha, _alpha_offset, beta, _beta_offset, u, _u_offset, ldu, v, _v_offset, ldv, q, _q_offset, ldq, work, _work_offset, iwork, _iwork_offset, info); + sggsvdK(jobu, jobv, jobq, m, n, p, k, l, a, offseta, lda, b, offsetb, ldb, alpha, offsetalpha, beta, offsetbeta, u, offsetu, ldu, v, offsetv, ldv, q, offsetq, ldq, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void sggsvdK(String jobu, String jobv, String jobq, int m, int n, int p, org.netlib.util.intW k, org.netlib.util.intW l, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alpha, int _alpha_offset, float[] beta, int _beta_offset, float[] u, int _u_offset, int ldu, float[] v, int _v_offset, int ldv, float[] q, int _q_offset, int ldq, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void sggsvdK(String jobu, String jobv, String jobq, int m, int n, int p, org.netlib.util.intW k, org.netlib.util.intW l, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alpha, int offsetalpha, float[] beta, int offsetbeta, float[] u, int offsetu, int ldu, float[] v, int offsetv, int ldv, float[] q, int offsetq, int ldq, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sggsvp(String jobu, String jobv, String jobq, int m, int p, int n, float[] a, int lda, float[] b, int ldb, float tola, float tolb, org.netlib.util.intW k, org.netlib.util.intW l, float[] u, int ldu, float[] v, int ldv, float[] q, int ldq, int[] iwork, float[] tau, float[] work, org.netlib.util.intW info) { sggsvp(jobu, jobv, jobq, m, p, n, a, 0, lda, b, 0, ldb, tola, tolb, k, l, u, 0, ldu, v, 0, ldv, q, 0, ldq, iwork, 0, tau, 0, work, 0, info); } - public void sggsvp(String jobu, String jobv, String jobq, int m, int p, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float tola, float tolb, org.netlib.util.intW k, org.netlib.util.intW l, float[] u, int _u_offset, int ldu, float[] v, int _v_offset, int ldv, float[] q, int _q_offset, int ldq, int[] iwork, int _iwork_offset, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { + public void sggsvp(String jobu, String jobv, String jobq, int m, int p, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float tola, float tolb, org.netlib.util.intW k, org.netlib.util.intW l, float[] u, int offsetu, int ldu, float[] v, int offsetv, int ldv, float[] q, int offsetq, int ldq, int[] iwork, int offsetiwork, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - sggsvpK(jobu, jobv, jobq, m, p, n, a, _a_offset, lda, b, _b_offset, ldb, tola, tolb, k, l, u, _u_offset, ldu, v, _v_offset, ldv, q, _q_offset, ldq, iwork, _iwork_offset, tau, _tau_offset, work, _work_offset, info); + sggsvpK(jobu, jobv, jobq, m, p, n, a, offseta, lda, b, offsetb, ldb, tola, tolb, k, l, u, offsetu, ldu, v, offsetv, ldv, q, offsetq, ldq, iwork, offsetiwork, tau, offsettau, work, offsetwork, info); } - protected abstract void sggsvpK(String jobu, String jobv, String jobq, int m, int p, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float tola, float tolb, org.netlib.util.intW k, org.netlib.util.intW l, float[] u, int _u_offset, int ldu, float[] v, int _v_offset, int ldv, float[] q, int _q_offset, int ldq, int[] iwork, int _iwork_offset, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void sggsvpK(String jobu, String jobv, String jobq, int m, int p, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float tola, float tolb, org.netlib.util.intW k, org.netlib.util.intW l, float[] u, int offsetu, int ldu, float[] v, int offsetv, int ldv, float[] q, int offsetq, int ldq, int[] iwork, int offsetiwork, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); public void sgtcon(String norm, int n, float[] dl, float[] d, float[] du, float[] du2, int[] ipiv, float anorm, org.netlib.util.floatW rcond, float[] work, int[] iwork, org.netlib.util.intW info) { sgtcon(norm, n, dl, 0, d, 0, du, 0, du2, 0, ipiv, 0, anorm, rcond, work, 0, iwork, 0, info); } - public void sgtcon(String norm, int n, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void sgtcon(String norm, int n, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] du2, int offsetdu2, int[] ipiv, int offsetipiv, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgtconK(norm, n, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + sgtconK(norm, n, dl, offsetdl, d, offsetd, du, offsetdu, du2, offsetdu2, ipiv, offsetipiv, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void sgtconK(String norm, int n, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void sgtconK(String norm, int n, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] du2, int offsetdu2, int[] ipiv, int offsetipiv, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sgtrfs(String trans, int n, int nrhs, float[] dl, float[] d, float[] du, float[] dlf, float[] df, float[] duf, float[] du2, int[] ipiv, float[] b, int ldb, float[] x, int ldx, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info) { sgtrfs(trans, n, nrhs, dl, 0, d, 0, du, 0, dlf, 0, df, 0, duf, 0, du2, 0, ipiv, 0, b, 0, ldb, x, 0, ldx, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void sgtrfs(String trans, int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] dlf, int _dlf_offset, float[] df, int _df_offset, float[] duf, int _duf_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void sgtrfs(String trans, int n, int nrhs, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] dlf, int offsetdlf, float[] df, int offsetdf, float[] duf, int offsetduf, float[] du2, int offsetdu2, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgtrfsK(trans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, dlf, _dlf_offset, df, _df_offset, duf, _duf_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + sgtrfsK(trans, n, nrhs, dl, offsetdl, d, offsetd, du, offsetdu, dlf, offsetdlf, df, offsetdf, duf, offsetduf, du2, offsetdu2, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void sgtrfsK(String trans, int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] dlf, int _dlf_offset, float[] df, int _df_offset, float[] duf, int _duf_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void sgtrfsK(String trans, int n, int nrhs, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] dlf, int offsetdlf, float[] df, int offsetdf, float[] duf, int offsetduf, float[] du2, int offsetdu2, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sgtsv(int n, int nrhs, float[] dl, float[] d, float[] du, float[] b, int ldb, org.netlib.util.intW info) { sgtsv(n, nrhs, dl, 0, d, 0, du, 0, b, 0, ldb, info); } - public void sgtsv(int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void sgtsv(int n, int nrhs, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - sgtsvK(n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, b, _b_offset, ldb, info); + sgtsvK(n, nrhs, dl, offsetdl, d, offsetd, du, offsetdu, b, offsetb, ldb, info); } - protected abstract void sgtsvK(int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void sgtsvK(int n, int nrhs, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void sgtsvx(String fact, String trans, int n, int nrhs, float[] dl, float[] d, float[] du, float[] dlf, float[] df, float[] duf, float[] du2, int[] ipiv, float[] b, int ldb, float[] x, int ldx, org.netlib.util.floatW rcond, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info) { sgtsvx(fact, trans, n, nrhs, dl, 0, d, 0, du, 0, dlf, 0, df, 0, duf, 0, du2, 0, ipiv, 0, b, 0, ldb, x, 0, ldx, rcond, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void sgtsvx(String fact, String trans, int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] dlf, int _dlf_offset, float[] df, int _df_offset, float[] duf, int _duf_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void sgtsvx(String fact, String trans, int n, int nrhs, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] dlf, int offsetdlf, float[] df, int offsetdf, float[] duf, int offsetduf, float[] du2, int offsetdu2, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - sgtsvxK(fact, trans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, dlf, _dlf_offset, df, _df_offset, duf, _duf_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + sgtsvxK(fact, trans, n, nrhs, dl, offsetdl, d, offsetd, du, offsetdu, dlf, offsetdlf, df, offsetdf, duf, offsetduf, du2, offsetdu2, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void sgtsvxK(String fact, String trans, int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] dlf, int _dlf_offset, float[] df, int _df_offset, float[] duf, int _duf_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void sgtsvxK(String fact, String trans, int n, int nrhs, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] dlf, int offsetdlf, float[] df, int offsetdf, float[] duf, int offsetduf, float[] du2, int offsetdu2, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sgttrf(int n, float[] dl, float[] d, float[] du, float[] du2, int[] ipiv, org.netlib.util.intW info) { sgttrf(n, dl, 0, d, 0, du, 0, du2, 0, ipiv, 0, info); } - public void sgttrf(int n, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { + public void sgttrf(int n, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] du2, int offsetdu2, int[] ipiv, int offsetipiv, org.netlib.util.intW info) { //FIXME Add arguments check - sgttrfK(n, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, info); + sgttrfK(n, dl, offsetdl, d, offsetd, du, offsetdu, du2, offsetdu2, ipiv, offsetipiv, info); } - protected abstract void sgttrfK(int n, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + protected abstract void sgttrfK(int n, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] du2, int offsetdu2, int[] ipiv, int offsetipiv, org.netlib.util.intW info); public void sgttrs(String trans, int n, int nrhs, float[] dl, float[] d, float[] du, float[] du2, int[] ipiv, float[] b, int ldb, org.netlib.util.intW info) { sgttrs(trans, n, nrhs, dl, 0, d, 0, du, 0, du2, 0, ipiv, 0, b, 0, ldb, info); } - public void sgttrs(String trans, int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void sgttrs(String trans, int n, int nrhs, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] du2, int offsetdu2, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - sgttrsK(trans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + sgttrsK(trans, n, nrhs, dl, offsetdl, d, offsetd, du, offsetdu, du2, offsetdu2, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected abstract void sgttrsK(String trans, int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void sgttrsK(String trans, int n, int nrhs, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] du2, int offsetdu2, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void sgtts2(int itrans, int n, int nrhs, float[] dl, float[] d, float[] du, float[] du2, int[] ipiv, float[] b, int ldb) { sgtts2(itrans, n, nrhs, dl, 0, d, 0, du, 0, du2, 0, ipiv, 0, b, 0, ldb); } - public void sgtts2(int itrans, int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb) { + public void sgtts2(int itrans, int n, int nrhs, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] du2, int offsetdu2, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb) { //FIXME Add arguments check - sgtts2K(itrans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb); + sgtts2K(itrans, n, nrhs, dl, offsetdl, d, offsetd, du, offsetdu, du2, offsetdu2, ipiv, offsetipiv, b, offsetb, ldb); } - protected abstract void sgtts2K(int itrans, int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb); + protected abstract void sgtts2K(int itrans, int n, int nrhs, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] du2, int offsetdu2, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb); public void shgeqz(String job, String compq, String compz, int n, int ilo, int ihi, float[] h, int ldh, float[] t, int ldt, float[] alphar, float[] alphai, float[] beta, float[] q, int ldq, float[] z, int ldz, float[] work, int lwork, org.netlib.util.intW info) { shgeqz(job, compq, compz, n, ilo, ihi, h, 0, ldh, t, 0, ldt, alphar, 0, alphai, 0, beta, 0, q, 0, ldq, z, 0, ldz, work, 0, lwork, info); } - public void shgeqz(String job, String compq, String compz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] t, int _t_offset, int ldt, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void shgeqz(String job, String compq, String compz, int n, int ilo, int ihi, float[] h, int offseth, int ldh, float[] t, int offsett, int ldt, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] q, int offsetq, int ldq, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - shgeqzK(job, compq, compz, n, ilo, ihi, h, _h_offset, ldh, t, _t_offset, ldt, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, q, _q_offset, ldq, z, _z_offset, ldz, work, _work_offset, lwork, info); + shgeqzK(job, compq, compz, n, ilo, ihi, h, offseth, ldh, t, offsett, ldt, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, q, offsetq, ldq, z, offsetz, ldz, work, offsetwork, lwork, info); } - protected abstract void shgeqzK(String job, String compq, String compz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] t, int _t_offset, int ldt, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void shgeqzK(String job, String compq, String compz, int n, int ilo, int ihi, float[] h, int offseth, int ldh, float[] t, int offsett, int ldt, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] q, int offsetq, int ldq, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void shsein(String side, String eigsrc, String initv, boolean[] select, int n, float[] h, int ldh, float[] wr, float[] wi, float[] vl, int ldvl, float[] vr, int ldvr, int mm, org.netlib.util.intW m, float[] work, int[] ifaill, int[] ifailr, org.netlib.util.intW info) { shsein(side, eigsrc, initv, select, 0, n, h, 0, ldh, wr, 0, wi, 0, vl, 0, ldvl, vr, 0, ldvr, mm, m, work, 0, ifaill, 0, ifailr, 0, info); } - public void shsein(String side, String eigsrc, String initv, boolean[] select, int _select_offset, int n, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, float[] work, int _work_offset, int[] ifaill, int _ifaill_offset, int[] ifailr, int _ifailr_offset, org.netlib.util.intW info) { + public void shsein(String side, String eigsrc, String initv, boolean[] select, int offsetselect, int n, float[] h, int offseth, int ldh, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, int mm, org.netlib.util.intW m, float[] work, int offsetwork, int[] ifaill, int offsetifaill, int[] ifailr, int offsetifailr, org.netlib.util.intW info) { //FIXME Add arguments check - shseinK(side, eigsrc, initv, select, _select_offset, n, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, mm, m, work, _work_offset, ifaill, _ifaill_offset, ifailr, _ifailr_offset, info); + shseinK(side, eigsrc, initv, select, offsetselect, n, h, offseth, ldh, wr, offsetwr, wi, offsetwi, vl, offsetvl, ldvl, vr, offsetvr, ldvr, mm, m, work, offsetwork, ifaill, offsetifaill, ifailr, offsetifailr, info); } - protected abstract void shseinK(String side, String eigsrc, String initv, boolean[] select, int _select_offset, int n, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, float[] work, int _work_offset, int[] ifaill, int _ifaill_offset, int[] ifailr, int _ifailr_offset, org.netlib.util.intW info); + protected abstract void shseinK(String side, String eigsrc, String initv, boolean[] select, int offsetselect, int n, float[] h, int offseth, int ldh, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, int mm, org.netlib.util.intW m, float[] work, int offsetwork, int[] ifaill, int offsetifaill, int[] ifailr, int offsetifailr, org.netlib.util.intW info); public void shseqr(String job, String compz, int n, int ilo, int ihi, float[] h, int ldh, float[] wr, float[] wi, float[] z, int ldz, float[] work, int lwork, org.netlib.util.intW info) { shseqr(job, compz, n, ilo, ihi, h, 0, ldh, wr, 0, wi, 0, z, 0, ldz, work, 0, lwork, info); } - public void shseqr(String job, String compz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void shseqr(String job, String compz, int n, int ilo, int ihi, float[] h, int offseth, int ldh, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - shseqrK(job, compz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, z, _z_offset, ldz, work, _work_offset, lwork, info); + shseqrK(job, compz, n, ilo, ihi, h, offseth, ldh, wr, offsetwr, wi, offsetwi, z, offsetz, ldz, work, offsetwork, lwork, info); } - protected abstract void shseqrK(String job, String compz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void shseqrK(String job, String compz, int n, int ilo, int ihi, float[] h, int offseth, int ldh, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public boolean sisnan(float sin) { return sisnanK(sin); @@ -4707,45 +4707,45 @@ public void slabrd(int m, int n, int nb, float[] a, int lda, float[] d, float[] slabrd(m, n, nb, a, 0, lda, d, 0, e, 0, tauq, 0, taup, 0, x, 0, ldx, y, 0, ldy); } - public void slabrd(int m, int n, int nb, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tauq, int _tauq_offset, float[] taup, int _taup_offset, float[] x, int _x_offset, int ldx, float[] y, int _y_offset, int ldy) { + public void slabrd(int m, int n, int nb, float[] a, int offseta, int lda, float[] d, int offsetd, float[] e, int offsete, float[] tauq, int offsettauq, float[] taup, int offsettaup, float[] x, int offsetx, int ldx, float[] y, int offsety, int ldy) { //FIXME Add arguments check - slabrdK(m, n, nb, a, _a_offset, lda, d, _d_offset, e, _e_offset, tauq, _tauq_offset, taup, _taup_offset, x, _x_offset, ldx, y, _y_offset, ldy); + slabrdK(m, n, nb, a, offseta, lda, d, offsetd, e, offsete, tauq, offsettauq, taup, offsettaup, x, offsetx, ldx, y, offsety, ldy); } - protected abstract void slabrdK(int m, int n, int nb, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tauq, int _tauq_offset, float[] taup, int _taup_offset, float[] x, int _x_offset, int ldx, float[] y, int _y_offset, int ldy); + protected abstract void slabrdK(int m, int n, int nb, float[] a, int offseta, int lda, float[] d, int offsetd, float[] e, int offsete, float[] tauq, int offsettauq, float[] taup, int offsettaup, float[] x, int offsetx, int ldx, float[] y, int offsety, int ldy); public void slacn2(int n, float[] v, float[] x, int[] isgn, org.netlib.util.floatW est, org.netlib.util.intW kase, int[] isave) { slacn2(n, v, 0, x, 0, isgn, 0, est, kase, isave, 0); } - public void slacn2(int n, float[] v, int _v_offset, float[] x, int _x_offset, int[] isgn, int _isgn_offset, org.netlib.util.floatW est, org.netlib.util.intW kase, int[] isave, int _isave_offset) { + public void slacn2(int n, float[] v, int offsetv, float[] x, int offsetx, int[] isgn, int offsetisgn, org.netlib.util.floatW est, org.netlib.util.intW kase, int[] isave, int offsetisave) { //FIXME Add arguments check - slacn2K(n, v, _v_offset, x, _x_offset, isgn, _isgn_offset, est, kase, isave, _isave_offset); + slacn2K(n, v, offsetv, x, offsetx, isgn, offsetisgn, est, kase, isave, offsetisave); } - protected abstract void slacn2K(int n, float[] v, int _v_offset, float[] x, int _x_offset, int[] isgn, int _isgn_offset, org.netlib.util.floatW est, org.netlib.util.intW kase, int[] isave, int _isave_offset); + protected abstract void slacn2K(int n, float[] v, int offsetv, float[] x, int offsetx, int[] isgn, int offsetisgn, org.netlib.util.floatW est, org.netlib.util.intW kase, int[] isave, int offsetisave); public void slacon(int n, float[] v, float[] x, int[] isgn, org.netlib.util.floatW est, org.netlib.util.intW kase) { slacon(n, v, 0, x, 0, isgn, 0, est, kase); } - public void slacon(int n, float[] v, int _v_offset, float[] x, int _x_offset, int[] isgn, int _isgn_offset, org.netlib.util.floatW est, org.netlib.util.intW kase) { + public void slacon(int n, float[] v, int offsetv, float[] x, int offsetx, int[] isgn, int offsetisgn, org.netlib.util.floatW est, org.netlib.util.intW kase) { //FIXME Add arguments check - slaconK(n, v, _v_offset, x, _x_offset, isgn, _isgn_offset, est, kase); + slaconK(n, v, offsetv, x, offsetx, isgn, offsetisgn, est, kase); } - protected abstract void slaconK(int n, float[] v, int _v_offset, float[] x, int _x_offset, int[] isgn, int _isgn_offset, org.netlib.util.floatW est, org.netlib.util.intW kase); + protected abstract void slaconK(int n, float[] v, int offsetv, float[] x, int offsetx, int[] isgn, int offsetisgn, org.netlib.util.floatW est, org.netlib.util.intW kase); public void slacpy(String uplo, int m, int n, float[] a, int lda, float[] b, int ldb) { slacpy(uplo, m, n, a, 0, lda, b, 0, ldb); } - public void slacpy(String uplo, int m, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb) { + public void slacpy(String uplo, int m, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb) { //FIXME Add arguments check - slacpyK(uplo, m, n, a, _a_offset, lda, b, _b_offset, ldb); + slacpyK(uplo, m, n, a, offseta, lda, b, offsetb, ldb); } - protected abstract void slacpyK(String uplo, int m, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb); + protected abstract void slacpyK(String uplo, int m, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb); public void sladiv(float a, float b, float c, float d, org.netlib.util.floatW p, org.netlib.util.floatW q) { sladivK(a, b, c, d, p, q); @@ -4763,144 +4763,144 @@ public void slaebz(int ijob, int nitmax, int n, int mmax, int minp, int nbmin, f slaebz(ijob, nitmax, n, mmax, minp, nbmin, abstol, reltol, pivmin, d, 0, e, 0, e2, 0, nval, 0, ab, 0, c, 0, mout, nab, 0, work, 0, iwork, 0, info); } - public void slaebz(int ijob, int nitmax, int n, int mmax, int minp, int nbmin, float abstol, float reltol, float pivmin, float[] d, int _d_offset, float[] e, int _e_offset, float[] e2, int _e2_offset, int[] nval, int _nval_offset, float[] ab, int _ab_offset, float[] c, int _c_offset, org.netlib.util.intW mout, int[] nab, int _nab_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void slaebz(int ijob, int nitmax, int n, int mmax, int minp, int nbmin, float abstol, float reltol, float pivmin, float[] d, int offsetd, float[] e, int offsete, float[] e2, int offsete2, int[] nval, int offsetnval, float[] ab, int offsetab, float[] c, int offsetc, org.netlib.util.intW mout, int[] nab, int offsetnab, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - slaebzK(ijob, nitmax, n, mmax, minp, nbmin, abstol, reltol, pivmin, d, _d_offset, e, _e_offset, e2, _e2_offset, nval, _nval_offset, ab, _ab_offset, c, _c_offset, mout, nab, _nab_offset, work, _work_offset, iwork, _iwork_offset, info); + slaebzK(ijob, nitmax, n, mmax, minp, nbmin, abstol, reltol, pivmin, d, offsetd, e, offsete, e2, offsete2, nval, offsetnval, ab, offsetab, c, offsetc, mout, nab, offsetnab, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void slaebzK(int ijob, int nitmax, int n, int mmax, int minp, int nbmin, float abstol, float reltol, float pivmin, float[] d, int _d_offset, float[] e, int _e_offset, float[] e2, int _e2_offset, int[] nval, int _nval_offset, float[] ab, int _ab_offset, float[] c, int _c_offset, org.netlib.util.intW mout, int[] nab, int _nab_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void slaebzK(int ijob, int nitmax, int n, int mmax, int minp, int nbmin, float abstol, float reltol, float pivmin, float[] d, int offsetd, float[] e, int offsete, float[] e2, int offsete2, int[] nval, int offsetnval, float[] ab, int offsetab, float[] c, int offsetc, org.netlib.util.intW mout, int[] nab, int offsetnab, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void slaed0(int icompq, int qsiz, int n, float[] d, float[] e, float[] q, int ldq, float[] qstore, int ldqs, float[] work, int[] iwork, org.netlib.util.intW info) { slaed0(icompq, qsiz, n, d, 0, e, 0, q, 0, ldq, qstore, 0, ldqs, work, 0, iwork, 0, info); } - public void slaed0(int icompq, int qsiz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] q, int _q_offset, int ldq, float[] qstore, int _qstore_offset, int ldqs, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void slaed0(int icompq, int qsiz, int n, float[] d, int offsetd, float[] e, int offsete, float[] q, int offsetq, int ldq, float[] qstore, int offsetqstore, int ldqs, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - slaed0K(icompq, qsiz, n, d, _d_offset, e, _e_offset, q, _q_offset, ldq, qstore, _qstore_offset, ldqs, work, _work_offset, iwork, _iwork_offset, info); + slaed0K(icompq, qsiz, n, d, offsetd, e, offsete, q, offsetq, ldq, qstore, offsetqstore, ldqs, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void slaed0K(int icompq, int qsiz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] q, int _q_offset, int ldq, float[] qstore, int _qstore_offset, int ldqs, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void slaed0K(int icompq, int qsiz, int n, float[] d, int offsetd, float[] e, int offsete, float[] q, int offsetq, int ldq, float[] qstore, int offsetqstore, int ldqs, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void slaed1(int n, float[] d, float[] q, int ldq, int[] indxq, org.netlib.util.floatW rho, int cutpnt, float[] work, int[] iwork, org.netlib.util.intW info) { slaed1(n, d, 0, q, 0, ldq, indxq, 0, rho, cutpnt, work, 0, iwork, 0, info); } - public void slaed1(int n, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.floatW rho, int cutpnt, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void slaed1(int n, float[] d, int offsetd, float[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.floatW rho, int cutpnt, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - slaed1K(n, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, cutpnt, work, _work_offset, iwork, _iwork_offset, info); + slaed1K(n, d, offsetd, q, offsetq, ldq, indxq, offsetindxq, rho, cutpnt, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void slaed1K(int n, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.floatW rho, int cutpnt, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void slaed1K(int n, float[] d, int offsetd, float[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.floatW rho, int cutpnt, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void slaed2(org.netlib.util.intW k, int n, int n1, float[] d, float[] q, int ldq, int[] indxq, org.netlib.util.floatW rho, float[] z, float[] dlamda, float[] w, float[] q2, int[] indx, int[] indxc, int[] indxp, int[] coltyp, org.netlib.util.intW info) { slaed2(k, n, n1, d, 0, q, 0, ldq, indxq, 0, rho, z, 0, dlamda, 0, w, 0, q2, 0, indx, 0, indxc, 0, indxp, 0, coltyp, 0, info); } - public void slaed2(org.netlib.util.intW k, int n, int n1, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.floatW rho, float[] z, int _z_offset, float[] dlamda, int _dlamda_offset, float[] w, int _w_offset, float[] q2, int _q2_offset, int[] indx, int _indx_offset, int[] indxc, int _indxc_offset, int[] indxp, int _indxp_offset, int[] coltyp, int _coltyp_offset, org.netlib.util.intW info) { + public void slaed2(org.netlib.util.intW k, int n, int n1, float[] d, int offsetd, float[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.floatW rho, float[] z, int offsetz, float[] dlamda, int offsetdlamda, float[] w, int offsetw, float[] q2, int offsetq2, int[] indx, int offsetindx, int[] indxc, int offsetindxc, int[] indxp, int offsetindxp, int[] coltyp, int offsetcoltyp, org.netlib.util.intW info) { //FIXME Add arguments check - slaed2K(k, n, n1, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, z, _z_offset, dlamda, _dlamda_offset, w, _w_offset, q2, _q2_offset, indx, _indx_offset, indxc, _indxc_offset, indxp, _indxp_offset, coltyp, _coltyp_offset, info); + slaed2K(k, n, n1, d, offsetd, q, offsetq, ldq, indxq, offsetindxq, rho, z, offsetz, dlamda, offsetdlamda, w, offsetw, q2, offsetq2, indx, offsetindx, indxc, offsetindxc, indxp, offsetindxp, coltyp, offsetcoltyp, info); } - protected abstract void slaed2K(org.netlib.util.intW k, int n, int n1, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.floatW rho, float[] z, int _z_offset, float[] dlamda, int _dlamda_offset, float[] w, int _w_offset, float[] q2, int _q2_offset, int[] indx, int _indx_offset, int[] indxc, int _indxc_offset, int[] indxp, int _indxp_offset, int[] coltyp, int _coltyp_offset, org.netlib.util.intW info); + protected abstract void slaed2K(org.netlib.util.intW k, int n, int n1, float[] d, int offsetd, float[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.floatW rho, float[] z, int offsetz, float[] dlamda, int offsetdlamda, float[] w, int offsetw, float[] q2, int offsetq2, int[] indx, int offsetindx, int[] indxc, int offsetindxc, int[] indxp, int offsetindxp, int[] coltyp, int offsetcoltyp, org.netlib.util.intW info); public void slaed3(int k, int n, int n1, float[] d, float[] q, int ldq, float rho, float[] dlamda, float[] q2, int[] indx, int[] ctot, float[] w, float[] s, org.netlib.util.intW info) { slaed3(k, n, n1, d, 0, q, 0, ldq, rho, dlamda, 0, q2, 0, indx, 0, ctot, 0, w, 0, s, 0, info); } - public void slaed3(int k, int n, int n1, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, float rho, float[] dlamda, int _dlamda_offset, float[] q2, int _q2_offset, int[] indx, int _indx_offset, int[] ctot, int _ctot_offset, float[] w, int _w_offset, float[] s, int _s_offset, org.netlib.util.intW info) { + public void slaed3(int k, int n, int n1, float[] d, int offsetd, float[] q, int offsetq, int ldq, float rho, float[] dlamda, int offsetdlamda, float[] q2, int offsetq2, int[] indx, int offsetindx, int[] ctot, int offsetctot, float[] w, int offsetw, float[] s, int offsets, org.netlib.util.intW info) { //FIXME Add arguments check - slaed3K(k, n, n1, d, _d_offset, q, _q_offset, ldq, rho, dlamda, _dlamda_offset, q2, _q2_offset, indx, _indx_offset, ctot, _ctot_offset, w, _w_offset, s, _s_offset, info); + slaed3K(k, n, n1, d, offsetd, q, offsetq, ldq, rho, dlamda, offsetdlamda, q2, offsetq2, indx, offsetindx, ctot, offsetctot, w, offsetw, s, offsets, info); } - protected abstract void slaed3K(int k, int n, int n1, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, float rho, float[] dlamda, int _dlamda_offset, float[] q2, int _q2_offset, int[] indx, int _indx_offset, int[] ctot, int _ctot_offset, float[] w, int _w_offset, float[] s, int _s_offset, org.netlib.util.intW info); + protected abstract void slaed3K(int k, int n, int n1, float[] d, int offsetd, float[] q, int offsetq, int ldq, float rho, float[] dlamda, int offsetdlamda, float[] q2, int offsetq2, int[] indx, int offsetindx, int[] ctot, int offsetctot, float[] w, int offsetw, float[] s, int offsets, org.netlib.util.intW info); public void slaed4(int n, int i, float[] d, float[] z, float[] delta, float rho, org.netlib.util.floatW dlam, org.netlib.util.intW info) { slaed4(n, i, d, 0, z, 0, delta, 0, rho, dlam, info); } - public void slaed4(int n, int i, float[] d, int _d_offset, float[] z, int _z_offset, float[] delta, int _delta_offset, float rho, org.netlib.util.floatW dlam, org.netlib.util.intW info) { + public void slaed4(int n, int i, float[] d, int offsetd, float[] z, int offsetz, float[] delta, int offsetdelta, float rho, org.netlib.util.floatW dlam, org.netlib.util.intW info) { //FIXME Add arguments check - slaed4K(n, i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, dlam, info); + slaed4K(n, i, d, offsetd, z, offsetz, delta, offsetdelta, rho, dlam, info); } - protected abstract void slaed4K(int n, int i, float[] d, int _d_offset, float[] z, int _z_offset, float[] delta, int _delta_offset, float rho, org.netlib.util.floatW dlam, org.netlib.util.intW info); + protected abstract void slaed4K(int n, int i, float[] d, int offsetd, float[] z, int offsetz, float[] delta, int offsetdelta, float rho, org.netlib.util.floatW dlam, org.netlib.util.intW info); public void slaed5(int i, float[] d, float[] z, float[] delta, float rho, org.netlib.util.floatW dlam) { slaed5(i, d, 0, z, 0, delta, 0, rho, dlam); } - public void slaed5(int i, float[] d, int _d_offset, float[] z, int _z_offset, float[] delta, int _delta_offset, float rho, org.netlib.util.floatW dlam) { + public void slaed5(int i, float[] d, int offsetd, float[] z, int offsetz, float[] delta, int offsetdelta, float rho, org.netlib.util.floatW dlam) { //FIXME Add arguments check - slaed5K(i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, dlam); + slaed5K(i, d, offsetd, z, offsetz, delta, offsetdelta, rho, dlam); } - protected abstract void slaed5K(int i, float[] d, int _d_offset, float[] z, int _z_offset, float[] delta, int _delta_offset, float rho, org.netlib.util.floatW dlam); + protected abstract void slaed5K(int i, float[] d, int offsetd, float[] z, int offsetz, float[] delta, int offsetdelta, float rho, org.netlib.util.floatW dlam); public void slaed6(int kniter, boolean orgati, float rho, float[] d, float[] z, float finit, org.netlib.util.floatW tau, org.netlib.util.intW info) { slaed6(kniter, orgati, rho, d, 0, z, 0, finit, tau, info); } - public void slaed6(int kniter, boolean orgati, float rho, float[] d, int _d_offset, float[] z, int _z_offset, float finit, org.netlib.util.floatW tau, org.netlib.util.intW info) { + public void slaed6(int kniter, boolean orgati, float rho, float[] d, int offsetd, float[] z, int offsetz, float finit, org.netlib.util.floatW tau, org.netlib.util.intW info) { //FIXME Add arguments check - slaed6K(kniter, orgati, rho, d, _d_offset, z, _z_offset, finit, tau, info); + slaed6K(kniter, orgati, rho, d, offsetd, z, offsetz, finit, tau, info); } - protected abstract void slaed6K(int kniter, boolean orgati, float rho, float[] d, int _d_offset, float[] z, int _z_offset, float finit, org.netlib.util.floatW tau, org.netlib.util.intW info); + protected abstract void slaed6K(int kniter, boolean orgati, float rho, float[] d, int offsetd, float[] z, int offsetz, float finit, org.netlib.util.floatW tau, org.netlib.util.intW info); public void slaed7(int icompq, int n, int qsiz, int tlvls, int curlvl, int curpbm, float[] d, float[] q, int ldq, int[] indxq, org.netlib.util.floatW rho, int cutpnt, float[] qstore, int[] qptr, int[] prmptr, int[] perm, int[] givptr, int[] givcol, float[] givnum, float[] work, int[] iwork, org.netlib.util.intW info) { slaed7(icompq, n, qsiz, tlvls, curlvl, curpbm, d, 0, q, 0, ldq, indxq, 0, rho, cutpnt, qstore, 0, qptr, 0, prmptr, 0, perm, 0, givptr, 0, givcol, 0, givnum, 0, work, 0, iwork, 0, info); } - public void slaed7(int icompq, int n, int qsiz, int tlvls, int curlvl, int curpbm, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.floatW rho, int cutpnt, float[] qstore, int _qstore_offset, int[] qptr, int _qptr_offset, int[] prmptr, int _prmptr_offset, int[] perm, int _perm_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, float[] givnum, int _givnum_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void slaed7(int icompq, int n, int qsiz, int tlvls, int curlvl, int curpbm, float[] d, int offsetd, float[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.floatW rho, int cutpnt, float[] qstore, int offsetqstore, int[] qptr, int offsetqptr, int[] prmptr, int offsetprmptr, int[] perm, int offsetperm, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, float[] givnum, int offsetgivnum, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - slaed7K(icompq, n, qsiz, tlvls, curlvl, curpbm, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, cutpnt, qstore, _qstore_offset, qptr, _qptr_offset, prmptr, _prmptr_offset, perm, _perm_offset, givptr, _givptr_offset, givcol, _givcol_offset, givnum, _givnum_offset, work, _work_offset, iwork, _iwork_offset, info); + slaed7K(icompq, n, qsiz, tlvls, curlvl, curpbm, d, offsetd, q, offsetq, ldq, indxq, offsetindxq, rho, cutpnt, qstore, offsetqstore, qptr, offsetqptr, prmptr, offsetprmptr, perm, offsetperm, givptr, offsetgivptr, givcol, offsetgivcol, givnum, offsetgivnum, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void slaed7K(int icompq, int n, int qsiz, int tlvls, int curlvl, int curpbm, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.floatW rho, int cutpnt, float[] qstore, int _qstore_offset, int[] qptr, int _qptr_offset, int[] prmptr, int _prmptr_offset, int[] perm, int _perm_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, float[] givnum, int _givnum_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void slaed7K(int icompq, int n, int qsiz, int tlvls, int curlvl, int curpbm, float[] d, int offsetd, float[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.floatW rho, int cutpnt, float[] qstore, int offsetqstore, int[] qptr, int offsetqptr, int[] prmptr, int offsetprmptr, int[] perm, int offsetperm, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, float[] givnum, int offsetgivnum, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void slaed8(int icompq, org.netlib.util.intW k, int n, int qsiz, float[] d, float[] q, int ldq, int[] indxq, org.netlib.util.floatW rho, int cutpnt, float[] z, float[] dlamda, float[] q2, int ldq2, float[] w, int[] perm, org.netlib.util.intW givptr, int[] givcol, float[] givnum, int[] indxp, int[] indx, org.netlib.util.intW info) { slaed8(icompq, k, n, qsiz, d, 0, q, 0, ldq, indxq, 0, rho, cutpnt, z, 0, dlamda, 0, q2, 0, ldq2, w, 0, perm, 0, givptr, givcol, 0, givnum, 0, indxp, 0, indx, 0, info); } - public void slaed8(int icompq, org.netlib.util.intW k, int n, int qsiz, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.floatW rho, int cutpnt, float[] z, int _z_offset, float[] dlamda, int _dlamda_offset, float[] q2, int _q2_offset, int ldq2, float[] w, int _w_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, float[] givnum, int _givnum_offset, int[] indxp, int _indxp_offset, int[] indx, int _indx_offset, org.netlib.util.intW info) { + public void slaed8(int icompq, org.netlib.util.intW k, int n, int qsiz, float[] d, int offsetd, float[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.floatW rho, int cutpnt, float[] z, int offsetz, float[] dlamda, int offsetdlamda, float[] q2, int offsetq2, int ldq2, float[] w, int offsetw, int[] perm, int offsetperm, org.netlib.util.intW givptr, int[] givcol, int offsetgivcol, float[] givnum, int offsetgivnum, int[] indxp, int offsetindxp, int[] indx, int offsetindx, org.netlib.util.intW info) { //FIXME Add arguments check - slaed8K(icompq, k, n, qsiz, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, cutpnt, z, _z_offset, dlamda, _dlamda_offset, q2, _q2_offset, ldq2, w, _w_offset, perm, _perm_offset, givptr, givcol, _givcol_offset, givnum, _givnum_offset, indxp, _indxp_offset, indx, _indx_offset, info); + slaed8K(icompq, k, n, qsiz, d, offsetd, q, offsetq, ldq, indxq, offsetindxq, rho, cutpnt, z, offsetz, dlamda, offsetdlamda, q2, offsetq2, ldq2, w, offsetw, perm, offsetperm, givptr, givcol, offsetgivcol, givnum, offsetgivnum, indxp, offsetindxp, indx, offsetindx, info); } - protected abstract void slaed8K(int icompq, org.netlib.util.intW k, int n, int qsiz, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.floatW rho, int cutpnt, float[] z, int _z_offset, float[] dlamda, int _dlamda_offset, float[] q2, int _q2_offset, int ldq2, float[] w, int _w_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, float[] givnum, int _givnum_offset, int[] indxp, int _indxp_offset, int[] indx, int _indx_offset, org.netlib.util.intW info); + protected abstract void slaed8K(int icompq, org.netlib.util.intW k, int n, int qsiz, float[] d, int offsetd, float[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.floatW rho, int cutpnt, float[] z, int offsetz, float[] dlamda, int offsetdlamda, float[] q2, int offsetq2, int ldq2, float[] w, int offsetw, int[] perm, int offsetperm, org.netlib.util.intW givptr, int[] givcol, int offsetgivcol, float[] givnum, int offsetgivnum, int[] indxp, int offsetindxp, int[] indx, int offsetindx, org.netlib.util.intW info); public void slaed9(int k, int kstart, int kstop, int n, float[] d, float[] q, int ldq, float rho, float[] dlamda, float[] w, float[] s, int lds, org.netlib.util.intW info) { slaed9(k, kstart, kstop, n, d, 0, q, 0, ldq, rho, dlamda, 0, w, 0, s, 0, lds, info); } - public void slaed9(int k, int kstart, int kstop, int n, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, float rho, float[] dlamda, int _dlamda_offset, float[] w, int _w_offset, float[] s, int _s_offset, int lds, org.netlib.util.intW info) { + public void slaed9(int k, int kstart, int kstop, int n, float[] d, int offsetd, float[] q, int offsetq, int ldq, float rho, float[] dlamda, int offsetdlamda, float[] w, int offsetw, float[] s, int offsets, int lds, org.netlib.util.intW info) { //FIXME Add arguments check - slaed9K(k, kstart, kstop, n, d, _d_offset, q, _q_offset, ldq, rho, dlamda, _dlamda_offset, w, _w_offset, s, _s_offset, lds, info); + slaed9K(k, kstart, kstop, n, d, offsetd, q, offsetq, ldq, rho, dlamda, offsetdlamda, w, offsetw, s, offsets, lds, info); } - protected abstract void slaed9K(int k, int kstart, int kstop, int n, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, float rho, float[] dlamda, int _dlamda_offset, float[] w, int _w_offset, float[] s, int _s_offset, int lds, org.netlib.util.intW info); + protected abstract void slaed9K(int k, int kstart, int kstop, int n, float[] d, int offsetd, float[] q, int offsetq, int ldq, float rho, float[] dlamda, int offsetdlamda, float[] w, int offsetw, float[] s, int offsets, int lds, org.netlib.util.intW info); public void slaeda(int n, int tlvls, int curlvl, int curpbm, int[] prmptr, int[] perm, int[] givptr, int[] givcol, float[] givnum, float[] q, int[] qptr, float[] z, float[] ztemp, org.netlib.util.intW info) { slaeda(n, tlvls, curlvl, curpbm, prmptr, 0, perm, 0, givptr, 0, givcol, 0, givnum, 0, q, 0, qptr, 0, z, 0, ztemp, 0, info); } - public void slaeda(int n, int tlvls, int curlvl, int curpbm, int[] prmptr, int _prmptr_offset, int[] perm, int _perm_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, float[] givnum, int _givnum_offset, float[] q, int _q_offset, int[] qptr, int _qptr_offset, float[] z, int _z_offset, float[] ztemp, int _ztemp_offset, org.netlib.util.intW info) { + public void slaeda(int n, int tlvls, int curlvl, int curpbm, int[] prmptr, int offsetprmptr, int[] perm, int offsetperm, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, float[] givnum, int offsetgivnum, float[] q, int offsetq, int[] qptr, int offsetqptr, float[] z, int offsetz, float[] ztemp, int offsetztemp, org.netlib.util.intW info) { //FIXME Add arguments check - slaedaK(n, tlvls, curlvl, curpbm, prmptr, _prmptr_offset, perm, _perm_offset, givptr, _givptr_offset, givcol, _givcol_offset, givnum, _givnum_offset, q, _q_offset, qptr, _qptr_offset, z, _z_offset, ztemp, _ztemp_offset, info); + slaedaK(n, tlvls, curlvl, curpbm, prmptr, offsetprmptr, perm, offsetperm, givptr, offsetgivptr, givcol, offsetgivcol, givnum, offsetgivnum, q, offsetq, qptr, offsetqptr, z, offsetz, ztemp, offsetztemp, info); } - protected abstract void slaedaK(int n, int tlvls, int curlvl, int curpbm, int[] prmptr, int _prmptr_offset, int[] perm, int _perm_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, float[] givnum, int _givnum_offset, float[] q, int _q_offset, int[] qptr, int _qptr_offset, float[] z, int _z_offset, float[] ztemp, int _ztemp_offset, org.netlib.util.intW info); + protected abstract void slaedaK(int n, int tlvls, int curlvl, int curpbm, int[] prmptr, int offsetprmptr, int[] perm, int offsetperm, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, float[] givnum, int offsetgivnum, float[] q, int offsetq, int[] qptr, int offsetqptr, float[] z, int offsetz, float[] ztemp, int offsetztemp, org.netlib.util.intW info); public void slaein(boolean rightv, boolean noinit, int n, float[] h, int ldh, float wr, float wi, float[] vr, float[] vi, float[] b, int ldb, float[] work, float eps3, float smlnum, float bignum, org.netlib.util.intW info) { slaein(rightv, noinit, n, h, 0, ldh, wr, wi, vr, 0, vi, 0, b, 0, ldb, work, 0, eps3, smlnum, bignum, info); } - public void slaein(boolean rightv, boolean noinit, int n, float[] h, int _h_offset, int ldh, float wr, float wi, float[] vr, int _vr_offset, float[] vi, int _vi_offset, float[] b, int _b_offset, int ldb, float[] work, int _work_offset, float eps3, float smlnum, float bignum, org.netlib.util.intW info) { + public void slaein(boolean rightv, boolean noinit, int n, float[] h, int offseth, int ldh, float wr, float wi, float[] vr, int offsetvr, float[] vi, int offsetvi, float[] b, int offsetb, int ldb, float[] work, int offsetwork, float eps3, float smlnum, float bignum, org.netlib.util.intW info) { //FIXME Add arguments check - slaeinK(rightv, noinit, n, h, _h_offset, ldh, wr, wi, vr, _vr_offset, vi, _vi_offset, b, _b_offset, ldb, work, _work_offset, eps3, smlnum, bignum, info); + slaeinK(rightv, noinit, n, h, offseth, ldh, wr, wi, vr, offsetvr, vi, offsetvi, b, offsetb, ldb, work, offsetwork, eps3, smlnum, bignum, info); } - protected abstract void slaeinK(boolean rightv, boolean noinit, int n, float[] h, int _h_offset, int ldh, float wr, float wi, float[] vr, int _vr_offset, float[] vi, int _vi_offset, float[] b, int _b_offset, int ldb, float[] work, int _work_offset, float eps3, float smlnum, float bignum, org.netlib.util.intW info); + protected abstract void slaeinK(boolean rightv, boolean noinit, int n, float[] h, int offseth, int ldh, float wr, float wi, float[] vr, int offsetvr, float[] vi, int offsetvi, float[] b, int offsetb, int ldb, float[] work, int offsetwork, float eps3, float smlnum, float bignum, org.netlib.util.intW info); public void slaev2(float a, float b, float c, org.netlib.util.floatW rt1, org.netlib.util.floatW rt2, org.netlib.util.floatW cs1, org.netlib.util.floatW sn1) { slaev2K(a, b, c, rt1, rt2, cs1, sn1); @@ -4912,34 +4912,34 @@ public void slaexc(boolean wantq, int n, float[] t, int ldt, float[] q, int ldq, slaexc(wantq, n, t, 0, ldt, q, 0, ldq, j1, n1, n2, work, 0, info); } - public void slaexc(boolean wantq, int n, float[] t, int _t_offset, int ldt, float[] q, int _q_offset, int ldq, int j1, int n1, int n2, float[] work, int _work_offset, org.netlib.util.intW info) { + public void slaexc(boolean wantq, int n, float[] t, int offsett, int ldt, float[] q, int offsetq, int ldq, int j1, int n1, int n2, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - slaexcK(wantq, n, t, _t_offset, ldt, q, _q_offset, ldq, j1, n1, n2, work, _work_offset, info); + slaexcK(wantq, n, t, offsett, ldt, q, offsetq, ldq, j1, n1, n2, work, offsetwork, info); } - protected abstract void slaexcK(boolean wantq, int n, float[] t, int _t_offset, int ldt, float[] q, int _q_offset, int ldq, int j1, int n1, int n2, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void slaexcK(boolean wantq, int n, float[] t, int offsett, int ldt, float[] q, int offsetq, int ldq, int j1, int n1, int n2, float[] work, int offsetwork, org.netlib.util.intW info); public void slag2(float[] a, int lda, float[] b, int ldb, float safmin, org.netlib.util.floatW scale1, org.netlib.util.floatW scale2, org.netlib.util.floatW wr1, org.netlib.util.floatW wr2, org.netlib.util.floatW wi) { slag2(a, 0, lda, b, 0, ldb, safmin, scale1, scale2, wr1, wr2, wi); } - public void slag2(float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float safmin, org.netlib.util.floatW scale1, org.netlib.util.floatW scale2, org.netlib.util.floatW wr1, org.netlib.util.floatW wr2, org.netlib.util.floatW wi) { + public void slag2(float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float safmin, org.netlib.util.floatW scale1, org.netlib.util.floatW scale2, org.netlib.util.floatW wr1, org.netlib.util.floatW wr2, org.netlib.util.floatW wi) { //FIXME Add arguments check - slag2K(a, _a_offset, lda, b, _b_offset, ldb, safmin, scale1, scale2, wr1, wr2, wi); + slag2K(a, offseta, lda, b, offsetb, ldb, safmin, scale1, scale2, wr1, wr2, wi); } - protected abstract void slag2K(float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float safmin, org.netlib.util.floatW scale1, org.netlib.util.floatW scale2, org.netlib.util.floatW wr1, org.netlib.util.floatW wr2, org.netlib.util.floatW wi); + protected abstract void slag2K(float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float safmin, org.netlib.util.floatW scale1, org.netlib.util.floatW scale2, org.netlib.util.floatW wr1, org.netlib.util.floatW wr2, org.netlib.util.floatW wi); public void slag2d(int m, int n, float[] sa, int ldsa, double[] a, int lda, org.netlib.util.intW info) { slag2d(m, n, sa, 0, ldsa, a, 0, lda, info); } - public void slag2d(int m, int n, float[] sa, int _sa_offset, int ldsa, double[] a, int _a_offset, int lda, org.netlib.util.intW info) { + public void slag2d(int m, int n, float[] sa, int offsetsa, int ldsa, double[] a, int offseta, int lda, org.netlib.util.intW info) { //FIXME Add arguments check - slag2dK(m, n, sa, _sa_offset, ldsa, a, _a_offset, lda, info); + slag2dK(m, n, sa, offsetsa, ldsa, a, offseta, lda, info); } - protected abstract void slag2dK(int m, int n, float[] sa, int _sa_offset, int ldsa, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected abstract void slag2dK(int m, int n, float[] sa, int offsetsa, int ldsa, double[] a, int offseta, int lda, org.netlib.util.intW info); public void slags2(boolean upper, float a1, float a2, float a3, float b1, float b2, float b3, org.netlib.util.floatW csu, org.netlib.util.floatW snu, org.netlib.util.floatW csv, org.netlib.util.floatW snv, org.netlib.util.floatW csq, org.netlib.util.floatW snq) { slags2K(upper, a1, a2, a3, b1, b2, b3, csu, snu, csv, snv, csq, snq); @@ -4951,89 +4951,89 @@ public void slagtf(int n, float[] a, float lambda, float[] b, float[] c, float t slagtf(n, a, 0, lambda, b, 0, c, 0, tol, d, 0, in, 0, info); } - public void slagtf(int n, float[] a, int _a_offset, float lambda, float[] b, int _b_offset, float[] c, int _c_offset, float tol, float[] d, int _d_offset, int[] in, int _in_offset, org.netlib.util.intW info) { + public void slagtf(int n, float[] a, int offseta, float lambda, float[] b, int offsetb, float[] c, int offsetc, float tol, float[] d, int offsetd, int[] in, int offsetin, org.netlib.util.intW info) { //FIXME Add arguments check - slagtfK(n, a, _a_offset, lambda, b, _b_offset, c, _c_offset, tol, d, _d_offset, in, _in_offset, info); + slagtfK(n, a, offseta, lambda, b, offsetb, c, offsetc, tol, d, offsetd, in, offsetin, info); } - protected abstract void slagtfK(int n, float[] a, int _a_offset, float lambda, float[] b, int _b_offset, float[] c, int _c_offset, float tol, float[] d, int _d_offset, int[] in, int _in_offset, org.netlib.util.intW info); + protected abstract void slagtfK(int n, float[] a, int offseta, float lambda, float[] b, int offsetb, float[] c, int offsetc, float tol, float[] d, int offsetd, int[] in, int offsetin, org.netlib.util.intW info); public void slagtm(String trans, int n, int nrhs, float alpha, float[] dl, float[] d, float[] du, float[] x, int ldx, float beta, float[] b, int ldb) { slagtm(trans, n, nrhs, alpha, dl, 0, d, 0, du, 0, x, 0, ldx, beta, b, 0, ldb); } - public void slagtm(String trans, int n, int nrhs, float alpha, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] x, int _x_offset, int ldx, float beta, float[] b, int _b_offset, int ldb) { + public void slagtm(String trans, int n, int nrhs, float alpha, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] x, int offsetx, int ldx, float beta, float[] b, int offsetb, int ldb) { //FIXME Add arguments check - slagtmK(trans, n, nrhs, alpha, dl, _dl_offset, d, _d_offset, du, _du_offset, x, _x_offset, ldx, beta, b, _b_offset, ldb); + slagtmK(trans, n, nrhs, alpha, dl, offsetdl, d, offsetd, du, offsetdu, x, offsetx, ldx, beta, b, offsetb, ldb); } - protected abstract void slagtmK(String trans, int n, int nrhs, float alpha, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] x, int _x_offset, int ldx, float beta, float[] b, int _b_offset, int ldb); + protected abstract void slagtmK(String trans, int n, int nrhs, float alpha, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] x, int offsetx, int ldx, float beta, float[] b, int offsetb, int ldb); public void slagts(int job, int n, float[] a, float[] b, float[] c, float[] d, int[] in, float[] y, org.netlib.util.floatW tol, org.netlib.util.intW info) { slagts(job, n, a, 0, b, 0, c, 0, d, 0, in, 0, y, 0, tol, info); } - public void slagts(int job, int n, float[] a, int _a_offset, float[] b, int _b_offset, float[] c, int _c_offset, float[] d, int _d_offset, int[] in, int _in_offset, float[] y, int _y_offset, org.netlib.util.floatW tol, org.netlib.util.intW info) { + public void slagts(int job, int n, float[] a, int offseta, float[] b, int offsetb, float[] c, int offsetc, float[] d, int offsetd, int[] in, int offsetin, float[] y, int offsety, org.netlib.util.floatW tol, org.netlib.util.intW info) { //FIXME Add arguments check - slagtsK(job, n, a, _a_offset, b, _b_offset, c, _c_offset, d, _d_offset, in, _in_offset, y, _y_offset, tol, info); + slagtsK(job, n, a, offseta, b, offsetb, c, offsetc, d, offsetd, in, offsetin, y, offsety, tol, info); } - protected abstract void slagtsK(int job, int n, float[] a, int _a_offset, float[] b, int _b_offset, float[] c, int _c_offset, float[] d, int _d_offset, int[] in, int _in_offset, float[] y, int _y_offset, org.netlib.util.floatW tol, org.netlib.util.intW info); + protected abstract void slagtsK(int job, int n, float[] a, int offseta, float[] b, int offsetb, float[] c, int offsetc, float[] d, int offsetd, int[] in, int offsetin, float[] y, int offsety, org.netlib.util.floatW tol, org.netlib.util.intW info); public void slagv2(float[] a, int lda, float[] b, int ldb, float[] alphar, float[] alphai, float[] beta, org.netlib.util.floatW csl, org.netlib.util.floatW snl, org.netlib.util.floatW csr, org.netlib.util.floatW snr) { slagv2(a, 0, lda, b, 0, ldb, alphar, 0, alphai, 0, beta, 0, csl, snl, csr, snr); } - public void slagv2(float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, org.netlib.util.floatW csl, org.netlib.util.floatW snl, org.netlib.util.floatW csr, org.netlib.util.floatW snr) { + public void slagv2(float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, org.netlib.util.floatW csl, org.netlib.util.floatW snl, org.netlib.util.floatW csr, org.netlib.util.floatW snr) { //FIXME Add arguments check - slagv2K(a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, csl, snl, csr, snr); + slagv2K(a, offseta, lda, b, offsetb, ldb, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, csl, snl, csr, snr); } - protected abstract void slagv2K(float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, org.netlib.util.floatW csl, org.netlib.util.floatW snl, org.netlib.util.floatW csr, org.netlib.util.floatW snr); + protected abstract void slagv2K(float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, org.netlib.util.floatW csl, org.netlib.util.floatW snl, org.netlib.util.floatW csr, org.netlib.util.floatW snr); public void slahqr(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int ldh, float[] wr, float[] wi, int iloz, int ihiz, float[] z, int ldz, org.netlib.util.intW info) { slahqr(wantt, wantz, n, ilo, ihi, h, 0, ldh, wr, 0, wi, 0, iloz, ihiz, z, 0, ldz, info); } - public void slahqr(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, int iloz, int ihiz, float[] z, int _z_offset, int ldz, org.netlib.util.intW info) { + public void slahqr(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int offseth, int ldh, float[] wr, int offsetwr, float[] wi, int offsetwi, int iloz, int ihiz, float[] z, int offsetz, int ldz, org.netlib.util.intW info) { //FIXME Add arguments check - slahqrK(wantt, wantz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, iloz, ihiz, z, _z_offset, ldz, info); + slahqrK(wantt, wantz, n, ilo, ihi, h, offseth, ldh, wr, offsetwr, wi, offsetwi, iloz, ihiz, z, offsetz, ldz, info); } - protected abstract void slahqrK(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, int iloz, int ihiz, float[] z, int _z_offset, int ldz, org.netlib.util.intW info); + protected abstract void slahqrK(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int offseth, int ldh, float[] wr, int offsetwr, float[] wi, int offsetwi, int iloz, int ihiz, float[] z, int offsetz, int ldz, org.netlib.util.intW info); public void slahr2(int n, int k, int nb, float[] a, int lda, float[] tau, float[] t, int ldt, float[] y, int ldy) { slahr2(n, k, nb, a, 0, lda, tau, 0, t, 0, ldt, y, 0, ldy); } - public void slahr2(int n, int k, int nb, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] t, int _t_offset, int ldt, float[] y, int _y_offset, int ldy) { + public void slahr2(int n, int k, int nb, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] t, int offsett, int ldt, float[] y, int offsety, int ldy) { //FIXME Add arguments check - slahr2K(n, k, nb, a, _a_offset, lda, tau, _tau_offset, t, _t_offset, ldt, y, _y_offset, ldy); + slahr2K(n, k, nb, a, offseta, lda, tau, offsettau, t, offsett, ldt, y, offsety, ldy); } - protected abstract void slahr2K(int n, int k, int nb, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] t, int _t_offset, int ldt, float[] y, int _y_offset, int ldy); + protected abstract void slahr2K(int n, int k, int nb, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] t, int offsett, int ldt, float[] y, int offsety, int ldy); public void slahrd(int n, int k, int nb, float[] a, int lda, float[] tau, float[] t, int ldt, float[] y, int ldy) { slahrd(n, k, nb, a, 0, lda, tau, 0, t, 0, ldt, y, 0, ldy); } - public void slahrd(int n, int k, int nb, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] t, int _t_offset, int ldt, float[] y, int _y_offset, int ldy) { + public void slahrd(int n, int k, int nb, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] t, int offsett, int ldt, float[] y, int offsety, int ldy) { //FIXME Add arguments check - slahrdK(n, k, nb, a, _a_offset, lda, tau, _tau_offset, t, _t_offset, ldt, y, _y_offset, ldy); + slahrdK(n, k, nb, a, offseta, lda, tau, offsettau, t, offsett, ldt, y, offsety, ldy); } - protected abstract void slahrdK(int n, int k, int nb, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] t, int _t_offset, int ldt, float[] y, int _y_offset, int ldy); + protected abstract void slahrdK(int n, int k, int nb, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] t, int offsett, int ldt, float[] y, int offsety, int ldy); public void slaic1(int job, int j, float[] x, float sest, float[] w, float gamma, org.netlib.util.floatW sestpr, org.netlib.util.floatW s, org.netlib.util.floatW c) { slaic1(job, j, x, 0, sest, w, 0, gamma, sestpr, s, c); } - public void slaic1(int job, int j, float[] x, int _x_offset, float sest, float[] w, int _w_offset, float gamma, org.netlib.util.floatW sestpr, org.netlib.util.floatW s, org.netlib.util.floatW c) { + public void slaic1(int job, int j, float[] x, int offsetx, float sest, float[] w, int offsetw, float gamma, org.netlib.util.floatW sestpr, org.netlib.util.floatW s, org.netlib.util.floatW c) { //FIXME Add arguments check - slaic1K(job, j, x, _x_offset, sest, w, _w_offset, gamma, sestpr, s, c); + slaic1K(job, j, x, offsetx, sest, w, offsetw, gamma, sestpr, s, c); } - protected abstract void slaic1K(int job, int j, float[] x, int _x_offset, float sest, float[] w, int _w_offset, float gamma, org.netlib.util.floatW sestpr, org.netlib.util.floatW s, org.netlib.util.floatW c); + protected abstract void slaic1K(int job, int j, float[] x, int offsetx, float sest, float[] w, int offsetw, float gamma, org.netlib.util.floatW sestpr, org.netlib.util.floatW s, org.netlib.util.floatW c); public boolean slaisnan(float sin1, float sin2) { return slaisnanK(sin1, sin2); @@ -5045,188 +5045,188 @@ public void slaln2(boolean ltrans, int na, int nw, float smin, float ca, float[] slaln2(ltrans, na, nw, smin, ca, a, 0, lda, d1, d2, b, 0, ldb, wr, wi, x, 0, ldx, scale, xnorm, info); } - public void slaln2(boolean ltrans, int na, int nw, float smin, float ca, float[] a, int _a_offset, int lda, float d1, float d2, float[] b, int _b_offset, int ldb, float wr, float wi, float[] x, int _x_offset, int ldx, org.netlib.util.floatW scale, org.netlib.util.floatW xnorm, org.netlib.util.intW info) { + public void slaln2(boolean ltrans, int na, int nw, float smin, float ca, float[] a, int offseta, int lda, float d1, float d2, float[] b, int offsetb, int ldb, float wr, float wi, float[] x, int offsetx, int ldx, org.netlib.util.floatW scale, org.netlib.util.floatW xnorm, org.netlib.util.intW info) { //FIXME Add arguments check - slaln2K(ltrans, na, nw, smin, ca, a, _a_offset, lda, d1, d2, b, _b_offset, ldb, wr, wi, x, _x_offset, ldx, scale, xnorm, info); + slaln2K(ltrans, na, nw, smin, ca, a, offseta, lda, d1, d2, b, offsetb, ldb, wr, wi, x, offsetx, ldx, scale, xnorm, info); } - protected abstract void slaln2K(boolean ltrans, int na, int nw, float smin, float ca, float[] a, int _a_offset, int lda, float d1, float d2, float[] b, int _b_offset, int ldb, float wr, float wi, float[] x, int _x_offset, int ldx, org.netlib.util.floatW scale, org.netlib.util.floatW xnorm, org.netlib.util.intW info); + protected abstract void slaln2K(boolean ltrans, int na, int nw, float smin, float ca, float[] a, int offseta, int lda, float d1, float d2, float[] b, int offsetb, int ldb, float wr, float wi, float[] x, int offsetx, int ldx, org.netlib.util.floatW scale, org.netlib.util.floatW xnorm, org.netlib.util.intW info); public void slals0(int icompq, int nl, int nr, int sqre, int nrhs, float[] b, int ldb, float[] bx, int ldbx, int[] perm, int givptr, int[] givcol, int ldgcol, float[] givnum, int ldgnum, float[] poles, float[] difl, float[] difr, float[] z, int k, float c, float s, float[] work, org.netlib.util.intW info) { slals0(icompq, nl, nr, sqre, nrhs, b, 0, ldb, bx, 0, ldbx, perm, 0, givptr, givcol, 0, ldgcol, givnum, 0, ldgnum, poles, 0, difl, 0, difr, 0, z, 0, k, c, s, work, 0, info); } - public void slals0(int icompq, int nl, int nr, int sqre, int nrhs, float[] b, int _b_offset, int ldb, float[] bx, int _bx_offset, int ldbx, int[] perm, int _perm_offset, int givptr, int[] givcol, int _givcol_offset, int ldgcol, float[] givnum, int _givnum_offset, int ldgnum, float[] poles, int _poles_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, float[] z, int _z_offset, int k, float c, float s, float[] work, int _work_offset, org.netlib.util.intW info) { + public void slals0(int icompq, int nl, int nr, int sqre, int nrhs, float[] b, int offsetb, int ldb, float[] bx, int offsetbx, int ldbx, int[] perm, int offsetperm, int givptr, int[] givcol, int offsetgivcol, int ldgcol, float[] givnum, int offsetgivnum, int ldgnum, float[] poles, int offsetpoles, float[] difl, int offsetdifl, float[] difr, int offsetdifr, float[] z, int offsetz, int k, float c, float s, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - slals0K(icompq, nl, nr, sqre, nrhs, b, _b_offset, ldb, bx, _bx_offset, ldbx, perm, _perm_offset, givptr, givcol, _givcol_offset, ldgcol, givnum, _givnum_offset, ldgnum, poles, _poles_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, k, c, s, work, _work_offset, info); + slals0K(icompq, nl, nr, sqre, nrhs, b, offsetb, ldb, bx, offsetbx, ldbx, perm, offsetperm, givptr, givcol, offsetgivcol, ldgcol, givnum, offsetgivnum, ldgnum, poles, offsetpoles, difl, offsetdifl, difr, offsetdifr, z, offsetz, k, c, s, work, offsetwork, info); } - protected abstract void slals0K(int icompq, int nl, int nr, int sqre, int nrhs, float[] b, int _b_offset, int ldb, float[] bx, int _bx_offset, int ldbx, int[] perm, int _perm_offset, int givptr, int[] givcol, int _givcol_offset, int ldgcol, float[] givnum, int _givnum_offset, int ldgnum, float[] poles, int _poles_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, float[] z, int _z_offset, int k, float c, float s, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void slals0K(int icompq, int nl, int nr, int sqre, int nrhs, float[] b, int offsetb, int ldb, float[] bx, int offsetbx, int ldbx, int[] perm, int offsetperm, int givptr, int[] givcol, int offsetgivcol, int ldgcol, float[] givnum, int offsetgivnum, int ldgnum, float[] poles, int offsetpoles, float[] difl, int offsetdifl, float[] difr, int offsetdifr, float[] z, int offsetz, int k, float c, float s, float[] work, int offsetwork, org.netlib.util.intW info); public void slalsa(int icompq, int smlsiz, int n, int nrhs, float[] b, int ldb, float[] bx, int ldbx, float[] u, int ldu, float[] vt, int[] k, float[] difl, float[] difr, float[] z, float[] poles, int[] givptr, int[] givcol, int ldgcol, int[] perm, float[] givnum, float[] c, float[] s, float[] work, int[] iwork, org.netlib.util.intW info) { slalsa(icompq, smlsiz, n, nrhs, b, 0, ldb, bx, 0, ldbx, u, 0, ldu, vt, 0, k, 0, difl, 0, difr, 0, z, 0, poles, 0, givptr, 0, givcol, 0, ldgcol, perm, 0, givnum, 0, c, 0, s, 0, work, 0, iwork, 0, info); } - public void slalsa(int icompq, int smlsiz, int n, int nrhs, float[] b, int _b_offset, int ldb, float[] bx, int _bx_offset, int ldbx, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int[] k, int _k_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, float[] z, int _z_offset, float[] poles, int _poles_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, int ldgcol, int[] perm, int _perm_offset, float[] givnum, int _givnum_offset, float[] c, int _c_offset, float[] s, int _s_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void slalsa(int icompq, int smlsiz, int n, int nrhs, float[] b, int offsetb, int ldb, float[] bx, int offsetbx, int ldbx, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int[] k, int offsetk, float[] difl, int offsetdifl, float[] difr, int offsetdifr, float[] z, int offsetz, float[] poles, int offsetpoles, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, int ldgcol, int[] perm, int offsetperm, float[] givnum, int offsetgivnum, float[] c, int offsetc, float[] s, int offsets, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - slalsaK(icompq, smlsiz, n, nrhs, b, _b_offset, ldb, bx, _bx_offset, ldbx, u, _u_offset, ldu, vt, _vt_offset, k, _k_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, poles, _poles_offset, givptr, _givptr_offset, givcol, _givcol_offset, ldgcol, perm, _perm_offset, givnum, _givnum_offset, c, _c_offset, s, _s_offset, work, _work_offset, iwork, _iwork_offset, info); + slalsaK(icompq, smlsiz, n, nrhs, b, offsetb, ldb, bx, offsetbx, ldbx, u, offsetu, ldu, vt, offsetvt, k, offsetk, difl, offsetdifl, difr, offsetdifr, z, offsetz, poles, offsetpoles, givptr, offsetgivptr, givcol, offsetgivcol, ldgcol, perm, offsetperm, givnum, offsetgivnum, c, offsetc, s, offsets, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void slalsaK(int icompq, int smlsiz, int n, int nrhs, float[] b, int _b_offset, int ldb, float[] bx, int _bx_offset, int ldbx, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int[] k, int _k_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, float[] z, int _z_offset, float[] poles, int _poles_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, int ldgcol, int[] perm, int _perm_offset, float[] givnum, int _givnum_offset, float[] c, int _c_offset, float[] s, int _s_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void slalsaK(int icompq, int smlsiz, int n, int nrhs, float[] b, int offsetb, int ldb, float[] bx, int offsetbx, int ldbx, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int[] k, int offsetk, float[] difl, int offsetdifl, float[] difr, int offsetdifr, float[] z, int offsetz, float[] poles, int offsetpoles, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, int ldgcol, int[] perm, int offsetperm, float[] givnum, int offsetgivnum, float[] c, int offsetc, float[] s, int offsets, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void slalsd(String uplo, int smlsiz, int n, int nrhs, float[] d, float[] e, float[] b, int ldb, float rcond, org.netlib.util.intW rank, float[] work, int[] iwork, org.netlib.util.intW info) { slalsd(uplo, smlsiz, n, nrhs, d, 0, e, 0, b, 0, ldb, rcond, rank, work, 0, iwork, 0, info); } - public void slalsd(String uplo, int smlsiz, int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] b, int _b_offset, int ldb, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void slalsd(String uplo, int smlsiz, int n, int nrhs, float[] d, int offsetd, float[] e, int offsete, float[] b, int offsetb, int ldb, float rcond, org.netlib.util.intW rank, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - slalsdK(uplo, smlsiz, n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb, rcond, rank, work, _work_offset, iwork, _iwork_offset, info); + slalsdK(uplo, smlsiz, n, nrhs, d, offsetd, e, offsete, b, offsetb, ldb, rcond, rank, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void slalsdK(String uplo, int smlsiz, int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] b, int _b_offset, int ldb, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void slalsdK(String uplo, int smlsiz, int n, int nrhs, float[] d, int offsetd, float[] e, int offsete, float[] b, int offsetb, int ldb, float rcond, org.netlib.util.intW rank, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void slamrg(int n1, int n2, float[] a, int strd1, int strd2, int[] index) { slamrg(n1, n2, a, 0, strd1, strd2, index, 0); } - public void slamrg(int n1, int n2, float[] a, int _a_offset, int strd1, int strd2, int[] index, int _index_offset) { + public void slamrg(int n1, int n2, float[] a, int offseta, int strd1, int strd2, int[] index, int offsetindex) { //FIXME Add arguments check - slamrgK(n1, n2, a, _a_offset, strd1, strd2, index, _index_offset); + slamrgK(n1, n2, a, offseta, strd1, strd2, index, offsetindex); } - protected abstract void slamrgK(int n1, int n2, float[] a, int _a_offset, int strd1, int strd2, int[] index, int _index_offset); + protected abstract void slamrgK(int n1, int n2, float[] a, int offseta, int strd1, int strd2, int[] index, int offsetindex); public int slaneg(int n, float[] d, float[] lld, float sigma, float pivmin, int r) { return slaneg(n, d, 0, lld, 0, sigma, pivmin, r); } - public int slaneg(int n, float[] d, int _d_offset, float[] lld, int _lld_offset, float sigma, float pivmin, int r) { + public int slaneg(int n, float[] d, int offsetd, float[] lld, int offsetlld, float sigma, float pivmin, int r) { //FIXME Add arguments check - return slanegK(n, d, _d_offset, lld, _lld_offset, sigma, pivmin, r); + return slanegK(n, d, offsetd, lld, offsetlld, sigma, pivmin, r); } - protected abstract int slanegK(int n, float[] d, int _d_offset, float[] lld, int _lld_offset, float sigma, float pivmin, int r); + protected abstract int slanegK(int n, float[] d, int offsetd, float[] lld, int offsetlld, float sigma, float pivmin, int r); public float slangb(String norm, int n, int kl, int ku, float[] ab, int ldab, float[] work) { return slangb(norm, n, kl, ku, ab, 0, ldab, work, 0); } - public float slangb(String norm, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, float[] work, int _work_offset) { + public float slangb(String norm, int n, int kl, int ku, float[] ab, int offsetab, int ldab, float[] work, int offsetwork) { //FIXME Add arguments check - return slangbK(norm, n, kl, ku, ab, _ab_offset, ldab, work, _work_offset); + return slangbK(norm, n, kl, ku, ab, offsetab, ldab, work, offsetwork); } - protected abstract float slangbK(String norm, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, float[] work, int _work_offset); + protected abstract float slangbK(String norm, int n, int kl, int ku, float[] ab, int offsetab, int ldab, float[] work, int offsetwork); public float slange(String norm, int m, int n, float[] a, int lda, float[] work) { return slange(norm, m, n, a, 0, lda, work, 0); } - public float slange(String norm, int m, int n, float[] a, int _a_offset, int lda, float[] work, int _work_offset) { + public float slange(String norm, int m, int n, float[] a, int offseta, int lda, float[] work, int offsetwork) { //FIXME Add arguments check - return slangeK(norm, m, n, a, _a_offset, lda, work, _work_offset); + return slangeK(norm, m, n, a, offseta, lda, work, offsetwork); } - protected abstract float slangeK(String norm, int m, int n, float[] a, int _a_offset, int lda, float[] work, int _work_offset); + protected abstract float slangeK(String norm, int m, int n, float[] a, int offseta, int lda, float[] work, int offsetwork); public float slangt(String norm, int n, float[] dl, float[] d, float[] du) { return slangt(norm, n, dl, 0, d, 0, du, 0); } - public float slangt(String norm, int n, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset) { + public float slangt(String norm, int n, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu) { //FIXME Add arguments check - return slangtK(norm, n, dl, _dl_offset, d, _d_offset, du, _du_offset); + return slangtK(norm, n, dl, offsetdl, d, offsetd, du, offsetdu); } - protected abstract float slangtK(String norm, int n, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset); + protected abstract float slangtK(String norm, int n, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu); public float slanhs(String norm, int n, float[] a, int lda, float[] work) { return slanhs(norm, n, a, 0, lda, work, 0); } - public float slanhs(String norm, int n, float[] a, int _a_offset, int lda, float[] work, int _work_offset) { + public float slanhs(String norm, int n, float[] a, int offseta, int lda, float[] work, int offsetwork) { //FIXME Add arguments check - return slanhsK(norm, n, a, _a_offset, lda, work, _work_offset); + return slanhsK(norm, n, a, offseta, lda, work, offsetwork); } - protected abstract float slanhsK(String norm, int n, float[] a, int _a_offset, int lda, float[] work, int _work_offset); + protected abstract float slanhsK(String norm, int n, float[] a, int offseta, int lda, float[] work, int offsetwork); public float slansb(String norm, String uplo, int n, int k, float[] ab, int ldab, float[] work) { return slansb(norm, uplo, n, k, ab, 0, ldab, work, 0); } - public float slansb(String norm, String uplo, int n, int k, float[] ab, int _ab_offset, int ldab, float[] work, int _work_offset) { + public float slansb(String norm, String uplo, int n, int k, float[] ab, int offsetab, int ldab, float[] work, int offsetwork) { //FIXME Add arguments check - return slansbK(norm, uplo, n, k, ab, _ab_offset, ldab, work, _work_offset); + return slansbK(norm, uplo, n, k, ab, offsetab, ldab, work, offsetwork); } - protected abstract float slansbK(String norm, String uplo, int n, int k, float[] ab, int _ab_offset, int ldab, float[] work, int _work_offset); + protected abstract float slansbK(String norm, String uplo, int n, int k, float[] ab, int offsetab, int ldab, float[] work, int offsetwork); public float slansp(String norm, String uplo, int n, float[] ap, float[] work) { return slansp(norm, uplo, n, ap, 0, work, 0); } - public float slansp(String norm, String uplo, int n, float[] ap, int _ap_offset, float[] work, int _work_offset) { + public float slansp(String norm, String uplo, int n, float[] ap, int offsetap, float[] work, int offsetwork) { //FIXME Add arguments check - return slanspK(norm, uplo, n, ap, _ap_offset, work, _work_offset); + return slanspK(norm, uplo, n, ap, offsetap, work, offsetwork); } - protected abstract float slanspK(String norm, String uplo, int n, float[] ap, int _ap_offset, float[] work, int _work_offset); + protected abstract float slanspK(String norm, String uplo, int n, float[] ap, int offsetap, float[] work, int offsetwork); public float slanst(String norm, int n, float[] d, float[] e) { return slanst(norm, n, d, 0, e, 0); } - public float slanst(String norm, int n, float[] d, int _d_offset, float[] e, int _e_offset) { + public float slanst(String norm, int n, float[] d, int offsetd, float[] e, int offsete) { //FIXME Add arguments check - return slanstK(norm, n, d, _d_offset, e, _e_offset); + return slanstK(norm, n, d, offsetd, e, offsete); } - protected abstract float slanstK(String norm, int n, float[] d, int _d_offset, float[] e, int _e_offset); + protected abstract float slanstK(String norm, int n, float[] d, int offsetd, float[] e, int offsete); public float slansy(String norm, String uplo, int n, float[] a, int lda, float[] work) { return slansy(norm, uplo, n, a, 0, lda, work, 0); } - public float slansy(String norm, String uplo, int n, float[] a, int _a_offset, int lda, float[] work, int _work_offset) { + public float slansy(String norm, String uplo, int n, float[] a, int offseta, int lda, float[] work, int offsetwork) { //FIXME Add arguments check - return slansyK(norm, uplo, n, a, _a_offset, lda, work, _work_offset); + return slansyK(norm, uplo, n, a, offseta, lda, work, offsetwork); } - protected abstract float slansyK(String norm, String uplo, int n, float[] a, int _a_offset, int lda, float[] work, int _work_offset); + protected abstract float slansyK(String norm, String uplo, int n, float[] a, int offseta, int lda, float[] work, int offsetwork); public float slantb(String norm, String uplo, String diag, int n, int k, float[] ab, int ldab, float[] work) { return slantb(norm, uplo, diag, n, k, ab, 0, ldab, work, 0); } - public float slantb(String norm, String uplo, String diag, int n, int k, float[] ab, int _ab_offset, int ldab, float[] work, int _work_offset) { + public float slantb(String norm, String uplo, String diag, int n, int k, float[] ab, int offsetab, int ldab, float[] work, int offsetwork) { //FIXME Add arguments check - return slantbK(norm, uplo, diag, n, k, ab, _ab_offset, ldab, work, _work_offset); + return slantbK(norm, uplo, diag, n, k, ab, offsetab, ldab, work, offsetwork); } - protected abstract float slantbK(String norm, String uplo, String diag, int n, int k, float[] ab, int _ab_offset, int ldab, float[] work, int _work_offset); + protected abstract float slantbK(String norm, String uplo, String diag, int n, int k, float[] ab, int offsetab, int ldab, float[] work, int offsetwork); public float slantp(String norm, String uplo, String diag, int n, float[] ap, float[] work) { return slantp(norm, uplo, diag, n, ap, 0, work, 0); } - public float slantp(String norm, String uplo, String diag, int n, float[] ap, int _ap_offset, float[] work, int _work_offset) { + public float slantp(String norm, String uplo, String diag, int n, float[] ap, int offsetap, float[] work, int offsetwork) { //FIXME Add arguments check - return slantpK(norm, uplo, diag, n, ap, _ap_offset, work, _work_offset); + return slantpK(norm, uplo, diag, n, ap, offsetap, work, offsetwork); } - protected abstract float slantpK(String norm, String uplo, String diag, int n, float[] ap, int _ap_offset, float[] work, int _work_offset); + protected abstract float slantpK(String norm, String uplo, String diag, int n, float[] ap, int offsetap, float[] work, int offsetwork); public float slantr(String norm, String uplo, String diag, int m, int n, float[] a, int lda, float[] work) { return slantr(norm, uplo, diag, m, n, a, 0, lda, work, 0); } - public float slantr(String norm, String uplo, String diag, int m, int n, float[] a, int _a_offset, int lda, float[] work, int _work_offset) { + public float slantr(String norm, String uplo, String diag, int m, int n, float[] a, int offseta, int lda, float[] work, int offsetwork) { //FIXME Add arguments check - return slantrK(norm, uplo, diag, m, n, a, _a_offset, lda, work, _work_offset); + return slantrK(norm, uplo, diag, m, n, a, offseta, lda, work, offsetwork); } - protected abstract float slantrK(String norm, String uplo, String diag, int m, int n, float[] a, int _a_offset, int lda, float[] work, int _work_offset); + protected abstract float slantrK(String norm, String uplo, String diag, int m, int n, float[] a, int offseta, int lda, float[] work, int offsetwork); public void slanv2(org.netlib.util.floatW a, org.netlib.util.floatW b, org.netlib.util.floatW c, org.netlib.util.floatW d, org.netlib.util.floatW rt1r, org.netlib.util.floatW rt1i, org.netlib.util.floatW rt2r, org.netlib.util.floatW rt2i, org.netlib.util.floatW cs, org.netlib.util.floatW sn) { slanv2K(a, b, c, d, rt1r, rt1i, rt2r, rt2i, cs, sn); @@ -5238,23 +5238,23 @@ public void slapll(int n, float[] x, int incx, float[] y, int incy, org.netlib.u slapll(n, x, 0, incx, y, 0, incy, ssmin); } - public void slapll(int n, float[] x, int _x_offset, int incx, float[] y, int _y_offset, int incy, org.netlib.util.floatW ssmin) { + public void slapll(int n, float[] x, int offsetx, int incx, float[] y, int offsety, int incy, org.netlib.util.floatW ssmin) { //FIXME Add arguments check - slapllK(n, x, _x_offset, incx, y, _y_offset, incy, ssmin); + slapllK(n, x, offsetx, incx, y, offsety, incy, ssmin); } - protected abstract void slapllK(int n, float[] x, int _x_offset, int incx, float[] y, int _y_offset, int incy, org.netlib.util.floatW ssmin); + protected abstract void slapllK(int n, float[] x, int offsetx, int incx, float[] y, int offsety, int incy, org.netlib.util.floatW ssmin); public void slapmt(boolean forwrd, int m, int n, float[] x, int ldx, int[] k) { slapmt(forwrd, m, n, x, 0, ldx, k, 0); } - public void slapmt(boolean forwrd, int m, int n, float[] x, int _x_offset, int ldx, int[] k, int _k_offset) { + public void slapmt(boolean forwrd, int m, int n, float[] x, int offsetx, int ldx, int[] k, int offsetk) { //FIXME Add arguments check - slapmtK(forwrd, m, n, x, _x_offset, ldx, k, _k_offset); + slapmtK(forwrd, m, n, x, offsetx, ldx, k, offsetk); } - protected abstract void slapmtK(boolean forwrd, int m, int n, float[] x, int _x_offset, int ldx, int[] k, int _k_offset); + protected abstract void slapmtK(boolean forwrd, int m, int n, float[] x, int offsetx, int ldx, int[] k, int offsetk); public float slapy2(float x, float y) { return slapy2K(x, y); @@ -5272,364 +5272,364 @@ public void slaqgb(int m, int n, int kl, int ku, float[] ab, int ldab, float[] r slaqgb(m, n, kl, ku, ab, 0, ldab, r, 0, c, 0, rowcnd, colcnd, amax, equed); } - public void slaqgb(int m, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, float[] r, int _r_offset, float[] c, int _c_offset, float rowcnd, float colcnd, float amax, org.netlib.util.StringW equed) { + public void slaqgb(int m, int n, int kl, int ku, float[] ab, int offsetab, int ldab, float[] r, int offsetr, float[] c, int offsetc, float rowcnd, float colcnd, float amax, org.netlib.util.StringW equed) { //FIXME Add arguments check - slaqgbK(m, n, kl, ku, ab, _ab_offset, ldab, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, equed); + slaqgbK(m, n, kl, ku, ab, offsetab, ldab, r, offsetr, c, offsetc, rowcnd, colcnd, amax, equed); } - protected abstract void slaqgbK(int m, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, float[] r, int _r_offset, float[] c, int _c_offset, float rowcnd, float colcnd, float amax, org.netlib.util.StringW equed); + protected abstract void slaqgbK(int m, int n, int kl, int ku, float[] ab, int offsetab, int ldab, float[] r, int offsetr, float[] c, int offsetc, float rowcnd, float colcnd, float amax, org.netlib.util.StringW equed); public void slaqge(int m, int n, float[] a, int lda, float[] r, float[] c, float rowcnd, float colcnd, float amax, org.netlib.util.StringW equed) { slaqge(m, n, a, 0, lda, r, 0, c, 0, rowcnd, colcnd, amax, equed); } - public void slaqge(int m, int n, float[] a, int _a_offset, int lda, float[] r, int _r_offset, float[] c, int _c_offset, float rowcnd, float colcnd, float amax, org.netlib.util.StringW equed) { + public void slaqge(int m, int n, float[] a, int offseta, int lda, float[] r, int offsetr, float[] c, int offsetc, float rowcnd, float colcnd, float amax, org.netlib.util.StringW equed) { //FIXME Add arguments check - slaqgeK(m, n, a, _a_offset, lda, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, equed); + slaqgeK(m, n, a, offseta, lda, r, offsetr, c, offsetc, rowcnd, colcnd, amax, equed); } - protected abstract void slaqgeK(int m, int n, float[] a, int _a_offset, int lda, float[] r, int _r_offset, float[] c, int _c_offset, float rowcnd, float colcnd, float amax, org.netlib.util.StringW equed); + protected abstract void slaqgeK(int m, int n, float[] a, int offseta, int lda, float[] r, int offsetr, float[] c, int offsetc, float rowcnd, float colcnd, float amax, org.netlib.util.StringW equed); public void slaqp2(int m, int n, int offset, float[] a, int lda, int[] jpvt, float[] tau, float[] vn1, float[] vn2, float[] work) { slaqp2(m, n, offset, a, 0, lda, jpvt, 0, tau, 0, vn1, 0, vn2, 0, work, 0); } - public void slaqp2(int m, int n, int offset, float[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, float[] tau, int _tau_offset, float[] vn1, int _vn1_offset, float[] vn2, int _vn2_offset, float[] work, int _work_offset) { + public void slaqp2(int m, int n, int offset, float[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, float[] tau, int offsettau, float[] vn1, int offsetvn1, float[] vn2, int offsetvn2, float[] work, int offsetwork) { //FIXME Add arguments check - slaqp2K(m, n, offset, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, vn1, _vn1_offset, vn2, _vn2_offset, work, _work_offset); + slaqp2K(m, n, offset, a, offseta, lda, jpvt, offsetjpvt, tau, offsettau, vn1, offsetvn1, vn2, offsetvn2, work, offsetwork); } - protected abstract void slaqp2K(int m, int n, int offset, float[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, float[] tau, int _tau_offset, float[] vn1, int _vn1_offset, float[] vn2, int _vn2_offset, float[] work, int _work_offset); + protected abstract void slaqp2K(int m, int n, int offset, float[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, float[] tau, int offsettau, float[] vn1, int offsetvn1, float[] vn2, int offsetvn2, float[] work, int offsetwork); public void slaqps(int m, int n, int offset, int nb, org.netlib.util.intW kb, float[] a, int lda, int[] jpvt, float[] tau, float[] vn1, float[] vn2, float[] auxv, float[] f, int ldf) { slaqps(m, n, offset, nb, kb, a, 0, lda, jpvt, 0, tau, 0, vn1, 0, vn2, 0, auxv, 0, f, 0, ldf); } - public void slaqps(int m, int n, int offset, int nb, org.netlib.util.intW kb, float[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, float[] tau, int _tau_offset, float[] vn1, int _vn1_offset, float[] vn2, int _vn2_offset, float[] auxv, int _auxv_offset, float[] f, int _f_offset, int ldf) { + public void slaqps(int m, int n, int offset, int nb, org.netlib.util.intW kb, float[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, float[] tau, int offsettau, float[] vn1, int offsetvn1, float[] vn2, int offsetvn2, float[] auxv, int offsetauxv, float[] f, int offsetf, int ldf) { //FIXME Add arguments check - slaqpsK(m, n, offset, nb, kb, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, vn1, _vn1_offset, vn2, _vn2_offset, auxv, _auxv_offset, f, _f_offset, ldf); + slaqpsK(m, n, offset, nb, kb, a, offseta, lda, jpvt, offsetjpvt, tau, offsettau, vn1, offsetvn1, vn2, offsetvn2, auxv, offsetauxv, f, offsetf, ldf); } - protected abstract void slaqpsK(int m, int n, int offset, int nb, org.netlib.util.intW kb, float[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, float[] tau, int _tau_offset, float[] vn1, int _vn1_offset, float[] vn2, int _vn2_offset, float[] auxv, int _auxv_offset, float[] f, int _f_offset, int ldf); + protected abstract void slaqpsK(int m, int n, int offset, int nb, org.netlib.util.intW kb, float[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, float[] tau, int offsettau, float[] vn1, int offsetvn1, float[] vn2, int offsetvn2, float[] auxv, int offsetauxv, float[] f, int offsetf, int ldf); public void slaqr0(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int ldh, float[] wr, float[] wi, int iloz, int ihiz, float[] z, int ldz, float[] work, int lwork, org.netlib.util.intW info) { slaqr0(wantt, wantz, n, ilo, ihi, h, 0, ldh, wr, 0, wi, 0, iloz, ihiz, z, 0, ldz, work, 0, lwork, info); } - public void slaqr0(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, int iloz, int ihiz, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void slaqr0(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int offseth, int ldh, float[] wr, int offsetwr, float[] wi, int offsetwi, int iloz, int ihiz, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - slaqr0K(wantt, wantz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, iloz, ihiz, z, _z_offset, ldz, work, _work_offset, lwork, info); + slaqr0K(wantt, wantz, n, ilo, ihi, h, offseth, ldh, wr, offsetwr, wi, offsetwi, iloz, ihiz, z, offsetz, ldz, work, offsetwork, lwork, info); } - protected abstract void slaqr0K(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, int iloz, int ihiz, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void slaqr0K(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int offseth, int ldh, float[] wr, int offsetwr, float[] wi, int offsetwi, int iloz, int ihiz, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void slaqr1(int n, float[] h, int ldh, float sr1, float si1, float sr2, float si2, float[] v) { slaqr1(n, h, 0, ldh, sr1, si1, sr2, si2, v, 0); } - public void slaqr1(int n, float[] h, int _h_offset, int ldh, float sr1, float si1, float sr2, float si2, float[] v, int _v_offset) { + public void slaqr1(int n, float[] h, int offseth, int ldh, float sr1, float si1, float sr2, float si2, float[] v, int offsetv) { //FIXME Add arguments check - slaqr1K(n, h, _h_offset, ldh, sr1, si1, sr2, si2, v, _v_offset); + slaqr1K(n, h, offseth, ldh, sr1, si1, sr2, si2, v, offsetv); } - protected abstract void slaqr1K(int n, float[] h, int _h_offset, int ldh, float sr1, float si1, float sr2, float si2, float[] v, int _v_offset); + protected abstract void slaqr1K(int n, float[] h, int offseth, int ldh, float sr1, float si1, float sr2, float si2, float[] v, int offsetv); public void slaqr2(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, float[] h, int ldh, int iloz, int ihiz, float[] z, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, float[] sr, float[] si, float[] v, int ldv, int nh, float[] t, int ldt, int nv, float[] wv, int ldwv, float[] work, int lwork) { slaqr2(wantt, wantz, n, ktop, kbot, nw, h, 0, ldh, iloz, ihiz, z, 0, ldz, ns, nd, sr, 0, si, 0, v, 0, ldv, nh, t, 0, ldt, nv, wv, 0, ldwv, work, 0, lwork); } - public void slaqr2(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, float[] h, int _h_offset, int ldh, int iloz, int ihiz, float[] z, int _z_offset, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, float[] sr, int _sr_offset, float[] si, int _si_offset, float[] v, int _v_offset, int ldv, int nh, float[] t, int _t_offset, int ldt, int nv, float[] wv, int _wv_offset, int ldwv, float[] work, int _work_offset, int lwork) { + public void slaqr2(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, float[] h, int offseth, int ldh, int iloz, int ihiz, float[] z, int offsetz, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, float[] sr, int offsetsr, float[] si, int offsetsi, float[] v, int offsetv, int ldv, int nh, float[] t, int offsett, int ldt, int nv, float[] wv, int offsetwv, int ldwv, float[] work, int offsetwork, int lwork) { //FIXME Add arguments check - slaqr2K(wantt, wantz, n, ktop, kbot, nw, h, _h_offset, ldh, iloz, ihiz, z, _z_offset, ldz, ns, nd, sr, _sr_offset, si, _si_offset, v, _v_offset, ldv, nh, t, _t_offset, ldt, nv, wv, _wv_offset, ldwv, work, _work_offset, lwork); + slaqr2K(wantt, wantz, n, ktop, kbot, nw, h, offseth, ldh, iloz, ihiz, z, offsetz, ldz, ns, nd, sr, offsetsr, si, offsetsi, v, offsetv, ldv, nh, t, offsett, ldt, nv, wv, offsetwv, ldwv, work, offsetwork, lwork); } - protected abstract void slaqr2K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, float[] h, int _h_offset, int ldh, int iloz, int ihiz, float[] z, int _z_offset, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, float[] sr, int _sr_offset, float[] si, int _si_offset, float[] v, int _v_offset, int ldv, int nh, float[] t, int _t_offset, int ldt, int nv, float[] wv, int _wv_offset, int ldwv, float[] work, int _work_offset, int lwork); + protected abstract void slaqr2K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, float[] h, int offseth, int ldh, int iloz, int ihiz, float[] z, int offsetz, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, float[] sr, int offsetsr, float[] si, int offsetsi, float[] v, int offsetv, int ldv, int nh, float[] t, int offsett, int ldt, int nv, float[] wv, int offsetwv, int ldwv, float[] work, int offsetwork, int lwork); public void slaqr3(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, float[] h, int ldh, int iloz, int ihiz, float[] z, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, float[] sr, float[] si, float[] v, int ldv, int nh, float[] t, int ldt, int nv, float[] wv, int ldwv, float[] work, int lwork) { slaqr3(wantt, wantz, n, ktop, kbot, nw, h, 0, ldh, iloz, ihiz, z, 0, ldz, ns, nd, sr, 0, si, 0, v, 0, ldv, nh, t, 0, ldt, nv, wv, 0, ldwv, work, 0, lwork); } - public void slaqr3(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, float[] h, int _h_offset, int ldh, int iloz, int ihiz, float[] z, int _z_offset, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, float[] sr, int _sr_offset, float[] si, int _si_offset, float[] v, int _v_offset, int ldv, int nh, float[] t, int _t_offset, int ldt, int nv, float[] wv, int _wv_offset, int ldwv, float[] work, int _work_offset, int lwork) { + public void slaqr3(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, float[] h, int offseth, int ldh, int iloz, int ihiz, float[] z, int offsetz, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, float[] sr, int offsetsr, float[] si, int offsetsi, float[] v, int offsetv, int ldv, int nh, float[] t, int offsett, int ldt, int nv, float[] wv, int offsetwv, int ldwv, float[] work, int offsetwork, int lwork) { //FIXME Add arguments check - slaqr3K(wantt, wantz, n, ktop, kbot, nw, h, _h_offset, ldh, iloz, ihiz, z, _z_offset, ldz, ns, nd, sr, _sr_offset, si, _si_offset, v, _v_offset, ldv, nh, t, _t_offset, ldt, nv, wv, _wv_offset, ldwv, work, _work_offset, lwork); + slaqr3K(wantt, wantz, n, ktop, kbot, nw, h, offseth, ldh, iloz, ihiz, z, offsetz, ldz, ns, nd, sr, offsetsr, si, offsetsi, v, offsetv, ldv, nh, t, offsett, ldt, nv, wv, offsetwv, ldwv, work, offsetwork, lwork); } - protected abstract void slaqr3K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, float[] h, int _h_offset, int ldh, int iloz, int ihiz, float[] z, int _z_offset, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, float[] sr, int _sr_offset, float[] si, int _si_offset, float[] v, int _v_offset, int ldv, int nh, float[] t, int _t_offset, int ldt, int nv, float[] wv, int _wv_offset, int ldwv, float[] work, int _work_offset, int lwork); + protected abstract void slaqr3K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, float[] h, int offseth, int ldh, int iloz, int ihiz, float[] z, int offsetz, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, float[] sr, int offsetsr, float[] si, int offsetsi, float[] v, int offsetv, int ldv, int nh, float[] t, int offsett, int ldt, int nv, float[] wv, int offsetwv, int ldwv, float[] work, int offsetwork, int lwork); public void slaqr4(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int ldh, float[] wr, float[] wi, int iloz, int ihiz, float[] z, int ldz, float[] work, int lwork, org.netlib.util.intW info) { slaqr4(wantt, wantz, n, ilo, ihi, h, 0, ldh, wr, 0, wi, 0, iloz, ihiz, z, 0, ldz, work, 0, lwork, info); } - public void slaqr4(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, int iloz, int ihiz, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void slaqr4(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int offseth, int ldh, float[] wr, int offsetwr, float[] wi, int offsetwi, int iloz, int ihiz, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - slaqr4K(wantt, wantz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, iloz, ihiz, z, _z_offset, ldz, work, _work_offset, lwork, info); + slaqr4K(wantt, wantz, n, ilo, ihi, h, offseth, ldh, wr, offsetwr, wi, offsetwi, iloz, ihiz, z, offsetz, ldz, work, offsetwork, lwork, info); } - protected abstract void slaqr4K(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, int iloz, int ihiz, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void slaqr4K(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int offseth, int ldh, float[] wr, int offsetwr, float[] wi, int offsetwi, int iloz, int ihiz, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void slaqr5(boolean wantt, boolean wantz, int kacc22, int n, int ktop, int kbot, int nshfts, float[] sr, float[] si, float[] h, int ldh, int iloz, int ihiz, float[] z, int ldz, float[] v, int ldv, float[] u, int ldu, int nv, float[] wv, int ldwv, int nh, float[] wh, int ldwh) { slaqr5(wantt, wantz, kacc22, n, ktop, kbot, nshfts, sr, 0, si, 0, h, 0, ldh, iloz, ihiz, z, 0, ldz, v, 0, ldv, u, 0, ldu, nv, wv, 0, ldwv, nh, wh, 0, ldwh); } - public void slaqr5(boolean wantt, boolean wantz, int kacc22, int n, int ktop, int kbot, int nshfts, float[] sr, int _sr_offset, float[] si, int _si_offset, float[] h, int _h_offset, int ldh, int iloz, int ihiz, float[] z, int _z_offset, int ldz, float[] v, int _v_offset, int ldv, float[] u, int _u_offset, int ldu, int nv, float[] wv, int _wv_offset, int ldwv, int nh, float[] wh, int _wh_offset, int ldwh) { + public void slaqr5(boolean wantt, boolean wantz, int kacc22, int n, int ktop, int kbot, int nshfts, float[] sr, int offsetsr, float[] si, int offsetsi, float[] h, int offseth, int ldh, int iloz, int ihiz, float[] z, int offsetz, int ldz, float[] v, int offsetv, int ldv, float[] u, int offsetu, int ldu, int nv, float[] wv, int offsetwv, int ldwv, int nh, float[] wh, int offsetwh, int ldwh) { //FIXME Add arguments check - slaqr5K(wantt, wantz, kacc22, n, ktop, kbot, nshfts, sr, _sr_offset, si, _si_offset, h, _h_offset, ldh, iloz, ihiz, z, _z_offset, ldz, v, _v_offset, ldv, u, _u_offset, ldu, nv, wv, _wv_offset, ldwv, nh, wh, _wh_offset, ldwh); + slaqr5K(wantt, wantz, kacc22, n, ktop, kbot, nshfts, sr, offsetsr, si, offsetsi, h, offseth, ldh, iloz, ihiz, z, offsetz, ldz, v, offsetv, ldv, u, offsetu, ldu, nv, wv, offsetwv, ldwv, nh, wh, offsetwh, ldwh); } - protected abstract void slaqr5K(boolean wantt, boolean wantz, int kacc22, int n, int ktop, int kbot, int nshfts, float[] sr, int _sr_offset, float[] si, int _si_offset, float[] h, int _h_offset, int ldh, int iloz, int ihiz, float[] z, int _z_offset, int ldz, float[] v, int _v_offset, int ldv, float[] u, int _u_offset, int ldu, int nv, float[] wv, int _wv_offset, int ldwv, int nh, float[] wh, int _wh_offset, int ldwh); + protected abstract void slaqr5K(boolean wantt, boolean wantz, int kacc22, int n, int ktop, int kbot, int nshfts, float[] sr, int offsetsr, float[] si, int offsetsi, float[] h, int offseth, int ldh, int iloz, int ihiz, float[] z, int offsetz, int ldz, float[] v, int offsetv, int ldv, float[] u, int offsetu, int ldu, int nv, float[] wv, int offsetwv, int ldwv, int nh, float[] wh, int offsetwh, int ldwh); public void slaqsb(String uplo, int n, int kd, float[] ab, int ldab, float[] s, float scond, float amax, org.netlib.util.StringW equed) { slaqsb(uplo, n, kd, ab, 0, ldab, s, 0, scond, amax, equed); } - public void slaqsb(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] s, int _s_offset, float scond, float amax, org.netlib.util.StringW equed) { + public void slaqsb(String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float[] s, int offsets, float scond, float amax, org.netlib.util.StringW equed) { //FIXME Add arguments check - slaqsbK(uplo, n, kd, ab, _ab_offset, ldab, s, _s_offset, scond, amax, equed); + slaqsbK(uplo, n, kd, ab, offsetab, ldab, s, offsets, scond, amax, equed); } - protected abstract void slaqsbK(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] s, int _s_offset, float scond, float amax, org.netlib.util.StringW equed); + protected abstract void slaqsbK(String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float[] s, int offsets, float scond, float amax, org.netlib.util.StringW equed); public void slaqsp(String uplo, int n, float[] ap, float[] s, float scond, float amax, org.netlib.util.StringW equed) { slaqsp(uplo, n, ap, 0, s, 0, scond, amax, equed); } - public void slaqsp(String uplo, int n, float[] ap, int _ap_offset, float[] s, int _s_offset, float scond, float amax, org.netlib.util.StringW equed) { + public void slaqsp(String uplo, int n, float[] ap, int offsetap, float[] s, int offsets, float scond, float amax, org.netlib.util.StringW equed) { //FIXME Add arguments check - slaqspK(uplo, n, ap, _ap_offset, s, _s_offset, scond, amax, equed); + slaqspK(uplo, n, ap, offsetap, s, offsets, scond, amax, equed); } - protected abstract void slaqspK(String uplo, int n, float[] ap, int _ap_offset, float[] s, int _s_offset, float scond, float amax, org.netlib.util.StringW equed); + protected abstract void slaqspK(String uplo, int n, float[] ap, int offsetap, float[] s, int offsets, float scond, float amax, org.netlib.util.StringW equed); public void slaqsy(String uplo, int n, float[] a, int lda, float[] s, float scond, float amax, org.netlib.util.StringW equed) { slaqsy(uplo, n, a, 0, lda, s, 0, scond, amax, equed); } - public void slaqsy(String uplo, int n, float[] a, int _a_offset, int lda, float[] s, int _s_offset, float scond, float amax, org.netlib.util.StringW equed) { + public void slaqsy(String uplo, int n, float[] a, int offseta, int lda, float[] s, int offsets, float scond, float amax, org.netlib.util.StringW equed) { //FIXME Add arguments check - slaqsyK(uplo, n, a, _a_offset, lda, s, _s_offset, scond, amax, equed); + slaqsyK(uplo, n, a, offseta, lda, s, offsets, scond, amax, equed); } - protected abstract void slaqsyK(String uplo, int n, float[] a, int _a_offset, int lda, float[] s, int _s_offset, float scond, float amax, org.netlib.util.StringW equed); + protected abstract void slaqsyK(String uplo, int n, float[] a, int offseta, int lda, float[] s, int offsets, float scond, float amax, org.netlib.util.StringW equed); public void slaqtr(boolean ltran, boolean lreal, int n, float[] t, int ldt, float[] b, float w, org.netlib.util.floatW scale, float[] x, float[] work, org.netlib.util.intW info) { slaqtr(ltran, lreal, n, t, 0, ldt, b, 0, w, scale, x, 0, work, 0, info); } - public void slaqtr(boolean ltran, boolean lreal, int n, float[] t, int _t_offset, int ldt, float[] b, int _b_offset, float w, org.netlib.util.floatW scale, float[] x, int _x_offset, float[] work, int _work_offset, org.netlib.util.intW info) { + public void slaqtr(boolean ltran, boolean lreal, int n, float[] t, int offsett, int ldt, float[] b, int offsetb, float w, org.netlib.util.floatW scale, float[] x, int offsetx, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - slaqtrK(ltran, lreal, n, t, _t_offset, ldt, b, _b_offset, w, scale, x, _x_offset, work, _work_offset, info); + slaqtrK(ltran, lreal, n, t, offsett, ldt, b, offsetb, w, scale, x, offsetx, work, offsetwork, info); } - protected abstract void slaqtrK(boolean ltran, boolean lreal, int n, float[] t, int _t_offset, int ldt, float[] b, int _b_offset, float w, org.netlib.util.floatW scale, float[] x, int _x_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void slaqtrK(boolean ltran, boolean lreal, int n, float[] t, int offsett, int ldt, float[] b, int offsetb, float w, org.netlib.util.floatW scale, float[] x, int offsetx, float[] work, int offsetwork, org.netlib.util.intW info); public void slar1v(int n, int b1, int bn, float lambda, float[] d, float[] l, float[] ld, float[] lld, float pivmin, float gaptol, float[] z, boolean wantnc, org.netlib.util.intW negcnt, org.netlib.util.floatW ztz, org.netlib.util.floatW mingma, org.netlib.util.intW r, int[] isuppz, org.netlib.util.floatW nrminv, org.netlib.util.floatW resid, org.netlib.util.floatW rqcorr, float[] work) { slar1v(n, b1, bn, lambda, d, 0, l, 0, ld, 0, lld, 0, pivmin, gaptol, z, 0, wantnc, negcnt, ztz, mingma, r, isuppz, 0, nrminv, resid, rqcorr, work, 0); } - public void slar1v(int n, int b1, int bn, float lambda, float[] d, int _d_offset, float[] l, int _l_offset, float[] ld, int _ld_offset, float[] lld, int _lld_offset, float pivmin, float gaptol, float[] z, int _z_offset, boolean wantnc, org.netlib.util.intW negcnt, org.netlib.util.floatW ztz, org.netlib.util.floatW mingma, org.netlib.util.intW r, int[] isuppz, int _isuppz_offset, org.netlib.util.floatW nrminv, org.netlib.util.floatW resid, org.netlib.util.floatW rqcorr, float[] work, int _work_offset) { + public void slar1v(int n, int b1, int bn, float lambda, float[] d, int offsetd, float[] l, int offsetl, float[] ld, int offsetld, float[] lld, int offsetlld, float pivmin, float gaptol, float[] z, int offsetz, boolean wantnc, org.netlib.util.intW negcnt, org.netlib.util.floatW ztz, org.netlib.util.floatW mingma, org.netlib.util.intW r, int[] isuppz, int offsetisuppz, org.netlib.util.floatW nrminv, org.netlib.util.floatW resid, org.netlib.util.floatW rqcorr, float[] work, int offsetwork) { //FIXME Add arguments check - slar1vK(n, b1, bn, lambda, d, _d_offset, l, _l_offset, ld, _ld_offset, lld, _lld_offset, pivmin, gaptol, z, _z_offset, wantnc, negcnt, ztz, mingma, r, isuppz, _isuppz_offset, nrminv, resid, rqcorr, work, _work_offset); + slar1vK(n, b1, bn, lambda, d, offsetd, l, offsetl, ld, offsetld, lld, offsetlld, pivmin, gaptol, z, offsetz, wantnc, negcnt, ztz, mingma, r, isuppz, offsetisuppz, nrminv, resid, rqcorr, work, offsetwork); } - protected abstract void slar1vK(int n, int b1, int bn, float lambda, float[] d, int _d_offset, float[] l, int _l_offset, float[] ld, int _ld_offset, float[] lld, int _lld_offset, float pivmin, float gaptol, float[] z, int _z_offset, boolean wantnc, org.netlib.util.intW negcnt, org.netlib.util.floatW ztz, org.netlib.util.floatW mingma, org.netlib.util.intW r, int[] isuppz, int _isuppz_offset, org.netlib.util.floatW nrminv, org.netlib.util.floatW resid, org.netlib.util.floatW rqcorr, float[] work, int _work_offset); + protected abstract void slar1vK(int n, int b1, int bn, float lambda, float[] d, int offsetd, float[] l, int offsetl, float[] ld, int offsetld, float[] lld, int offsetlld, float pivmin, float gaptol, float[] z, int offsetz, boolean wantnc, org.netlib.util.intW negcnt, org.netlib.util.floatW ztz, org.netlib.util.floatW mingma, org.netlib.util.intW r, int[] isuppz, int offsetisuppz, org.netlib.util.floatW nrminv, org.netlib.util.floatW resid, org.netlib.util.floatW rqcorr, float[] work, int offsetwork); public void slar2v(int n, float[] x, float[] y, float[] z, int incx, float[] c, float[] s, int incc) { slar2v(n, x, 0, y, 0, z, 0, incx, c, 0, s, 0, incc); } - public void slar2v(int n, float[] x, int _x_offset, float[] y, int _y_offset, float[] z, int _z_offset, int incx, float[] c, int _c_offset, float[] s, int _s_offset, int incc) { + public void slar2v(int n, float[] x, int offsetx, float[] y, int offsety, float[] z, int offsetz, int incx, float[] c, int offsetc, float[] s, int offsets, int incc) { //FIXME Add arguments check - slar2vK(n, x, _x_offset, y, _y_offset, z, _z_offset, incx, c, _c_offset, s, _s_offset, incc); + slar2vK(n, x, offsetx, y, offsety, z, offsetz, incx, c, offsetc, s, offsets, incc); } - protected abstract void slar2vK(int n, float[] x, int _x_offset, float[] y, int _y_offset, float[] z, int _z_offset, int incx, float[] c, int _c_offset, float[] s, int _s_offset, int incc); + protected abstract void slar2vK(int n, float[] x, int offsetx, float[] y, int offsety, float[] z, int offsetz, int incx, float[] c, int offsetc, float[] s, int offsets, int incc); public void slarf(String side, int m, int n, float[] v, int incv, float tau, float[] c, int Ldc, float[] work) { slarf(side, m, n, v, 0, incv, tau, c, 0, Ldc, work, 0); } - public void slarf(String side, int m, int n, float[] v, int _v_offset, int incv, float tau, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset) { + public void slarf(String side, int m, int n, float[] v, int offsetv, int incv, float tau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork) { //FIXME Add arguments check - slarfK(side, m, n, v, _v_offset, incv, tau, c, _c_offset, Ldc, work, _work_offset); + slarfK(side, m, n, v, offsetv, incv, tau, c, offsetc, Ldc, work, offsetwork); } - protected abstract void slarfK(String side, int m, int n, float[] v, int _v_offset, int incv, float tau, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset); + protected abstract void slarfK(String side, int m, int n, float[] v, int offsetv, int incv, float tau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork); public void slarfb(String side, String trans, String direct, String storev, int m, int n, int k, float[] v, int ldv, float[] t, int ldt, float[] c, int Ldc, float[] work, int ldwork) { slarfb(side, trans, direct, storev, m, n, k, v, 0, ldv, t, 0, ldt, c, 0, Ldc, work, 0, ldwork); } - public void slarfb(String side, String trans, String direct, String storev, int m, int n, int k, float[] v, int _v_offset, int ldv, float[] t, int _t_offset, int ldt, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int ldwork) { + public void slarfb(String side, String trans, String direct, String storev, int m, int n, int k, float[] v, int offsetv, int ldv, float[] t, int offsett, int ldt, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int ldwork) { //FIXME Add arguments check - slarfbK(side, trans, direct, storev, m, n, k, v, _v_offset, ldv, t, _t_offset, ldt, c, _c_offset, Ldc, work, _work_offset, ldwork); + slarfbK(side, trans, direct, storev, m, n, k, v, offsetv, ldv, t, offsett, ldt, c, offsetc, Ldc, work, offsetwork, ldwork); } - protected abstract void slarfbK(String side, String trans, String direct, String storev, int m, int n, int k, float[] v, int _v_offset, int ldv, float[] t, int _t_offset, int ldt, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int ldwork); + protected abstract void slarfbK(String side, String trans, String direct, String storev, int m, int n, int k, float[] v, int offsetv, int ldv, float[] t, int offsett, int ldt, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int ldwork); public void slarfg(int n, org.netlib.util.floatW alpha, float[] x, int incx, org.netlib.util.floatW tau) { slarfg(n, alpha, x, 0, incx, tau); } - public void slarfg(int n, org.netlib.util.floatW alpha, float[] x, int _x_offset, int incx, org.netlib.util.floatW tau) { + public void slarfg(int n, org.netlib.util.floatW alpha, float[] x, int offsetx, int incx, org.netlib.util.floatW tau) { //FIXME Add arguments check - slarfgK(n, alpha, x, _x_offset, incx, tau); + slarfgK(n, alpha, x, offsetx, incx, tau); } - protected abstract void slarfgK(int n, org.netlib.util.floatW alpha, float[] x, int _x_offset, int incx, org.netlib.util.floatW tau); + protected abstract void slarfgK(int n, org.netlib.util.floatW alpha, float[] x, int offsetx, int incx, org.netlib.util.floatW tau); public void slarft(String direct, String storev, int n, int k, float[] v, int ldv, float[] tau, float[] t, int ldt) { slarft(direct, storev, n, k, v, 0, ldv, tau, 0, t, 0, ldt); } - public void slarft(String direct, String storev, int n, int k, float[] v, int _v_offset, int ldv, float[] tau, int _tau_offset, float[] t, int _t_offset, int ldt) { + public void slarft(String direct, String storev, int n, int k, float[] v, int offsetv, int ldv, float[] tau, int offsettau, float[] t, int offsett, int ldt) { //FIXME Add arguments check - slarftK(direct, storev, n, k, v, _v_offset, ldv, tau, _tau_offset, t, _t_offset, ldt); + slarftK(direct, storev, n, k, v, offsetv, ldv, tau, offsettau, t, offsett, ldt); } - protected abstract void slarftK(String direct, String storev, int n, int k, float[] v, int _v_offset, int ldv, float[] tau, int _tau_offset, float[] t, int _t_offset, int ldt); + protected abstract void slarftK(String direct, String storev, int n, int k, float[] v, int offsetv, int ldv, float[] tau, int offsettau, float[] t, int offsett, int ldt); public void slarfx(String side, int m, int n, float[] v, float tau, float[] c, int Ldc, float[] work) { slarfx(side, m, n, v, 0, tau, c, 0, Ldc, work, 0); } - public void slarfx(String side, int m, int n, float[] v, int _v_offset, float tau, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset) { + public void slarfx(String side, int m, int n, float[] v, int offsetv, float tau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork) { //FIXME Add arguments check - slarfxK(side, m, n, v, _v_offset, tau, c, _c_offset, Ldc, work, _work_offset); + slarfxK(side, m, n, v, offsetv, tau, c, offsetc, Ldc, work, offsetwork); } - protected abstract void slarfxK(String side, int m, int n, float[] v, int _v_offset, float tau, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset); + protected abstract void slarfxK(String side, int m, int n, float[] v, int offsetv, float tau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork); public void slargv(int n, float[] x, int incx, float[] y, int incy, float[] c, int incc) { slargv(n, x, 0, incx, y, 0, incy, c, 0, incc); } - public void slargv(int n, float[] x, int _x_offset, int incx, float[] y, int _y_offset, int incy, float[] c, int _c_offset, int incc) { + public void slargv(int n, float[] x, int offsetx, int incx, float[] y, int offsety, int incy, float[] c, int offsetc, int incc) { //FIXME Add arguments check - slargvK(n, x, _x_offset, incx, y, _y_offset, incy, c, _c_offset, incc); + slargvK(n, x, offsetx, incx, y, offsety, incy, c, offsetc, incc); } - protected abstract void slargvK(int n, float[] x, int _x_offset, int incx, float[] y, int _y_offset, int incy, float[] c, int _c_offset, int incc); + protected abstract void slargvK(int n, float[] x, int offsetx, int incx, float[] y, int offsety, int incy, float[] c, int offsetc, int incc); public void slarnv(int idist, int[] iseed, int n, float[] x) { slarnv(idist, iseed, 0, n, x, 0); } - public void slarnv(int idist, int[] iseed, int _iseed_offset, int n, float[] x, int _x_offset) { + public void slarnv(int idist, int[] iseed, int offsetiseed, int n, float[] x, int offsetx) { //FIXME Add arguments check - slarnvK(idist, iseed, _iseed_offset, n, x, _x_offset); + slarnvK(idist, iseed, offsetiseed, n, x, offsetx); } - protected abstract void slarnvK(int idist, int[] iseed, int _iseed_offset, int n, float[] x, int _x_offset); + protected abstract void slarnvK(int idist, int[] iseed, int offsetiseed, int n, float[] x, int offsetx); public void slarra(int n, float[] d, float[] e, float[] e2, float spltol, float tnrm, org.netlib.util.intW nsplit, int[] isplit, org.netlib.util.intW info) { slarra(n, d, 0, e, 0, e2, 0, spltol, tnrm, nsplit, isplit, 0, info); } - public void slarra(int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] e2, int _e2_offset, float spltol, float tnrm, org.netlib.util.intW nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW info) { + public void slarra(int n, float[] d, int offsetd, float[] e, int offsete, float[] e2, int offsete2, float spltol, float tnrm, org.netlib.util.intW nsplit, int[] isplit, int offsetisplit, org.netlib.util.intW info) { //FIXME Add arguments check - slarraK(n, d, _d_offset, e, _e_offset, e2, _e2_offset, spltol, tnrm, nsplit, isplit, _isplit_offset, info); + slarraK(n, d, offsetd, e, offsete, e2, offsete2, spltol, tnrm, nsplit, isplit, offsetisplit, info); } - protected abstract void slarraK(int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] e2, int _e2_offset, float spltol, float tnrm, org.netlib.util.intW nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW info); + protected abstract void slarraK(int n, float[] d, int offsetd, float[] e, int offsete, float[] e2, int offsete2, float spltol, float tnrm, org.netlib.util.intW nsplit, int[] isplit, int offsetisplit, org.netlib.util.intW info); public void slarrb(int n, float[] d, float[] lld, int ifirst, int ilast, float rtol1, float rtol2, int offset, float[] w, float[] wgap, float[] werr, float[] work, int[] iwork, float pivmin, float spdiam, int twist, org.netlib.util.intW info) { slarrb(n, d, 0, lld, 0, ifirst, ilast, rtol1, rtol2, offset, w, 0, wgap, 0, werr, 0, work, 0, iwork, 0, pivmin, spdiam, twist, info); } - public void slarrb(int n, float[] d, int _d_offset, float[] lld, int _lld_offset, int ifirst, int ilast, float rtol1, float rtol2, int offset, float[] w, int _w_offset, float[] wgap, int _wgap_offset, float[] werr, int _werr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, float pivmin, float spdiam, int twist, org.netlib.util.intW info) { + public void slarrb(int n, float[] d, int offsetd, float[] lld, int offsetlld, int ifirst, int ilast, float rtol1, float rtol2, int offset, float[] w, int offsetw, float[] wgap, int offsetwgap, float[] werr, int offsetwerr, float[] work, int offsetwork, int[] iwork, int offsetiwork, float pivmin, float spdiam, int twist, org.netlib.util.intW info) { //FIXME Add arguments check - slarrbK(n, d, _d_offset, lld, _lld_offset, ifirst, ilast, rtol1, rtol2, offset, w, _w_offset, wgap, _wgap_offset, werr, _werr_offset, work, _work_offset, iwork, _iwork_offset, pivmin, spdiam, twist, info); + slarrbK(n, d, offsetd, lld, offsetlld, ifirst, ilast, rtol1, rtol2, offset, w, offsetw, wgap, offsetwgap, werr, offsetwerr, work, offsetwork, iwork, offsetiwork, pivmin, spdiam, twist, info); } - protected abstract void slarrbK(int n, float[] d, int _d_offset, float[] lld, int _lld_offset, int ifirst, int ilast, float rtol1, float rtol2, int offset, float[] w, int _w_offset, float[] wgap, int _wgap_offset, float[] werr, int _werr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, float pivmin, float spdiam, int twist, org.netlib.util.intW info); + protected abstract void slarrbK(int n, float[] d, int offsetd, float[] lld, int offsetlld, int ifirst, int ilast, float rtol1, float rtol2, int offset, float[] w, int offsetw, float[] wgap, int offsetwgap, float[] werr, int offsetwerr, float[] work, int offsetwork, int[] iwork, int offsetiwork, float pivmin, float spdiam, int twist, org.netlib.util.intW info); public void slarrc(String jobt, int n, float vl, float vu, float[] d, float[] e, float pivmin, org.netlib.util.intW eigcnt, org.netlib.util.intW lcnt, org.netlib.util.intW rcnt, org.netlib.util.intW info) { slarrc(jobt, n, vl, vu, d, 0, e, 0, pivmin, eigcnt, lcnt, rcnt, info); } - public void slarrc(String jobt, int n, float vl, float vu, float[] d, int _d_offset, float[] e, int _e_offset, float pivmin, org.netlib.util.intW eigcnt, org.netlib.util.intW lcnt, org.netlib.util.intW rcnt, org.netlib.util.intW info) { + public void slarrc(String jobt, int n, float vl, float vu, float[] d, int offsetd, float[] e, int offsete, float pivmin, org.netlib.util.intW eigcnt, org.netlib.util.intW lcnt, org.netlib.util.intW rcnt, org.netlib.util.intW info) { //FIXME Add arguments check - slarrcK(jobt, n, vl, vu, d, _d_offset, e, _e_offset, pivmin, eigcnt, lcnt, rcnt, info); + slarrcK(jobt, n, vl, vu, d, offsetd, e, offsete, pivmin, eigcnt, lcnt, rcnt, info); } - protected abstract void slarrcK(String jobt, int n, float vl, float vu, float[] d, int _d_offset, float[] e, int _e_offset, float pivmin, org.netlib.util.intW eigcnt, org.netlib.util.intW lcnt, org.netlib.util.intW rcnt, org.netlib.util.intW info); + protected abstract void slarrcK(String jobt, int n, float vl, float vu, float[] d, int offsetd, float[] e, int offsete, float pivmin, org.netlib.util.intW eigcnt, org.netlib.util.intW lcnt, org.netlib.util.intW rcnt, org.netlib.util.intW info); public void slarrd(String range, String order, int n, float vl, float vu, int il, int iu, float[] gers, float reltol, float[] d, float[] e, float[] e2, float pivmin, int nsplit, int[] isplit, org.netlib.util.intW m, float[] w, float[] werr, org.netlib.util.floatW wl, org.netlib.util.floatW wu, int[] iblock, int[] indexw, float[] work, int[] iwork, org.netlib.util.intW info) { slarrd(range, order, n, vl, vu, il, iu, gers, 0, reltol, d, 0, e, 0, e2, 0, pivmin, nsplit, isplit, 0, m, w, 0, werr, 0, wl, wu, iblock, 0, indexw, 0, work, 0, iwork, 0, info); } - public void slarrd(String range, String order, int n, float vl, float vu, int il, int iu, float[] gers, int _gers_offset, float reltol, float[] d, int _d_offset, float[] e, int _e_offset, float[] e2, int _e2_offset, float pivmin, int nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW m, float[] w, int _w_offset, float[] werr, int _werr_offset, org.netlib.util.floatW wl, org.netlib.util.floatW wu, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void slarrd(String range, String order, int n, float vl, float vu, int il, int iu, float[] gers, int offsetgers, float reltol, float[] d, int offsetd, float[] e, int offsete, float[] e2, int offsete2, float pivmin, int nsplit, int[] isplit, int offsetisplit, org.netlib.util.intW m, float[] w, int offsetw, float[] werr, int offsetwerr, org.netlib.util.floatW wl, org.netlib.util.floatW wu, int[] iblock, int offsetiblock, int[] indexw, int offsetindexw, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - slarrdK(range, order, n, vl, vu, il, iu, gers, _gers_offset, reltol, d, _d_offset, e, _e_offset, e2, _e2_offset, pivmin, nsplit, isplit, _isplit_offset, m, w, _w_offset, werr, _werr_offset, wl, wu, iblock, _iblock_offset, indexw, _indexw_offset, work, _work_offset, iwork, _iwork_offset, info); + slarrdK(range, order, n, vl, vu, il, iu, gers, offsetgers, reltol, d, offsetd, e, offsete, e2, offsete2, pivmin, nsplit, isplit, offsetisplit, m, w, offsetw, werr, offsetwerr, wl, wu, iblock, offsetiblock, indexw, offsetindexw, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void slarrdK(String range, String order, int n, float vl, float vu, int il, int iu, float[] gers, int _gers_offset, float reltol, float[] d, int _d_offset, float[] e, int _e_offset, float[] e2, int _e2_offset, float pivmin, int nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW m, float[] w, int _w_offset, float[] werr, int _werr_offset, org.netlib.util.floatW wl, org.netlib.util.floatW wu, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void slarrdK(String range, String order, int n, float vl, float vu, int il, int iu, float[] gers, int offsetgers, float reltol, float[] d, int offsetd, float[] e, int offsete, float[] e2, int offsete2, float pivmin, int nsplit, int[] isplit, int offsetisplit, org.netlib.util.intW m, float[] w, int offsetw, float[] werr, int offsetwerr, org.netlib.util.floatW wl, org.netlib.util.floatW wu, int[] iblock, int offsetiblock, int[] indexw, int offsetindexw, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void slarre(String range, int n, org.netlib.util.floatW vl, org.netlib.util.floatW vu, int il, int iu, float[] d, float[] e, float[] e2, float rtol1, float rtol2, float spltol, org.netlib.util.intW nsplit, int[] isplit, org.netlib.util.intW m, float[] w, float[] werr, float[] wgap, int[] iblock, int[] indexw, float[] gers, org.netlib.util.floatW pivmin, float[] work, int[] iwork, org.netlib.util.intW info) { slarre(range, n, vl, vu, il, iu, d, 0, e, 0, e2, 0, rtol1, rtol2, spltol, nsplit, isplit, 0, m, w, 0, werr, 0, wgap, 0, iblock, 0, indexw, 0, gers, 0, pivmin, work, 0, iwork, 0, info); } - public void slarre(String range, int n, org.netlib.util.floatW vl, org.netlib.util.floatW vu, int il, int iu, float[] d, int _d_offset, float[] e, int _e_offset, float[] e2, int _e2_offset, float rtol1, float rtol2, float spltol, org.netlib.util.intW nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW m, float[] w, int _w_offset, float[] werr, int _werr_offset, float[] wgap, int _wgap_offset, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, float[] gers, int _gers_offset, org.netlib.util.floatW pivmin, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void slarre(String range, int n, org.netlib.util.floatW vl, org.netlib.util.floatW vu, int il, int iu, float[] d, int offsetd, float[] e, int offsete, float[] e2, int offsete2, float rtol1, float rtol2, float spltol, org.netlib.util.intW nsplit, int[] isplit, int offsetisplit, org.netlib.util.intW m, float[] w, int offsetw, float[] werr, int offsetwerr, float[] wgap, int offsetwgap, int[] iblock, int offsetiblock, int[] indexw, int offsetindexw, float[] gers, int offsetgers, org.netlib.util.floatW pivmin, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - slarreK(range, n, vl, vu, il, iu, d, _d_offset, e, _e_offset, e2, _e2_offset, rtol1, rtol2, spltol, nsplit, isplit, _isplit_offset, m, w, _w_offset, werr, _werr_offset, wgap, _wgap_offset, iblock, _iblock_offset, indexw, _indexw_offset, gers, _gers_offset, pivmin, work, _work_offset, iwork, _iwork_offset, info); + slarreK(range, n, vl, vu, il, iu, d, offsetd, e, offsete, e2, offsete2, rtol1, rtol2, spltol, nsplit, isplit, offsetisplit, m, w, offsetw, werr, offsetwerr, wgap, offsetwgap, iblock, offsetiblock, indexw, offsetindexw, gers, offsetgers, pivmin, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void slarreK(String range, int n, org.netlib.util.floatW vl, org.netlib.util.floatW vu, int il, int iu, float[] d, int _d_offset, float[] e, int _e_offset, float[] e2, int _e2_offset, float rtol1, float rtol2, float spltol, org.netlib.util.intW nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW m, float[] w, int _w_offset, float[] werr, int _werr_offset, float[] wgap, int _wgap_offset, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, float[] gers, int _gers_offset, org.netlib.util.floatW pivmin, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void slarreK(String range, int n, org.netlib.util.floatW vl, org.netlib.util.floatW vu, int il, int iu, float[] d, int offsetd, float[] e, int offsete, float[] e2, int offsete2, float rtol1, float rtol2, float spltol, org.netlib.util.intW nsplit, int[] isplit, int offsetisplit, org.netlib.util.intW m, float[] w, int offsetw, float[] werr, int offsetwerr, float[] wgap, int offsetwgap, int[] iblock, int offsetiblock, int[] indexw, int offsetindexw, float[] gers, int offsetgers, org.netlib.util.floatW pivmin, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void slarrf(int n, float[] d, float[] l, float[] ld, int clstrt, int clend, float[] w, float[] wgap, float[] werr, float spdiam, float clgapl, float clgapr, float pivmin, org.netlib.util.floatW sigma, float[] dplus, float[] lplus, float[] work, org.netlib.util.intW info) { slarrf(n, d, 0, l, 0, ld, 0, clstrt, clend, w, 0, wgap, 0, werr, 0, spdiam, clgapl, clgapr, pivmin, sigma, dplus, 0, lplus, 0, work, 0, info); } - public void slarrf(int n, float[] d, int _d_offset, float[] l, int _l_offset, float[] ld, int _ld_offset, int clstrt, int clend, float[] w, int _w_offset, float[] wgap, int _wgap_offset, float[] werr, int _werr_offset, float spdiam, float clgapl, float clgapr, float pivmin, org.netlib.util.floatW sigma, float[] dplus, int _dplus_offset, float[] lplus, int _lplus_offset, float[] work, int _work_offset, org.netlib.util.intW info) { + public void slarrf(int n, float[] d, int offsetd, float[] l, int offsetl, float[] ld, int offsetld, int clstrt, int clend, float[] w, int offsetw, float[] wgap, int offsetwgap, float[] werr, int offsetwerr, float spdiam, float clgapl, float clgapr, float pivmin, org.netlib.util.floatW sigma, float[] dplus, int offsetdplus, float[] lplus, int offsetlplus, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - slarrfK(n, d, _d_offset, l, _l_offset, ld, _ld_offset, clstrt, clend, w, _w_offset, wgap, _wgap_offset, werr, _werr_offset, spdiam, clgapl, clgapr, pivmin, sigma, dplus, _dplus_offset, lplus, _lplus_offset, work, _work_offset, info); + slarrfK(n, d, offsetd, l, offsetl, ld, offsetld, clstrt, clend, w, offsetw, wgap, offsetwgap, werr, offsetwerr, spdiam, clgapl, clgapr, pivmin, sigma, dplus, offsetdplus, lplus, offsetlplus, work, offsetwork, info); } - protected abstract void slarrfK(int n, float[] d, int _d_offset, float[] l, int _l_offset, float[] ld, int _ld_offset, int clstrt, int clend, float[] w, int _w_offset, float[] wgap, int _wgap_offset, float[] werr, int _werr_offset, float spdiam, float clgapl, float clgapr, float pivmin, org.netlib.util.floatW sigma, float[] dplus, int _dplus_offset, float[] lplus, int _lplus_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void slarrfK(int n, float[] d, int offsetd, float[] l, int offsetl, float[] ld, int offsetld, int clstrt, int clend, float[] w, int offsetw, float[] wgap, int offsetwgap, float[] werr, int offsetwerr, float spdiam, float clgapl, float clgapr, float pivmin, org.netlib.util.floatW sigma, float[] dplus, int offsetdplus, float[] lplus, int offsetlplus, float[] work, int offsetwork, org.netlib.util.intW info); public void slarrj(int n, float[] d, float[] e2, int ifirst, int ilast, float rtol, int offset, float[] w, float[] werr, float[] work, int[] iwork, float pivmin, float spdiam, org.netlib.util.intW info) { slarrj(n, d, 0, e2, 0, ifirst, ilast, rtol, offset, w, 0, werr, 0, work, 0, iwork, 0, pivmin, spdiam, info); } - public void slarrj(int n, float[] d, int _d_offset, float[] e2, int _e2_offset, int ifirst, int ilast, float rtol, int offset, float[] w, int _w_offset, float[] werr, int _werr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, float pivmin, float spdiam, org.netlib.util.intW info) { + public void slarrj(int n, float[] d, int offsetd, float[] e2, int offsete2, int ifirst, int ilast, float rtol, int offset, float[] w, int offsetw, float[] werr, int offsetwerr, float[] work, int offsetwork, int[] iwork, int offsetiwork, float pivmin, float spdiam, org.netlib.util.intW info) { //FIXME Add arguments check - slarrjK(n, d, _d_offset, e2, _e2_offset, ifirst, ilast, rtol, offset, w, _w_offset, werr, _werr_offset, work, _work_offset, iwork, _iwork_offset, pivmin, spdiam, info); + slarrjK(n, d, offsetd, e2, offsete2, ifirst, ilast, rtol, offset, w, offsetw, werr, offsetwerr, work, offsetwork, iwork, offsetiwork, pivmin, spdiam, info); } - protected abstract void slarrjK(int n, float[] d, int _d_offset, float[] e2, int _e2_offset, int ifirst, int ilast, float rtol, int offset, float[] w, int _w_offset, float[] werr, int _werr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, float pivmin, float spdiam, org.netlib.util.intW info); + protected abstract void slarrjK(int n, float[] d, int offsetd, float[] e2, int offsete2, int ifirst, int ilast, float rtol, int offset, float[] w, int offsetw, float[] werr, int offsetwerr, float[] work, int offsetwork, int[] iwork, int offsetiwork, float pivmin, float spdiam, org.netlib.util.intW info); public void slarrk(int n, int iw, float gl, float gu, float[] d, float[] e2, float pivmin, float reltol, org.netlib.util.floatW w, org.netlib.util.floatW werr, org.netlib.util.intW info) { slarrk(n, iw, gl, gu, d, 0, e2, 0, pivmin, reltol, w, werr, info); } - public void slarrk(int n, int iw, float gl, float gu, float[] d, int _d_offset, float[] e2, int _e2_offset, float pivmin, float reltol, org.netlib.util.floatW w, org.netlib.util.floatW werr, org.netlib.util.intW info) { + public void slarrk(int n, int iw, float gl, float gu, float[] d, int offsetd, float[] e2, int offsete2, float pivmin, float reltol, org.netlib.util.floatW w, org.netlib.util.floatW werr, org.netlib.util.intW info) { //FIXME Add arguments check - slarrkK(n, iw, gl, gu, d, _d_offset, e2, _e2_offset, pivmin, reltol, w, werr, info); + slarrkK(n, iw, gl, gu, d, offsetd, e2, offsete2, pivmin, reltol, w, werr, info); } - protected abstract void slarrkK(int n, int iw, float gl, float gu, float[] d, int _d_offset, float[] e2, int _e2_offset, float pivmin, float reltol, org.netlib.util.floatW w, org.netlib.util.floatW werr, org.netlib.util.intW info); + protected abstract void slarrkK(int n, int iw, float gl, float gu, float[] d, int offsetd, float[] e2, int offsete2, float pivmin, float reltol, org.netlib.util.floatW w, org.netlib.util.floatW werr, org.netlib.util.intW info); public void slarrr(int n, float[] d, float[] e, org.netlib.util.intW info) { slarrr(n, d, 0, e, 0, info); } - public void slarrr(int n, float[] d, int _d_offset, float[] e, int _e_offset, org.netlib.util.intW info) { + public void slarrr(int n, float[] d, int offsetd, float[] e, int offsete, org.netlib.util.intW info) { //FIXME Add arguments check - slarrrK(n, d, _d_offset, e, _e_offset, info); + slarrrK(n, d, offsetd, e, offsete, info); } - protected abstract void slarrrK(int n, float[] d, int _d_offset, float[] e, int _e_offset, org.netlib.util.intW info); + protected abstract void slarrrK(int n, float[] d, int offsetd, float[] e, int offsete, org.netlib.util.intW info); public void slarrv(int n, float vl, float vu, float[] d, float[] l, float pivmin, int[] isplit, int m, int dol, int dou, float minrgp, org.netlib.util.floatW rtol1, org.netlib.util.floatW rtol2, float[] w, float[] werr, float[] wgap, int[] iblock, int[] indexw, float[] gers, float[] z, int ldz, int[] isuppz, float[] work, int[] iwork, org.netlib.util.intW info) { slarrv(n, vl, vu, d, 0, l, 0, pivmin, isplit, 0, m, dol, dou, minrgp, rtol1, rtol2, w, 0, werr, 0, wgap, 0, iblock, 0, indexw, 0, gers, 0, z, 0, ldz, isuppz, 0, work, 0, iwork, 0, info); } - public void slarrv(int n, float vl, float vu, float[] d, int _d_offset, float[] l, int _l_offset, float pivmin, int[] isplit, int _isplit_offset, int m, int dol, int dou, float minrgp, org.netlib.util.floatW rtol1, org.netlib.util.floatW rtol2, float[] w, int _w_offset, float[] werr, int _werr_offset, float[] wgap, int _wgap_offset, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, float[] gers, int _gers_offset, float[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void slarrv(int n, float vl, float vu, float[] d, int offsetd, float[] l, int offsetl, float pivmin, int[] isplit, int offsetisplit, int m, int dol, int dou, float minrgp, org.netlib.util.floatW rtol1, org.netlib.util.floatW rtol2, float[] w, int offsetw, float[] werr, int offsetwerr, float[] wgap, int offsetwgap, int[] iblock, int offsetiblock, int[] indexw, int offsetindexw, float[] gers, int offsetgers, float[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - slarrvK(n, vl, vu, d, _d_offset, l, _l_offset, pivmin, isplit, _isplit_offset, m, dol, dou, minrgp, rtol1, rtol2, w, _w_offset, werr, _werr_offset, wgap, _wgap_offset, iblock, _iblock_offset, indexw, _indexw_offset, gers, _gers_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, iwork, _iwork_offset, info); + slarrvK(n, vl, vu, d, offsetd, l, offsetl, pivmin, isplit, offsetisplit, m, dol, dou, minrgp, rtol1, rtol2, w, offsetw, werr, offsetwerr, wgap, offsetwgap, iblock, offsetiblock, indexw, offsetindexw, gers, offsetgers, z, offsetz, ldz, isuppz, offsetisuppz, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void slarrvK(int n, float vl, float vu, float[] d, int _d_offset, float[] l, int _l_offset, float pivmin, int[] isplit, int _isplit_offset, int m, int dol, int dou, float minrgp, org.netlib.util.floatW rtol1, org.netlib.util.floatW rtol2, float[] w, int _w_offset, float[] werr, int _werr_offset, float[] wgap, int _wgap_offset, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, float[] gers, int _gers_offset, float[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void slarrvK(int n, float vl, float vu, float[] d, int offsetd, float[] l, int offsetl, float pivmin, int[] isplit, int offsetisplit, int m, int dol, int dou, float minrgp, org.netlib.util.floatW rtol1, org.netlib.util.floatW rtol2, float[] w, int offsetw, float[] werr, int offsetwerr, float[] wgap, int offsetwgap, int[] iblock, int offsetiblock, int[] indexw, int offsetindexw, float[] gers, int offsetgers, float[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void slartg(float f, float g, org.netlib.util.floatW cs, org.netlib.util.floatW sn, org.netlib.util.floatW r) { slartgK(f, g, cs, sn, r); @@ -5641,56 +5641,56 @@ public void slartv(int n, float[] x, int incx, float[] y, int incy, float[] c, f slartv(n, x, 0, incx, y, 0, incy, c, 0, s, 0, incc); } - public void slartv(int n, float[] x, int _x_offset, int incx, float[] y, int _y_offset, int incy, float[] c, int _c_offset, float[] s, int _s_offset, int incc) { + public void slartv(int n, float[] x, int offsetx, int incx, float[] y, int offsety, int incy, float[] c, int offsetc, float[] s, int offsets, int incc) { //FIXME Add arguments check - slartvK(n, x, _x_offset, incx, y, _y_offset, incy, c, _c_offset, s, _s_offset, incc); + slartvK(n, x, offsetx, incx, y, offsety, incy, c, offsetc, s, offsets, incc); } - protected abstract void slartvK(int n, float[] x, int _x_offset, int incx, float[] y, int _y_offset, int incy, float[] c, int _c_offset, float[] s, int _s_offset, int incc); + protected abstract void slartvK(int n, float[] x, int offsetx, int incx, float[] y, int offsety, int incy, float[] c, int offsetc, float[] s, int offsets, int incc); public void slaruv(int[] iseed, int n, float[] x) { slaruv(iseed, 0, n, x, 0); } - public void slaruv(int[] iseed, int _iseed_offset, int n, float[] x, int _x_offset) { + public void slaruv(int[] iseed, int offsetiseed, int n, float[] x, int offsetx) { //FIXME Add arguments check - slaruvK(iseed, _iseed_offset, n, x, _x_offset); + slaruvK(iseed, offsetiseed, n, x, offsetx); } - protected abstract void slaruvK(int[] iseed, int _iseed_offset, int n, float[] x, int _x_offset); + protected abstract void slaruvK(int[] iseed, int offsetiseed, int n, float[] x, int offsetx); public void slarz(String side, int m, int n, int l, float[] v, int incv, float tau, float[] c, int Ldc, float[] work) { slarz(side, m, n, l, v, 0, incv, tau, c, 0, Ldc, work, 0); } - public void slarz(String side, int m, int n, int l, float[] v, int _v_offset, int incv, float tau, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset) { + public void slarz(String side, int m, int n, int l, float[] v, int offsetv, int incv, float tau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork) { //FIXME Add arguments check - slarzK(side, m, n, l, v, _v_offset, incv, tau, c, _c_offset, Ldc, work, _work_offset); + slarzK(side, m, n, l, v, offsetv, incv, tau, c, offsetc, Ldc, work, offsetwork); } - protected abstract void slarzK(String side, int m, int n, int l, float[] v, int _v_offset, int incv, float tau, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset); + protected abstract void slarzK(String side, int m, int n, int l, float[] v, int offsetv, int incv, float tau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork); public void slarzb(String side, String trans, String direct, String storev, int m, int n, int k, int l, float[] v, int ldv, float[] t, int ldt, float[] c, int Ldc, float[] work, int ldwork) { slarzb(side, trans, direct, storev, m, n, k, l, v, 0, ldv, t, 0, ldt, c, 0, Ldc, work, 0, ldwork); } - public void slarzb(String side, String trans, String direct, String storev, int m, int n, int k, int l, float[] v, int _v_offset, int ldv, float[] t, int _t_offset, int ldt, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int ldwork) { + public void slarzb(String side, String trans, String direct, String storev, int m, int n, int k, int l, float[] v, int offsetv, int ldv, float[] t, int offsett, int ldt, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int ldwork) { //FIXME Add arguments check - slarzbK(side, trans, direct, storev, m, n, k, l, v, _v_offset, ldv, t, _t_offset, ldt, c, _c_offset, Ldc, work, _work_offset, ldwork); + slarzbK(side, trans, direct, storev, m, n, k, l, v, offsetv, ldv, t, offsett, ldt, c, offsetc, Ldc, work, offsetwork, ldwork); } - protected abstract void slarzbK(String side, String trans, String direct, String storev, int m, int n, int k, int l, float[] v, int _v_offset, int ldv, float[] t, int _t_offset, int ldt, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int ldwork); + protected abstract void slarzbK(String side, String trans, String direct, String storev, int m, int n, int k, int l, float[] v, int offsetv, int ldv, float[] t, int offsett, int ldt, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int ldwork); public void slarzt(String direct, String storev, int n, int k, float[] v, int ldv, float[] tau, float[] t, int ldt) { slarzt(direct, storev, n, k, v, 0, ldv, tau, 0, t, 0, ldt); } - public void slarzt(String direct, String storev, int n, int k, float[] v, int _v_offset, int ldv, float[] tau, int _tau_offset, float[] t, int _t_offset, int ldt) { + public void slarzt(String direct, String storev, int n, int k, float[] v, int offsetv, int ldv, float[] tau, int offsettau, float[] t, int offsett, int ldt) { //FIXME Add arguments check - slarztK(direct, storev, n, k, v, _v_offset, ldv, tau, _tau_offset, t, _t_offset, ldt); + slarztK(direct, storev, n, k, v, offsetv, ldv, tau, offsettau, t, offsett, ldt); } - protected abstract void slarztK(String direct, String storev, int n, int k, float[] v, int _v_offset, int ldv, float[] tau, int _tau_offset, float[] t, int _t_offset, int ldt); + protected abstract void slarztK(String direct, String storev, int n, int k, float[] v, int offsetv, int ldv, float[] tau, int offsettau, float[] t, int offsett, int ldt); public void slas2(float f, float g, float h, org.netlib.util.floatW ssmin, org.netlib.util.floatW ssmax) { slas2K(f, g, h, ssmin, ssmax); @@ -5702,254 +5702,254 @@ public void slascl(String type, int kl, int ku, float cfrom, float cto, int m, i slascl(type, kl, ku, cfrom, cto, m, n, a, 0, lda, info); } - public void slascl(String type, int kl, int ku, float cfrom, float cto, int m, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info) { + public void slascl(String type, int kl, int ku, float cfrom, float cto, int m, int n, float[] a, int offseta, int lda, org.netlib.util.intW info) { //FIXME Add arguments check - slasclK(type, kl, ku, cfrom, cto, m, n, a, _a_offset, lda, info); + slasclK(type, kl, ku, cfrom, cto, m, n, a, offseta, lda, info); } - protected abstract void slasclK(String type, int kl, int ku, float cfrom, float cto, int m, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected abstract void slasclK(String type, int kl, int ku, float cfrom, float cto, int m, int n, float[] a, int offseta, int lda, org.netlib.util.intW info); public void slasd0(int n, int sqre, float[] d, float[] e, float[] u, int ldu, float[] vt, int ldvt, int smlsiz, int[] iwork, float[] work, org.netlib.util.intW info) { slasd0(n, sqre, d, 0, e, 0, u, 0, ldu, vt, 0, ldvt, smlsiz, iwork, 0, work, 0, info); } - public void slasd0(int n, int sqre, float[] d, int _d_offset, float[] e, int _e_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, int smlsiz, int[] iwork, int _iwork_offset, float[] work, int _work_offset, org.netlib.util.intW info) { + public void slasd0(int n, int sqre, float[] d, int offsetd, float[] e, int offsete, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int ldvt, int smlsiz, int[] iwork, int offsetiwork, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - slasd0K(n, sqre, d, _d_offset, e, _e_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, smlsiz, iwork, _iwork_offset, work, _work_offset, info); + slasd0K(n, sqre, d, offsetd, e, offsete, u, offsetu, ldu, vt, offsetvt, ldvt, smlsiz, iwork, offsetiwork, work, offsetwork, info); } - protected abstract void slasd0K(int n, int sqre, float[] d, int _d_offset, float[] e, int _e_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, int smlsiz, int[] iwork, int _iwork_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void slasd0K(int n, int sqre, float[] d, int offsetd, float[] e, int offsete, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int ldvt, int smlsiz, int[] iwork, int offsetiwork, float[] work, int offsetwork, org.netlib.util.intW info); public void slasd1(int nl, int nr, int sqre, float[] d, org.netlib.util.floatW alpha, org.netlib.util.floatW beta, float[] u, int ldu, float[] vt, int ldvt, int[] idxq, int[] iwork, float[] work, org.netlib.util.intW info) { slasd1(nl, nr, sqre, d, 0, alpha, beta, u, 0, ldu, vt, 0, ldvt, idxq, 0, iwork, 0, work, 0, info); } - public void slasd1(int nl, int nr, int sqre, float[] d, int _d_offset, org.netlib.util.floatW alpha, org.netlib.util.floatW beta, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, int[] idxq, int _idxq_offset, int[] iwork, int _iwork_offset, float[] work, int _work_offset, org.netlib.util.intW info) { + public void slasd1(int nl, int nr, int sqre, float[] d, int offsetd, org.netlib.util.floatW alpha, org.netlib.util.floatW beta, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int ldvt, int[] idxq, int offsetidxq, int[] iwork, int offsetiwork, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - slasd1K(nl, nr, sqre, d, _d_offset, alpha, beta, u, _u_offset, ldu, vt, _vt_offset, ldvt, idxq, _idxq_offset, iwork, _iwork_offset, work, _work_offset, info); + slasd1K(nl, nr, sqre, d, offsetd, alpha, beta, u, offsetu, ldu, vt, offsetvt, ldvt, idxq, offsetidxq, iwork, offsetiwork, work, offsetwork, info); } - protected abstract void slasd1K(int nl, int nr, int sqre, float[] d, int _d_offset, org.netlib.util.floatW alpha, org.netlib.util.floatW beta, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, int[] idxq, int _idxq_offset, int[] iwork, int _iwork_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void slasd1K(int nl, int nr, int sqre, float[] d, int offsetd, org.netlib.util.floatW alpha, org.netlib.util.floatW beta, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int ldvt, int[] idxq, int offsetidxq, int[] iwork, int offsetiwork, float[] work, int offsetwork, org.netlib.util.intW info); public void slasd2(int nl, int nr, int sqre, org.netlib.util.intW k, float[] d, float[] z, float alpha, float beta, float[] u, int ldu, float[] vt, int ldvt, float[] dsigma, float[] u2, int ldu2, float[] vt2, int ldvt2, int[] idxp, int[] idx, int[] idxc, int[] idxq, int[] coltyp, org.netlib.util.intW info) { slasd2(nl, nr, sqre, k, d, 0, z, 0, alpha, beta, u, 0, ldu, vt, 0, ldvt, dsigma, 0, u2, 0, ldu2, vt2, 0, ldvt2, idxp, 0, idx, 0, idxc, 0, idxq, 0, coltyp, 0, info); } - public void slasd2(int nl, int nr, int sqre, org.netlib.util.intW k, float[] d, int _d_offset, float[] z, int _z_offset, float alpha, float beta, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, float[] dsigma, int _dsigma_offset, float[] u2, int _u2_offset, int ldu2, float[] vt2, int _vt2_offset, int ldvt2, int[] idxp, int _idxp_offset, int[] idx, int _idx_offset, int[] idxc, int _idxc_offset, int[] idxq, int _idxq_offset, int[] coltyp, int _coltyp_offset, org.netlib.util.intW info) { + public void slasd2(int nl, int nr, int sqre, org.netlib.util.intW k, float[] d, int offsetd, float[] z, int offsetz, float alpha, float beta, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int ldvt, float[] dsigma, int offsetdsigma, float[] u2, int offsetu2, int ldu2, float[] vt2, int offsetvt2, int ldvt2, int[] idxp, int offsetidxp, int[] idx, int offsetidx, int[] idxc, int offsetidxc, int[] idxq, int offsetidxq, int[] coltyp, int offsetcoltyp, org.netlib.util.intW info) { //FIXME Add arguments check - slasd2K(nl, nr, sqre, k, d, _d_offset, z, _z_offset, alpha, beta, u, _u_offset, ldu, vt, _vt_offset, ldvt, dsigma, _dsigma_offset, u2, _u2_offset, ldu2, vt2, _vt2_offset, ldvt2, idxp, _idxp_offset, idx, _idx_offset, idxc, _idxc_offset, idxq, _idxq_offset, coltyp, _coltyp_offset, info); + slasd2K(nl, nr, sqre, k, d, offsetd, z, offsetz, alpha, beta, u, offsetu, ldu, vt, offsetvt, ldvt, dsigma, offsetdsigma, u2, offsetu2, ldu2, vt2, offsetvt2, ldvt2, idxp, offsetidxp, idx, offsetidx, idxc, offsetidxc, idxq, offsetidxq, coltyp, offsetcoltyp, info); } - protected abstract void slasd2K(int nl, int nr, int sqre, org.netlib.util.intW k, float[] d, int _d_offset, float[] z, int _z_offset, float alpha, float beta, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, float[] dsigma, int _dsigma_offset, float[] u2, int _u2_offset, int ldu2, float[] vt2, int _vt2_offset, int ldvt2, int[] idxp, int _idxp_offset, int[] idx, int _idx_offset, int[] idxc, int _idxc_offset, int[] idxq, int _idxq_offset, int[] coltyp, int _coltyp_offset, org.netlib.util.intW info); + protected abstract void slasd2K(int nl, int nr, int sqre, org.netlib.util.intW k, float[] d, int offsetd, float[] z, int offsetz, float alpha, float beta, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int ldvt, float[] dsigma, int offsetdsigma, float[] u2, int offsetu2, int ldu2, float[] vt2, int offsetvt2, int ldvt2, int[] idxp, int offsetidxp, int[] idx, int offsetidx, int[] idxc, int offsetidxc, int[] idxq, int offsetidxq, int[] coltyp, int offsetcoltyp, org.netlib.util.intW info); public void slasd3(int nl, int nr, int sqre, int k, float[] d, float[] q, int ldq, float[] dsigma, float[] u, int ldu, float[] u2, int ldu2, float[] vt, int ldvt, float[] vt2, int ldvt2, int[] idxc, int[] ctot, float[] z, org.netlib.util.intW info) { slasd3(nl, nr, sqre, k, d, 0, q, 0, ldq, dsigma, 0, u, 0, ldu, u2, 0, ldu2, vt, 0, ldvt, vt2, 0, ldvt2, idxc, 0, ctot, 0, z, 0, info); } - public void slasd3(int nl, int nr, int sqre, int k, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, float[] dsigma, int _dsigma_offset, float[] u, int _u_offset, int ldu, float[] u2, int _u2_offset, int ldu2, float[] vt, int _vt_offset, int ldvt, float[] vt2, int _vt2_offset, int ldvt2, int[] idxc, int _idxc_offset, int[] ctot, int _ctot_offset, float[] z, int _z_offset, org.netlib.util.intW info) { + public void slasd3(int nl, int nr, int sqre, int k, float[] d, int offsetd, float[] q, int offsetq, int ldq, float[] dsigma, int offsetdsigma, float[] u, int offsetu, int ldu, float[] u2, int offsetu2, int ldu2, float[] vt, int offsetvt, int ldvt, float[] vt2, int offsetvt2, int ldvt2, int[] idxc, int offsetidxc, int[] ctot, int offsetctot, float[] z, int offsetz, org.netlib.util.intW info) { //FIXME Add arguments check - slasd3K(nl, nr, sqre, k, d, _d_offset, q, _q_offset, ldq, dsigma, _dsigma_offset, u, _u_offset, ldu, u2, _u2_offset, ldu2, vt, _vt_offset, ldvt, vt2, _vt2_offset, ldvt2, idxc, _idxc_offset, ctot, _ctot_offset, z, _z_offset, info); + slasd3K(nl, nr, sqre, k, d, offsetd, q, offsetq, ldq, dsigma, offsetdsigma, u, offsetu, ldu, u2, offsetu2, ldu2, vt, offsetvt, ldvt, vt2, offsetvt2, ldvt2, idxc, offsetidxc, ctot, offsetctot, z, offsetz, info); } - protected abstract void slasd3K(int nl, int nr, int sqre, int k, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, float[] dsigma, int _dsigma_offset, float[] u, int _u_offset, int ldu, float[] u2, int _u2_offset, int ldu2, float[] vt, int _vt_offset, int ldvt, float[] vt2, int _vt2_offset, int ldvt2, int[] idxc, int _idxc_offset, int[] ctot, int _ctot_offset, float[] z, int _z_offset, org.netlib.util.intW info); + protected abstract void slasd3K(int nl, int nr, int sqre, int k, float[] d, int offsetd, float[] q, int offsetq, int ldq, float[] dsigma, int offsetdsigma, float[] u, int offsetu, int ldu, float[] u2, int offsetu2, int ldu2, float[] vt, int offsetvt, int ldvt, float[] vt2, int offsetvt2, int ldvt2, int[] idxc, int offsetidxc, int[] ctot, int offsetctot, float[] z, int offsetz, org.netlib.util.intW info); public void slasd4(int n, int i, float[] d, float[] z, float[] delta, float rho, org.netlib.util.floatW sigma, float[] work, org.netlib.util.intW info) { slasd4(n, i, d, 0, z, 0, delta, 0, rho, sigma, work, 0, info); } - public void slasd4(int n, int i, float[] d, int _d_offset, float[] z, int _z_offset, float[] delta, int _delta_offset, float rho, org.netlib.util.floatW sigma, float[] work, int _work_offset, org.netlib.util.intW info) { + public void slasd4(int n, int i, float[] d, int offsetd, float[] z, int offsetz, float[] delta, int offsetdelta, float rho, org.netlib.util.floatW sigma, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - slasd4K(n, i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, sigma, work, _work_offset, info); + slasd4K(n, i, d, offsetd, z, offsetz, delta, offsetdelta, rho, sigma, work, offsetwork, info); } - protected abstract void slasd4K(int n, int i, float[] d, int _d_offset, float[] z, int _z_offset, float[] delta, int _delta_offset, float rho, org.netlib.util.floatW sigma, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void slasd4K(int n, int i, float[] d, int offsetd, float[] z, int offsetz, float[] delta, int offsetdelta, float rho, org.netlib.util.floatW sigma, float[] work, int offsetwork, org.netlib.util.intW info); public void slasd5(int i, float[] d, float[] z, float[] delta, float rho, org.netlib.util.floatW dsigma, float[] work) { slasd5(i, d, 0, z, 0, delta, 0, rho, dsigma, work, 0); } - public void slasd5(int i, float[] d, int _d_offset, float[] z, int _z_offset, float[] delta, int _delta_offset, float rho, org.netlib.util.floatW dsigma, float[] work, int _work_offset) { + public void slasd5(int i, float[] d, int offsetd, float[] z, int offsetz, float[] delta, int offsetdelta, float rho, org.netlib.util.floatW dsigma, float[] work, int offsetwork) { //FIXME Add arguments check - slasd5K(i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, dsigma, work, _work_offset); + slasd5K(i, d, offsetd, z, offsetz, delta, offsetdelta, rho, dsigma, work, offsetwork); } - protected abstract void slasd5K(int i, float[] d, int _d_offset, float[] z, int _z_offset, float[] delta, int _delta_offset, float rho, org.netlib.util.floatW dsigma, float[] work, int _work_offset); + protected abstract void slasd5K(int i, float[] d, int offsetd, float[] z, int offsetz, float[] delta, int offsetdelta, float rho, org.netlib.util.floatW dsigma, float[] work, int offsetwork); public void slasd6(int icompq, int nl, int nr, int sqre, float[] d, float[] vf, float[] vl, org.netlib.util.floatW alpha, org.netlib.util.floatW beta, int[] idxq, int[] perm, org.netlib.util.intW givptr, int[] givcol, int ldgcol, float[] givnum, int ldgnum, float[] poles, float[] difl, float[] difr, float[] z, org.netlib.util.intW k, org.netlib.util.floatW c, org.netlib.util.floatW s, float[] work, int[] iwork, org.netlib.util.intW info) { slasd6(icompq, nl, nr, sqre, d, 0, vf, 0, vl, 0, alpha, beta, idxq, 0, perm, 0, givptr, givcol, 0, ldgcol, givnum, 0, ldgnum, poles, 0, difl, 0, difr, 0, z, 0, k, c, s, work, 0, iwork, 0, info); } - public void slasd6(int icompq, int nl, int nr, int sqre, float[] d, int _d_offset, float[] vf, int _vf_offset, float[] vl, int _vl_offset, org.netlib.util.floatW alpha, org.netlib.util.floatW beta, int[] idxq, int _idxq_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, int ldgcol, float[] givnum, int _givnum_offset, int ldgnum, float[] poles, int _poles_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, float[] z, int _z_offset, org.netlib.util.intW k, org.netlib.util.floatW c, org.netlib.util.floatW s, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void slasd6(int icompq, int nl, int nr, int sqre, float[] d, int offsetd, float[] vf, int offsetvf, float[] vl, int offsetvl, org.netlib.util.floatW alpha, org.netlib.util.floatW beta, int[] idxq, int offsetidxq, int[] perm, int offsetperm, org.netlib.util.intW givptr, int[] givcol, int offsetgivcol, int ldgcol, float[] givnum, int offsetgivnum, int ldgnum, float[] poles, int offsetpoles, float[] difl, int offsetdifl, float[] difr, int offsetdifr, float[] z, int offsetz, org.netlib.util.intW k, org.netlib.util.floatW c, org.netlib.util.floatW s, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - slasd6K(icompq, nl, nr, sqre, d, _d_offset, vf, _vf_offset, vl, _vl_offset, alpha, beta, idxq, _idxq_offset, perm, _perm_offset, givptr, givcol, _givcol_offset, ldgcol, givnum, _givnum_offset, ldgnum, poles, _poles_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, k, c, s, work, _work_offset, iwork, _iwork_offset, info); + slasd6K(icompq, nl, nr, sqre, d, offsetd, vf, offsetvf, vl, offsetvl, alpha, beta, idxq, offsetidxq, perm, offsetperm, givptr, givcol, offsetgivcol, ldgcol, givnum, offsetgivnum, ldgnum, poles, offsetpoles, difl, offsetdifl, difr, offsetdifr, z, offsetz, k, c, s, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void slasd6K(int icompq, int nl, int nr, int sqre, float[] d, int _d_offset, float[] vf, int _vf_offset, float[] vl, int _vl_offset, org.netlib.util.floatW alpha, org.netlib.util.floatW beta, int[] idxq, int _idxq_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, int ldgcol, float[] givnum, int _givnum_offset, int ldgnum, float[] poles, int _poles_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, float[] z, int _z_offset, org.netlib.util.intW k, org.netlib.util.floatW c, org.netlib.util.floatW s, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void slasd6K(int icompq, int nl, int nr, int sqre, float[] d, int offsetd, float[] vf, int offsetvf, float[] vl, int offsetvl, org.netlib.util.floatW alpha, org.netlib.util.floatW beta, int[] idxq, int offsetidxq, int[] perm, int offsetperm, org.netlib.util.intW givptr, int[] givcol, int offsetgivcol, int ldgcol, float[] givnum, int offsetgivnum, int ldgnum, float[] poles, int offsetpoles, float[] difl, int offsetdifl, float[] difr, int offsetdifr, float[] z, int offsetz, org.netlib.util.intW k, org.netlib.util.floatW c, org.netlib.util.floatW s, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void slasd7(int icompq, int nl, int nr, int sqre, org.netlib.util.intW k, float[] d, float[] z, float[] zw, float[] vf, float[] vfw, float[] vl, float[] vlw, float alpha, float beta, float[] dsigma, int[] idx, int[] idxp, int[] idxq, int[] perm, org.netlib.util.intW givptr, int[] givcol, int ldgcol, float[] givnum, int ldgnum, org.netlib.util.floatW c, org.netlib.util.floatW s, org.netlib.util.intW info) { slasd7(icompq, nl, nr, sqre, k, d, 0, z, 0, zw, 0, vf, 0, vfw, 0, vl, 0, vlw, 0, alpha, beta, dsigma, 0, idx, 0, idxp, 0, idxq, 0, perm, 0, givptr, givcol, 0, ldgcol, givnum, 0, ldgnum, c, s, info); } - public void slasd7(int icompq, int nl, int nr, int sqre, org.netlib.util.intW k, float[] d, int _d_offset, float[] z, int _z_offset, float[] zw, int _zw_offset, float[] vf, int _vf_offset, float[] vfw, int _vfw_offset, float[] vl, int _vl_offset, float[] vlw, int _vlw_offset, float alpha, float beta, float[] dsigma, int _dsigma_offset, int[] idx, int _idx_offset, int[] idxp, int _idxp_offset, int[] idxq, int _idxq_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, int ldgcol, float[] givnum, int _givnum_offset, int ldgnum, org.netlib.util.floatW c, org.netlib.util.floatW s, org.netlib.util.intW info) { + public void slasd7(int icompq, int nl, int nr, int sqre, org.netlib.util.intW k, float[] d, int offsetd, float[] z, int offsetz, float[] zw, int offsetzw, float[] vf, int offsetvf, float[] vfw, int offsetvfw, float[] vl, int offsetvl, float[] vlw, int offsetvlw, float alpha, float beta, float[] dsigma, int offsetdsigma, int[] idx, int offsetidx, int[] idxp, int offsetidxp, int[] idxq, int offsetidxq, int[] perm, int offsetperm, org.netlib.util.intW givptr, int[] givcol, int offsetgivcol, int ldgcol, float[] givnum, int offsetgivnum, int ldgnum, org.netlib.util.floatW c, org.netlib.util.floatW s, org.netlib.util.intW info) { //FIXME Add arguments check - slasd7K(icompq, nl, nr, sqre, k, d, _d_offset, z, _z_offset, zw, _zw_offset, vf, _vf_offset, vfw, _vfw_offset, vl, _vl_offset, vlw, _vlw_offset, alpha, beta, dsigma, _dsigma_offset, idx, _idx_offset, idxp, _idxp_offset, idxq, _idxq_offset, perm, _perm_offset, givptr, givcol, _givcol_offset, ldgcol, givnum, _givnum_offset, ldgnum, c, s, info); + slasd7K(icompq, nl, nr, sqre, k, d, offsetd, z, offsetz, zw, offsetzw, vf, offsetvf, vfw, offsetvfw, vl, offsetvl, vlw, offsetvlw, alpha, beta, dsigma, offsetdsigma, idx, offsetidx, idxp, offsetidxp, idxq, offsetidxq, perm, offsetperm, givptr, givcol, offsetgivcol, ldgcol, givnum, offsetgivnum, ldgnum, c, s, info); } - protected abstract void slasd7K(int icompq, int nl, int nr, int sqre, org.netlib.util.intW k, float[] d, int _d_offset, float[] z, int _z_offset, float[] zw, int _zw_offset, float[] vf, int _vf_offset, float[] vfw, int _vfw_offset, float[] vl, int _vl_offset, float[] vlw, int _vlw_offset, float alpha, float beta, float[] dsigma, int _dsigma_offset, int[] idx, int _idx_offset, int[] idxp, int _idxp_offset, int[] idxq, int _idxq_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, int ldgcol, float[] givnum, int _givnum_offset, int ldgnum, org.netlib.util.floatW c, org.netlib.util.floatW s, org.netlib.util.intW info); + protected abstract void slasd7K(int icompq, int nl, int nr, int sqre, org.netlib.util.intW k, float[] d, int offsetd, float[] z, int offsetz, float[] zw, int offsetzw, float[] vf, int offsetvf, float[] vfw, int offsetvfw, float[] vl, int offsetvl, float[] vlw, int offsetvlw, float alpha, float beta, float[] dsigma, int offsetdsigma, int[] idx, int offsetidx, int[] idxp, int offsetidxp, int[] idxq, int offsetidxq, int[] perm, int offsetperm, org.netlib.util.intW givptr, int[] givcol, int offsetgivcol, int ldgcol, float[] givnum, int offsetgivnum, int ldgnum, org.netlib.util.floatW c, org.netlib.util.floatW s, org.netlib.util.intW info); public void slasd8(int icompq, int k, float[] d, float[] z, float[] vf, float[] vl, float[] difl, float[] difr, int lddifr, float[] dsigma, float[] work, org.netlib.util.intW info) { slasd8(icompq, k, d, 0, z, 0, vf, 0, vl, 0, difl, 0, difr, 0, lddifr, dsigma, 0, work, 0, info); } - public void slasd8(int icompq, int k, float[] d, int _d_offset, float[] z, int _z_offset, float[] vf, int _vf_offset, float[] vl, int _vl_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, int lddifr, float[] dsigma, int _dsigma_offset, float[] work, int _work_offset, org.netlib.util.intW info) { + public void slasd8(int icompq, int k, float[] d, int offsetd, float[] z, int offsetz, float[] vf, int offsetvf, float[] vl, int offsetvl, float[] difl, int offsetdifl, float[] difr, int offsetdifr, int lddifr, float[] dsigma, int offsetdsigma, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - slasd8K(icompq, k, d, _d_offset, z, _z_offset, vf, _vf_offset, vl, _vl_offset, difl, _difl_offset, difr, _difr_offset, lddifr, dsigma, _dsigma_offset, work, _work_offset, info); + slasd8K(icompq, k, d, offsetd, z, offsetz, vf, offsetvf, vl, offsetvl, difl, offsetdifl, difr, offsetdifr, lddifr, dsigma, offsetdsigma, work, offsetwork, info); } - protected abstract void slasd8K(int icompq, int k, float[] d, int _d_offset, float[] z, int _z_offset, float[] vf, int _vf_offset, float[] vl, int _vl_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, int lddifr, float[] dsigma, int _dsigma_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void slasd8K(int icompq, int k, float[] d, int offsetd, float[] z, int offsetz, float[] vf, int offsetvf, float[] vl, int offsetvl, float[] difl, int offsetdifl, float[] difr, int offsetdifr, int lddifr, float[] dsigma, int offsetdsigma, float[] work, int offsetwork, org.netlib.util.intW info); public void slasda(int icompq, int smlsiz, int n, int sqre, float[] d, float[] e, float[] u, int ldu, float[] vt, int[] k, float[] difl, float[] difr, float[] z, float[] poles, int[] givptr, int[] givcol, int ldgcol, int[] perm, float[] givnum, float[] c, float[] s, float[] work, int[] iwork, org.netlib.util.intW info) { slasda(icompq, smlsiz, n, sqre, d, 0, e, 0, u, 0, ldu, vt, 0, k, 0, difl, 0, difr, 0, z, 0, poles, 0, givptr, 0, givcol, 0, ldgcol, perm, 0, givnum, 0, c, 0, s, 0, work, 0, iwork, 0, info); } - public void slasda(int icompq, int smlsiz, int n, int sqre, float[] d, int _d_offset, float[] e, int _e_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int[] k, int _k_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, float[] z, int _z_offset, float[] poles, int _poles_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, int ldgcol, int[] perm, int _perm_offset, float[] givnum, int _givnum_offset, float[] c, int _c_offset, float[] s, int _s_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void slasda(int icompq, int smlsiz, int n, int sqre, float[] d, int offsetd, float[] e, int offsete, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int[] k, int offsetk, float[] difl, int offsetdifl, float[] difr, int offsetdifr, float[] z, int offsetz, float[] poles, int offsetpoles, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, int ldgcol, int[] perm, int offsetperm, float[] givnum, int offsetgivnum, float[] c, int offsetc, float[] s, int offsets, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - slasdaK(icompq, smlsiz, n, sqre, d, _d_offset, e, _e_offset, u, _u_offset, ldu, vt, _vt_offset, k, _k_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, poles, _poles_offset, givptr, _givptr_offset, givcol, _givcol_offset, ldgcol, perm, _perm_offset, givnum, _givnum_offset, c, _c_offset, s, _s_offset, work, _work_offset, iwork, _iwork_offset, info); + slasdaK(icompq, smlsiz, n, sqre, d, offsetd, e, offsete, u, offsetu, ldu, vt, offsetvt, k, offsetk, difl, offsetdifl, difr, offsetdifr, z, offsetz, poles, offsetpoles, givptr, offsetgivptr, givcol, offsetgivcol, ldgcol, perm, offsetperm, givnum, offsetgivnum, c, offsetc, s, offsets, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void slasdaK(int icompq, int smlsiz, int n, int sqre, float[] d, int _d_offset, float[] e, int _e_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int[] k, int _k_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, float[] z, int _z_offset, float[] poles, int _poles_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, int ldgcol, int[] perm, int _perm_offset, float[] givnum, int _givnum_offset, float[] c, int _c_offset, float[] s, int _s_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void slasdaK(int icompq, int smlsiz, int n, int sqre, float[] d, int offsetd, float[] e, int offsete, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int[] k, int offsetk, float[] difl, int offsetdifl, float[] difr, int offsetdifr, float[] z, int offsetz, float[] poles, int offsetpoles, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, int ldgcol, int[] perm, int offsetperm, float[] givnum, int offsetgivnum, float[] c, int offsetc, float[] s, int offsets, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void slasdq(String uplo, int sqre, int n, int ncvt, int nru, int ncc, float[] d, float[] e, float[] vt, int ldvt, float[] u, int ldu, float[] c, int Ldc, float[] work, org.netlib.util.intW info) { slasdq(uplo, sqre, n, ncvt, nru, ncc, d, 0, e, 0, vt, 0, ldvt, u, 0, ldu, c, 0, Ldc, work, 0, info); } - public void slasdq(String uplo, int sqre, int n, int ncvt, int nru, int ncc, float[] d, int _d_offset, float[] e, int _e_offset, float[] vt, int _vt_offset, int ldvt, float[] u, int _u_offset, int ldu, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info) { + public void slasdq(String uplo, int sqre, int n, int ncvt, int nru, int ncc, float[] d, int offsetd, float[] e, int offsete, float[] vt, int offsetvt, int ldvt, float[] u, int offsetu, int ldu, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - slasdqK(uplo, sqre, n, ncvt, nru, ncc, d, _d_offset, e, _e_offset, vt, _vt_offset, ldvt, u, _u_offset, ldu, c, _c_offset, Ldc, work, _work_offset, info); + slasdqK(uplo, sqre, n, ncvt, nru, ncc, d, offsetd, e, offsete, vt, offsetvt, ldvt, u, offsetu, ldu, c, offsetc, Ldc, work, offsetwork, info); } - protected abstract void slasdqK(String uplo, int sqre, int n, int ncvt, int nru, int ncc, float[] d, int _d_offset, float[] e, int _e_offset, float[] vt, int _vt_offset, int ldvt, float[] u, int _u_offset, int ldu, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void slasdqK(String uplo, int sqre, int n, int ncvt, int nru, int ncc, float[] d, int offsetd, float[] e, int offsete, float[] vt, int offsetvt, int ldvt, float[] u, int offsetu, int ldu, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info); public void slasdt(int n, org.netlib.util.intW lvl, org.netlib.util.intW nd, int[] inode, int[] ndiml, int[] ndimr, int msub) { slasdt(n, lvl, nd, inode, 0, ndiml, 0, ndimr, 0, msub); } - public void slasdt(int n, org.netlib.util.intW lvl, org.netlib.util.intW nd, int[] inode, int _inode_offset, int[] ndiml, int _ndiml_offset, int[] ndimr, int _ndimr_offset, int msub) { + public void slasdt(int n, org.netlib.util.intW lvl, org.netlib.util.intW nd, int[] inode, int offsetinode, int[] ndiml, int offsetndiml, int[] ndimr, int offsetndimr, int msub) { //FIXME Add arguments check - slasdtK(n, lvl, nd, inode, _inode_offset, ndiml, _ndiml_offset, ndimr, _ndimr_offset, msub); + slasdtK(n, lvl, nd, inode, offsetinode, ndiml, offsetndiml, ndimr, offsetndimr, msub); } - protected abstract void slasdtK(int n, org.netlib.util.intW lvl, org.netlib.util.intW nd, int[] inode, int _inode_offset, int[] ndiml, int _ndiml_offset, int[] ndimr, int _ndimr_offset, int msub); + protected abstract void slasdtK(int n, org.netlib.util.intW lvl, org.netlib.util.intW nd, int[] inode, int offsetinode, int[] ndiml, int offsetndiml, int[] ndimr, int offsetndimr, int msub); public void slaset(String uplo, int m, int n, float alpha, float beta, float[] a, int lda) { slaset(uplo, m, n, alpha, beta, a, 0, lda); } - public void slaset(String uplo, int m, int n, float alpha, float beta, float[] a, int _a_offset, int lda) { + public void slaset(String uplo, int m, int n, float alpha, float beta, float[] a, int offseta, int lda) { //FIXME Add arguments check - slasetK(uplo, m, n, alpha, beta, a, _a_offset, lda); + slasetK(uplo, m, n, alpha, beta, a, offseta, lda); } - protected abstract void slasetK(String uplo, int m, int n, float alpha, float beta, float[] a, int _a_offset, int lda); + protected abstract void slasetK(String uplo, int m, int n, float alpha, float beta, float[] a, int offseta, int lda); public void slasq1(int n, float[] d, float[] e, float[] work, org.netlib.util.intW info) { slasq1(n, d, 0, e, 0, work, 0, info); } - public void slasq1(int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] work, int _work_offset, org.netlib.util.intW info) { + public void slasq1(int n, float[] d, int offsetd, float[] e, int offsete, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - slasq1K(n, d, _d_offset, e, _e_offset, work, _work_offset, info); + slasq1K(n, d, offsetd, e, offsete, work, offsetwork, info); } - protected abstract void slasq1K(int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void slasq1K(int n, float[] d, int offsetd, float[] e, int offsete, float[] work, int offsetwork, org.netlib.util.intW info); public void slasq2(int n, float[] z, org.netlib.util.intW info) { slasq2(n, z, 0, info); } - public void slasq2(int n, float[] z, int _z_offset, org.netlib.util.intW info) { + public void slasq2(int n, float[] z, int offsetz, org.netlib.util.intW info) { //FIXME Add arguments check - slasq2K(n, z, _z_offset, info); + slasq2K(n, z, offsetz, info); } - protected abstract void slasq2K(int n, float[] z, int _z_offset, org.netlib.util.intW info); + protected abstract void slasq2K(int n, float[] z, int offsetz, org.netlib.util.intW info); public void slasq3(int i0, org.netlib.util.intW n0, float[] z, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW sigma, org.netlib.util.floatW desig, org.netlib.util.floatW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee) { slasq3(i0, n0, z, 0, pp, dmin, sigma, desig, qmax, nfail, iter, ndiv, ieee); } - public void slasq3(int i0, org.netlib.util.intW n0, float[] z, int _z_offset, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW sigma, org.netlib.util.floatW desig, org.netlib.util.floatW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee) { + public void slasq3(int i0, org.netlib.util.intW n0, float[] z, int offsetz, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW sigma, org.netlib.util.floatW desig, org.netlib.util.floatW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee) { //FIXME Add arguments check - slasq3K(i0, n0, z, _z_offset, pp, dmin, sigma, desig, qmax, nfail, iter, ndiv, ieee); + slasq3K(i0, n0, z, offsetz, pp, dmin, sigma, desig, qmax, nfail, iter, ndiv, ieee); } - protected abstract void slasq3K(int i0, org.netlib.util.intW n0, float[] z, int _z_offset, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW sigma, org.netlib.util.floatW desig, org.netlib.util.floatW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee); + protected abstract void slasq3K(int i0, org.netlib.util.intW n0, float[] z, int offsetz, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW sigma, org.netlib.util.floatW desig, org.netlib.util.floatW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee); public void slasq4(int i0, int n0, float[] z, int pp, int n0in, float dmin, float dmin1, float dmin2, float dn, float dn1, float dn2, org.netlib.util.floatW tau, org.netlib.util.intW ttype) { slasq4(i0, n0, z, 0, pp, n0in, dmin, dmin1, dmin2, dn, dn1, dn2, tau, ttype); } - public void slasq4(int i0, int n0, float[] z, int _z_offset, int pp, int n0in, float dmin, float dmin1, float dmin2, float dn, float dn1, float dn2, org.netlib.util.floatW tau, org.netlib.util.intW ttype) { + public void slasq4(int i0, int n0, float[] z, int offsetz, int pp, int n0in, float dmin, float dmin1, float dmin2, float dn, float dn1, float dn2, org.netlib.util.floatW tau, org.netlib.util.intW ttype) { //FIXME Add arguments check - slasq4K(i0, n0, z, _z_offset, pp, n0in, dmin, dmin1, dmin2, dn, dn1, dn2, tau, ttype); + slasq4K(i0, n0, z, offsetz, pp, n0in, dmin, dmin1, dmin2, dn, dn1, dn2, tau, ttype); } - protected abstract void slasq4K(int i0, int n0, float[] z, int _z_offset, int pp, int n0in, float dmin, float dmin1, float dmin2, float dn, float dn1, float dn2, org.netlib.util.floatW tau, org.netlib.util.intW ttype); + protected abstract void slasq4K(int i0, int n0, float[] z, int offsetz, int pp, int n0in, float dmin, float dmin1, float dmin2, float dn, float dn1, float dn2, org.netlib.util.floatW tau, org.netlib.util.intW ttype); public void slasq5(int i0, int n0, float[] z, int pp, float tau, org.netlib.util.floatW dmin, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dnm1, org.netlib.util.floatW dnm2, boolean ieee) { slasq5(i0, n0, z, 0, pp, tau, dmin, dmin1, dmin2, dn, dnm1, dnm2, ieee); } - public void slasq5(int i0, int n0, float[] z, int _z_offset, int pp, float tau, org.netlib.util.floatW dmin, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dnm1, org.netlib.util.floatW dnm2, boolean ieee) { + public void slasq5(int i0, int n0, float[] z, int offsetz, int pp, float tau, org.netlib.util.floatW dmin, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dnm1, org.netlib.util.floatW dnm2, boolean ieee) { //FIXME Add arguments check - slasq5K(i0, n0, z, _z_offset, pp, tau, dmin, dmin1, dmin2, dn, dnm1, dnm2, ieee); + slasq5K(i0, n0, z, offsetz, pp, tau, dmin, dmin1, dmin2, dn, dnm1, dnm2, ieee); } - protected abstract void slasq5K(int i0, int n0, float[] z, int _z_offset, int pp, float tau, org.netlib.util.floatW dmin, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dnm1, org.netlib.util.floatW dnm2, boolean ieee); + protected abstract void slasq5K(int i0, int n0, float[] z, int offsetz, int pp, float tau, org.netlib.util.floatW dmin, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dnm1, org.netlib.util.floatW dnm2, boolean ieee); public void slasq6(int i0, int n0, float[] z, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dnm1, org.netlib.util.floatW dnm2) { slasq6(i0, n0, z, 0, pp, dmin, dmin1, dmin2, dn, dnm1, dnm2); } - public void slasq6(int i0, int n0, float[] z, int _z_offset, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dnm1, org.netlib.util.floatW dnm2) { + public void slasq6(int i0, int n0, float[] z, int offsetz, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dnm1, org.netlib.util.floatW dnm2) { //FIXME Add arguments check - slasq6K(i0, n0, z, _z_offset, pp, dmin, dmin1, dmin2, dn, dnm1, dnm2); + slasq6K(i0, n0, z, offsetz, pp, dmin, dmin1, dmin2, dn, dnm1, dnm2); } - protected abstract void slasq6K(int i0, int n0, float[] z, int _z_offset, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dnm1, org.netlib.util.floatW dnm2); + protected abstract void slasq6K(int i0, int n0, float[] z, int offsetz, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dnm1, org.netlib.util.floatW dnm2); public void slasr(String side, String pivot, String direct, int m, int n, float[] c, float[] s, float[] a, int lda) { slasr(side, pivot, direct, m, n, c, 0, s, 0, a, 0, lda); } - public void slasr(String side, String pivot, String direct, int m, int n, float[] c, int _c_offset, float[] s, int _s_offset, float[] a, int _a_offset, int lda) { + public void slasr(String side, String pivot, String direct, int m, int n, float[] c, int offsetc, float[] s, int offsets, float[] a, int offseta, int lda) { //FIXME Add arguments check - slasrK(side, pivot, direct, m, n, c, _c_offset, s, _s_offset, a, _a_offset, lda); + slasrK(side, pivot, direct, m, n, c, offsetc, s, offsets, a, offseta, lda); } - protected abstract void slasrK(String side, String pivot, String direct, int m, int n, float[] c, int _c_offset, float[] s, int _s_offset, float[] a, int _a_offset, int lda); + protected abstract void slasrK(String side, String pivot, String direct, int m, int n, float[] c, int offsetc, float[] s, int offsets, float[] a, int offseta, int lda); public void slasrt(String id, int n, float[] d, org.netlib.util.intW info) { slasrt(id, n, d, 0, info); } - public void slasrt(String id, int n, float[] d, int _d_offset, org.netlib.util.intW info) { + public void slasrt(String id, int n, float[] d, int offsetd, org.netlib.util.intW info) { //FIXME Add arguments check - slasrtK(id, n, d, _d_offset, info); + slasrtK(id, n, d, offsetd, info); } - protected abstract void slasrtK(String id, int n, float[] d, int _d_offset, org.netlib.util.intW info); + protected abstract void slasrtK(String id, int n, float[] d, int offsetd, org.netlib.util.intW info); public void slassq(int n, float[] x, int incx, org.netlib.util.floatW scale, org.netlib.util.floatW sumsq) { slassq(n, x, 0, incx, scale, sumsq); } - public void slassq(int n, float[] x, int _x_offset, int incx, org.netlib.util.floatW scale, org.netlib.util.floatW sumsq) { + public void slassq(int n, float[] x, int offsetx, int incx, org.netlib.util.floatW scale, org.netlib.util.floatW sumsq) { //FIXME Add arguments check - slassqK(n, x, _x_offset, incx, scale, sumsq); + slassqK(n, x, offsetx, incx, scale, sumsq); } - protected abstract void slassqK(int n, float[] x, int _x_offset, int incx, org.netlib.util.floatW scale, org.netlib.util.floatW sumsq); + protected abstract void slassqK(int n, float[] x, int offsetx, int incx, org.netlib.util.floatW scale, org.netlib.util.floatW sumsq); public void slasv2(float f, float g, float h, org.netlib.util.floatW ssmin, org.netlib.util.floatW ssmax, org.netlib.util.floatW snr, org.netlib.util.floatW csr, org.netlib.util.floatW snl, org.netlib.util.floatW csl) { slasv2K(f, g, h, ssmin, ssmax, snr, csr, snl, csl); @@ -5961,1706 +5961,1706 @@ public void slaswp(int n, float[] a, int lda, int k1, int k2, int[] ipiv, int in slaswp(n, a, 0, lda, k1, k2, ipiv, 0, incx); } - public void slaswp(int n, float[] a, int _a_offset, int lda, int k1, int k2, int[] ipiv, int _ipiv_offset, int incx) { + public void slaswp(int n, float[] a, int offseta, int lda, int k1, int k2, int[] ipiv, int offsetipiv, int incx) { //FIXME Add arguments check - slaswpK(n, a, _a_offset, lda, k1, k2, ipiv, _ipiv_offset, incx); + slaswpK(n, a, offseta, lda, k1, k2, ipiv, offsetipiv, incx); } - protected abstract void slaswpK(int n, float[] a, int _a_offset, int lda, int k1, int k2, int[] ipiv, int _ipiv_offset, int incx); + protected abstract void slaswpK(int n, float[] a, int offseta, int lda, int k1, int k2, int[] ipiv, int offsetipiv, int incx); public void slasy2(boolean ltranl, boolean ltranr, int isgn, int n1, int n2, float[] tl, int ldtl, float[] tr, int ldtr, float[] b, int ldb, org.netlib.util.floatW scale, float[] x, int ldx, org.netlib.util.floatW xnorm, org.netlib.util.intW info) { slasy2(ltranl, ltranr, isgn, n1, n2, tl, 0, ldtl, tr, 0, ldtr, b, 0, ldb, scale, x, 0, ldx, xnorm, info); } - public void slasy2(boolean ltranl, boolean ltranr, int isgn, int n1, int n2, float[] tl, int _tl_offset, int ldtl, float[] tr, int _tr_offset, int ldtr, float[] b, int _b_offset, int ldb, org.netlib.util.floatW scale, float[] x, int _x_offset, int ldx, org.netlib.util.floatW xnorm, org.netlib.util.intW info) { + public void slasy2(boolean ltranl, boolean ltranr, int isgn, int n1, int n2, float[] tl, int offsettl, int ldtl, float[] tr, int offsettr, int ldtr, float[] b, int offsetb, int ldb, org.netlib.util.floatW scale, float[] x, int offsetx, int ldx, org.netlib.util.floatW xnorm, org.netlib.util.intW info) { //FIXME Add arguments check - slasy2K(ltranl, ltranr, isgn, n1, n2, tl, _tl_offset, ldtl, tr, _tr_offset, ldtr, b, _b_offset, ldb, scale, x, _x_offset, ldx, xnorm, info); + slasy2K(ltranl, ltranr, isgn, n1, n2, tl, offsettl, ldtl, tr, offsettr, ldtr, b, offsetb, ldb, scale, x, offsetx, ldx, xnorm, info); } - protected abstract void slasy2K(boolean ltranl, boolean ltranr, int isgn, int n1, int n2, float[] tl, int _tl_offset, int ldtl, float[] tr, int _tr_offset, int ldtr, float[] b, int _b_offset, int ldb, org.netlib.util.floatW scale, float[] x, int _x_offset, int ldx, org.netlib.util.floatW xnorm, org.netlib.util.intW info); + protected abstract void slasy2K(boolean ltranl, boolean ltranr, int isgn, int n1, int n2, float[] tl, int offsettl, int ldtl, float[] tr, int offsettr, int ldtr, float[] b, int offsetb, int ldb, org.netlib.util.floatW scale, float[] x, int offsetx, int ldx, org.netlib.util.floatW xnorm, org.netlib.util.intW info); public void slasyf(String uplo, int n, int nb, org.netlib.util.intW kb, float[] a, int lda, int[] ipiv, float[] w, int ldw, org.netlib.util.intW info) { slasyf(uplo, n, nb, kb, a, 0, lda, ipiv, 0, w, 0, ldw, info); } - public void slasyf(String uplo, int n, int nb, org.netlib.util.intW kb, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] w, int _w_offset, int ldw, org.netlib.util.intW info) { + public void slasyf(String uplo, int n, int nb, org.netlib.util.intW kb, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] w, int offsetw, int ldw, org.netlib.util.intW info) { //FIXME Add arguments check - slasyfK(uplo, n, nb, kb, a, _a_offset, lda, ipiv, _ipiv_offset, w, _w_offset, ldw, info); + slasyfK(uplo, n, nb, kb, a, offseta, lda, ipiv, offsetipiv, w, offsetw, ldw, info); } - protected abstract void slasyfK(String uplo, int n, int nb, org.netlib.util.intW kb, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] w, int _w_offset, int ldw, org.netlib.util.intW info); + protected abstract void slasyfK(String uplo, int n, int nb, org.netlib.util.intW kb, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] w, int offsetw, int ldw, org.netlib.util.intW info); public void slatbs(String uplo, String trans, String diag, String normin, int n, int kd, float[] ab, int ldab, float[] x, org.netlib.util.floatW scale, float[] cnorm, org.netlib.util.intW info) { slatbs(uplo, trans, diag, normin, n, kd, ab, 0, ldab, x, 0, scale, cnorm, 0, info); } - public void slatbs(String uplo, String trans, String diag, String normin, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] x, int _x_offset, org.netlib.util.floatW scale, float[] cnorm, int _cnorm_offset, org.netlib.util.intW info) { + public void slatbs(String uplo, String trans, String diag, String normin, int n, int kd, float[] ab, int offsetab, int ldab, float[] x, int offsetx, org.netlib.util.floatW scale, float[] cnorm, int offsetcnorm, org.netlib.util.intW info) { //FIXME Add arguments check - slatbsK(uplo, trans, diag, normin, n, kd, ab, _ab_offset, ldab, x, _x_offset, scale, cnorm, _cnorm_offset, info); + slatbsK(uplo, trans, diag, normin, n, kd, ab, offsetab, ldab, x, offsetx, scale, cnorm, offsetcnorm, info); } - protected abstract void slatbsK(String uplo, String trans, String diag, String normin, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] x, int _x_offset, org.netlib.util.floatW scale, float[] cnorm, int _cnorm_offset, org.netlib.util.intW info); + protected abstract void slatbsK(String uplo, String trans, String diag, String normin, int n, int kd, float[] ab, int offsetab, int ldab, float[] x, int offsetx, org.netlib.util.floatW scale, float[] cnorm, int offsetcnorm, org.netlib.util.intW info); public void slatdf(int ijob, int n, float[] z, int ldz, float[] rhs, org.netlib.util.floatW rdsum, org.netlib.util.floatW rdscal, int[] ipiv, int[] jpiv) { slatdf(ijob, n, z, 0, ldz, rhs, 0, rdsum, rdscal, ipiv, 0, jpiv, 0); } - public void slatdf(int ijob, int n, float[] z, int _z_offset, int ldz, float[] rhs, int _rhs_offset, org.netlib.util.floatW rdsum, org.netlib.util.floatW rdscal, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset) { + public void slatdf(int ijob, int n, float[] z, int offsetz, int ldz, float[] rhs, int offsetrhs, org.netlib.util.floatW rdsum, org.netlib.util.floatW rdscal, int[] ipiv, int offsetipiv, int[] jpiv, int offsetjpiv) { //FIXME Add arguments check - slatdfK(ijob, n, z, _z_offset, ldz, rhs, _rhs_offset, rdsum, rdscal, ipiv, _ipiv_offset, jpiv, _jpiv_offset); + slatdfK(ijob, n, z, offsetz, ldz, rhs, offsetrhs, rdsum, rdscal, ipiv, offsetipiv, jpiv, offsetjpiv); } - protected abstract void slatdfK(int ijob, int n, float[] z, int _z_offset, int ldz, float[] rhs, int _rhs_offset, org.netlib.util.floatW rdsum, org.netlib.util.floatW rdscal, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset); + protected abstract void slatdfK(int ijob, int n, float[] z, int offsetz, int ldz, float[] rhs, int offsetrhs, org.netlib.util.floatW rdsum, org.netlib.util.floatW rdscal, int[] ipiv, int offsetipiv, int[] jpiv, int offsetjpiv); public void slatps(String uplo, String trans, String diag, String normin, int n, float[] ap, float[] x, org.netlib.util.floatW scale, float[] cnorm, org.netlib.util.intW info) { slatps(uplo, trans, diag, normin, n, ap, 0, x, 0, scale, cnorm, 0, info); } - public void slatps(String uplo, String trans, String diag, String normin, int n, float[] ap, int _ap_offset, float[] x, int _x_offset, org.netlib.util.floatW scale, float[] cnorm, int _cnorm_offset, org.netlib.util.intW info) { + public void slatps(String uplo, String trans, String diag, String normin, int n, float[] ap, int offsetap, float[] x, int offsetx, org.netlib.util.floatW scale, float[] cnorm, int offsetcnorm, org.netlib.util.intW info) { //FIXME Add arguments check - slatpsK(uplo, trans, diag, normin, n, ap, _ap_offset, x, _x_offset, scale, cnorm, _cnorm_offset, info); + slatpsK(uplo, trans, diag, normin, n, ap, offsetap, x, offsetx, scale, cnorm, offsetcnorm, info); } - protected abstract void slatpsK(String uplo, String trans, String diag, String normin, int n, float[] ap, int _ap_offset, float[] x, int _x_offset, org.netlib.util.floatW scale, float[] cnorm, int _cnorm_offset, org.netlib.util.intW info); + protected abstract void slatpsK(String uplo, String trans, String diag, String normin, int n, float[] ap, int offsetap, float[] x, int offsetx, org.netlib.util.floatW scale, float[] cnorm, int offsetcnorm, org.netlib.util.intW info); public void slatrd(String uplo, int n, int nb, float[] a, int lda, float[] e, float[] tau, float[] w, int ldw) { slatrd(uplo, n, nb, a, 0, lda, e, 0, tau, 0, w, 0, ldw); } - public void slatrd(String uplo, int n, int nb, float[] a, int _a_offset, int lda, float[] e, int _e_offset, float[] tau, int _tau_offset, float[] w, int _w_offset, int ldw) { + public void slatrd(String uplo, int n, int nb, float[] a, int offseta, int lda, float[] e, int offsete, float[] tau, int offsettau, float[] w, int offsetw, int ldw) { //FIXME Add arguments check - slatrdK(uplo, n, nb, a, _a_offset, lda, e, _e_offset, tau, _tau_offset, w, _w_offset, ldw); + slatrdK(uplo, n, nb, a, offseta, lda, e, offsete, tau, offsettau, w, offsetw, ldw); } - protected abstract void slatrdK(String uplo, int n, int nb, float[] a, int _a_offset, int lda, float[] e, int _e_offset, float[] tau, int _tau_offset, float[] w, int _w_offset, int ldw); + protected abstract void slatrdK(String uplo, int n, int nb, float[] a, int offseta, int lda, float[] e, int offsete, float[] tau, int offsettau, float[] w, int offsetw, int ldw); public void slatrs(String uplo, String trans, String diag, String normin, int n, float[] a, int lda, float[] x, org.netlib.util.floatW scale, float[] cnorm, org.netlib.util.intW info) { slatrs(uplo, trans, diag, normin, n, a, 0, lda, x, 0, scale, cnorm, 0, info); } - public void slatrs(String uplo, String trans, String diag, String normin, int n, float[] a, int _a_offset, int lda, float[] x, int _x_offset, org.netlib.util.floatW scale, float[] cnorm, int _cnorm_offset, org.netlib.util.intW info) { + public void slatrs(String uplo, String trans, String diag, String normin, int n, float[] a, int offseta, int lda, float[] x, int offsetx, org.netlib.util.floatW scale, float[] cnorm, int offsetcnorm, org.netlib.util.intW info) { //FIXME Add arguments check - slatrsK(uplo, trans, diag, normin, n, a, _a_offset, lda, x, _x_offset, scale, cnorm, _cnorm_offset, info); + slatrsK(uplo, trans, diag, normin, n, a, offseta, lda, x, offsetx, scale, cnorm, offsetcnorm, info); } - protected abstract void slatrsK(String uplo, String trans, String diag, String normin, int n, float[] a, int _a_offset, int lda, float[] x, int _x_offset, org.netlib.util.floatW scale, float[] cnorm, int _cnorm_offset, org.netlib.util.intW info); + protected abstract void slatrsK(String uplo, String trans, String diag, String normin, int n, float[] a, int offseta, int lda, float[] x, int offsetx, org.netlib.util.floatW scale, float[] cnorm, int offsetcnorm, org.netlib.util.intW info); public void slatrz(int m, int n, int l, float[] a, int lda, float[] tau, float[] work) { slatrz(m, n, l, a, 0, lda, tau, 0, work, 0); } - public void slatrz(int m, int n, int l, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset) { + public void slatrz(int m, int n, int l, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork) { //FIXME Add arguments check - slatrzK(m, n, l, a, _a_offset, lda, tau, _tau_offset, work, _work_offset); + slatrzK(m, n, l, a, offseta, lda, tau, offsettau, work, offsetwork); } - protected abstract void slatrzK(int m, int n, int l, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset); + protected abstract void slatrzK(int m, int n, int l, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork); public void slatzm(String side, int m, int n, float[] v, int incv, float tau, float[] c1, float[] c2, int Ldc, float[] work) { slatzm(side, m, n, v, 0, incv, tau, c1, 0, c2, 0, Ldc, work, 0); } - public void slatzm(String side, int m, int n, float[] v, int _v_offset, int incv, float tau, float[] c1, int _c1_offset, float[] c2, int _c2_offset, int Ldc, float[] work, int _work_offset) { + public void slatzm(String side, int m, int n, float[] v, int offsetv, int incv, float tau, float[] c1, int offsetc1, float[] c2, int offsetc2, int Ldc, float[] work, int offsetwork) { //FIXME Add arguments check - slatzmK(side, m, n, v, _v_offset, incv, tau, c1, _c1_offset, c2, _c2_offset, Ldc, work, _work_offset); + slatzmK(side, m, n, v, offsetv, incv, tau, c1, offsetc1, c2, offsetc2, Ldc, work, offsetwork); } - protected abstract void slatzmK(String side, int m, int n, float[] v, int _v_offset, int incv, float tau, float[] c1, int _c1_offset, float[] c2, int _c2_offset, int Ldc, float[] work, int _work_offset); + protected abstract void slatzmK(String side, int m, int n, float[] v, int offsetv, int incv, float tau, float[] c1, int offsetc1, float[] c2, int offsetc2, int Ldc, float[] work, int offsetwork); public void slauu2(String uplo, int n, float[] a, int lda, org.netlib.util.intW info) { slauu2(uplo, n, a, 0, lda, info); } - public void slauu2(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info) { + public void slauu2(String uplo, int n, float[] a, int offseta, int lda, org.netlib.util.intW info) { //FIXME Add arguments check - slauu2K(uplo, n, a, _a_offset, lda, info); + slauu2K(uplo, n, a, offseta, lda, info); } - protected abstract void slauu2K(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected abstract void slauu2K(String uplo, int n, float[] a, int offseta, int lda, org.netlib.util.intW info); public void slauum(String uplo, int n, float[] a, int lda, org.netlib.util.intW info) { slauum(uplo, n, a, 0, lda, info); } - public void slauum(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info) { + public void slauum(String uplo, int n, float[] a, int offseta, int lda, org.netlib.util.intW info) { //FIXME Add arguments check - slauumK(uplo, n, a, _a_offset, lda, info); + slauumK(uplo, n, a, offseta, lda, info); } - protected abstract void slauumK(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected abstract void slauumK(String uplo, int n, float[] a, int offseta, int lda, org.netlib.util.intW info); public void slazq3(int i0, org.netlib.util.intW n0, float[] z, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW sigma, org.netlib.util.floatW desig, org.netlib.util.floatW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee, org.netlib.util.intW ttype, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dn1, org.netlib.util.floatW dn2, org.netlib.util.floatW tau) { slazq3(i0, n0, z, 0, pp, dmin, sigma, desig, qmax, nfail, iter, ndiv, ieee, ttype, dmin1, dmin2, dn, dn1, dn2, tau); } - public void slazq3(int i0, org.netlib.util.intW n0, float[] z, int _z_offset, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW sigma, org.netlib.util.floatW desig, org.netlib.util.floatW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee, org.netlib.util.intW ttype, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dn1, org.netlib.util.floatW dn2, org.netlib.util.floatW tau) { + public void slazq3(int i0, org.netlib.util.intW n0, float[] z, int offsetz, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW sigma, org.netlib.util.floatW desig, org.netlib.util.floatW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee, org.netlib.util.intW ttype, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dn1, org.netlib.util.floatW dn2, org.netlib.util.floatW tau) { //FIXME Add arguments check - slazq3K(i0, n0, z, _z_offset, pp, dmin, sigma, desig, qmax, nfail, iter, ndiv, ieee, ttype, dmin1, dmin2, dn, dn1, dn2, tau); + slazq3K(i0, n0, z, offsetz, pp, dmin, sigma, desig, qmax, nfail, iter, ndiv, ieee, ttype, dmin1, dmin2, dn, dn1, dn2, tau); } - protected abstract void slazq3K(int i0, org.netlib.util.intW n0, float[] z, int _z_offset, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW sigma, org.netlib.util.floatW desig, org.netlib.util.floatW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee, org.netlib.util.intW ttype, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dn1, org.netlib.util.floatW dn2, org.netlib.util.floatW tau); + protected abstract void slazq3K(int i0, org.netlib.util.intW n0, float[] z, int offsetz, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW sigma, org.netlib.util.floatW desig, org.netlib.util.floatW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee, org.netlib.util.intW ttype, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dn1, org.netlib.util.floatW dn2, org.netlib.util.floatW tau); public void slazq4(int i0, int n0, float[] z, int pp, int n0in, float dmin, float dmin1, float dmin2, float dn, float dn1, float dn2, org.netlib.util.floatW tau, org.netlib.util.intW ttype, org.netlib.util.floatW g) { slazq4(i0, n0, z, 0, pp, n0in, dmin, dmin1, dmin2, dn, dn1, dn2, tau, ttype, g); } - public void slazq4(int i0, int n0, float[] z, int _z_offset, int pp, int n0in, float dmin, float dmin1, float dmin2, float dn, float dn1, float dn2, org.netlib.util.floatW tau, org.netlib.util.intW ttype, org.netlib.util.floatW g) { + public void slazq4(int i0, int n0, float[] z, int offsetz, int pp, int n0in, float dmin, float dmin1, float dmin2, float dn, float dn1, float dn2, org.netlib.util.floatW tau, org.netlib.util.intW ttype, org.netlib.util.floatW g) { //FIXME Add arguments check - slazq4K(i0, n0, z, _z_offset, pp, n0in, dmin, dmin1, dmin2, dn, dn1, dn2, tau, ttype, g); + slazq4K(i0, n0, z, offsetz, pp, n0in, dmin, dmin1, dmin2, dn, dn1, dn2, tau, ttype, g); } - protected abstract void slazq4K(int i0, int n0, float[] z, int _z_offset, int pp, int n0in, float dmin, float dmin1, float dmin2, float dn, float dn1, float dn2, org.netlib.util.floatW tau, org.netlib.util.intW ttype, org.netlib.util.floatW g); + protected abstract void slazq4K(int i0, int n0, float[] z, int offsetz, int pp, int n0in, float dmin, float dmin1, float dmin2, float dn, float dn1, float dn2, org.netlib.util.floatW tau, org.netlib.util.intW ttype, org.netlib.util.floatW g); public void sopgtr(String uplo, int n, float[] ap, float[] tau, float[] q, int ldq, float[] work, org.netlib.util.intW info) { sopgtr(uplo, n, ap, 0, tau, 0, q, 0, ldq, work, 0, info); } - public void sopgtr(String uplo, int n, float[] ap, int _ap_offset, float[] tau, int _tau_offset, float[] q, int _q_offset, int ldq, float[] work, int _work_offset, org.netlib.util.intW info) { + public void sopgtr(String uplo, int n, float[] ap, int offsetap, float[] tau, int offsettau, float[] q, int offsetq, int ldq, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - sopgtrK(uplo, n, ap, _ap_offset, tau, _tau_offset, q, _q_offset, ldq, work, _work_offset, info); + sopgtrK(uplo, n, ap, offsetap, tau, offsettau, q, offsetq, ldq, work, offsetwork, info); } - protected abstract void sopgtrK(String uplo, int n, float[] ap, int _ap_offset, float[] tau, int _tau_offset, float[] q, int _q_offset, int ldq, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void sopgtrK(String uplo, int n, float[] ap, int offsetap, float[] tau, int offsettau, float[] q, int offsetq, int ldq, float[] work, int offsetwork, org.netlib.util.intW info); public void sopmtr(String side, String uplo, String trans, int m, int n, float[] ap, float[] tau, float[] c, int Ldc, float[] work, org.netlib.util.intW info) { sopmtr(side, uplo, trans, m, n, ap, 0, tau, 0, c, 0, Ldc, work, 0, info); } - public void sopmtr(String side, String uplo, String trans, int m, int n, float[] ap, int _ap_offset, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info) { + public void sopmtr(String side, String uplo, String trans, int m, int n, float[] ap, int offsetap, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - sopmtrK(side, uplo, trans, m, n, ap, _ap_offset, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + sopmtrK(side, uplo, trans, m, n, ap, offsetap, tau, offsettau, c, offsetc, Ldc, work, offsetwork, info); } - protected abstract void sopmtrK(String side, String uplo, String trans, int m, int n, float[] ap, int _ap_offset, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void sopmtrK(String side, String uplo, String trans, int m, int n, float[] ap, int offsetap, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info); public void sorg2l(int m, int n, int k, float[] a, int lda, float[] tau, float[] work, org.netlib.util.intW info) { sorg2l(m, n, k, a, 0, lda, tau, 0, work, 0, info); } - public void sorg2l(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { + public void sorg2l(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - sorg2lK(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + sorg2lK(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected abstract void sorg2lK(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void sorg2lK(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); public void sorg2r(int m, int n, int k, float[] a, int lda, float[] tau, float[] work, org.netlib.util.intW info) { sorg2r(m, n, k, a, 0, lda, tau, 0, work, 0, info); } - public void sorg2r(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { + public void sorg2r(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - sorg2rK(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + sorg2rK(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected abstract void sorg2rK(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void sorg2rK(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); public void sorgbr(String vect, int m, int n, int k, float[] a, int lda, float[] tau, float[] work, int lwork, org.netlib.util.intW info) { sorgbr(vect, m, n, k, a, 0, lda, tau, 0, work, 0, lwork, info); } - public void sorgbr(String vect, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sorgbr(String vect, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sorgbrK(vect, m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + sorgbrK(vect, m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected abstract void sorgbrK(String vect, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sorgbrK(String vect, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sorghr(int n, int ilo, int ihi, float[] a, int lda, float[] tau, float[] work, int lwork, org.netlib.util.intW info) { sorghr(n, ilo, ihi, a, 0, lda, tau, 0, work, 0, lwork, info); } - public void sorghr(int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sorghr(int n, int ilo, int ihi, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sorghrK(n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + sorghrK(n, ilo, ihi, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected abstract void sorghrK(int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sorghrK(int n, int ilo, int ihi, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sorgl2(int m, int n, int k, float[] a, int lda, float[] tau, float[] work, org.netlib.util.intW info) { sorgl2(m, n, k, a, 0, lda, tau, 0, work, 0, info); } - public void sorgl2(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { + public void sorgl2(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - sorgl2K(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + sorgl2K(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected abstract void sorgl2K(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void sorgl2K(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); public void sorglq(int m, int n, int k, float[] a, int lda, float[] tau, float[] work, int lwork, org.netlib.util.intW info) { sorglq(m, n, k, a, 0, lda, tau, 0, work, 0, lwork, info); } - public void sorglq(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sorglq(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sorglqK(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + sorglqK(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected abstract void sorglqK(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sorglqK(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sorgql(int m, int n, int k, float[] a, int lda, float[] tau, float[] work, int lwork, org.netlib.util.intW info) { sorgql(m, n, k, a, 0, lda, tau, 0, work, 0, lwork, info); } - public void sorgql(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sorgql(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sorgqlK(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + sorgqlK(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected abstract void sorgqlK(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sorgqlK(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sorgqr(int m, int n, int k, float[] a, int lda, float[] tau, float[] work, int lwork, org.netlib.util.intW info) { sorgqr(m, n, k, a, 0, lda, tau, 0, work, 0, lwork, info); } - public void sorgqr(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sorgqr(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sorgqrK(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + sorgqrK(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected abstract void sorgqrK(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sorgqrK(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sorgr2(int m, int n, int k, float[] a, int lda, float[] tau, float[] work, org.netlib.util.intW info) { sorgr2(m, n, k, a, 0, lda, tau, 0, work, 0, info); } - public void sorgr2(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { + public void sorgr2(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - sorgr2K(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + sorgr2K(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected abstract void sorgr2K(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void sorgr2K(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); public void sorgrq(int m, int n, int k, float[] a, int lda, float[] tau, float[] work, int lwork, org.netlib.util.intW info) { sorgrq(m, n, k, a, 0, lda, tau, 0, work, 0, lwork, info); } - public void sorgrq(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sorgrq(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sorgrqK(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + sorgrqK(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected abstract void sorgrqK(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sorgrqK(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sorgtr(String uplo, int n, float[] a, int lda, float[] tau, float[] work, int lwork, org.netlib.util.intW info) { sorgtr(uplo, n, a, 0, lda, tau, 0, work, 0, lwork, info); } - public void sorgtr(String uplo, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sorgtr(String uplo, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sorgtrK(uplo, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + sorgtrK(uplo, n, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected abstract void sorgtrK(String uplo, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sorgtrK(String uplo, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sorm2l(String side, String trans, int m, int n, int k, float[] a, int lda, float[] tau, float[] c, int Ldc, float[] work, org.netlib.util.intW info) { sorm2l(side, trans, m, n, k, a, 0, lda, tau, 0, c, 0, Ldc, work, 0, info); } - public void sorm2l(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info) { + public void sorm2l(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - sorm2lK(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + sorm2lK(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, info); } - protected abstract void sorm2lK(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void sorm2lK(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info); public void sorm2r(String side, String trans, int m, int n, int k, float[] a, int lda, float[] tau, float[] c, int Ldc, float[] work, org.netlib.util.intW info) { sorm2r(side, trans, m, n, k, a, 0, lda, tau, 0, c, 0, Ldc, work, 0, info); } - public void sorm2r(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info) { + public void sorm2r(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - sorm2rK(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + sorm2rK(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, info); } - protected abstract void sorm2rK(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void sorm2rK(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info); public void sormbr(String vect, String side, String trans, int m, int n, int k, float[] a, int lda, float[] tau, float[] c, int Ldc, float[] work, int lwork, org.netlib.util.intW info) { sormbr(vect, side, trans, m, n, k, a, 0, lda, tau, 0, c, 0, Ldc, work, 0, lwork, info); } - public void sormbr(String vect, String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sormbr(String vect, String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sormbrK(vect, side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + sormbrK(vect, side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected abstract void sormbrK(String vect, String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sormbrK(String vect, String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sormhr(String side, String trans, int m, int n, int ilo, int ihi, float[] a, int lda, float[] tau, float[] c, int Ldc, float[] work, int lwork, org.netlib.util.intW info) { sormhr(side, trans, m, n, ilo, ihi, a, 0, lda, tau, 0, c, 0, Ldc, work, 0, lwork, info); } - public void sormhr(String side, String trans, int m, int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sormhr(String side, String trans, int m, int n, int ilo, int ihi, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sormhrK(side, trans, m, n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + sormhrK(side, trans, m, n, ilo, ihi, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected abstract void sormhrK(String side, String trans, int m, int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sormhrK(String side, String trans, int m, int n, int ilo, int ihi, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sorml2(String side, String trans, int m, int n, int k, float[] a, int lda, float[] tau, float[] c, int Ldc, float[] work, org.netlib.util.intW info) { sorml2(side, trans, m, n, k, a, 0, lda, tau, 0, c, 0, Ldc, work, 0, info); } - public void sorml2(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info) { + public void sorml2(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - sorml2K(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + sorml2K(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, info); } - protected abstract void sorml2K(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void sorml2K(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info); public void sormlq(String side, String trans, int m, int n, int k, float[] a, int lda, float[] tau, float[] c, int Ldc, float[] work, int lwork, org.netlib.util.intW info) { sormlq(side, trans, m, n, k, a, 0, lda, tau, 0, c, 0, Ldc, work, 0, lwork, info); } - public void sormlq(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sormlq(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sormlqK(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + sormlqK(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected abstract void sormlqK(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sormlqK(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sormql(String side, String trans, int m, int n, int k, float[] a, int lda, float[] tau, float[] c, int Ldc, float[] work, int lwork, org.netlib.util.intW info) { sormql(side, trans, m, n, k, a, 0, lda, tau, 0, c, 0, Ldc, work, 0, lwork, info); } - public void sormql(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sormql(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sormqlK(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + sormqlK(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected abstract void sormqlK(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sormqlK(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sormqr(String side, String trans, int m, int n, int k, float[] a, int lda, float[] tau, float[] c, int Ldc, float[] work, int lwork, org.netlib.util.intW info) { sormqr(side, trans, m, n, k, a, 0, lda, tau, 0, c, 0, Ldc, work, 0, lwork, info); } - public void sormqr(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sormqr(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sormqrK(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + sormqrK(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected abstract void sormqrK(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sormqrK(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sormr2(String side, String trans, int m, int n, int k, float[] a, int lda, float[] tau, float[] c, int Ldc, float[] work, org.netlib.util.intW info) { sormr2(side, trans, m, n, k, a, 0, lda, tau, 0, c, 0, Ldc, work, 0, info); } - public void sormr2(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info) { + public void sormr2(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - sormr2K(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + sormr2K(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, info); } - protected abstract void sormr2K(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void sormr2K(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info); public void sormr3(String side, String trans, int m, int n, int k, int l, float[] a, int lda, float[] tau, float[] c, int Ldc, float[] work, org.netlib.util.intW info) { sormr3(side, trans, m, n, k, l, a, 0, lda, tau, 0, c, 0, Ldc, work, 0, info); } - public void sormr3(String side, String trans, int m, int n, int k, int l, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info) { + public void sormr3(String side, String trans, int m, int n, int k, int l, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - sormr3K(side, trans, m, n, k, l, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + sormr3K(side, trans, m, n, k, l, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, info); } - protected abstract void sormr3K(String side, String trans, int m, int n, int k, int l, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void sormr3K(String side, String trans, int m, int n, int k, int l, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info); public void sormrq(String side, String trans, int m, int n, int k, float[] a, int lda, float[] tau, float[] c, int Ldc, float[] work, int lwork, org.netlib.util.intW info) { sormrq(side, trans, m, n, k, a, 0, lda, tau, 0, c, 0, Ldc, work, 0, lwork, info); } - public void sormrq(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sormrq(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sormrqK(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + sormrqK(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected abstract void sormrqK(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sormrqK(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sormrz(String side, String trans, int m, int n, int k, int l, float[] a, int lda, float[] tau, float[] c, int Ldc, float[] work, int lwork, org.netlib.util.intW info) { sormrz(side, trans, m, n, k, l, a, 0, lda, tau, 0, c, 0, Ldc, work, 0, lwork, info); } - public void sormrz(String side, String trans, int m, int n, int k, int l, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sormrz(String side, String trans, int m, int n, int k, int l, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sormrzK(side, trans, m, n, k, l, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + sormrzK(side, trans, m, n, k, l, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected abstract void sormrzK(String side, String trans, int m, int n, int k, int l, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sormrzK(String side, String trans, int m, int n, int k, int l, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void sormtr(String side, String uplo, String trans, int m, int n, float[] a, int lda, float[] tau, float[] c, int Ldc, float[] work, int lwork, org.netlib.util.intW info) { sormtr(side, uplo, trans, m, n, a, 0, lda, tau, 0, c, 0, Ldc, work, 0, lwork, info); } - public void sormtr(String side, String uplo, String trans, int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void sormtr(String side, String uplo, String trans, int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - sormtrK(side, uplo, trans, m, n, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + sormtrK(side, uplo, trans, m, n, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected abstract void sormtrK(String side, String uplo, String trans, int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void sormtrK(String side, String uplo, String trans, int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void spbcon(String uplo, int n, int kd, float[] ab, int ldab, float anorm, org.netlib.util.floatW rcond, float[] work, int[] iwork, org.netlib.util.intW info) { spbcon(uplo, n, kd, ab, 0, ldab, anorm, rcond, work, 0, iwork, 0, info); } - public void spbcon(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void spbcon(String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - spbconK(uplo, n, kd, ab, _ab_offset, ldab, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + spbconK(uplo, n, kd, ab, offsetab, ldab, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void spbconK(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void spbconK(String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void spbequ(String uplo, int n, int kd, float[] ab, int ldab, float[] s, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info) { spbequ(uplo, n, kd, ab, 0, ldab, s, 0, scond, amax, info); } - public void spbequ(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] s, int _s_offset, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info) { + public void spbequ(String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float[] s, int offsets, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info) { //FIXME Add arguments check - spbequK(uplo, n, kd, ab, _ab_offset, ldab, s, _s_offset, scond, amax, info); + spbequK(uplo, n, kd, ab, offsetab, ldab, s, offsets, scond, amax, info); } - protected abstract void spbequK(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] s, int _s_offset, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info); + protected abstract void spbequK(String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float[] s, int offsets, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info); public void spbrfs(String uplo, int n, int kd, int nrhs, float[] ab, int ldab, float[] afb, int ldafb, float[] b, int ldb, float[] x, int ldx, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info) { spbrfs(uplo, n, kd, nrhs, ab, 0, ldab, afb, 0, ldafb, b, 0, ldb, x, 0, ldx, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void spbrfs(String uplo, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] afb, int _afb_offset, int ldafb, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void spbrfs(String uplo, int n, int kd, int nrhs, float[] ab, int offsetab, int ldab, float[] afb, int offsetafb, int ldafb, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - spbrfsK(uplo, n, kd, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + spbrfsK(uplo, n, kd, nrhs, ab, offsetab, ldab, afb, offsetafb, ldafb, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void spbrfsK(String uplo, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] afb, int _afb_offset, int ldafb, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void spbrfsK(String uplo, int n, int kd, int nrhs, float[] ab, int offsetab, int ldab, float[] afb, int offsetafb, int ldafb, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void spbstf(String uplo, int n, int kd, float[] ab, int ldab, org.netlib.util.intW info) { spbstf(uplo, n, kd, ab, 0, ldab, info); } - public void spbstf(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, org.netlib.util.intW info) { + public void spbstf(String uplo, int n, int kd, float[] ab, int offsetab, int ldab, org.netlib.util.intW info) { //FIXME Add arguments check - spbstfK(uplo, n, kd, ab, _ab_offset, ldab, info); + spbstfK(uplo, n, kd, ab, offsetab, ldab, info); } - protected abstract void spbstfK(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, org.netlib.util.intW info); + protected abstract void spbstfK(String uplo, int n, int kd, float[] ab, int offsetab, int ldab, org.netlib.util.intW info); public void spbsv(String uplo, int n, int kd, int nrhs, float[] ab, int ldab, float[] b, int ldb, org.netlib.util.intW info) { spbsv(uplo, n, kd, nrhs, ab, 0, ldab, b, 0, ldb, info); } - public void spbsv(String uplo, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void spbsv(String uplo, int n, int kd, int nrhs, float[] ab, int offsetab, int ldab, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - spbsvK(uplo, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, info); + spbsvK(uplo, n, kd, nrhs, ab, offsetab, ldab, b, offsetb, ldb, info); } - protected abstract void spbsvK(String uplo, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void spbsvK(String uplo, int n, int kd, int nrhs, float[] ab, int offsetab, int ldab, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void spbsvx(String fact, String uplo, int n, int kd, int nrhs, float[] ab, int ldab, float[] afb, int ldafb, org.netlib.util.StringW equed, float[] s, float[] b, int ldb, float[] x, int ldx, org.netlib.util.floatW rcond, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info) { spbsvx(fact, uplo, n, kd, nrhs, ab, 0, ldab, afb, 0, ldafb, equed, s, 0, b, 0, ldb, x, 0, ldx, rcond, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void spbsvx(String fact, String uplo, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] afb, int _afb_offset, int ldafb, org.netlib.util.StringW equed, float[] s, int _s_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void spbsvx(String fact, String uplo, int n, int kd, int nrhs, float[] ab, int offsetab, int ldab, float[] afb, int offsetafb, int ldafb, org.netlib.util.StringW equed, float[] s, int offsets, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - spbsvxK(fact, uplo, n, kd, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, equed, s, _s_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + spbsvxK(fact, uplo, n, kd, nrhs, ab, offsetab, ldab, afb, offsetafb, ldafb, equed, s, offsets, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void spbsvxK(String fact, String uplo, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] afb, int _afb_offset, int ldafb, org.netlib.util.StringW equed, float[] s, int _s_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void spbsvxK(String fact, String uplo, int n, int kd, int nrhs, float[] ab, int offsetab, int ldab, float[] afb, int offsetafb, int ldafb, org.netlib.util.StringW equed, float[] s, int offsets, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void spbtf2(String uplo, int n, int kd, float[] ab, int ldab, org.netlib.util.intW info) { spbtf2(uplo, n, kd, ab, 0, ldab, info); } - public void spbtf2(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, org.netlib.util.intW info) { + public void spbtf2(String uplo, int n, int kd, float[] ab, int offsetab, int ldab, org.netlib.util.intW info) { //FIXME Add arguments check - spbtf2K(uplo, n, kd, ab, _ab_offset, ldab, info); + spbtf2K(uplo, n, kd, ab, offsetab, ldab, info); } - protected abstract void spbtf2K(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, org.netlib.util.intW info); + protected abstract void spbtf2K(String uplo, int n, int kd, float[] ab, int offsetab, int ldab, org.netlib.util.intW info); public void spbtrf(String uplo, int n, int kd, float[] ab, int ldab, org.netlib.util.intW info) { spbtrf(uplo, n, kd, ab, 0, ldab, info); } - public void spbtrf(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, org.netlib.util.intW info) { + public void spbtrf(String uplo, int n, int kd, float[] ab, int offsetab, int ldab, org.netlib.util.intW info) { //FIXME Add arguments check - spbtrfK(uplo, n, kd, ab, _ab_offset, ldab, info); + spbtrfK(uplo, n, kd, ab, offsetab, ldab, info); } - protected abstract void spbtrfK(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, org.netlib.util.intW info); + protected abstract void spbtrfK(String uplo, int n, int kd, float[] ab, int offsetab, int ldab, org.netlib.util.intW info); public void spbtrs(String uplo, int n, int kd, int nrhs, float[] ab, int ldab, float[] b, int ldb, org.netlib.util.intW info) { spbtrs(uplo, n, kd, nrhs, ab, 0, ldab, b, 0, ldb, info); } - public void spbtrs(String uplo, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void spbtrs(String uplo, int n, int kd, int nrhs, float[] ab, int offsetab, int ldab, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - spbtrsK(uplo, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, info); + spbtrsK(uplo, n, kd, nrhs, ab, offsetab, ldab, b, offsetb, ldb, info); } - protected abstract void spbtrsK(String uplo, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void spbtrsK(String uplo, int n, int kd, int nrhs, float[] ab, int offsetab, int ldab, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void spocon(String uplo, int n, float[] a, int lda, float anorm, org.netlib.util.floatW rcond, float[] work, int[] iwork, org.netlib.util.intW info) { spocon(uplo, n, a, 0, lda, anorm, rcond, work, 0, iwork, 0, info); } - public void spocon(String uplo, int n, float[] a, int _a_offset, int lda, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void spocon(String uplo, int n, float[] a, int offseta, int lda, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - spoconK(uplo, n, a, _a_offset, lda, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + spoconK(uplo, n, a, offseta, lda, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void spoconK(String uplo, int n, float[] a, int _a_offset, int lda, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void spoconK(String uplo, int n, float[] a, int offseta, int lda, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void spoequ(int n, float[] a, int lda, float[] s, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info) { spoequ(n, a, 0, lda, s, 0, scond, amax, info); } - public void spoequ(int n, float[] a, int _a_offset, int lda, float[] s, int _s_offset, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info) { + public void spoequ(int n, float[] a, int offseta, int lda, float[] s, int offsets, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info) { //FIXME Add arguments check - spoequK(n, a, _a_offset, lda, s, _s_offset, scond, amax, info); + spoequK(n, a, offseta, lda, s, offsets, scond, amax, info); } - protected abstract void spoequK(int n, float[] a, int _a_offset, int lda, float[] s, int _s_offset, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info); + protected abstract void spoequK(int n, float[] a, int offseta, int lda, float[] s, int offsets, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info); public void sporfs(String uplo, int n, int nrhs, float[] a, int lda, float[] af, int ldaf, float[] b, int ldb, float[] x, int ldx, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info) { sporfs(uplo, n, nrhs, a, 0, lda, af, 0, ldaf, b, 0, ldb, x, 0, ldx, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void sporfs(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void sporfs(String uplo, int n, int nrhs, float[] a, int offseta, int lda, float[] af, int offsetaf, int ldaf, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - sporfsK(uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + sporfsK(uplo, n, nrhs, a, offseta, lda, af, offsetaf, ldaf, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void sporfsK(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void sporfsK(String uplo, int n, int nrhs, float[] a, int offseta, int lda, float[] af, int offsetaf, int ldaf, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sposv(String uplo, int n, int nrhs, float[] a, int lda, float[] b, int ldb, org.netlib.util.intW info) { sposv(uplo, n, nrhs, a, 0, lda, b, 0, ldb, info); } - public void sposv(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void sposv(String uplo, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - sposvK(uplo, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, info); + sposvK(uplo, n, nrhs, a, offseta, lda, b, offsetb, ldb, info); } - protected abstract void sposvK(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void sposvK(String uplo, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void sposvx(String fact, String uplo, int n, int nrhs, float[] a, int lda, float[] af, int ldaf, org.netlib.util.StringW equed, float[] s, float[] b, int ldb, float[] x, int ldx, org.netlib.util.floatW rcond, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info) { sposvx(fact, uplo, n, nrhs, a, 0, lda, af, 0, ldaf, equed, s, 0, b, 0, ldb, x, 0, ldx, rcond, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void sposvx(String fact, String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, org.netlib.util.StringW equed, float[] s, int _s_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void sposvx(String fact, String uplo, int n, int nrhs, float[] a, int offseta, int lda, float[] af, int offsetaf, int ldaf, org.netlib.util.StringW equed, float[] s, int offsets, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - sposvxK(fact, uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, equed, s, _s_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + sposvxK(fact, uplo, n, nrhs, a, offseta, lda, af, offsetaf, ldaf, equed, s, offsets, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void sposvxK(String fact, String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, org.netlib.util.StringW equed, float[] s, int _s_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void sposvxK(String fact, String uplo, int n, int nrhs, float[] a, int offseta, int lda, float[] af, int offsetaf, int ldaf, org.netlib.util.StringW equed, float[] s, int offsets, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void spotf2(String uplo, int n, float[] a, int lda, org.netlib.util.intW info) { spotf2(uplo, n, a, 0, lda, info); } - public void spotf2(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info) { + public void spotf2(String uplo, int n, float[] a, int offseta, int lda, org.netlib.util.intW info) { //FIXME Add arguments check - spotf2K(uplo, n, a, _a_offset, lda, info); + spotf2K(uplo, n, a, offseta, lda, info); } - protected abstract void spotf2K(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected abstract void spotf2K(String uplo, int n, float[] a, int offseta, int lda, org.netlib.util.intW info); public void spotrf(String uplo, int n, float[] a, int lda, org.netlib.util.intW info) { spotrf(uplo, n, a, 0, lda, info); } - public void spotrf(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info) { + public void spotrf(String uplo, int n, float[] a, int offseta, int lda, org.netlib.util.intW info) { //FIXME Add arguments check - spotrfK(uplo, n, a, _a_offset, lda, info); + spotrfK(uplo, n, a, offseta, lda, info); } - protected abstract void spotrfK(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected abstract void spotrfK(String uplo, int n, float[] a, int offseta, int lda, org.netlib.util.intW info); public void spotri(String uplo, int n, float[] a, int lda, org.netlib.util.intW info) { spotri(uplo, n, a, 0, lda, info); } - public void spotri(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info) { + public void spotri(String uplo, int n, float[] a, int offseta, int lda, org.netlib.util.intW info) { //FIXME Add arguments check - spotriK(uplo, n, a, _a_offset, lda, info); + spotriK(uplo, n, a, offseta, lda, info); } - protected abstract void spotriK(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected abstract void spotriK(String uplo, int n, float[] a, int offseta, int lda, org.netlib.util.intW info); public void spotrs(String uplo, int n, int nrhs, float[] a, int lda, float[] b, int ldb, org.netlib.util.intW info) { spotrs(uplo, n, nrhs, a, 0, lda, b, 0, ldb, info); } - public void spotrs(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void spotrs(String uplo, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - spotrsK(uplo, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, info); + spotrsK(uplo, n, nrhs, a, offseta, lda, b, offsetb, ldb, info); } - protected abstract void spotrsK(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void spotrsK(String uplo, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void sppcon(String uplo, int n, float[] ap, float anorm, org.netlib.util.floatW rcond, float[] work, int[] iwork, org.netlib.util.intW info) { sppcon(uplo, n, ap, 0, anorm, rcond, work, 0, iwork, 0, info); } - public void sppcon(String uplo, int n, float[] ap, int _ap_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void sppcon(String uplo, int n, float[] ap, int offsetap, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - sppconK(uplo, n, ap, _ap_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + sppconK(uplo, n, ap, offsetap, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void sppconK(String uplo, int n, float[] ap, int _ap_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void sppconK(String uplo, int n, float[] ap, int offsetap, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sppequ(String uplo, int n, float[] ap, float[] s, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info) { sppequ(uplo, n, ap, 0, s, 0, scond, amax, info); } - public void sppequ(String uplo, int n, float[] ap, int _ap_offset, float[] s, int _s_offset, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info) { + public void sppequ(String uplo, int n, float[] ap, int offsetap, float[] s, int offsets, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info) { //FIXME Add arguments check - sppequK(uplo, n, ap, _ap_offset, s, _s_offset, scond, amax, info); + sppequK(uplo, n, ap, offsetap, s, offsets, scond, amax, info); } - protected abstract void sppequK(String uplo, int n, float[] ap, int _ap_offset, float[] s, int _s_offset, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info); + protected abstract void sppequK(String uplo, int n, float[] ap, int offsetap, float[] s, int offsets, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info); public void spprfs(String uplo, int n, int nrhs, float[] ap, float[] afp, float[] b, int ldb, float[] x, int ldx, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info) { spprfs(uplo, n, nrhs, ap, 0, afp, 0, b, 0, ldb, x, 0, ldx, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void spprfs(String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] afp, int _afp_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void spprfs(String uplo, int n, int nrhs, float[] ap, int offsetap, float[] afp, int offsetafp, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - spprfsK(uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + spprfsK(uplo, n, nrhs, ap, offsetap, afp, offsetafp, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void spprfsK(String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] afp, int _afp_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void spprfsK(String uplo, int n, int nrhs, float[] ap, int offsetap, float[] afp, int offsetafp, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sppsv(String uplo, int n, int nrhs, float[] ap, float[] b, int ldb, org.netlib.util.intW info) { sppsv(uplo, n, nrhs, ap, 0, b, 0, ldb, info); } - public void sppsv(String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void sppsv(String uplo, int n, int nrhs, float[] ap, int offsetap, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - sppsvK(uplo, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, info); + sppsvK(uplo, n, nrhs, ap, offsetap, b, offsetb, ldb, info); } - protected abstract void sppsvK(String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void sppsvK(String uplo, int n, int nrhs, float[] ap, int offsetap, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void sppsvx(String fact, String uplo, int n, int nrhs, float[] ap, float[] afp, org.netlib.util.StringW equed, float[] s, float[] b, int ldb, float[] x, int ldx, org.netlib.util.floatW rcond, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info) { sppsvx(fact, uplo, n, nrhs, ap, 0, afp, 0, equed, s, 0, b, 0, ldb, x, 0, ldx, rcond, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void sppsvx(String fact, String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] afp, int _afp_offset, org.netlib.util.StringW equed, float[] s, int _s_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void sppsvx(String fact, String uplo, int n, int nrhs, float[] ap, int offsetap, float[] afp, int offsetafp, org.netlib.util.StringW equed, float[] s, int offsets, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - sppsvxK(fact, uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, equed, s, _s_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + sppsvxK(fact, uplo, n, nrhs, ap, offsetap, afp, offsetafp, equed, s, offsets, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void sppsvxK(String fact, String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] afp, int _afp_offset, org.netlib.util.StringW equed, float[] s, int _s_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void sppsvxK(String fact, String uplo, int n, int nrhs, float[] ap, int offsetap, float[] afp, int offsetafp, org.netlib.util.StringW equed, float[] s, int offsets, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void spptrf(String uplo, int n, float[] ap, org.netlib.util.intW info) { spptrf(uplo, n, ap, 0, info); } - public void spptrf(String uplo, int n, float[] ap, int _ap_offset, org.netlib.util.intW info) { + public void spptrf(String uplo, int n, float[] ap, int offsetap, org.netlib.util.intW info) { //FIXME Add arguments check - spptrfK(uplo, n, ap, _ap_offset, info); + spptrfK(uplo, n, ap, offsetap, info); } - protected abstract void spptrfK(String uplo, int n, float[] ap, int _ap_offset, org.netlib.util.intW info); + protected abstract void spptrfK(String uplo, int n, float[] ap, int offsetap, org.netlib.util.intW info); public void spptri(String uplo, int n, float[] ap, org.netlib.util.intW info) { spptri(uplo, n, ap, 0, info); } - public void spptri(String uplo, int n, float[] ap, int _ap_offset, org.netlib.util.intW info) { + public void spptri(String uplo, int n, float[] ap, int offsetap, org.netlib.util.intW info) { //FIXME Add arguments check - spptriK(uplo, n, ap, _ap_offset, info); + spptriK(uplo, n, ap, offsetap, info); } - protected abstract void spptriK(String uplo, int n, float[] ap, int _ap_offset, org.netlib.util.intW info); + protected abstract void spptriK(String uplo, int n, float[] ap, int offsetap, org.netlib.util.intW info); public void spptrs(String uplo, int n, int nrhs, float[] ap, float[] b, int ldb, org.netlib.util.intW info) { spptrs(uplo, n, nrhs, ap, 0, b, 0, ldb, info); } - public void spptrs(String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void spptrs(String uplo, int n, int nrhs, float[] ap, int offsetap, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - spptrsK(uplo, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, info); + spptrsK(uplo, n, nrhs, ap, offsetap, b, offsetb, ldb, info); } - protected abstract void spptrsK(String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void spptrsK(String uplo, int n, int nrhs, float[] ap, int offsetap, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void sptcon(int n, float[] d, float[] e, float anorm, org.netlib.util.floatW rcond, float[] work, org.netlib.util.intW info) { sptcon(n, d, 0, e, 0, anorm, rcond, work, 0, info); } - public void sptcon(int n, float[] d, int _d_offset, float[] e, int _e_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, org.netlib.util.intW info) { + public void sptcon(int n, float[] d, int offsetd, float[] e, int offsete, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - sptconK(n, d, _d_offset, e, _e_offset, anorm, rcond, work, _work_offset, info); + sptconK(n, d, offsetd, e, offsete, anorm, rcond, work, offsetwork, info); } - protected abstract void sptconK(int n, float[] d, int _d_offset, float[] e, int _e_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void sptconK(int n, float[] d, int offsetd, float[] e, int offsete, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, org.netlib.util.intW info); public void spteqr(String compz, int n, float[] d, float[] e, float[] z, int ldz, float[] work, org.netlib.util.intW info) { spteqr(compz, n, d, 0, e, 0, z, 0, ldz, work, 0, info); } - public void spteqr(String compz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info) { + public void spteqr(String compz, int n, float[] d, int offsetd, float[] e, int offsete, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - spteqrK(compz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, info); + spteqrK(compz, n, d, offsetd, e, offsete, z, offsetz, ldz, work, offsetwork, info); } - protected abstract void spteqrK(String compz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void spteqrK(String compz, int n, float[] d, int offsetd, float[] e, int offsete, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info); public void sptrfs(int n, int nrhs, float[] d, float[] e, float[] df, float[] ef, float[] b, int ldb, float[] x, int ldx, float[] ferr, float[] berr, float[] work, org.netlib.util.intW info) { sptrfs(n, nrhs, d, 0, e, 0, df, 0, ef, 0, b, 0, ldb, x, 0, ldx, ferr, 0, berr, 0, work, 0, info); } - public void sptrfs(int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] df, int _df_offset, float[] ef, int _ef_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, org.netlib.util.intW info) { + public void sptrfs(int n, int nrhs, float[] d, int offsetd, float[] e, int offsete, float[] df, int offsetdf, float[] ef, int offsetef, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - sptrfsK(n, nrhs, d, _d_offset, e, _e_offset, df, _df_offset, ef, _ef_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, info); + sptrfsK(n, nrhs, d, offsetd, e, offsete, df, offsetdf, ef, offsetef, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, info); } - protected abstract void sptrfsK(int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] df, int _df_offset, float[] ef, int _ef_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void sptrfsK(int n, int nrhs, float[] d, int offsetd, float[] e, int offsete, float[] df, int offsetdf, float[] ef, int offsetef, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, org.netlib.util.intW info); public void sptsv(int n, int nrhs, float[] d, float[] e, float[] b, int ldb, org.netlib.util.intW info) { sptsv(n, nrhs, d, 0, e, 0, b, 0, ldb, info); } - public void sptsv(int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void sptsv(int n, int nrhs, float[] d, int offsetd, float[] e, int offsete, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - sptsvK(n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb, info); + sptsvK(n, nrhs, d, offsetd, e, offsete, b, offsetb, ldb, info); } - protected abstract void sptsvK(int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void sptsvK(int n, int nrhs, float[] d, int offsetd, float[] e, int offsete, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void sptsvx(String fact, int n, int nrhs, float[] d, float[] e, float[] df, float[] ef, float[] b, int ldb, float[] x, int ldx, org.netlib.util.floatW rcond, float[] ferr, float[] berr, float[] work, org.netlib.util.intW info) { sptsvx(fact, n, nrhs, d, 0, e, 0, df, 0, ef, 0, b, 0, ldb, x, 0, ldx, rcond, ferr, 0, berr, 0, work, 0, info); } - public void sptsvx(String fact, int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] df, int _df_offset, float[] ef, int _ef_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, org.netlib.util.intW info) { + public void sptsvx(String fact, int n, int nrhs, float[] d, int offsetd, float[] e, int offsete, float[] df, int offsetdf, float[] ef, int offsetef, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - sptsvxK(fact, n, nrhs, d, _d_offset, e, _e_offset, df, _df_offset, ef, _ef_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, info); + sptsvxK(fact, n, nrhs, d, offsetd, e, offsete, df, offsetdf, ef, offsetef, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, info); } - protected abstract void sptsvxK(String fact, int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] df, int _df_offset, float[] ef, int _ef_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void sptsvxK(String fact, int n, int nrhs, float[] d, int offsetd, float[] e, int offsete, float[] df, int offsetdf, float[] ef, int offsetef, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, org.netlib.util.intW info); public void spttrf(int n, float[] d, float[] e, org.netlib.util.intW info) { spttrf(n, d, 0, e, 0, info); } - public void spttrf(int n, float[] d, int _d_offset, float[] e, int _e_offset, org.netlib.util.intW info) { + public void spttrf(int n, float[] d, int offsetd, float[] e, int offsete, org.netlib.util.intW info) { //FIXME Add arguments check - spttrfK(n, d, _d_offset, e, _e_offset, info); + spttrfK(n, d, offsetd, e, offsete, info); } - protected abstract void spttrfK(int n, float[] d, int _d_offset, float[] e, int _e_offset, org.netlib.util.intW info); + protected abstract void spttrfK(int n, float[] d, int offsetd, float[] e, int offsete, org.netlib.util.intW info); public void spttrs(int n, int nrhs, float[] d, float[] e, float[] b, int ldb, org.netlib.util.intW info) { spttrs(n, nrhs, d, 0, e, 0, b, 0, ldb, info); } - public void spttrs(int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void spttrs(int n, int nrhs, float[] d, int offsetd, float[] e, int offsete, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - spttrsK(n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb, info); + spttrsK(n, nrhs, d, offsetd, e, offsete, b, offsetb, ldb, info); } - protected abstract void spttrsK(int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void spttrsK(int n, int nrhs, float[] d, int offsetd, float[] e, int offsete, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void sptts2(int n, int nrhs, float[] d, float[] e, float[] b, int ldb) { sptts2(n, nrhs, d, 0, e, 0, b, 0, ldb); } - public void sptts2(int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] b, int _b_offset, int ldb) { + public void sptts2(int n, int nrhs, float[] d, int offsetd, float[] e, int offsete, float[] b, int offsetb, int ldb) { //FIXME Add arguments check - sptts2K(n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb); + sptts2K(n, nrhs, d, offsetd, e, offsete, b, offsetb, ldb); } - protected abstract void sptts2K(int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] b, int _b_offset, int ldb); + protected abstract void sptts2K(int n, int nrhs, float[] d, int offsetd, float[] e, int offsete, float[] b, int offsetb, int ldb); public void srscl(int n, float sa, float[] sx, int incx) { srscl(n, sa, sx, 0, incx); } - public void srscl(int n, float sa, float[] sx, int _sx_offset, int incx) { + public void srscl(int n, float sa, float[] sx, int offsetsx, int incx) { //FIXME Add arguments check - srsclK(n, sa, sx, _sx_offset, incx); + srsclK(n, sa, sx, offsetsx, incx); } - protected abstract void srsclK(int n, float sa, float[] sx, int _sx_offset, int incx); + protected abstract void srsclK(int n, float sa, float[] sx, int offsetsx, int incx); public void ssbev(String jobz, String uplo, int n, int kd, float[] ab, int ldab, float[] w, float[] z, int ldz, float[] work, org.netlib.util.intW info) { ssbev(jobz, uplo, n, kd, ab, 0, ldab, w, 0, z, 0, ldz, work, 0, info); } - public void ssbev(String jobz, String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info) { + public void ssbev(String jobz, String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - ssbevK(jobz, uplo, n, kd, ab, _ab_offset, ldab, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); + ssbevK(jobz, uplo, n, kd, ab, offsetab, ldab, w, offsetw, z, offsetz, ldz, work, offsetwork, info); } - protected abstract void ssbevK(String jobz, String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void ssbevK(String jobz, String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info); public void ssbevd(String jobz, String uplo, int n, int kd, float[] ab, int ldab, float[] w, float[] z, int ldz, float[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info) { ssbevd(jobz, uplo, n, kd, ab, 0, ldab, w, 0, z, 0, ldz, work, 0, lwork, iwork, 0, liwork, info); } - public void ssbevd(String jobz, String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { + public void ssbevd(String jobz, String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { //FIXME Add arguments check - ssbevdK(jobz, uplo, n, kd, ab, _ab_offset, ldab, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + ssbevdK(jobz, uplo, n, kd, ab, offsetab, ldab, w, offsetw, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected abstract void ssbevdK(String jobz, String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected abstract void ssbevdK(String jobz, String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void ssbevx(String jobz, String range, String uplo, int n, int kd, float[] ab, int ldab, float[] q, int ldq, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, float[] z, int ldz, float[] work, int[] iwork, int[] ifail, org.netlib.util.intW info) { ssbevx(jobz, range, uplo, n, kd, ab, 0, ldab, q, 0, ldq, vl, vu, il, iu, abstol, m, w, 0, z, 0, ldz, work, 0, iwork, 0, ifail, 0, info); } - public void ssbevx(String jobz, String range, String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] q, int _q_offset, int ldq, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { + public void ssbevx(String jobz, String range, String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float[] q, int offsetq, int ldq, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { //FIXME Add arguments check - ssbevxK(jobz, range, uplo, n, kd, ab, _ab_offset, ldab, q, _q_offset, ldq, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + ssbevxK(jobz, range, uplo, n, kd, ab, offsetab, ldab, q, offsetq, ldq, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, work, offsetwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected abstract void ssbevxK(String jobz, String range, String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] q, int _q_offset, int ldq, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected abstract void ssbevxK(String jobz, String range, String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float[] q, int offsetq, int ldq, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void ssbgst(String vect, String uplo, int n, int ka, int kb, float[] ab, int ldab, float[] bb, int ldbb, float[] x, int ldx, float[] work, org.netlib.util.intW info) { ssbgst(vect, uplo, n, ka, kb, ab, 0, ldab, bb, 0, ldbb, x, 0, ldx, work, 0, info); } - public void ssbgst(String vect, String uplo, int n, int ka, int kb, float[] ab, int _ab_offset, int ldab, float[] bb, int _bb_offset, int ldbb, float[] x, int _x_offset, int ldx, float[] work, int _work_offset, org.netlib.util.intW info) { + public void ssbgst(String vect, String uplo, int n, int ka, int kb, float[] ab, int offsetab, int ldab, float[] bb, int offsetbb, int ldbb, float[] x, int offsetx, int ldx, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - ssbgstK(vect, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, x, _x_offset, ldx, work, _work_offset, info); + ssbgstK(vect, uplo, n, ka, kb, ab, offsetab, ldab, bb, offsetbb, ldbb, x, offsetx, ldx, work, offsetwork, info); } - protected abstract void ssbgstK(String vect, String uplo, int n, int ka, int kb, float[] ab, int _ab_offset, int ldab, float[] bb, int _bb_offset, int ldbb, float[] x, int _x_offset, int ldx, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void ssbgstK(String vect, String uplo, int n, int ka, int kb, float[] ab, int offsetab, int ldab, float[] bb, int offsetbb, int ldbb, float[] x, int offsetx, int ldx, float[] work, int offsetwork, org.netlib.util.intW info); public void ssbgv(String jobz, String uplo, int n, int ka, int kb, float[] ab, int ldab, float[] bb, int ldbb, float[] w, float[] z, int ldz, float[] work, org.netlib.util.intW info) { ssbgv(jobz, uplo, n, ka, kb, ab, 0, ldab, bb, 0, ldbb, w, 0, z, 0, ldz, work, 0, info); } - public void ssbgv(String jobz, String uplo, int n, int ka, int kb, float[] ab, int _ab_offset, int ldab, float[] bb, int _bb_offset, int ldbb, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info) { + public void ssbgv(String jobz, String uplo, int n, int ka, int kb, float[] ab, int offsetab, int ldab, float[] bb, int offsetbb, int ldbb, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - ssbgvK(jobz, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); + ssbgvK(jobz, uplo, n, ka, kb, ab, offsetab, ldab, bb, offsetbb, ldbb, w, offsetw, z, offsetz, ldz, work, offsetwork, info); } - protected abstract void ssbgvK(String jobz, String uplo, int n, int ka, int kb, float[] ab, int _ab_offset, int ldab, float[] bb, int _bb_offset, int ldbb, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void ssbgvK(String jobz, String uplo, int n, int ka, int kb, float[] ab, int offsetab, int ldab, float[] bb, int offsetbb, int ldbb, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info); public void ssbgvd(String jobz, String uplo, int n, int ka, int kb, float[] ab, int ldab, float[] bb, int ldbb, float[] w, float[] z, int ldz, float[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info) { ssbgvd(jobz, uplo, n, ka, kb, ab, 0, ldab, bb, 0, ldbb, w, 0, z, 0, ldz, work, 0, lwork, iwork, 0, liwork, info); } - public void ssbgvd(String jobz, String uplo, int n, int ka, int kb, float[] ab, int _ab_offset, int ldab, float[] bb, int _bb_offset, int ldbb, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { + public void ssbgvd(String jobz, String uplo, int n, int ka, int kb, float[] ab, int offsetab, int ldab, float[] bb, int offsetbb, int ldbb, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { //FIXME Add arguments check - ssbgvdK(jobz, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + ssbgvdK(jobz, uplo, n, ka, kb, ab, offsetab, ldab, bb, offsetbb, ldbb, w, offsetw, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected abstract void ssbgvdK(String jobz, String uplo, int n, int ka, int kb, float[] ab, int _ab_offset, int ldab, float[] bb, int _bb_offset, int ldbb, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected abstract void ssbgvdK(String jobz, String uplo, int n, int ka, int kb, float[] ab, int offsetab, int ldab, float[] bb, int offsetbb, int ldbb, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void ssbgvx(String jobz, String range, String uplo, int n, int ka, int kb, float[] ab, int ldab, float[] bb, int ldbb, float[] q, int ldq, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, float[] z, int ldz, float[] work, int[] iwork, int[] ifail, org.netlib.util.intW info) { ssbgvx(jobz, range, uplo, n, ka, kb, ab, 0, ldab, bb, 0, ldbb, q, 0, ldq, vl, vu, il, iu, abstol, m, w, 0, z, 0, ldz, work, 0, iwork, 0, ifail, 0, info); } - public void ssbgvx(String jobz, String range, String uplo, int n, int ka, int kb, float[] ab, int _ab_offset, int ldab, float[] bb, int _bb_offset, int ldbb, float[] q, int _q_offset, int ldq, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { + public void ssbgvx(String jobz, String range, String uplo, int n, int ka, int kb, float[] ab, int offsetab, int ldab, float[] bb, int offsetbb, int ldbb, float[] q, int offsetq, int ldq, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { //FIXME Add arguments check - ssbgvxK(jobz, range, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, q, _q_offset, ldq, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + ssbgvxK(jobz, range, uplo, n, ka, kb, ab, offsetab, ldab, bb, offsetbb, ldbb, q, offsetq, ldq, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, work, offsetwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected abstract void ssbgvxK(String jobz, String range, String uplo, int n, int ka, int kb, float[] ab, int _ab_offset, int ldab, float[] bb, int _bb_offset, int ldbb, float[] q, int _q_offset, int ldq, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected abstract void ssbgvxK(String jobz, String range, String uplo, int n, int ka, int kb, float[] ab, int offsetab, int ldab, float[] bb, int offsetbb, int ldbb, float[] q, int offsetq, int ldq, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void ssbtrd(String vect, String uplo, int n, int kd, float[] ab, int ldab, float[] d, float[] e, float[] q, int ldq, float[] work, org.netlib.util.intW info) { ssbtrd(vect, uplo, n, kd, ab, 0, ldab, d, 0, e, 0, q, 0, ldq, work, 0, info); } - public void ssbtrd(String vect, String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] d, int _d_offset, float[] e, int _e_offset, float[] q, int _q_offset, int ldq, float[] work, int _work_offset, org.netlib.util.intW info) { + public void ssbtrd(String vect, String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float[] d, int offsetd, float[] e, int offsete, float[] q, int offsetq, int ldq, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - ssbtrdK(vect, uplo, n, kd, ab, _ab_offset, ldab, d, _d_offset, e, _e_offset, q, _q_offset, ldq, work, _work_offset, info); + ssbtrdK(vect, uplo, n, kd, ab, offsetab, ldab, d, offsetd, e, offsete, q, offsetq, ldq, work, offsetwork, info); } - protected abstract void ssbtrdK(String vect, String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] d, int _d_offset, float[] e, int _e_offset, float[] q, int _q_offset, int ldq, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void ssbtrdK(String vect, String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float[] d, int offsetd, float[] e, int offsete, float[] q, int offsetq, int ldq, float[] work, int offsetwork, org.netlib.util.intW info); public void sspcon(String uplo, int n, float[] ap, int[] ipiv, float anorm, org.netlib.util.floatW rcond, float[] work, int[] iwork, org.netlib.util.intW info) { sspcon(uplo, n, ap, 0, ipiv, 0, anorm, rcond, work, 0, iwork, 0, info); } - public void sspcon(String uplo, int n, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void sspcon(String uplo, int n, float[] ap, int offsetap, int[] ipiv, int offsetipiv, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - sspconK(uplo, n, ap, _ap_offset, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + sspconK(uplo, n, ap, offsetap, ipiv, offsetipiv, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void sspconK(String uplo, int n, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void sspconK(String uplo, int n, float[] ap, int offsetap, int[] ipiv, int offsetipiv, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sspev(String jobz, String uplo, int n, float[] ap, float[] w, float[] z, int ldz, float[] work, org.netlib.util.intW info) { sspev(jobz, uplo, n, ap, 0, w, 0, z, 0, ldz, work, 0, info); } - public void sspev(String jobz, String uplo, int n, float[] ap, int _ap_offset, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info) { + public void sspev(String jobz, String uplo, int n, float[] ap, int offsetap, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - sspevK(jobz, uplo, n, ap, _ap_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); + sspevK(jobz, uplo, n, ap, offsetap, w, offsetw, z, offsetz, ldz, work, offsetwork, info); } - protected abstract void sspevK(String jobz, String uplo, int n, float[] ap, int _ap_offset, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void sspevK(String jobz, String uplo, int n, float[] ap, int offsetap, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info); public void sspevd(String jobz, String uplo, int n, float[] ap, float[] w, float[] z, int ldz, float[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info) { sspevd(jobz, uplo, n, ap, 0, w, 0, z, 0, ldz, work, 0, lwork, iwork, 0, liwork, info); } - public void sspevd(String jobz, String uplo, int n, float[] ap, int _ap_offset, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { + public void sspevd(String jobz, String uplo, int n, float[] ap, int offsetap, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { //FIXME Add arguments check - sspevdK(jobz, uplo, n, ap, _ap_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + sspevdK(jobz, uplo, n, ap, offsetap, w, offsetw, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected abstract void sspevdK(String jobz, String uplo, int n, float[] ap, int _ap_offset, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected abstract void sspevdK(String jobz, String uplo, int n, float[] ap, int offsetap, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void sspevx(String jobz, String range, String uplo, int n, float[] ap, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, float[] z, int ldz, float[] work, int[] iwork, int[] ifail, org.netlib.util.intW info) { sspevx(jobz, range, uplo, n, ap, 0, vl, vu, il, iu, abstol, m, w, 0, z, 0, ldz, work, 0, iwork, 0, ifail, 0, info); } - public void sspevx(String jobz, String range, String uplo, int n, float[] ap, int _ap_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { + public void sspevx(String jobz, String range, String uplo, int n, float[] ap, int offsetap, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { //FIXME Add arguments check - sspevxK(jobz, range, uplo, n, ap, _ap_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + sspevxK(jobz, range, uplo, n, ap, offsetap, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, work, offsetwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected abstract void sspevxK(String jobz, String range, String uplo, int n, float[] ap, int _ap_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected abstract void sspevxK(String jobz, String range, String uplo, int n, float[] ap, int offsetap, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void sspgst(int itype, String uplo, int n, float[] ap, float[] bp, org.netlib.util.intW info) { sspgst(itype, uplo, n, ap, 0, bp, 0, info); } - public void sspgst(int itype, String uplo, int n, float[] ap, int _ap_offset, float[] bp, int _bp_offset, org.netlib.util.intW info) { + public void sspgst(int itype, String uplo, int n, float[] ap, int offsetap, float[] bp, int offsetbp, org.netlib.util.intW info) { //FIXME Add arguments check - sspgstK(itype, uplo, n, ap, _ap_offset, bp, _bp_offset, info); + sspgstK(itype, uplo, n, ap, offsetap, bp, offsetbp, info); } - protected abstract void sspgstK(int itype, String uplo, int n, float[] ap, int _ap_offset, float[] bp, int _bp_offset, org.netlib.util.intW info); + protected abstract void sspgstK(int itype, String uplo, int n, float[] ap, int offsetap, float[] bp, int offsetbp, org.netlib.util.intW info); public void sspgv(int itype, String jobz, String uplo, int n, float[] ap, float[] bp, float[] w, float[] z, int ldz, float[] work, org.netlib.util.intW info) { sspgv(itype, jobz, uplo, n, ap, 0, bp, 0, w, 0, z, 0, ldz, work, 0, info); } - public void sspgv(int itype, String jobz, String uplo, int n, float[] ap, int _ap_offset, float[] bp, int _bp_offset, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info) { + public void sspgv(int itype, String jobz, String uplo, int n, float[] ap, int offsetap, float[] bp, int offsetbp, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - sspgvK(itype, jobz, uplo, n, ap, _ap_offset, bp, _bp_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); + sspgvK(itype, jobz, uplo, n, ap, offsetap, bp, offsetbp, w, offsetw, z, offsetz, ldz, work, offsetwork, info); } - protected abstract void sspgvK(int itype, String jobz, String uplo, int n, float[] ap, int _ap_offset, float[] bp, int _bp_offset, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void sspgvK(int itype, String jobz, String uplo, int n, float[] ap, int offsetap, float[] bp, int offsetbp, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info); public void sspgvd(int itype, String jobz, String uplo, int n, float[] ap, float[] bp, float[] w, float[] z, int ldz, float[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info) { sspgvd(itype, jobz, uplo, n, ap, 0, bp, 0, w, 0, z, 0, ldz, work, 0, lwork, iwork, 0, liwork, info); } - public void sspgvd(int itype, String jobz, String uplo, int n, float[] ap, int _ap_offset, float[] bp, int _bp_offset, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { + public void sspgvd(int itype, String jobz, String uplo, int n, float[] ap, int offsetap, float[] bp, int offsetbp, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { //FIXME Add arguments check - sspgvdK(itype, jobz, uplo, n, ap, _ap_offset, bp, _bp_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + sspgvdK(itype, jobz, uplo, n, ap, offsetap, bp, offsetbp, w, offsetw, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected abstract void sspgvdK(int itype, String jobz, String uplo, int n, float[] ap, int _ap_offset, float[] bp, int _bp_offset, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected abstract void sspgvdK(int itype, String jobz, String uplo, int n, float[] ap, int offsetap, float[] bp, int offsetbp, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void sspgvx(int itype, String jobz, String range, String uplo, int n, float[] ap, float[] bp, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, float[] z, int ldz, float[] work, int[] iwork, int[] ifail, org.netlib.util.intW info) { sspgvx(itype, jobz, range, uplo, n, ap, 0, bp, 0, vl, vu, il, iu, abstol, m, w, 0, z, 0, ldz, work, 0, iwork, 0, ifail, 0, info); } - public void sspgvx(int itype, String jobz, String range, String uplo, int n, float[] ap, int _ap_offset, float[] bp, int _bp_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { + public void sspgvx(int itype, String jobz, String range, String uplo, int n, float[] ap, int offsetap, float[] bp, int offsetbp, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { //FIXME Add arguments check - sspgvxK(itype, jobz, range, uplo, n, ap, _ap_offset, bp, _bp_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + sspgvxK(itype, jobz, range, uplo, n, ap, offsetap, bp, offsetbp, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, work, offsetwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected abstract void sspgvxK(int itype, String jobz, String range, String uplo, int n, float[] ap, int _ap_offset, float[] bp, int _bp_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected abstract void sspgvxK(int itype, String jobz, String range, String uplo, int n, float[] ap, int offsetap, float[] bp, int offsetbp, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void ssprfs(String uplo, int n, int nrhs, float[] ap, float[] afp, int[] ipiv, float[] b, int ldb, float[] x, int ldx, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info) { ssprfs(uplo, n, nrhs, ap, 0, afp, 0, ipiv, 0, b, 0, ldb, x, 0, ldx, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void ssprfs(String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] afp, int _afp_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void ssprfs(String uplo, int n, int nrhs, float[] ap, int offsetap, float[] afp, int offsetafp, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - ssprfsK(uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + ssprfsK(uplo, n, nrhs, ap, offsetap, afp, offsetafp, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void ssprfsK(String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] afp, int _afp_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void ssprfsK(String uplo, int n, int nrhs, float[] ap, int offsetap, float[] afp, int offsetafp, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sspsv(String uplo, int n, int nrhs, float[] ap, int[] ipiv, float[] b, int ldb, org.netlib.util.intW info) { sspsv(uplo, n, nrhs, ap, 0, ipiv, 0, b, 0, ldb, info); } - public void sspsv(String uplo, int n, int nrhs, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void sspsv(String uplo, int n, int nrhs, float[] ap, int offsetap, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - sspsvK(uplo, n, nrhs, ap, _ap_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + sspsvK(uplo, n, nrhs, ap, offsetap, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected abstract void sspsvK(String uplo, int n, int nrhs, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void sspsvK(String uplo, int n, int nrhs, float[] ap, int offsetap, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void sspsvx(String fact, String uplo, int n, int nrhs, float[] ap, float[] afp, int[] ipiv, float[] b, int ldb, float[] x, int ldx, org.netlib.util.floatW rcond, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info) { sspsvx(fact, uplo, n, nrhs, ap, 0, afp, 0, ipiv, 0, b, 0, ldb, x, 0, ldx, rcond, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void sspsvx(String fact, String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] afp, int _afp_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void sspsvx(String fact, String uplo, int n, int nrhs, float[] ap, int offsetap, float[] afp, int offsetafp, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - sspsvxK(fact, uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + sspsvxK(fact, uplo, n, nrhs, ap, offsetap, afp, offsetafp, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void sspsvxK(String fact, String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] afp, int _afp_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void sspsvxK(String fact, String uplo, int n, int nrhs, float[] ap, int offsetap, float[] afp, int offsetafp, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void ssptrd(String uplo, int n, float[] ap, float[] d, float[] e, float[] tau, org.netlib.util.intW info) { ssptrd(uplo, n, ap, 0, d, 0, e, 0, tau, 0, info); } - public void ssptrd(String uplo, int n, float[] ap, int _ap_offset, float[] d, int _d_offset, float[] e, int _e_offset, float[] tau, int _tau_offset, org.netlib.util.intW info) { + public void ssptrd(String uplo, int n, float[] ap, int offsetap, float[] d, int offsetd, float[] e, int offsete, float[] tau, int offsettau, org.netlib.util.intW info) { //FIXME Add arguments check - ssptrdK(uplo, n, ap, _ap_offset, d, _d_offset, e, _e_offset, tau, _tau_offset, info); + ssptrdK(uplo, n, ap, offsetap, d, offsetd, e, offsete, tau, offsettau, info); } - protected abstract void ssptrdK(String uplo, int n, float[] ap, int _ap_offset, float[] d, int _d_offset, float[] e, int _e_offset, float[] tau, int _tau_offset, org.netlib.util.intW info); + protected abstract void ssptrdK(String uplo, int n, float[] ap, int offsetap, float[] d, int offsetd, float[] e, int offsete, float[] tau, int offsettau, org.netlib.util.intW info); public void ssptrf(String uplo, int n, float[] ap, int[] ipiv, org.netlib.util.intW info) { ssptrf(uplo, n, ap, 0, ipiv, 0, info); } - public void ssptrf(String uplo, int n, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { + public void ssptrf(String uplo, int n, float[] ap, int offsetap, int[] ipiv, int offsetipiv, org.netlib.util.intW info) { //FIXME Add arguments check - ssptrfK(uplo, n, ap, _ap_offset, ipiv, _ipiv_offset, info); + ssptrfK(uplo, n, ap, offsetap, ipiv, offsetipiv, info); } - protected abstract void ssptrfK(String uplo, int n, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + protected abstract void ssptrfK(String uplo, int n, float[] ap, int offsetap, int[] ipiv, int offsetipiv, org.netlib.util.intW info); public void ssptri(String uplo, int n, float[] ap, int[] ipiv, float[] work, org.netlib.util.intW info) { ssptri(uplo, n, ap, 0, ipiv, 0, work, 0, info); } - public void ssptri(String uplo, int n, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, float[] work, int _work_offset, org.netlib.util.intW info) { + public void ssptri(String uplo, int n, float[] ap, int offsetap, int[] ipiv, int offsetipiv, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - ssptriK(uplo, n, ap, _ap_offset, ipiv, _ipiv_offset, work, _work_offset, info); + ssptriK(uplo, n, ap, offsetap, ipiv, offsetipiv, work, offsetwork, info); } - protected abstract void ssptriK(String uplo, int n, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void ssptriK(String uplo, int n, float[] ap, int offsetap, int[] ipiv, int offsetipiv, float[] work, int offsetwork, org.netlib.util.intW info); public void ssptrs(String uplo, int n, int nrhs, float[] ap, int[] ipiv, float[] b, int ldb, org.netlib.util.intW info) { ssptrs(uplo, n, nrhs, ap, 0, ipiv, 0, b, 0, ldb, info); } - public void ssptrs(String uplo, int n, int nrhs, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void ssptrs(String uplo, int n, int nrhs, float[] ap, int offsetap, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - ssptrsK(uplo, n, nrhs, ap, _ap_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + ssptrsK(uplo, n, nrhs, ap, offsetap, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected abstract void ssptrsK(String uplo, int n, int nrhs, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void ssptrsK(String uplo, int n, int nrhs, float[] ap, int offsetap, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void sstebz(String range, String order, int n, float vl, float vu, int il, int iu, float abstol, float[] d, float[] e, org.netlib.util.intW m, org.netlib.util.intW nsplit, float[] w, int[] iblock, int[] isplit, float[] work, int[] iwork, org.netlib.util.intW info) { sstebz(range, order, n, vl, vu, il, iu, abstol, d, 0, e, 0, m, nsplit, w, 0, iblock, 0, isplit, 0, work, 0, iwork, 0, info); } - public void sstebz(String range, String order, int n, float vl, float vu, int il, int iu, float abstol, float[] d, int _d_offset, float[] e, int _e_offset, org.netlib.util.intW m, org.netlib.util.intW nsplit, float[] w, int _w_offset, int[] iblock, int _iblock_offset, int[] isplit, int _isplit_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void sstebz(String range, String order, int n, float vl, float vu, int il, int iu, float abstol, float[] d, int offsetd, float[] e, int offsete, org.netlib.util.intW m, org.netlib.util.intW nsplit, float[] w, int offsetw, int[] iblock, int offsetiblock, int[] isplit, int offsetisplit, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - sstebzK(range, order, n, vl, vu, il, iu, abstol, d, _d_offset, e, _e_offset, m, nsplit, w, _w_offset, iblock, _iblock_offset, isplit, _isplit_offset, work, _work_offset, iwork, _iwork_offset, info); + sstebzK(range, order, n, vl, vu, il, iu, abstol, d, offsetd, e, offsete, m, nsplit, w, offsetw, iblock, offsetiblock, isplit, offsetisplit, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void sstebzK(String range, String order, int n, float vl, float vu, int il, int iu, float abstol, float[] d, int _d_offset, float[] e, int _e_offset, org.netlib.util.intW m, org.netlib.util.intW nsplit, float[] w, int _w_offset, int[] iblock, int _iblock_offset, int[] isplit, int _isplit_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void sstebzK(String range, String order, int n, float vl, float vu, int il, int iu, float abstol, float[] d, int offsetd, float[] e, int offsete, org.netlib.util.intW m, org.netlib.util.intW nsplit, float[] w, int offsetw, int[] iblock, int offsetiblock, int[] isplit, int offsetisplit, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void sstedc(String compz, int n, float[] d, float[] e, float[] z, int ldz, float[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info) { sstedc(compz, n, d, 0, e, 0, z, 0, ldz, work, 0, lwork, iwork, 0, liwork, info); } - public void sstedc(String compz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { + public void sstedc(String compz, int n, float[] d, int offsetd, float[] e, int offsete, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { //FIXME Add arguments check - sstedcK(compz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + sstedcK(compz, n, d, offsetd, e, offsete, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected abstract void sstedcK(String compz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected abstract void sstedcK(String compz, int n, float[] d, int offsetd, float[] e, int offsete, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void sstegr(String jobz, String range, int n, float[] d, float[] e, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, float[] z, int ldz, int[] isuppz, float[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info) { sstegr(jobz, range, n, d, 0, e, 0, vl, vu, il, iu, abstol, m, w, 0, z, 0, ldz, isuppz, 0, work, 0, lwork, iwork, 0, liwork, info); } - public void sstegr(String jobz, String range, int n, float[] d, int _d_offset, float[] e, int _e_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { + public void sstegr(String jobz, String range, int n, float[] d, int offsetd, float[] e, int offsete, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { //FIXME Add arguments check - sstegrK(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + sstegrK(jobz, range, n, d, offsetd, e, offsete, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, isuppz, offsetisuppz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected abstract void sstegrK(String jobz, String range, int n, float[] d, int _d_offset, float[] e, int _e_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected abstract void sstegrK(String jobz, String range, int n, float[] d, int offsetd, float[] e, int offsete, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void sstein(int n, float[] d, float[] e, int m, float[] w, int[] iblock, int[] isplit, float[] z, int ldz, float[] work, int[] iwork, int[] ifail, org.netlib.util.intW info) { sstein(n, d, 0, e, 0, m, w, 0, iblock, 0, isplit, 0, z, 0, ldz, work, 0, iwork, 0, ifail, 0, info); } - public void sstein(int n, float[] d, int _d_offset, float[] e, int _e_offset, int m, float[] w, int _w_offset, int[] iblock, int _iblock_offset, int[] isplit, int _isplit_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { + public void sstein(int n, float[] d, int offsetd, float[] e, int offsete, int m, float[] w, int offsetw, int[] iblock, int offsetiblock, int[] isplit, int offsetisplit, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { //FIXME Add arguments check - ssteinK(n, d, _d_offset, e, _e_offset, m, w, _w_offset, iblock, _iblock_offset, isplit, _isplit_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + ssteinK(n, d, offsetd, e, offsete, m, w, offsetw, iblock, offsetiblock, isplit, offsetisplit, z, offsetz, ldz, work, offsetwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected abstract void ssteinK(int n, float[] d, int _d_offset, float[] e, int _e_offset, int m, float[] w, int _w_offset, int[] iblock, int _iblock_offset, int[] isplit, int _isplit_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected abstract void ssteinK(int n, float[] d, int offsetd, float[] e, int offsete, int m, float[] w, int offsetw, int[] iblock, int offsetiblock, int[] isplit, int offsetisplit, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void sstemr(String jobz, String range, int n, float[] d, float[] e, float vl, float vu, int il, int iu, org.netlib.util.intW m, float[] w, float[] z, int ldz, int nzc, int[] isuppz, org.netlib.util.booleanW tryrac, float[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info) { sstemr(jobz, range, n, d, 0, e, 0, vl, vu, il, iu, m, w, 0, z, 0, ldz, nzc, isuppz, 0, tryrac, work, 0, lwork, iwork, 0, liwork, info); } - public void sstemr(String jobz, String range, int n, float[] d, int _d_offset, float[] e, int _e_offset, float vl, float vu, int il, int iu, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, int nzc, int[] isuppz, int _isuppz_offset, org.netlib.util.booleanW tryrac, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { + public void sstemr(String jobz, String range, int n, float[] d, int offsetd, float[] e, int offsete, float vl, float vu, int il, int iu, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, int nzc, int[] isuppz, int offsetisuppz, org.netlib.util.booleanW tryrac, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { //FIXME Add arguments check - sstemrK(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, m, w, _w_offset, z, _z_offset, ldz, nzc, isuppz, _isuppz_offset, tryrac, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + sstemrK(jobz, range, n, d, offsetd, e, offsete, vl, vu, il, iu, m, w, offsetw, z, offsetz, ldz, nzc, isuppz, offsetisuppz, tryrac, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected abstract void sstemrK(String jobz, String range, int n, float[] d, int _d_offset, float[] e, int _e_offset, float vl, float vu, int il, int iu, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, int nzc, int[] isuppz, int _isuppz_offset, org.netlib.util.booleanW tryrac, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected abstract void sstemrK(String jobz, String range, int n, float[] d, int offsetd, float[] e, int offsete, float vl, float vu, int il, int iu, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, int nzc, int[] isuppz, int offsetisuppz, org.netlib.util.booleanW tryrac, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void ssteqr(String compz, int n, float[] d, float[] e, float[] z, int ldz, float[] work, org.netlib.util.intW info) { ssteqr(compz, n, d, 0, e, 0, z, 0, ldz, work, 0, info); } - public void ssteqr(String compz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info) { + public void ssteqr(String compz, int n, float[] d, int offsetd, float[] e, int offsete, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - ssteqrK(compz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, info); + ssteqrK(compz, n, d, offsetd, e, offsete, z, offsetz, ldz, work, offsetwork, info); } - protected abstract void ssteqrK(String compz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void ssteqrK(String compz, int n, float[] d, int offsetd, float[] e, int offsete, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info); public void ssterf(int n, float[] d, float[] e, org.netlib.util.intW info) { ssterf(n, d, 0, e, 0, info); } - public void ssterf(int n, float[] d, int _d_offset, float[] e, int _e_offset, org.netlib.util.intW info) { + public void ssterf(int n, float[] d, int offsetd, float[] e, int offsete, org.netlib.util.intW info) { //FIXME Add arguments check - ssterfK(n, d, _d_offset, e, _e_offset, info); + ssterfK(n, d, offsetd, e, offsete, info); } - protected abstract void ssterfK(int n, float[] d, int _d_offset, float[] e, int _e_offset, org.netlib.util.intW info); + protected abstract void ssterfK(int n, float[] d, int offsetd, float[] e, int offsete, org.netlib.util.intW info); public void sstev(String jobz, int n, float[] d, float[] e, float[] z, int ldz, float[] work, org.netlib.util.intW info) { sstev(jobz, n, d, 0, e, 0, z, 0, ldz, work, 0, info); } - public void sstev(String jobz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info) { + public void sstev(String jobz, int n, float[] d, int offsetd, float[] e, int offsete, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - sstevK(jobz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, info); + sstevK(jobz, n, d, offsetd, e, offsete, z, offsetz, ldz, work, offsetwork, info); } - protected abstract void sstevK(String jobz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void sstevK(String jobz, int n, float[] d, int offsetd, float[] e, int offsete, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info); public void sstevd(String jobz, int n, float[] d, float[] e, float[] z, int ldz, float[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info) { sstevd(jobz, n, d, 0, e, 0, z, 0, ldz, work, 0, lwork, iwork, 0, liwork, info); } - public void sstevd(String jobz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { + public void sstevd(String jobz, int n, float[] d, int offsetd, float[] e, int offsete, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { //FIXME Add arguments check - sstevdK(jobz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + sstevdK(jobz, n, d, offsetd, e, offsete, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected abstract void sstevdK(String jobz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected abstract void sstevdK(String jobz, int n, float[] d, int offsetd, float[] e, int offsete, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void sstevr(String jobz, String range, int n, float[] d, float[] e, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, float[] z, int ldz, int[] isuppz, float[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info) { sstevr(jobz, range, n, d, 0, e, 0, vl, vu, il, iu, abstol, m, w, 0, z, 0, ldz, isuppz, 0, work, 0, lwork, iwork, 0, liwork, info); } - public void sstevr(String jobz, String range, int n, float[] d, int _d_offset, float[] e, int _e_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { + public void sstevr(String jobz, String range, int n, float[] d, int offsetd, float[] e, int offsete, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { //FIXME Add arguments check - sstevrK(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + sstevrK(jobz, range, n, d, offsetd, e, offsete, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, isuppz, offsetisuppz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected abstract void sstevrK(String jobz, String range, int n, float[] d, int _d_offset, float[] e, int _e_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected abstract void sstevrK(String jobz, String range, int n, float[] d, int offsetd, float[] e, int offsete, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void sstevx(String jobz, String range, int n, float[] d, float[] e, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, float[] z, int ldz, float[] work, int[] iwork, int[] ifail, org.netlib.util.intW info) { sstevx(jobz, range, n, d, 0, e, 0, vl, vu, il, iu, abstol, m, w, 0, z, 0, ldz, work, 0, iwork, 0, ifail, 0, info); } - public void sstevx(String jobz, String range, int n, float[] d, int _d_offset, float[] e, int _e_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { + public void sstevx(String jobz, String range, int n, float[] d, int offsetd, float[] e, int offsete, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { //FIXME Add arguments check - sstevxK(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + sstevxK(jobz, range, n, d, offsetd, e, offsete, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, work, offsetwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected abstract void sstevxK(String jobz, String range, int n, float[] d, int _d_offset, float[] e, int _e_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected abstract void sstevxK(String jobz, String range, int n, float[] d, int offsetd, float[] e, int offsete, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void ssycon(String uplo, int n, float[] a, int lda, int[] ipiv, float anorm, org.netlib.util.floatW rcond, float[] work, int[] iwork, org.netlib.util.intW info) { ssycon(uplo, n, a, 0, lda, ipiv, 0, anorm, rcond, work, 0, iwork, 0, info); } - public void ssycon(String uplo, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void ssycon(String uplo, int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - ssyconK(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + ssyconK(uplo, n, a, offseta, lda, ipiv, offsetipiv, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void ssyconK(String uplo, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void ssyconK(String uplo, int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void ssyev(String jobz, String uplo, int n, float[] a, int lda, float[] w, float[] work, int lwork, org.netlib.util.intW info) { ssyev(jobz, uplo, n, a, 0, lda, w, 0, work, 0, lwork, info); } - public void ssyev(String jobz, String uplo, int n, float[] a, int _a_offset, int lda, float[] w, int _w_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void ssyev(String jobz, String uplo, int n, float[] a, int offseta, int lda, float[] w, int offsetw, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - ssyevK(jobz, uplo, n, a, _a_offset, lda, w, _w_offset, work, _work_offset, lwork, info); + ssyevK(jobz, uplo, n, a, offseta, lda, w, offsetw, work, offsetwork, lwork, info); } - protected abstract void ssyevK(String jobz, String uplo, int n, float[] a, int _a_offset, int lda, float[] w, int _w_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void ssyevK(String jobz, String uplo, int n, float[] a, int offseta, int lda, float[] w, int offsetw, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void ssyevd(String jobz, String uplo, int n, float[] a, int lda, float[] w, float[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info) { ssyevd(jobz, uplo, n, a, 0, lda, w, 0, work, 0, lwork, iwork, 0, liwork, info); } - public void ssyevd(String jobz, String uplo, int n, float[] a, int _a_offset, int lda, float[] w, int _w_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { + public void ssyevd(String jobz, String uplo, int n, float[] a, int offseta, int lda, float[] w, int offsetw, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { //FIXME Add arguments check - ssyevdK(jobz, uplo, n, a, _a_offset, lda, w, _w_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + ssyevdK(jobz, uplo, n, a, offseta, lda, w, offsetw, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected abstract void ssyevdK(String jobz, String uplo, int n, float[] a, int _a_offset, int lda, float[] w, int _w_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected abstract void ssyevdK(String jobz, String uplo, int n, float[] a, int offseta, int lda, float[] w, int offsetw, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void ssyevr(String jobz, String range, String uplo, int n, float[] a, int lda, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, float[] z, int ldz, int[] isuppz, float[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info) { ssyevr(jobz, range, uplo, n, a, 0, lda, vl, vu, il, iu, abstol, m, w, 0, z, 0, ldz, isuppz, 0, work, 0, lwork, iwork, 0, liwork, info); } - public void ssyevr(String jobz, String range, String uplo, int n, float[] a, int _a_offset, int lda, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { + public void ssyevr(String jobz, String range, String uplo, int n, float[] a, int offseta, int lda, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { //FIXME Add arguments check - ssyevrK(jobz, range, uplo, n, a, _a_offset, lda, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + ssyevrK(jobz, range, uplo, n, a, offseta, lda, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, isuppz, offsetisuppz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected abstract void ssyevrK(String jobz, String range, String uplo, int n, float[] a, int _a_offset, int lda, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected abstract void ssyevrK(String jobz, String range, String uplo, int n, float[] a, int offseta, int lda, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void ssyevx(String jobz, String range, String uplo, int n, float[] a, int lda, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, float[] z, int ldz, float[] work, int lwork, int[] iwork, int[] ifail, org.netlib.util.intW info) { ssyevx(jobz, range, uplo, n, a, 0, lda, vl, vu, il, iu, abstol, m, w, 0, z, 0, ldz, work, 0, lwork, iwork, 0, ifail, 0, info); } - public void ssyevx(String jobz, String range, String uplo, int n, float[] a, int _a_offset, int lda, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { + public void ssyevx(String jobz, String range, String uplo, int n, float[] a, int offseta, int lda, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { //FIXME Add arguments check - ssyevxK(jobz, range, uplo, n, a, _a_offset, lda, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, ifail, _ifail_offset, info); + ssyevxK(jobz, range, uplo, n, a, offseta, lda, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected abstract void ssyevxK(String jobz, String range, String uplo, int n, float[] a, int _a_offset, int lda, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected abstract void ssyevxK(String jobz, String range, String uplo, int n, float[] a, int offseta, int lda, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void ssygs2(int itype, String uplo, int n, float[] a, int lda, float[] b, int ldb, org.netlib.util.intW info) { ssygs2(itype, uplo, n, a, 0, lda, b, 0, ldb, info); } - public void ssygs2(int itype, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void ssygs2(int itype, String uplo, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - ssygs2K(itype, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, info); + ssygs2K(itype, uplo, n, a, offseta, lda, b, offsetb, ldb, info); } - protected abstract void ssygs2K(int itype, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void ssygs2K(int itype, String uplo, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void ssygst(int itype, String uplo, int n, float[] a, int lda, float[] b, int ldb, org.netlib.util.intW info) { ssygst(itype, uplo, n, a, 0, lda, b, 0, ldb, info); } - public void ssygst(int itype, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void ssygst(int itype, String uplo, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - ssygstK(itype, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, info); + ssygstK(itype, uplo, n, a, offseta, lda, b, offsetb, ldb, info); } - protected abstract void ssygstK(int itype, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void ssygstK(int itype, String uplo, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void ssygv(int itype, String jobz, String uplo, int n, float[] a, int lda, float[] b, int ldb, float[] w, float[] work, int lwork, org.netlib.util.intW info) { ssygv(itype, jobz, uplo, n, a, 0, lda, b, 0, ldb, w, 0, work, 0, lwork, info); } - public void ssygv(int itype, String jobz, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] w, int _w_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void ssygv(int itype, String jobz, String uplo, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] w, int offsetw, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - ssygvK(itype, jobz, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, w, _w_offset, work, _work_offset, lwork, info); + ssygvK(itype, jobz, uplo, n, a, offseta, lda, b, offsetb, ldb, w, offsetw, work, offsetwork, lwork, info); } - protected abstract void ssygvK(int itype, String jobz, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] w, int _w_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void ssygvK(int itype, String jobz, String uplo, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] w, int offsetw, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void ssygvd(int itype, String jobz, String uplo, int n, float[] a, int lda, float[] b, int ldb, float[] w, float[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info) { ssygvd(itype, jobz, uplo, n, a, 0, lda, b, 0, ldb, w, 0, work, 0, lwork, iwork, 0, liwork, info); } - public void ssygvd(int itype, String jobz, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] w, int _w_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { + public void ssygvd(int itype, String jobz, String uplo, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] w, int offsetw, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { //FIXME Add arguments check - ssygvdK(itype, jobz, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, w, _w_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + ssygvdK(itype, jobz, uplo, n, a, offseta, lda, b, offsetb, ldb, w, offsetw, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected abstract void ssygvdK(int itype, String jobz, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] w, int _w_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected abstract void ssygvdK(int itype, String jobz, String uplo, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] w, int offsetw, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void ssygvx(int itype, String jobz, String range, String uplo, int n, float[] a, int lda, float[] b, int ldb, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, float[] z, int ldz, float[] work, int lwork, int[] iwork, int[] ifail, org.netlib.util.intW info) { ssygvx(itype, jobz, range, uplo, n, a, 0, lda, b, 0, ldb, vl, vu, il, iu, abstol, m, w, 0, z, 0, ldz, work, 0, lwork, iwork, 0, ifail, 0, info); } - public void ssygvx(int itype, String jobz, String range, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { + public void ssygvx(int itype, String jobz, String range, String uplo, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { //FIXME Add arguments check - ssygvxK(itype, jobz, range, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, ifail, _ifail_offset, info); + ssygvxK(itype, jobz, range, uplo, n, a, offseta, lda, b, offsetb, ldb, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected abstract void ssygvxK(int itype, String jobz, String range, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected abstract void ssygvxK(int itype, String jobz, String range, String uplo, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); public void ssyrfs(String uplo, int n, int nrhs, float[] a, int lda, float[] af, int ldaf, int[] ipiv, float[] b, int ldb, float[] x, int ldx, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info) { ssyrfs(uplo, n, nrhs, a, 0, lda, af, 0, ldaf, ipiv, 0, b, 0, ldb, x, 0, ldx, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void ssyrfs(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void ssyrfs(String uplo, int n, int nrhs, float[] a, int offseta, int lda, float[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - ssyrfsK(uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + ssyrfsK(uplo, n, nrhs, a, offseta, lda, af, offsetaf, ldaf, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void ssyrfsK(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void ssyrfsK(String uplo, int n, int nrhs, float[] a, int offseta, int lda, float[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void ssysv(String uplo, int n, int nrhs, float[] a, int lda, int[] ipiv, float[] b, int ldb, float[] work, int lwork, org.netlib.util.intW info) { ssysv(uplo, n, nrhs, a, 0, lda, ipiv, 0, b, 0, ldb, work, 0, lwork, info); } - public void ssysv(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void ssysv(String uplo, int n, int nrhs, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - ssysvK(uplo, n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, work, _work_offset, lwork, info); + ssysvK(uplo, n, nrhs, a, offseta, lda, ipiv, offsetipiv, b, offsetb, ldb, work, offsetwork, lwork, info); } - protected abstract void ssysvK(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void ssysvK(String uplo, int n, int nrhs, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void ssysvx(String fact, String uplo, int n, int nrhs, float[] a, int lda, float[] af, int ldaf, int[] ipiv, float[] b, int ldb, float[] x, int ldx, org.netlib.util.floatW rcond, float[] ferr, float[] berr, float[] work, int lwork, int[] iwork, org.netlib.util.intW info) { ssysvx(fact, uplo, n, nrhs, a, 0, lda, af, 0, ldaf, ipiv, 0, b, 0, ldb, x, 0, ldx, rcond, ferr, 0, berr, 0, work, 0, lwork, iwork, 0, info); } - public void ssysvx(String fact, String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void ssysvx(String fact, String uplo, int n, int nrhs, float[] a, int offseta, int lda, float[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - ssysvxK(fact, uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, lwork, iwork, _iwork_offset, info); + ssysvxK(fact, uplo, n, nrhs, a, offseta, lda, af, offsetaf, ldaf, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, lwork, iwork, offsetiwork, info); } - protected abstract void ssysvxK(String fact, String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void ssysvxK(String fact, String uplo, int n, int nrhs, float[] a, int offseta, int lda, float[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void ssytd2(String uplo, int n, float[] a, int lda, float[] d, float[] e, float[] tau, org.netlib.util.intW info) { ssytd2(uplo, n, a, 0, lda, d, 0, e, 0, tau, 0, info); } - public void ssytd2(String uplo, int n, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tau, int _tau_offset, org.netlib.util.intW info) { + public void ssytd2(String uplo, int n, float[] a, int offseta, int lda, float[] d, int offsetd, float[] e, int offsete, float[] tau, int offsettau, org.netlib.util.intW info) { //FIXME Add arguments check - ssytd2K(uplo, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tau, _tau_offset, info); + ssytd2K(uplo, n, a, offseta, lda, d, offsetd, e, offsete, tau, offsettau, info); } - protected abstract void ssytd2K(String uplo, int n, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tau, int _tau_offset, org.netlib.util.intW info); + protected abstract void ssytd2K(String uplo, int n, float[] a, int offseta, int lda, float[] d, int offsetd, float[] e, int offsete, float[] tau, int offsettau, org.netlib.util.intW info); public void ssytf2(String uplo, int n, float[] a, int lda, int[] ipiv, org.netlib.util.intW info) { ssytf2(uplo, n, a, 0, lda, ipiv, 0, info); } - public void ssytf2(String uplo, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { + public void ssytf2(String uplo, int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, org.netlib.util.intW info) { //FIXME Add arguments check - ssytf2K(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, info); + ssytf2K(uplo, n, a, offseta, lda, ipiv, offsetipiv, info); } - protected abstract void ssytf2K(String uplo, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + protected abstract void ssytf2K(String uplo, int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, org.netlib.util.intW info); public void ssytrd(String uplo, int n, float[] a, int lda, float[] d, float[] e, float[] tau, float[] work, int lwork, org.netlib.util.intW info) { ssytrd(uplo, n, a, 0, lda, d, 0, e, 0, tau, 0, work, 0, lwork, info); } - public void ssytrd(String uplo, int n, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void ssytrd(String uplo, int n, float[] a, int offseta, int lda, float[] d, int offsetd, float[] e, int offsete, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - ssytrdK(uplo, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tau, _tau_offset, work, _work_offset, lwork, info); + ssytrdK(uplo, n, a, offseta, lda, d, offsetd, e, offsete, tau, offsettau, work, offsetwork, lwork, info); } - protected abstract void ssytrdK(String uplo, int n, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void ssytrdK(String uplo, int n, float[] a, int offseta, int lda, float[] d, int offsetd, float[] e, int offsete, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void ssytrf(String uplo, int n, float[] a, int lda, int[] ipiv, float[] work, int lwork, org.netlib.util.intW info) { ssytrf(uplo, n, a, 0, lda, ipiv, 0, work, 0, lwork, info); } - public void ssytrf(String uplo, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void ssytrf(String uplo, int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - ssytrfK(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, work, _work_offset, lwork, info); + ssytrfK(uplo, n, a, offseta, lda, ipiv, offsetipiv, work, offsetwork, lwork, info); } - protected abstract void ssytrfK(String uplo, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void ssytrfK(String uplo, int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void ssytri(String uplo, int n, float[] a, int lda, int[] ipiv, float[] work, org.netlib.util.intW info) { ssytri(uplo, n, a, 0, lda, ipiv, 0, work, 0, info); } - public void ssytri(String uplo, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] work, int _work_offset, org.netlib.util.intW info) { + public void ssytri(String uplo, int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - ssytriK(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, work, _work_offset, info); + ssytriK(uplo, n, a, offseta, lda, ipiv, offsetipiv, work, offsetwork, info); } - protected abstract void ssytriK(String uplo, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void ssytriK(String uplo, int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] work, int offsetwork, org.netlib.util.intW info); public void ssytrs(String uplo, int n, int nrhs, float[] a, int lda, int[] ipiv, float[] b, int ldb, org.netlib.util.intW info) { ssytrs(uplo, n, nrhs, a, 0, lda, ipiv, 0, b, 0, ldb, info); } - public void ssytrs(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void ssytrs(String uplo, int n, int nrhs, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - ssytrsK(uplo, n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + ssytrsK(uplo, n, nrhs, a, offseta, lda, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected abstract void ssytrsK(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void ssytrsK(String uplo, int n, int nrhs, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void stbcon(String norm, String uplo, String diag, int n, int kd, float[] ab, int ldab, org.netlib.util.floatW rcond, float[] work, int[] iwork, org.netlib.util.intW info) { stbcon(norm, uplo, diag, n, kd, ab, 0, ldab, rcond, work, 0, iwork, 0, info); } - public void stbcon(String norm, String uplo, String diag, int n, int kd, float[] ab, int _ab_offset, int ldab, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void stbcon(String norm, String uplo, String diag, int n, int kd, float[] ab, int offsetab, int ldab, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - stbconK(norm, uplo, diag, n, kd, ab, _ab_offset, ldab, rcond, work, _work_offset, iwork, _iwork_offset, info); + stbconK(norm, uplo, diag, n, kd, ab, offsetab, ldab, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void stbconK(String norm, String uplo, String diag, int n, int kd, float[] ab, int _ab_offset, int ldab, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void stbconK(String norm, String uplo, String diag, int n, int kd, float[] ab, int offsetab, int ldab, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void stbrfs(String uplo, String trans, String diag, int n, int kd, int nrhs, float[] ab, int ldab, float[] b, int ldb, float[] x, int ldx, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info) { stbrfs(uplo, trans, diag, n, kd, nrhs, ab, 0, ldab, b, 0, ldb, x, 0, ldx, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void stbrfs(String uplo, String trans, String diag, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void stbrfs(String uplo, String trans, String diag, int n, int kd, int nrhs, float[] ab, int offsetab, int ldab, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - stbrfsK(uplo, trans, diag, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + stbrfsK(uplo, trans, diag, n, kd, nrhs, ab, offsetab, ldab, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void stbrfsK(String uplo, String trans, String diag, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void stbrfsK(String uplo, String trans, String diag, int n, int kd, int nrhs, float[] ab, int offsetab, int ldab, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void stbtrs(String uplo, String trans, String diag, int n, int kd, int nrhs, float[] ab, int ldab, float[] b, int ldb, org.netlib.util.intW info) { stbtrs(uplo, trans, diag, n, kd, nrhs, ab, 0, ldab, b, 0, ldb, info); } - public void stbtrs(String uplo, String trans, String diag, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void stbtrs(String uplo, String trans, String diag, int n, int kd, int nrhs, float[] ab, int offsetab, int ldab, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - stbtrsK(uplo, trans, diag, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, info); + stbtrsK(uplo, trans, diag, n, kd, nrhs, ab, offsetab, ldab, b, offsetb, ldb, info); } - protected abstract void stbtrsK(String uplo, String trans, String diag, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void stbtrsK(String uplo, String trans, String diag, int n, int kd, int nrhs, float[] ab, int offsetab, int ldab, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void stgevc(String side, String howmny, boolean[] select, int n, float[] s, int lds, float[] p, int ldp, float[] vl, int ldvl, float[] vr, int ldvr, int mm, org.netlib.util.intW m, float[] work, org.netlib.util.intW info) { stgevc(side, howmny, select, 0, n, s, 0, lds, p, 0, ldp, vl, 0, ldvl, vr, 0, ldvr, mm, m, work, 0, info); } - public void stgevc(String side, String howmny, boolean[] select, int _select_offset, int n, float[] s, int _s_offset, int lds, float[] p, int _p_offset, int ldp, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, float[] work, int _work_offset, org.netlib.util.intW info) { + public void stgevc(String side, String howmny, boolean[] select, int offsetselect, int n, float[] s, int offsets, int lds, float[] p, int offsetp, int ldp, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, int mm, org.netlib.util.intW m, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - stgevcK(side, howmny, select, _select_offset, n, s, _s_offset, lds, p, _p_offset, ldp, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, mm, m, work, _work_offset, info); + stgevcK(side, howmny, select, offsetselect, n, s, offsets, lds, p, offsetp, ldp, vl, offsetvl, ldvl, vr, offsetvr, ldvr, mm, m, work, offsetwork, info); } - protected abstract void stgevcK(String side, String howmny, boolean[] select, int _select_offset, int n, float[] s, int _s_offset, int lds, float[] p, int _p_offset, int ldp, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void stgevcK(String side, String howmny, boolean[] select, int offsetselect, int n, float[] s, int offsets, int lds, float[] p, int offsetp, int ldp, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, int mm, org.netlib.util.intW m, float[] work, int offsetwork, org.netlib.util.intW info); public void stgex2(boolean wantq, boolean wantz, int n, float[] a, int lda, float[] b, int ldb, float[] q, int ldq, float[] z, int ldz, int j1, int n1, int n2, float[] work, int lwork, org.netlib.util.intW info) { stgex2(wantq, wantz, n, a, 0, lda, b, 0, ldb, q, 0, ldq, z, 0, ldz, j1, n1, n2, work, 0, lwork, info); } - public void stgex2(boolean wantq, boolean wantz, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, int j1, int n1, int n2, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void stgex2(boolean wantq, boolean wantz, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] q, int offsetq, int ldq, float[] z, int offsetz, int ldz, int j1, int n1, int n2, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - stgex2K(wantq, wantz, n, a, _a_offset, lda, b, _b_offset, ldb, q, _q_offset, ldq, z, _z_offset, ldz, j1, n1, n2, work, _work_offset, lwork, info); + stgex2K(wantq, wantz, n, a, offseta, lda, b, offsetb, ldb, q, offsetq, ldq, z, offsetz, ldz, j1, n1, n2, work, offsetwork, lwork, info); } - protected abstract void stgex2K(boolean wantq, boolean wantz, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, int j1, int n1, int n2, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void stgex2K(boolean wantq, boolean wantz, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] q, int offsetq, int ldq, float[] z, int offsetz, int ldz, int j1, int n1, int n2, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void stgexc(boolean wantq, boolean wantz, int n, float[] a, int lda, float[] b, int ldb, float[] q, int ldq, float[] z, int ldz, org.netlib.util.intW ifst, org.netlib.util.intW ilst, float[] work, int lwork, org.netlib.util.intW info) { stgexc(wantq, wantz, n, a, 0, lda, b, 0, ldb, q, 0, ldq, z, 0, ldz, ifst, ilst, work, 0, lwork, info); } - public void stgexc(boolean wantq, boolean wantz, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, org.netlib.util.intW ifst, org.netlib.util.intW ilst, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void stgexc(boolean wantq, boolean wantz, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] q, int offsetq, int ldq, float[] z, int offsetz, int ldz, org.netlib.util.intW ifst, org.netlib.util.intW ilst, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - stgexcK(wantq, wantz, n, a, _a_offset, lda, b, _b_offset, ldb, q, _q_offset, ldq, z, _z_offset, ldz, ifst, ilst, work, _work_offset, lwork, info); + stgexcK(wantq, wantz, n, a, offseta, lda, b, offsetb, ldb, q, offsetq, ldq, z, offsetz, ldz, ifst, ilst, work, offsetwork, lwork, info); } - protected abstract void stgexcK(boolean wantq, boolean wantz, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, org.netlib.util.intW ifst, org.netlib.util.intW ilst, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void stgexcK(boolean wantq, boolean wantz, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] q, int offsetq, int ldq, float[] z, int offsetz, int ldz, org.netlib.util.intW ifst, org.netlib.util.intW ilst, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public void stgsen(int ijob, boolean wantq, boolean wantz, boolean[] select, int n, float[] a, int lda, float[] b, int ldb, float[] alphar, float[] alphai, float[] beta, float[] q, int ldq, float[] z, int ldz, org.netlib.util.intW m, org.netlib.util.floatW pl, org.netlib.util.floatW pr, float[] dif, float[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info) { stgsen(ijob, wantq, wantz, select, 0, n, a, 0, lda, b, 0, ldb, alphar, 0, alphai, 0, beta, 0, q, 0, ldq, z, 0, ldz, m, pl, pr, dif, 0, work, 0, lwork, iwork, 0, liwork, info); } - public void stgsen(int ijob, boolean wantq, boolean wantz, boolean[] select, int _select_offset, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, org.netlib.util.intW m, org.netlib.util.floatW pl, org.netlib.util.floatW pr, float[] dif, int _dif_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { + public void stgsen(int ijob, boolean wantq, boolean wantz, boolean[] select, int offsetselect, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] q, int offsetq, int ldq, float[] z, int offsetz, int ldz, org.netlib.util.intW m, org.netlib.util.floatW pl, org.netlib.util.floatW pr, float[] dif, int offsetdif, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { //FIXME Add arguments check - stgsenK(ijob, wantq, wantz, select, _select_offset, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, q, _q_offset, ldq, z, _z_offset, ldz, m, pl, pr, dif, _dif_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + stgsenK(ijob, wantq, wantz, select, offsetselect, n, a, offseta, lda, b, offsetb, ldb, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, q, offsetq, ldq, z, offsetz, ldz, m, pl, pr, dif, offsetdif, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected abstract void stgsenK(int ijob, boolean wantq, boolean wantz, boolean[] select, int _select_offset, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, org.netlib.util.intW m, org.netlib.util.floatW pl, org.netlib.util.floatW pr, float[] dif, int _dif_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected abstract void stgsenK(int ijob, boolean wantq, boolean wantz, boolean[] select, int offsetselect, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] q, int offsetq, int ldq, float[] z, int offsetz, int ldz, org.netlib.util.intW m, org.netlib.util.floatW pl, org.netlib.util.floatW pr, float[] dif, int offsetdif, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void stgsja(String jobu, String jobv, String jobq, int m, int p, int n, int k, int l, float[] a, int lda, float[] b, int ldb, float tola, float tolb, float[] alpha, float[] beta, float[] u, int ldu, float[] v, int ldv, float[] q, int ldq, float[] work, org.netlib.util.intW ncycle, org.netlib.util.intW info) { stgsja(jobu, jobv, jobq, m, p, n, k, l, a, 0, lda, b, 0, ldb, tola, tolb, alpha, 0, beta, 0, u, 0, ldu, v, 0, ldv, q, 0, ldq, work, 0, ncycle, info); } - public void stgsja(String jobu, String jobv, String jobq, int m, int p, int n, int k, int l, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float tola, float tolb, float[] alpha, int _alpha_offset, float[] beta, int _beta_offset, float[] u, int _u_offset, int ldu, float[] v, int _v_offset, int ldv, float[] q, int _q_offset, int ldq, float[] work, int _work_offset, org.netlib.util.intW ncycle, org.netlib.util.intW info) { + public void stgsja(String jobu, String jobv, String jobq, int m, int p, int n, int k, int l, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float tola, float tolb, float[] alpha, int offsetalpha, float[] beta, int offsetbeta, float[] u, int offsetu, int ldu, float[] v, int offsetv, int ldv, float[] q, int offsetq, int ldq, float[] work, int offsetwork, org.netlib.util.intW ncycle, org.netlib.util.intW info) { //FIXME Add arguments check - stgsjaK(jobu, jobv, jobq, m, p, n, k, l, a, _a_offset, lda, b, _b_offset, ldb, tola, tolb, alpha, _alpha_offset, beta, _beta_offset, u, _u_offset, ldu, v, _v_offset, ldv, q, _q_offset, ldq, work, _work_offset, ncycle, info); + stgsjaK(jobu, jobv, jobq, m, p, n, k, l, a, offseta, lda, b, offsetb, ldb, tola, tolb, alpha, offsetalpha, beta, offsetbeta, u, offsetu, ldu, v, offsetv, ldv, q, offsetq, ldq, work, offsetwork, ncycle, info); } - protected abstract void stgsjaK(String jobu, String jobv, String jobq, int m, int p, int n, int k, int l, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float tola, float tolb, float[] alpha, int _alpha_offset, float[] beta, int _beta_offset, float[] u, int _u_offset, int ldu, float[] v, int _v_offset, int ldv, float[] q, int _q_offset, int ldq, float[] work, int _work_offset, org.netlib.util.intW ncycle, org.netlib.util.intW info); + protected abstract void stgsjaK(String jobu, String jobv, String jobq, int m, int p, int n, int k, int l, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float tola, float tolb, float[] alpha, int offsetalpha, float[] beta, int offsetbeta, float[] u, int offsetu, int ldu, float[] v, int offsetv, int ldv, float[] q, int offsetq, int ldq, float[] work, int offsetwork, org.netlib.util.intW ncycle, org.netlib.util.intW info); public void stgsna(String job, String howmny, boolean[] select, int n, float[] a, int lda, float[] b, int ldb, float[] vl, int ldvl, float[] vr, int ldvr, float[] s, float[] dif, int mm, org.netlib.util.intW m, float[] work, int lwork, int[] iwork, org.netlib.util.intW info) { stgsna(job, howmny, select, 0, n, a, 0, lda, b, 0, ldb, vl, 0, ldvl, vr, 0, ldvr, s, 0, dif, 0, mm, m, work, 0, lwork, iwork, 0, info); } - public void stgsna(String job, String howmny, boolean[] select, int _select_offset, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] s, int _s_offset, float[] dif, int _dif_offset, int mm, org.netlib.util.intW m, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void stgsna(String job, String howmny, boolean[] select, int offsetselect, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, float[] s, int offsets, float[] dif, int offsetdif, int mm, org.netlib.util.intW m, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - stgsnaK(job, howmny, select, _select_offset, n, a, _a_offset, lda, b, _b_offset, ldb, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, s, _s_offset, dif, _dif_offset, mm, m, work, _work_offset, lwork, iwork, _iwork_offset, info); + stgsnaK(job, howmny, select, offsetselect, n, a, offseta, lda, b, offsetb, ldb, vl, offsetvl, ldvl, vr, offsetvr, ldvr, s, offsets, dif, offsetdif, mm, m, work, offsetwork, lwork, iwork, offsetiwork, info); } - protected abstract void stgsnaK(String job, String howmny, boolean[] select, int _select_offset, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] s, int _s_offset, float[] dif, int _dif_offset, int mm, org.netlib.util.intW m, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void stgsnaK(String job, String howmny, boolean[] select, int offsetselect, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, float[] s, int offsets, float[] dif, int offsetdif, int mm, org.netlib.util.intW m, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void stgsy2(String trans, int ijob, int m, int n, float[] a, int lda, float[] b, int ldb, float[] c, int Ldc, float[] d, int ldd, float[] e, int lde, float[] f, int ldf, org.netlib.util.floatW scale, org.netlib.util.floatW rdsum, org.netlib.util.floatW rdscal, int[] iwork, org.netlib.util.intW pq, org.netlib.util.intW info) { stgsy2(trans, ijob, m, n, a, 0, lda, b, 0, ldb, c, 0, Ldc, d, 0, ldd, e, 0, lde, f, 0, ldf, scale, rdsum, rdscal, iwork, 0, pq, info); } - public void stgsy2(String trans, int ijob, int m, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] c, int _c_offset, int Ldc, float[] d, int _d_offset, int ldd, float[] e, int _e_offset, int lde, float[] f, int _f_offset, int ldf, org.netlib.util.floatW scale, org.netlib.util.floatW rdsum, org.netlib.util.floatW rdscal, int[] iwork, int _iwork_offset, org.netlib.util.intW pq, org.netlib.util.intW info) { + public void stgsy2(String trans, int ijob, int m, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] c, int offsetc, int Ldc, float[] d, int offsetd, int ldd, float[] e, int offsete, int lde, float[] f, int offsetf, int ldf, org.netlib.util.floatW scale, org.netlib.util.floatW rdsum, org.netlib.util.floatW rdscal, int[] iwork, int offsetiwork, org.netlib.util.intW pq, org.netlib.util.intW info) { //FIXME Add arguments check - stgsy2K(trans, ijob, m, n, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, Ldc, d, _d_offset, ldd, e, _e_offset, lde, f, _f_offset, ldf, scale, rdsum, rdscal, iwork, _iwork_offset, pq, info); + stgsy2K(trans, ijob, m, n, a, offseta, lda, b, offsetb, ldb, c, offsetc, Ldc, d, offsetd, ldd, e, offsete, lde, f, offsetf, ldf, scale, rdsum, rdscal, iwork, offsetiwork, pq, info); } - protected abstract void stgsy2K(String trans, int ijob, int m, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] c, int _c_offset, int Ldc, float[] d, int _d_offset, int ldd, float[] e, int _e_offset, int lde, float[] f, int _f_offset, int ldf, org.netlib.util.floatW scale, org.netlib.util.floatW rdsum, org.netlib.util.floatW rdscal, int[] iwork, int _iwork_offset, org.netlib.util.intW pq, org.netlib.util.intW info); + protected abstract void stgsy2K(String trans, int ijob, int m, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] c, int offsetc, int Ldc, float[] d, int offsetd, int ldd, float[] e, int offsete, int lde, float[] f, int offsetf, int ldf, org.netlib.util.floatW scale, org.netlib.util.floatW rdsum, org.netlib.util.floatW rdscal, int[] iwork, int offsetiwork, org.netlib.util.intW pq, org.netlib.util.intW info); public void stgsyl(String trans, int ijob, int m, int n, float[] a, int lda, float[] b, int ldb, float[] c, int Ldc, float[] d, int ldd, float[] e, int lde, float[] f, int ldf, org.netlib.util.floatW scale, org.netlib.util.floatW dif, float[] work, int lwork, int[] iwork, org.netlib.util.intW info) { stgsyl(trans, ijob, m, n, a, 0, lda, b, 0, ldb, c, 0, Ldc, d, 0, ldd, e, 0, lde, f, 0, ldf, scale, dif, work, 0, lwork, iwork, 0, info); } - public void stgsyl(String trans, int ijob, int m, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] c, int _c_offset, int Ldc, float[] d, int _d_offset, int ldd, float[] e, int _e_offset, int lde, float[] f, int _f_offset, int ldf, org.netlib.util.floatW scale, org.netlib.util.floatW dif, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void stgsyl(String trans, int ijob, int m, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] c, int offsetc, int Ldc, float[] d, int offsetd, int ldd, float[] e, int offsete, int lde, float[] f, int offsetf, int ldf, org.netlib.util.floatW scale, org.netlib.util.floatW dif, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - stgsylK(trans, ijob, m, n, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, Ldc, d, _d_offset, ldd, e, _e_offset, lde, f, _f_offset, ldf, scale, dif, work, _work_offset, lwork, iwork, _iwork_offset, info); + stgsylK(trans, ijob, m, n, a, offseta, lda, b, offsetb, ldb, c, offsetc, Ldc, d, offsetd, ldd, e, offsete, lde, f, offsetf, ldf, scale, dif, work, offsetwork, lwork, iwork, offsetiwork, info); } - protected abstract void stgsylK(String trans, int ijob, int m, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] c, int _c_offset, int Ldc, float[] d, int _d_offset, int ldd, float[] e, int _e_offset, int lde, float[] f, int _f_offset, int ldf, org.netlib.util.floatW scale, org.netlib.util.floatW dif, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void stgsylK(String trans, int ijob, int m, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] c, int offsetc, int Ldc, float[] d, int offsetd, int ldd, float[] e, int offsete, int lde, float[] f, int offsetf, int ldf, org.netlib.util.floatW scale, org.netlib.util.floatW dif, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void stpcon(String norm, String uplo, String diag, int n, float[] ap, org.netlib.util.floatW rcond, float[] work, int[] iwork, org.netlib.util.intW info) { stpcon(norm, uplo, diag, n, ap, 0, rcond, work, 0, iwork, 0, info); } - public void stpcon(String norm, String uplo, String diag, int n, float[] ap, int _ap_offset, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void stpcon(String norm, String uplo, String diag, int n, float[] ap, int offsetap, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - stpconK(norm, uplo, diag, n, ap, _ap_offset, rcond, work, _work_offset, iwork, _iwork_offset, info); + stpconK(norm, uplo, diag, n, ap, offsetap, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void stpconK(String norm, String uplo, String diag, int n, float[] ap, int _ap_offset, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void stpconK(String norm, String uplo, String diag, int n, float[] ap, int offsetap, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void stprfs(String uplo, String trans, String diag, int n, int nrhs, float[] ap, float[] b, int ldb, float[] x, int ldx, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info) { stprfs(uplo, trans, diag, n, nrhs, ap, 0, b, 0, ldb, x, 0, ldx, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void stprfs(String uplo, String trans, String diag, int n, int nrhs, float[] ap, int _ap_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void stprfs(String uplo, String trans, String diag, int n, int nrhs, float[] ap, int offsetap, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - stprfsK(uplo, trans, diag, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + stprfsK(uplo, trans, diag, n, nrhs, ap, offsetap, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void stprfsK(String uplo, String trans, String diag, int n, int nrhs, float[] ap, int _ap_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void stprfsK(String uplo, String trans, String diag, int n, int nrhs, float[] ap, int offsetap, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void stptri(String uplo, String diag, int n, float[] ap, org.netlib.util.intW info) { stptri(uplo, diag, n, ap, 0, info); } - public void stptri(String uplo, String diag, int n, float[] ap, int _ap_offset, org.netlib.util.intW info) { + public void stptri(String uplo, String diag, int n, float[] ap, int offsetap, org.netlib.util.intW info) { //FIXME Add arguments check - stptriK(uplo, diag, n, ap, _ap_offset, info); + stptriK(uplo, diag, n, ap, offsetap, info); } - protected abstract void stptriK(String uplo, String diag, int n, float[] ap, int _ap_offset, org.netlib.util.intW info); + protected abstract void stptriK(String uplo, String diag, int n, float[] ap, int offsetap, org.netlib.util.intW info); public void stptrs(String uplo, String trans, String diag, int n, int nrhs, float[] ap, float[] b, int ldb, org.netlib.util.intW info) { stptrs(uplo, trans, diag, n, nrhs, ap, 0, b, 0, ldb, info); } - public void stptrs(String uplo, String trans, String diag, int n, int nrhs, float[] ap, int _ap_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void stptrs(String uplo, String trans, String diag, int n, int nrhs, float[] ap, int offsetap, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - stptrsK(uplo, trans, diag, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, info); + stptrsK(uplo, trans, diag, n, nrhs, ap, offsetap, b, offsetb, ldb, info); } - protected abstract void stptrsK(String uplo, String trans, String diag, int n, int nrhs, float[] ap, int _ap_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void stptrsK(String uplo, String trans, String diag, int n, int nrhs, float[] ap, int offsetap, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void strcon(String norm, String uplo, String diag, int n, float[] a, int lda, org.netlib.util.floatW rcond, float[] work, int[] iwork, org.netlib.util.intW info) { strcon(norm, uplo, diag, n, a, 0, lda, rcond, work, 0, iwork, 0, info); } - public void strcon(String norm, String uplo, String diag, int n, float[] a, int _a_offset, int lda, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void strcon(String norm, String uplo, String diag, int n, float[] a, int offseta, int lda, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - strconK(norm, uplo, diag, n, a, _a_offset, lda, rcond, work, _work_offset, iwork, _iwork_offset, info); + strconK(norm, uplo, diag, n, a, offseta, lda, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void strconK(String norm, String uplo, String diag, int n, float[] a, int _a_offset, int lda, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void strconK(String norm, String uplo, String diag, int n, float[] a, int offseta, int lda, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void strevc(String side, String howmny, boolean[] select, int n, float[] t, int ldt, float[] vl, int ldvl, float[] vr, int ldvr, int mm, org.netlib.util.intW m, float[] work, org.netlib.util.intW info) { strevc(side, howmny, select, 0, n, t, 0, ldt, vl, 0, ldvl, vr, 0, ldvr, mm, m, work, 0, info); } - public void strevc(String side, String howmny, boolean[] select, int _select_offset, int n, float[] t, int _t_offset, int ldt, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, float[] work, int _work_offset, org.netlib.util.intW info) { + public void strevc(String side, String howmny, boolean[] select, int offsetselect, int n, float[] t, int offsett, int ldt, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, int mm, org.netlib.util.intW m, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - strevcK(side, howmny, select, _select_offset, n, t, _t_offset, ldt, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, mm, m, work, _work_offset, info); + strevcK(side, howmny, select, offsetselect, n, t, offsett, ldt, vl, offsetvl, ldvl, vr, offsetvr, ldvr, mm, m, work, offsetwork, info); } - protected abstract void strevcK(String side, String howmny, boolean[] select, int _select_offset, int n, float[] t, int _t_offset, int ldt, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void strevcK(String side, String howmny, boolean[] select, int offsetselect, int n, float[] t, int offsett, int ldt, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, int mm, org.netlib.util.intW m, float[] work, int offsetwork, org.netlib.util.intW info); public void strexc(String compq, int n, float[] t, int ldt, float[] q, int ldq, org.netlib.util.intW ifst, org.netlib.util.intW ilst, float[] work, org.netlib.util.intW info) { strexc(compq, n, t, 0, ldt, q, 0, ldq, ifst, ilst, work, 0, info); } - public void strexc(String compq, int n, float[] t, int _t_offset, int ldt, float[] q, int _q_offset, int ldq, org.netlib.util.intW ifst, org.netlib.util.intW ilst, float[] work, int _work_offset, org.netlib.util.intW info) { + public void strexc(String compq, int n, float[] t, int offsett, int ldt, float[] q, int offsetq, int ldq, org.netlib.util.intW ifst, org.netlib.util.intW ilst, float[] work, int offsetwork, org.netlib.util.intW info) { //FIXME Add arguments check - strexcK(compq, n, t, _t_offset, ldt, q, _q_offset, ldq, ifst, ilst, work, _work_offset, info); + strexcK(compq, n, t, offsett, ldt, q, offsetq, ldq, ifst, ilst, work, offsetwork, info); } - protected abstract void strexcK(String compq, int n, float[] t, int _t_offset, int ldt, float[] q, int _q_offset, int ldq, org.netlib.util.intW ifst, org.netlib.util.intW ilst, float[] work, int _work_offset, org.netlib.util.intW info); + protected abstract void strexcK(String compq, int n, float[] t, int offsett, int ldt, float[] q, int offsetq, int ldq, org.netlib.util.intW ifst, org.netlib.util.intW ilst, float[] work, int offsetwork, org.netlib.util.intW info); public void strrfs(String uplo, String trans, String diag, int n, int nrhs, float[] a, int lda, float[] b, int ldb, float[] x, int ldx, float[] ferr, float[] berr, float[] work, int[] iwork, org.netlib.util.intW info) { strrfs(uplo, trans, diag, n, nrhs, a, 0, lda, b, 0, ldb, x, 0, ldx, ferr, 0, berr, 0, work, 0, iwork, 0, info); } - public void strrfs(String uplo, String trans, String diag, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void strrfs(String uplo, String trans, String diag, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - strrfsK(uplo, trans, diag, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + strrfsK(uplo, trans, diag, n, nrhs, a, offseta, lda, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected abstract void strrfsK(String uplo, String trans, String diag, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void strrfsK(String uplo, String trans, String diag, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void strsen(String job, String compq, boolean[] select, int n, float[] t, int ldt, float[] q, int ldq, float[] wr, float[] wi, org.netlib.util.intW m, org.netlib.util.floatW s, org.netlib.util.floatW sep, float[] work, int lwork, int[] iwork, int liwork, org.netlib.util.intW info) { strsen(job, compq, select, 0, n, t, 0, ldt, q, 0, ldq, wr, 0, wi, 0, m, s, sep, work, 0, lwork, iwork, 0, liwork, info); } - public void strsen(String job, String compq, boolean[] select, int _select_offset, int n, float[] t, int _t_offset, int ldt, float[] q, int _q_offset, int ldq, float[] wr, int _wr_offset, float[] wi, int _wi_offset, org.netlib.util.intW m, org.netlib.util.floatW s, org.netlib.util.floatW sep, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { + public void strsen(String job, String compq, boolean[] select, int offsetselect, int n, float[] t, int offsett, int ldt, float[] q, int offsetq, int ldq, float[] wr, int offsetwr, float[] wi, int offsetwi, org.netlib.util.intW m, org.netlib.util.floatW s, org.netlib.util.floatW sep, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { //FIXME Add arguments check - strsenK(job, compq, select, _select_offset, n, t, _t_offset, ldt, q, _q_offset, ldq, wr, _wr_offset, wi, _wi_offset, m, s, sep, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + strsenK(job, compq, select, offsetselect, n, t, offsett, ldt, q, offsetq, ldq, wr, offsetwr, wi, offsetwi, m, s, sep, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected abstract void strsenK(String job, String compq, boolean[] select, int _select_offset, int n, float[] t, int _t_offset, int ldt, float[] q, int _q_offset, int ldq, float[] wr, int _wr_offset, float[] wi, int _wi_offset, org.netlib.util.intW m, org.netlib.util.floatW s, org.netlib.util.floatW sep, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected abstract void strsenK(String job, String compq, boolean[] select, int offsetselect, int n, float[] t, int offsett, int ldt, float[] q, int offsetq, int ldq, float[] wr, int offsetwr, float[] wi, int offsetwi, org.netlib.util.intW m, org.netlib.util.floatW s, org.netlib.util.floatW sep, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); public void strsna(String job, String howmny, boolean[] select, int n, float[] t, int ldt, float[] vl, int ldvl, float[] vr, int ldvr, float[] s, float[] sep, int mm, org.netlib.util.intW m, float[] work, int ldwork, int[] iwork, org.netlib.util.intW info) { strsna(job, howmny, select, 0, n, t, 0, ldt, vl, 0, ldvl, vr, 0, ldvr, s, 0, sep, 0, mm, m, work, 0, ldwork, iwork, 0, info); } - public void strsna(String job, String howmny, boolean[] select, int _select_offset, int n, float[] t, int _t_offset, int ldt, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] s, int _s_offset, float[] sep, int _sep_offset, int mm, org.netlib.util.intW m, float[] work, int _work_offset, int ldwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { + public void strsna(String job, String howmny, boolean[] select, int offsetselect, int n, float[] t, int offsett, int ldt, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, float[] s, int offsets, float[] sep, int offsetsep, int mm, org.netlib.util.intW m, float[] work, int offsetwork, int ldwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { //FIXME Add arguments check - strsnaK(job, howmny, select, _select_offset, n, t, _t_offset, ldt, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, s, _s_offset, sep, _sep_offset, mm, m, work, _work_offset, ldwork, iwork, _iwork_offset, info); + strsnaK(job, howmny, select, offsetselect, n, t, offsett, ldt, vl, offsetvl, ldvl, vr, offsetvr, ldvr, s, offsets, sep, offsetsep, mm, m, work, offsetwork, ldwork, iwork, offsetiwork, info); } - protected abstract void strsnaK(String job, String howmny, boolean[] select, int _select_offset, int n, float[] t, int _t_offset, int ldt, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] s, int _s_offset, float[] sep, int _sep_offset, int mm, org.netlib.util.intW m, float[] work, int _work_offset, int ldwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected abstract void strsnaK(String job, String howmny, boolean[] select, int offsetselect, int n, float[] t, int offsett, int ldt, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, float[] s, int offsets, float[] sep, int offsetsep, int mm, org.netlib.util.intW m, float[] work, int offsetwork, int ldwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); public void strsyl(String trana, String tranb, int isgn, int m, int n, float[] a, int lda, float[] b, int ldb, float[] c, int Ldc, org.netlib.util.floatW scale, org.netlib.util.intW info) { strsyl(trana, tranb, isgn, m, n, a, 0, lda, b, 0, ldb, c, 0, Ldc, scale, info); } - public void strsyl(String trana, String tranb, int isgn, int m, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] c, int _c_offset, int Ldc, org.netlib.util.floatW scale, org.netlib.util.intW info) { + public void strsyl(String trana, String tranb, int isgn, int m, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] c, int offsetc, int Ldc, org.netlib.util.floatW scale, org.netlib.util.intW info) { //FIXME Add arguments check - strsylK(trana, tranb, isgn, m, n, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, Ldc, scale, info); + strsylK(trana, tranb, isgn, m, n, a, offseta, lda, b, offsetb, ldb, c, offsetc, Ldc, scale, info); } - protected abstract void strsylK(String trana, String tranb, int isgn, int m, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] c, int _c_offset, int Ldc, org.netlib.util.floatW scale, org.netlib.util.intW info); + protected abstract void strsylK(String trana, String tranb, int isgn, int m, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] c, int offsetc, int Ldc, org.netlib.util.floatW scale, org.netlib.util.intW info); public void strti2(String uplo, String diag, int n, float[] a, int lda, org.netlib.util.intW info) { strti2(uplo, diag, n, a, 0, lda, info); } - public void strti2(String uplo, String diag, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info) { + public void strti2(String uplo, String diag, int n, float[] a, int offseta, int lda, org.netlib.util.intW info) { //FIXME Add arguments check - strti2K(uplo, diag, n, a, _a_offset, lda, info); + strti2K(uplo, diag, n, a, offseta, lda, info); } - protected abstract void strti2K(String uplo, String diag, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected abstract void strti2K(String uplo, String diag, int n, float[] a, int offseta, int lda, org.netlib.util.intW info); public void strtri(String uplo, String diag, int n, float[] a, int lda, org.netlib.util.intW info) { strtri(uplo, diag, n, a, 0, lda, info); } - public void strtri(String uplo, String diag, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info) { + public void strtri(String uplo, String diag, int n, float[] a, int offseta, int lda, org.netlib.util.intW info) { //FIXME Add arguments check - strtriK(uplo, diag, n, a, _a_offset, lda, info); + strtriK(uplo, diag, n, a, offseta, lda, info); } - protected abstract void strtriK(String uplo, String diag, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected abstract void strtriK(String uplo, String diag, int n, float[] a, int offseta, int lda, org.netlib.util.intW info); public void strtrs(String uplo, String trans, String diag, int n, int nrhs, float[] a, int lda, float[] b, int ldb, org.netlib.util.intW info) { strtrs(uplo, trans, diag, n, nrhs, a, 0, lda, b, 0, ldb, info); } - public void strtrs(String uplo, String trans, String diag, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { + public void strtrs(String uplo, String trans, String diag, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { //FIXME Add arguments check - strtrsK(uplo, trans, diag, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, info); + strtrsK(uplo, trans, diag, n, nrhs, a, offseta, lda, b, offsetb, ldb, info); } - protected abstract void strtrsK(String uplo, String trans, String diag, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected abstract void strtrsK(String uplo, String trans, String diag, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW info); public void stzrqf(int m, int n, float[] a, int lda, float[] tau, org.netlib.util.intW info) { stzrqf(m, n, a, 0, lda, tau, 0, info); } - public void stzrqf(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, org.netlib.util.intW info) { + public void stzrqf(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, org.netlib.util.intW info) { //FIXME Add arguments check - stzrqfK(m, n, a, _a_offset, lda, tau, _tau_offset, info); + stzrqfK(m, n, a, offseta, lda, tau, offsettau, info); } - protected abstract void stzrqfK(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, org.netlib.util.intW info); + protected abstract void stzrqfK(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, org.netlib.util.intW info); public void stzrzf(int m, int n, float[] a, int lda, float[] tau, float[] work, int lwork, org.netlib.util.intW info) { stzrzf(m, n, a, 0, lda, tau, 0, work, 0, lwork, info); } - public void stzrzf(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { + public void stzrzf(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { //FIXME Add arguments check - stzrzfK(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + stzrzfK(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected abstract void stzrzfK(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected abstract void stzrzfK(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); public double dlamch(String cmach) { return dlamchK(cmach); diff --git a/lapack/src/main/java/dev/ludovic/netlib/lapack/F2jLAPACK.java b/lapack/src/main/java/dev/ludovic/netlib/lapack/F2jLAPACK.java index 3c85f8db..72f3ffc5 100644 --- a/lapack/src/main/java/dev/ludovic/netlib/lapack/F2jLAPACK.java +++ b/lapack/src/main/java/dev/ludovic/netlib/lapack/F2jLAPACK.java @@ -37,304 +37,304 @@ public static dev.ludovic.netlib.JavaLAPACK getInstance() { return instance; } - protected void dbdsdcK(String uplo, String compq, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, double[] q, int _q_offset, int[] iq, int _iq_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dbdsdc.dbdsdc(uplo, compq, n, d, _d_offset, e, _e_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, q, _q_offset, iq, _iq_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void dbdsdcK(String uplo, String compq, int n, double[] d, int offsetd, double[] e, int offsete, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int ldvt, double[] q, int offsetq, int[] iq, int offsetiq, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dbdsdc.dbdsdc(uplo, compq, n, d, offsetd, e, offsete, u, offsetu, ldu, vt, offsetvt, ldvt, q, offsetq, iq, offsetiq, work, offsetwork, iwork, offsetiwork, info); } - protected void dbdsqrK(String uplo, int n, int ncvt, int nru, int ncc, double[] d, int _d_offset, double[] e, int _e_offset, double[] vt, int _vt_offset, int ldvt, double[] u, int _u_offset, int ldu, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dbdsqr.dbdsqr(uplo, n, ncvt, nru, ncc, d, _d_offset, e, _e_offset, vt, _vt_offset, ldvt, u, _u_offset, ldu, c, _c_offset, Ldc, work, _work_offset, info); + protected void dbdsqrK(String uplo, int n, int ncvt, int nru, int ncc, double[] d, int offsetd, double[] e, int offsete, double[] vt, int offsetvt, int ldvt, double[] u, int offsetu, int ldu, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dbdsqr.dbdsqr(uplo, n, ncvt, nru, ncc, d, offsetd, e, offsete, vt, offsetvt, ldvt, u, offsetu, ldu, c, offsetc, Ldc, work, offsetwork, info); } - protected void ddisnaK(String job, int m, int n, double[] d, int _d_offset, double[] sep, int _sep_offset, org.netlib.util.intW info) { - org.netlib.lapack.Ddisna.ddisna(job, m, n, d, _d_offset, sep, _sep_offset, info); + protected void ddisnaK(String job, int m, int n, double[] d, int offsetd, double[] sep, int offsetsep, org.netlib.util.intW info) { + org.netlib.lapack.Ddisna.ddisna(job, m, n, d, offsetd, sep, offsetsep, info); } - protected void dgbbrdK(String vect, int m, int n, int ncc, int kl, int ku, double[] ab, int _ab_offset, int ldab, double[] d, int _d_offset, double[] e, int _e_offset, double[] q, int _q_offset, int ldq, double[] pt, int _pt_offset, int ldpt, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dgbbrd.dgbbrd(vect, m, n, ncc, kl, ku, ab, _ab_offset, ldab, d, _d_offset, e, _e_offset, q, _q_offset, ldq, pt, _pt_offset, ldpt, c, _c_offset, Ldc, work, _work_offset, info); + protected void dgbbrdK(String vect, int m, int n, int ncc, int kl, int ku, double[] ab, int offsetab, int ldab, double[] d, int offsetd, double[] e, int offsete, double[] q, int offsetq, int ldq, double[] pt, int offsetpt, int ldpt, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgbbrd.dgbbrd(vect, m, n, ncc, kl, ku, ab, offsetab, ldab, d, offsetd, e, offsete, q, offsetq, ldq, pt, offsetpt, ldpt, c, offsetc, Ldc, work, offsetwork, info); } - protected void dgbconK(String norm, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dgbcon.dgbcon(norm, n, kl, ku, ab, _ab_offset, ldab, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + protected void dgbconK(String norm, int n, int kl, int ku, double[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgbcon.dgbcon(norm, n, kl, ku, ab, offsetab, ldab, ipiv, offsetipiv, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected void dgbequK(int m, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, double[] r, int _r_offset, double[] c, int _c_offset, org.netlib.util.doubleW rowcnd, org.netlib.util.doubleW colcnd, org.netlib.util.doubleW amax, org.netlib.util.intW info) { - org.netlib.lapack.Dgbequ.dgbequ(m, n, kl, ku, ab, _ab_offset, ldab, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, info); + protected void dgbequK(int m, int n, int kl, int ku, double[] ab, int offsetab, int ldab, double[] r, int offsetr, double[] c, int offsetc, org.netlib.util.doubleW rowcnd, org.netlib.util.doubleW colcnd, org.netlib.util.doubleW amax, org.netlib.util.intW info) { + org.netlib.lapack.Dgbequ.dgbequ(m, n, kl, ku, ab, offsetab, ldab, r, offsetr, c, offsetc, rowcnd, colcnd, amax, info); } - protected void dgbrfsK(String trans, int n, int kl, int ku, int nrhs, double[] ab, int _ab_offset, int ldab, double[] afb, int _afb_offset, int ldafb, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dgbrfs.dgbrfs(trans, n, kl, ku, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void dgbrfsK(String trans, int n, int kl, int ku, int nrhs, double[] ab, int offsetab, int ldab, double[] afb, int offsetafb, int ldafb, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgbrfs.dgbrfs(trans, n, kl, ku, nrhs, ab, offsetab, ldab, afb, offsetafb, ldafb, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void dgbsvK(int n, int kl, int ku, int nrhs, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Dgbsv.dgbsv(n, kl, ku, nrhs, ab, _ab_offset, ldab, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + protected void dgbsvK(int n, int kl, int ku, int nrhs, double[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Dgbsv.dgbsv(n, kl, ku, nrhs, ab, offsetab, ldab, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected void dgbsvxK(String fact, String trans, int n, int kl, int ku, int nrhs, double[] ab, int _ab_offset, int ldab, double[] afb, int _afb_offset, int ldafb, int[] ipiv, int _ipiv_offset, org.netlib.util.StringW equed, double[] r, int _r_offset, double[] c, int _c_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dgbsvx.dgbsvx(fact, trans, n, kl, ku, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, ipiv, _ipiv_offset, equed, r, _r_offset, c, _c_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void dgbsvxK(String fact, String trans, int n, int kl, int ku, int nrhs, double[] ab, int offsetab, int ldab, double[] afb, int offsetafb, int ldafb, int[] ipiv, int offsetipiv, org.netlib.util.StringW equed, double[] r, int offsetr, double[] c, int offsetc, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgbsvx.dgbsvx(fact, trans, n, kl, ku, nrhs, ab, offsetab, ldab, afb, offsetafb, ldafb, ipiv, offsetipiv, equed, r, offsetr, c, offsetc, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void dgbtf2K(int m, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dgbtf2.dgbtf2(m, n, kl, ku, ab, _ab_offset, ldab, ipiv, _ipiv_offset, info); + protected void dgbtf2K(int m, int n, int kl, int ku, double[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, org.netlib.util.intW info) { + org.netlib.lapack.Dgbtf2.dgbtf2(m, n, kl, ku, ab, offsetab, ldab, ipiv, offsetipiv, info); } - protected void dgbtrfK(int m, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dgbtrf.dgbtrf(m, n, kl, ku, ab, _ab_offset, ldab, ipiv, _ipiv_offset, info); + protected void dgbtrfK(int m, int n, int kl, int ku, double[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, org.netlib.util.intW info) { + org.netlib.lapack.Dgbtrf.dgbtrf(m, n, kl, ku, ab, offsetab, ldab, ipiv, offsetipiv, info); } - protected void dgbtrsK(String trans, int n, int kl, int ku, int nrhs, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Dgbtrs.dgbtrs(trans, n, kl, ku, nrhs, ab, _ab_offset, ldab, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + protected void dgbtrsK(String trans, int n, int kl, int ku, int nrhs, double[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Dgbtrs.dgbtrs(trans, n, kl, ku, nrhs, ab, offsetab, ldab, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected void dgebakK(String job, String side, int n, int ilo, int ihi, double[] scale, int _scale_offset, int m, double[] v, int _v_offset, int ldv, org.netlib.util.intW info) { - org.netlib.lapack.Dgebak.dgebak(job, side, n, ilo, ihi, scale, _scale_offset, m, v, _v_offset, ldv, info); + protected void dgebakK(String job, String side, int n, int ilo, int ihi, double[] scale, int offsetscale, int m, double[] v, int offsetv, int ldv, org.netlib.util.intW info) { + org.netlib.lapack.Dgebak.dgebak(job, side, n, ilo, ihi, scale, offsetscale, m, v, offsetv, ldv, info); } - protected void dgebalK(String job, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] scale, int _scale_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dgebal.dgebal(job, n, a, _a_offset, lda, ilo, ihi, scale, _scale_offset, info); + protected void dgebalK(String job, int n, double[] a, int offseta, int lda, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] scale, int offsetscale, org.netlib.util.intW info) { + org.netlib.lapack.Dgebal.dgebal(job, n, a, offseta, lda, ilo, ihi, scale, offsetscale, info); } - protected void dgebd2K(int m, int n, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tauq, int _tauq_offset, double[] taup, int _taup_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dgebd2.dgebd2(m, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tauq, _tauq_offset, taup, _taup_offset, work, _work_offset, info); + protected void dgebd2K(int m, int n, double[] a, int offseta, int lda, double[] d, int offsetd, double[] e, int offsete, double[] tauq, int offsettauq, double[] taup, int offsettaup, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgebd2.dgebd2(m, n, a, offseta, lda, d, offsetd, e, offsete, tauq, offsettauq, taup, offsettaup, work, offsetwork, info); } - protected void dgebrdK(int m, int n, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tauq, int _tauq_offset, double[] taup, int _taup_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dgebrd.dgebrd(m, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tauq, _tauq_offset, taup, _taup_offset, work, _work_offset, lwork, info); + protected void dgebrdK(int m, int n, double[] a, int offseta, int lda, double[] d, int offsetd, double[] e, int offsete, double[] tauq, int offsettauq, double[] taup, int offsettaup, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgebrd.dgebrd(m, n, a, offseta, lda, d, offsetd, e, offsete, tauq, offsettauq, taup, offsettaup, work, offsetwork, lwork, info); } - protected void dgeconK(String norm, int n, double[] a, int _a_offset, int lda, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dgecon.dgecon(norm, n, a, _a_offset, lda, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + protected void dgeconK(String norm, int n, double[] a, int offseta, int lda, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgecon.dgecon(norm, n, a, offseta, lda, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected void dgeequK(int m, int n, double[] a, int _a_offset, int lda, double[] r, int _r_offset, double[] c, int _c_offset, org.netlib.util.doubleW rowcnd, org.netlib.util.doubleW colcnd, org.netlib.util.doubleW amax, org.netlib.util.intW info) { - org.netlib.lapack.Dgeequ.dgeequ(m, n, a, _a_offset, lda, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, info); + protected void dgeequK(int m, int n, double[] a, int offseta, int lda, double[] r, int offsetr, double[] c, int offsetc, org.netlib.util.doubleW rowcnd, org.netlib.util.doubleW colcnd, org.netlib.util.doubleW amax, org.netlib.util.intW info) { + org.netlib.lapack.Dgeequ.dgeequ(m, n, a, offseta, lda, r, offsetr, c, offsetc, rowcnd, colcnd, amax, info); } - protected void dgeesK(String jobvs, String sort, java.lang.Object select, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW sdim, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vs, int _vs_offset, int ldvs, double[] work, int _work_offset, int lwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dgees.dgees(jobvs, sort, select, n, a, _a_offset, lda, sdim, wr, _wr_offset, wi, _wi_offset, vs, _vs_offset, ldvs, work, _work_offset, lwork, bwork, _bwork_offset, info); + protected void dgeesK(String jobvs, String sort, java.lang.Object select, int n, double[] a, int offseta, int lda, org.netlib.util.intW sdim, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] vs, int offsetvs, int ldvs, double[] work, int offsetwork, int lwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgees.dgees(jobvs, sort, select, n, a, offseta, lda, sdim, wr, offsetwr, wi, offsetwi, vs, offsetvs, ldvs, work, offsetwork, lwork, bwork, offsetbwork, info); } - protected void dgeesxK(String jobvs, String sort, java.lang.Object select, String sense, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW sdim, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vs, int _vs_offset, int ldvs, org.netlib.util.doubleW rconde, org.netlib.util.doubleW rcondv, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dgeesx.dgeesx(jobvs, sort, select, sense, n, a, _a_offset, lda, sdim, wr, _wr_offset, wi, _wi_offset, vs, _vs_offset, ldvs, rconde, rcondv, work, _work_offset, lwork, iwork, _iwork_offset, liwork, bwork, _bwork_offset, info); + protected void dgeesxK(String jobvs, String sort, java.lang.Object select, String sense, int n, double[] a, int offseta, int lda, org.netlib.util.intW sdim, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] vs, int offsetvs, int ldvs, org.netlib.util.doubleW rconde, org.netlib.util.doubleW rcondv, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgeesx.dgeesx(jobvs, sort, select, sense, n, a, offseta, lda, sdim, wr, offsetwr, wi, offsetwi, vs, offsetvs, ldvs, rconde, rcondv, work, offsetwork, lwork, iwork, offsetiwork, liwork, bwork, offsetbwork, info); } - protected void dgeevK(String jobvl, String jobvr, int n, double[] a, int _a_offset, int lda, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dgeev.dgeev(jobvl, jobvr, n, a, _a_offset, lda, wr, _wr_offset, wi, _wi_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, work, _work_offset, lwork, info); + protected void dgeevK(String jobvl, String jobvr, int n, double[] a, int offseta, int lda, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgeev.dgeev(jobvl, jobvr, n, a, offseta, lda, wr, offsetwr, wi, offsetwi, vl, offsetvl, ldvl, vr, offsetvr, ldvr, work, offsetwork, lwork, info); } - protected void dgeevxK(String balanc, String jobvl, String jobvr, String sense, int n, double[] a, int _a_offset, int lda, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] scale, int _scale_offset, org.netlib.util.doubleW abnrm, double[] rconde, int _rconde_offset, double[] rcondv, int _rcondv_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dgeevx.dgeevx(balanc, jobvl, jobvr, sense, n, a, _a_offset, lda, wr, _wr_offset, wi, _wi_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, ilo, ihi, scale, _scale_offset, abnrm, rconde, _rconde_offset, rcondv, _rcondv_offset, work, _work_offset, lwork, iwork, _iwork_offset, info); + protected void dgeevxK(String balanc, String jobvl, String jobvr, String sense, int n, double[] a, int offseta, int lda, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] scale, int offsetscale, org.netlib.util.doubleW abnrm, double[] rconde, int offsetrconde, double[] rcondv, int offsetrcondv, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgeevx.dgeevx(balanc, jobvl, jobvr, sense, n, a, offseta, lda, wr, offsetwr, wi, offsetwi, vl, offsetvl, ldvl, vr, offsetvr, ldvr, ilo, ihi, scale, offsetscale, abnrm, rconde, offsetrconde, rcondv, offsetrcondv, work, offsetwork, lwork, iwork, offsetiwork, info); } - protected void dgegsK(String jobvsl, String jobvsr, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vsl, int _vsl_offset, int ldvsl, double[] vsr, int _vsr_offset, int ldvsr, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dgegs.dgegs(jobvsl, jobvsr, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vsl, _vsl_offset, ldvsl, vsr, _vsr_offset, ldvsr, work, _work_offset, lwork, info); + protected void dgegsK(String jobvsl, String jobvsr, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] vsl, int offsetvsl, int ldvsl, double[] vsr, int offsetvsr, int ldvsr, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgegs.dgegs(jobvsl, jobvsr, n, a, offseta, lda, b, offsetb, ldb, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, vsl, offsetvsl, ldvsl, vsr, offsetvsr, ldvsr, work, offsetwork, lwork, info); } - protected void dgegvK(String jobvl, String jobvr, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dgegv.dgegv(jobvl, jobvr, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, work, _work_offset, lwork, info); + protected void dgegvK(String jobvl, String jobvr, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgegv.dgegv(jobvl, jobvr, n, a, offseta, lda, b, offsetb, ldb, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, vl, offsetvl, ldvl, vr, offsetvr, ldvr, work, offsetwork, lwork, info); } - protected void dgehd2K(int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dgehd2.dgehd2(n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + protected void dgehd2K(int n, int ilo, int ihi, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgehd2.dgehd2(n, ilo, ihi, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected void dgehrdK(int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dgehrd.dgehrd(n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + protected void dgehrdK(int n, int ilo, int ihi, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgehrd.dgehrd(n, ilo, ihi, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected void dgelq2K(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dgelq2.dgelq2(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + protected void dgelq2K(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgelq2.dgelq2(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected void dgelqfK(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dgelqf.dgelqf(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + protected void dgelqfK(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgelqf.dgelqf(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected void dgelsK(String trans, int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dgels.dgels(trans, m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, work, _work_offset, lwork, info); + protected void dgelsK(String trans, int m, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgels.dgels(trans, m, n, nrhs, a, offseta, lda, b, offsetb, ldb, work, offsetwork, lwork, info); } - protected void dgelsdK(int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] s, int _s_offset, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dgelsd.dgelsd(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, s, _s_offset, rcond, rank, work, _work_offset, lwork, iwork, _iwork_offset, info); + protected void dgelsdK(int m, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] s, int offsets, double rcond, org.netlib.util.intW rank, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgelsd.dgelsd(m, n, nrhs, a, offseta, lda, b, offsetb, ldb, s, offsets, rcond, rank, work, offsetwork, lwork, iwork, offsetiwork, info); } - protected void dgelssK(int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] s, int _s_offset, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dgelss.dgelss(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, s, _s_offset, rcond, rank, work, _work_offset, lwork, info); + protected void dgelssK(int m, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] s, int offsets, double rcond, org.netlib.util.intW rank, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgelss.dgelss(m, n, nrhs, a, offseta, lda, b, offsetb, ldb, s, offsets, rcond, rank, work, offsetwork, lwork, info); } - protected void dgelsxK(int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, int[] jpvt, int _jpvt_offset, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dgelsx.dgelsx(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, jpvt, _jpvt_offset, rcond, rank, work, _work_offset, info); + protected void dgelsxK(int m, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, int[] jpvt, int offsetjpvt, double rcond, org.netlib.util.intW rank, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgelsx.dgelsx(m, n, nrhs, a, offseta, lda, b, offsetb, ldb, jpvt, offsetjpvt, rcond, rank, work, offsetwork, info); } - protected void dgelsyK(int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, int[] jpvt, int _jpvt_offset, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dgelsy.dgelsy(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, jpvt, _jpvt_offset, rcond, rank, work, _work_offset, lwork, info); + protected void dgelsyK(int m, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, int[] jpvt, int offsetjpvt, double rcond, org.netlib.util.intW rank, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgelsy.dgelsy(m, n, nrhs, a, offseta, lda, b, offsetb, ldb, jpvt, offsetjpvt, rcond, rank, work, offsetwork, lwork, info); } - protected void dgeql2K(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dgeql2.dgeql2(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + protected void dgeql2K(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgeql2.dgeql2(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected void dgeqlfK(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dgeqlf.dgeqlf(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + protected void dgeqlfK(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgeqlf.dgeqlf(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected void dgeqp3K(int m, int n, double[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dgeqp3.dgeqp3(m, n, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, work, _work_offset, lwork, info); + protected void dgeqp3K(int m, int n, double[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgeqp3.dgeqp3(m, n, a, offseta, lda, jpvt, offsetjpvt, tau, offsettau, work, offsetwork, lwork, info); } - protected void dgeqpfK(int m, int n, double[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dgeqpf.dgeqpf(m, n, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, work, _work_offset, info); + protected void dgeqpfK(int m, int n, double[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgeqpf.dgeqpf(m, n, a, offseta, lda, jpvt, offsetjpvt, tau, offsettau, work, offsetwork, info); } - protected void dgeqr2K(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dgeqr2.dgeqr2(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + protected void dgeqr2K(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgeqr2.dgeqr2(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected void dgeqrfK(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dgeqrf.dgeqrf(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + protected void dgeqrfK(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgeqrf.dgeqrf(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected void dgerfsK(String trans, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dgerfs.dgerfs(trans, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void dgerfsK(String trans, int n, int nrhs, double[] a, int offseta, int lda, double[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgerfs.dgerfs(trans, n, nrhs, a, offseta, lda, af, offsetaf, ldaf, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void dgerq2K(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dgerq2.dgerq2(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + protected void dgerq2K(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgerq2.dgerq2(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected void dgerqfK(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dgerqf.dgerqf(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + protected void dgerqfK(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgerqf.dgerqf(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected void dgesc2K(int n, double[] a, int _a_offset, int lda, double[] rhs, int _rhs_offset, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset, org.netlib.util.doubleW scale) { - org.netlib.lapack.Dgesc2.dgesc2(n, a, _a_offset, lda, rhs, _rhs_offset, ipiv, _ipiv_offset, jpiv, _jpiv_offset, scale); + protected void dgesc2K(int n, double[] a, int offseta, int lda, double[] rhs, int offsetrhs, int[] ipiv, int offsetipiv, int[] jpiv, int offsetjpiv, org.netlib.util.doubleW scale) { + org.netlib.lapack.Dgesc2.dgesc2(n, a, offseta, lda, rhs, offsetrhs, ipiv, offsetipiv, jpiv, offsetjpiv, scale); } - protected void dgesddK(String jobz, int m, int n, double[] a, int _a_offset, int lda, double[] s, int _s_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dgesdd.dgesdd(jobz, m, n, a, _a_offset, lda, s, _s_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, work, _work_offset, lwork, iwork, _iwork_offset, info); + protected void dgesddK(String jobz, int m, int n, double[] a, int offseta, int lda, double[] s, int offsets, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int ldvt, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgesdd.dgesdd(jobz, m, n, a, offseta, lda, s, offsets, u, offsetu, ldu, vt, offsetvt, ldvt, work, offsetwork, lwork, iwork, offsetiwork, info); } - protected void dgesvK(int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Dgesv.dgesv(n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + protected void dgesvK(int n, int nrhs, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Dgesv.dgesv(n, nrhs, a, offseta, lda, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected void dgesvdK(String jobu, String jobvt, int m, int n, double[] a, int _a_offset, int lda, double[] s, int _s_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dgesvd.dgesvd(jobu, jobvt, m, n, a, _a_offset, lda, s, _s_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, work, _work_offset, lwork, info); + protected void dgesvdK(String jobu, String jobvt, int m, int n, double[] a, int offseta, int lda, double[] s, int offsets, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int ldvt, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgesvd.dgesvd(jobu, jobvt, m, n, a, offseta, lda, s, offsets, u, offsetu, ldu, vt, offsetvt, ldvt, work, offsetwork, lwork, info); } - protected void dgesvxK(String fact, String trans, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, org.netlib.util.StringW equed, double[] r, int _r_offset, double[] c, int _c_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dgesvx.dgesvx(fact, trans, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, equed, r, _r_offset, c, _c_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void dgesvxK(String fact, String trans, int n, int nrhs, double[] a, int offseta, int lda, double[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, org.netlib.util.StringW equed, double[] r, int offsetr, double[] c, int offsetc, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgesvx.dgesvx(fact, trans, n, nrhs, a, offseta, lda, af, offsetaf, ldaf, ipiv, offsetipiv, equed, r, offsetr, c, offsetc, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void dgetc2K(int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dgetc2.dgetc2(n, a, _a_offset, lda, ipiv, _ipiv_offset, jpiv, _jpiv_offset, info); + protected void dgetc2K(int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, int[] jpiv, int offsetjpiv, org.netlib.util.intW info) { + org.netlib.lapack.Dgetc2.dgetc2(n, a, offseta, lda, ipiv, offsetipiv, jpiv, offsetjpiv, info); } - protected void dgetf2K(int m, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dgetf2.dgetf2(m, n, a, _a_offset, lda, ipiv, _ipiv_offset, info); + protected void dgetf2K(int m, int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, org.netlib.util.intW info) { + org.netlib.lapack.Dgetf2.dgetf2(m, n, a, offseta, lda, ipiv, offsetipiv, info); } - protected void dgetrfK(int m, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dgetrf.dgetrf(m, n, a, _a_offset, lda, ipiv, _ipiv_offset, info); + protected void dgetrfK(int m, int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, org.netlib.util.intW info) { + org.netlib.lapack.Dgetrf.dgetrf(m, n, a, offseta, lda, ipiv, offsetipiv, info); } - protected void dgetriK(int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dgetri.dgetri(n, a, _a_offset, lda, ipiv, _ipiv_offset, work, _work_offset, lwork, info); + protected void dgetriK(int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgetri.dgetri(n, a, offseta, lda, ipiv, offsetipiv, work, offsetwork, lwork, info); } - protected void dgetrsK(String trans, int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Dgetrs.dgetrs(trans, n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + protected void dgetrsK(String trans, int n, int nrhs, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Dgetrs.dgetrs(trans, n, nrhs, a, offseta, lda, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected void dggbakK(String job, String side, int n, int ilo, int ihi, double[] lscale, int _lscale_offset, double[] rscale, int _rscale_offset, int m, double[] v, int _v_offset, int ldv, org.netlib.util.intW info) { - org.netlib.lapack.Dggbak.dggbak(job, side, n, ilo, ihi, lscale, _lscale_offset, rscale, _rscale_offset, m, v, _v_offset, ldv, info); + protected void dggbakK(String job, String side, int n, int ilo, int ihi, double[] lscale, int offsetlscale, double[] rscale, int offsetrscale, int m, double[] v, int offsetv, int ldv, org.netlib.util.intW info) { + org.netlib.lapack.Dggbak.dggbak(job, side, n, ilo, ihi, lscale, offsetlscale, rscale, offsetrscale, m, v, offsetv, ldv, info); } - protected void dggbalK(String job, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] lscale, int _lscale_offset, double[] rscale, int _rscale_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dggbal.dggbal(job, n, a, _a_offset, lda, b, _b_offset, ldb, ilo, ihi, lscale, _lscale_offset, rscale, _rscale_offset, work, _work_offset, info); + protected void dggbalK(String job, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] lscale, int offsetlscale, double[] rscale, int offsetrscale, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dggbal.dggbal(job, n, a, offseta, lda, b, offsetb, ldb, ilo, ihi, lscale, offsetlscale, rscale, offsetrscale, work, offsetwork, info); } - protected void dggesK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW sdim, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vsl, int _vsl_offset, int ldvsl, double[] vsr, int _vsr_offset, int ldvsr, double[] work, int _work_offset, int lwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dgges.dgges(jobvsl, jobvsr, sort, selctg, n, a, _a_offset, lda, b, _b_offset, ldb, sdim, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vsl, _vsl_offset, ldvsl, vsr, _vsr_offset, ldvsr, work, _work_offset, lwork, bwork, _bwork_offset, info); + protected void dggesK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW sdim, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] vsl, int offsetvsl, int ldvsl, double[] vsr, int offsetvsr, int ldvsr, double[] work, int offsetwork, int lwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgges.dgges(jobvsl, jobvsr, sort, selctg, n, a, offseta, lda, b, offsetb, ldb, sdim, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, vsl, offsetvsl, ldvsl, vsr, offsetvsr, ldvsr, work, offsetwork, lwork, bwork, offsetbwork, info); } - protected void dggesxK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, String sense, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW sdim, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vsl, int _vsl_offset, int ldvsl, double[] vsr, int _vsr_offset, int ldvsr, double[] rconde, int _rconde_offset, double[] rcondv, int _rcondv_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dggesx.dggesx(jobvsl, jobvsr, sort, selctg, sense, n, a, _a_offset, lda, b, _b_offset, ldb, sdim, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vsl, _vsl_offset, ldvsl, vsr, _vsr_offset, ldvsr, rconde, _rconde_offset, rcondv, _rcondv_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, bwork, _bwork_offset, info); + protected void dggesxK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, String sense, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW sdim, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] vsl, int offsetvsl, int ldvsl, double[] vsr, int offsetvsr, int ldvsr, double[] rconde, int offsetrconde, double[] rcondv, int offsetrcondv, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info) { + org.netlib.lapack.Dggesx.dggesx(jobvsl, jobvsr, sort, selctg, sense, n, a, offseta, lda, b, offsetb, ldb, sdim, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, vsl, offsetvsl, ldvsl, vsr, offsetvsr, ldvsr, rconde, offsetrconde, rcondv, offsetrcondv, work, offsetwork, lwork, iwork, offsetiwork, liwork, bwork, offsetbwork, info); } - protected void dggevK(String jobvl, String jobvr, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dggev.dggev(jobvl, jobvr, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, work, _work_offset, lwork, info); + protected void dggevK(String jobvl, String jobvr, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dggev.dggev(jobvl, jobvr, n, a, offseta, lda, b, offsetb, ldb, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, vl, offsetvl, ldvl, vr, offsetvr, ldvr, work, offsetwork, lwork, info); } - protected void dggevxK(String balanc, String jobvl, String jobvr, String sense, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] lscale, int _lscale_offset, double[] rscale, int _rscale_offset, org.netlib.util.doubleW abnrm, org.netlib.util.doubleW bbnrm, double[] rconde, int _rconde_offset, double[] rcondv, int _rcondv_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dggevx.dggevx(balanc, jobvl, jobvr, sense, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, ilo, ihi, lscale, _lscale_offset, rscale, _rscale_offset, abnrm, bbnrm, rconde, _rconde_offset, rcondv, _rcondv_offset, work, _work_offset, lwork, iwork, _iwork_offset, bwork, _bwork_offset, info); + protected void dggevxK(String balanc, String jobvl, String jobvr, String sense, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] lscale, int offsetlscale, double[] rscale, int offsetrscale, org.netlib.util.doubleW abnrm, org.netlib.util.doubleW bbnrm, double[] rconde, int offsetrconde, double[] rcondv, int offsetrcondv, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info) { + org.netlib.lapack.Dggevx.dggevx(balanc, jobvl, jobvr, sense, n, a, offseta, lda, b, offsetb, ldb, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, vl, offsetvl, ldvl, vr, offsetvr, ldvr, ilo, ihi, lscale, offsetlscale, rscale, offsetrscale, abnrm, bbnrm, rconde, offsetrconde, rcondv, offsetrcondv, work, offsetwork, lwork, iwork, offsetiwork, bwork, offsetbwork, info); } - protected void dggglmK(int n, int m, int p, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] d, int _d_offset, double[] x, int _x_offset, double[] y, int _y_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dggglm.dggglm(n, m, p, a, _a_offset, lda, b, _b_offset, ldb, d, _d_offset, x, _x_offset, y, _y_offset, work, _work_offset, lwork, info); + protected void dggglmK(int n, int m, int p, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] d, int offsetd, double[] x, int offsetx, double[] y, int offsety, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dggglm.dggglm(n, m, p, a, offseta, lda, b, offsetb, ldb, d, offsetd, x, offsetx, y, offsety, work, offsetwork, lwork, info); } - protected void dgghrdK(String compq, String compz, int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, org.netlib.util.intW info) { - org.netlib.lapack.Dgghrd.dgghrd(compq, compz, n, ilo, ihi, a, _a_offset, lda, b, _b_offset, ldb, q, _q_offset, ldq, z, _z_offset, ldz, info); + protected void dgghrdK(String compq, String compz, int n, int ilo, int ihi, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] q, int offsetq, int ldq, double[] z, int offsetz, int ldz, org.netlib.util.intW info) { + org.netlib.lapack.Dgghrd.dgghrd(compq, compz, n, ilo, ihi, a, offseta, lda, b, offsetb, ldb, q, offsetq, ldq, z, offsetz, ldz, info); } - protected void dgglseK(int m, int n, int p, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] c, int _c_offset, double[] d, int _d_offset, double[] x, int _x_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dgglse.dgglse(m, n, p, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, d, _d_offset, x, _x_offset, work, _work_offset, lwork, info); + protected void dgglseK(int m, int n, int p, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] c, int offsetc, double[] d, int offsetd, double[] x, int offsetx, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgglse.dgglse(m, n, p, a, offseta, lda, b, offsetb, ldb, c, offsetc, d, offsetd, x, offsetx, work, offsetwork, lwork, info); } - protected void dggqrfK(int n, int m, int p, double[] a, int _a_offset, int lda, double[] taua, int _taua_offset, double[] b, int _b_offset, int ldb, double[] taub, int _taub_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dggqrf.dggqrf(n, m, p, a, _a_offset, lda, taua, _taua_offset, b, _b_offset, ldb, taub, _taub_offset, work, _work_offset, lwork, info); + protected void dggqrfK(int n, int m, int p, double[] a, int offseta, int lda, double[] taua, int offsettaua, double[] b, int offsetb, int ldb, double[] taub, int offsettaub, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dggqrf.dggqrf(n, m, p, a, offseta, lda, taua, offsettaua, b, offsetb, ldb, taub, offsettaub, work, offsetwork, lwork, info); } - protected void dggrqfK(int m, int p, int n, double[] a, int _a_offset, int lda, double[] taua, int _taua_offset, double[] b, int _b_offset, int ldb, double[] taub, int _taub_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dggrqf.dggrqf(m, p, n, a, _a_offset, lda, taua, _taua_offset, b, _b_offset, ldb, taub, _taub_offset, work, _work_offset, lwork, info); + protected void dggrqfK(int m, int p, int n, double[] a, int offseta, int lda, double[] taua, int offsettaua, double[] b, int offsetb, int ldb, double[] taub, int offsettaub, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dggrqf.dggrqf(m, p, n, a, offseta, lda, taua, offsettaua, b, offsetb, ldb, taub, offsettaub, work, offsetwork, lwork, info); } - protected void dggsvdK(String jobu, String jobv, String jobq, int m, int n, int p, org.netlib.util.intW k, org.netlib.util.intW l, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alpha, int _alpha_offset, double[] beta, int _beta_offset, double[] u, int _u_offset, int ldu, double[] v, int _v_offset, int ldv, double[] q, int _q_offset, int ldq, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dggsvd.dggsvd(jobu, jobv, jobq, m, n, p, k, l, a, _a_offset, lda, b, _b_offset, ldb, alpha, _alpha_offset, beta, _beta_offset, u, _u_offset, ldu, v, _v_offset, ldv, q, _q_offset, ldq, work, _work_offset, iwork, _iwork_offset, info); + protected void dggsvdK(String jobu, String jobv, String jobq, int m, int n, int p, org.netlib.util.intW k, org.netlib.util.intW l, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alpha, int offsetalpha, double[] beta, int offsetbeta, double[] u, int offsetu, int ldu, double[] v, int offsetv, int ldv, double[] q, int offsetq, int ldq, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dggsvd.dggsvd(jobu, jobv, jobq, m, n, p, k, l, a, offseta, lda, b, offsetb, ldb, alpha, offsetalpha, beta, offsetbeta, u, offsetu, ldu, v, offsetv, ldv, q, offsetq, ldq, work, offsetwork, iwork, offsetiwork, info); } - protected void dggsvpK(String jobu, String jobv, String jobq, int m, int p, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double tola, double tolb, org.netlib.util.intW k, org.netlib.util.intW l, double[] u, int _u_offset, int ldu, double[] v, int _v_offset, int ldv, double[] q, int _q_offset, int ldq, int[] iwork, int _iwork_offset, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dggsvp.dggsvp(jobu, jobv, jobq, m, p, n, a, _a_offset, lda, b, _b_offset, ldb, tola, tolb, k, l, u, _u_offset, ldu, v, _v_offset, ldv, q, _q_offset, ldq, iwork, _iwork_offset, tau, _tau_offset, work, _work_offset, info); + protected void dggsvpK(String jobu, String jobv, String jobq, int m, int p, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double tola, double tolb, org.netlib.util.intW k, org.netlib.util.intW l, double[] u, int offsetu, int ldu, double[] v, int offsetv, int ldv, double[] q, int offsetq, int ldq, int[] iwork, int offsetiwork, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dggsvp.dggsvp(jobu, jobv, jobq, m, p, n, a, offseta, lda, b, offsetb, ldb, tola, tolb, k, l, u, offsetu, ldu, v, offsetv, ldv, q, offsetq, ldq, iwork, offsetiwork, tau, offsettau, work, offsetwork, info); } - protected void dgtconK(String norm, int n, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dgtcon.dgtcon(norm, n, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + protected void dgtconK(String norm, int n, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] du2, int offsetdu2, int[] ipiv, int offsetipiv, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgtcon.dgtcon(norm, n, dl, offsetdl, d, offsetd, du, offsetdu, du2, offsetdu2, ipiv, offsetipiv, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected void dgtrfsK(String trans, int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] dlf, int _dlf_offset, double[] df, int _df_offset, double[] duf, int _duf_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dgtrfs.dgtrfs(trans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, dlf, _dlf_offset, df, _df_offset, duf, _duf_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void dgtrfsK(String trans, int n, int nrhs, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] dlf, int offsetdlf, double[] df, int offsetdf, double[] duf, int offsetduf, double[] du2, int offsetdu2, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgtrfs.dgtrfs(trans, n, nrhs, dl, offsetdl, d, offsetd, du, offsetdu, dlf, offsetdlf, df, offsetdf, duf, offsetduf, du2, offsetdu2, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void dgtsvK(int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Dgtsv.dgtsv(n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, b, _b_offset, ldb, info); + protected void dgtsvK(int n, int nrhs, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Dgtsv.dgtsv(n, nrhs, dl, offsetdl, d, offsetd, du, offsetdu, b, offsetb, ldb, info); } - protected void dgtsvxK(String fact, String trans, int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] dlf, int _dlf_offset, double[] df, int _df_offset, double[] duf, int _duf_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dgtsvx.dgtsvx(fact, trans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, dlf, _dlf_offset, df, _df_offset, duf, _duf_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void dgtsvxK(String fact, String trans, int n, int nrhs, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] dlf, int offsetdlf, double[] df, int offsetdf, double[] duf, int offsetduf, double[] du2, int offsetdu2, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dgtsvx.dgtsvx(fact, trans, n, nrhs, dl, offsetdl, d, offsetd, du, offsetdu, dlf, offsetdlf, df, offsetdf, duf, offsetduf, du2, offsetdu2, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void dgttrfK(int n, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dgttrf.dgttrf(n, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, info); + protected void dgttrfK(int n, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] du2, int offsetdu2, int[] ipiv, int offsetipiv, org.netlib.util.intW info) { + org.netlib.lapack.Dgttrf.dgttrf(n, dl, offsetdl, d, offsetd, du, offsetdu, du2, offsetdu2, ipiv, offsetipiv, info); } - protected void dgttrsK(String trans, int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Dgttrs.dgttrs(trans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + protected void dgttrsK(String trans, int n, int nrhs, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] du2, int offsetdu2, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Dgttrs.dgttrs(trans, n, nrhs, dl, offsetdl, d, offsetd, du, offsetdu, du2, offsetdu2, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected void dgtts2K(int itrans, int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb) { - org.netlib.lapack.Dgtts2.dgtts2(itrans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb); + protected void dgtts2K(int itrans, int n, int nrhs, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] du2, int offsetdu2, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb) { + org.netlib.lapack.Dgtts2.dgtts2(itrans, n, nrhs, dl, offsetdl, d, offsetd, du, offsetdu, du2, offsetdu2, ipiv, offsetipiv, b, offsetb, ldb); } - protected void dhgeqzK(String job, String compq, String compz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] t, int _t_offset, int ldt, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dhgeqz.dhgeqz(job, compq, compz, n, ilo, ihi, h, _h_offset, ldh, t, _t_offset, ldt, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, q, _q_offset, ldq, z, _z_offset, ldz, work, _work_offset, lwork, info); + protected void dhgeqzK(String job, String compq, String compz, int n, int ilo, int ihi, double[] h, int offseth, int ldh, double[] t, int offsett, int ldt, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] q, int offsetq, int ldq, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dhgeqz.dhgeqz(job, compq, compz, n, ilo, ihi, h, offseth, ldh, t, offsett, ldt, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, q, offsetq, ldq, z, offsetz, ldz, work, offsetwork, lwork, info); } - protected void dhseinK(String side, String eigsrc, String initv, boolean[] select, int _select_offset, int n, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, double[] work, int _work_offset, int[] ifaill, int _ifaill_offset, int[] ifailr, int _ifailr_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dhsein.dhsein(side, eigsrc, initv, select, _select_offset, n, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, mm, m, work, _work_offset, ifaill, _ifaill_offset, ifailr, _ifailr_offset, info); + protected void dhseinK(String side, String eigsrc, String initv, boolean[] select, int offsetselect, int n, double[] h, int offseth, int ldh, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, int mm, org.netlib.util.intW m, double[] work, int offsetwork, int[] ifaill, int offsetifaill, int[] ifailr, int offsetifailr, org.netlib.util.intW info) { + org.netlib.lapack.Dhsein.dhsein(side, eigsrc, initv, select, offsetselect, n, h, offseth, ldh, wr, offsetwr, wi, offsetwi, vl, offsetvl, ldvl, vr, offsetvr, ldvr, mm, m, work, offsetwork, ifaill, offsetifaill, ifailr, offsetifailr, info); } - protected void dhseqrK(String job, String compz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dhseqr.dhseqr(job, compz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, z, _z_offset, ldz, work, _work_offset, lwork, info); + protected void dhseqrK(String job, String compz, int n, int ilo, int ihi, double[] h, int offseth, int ldh, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dhseqr.dhseqr(job, compz, n, ilo, ihi, h, offseth, ldh, wr, offsetwr, wi, offsetwi, z, offsetz, ldz, work, offsetwork, lwork, info); } protected boolean disnanK(double din) { @@ -345,20 +345,20 @@ protected void dlabadK(org.netlib.util.doubleW small, org.netlib.util.doubleW la org.netlib.lapack.Dlabad.dlabad(small, large); } - protected void dlabrdK(int m, int n, int nb, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tauq, int _tauq_offset, double[] taup, int _taup_offset, double[] x, int _x_offset, int ldx, double[] y, int _y_offset, int ldy) { - org.netlib.lapack.Dlabrd.dlabrd(m, n, nb, a, _a_offset, lda, d, _d_offset, e, _e_offset, tauq, _tauq_offset, taup, _taup_offset, x, _x_offset, ldx, y, _y_offset, ldy); + protected void dlabrdK(int m, int n, int nb, double[] a, int offseta, int lda, double[] d, int offsetd, double[] e, int offsete, double[] tauq, int offsettauq, double[] taup, int offsettaup, double[] x, int offsetx, int ldx, double[] y, int offsety, int ldy) { + org.netlib.lapack.Dlabrd.dlabrd(m, n, nb, a, offseta, lda, d, offsetd, e, offsete, tauq, offsettauq, taup, offsettaup, x, offsetx, ldx, y, offsety, ldy); } - protected void dlacn2K(int n, double[] v, int _v_offset, double[] x, int _x_offset, int[] isgn, int _isgn_offset, org.netlib.util.doubleW est, org.netlib.util.intW kase, int[] isave, int _isave_offset) { - org.netlib.lapack.Dlacn2.dlacn2(n, v, _v_offset, x, _x_offset, isgn, _isgn_offset, est, kase, isave, _isave_offset); + protected void dlacn2K(int n, double[] v, int offsetv, double[] x, int offsetx, int[] isgn, int offsetisgn, org.netlib.util.doubleW est, org.netlib.util.intW kase, int[] isave, int offsetisave) { + org.netlib.lapack.Dlacn2.dlacn2(n, v, offsetv, x, offsetx, isgn, offsetisgn, est, kase, isave, offsetisave); } - protected void dlaconK(int n, double[] v, int _v_offset, double[] x, int _x_offset, int[] isgn, int _isgn_offset, org.netlib.util.doubleW est, org.netlib.util.intW kase) { - org.netlib.lapack.Dlacon.dlacon(n, v, _v_offset, x, _x_offset, isgn, _isgn_offset, est, kase); + protected void dlaconK(int n, double[] v, int offsetv, double[] x, int offsetx, int[] isgn, int offsetisgn, org.netlib.util.doubleW est, org.netlib.util.intW kase) { + org.netlib.lapack.Dlacon.dlacon(n, v, offsetv, x, offsetx, isgn, offsetisgn, est, kase); } - protected void dlacpyK(String uplo, int m, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb) { - org.netlib.lapack.Dlacpy.dlacpy(uplo, m, n, a, _a_offset, lda, b, _b_offset, ldb); + protected void dlacpyK(String uplo, int m, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb) { + org.netlib.lapack.Dlacpy.dlacpy(uplo, m, n, a, offseta, lda, b, offsetb, ldb); } protected void dladivK(double a, double b, double c, double d, org.netlib.util.doubleW p, org.netlib.util.doubleW q) { @@ -369,192 +369,192 @@ protected void dlae2K(double a, double b, double c, org.netlib.util.doubleW rt1, org.netlib.lapack.Dlae2.dlae2(a, b, c, rt1, rt2); } - protected void dlaebzK(int ijob, int nitmax, int n, int mmax, int minp, int nbmin, double abstol, double reltol, double pivmin, double[] d, int _d_offset, double[] e, int _e_offset, double[] e2, int _e2_offset, int[] nval, int _nval_offset, double[] ab, int _ab_offset, double[] c, int _c_offset, org.netlib.util.intW mout, int[] nab, int _nab_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlaebz.dlaebz(ijob, nitmax, n, mmax, minp, nbmin, abstol, reltol, pivmin, d, _d_offset, e, _e_offset, e2, _e2_offset, nval, _nval_offset, ab, _ab_offset, c, _c_offset, mout, nab, _nab_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void dlaebzK(int ijob, int nitmax, int n, int mmax, int minp, int nbmin, double abstol, double reltol, double pivmin, double[] d, int offsetd, double[] e, int offsete, double[] e2, int offsete2, int[] nval, int offsetnval, double[] ab, int offsetab, double[] c, int offsetc, org.netlib.util.intW mout, int[] nab, int offsetnab, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dlaebz.dlaebz(ijob, nitmax, n, mmax, minp, nbmin, abstol, reltol, pivmin, d, offsetd, e, offsete, e2, offsete2, nval, offsetnval, ab, offsetab, c, offsetc, mout, nab, offsetnab, work, offsetwork, iwork, offsetiwork, info); } - protected void dlaed0K(int icompq, int qsiz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] q, int _q_offset, int ldq, double[] qstore, int _qstore_offset, int ldqs, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlaed0.dlaed0(icompq, qsiz, n, d, _d_offset, e, _e_offset, q, _q_offset, ldq, qstore, _qstore_offset, ldqs, work, _work_offset, iwork, _iwork_offset, info); + protected void dlaed0K(int icompq, int qsiz, int n, double[] d, int offsetd, double[] e, int offsete, double[] q, int offsetq, int ldq, double[] qstore, int offsetqstore, int ldqs, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dlaed0.dlaed0(icompq, qsiz, n, d, offsetd, e, offsete, q, offsetq, ldq, qstore, offsetqstore, ldqs, work, offsetwork, iwork, offsetiwork, info); } - protected void dlaed1K(int n, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.doubleW rho, int cutpnt, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlaed1.dlaed1(n, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, cutpnt, work, _work_offset, iwork, _iwork_offset, info); + protected void dlaed1K(int n, double[] d, int offsetd, double[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.doubleW rho, int cutpnt, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dlaed1.dlaed1(n, d, offsetd, q, offsetq, ldq, indxq, offsetindxq, rho, cutpnt, work, offsetwork, iwork, offsetiwork, info); } - protected void dlaed2K(org.netlib.util.intW k, int n, int n1, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.doubleW rho, double[] z, int _z_offset, double[] dlamda, int _dlamda_offset, double[] w, int _w_offset, double[] q2, int _q2_offset, int[] indx, int _indx_offset, int[] indxc, int _indxc_offset, int[] indxp, int _indxp_offset, int[] coltyp, int _coltyp_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlaed2.dlaed2(k, n, n1, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, z, _z_offset, dlamda, _dlamda_offset, w, _w_offset, q2, _q2_offset, indx, _indx_offset, indxc, _indxc_offset, indxp, _indxp_offset, coltyp, _coltyp_offset, info); + protected void dlaed2K(org.netlib.util.intW k, int n, int n1, double[] d, int offsetd, double[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.doubleW rho, double[] z, int offsetz, double[] dlamda, int offsetdlamda, double[] w, int offsetw, double[] q2, int offsetq2, int[] indx, int offsetindx, int[] indxc, int offsetindxc, int[] indxp, int offsetindxp, int[] coltyp, int offsetcoltyp, org.netlib.util.intW info) { + org.netlib.lapack.Dlaed2.dlaed2(k, n, n1, d, offsetd, q, offsetq, ldq, indxq, offsetindxq, rho, z, offsetz, dlamda, offsetdlamda, w, offsetw, q2, offsetq2, indx, offsetindx, indxc, offsetindxc, indxp, offsetindxp, coltyp, offsetcoltyp, info); } - protected void dlaed3K(int k, int n, int n1, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, double rho, double[] dlamda, int _dlamda_offset, double[] q2, int _q2_offset, int[] indx, int _indx_offset, int[] ctot, int _ctot_offset, double[] w, int _w_offset, double[] s, int _s_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlaed3.dlaed3(k, n, n1, d, _d_offset, q, _q_offset, ldq, rho, dlamda, _dlamda_offset, q2, _q2_offset, indx, _indx_offset, ctot, _ctot_offset, w, _w_offset, s, _s_offset, info); + protected void dlaed3K(int k, int n, int n1, double[] d, int offsetd, double[] q, int offsetq, int ldq, double rho, double[] dlamda, int offsetdlamda, double[] q2, int offsetq2, int[] indx, int offsetindx, int[] ctot, int offsetctot, double[] w, int offsetw, double[] s, int offsets, org.netlib.util.intW info) { + org.netlib.lapack.Dlaed3.dlaed3(k, n, n1, d, offsetd, q, offsetq, ldq, rho, dlamda, offsetdlamda, q2, offsetq2, indx, offsetindx, ctot, offsetctot, w, offsetw, s, offsets, info); } - protected void dlaed4K(int n, int i, double[] d, int _d_offset, double[] z, int _z_offset, double[] delta, int _delta_offset, double rho, org.netlib.util.doubleW dlam, org.netlib.util.intW info) { - org.netlib.lapack.Dlaed4.dlaed4(n, i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, dlam, info); + protected void dlaed4K(int n, int i, double[] d, int offsetd, double[] z, int offsetz, double[] delta, int offsetdelta, double rho, org.netlib.util.doubleW dlam, org.netlib.util.intW info) { + org.netlib.lapack.Dlaed4.dlaed4(n, i, d, offsetd, z, offsetz, delta, offsetdelta, rho, dlam, info); } - protected void dlaed5K(int i, double[] d, int _d_offset, double[] z, int _z_offset, double[] delta, int _delta_offset, double rho, org.netlib.util.doubleW dlam) { - org.netlib.lapack.Dlaed5.dlaed5(i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, dlam); + protected void dlaed5K(int i, double[] d, int offsetd, double[] z, int offsetz, double[] delta, int offsetdelta, double rho, org.netlib.util.doubleW dlam) { + org.netlib.lapack.Dlaed5.dlaed5(i, d, offsetd, z, offsetz, delta, offsetdelta, rho, dlam); } - protected void dlaed6K(int kniter, boolean orgati, double rho, double[] d, int _d_offset, double[] z, int _z_offset, double finit, org.netlib.util.doubleW tau, org.netlib.util.intW info) { - org.netlib.lapack.Dlaed6.dlaed6(kniter, orgati, rho, d, _d_offset, z, _z_offset, finit, tau, info); + protected void dlaed6K(int kniter, boolean orgati, double rho, double[] d, int offsetd, double[] z, int offsetz, double finit, org.netlib.util.doubleW tau, org.netlib.util.intW info) { + org.netlib.lapack.Dlaed6.dlaed6(kniter, orgati, rho, d, offsetd, z, offsetz, finit, tau, info); } - protected void dlaed7K(int icompq, int n, int qsiz, int tlvls, int curlvl, int curpbm, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.doubleW rho, int cutpnt, double[] qstore, int _qstore_offset, int[] qptr, int _qptr_offset, int[] prmptr, int _prmptr_offset, int[] perm, int _perm_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, double[] givnum, int _givnum_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlaed7.dlaed7(icompq, n, qsiz, tlvls, curlvl, curpbm, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, cutpnt, qstore, _qstore_offset, qptr, _qptr_offset, prmptr, _prmptr_offset, perm, _perm_offset, givptr, _givptr_offset, givcol, _givcol_offset, givnum, _givnum_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void dlaed7K(int icompq, int n, int qsiz, int tlvls, int curlvl, int curpbm, double[] d, int offsetd, double[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.doubleW rho, int cutpnt, double[] qstore, int offsetqstore, int[] qptr, int offsetqptr, int[] prmptr, int offsetprmptr, int[] perm, int offsetperm, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, double[] givnum, int offsetgivnum, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dlaed7.dlaed7(icompq, n, qsiz, tlvls, curlvl, curpbm, d, offsetd, q, offsetq, ldq, indxq, offsetindxq, rho, cutpnt, qstore, offsetqstore, qptr, offsetqptr, prmptr, offsetprmptr, perm, offsetperm, givptr, offsetgivptr, givcol, offsetgivcol, givnum, offsetgivnum, work, offsetwork, iwork, offsetiwork, info); } - protected void dlaed8K(int icompq, org.netlib.util.intW k, int n, int qsiz, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.doubleW rho, int cutpnt, double[] z, int _z_offset, double[] dlamda, int _dlamda_offset, double[] q2, int _q2_offset, int ldq2, double[] w, int _w_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, double[] givnum, int _givnum_offset, int[] indxp, int _indxp_offset, int[] indx, int _indx_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlaed8.dlaed8(icompq, k, n, qsiz, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, cutpnt, z, _z_offset, dlamda, _dlamda_offset, q2, _q2_offset, ldq2, w, _w_offset, perm, _perm_offset, givptr, givcol, _givcol_offset, givnum, _givnum_offset, indxp, _indxp_offset, indx, _indx_offset, info); + protected void dlaed8K(int icompq, org.netlib.util.intW k, int n, int qsiz, double[] d, int offsetd, double[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.doubleW rho, int cutpnt, double[] z, int offsetz, double[] dlamda, int offsetdlamda, double[] q2, int offsetq2, int ldq2, double[] w, int offsetw, int[] perm, int offsetperm, org.netlib.util.intW givptr, int[] givcol, int offsetgivcol, double[] givnum, int offsetgivnum, int[] indxp, int offsetindxp, int[] indx, int offsetindx, org.netlib.util.intW info) { + org.netlib.lapack.Dlaed8.dlaed8(icompq, k, n, qsiz, d, offsetd, q, offsetq, ldq, indxq, offsetindxq, rho, cutpnt, z, offsetz, dlamda, offsetdlamda, q2, offsetq2, ldq2, w, offsetw, perm, offsetperm, givptr, givcol, offsetgivcol, givnum, offsetgivnum, indxp, offsetindxp, indx, offsetindx, info); } - protected void dlaed9K(int k, int kstart, int kstop, int n, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, double rho, double[] dlamda, int _dlamda_offset, double[] w, int _w_offset, double[] s, int _s_offset, int lds, org.netlib.util.intW info) { - org.netlib.lapack.Dlaed9.dlaed9(k, kstart, kstop, n, d, _d_offset, q, _q_offset, ldq, rho, dlamda, _dlamda_offset, w, _w_offset, s, _s_offset, lds, info); + protected void dlaed9K(int k, int kstart, int kstop, int n, double[] d, int offsetd, double[] q, int offsetq, int ldq, double rho, double[] dlamda, int offsetdlamda, double[] w, int offsetw, double[] s, int offsets, int lds, org.netlib.util.intW info) { + org.netlib.lapack.Dlaed9.dlaed9(k, kstart, kstop, n, d, offsetd, q, offsetq, ldq, rho, dlamda, offsetdlamda, w, offsetw, s, offsets, lds, info); } - protected void dlaedaK(int n, int tlvls, int curlvl, int curpbm, int[] prmptr, int _prmptr_offset, int[] perm, int _perm_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, double[] givnum, int _givnum_offset, double[] q, int _q_offset, int[] qptr, int _qptr_offset, double[] z, int _z_offset, double[] ztemp, int _ztemp_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlaeda.dlaeda(n, tlvls, curlvl, curpbm, prmptr, _prmptr_offset, perm, _perm_offset, givptr, _givptr_offset, givcol, _givcol_offset, givnum, _givnum_offset, q, _q_offset, qptr, _qptr_offset, z, _z_offset, ztemp, _ztemp_offset, info); + protected void dlaedaK(int n, int tlvls, int curlvl, int curpbm, int[] prmptr, int offsetprmptr, int[] perm, int offsetperm, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, double[] givnum, int offsetgivnum, double[] q, int offsetq, int[] qptr, int offsetqptr, double[] z, int offsetz, double[] ztemp, int offsetztemp, org.netlib.util.intW info) { + org.netlib.lapack.Dlaeda.dlaeda(n, tlvls, curlvl, curpbm, prmptr, offsetprmptr, perm, offsetperm, givptr, offsetgivptr, givcol, offsetgivcol, givnum, offsetgivnum, q, offsetq, qptr, offsetqptr, z, offsetz, ztemp, offsetztemp, info); } - protected void dlaeinK(boolean rightv, boolean noinit, int n, double[] h, int _h_offset, int ldh, double wr, double wi, double[] vr, int _vr_offset, double[] vi, int _vi_offset, double[] b, int _b_offset, int ldb, double[] work, int _work_offset, double eps3, double smlnum, double bignum, org.netlib.util.intW info) { - org.netlib.lapack.Dlaein.dlaein(rightv, noinit, n, h, _h_offset, ldh, wr, wi, vr, _vr_offset, vi, _vi_offset, b, _b_offset, ldb, work, _work_offset, eps3, smlnum, bignum, info); + protected void dlaeinK(boolean rightv, boolean noinit, int n, double[] h, int offseth, int ldh, double wr, double wi, double[] vr, int offsetvr, double[] vi, int offsetvi, double[] b, int offsetb, int ldb, double[] work, int offsetwork, double eps3, double smlnum, double bignum, org.netlib.util.intW info) { + org.netlib.lapack.Dlaein.dlaein(rightv, noinit, n, h, offseth, ldh, wr, wi, vr, offsetvr, vi, offsetvi, b, offsetb, ldb, work, offsetwork, eps3, smlnum, bignum, info); } protected void dlaev2K(double a, double b, double c, org.netlib.util.doubleW rt1, org.netlib.util.doubleW rt2, org.netlib.util.doubleW cs1, org.netlib.util.doubleW sn1) { org.netlib.lapack.Dlaev2.dlaev2(a, b, c, rt1, rt2, cs1, sn1); } - protected void dlaexcK(boolean wantq, int n, double[] t, int _t_offset, int ldt, double[] q, int _q_offset, int ldq, int j1, int n1, int n2, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlaexc.dlaexc(wantq, n, t, _t_offset, ldt, q, _q_offset, ldq, j1, n1, n2, work, _work_offset, info); + protected void dlaexcK(boolean wantq, int n, double[] t, int offsett, int ldt, double[] q, int offsetq, int ldq, int j1, int n1, int n2, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dlaexc.dlaexc(wantq, n, t, offsett, ldt, q, offsetq, ldq, j1, n1, n2, work, offsetwork, info); } - protected void dlag2K(double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double safmin, org.netlib.util.doubleW scale1, org.netlib.util.doubleW scale2, org.netlib.util.doubleW wr1, org.netlib.util.doubleW wr2, org.netlib.util.doubleW wi) { - org.netlib.lapack.Dlag2.dlag2(a, _a_offset, lda, b, _b_offset, ldb, safmin, scale1, scale2, wr1, wr2, wi); + protected void dlag2K(double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double safmin, org.netlib.util.doubleW scale1, org.netlib.util.doubleW scale2, org.netlib.util.doubleW wr1, org.netlib.util.doubleW wr2, org.netlib.util.doubleW wi) { + org.netlib.lapack.Dlag2.dlag2(a, offseta, lda, b, offsetb, ldb, safmin, scale1, scale2, wr1, wr2, wi); } - protected void dlag2sK(int m, int n, double[] a, int _a_offset, int lda, float[] sa, int _sa_offset, int ldsa, org.netlib.util.intW info) { - org.netlib.lapack.Dlag2s.dlag2s(m, n, a, _a_offset, lda, sa, _sa_offset, ldsa, info); + protected void dlag2sK(int m, int n, double[] a, int offseta, int lda, float[] sa, int offsetsa, int ldsa, org.netlib.util.intW info) { + org.netlib.lapack.Dlag2s.dlag2s(m, n, a, offseta, lda, sa, offsetsa, ldsa, info); } protected void dlags2K(boolean upper, double a1, double a2, double a3, double b1, double b2, double b3, org.netlib.util.doubleW csu, org.netlib.util.doubleW snu, org.netlib.util.doubleW csv, org.netlib.util.doubleW snv, org.netlib.util.doubleW csq, org.netlib.util.doubleW snq) { org.netlib.lapack.Dlags2.dlags2(upper, a1, a2, a3, b1, b2, b3, csu, snu, csv, snv, csq, snq); } - protected void dlagtfK(int n, double[] a, int _a_offset, double lambda, double[] b, int _b_offset, double[] c, int _c_offset, double tol, double[] d, int _d_offset, int[] in, int _in_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlagtf.dlagtf(n, a, _a_offset, lambda, b, _b_offset, c, _c_offset, tol, d, _d_offset, in, _in_offset, info); + protected void dlagtfK(int n, double[] a, int offseta, double lambda, double[] b, int offsetb, double[] c, int offsetc, double tol, double[] d, int offsetd, int[] in, int offsetin, org.netlib.util.intW info) { + org.netlib.lapack.Dlagtf.dlagtf(n, a, offseta, lambda, b, offsetb, c, offsetc, tol, d, offsetd, in, offsetin, info); } - protected void dlagtmK(String trans, int n, int nrhs, double alpha, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] x, int _x_offset, int ldx, double beta, double[] b, int _b_offset, int ldb) { - org.netlib.lapack.Dlagtm.dlagtm(trans, n, nrhs, alpha, dl, _dl_offset, d, _d_offset, du, _du_offset, x, _x_offset, ldx, beta, b, _b_offset, ldb); + protected void dlagtmK(String trans, int n, int nrhs, double alpha, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] x, int offsetx, int ldx, double beta, double[] b, int offsetb, int ldb) { + org.netlib.lapack.Dlagtm.dlagtm(trans, n, nrhs, alpha, dl, offsetdl, d, offsetd, du, offsetdu, x, offsetx, ldx, beta, b, offsetb, ldb); } - protected void dlagtsK(int job, int n, double[] a, int _a_offset, double[] b, int _b_offset, double[] c, int _c_offset, double[] d, int _d_offset, int[] in, int _in_offset, double[] y, int _y_offset, org.netlib.util.doubleW tol, org.netlib.util.intW info) { - org.netlib.lapack.Dlagts.dlagts(job, n, a, _a_offset, b, _b_offset, c, _c_offset, d, _d_offset, in, _in_offset, y, _y_offset, tol, info); + protected void dlagtsK(int job, int n, double[] a, int offseta, double[] b, int offsetb, double[] c, int offsetc, double[] d, int offsetd, int[] in, int offsetin, double[] y, int offsety, org.netlib.util.doubleW tol, org.netlib.util.intW info) { + org.netlib.lapack.Dlagts.dlagts(job, n, a, offseta, b, offsetb, c, offsetc, d, offsetd, in, offsetin, y, offsety, tol, info); } - protected void dlagv2K(double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, org.netlib.util.doubleW csl, org.netlib.util.doubleW snl, org.netlib.util.doubleW csr, org.netlib.util.doubleW snr) { - org.netlib.lapack.Dlagv2.dlagv2(a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, csl, snl, csr, snr); + protected void dlagv2K(double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, org.netlib.util.doubleW csl, org.netlib.util.doubleW snl, org.netlib.util.doubleW csr, org.netlib.util.doubleW snr) { + org.netlib.lapack.Dlagv2.dlagv2(a, offseta, lda, b, offsetb, ldb, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, csl, snl, csr, snr); } - protected void dlahqrK(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, int iloz, int ihiz, double[] z, int _z_offset, int ldz, org.netlib.util.intW info) { - org.netlib.lapack.Dlahqr.dlahqr(wantt, wantz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, iloz, ihiz, z, _z_offset, ldz, info); + protected void dlahqrK(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int offseth, int ldh, double[] wr, int offsetwr, double[] wi, int offsetwi, int iloz, int ihiz, double[] z, int offsetz, int ldz, org.netlib.util.intW info) { + org.netlib.lapack.Dlahqr.dlahqr(wantt, wantz, n, ilo, ihi, h, offseth, ldh, wr, offsetwr, wi, offsetwi, iloz, ihiz, z, offsetz, ldz, info); } - protected void dlahr2K(int n, int k, int nb, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] t, int _t_offset, int ldt, double[] y, int _y_offset, int ldy) { - org.netlib.lapack.Dlahr2.dlahr2(n, k, nb, a, _a_offset, lda, tau, _tau_offset, t, _t_offset, ldt, y, _y_offset, ldy); + protected void dlahr2K(int n, int k, int nb, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] t, int offsett, int ldt, double[] y, int offsety, int ldy) { + org.netlib.lapack.Dlahr2.dlahr2(n, k, nb, a, offseta, lda, tau, offsettau, t, offsett, ldt, y, offsety, ldy); } - protected void dlahrdK(int n, int k, int nb, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] t, int _t_offset, int ldt, double[] y, int _y_offset, int ldy) { - org.netlib.lapack.Dlahrd.dlahrd(n, k, nb, a, _a_offset, lda, tau, _tau_offset, t, _t_offset, ldt, y, _y_offset, ldy); + protected void dlahrdK(int n, int k, int nb, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] t, int offsett, int ldt, double[] y, int offsety, int ldy) { + org.netlib.lapack.Dlahrd.dlahrd(n, k, nb, a, offseta, lda, tau, offsettau, t, offsett, ldt, y, offsety, ldy); } - protected void dlaic1K(int job, int j, double[] x, int _x_offset, double sest, double[] w, int _w_offset, double gamma, org.netlib.util.doubleW sestpr, org.netlib.util.doubleW s, org.netlib.util.doubleW c) { - org.netlib.lapack.Dlaic1.dlaic1(job, j, x, _x_offset, sest, w, _w_offset, gamma, sestpr, s, c); + protected void dlaic1K(int job, int j, double[] x, int offsetx, double sest, double[] w, int offsetw, double gamma, org.netlib.util.doubleW sestpr, org.netlib.util.doubleW s, org.netlib.util.doubleW c) { + org.netlib.lapack.Dlaic1.dlaic1(job, j, x, offsetx, sest, w, offsetw, gamma, sestpr, s, c); } protected boolean dlaisnanK(double din1, double din2) { return org.netlib.lapack.Dlaisnan.dlaisnan(din1, din2); } - protected void dlaln2K(boolean ltrans, int na, int nw, double smin, double ca, double[] a, int _a_offset, int lda, double d1, double d2, double[] b, int _b_offset, int ldb, double wr, double wi, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW scale, org.netlib.util.doubleW xnorm, org.netlib.util.intW info) { - org.netlib.lapack.Dlaln2.dlaln2(ltrans, na, nw, smin, ca, a, _a_offset, lda, d1, d2, b, _b_offset, ldb, wr, wi, x, _x_offset, ldx, scale, xnorm, info); + protected void dlaln2K(boolean ltrans, int na, int nw, double smin, double ca, double[] a, int offseta, int lda, double d1, double d2, double[] b, int offsetb, int ldb, double wr, double wi, double[] x, int offsetx, int ldx, org.netlib.util.doubleW scale, org.netlib.util.doubleW xnorm, org.netlib.util.intW info) { + org.netlib.lapack.Dlaln2.dlaln2(ltrans, na, nw, smin, ca, a, offseta, lda, d1, d2, b, offsetb, ldb, wr, wi, x, offsetx, ldx, scale, xnorm, info); } - protected void dlals0K(int icompq, int nl, int nr, int sqre, int nrhs, double[] b, int _b_offset, int ldb, double[] bx, int _bx_offset, int ldbx, int[] perm, int _perm_offset, int givptr, int[] givcol, int _givcol_offset, int ldgcol, double[] givnum, int _givnum_offset, int ldgnum, double[] poles, int _poles_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, double[] z, int _z_offset, int k, double c, double s, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlals0.dlals0(icompq, nl, nr, sqre, nrhs, b, _b_offset, ldb, bx, _bx_offset, ldbx, perm, _perm_offset, givptr, givcol, _givcol_offset, ldgcol, givnum, _givnum_offset, ldgnum, poles, _poles_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, k, c, s, work, _work_offset, info); + protected void dlals0K(int icompq, int nl, int nr, int sqre, int nrhs, double[] b, int offsetb, int ldb, double[] bx, int offsetbx, int ldbx, int[] perm, int offsetperm, int givptr, int[] givcol, int offsetgivcol, int ldgcol, double[] givnum, int offsetgivnum, int ldgnum, double[] poles, int offsetpoles, double[] difl, int offsetdifl, double[] difr, int offsetdifr, double[] z, int offsetz, int k, double c, double s, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dlals0.dlals0(icompq, nl, nr, sqre, nrhs, b, offsetb, ldb, bx, offsetbx, ldbx, perm, offsetperm, givptr, givcol, offsetgivcol, ldgcol, givnum, offsetgivnum, ldgnum, poles, offsetpoles, difl, offsetdifl, difr, offsetdifr, z, offsetz, k, c, s, work, offsetwork, info); } - protected void dlalsaK(int icompq, int smlsiz, int n, int nrhs, double[] b, int _b_offset, int ldb, double[] bx, int _bx_offset, int ldbx, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int[] k, int _k_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, double[] z, int _z_offset, double[] poles, int _poles_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, int ldgcol, int[] perm, int _perm_offset, double[] givnum, int _givnum_offset, double[] c, int _c_offset, double[] s, int _s_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlalsa.dlalsa(icompq, smlsiz, n, nrhs, b, _b_offset, ldb, bx, _bx_offset, ldbx, u, _u_offset, ldu, vt, _vt_offset, k, _k_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, poles, _poles_offset, givptr, _givptr_offset, givcol, _givcol_offset, ldgcol, perm, _perm_offset, givnum, _givnum_offset, c, _c_offset, s, _s_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void dlalsaK(int icompq, int smlsiz, int n, int nrhs, double[] b, int offsetb, int ldb, double[] bx, int offsetbx, int ldbx, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int[] k, int offsetk, double[] difl, int offsetdifl, double[] difr, int offsetdifr, double[] z, int offsetz, double[] poles, int offsetpoles, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, int ldgcol, int[] perm, int offsetperm, double[] givnum, int offsetgivnum, double[] c, int offsetc, double[] s, int offsets, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dlalsa.dlalsa(icompq, smlsiz, n, nrhs, b, offsetb, ldb, bx, offsetbx, ldbx, u, offsetu, ldu, vt, offsetvt, k, offsetk, difl, offsetdifl, difr, offsetdifr, z, offsetz, poles, offsetpoles, givptr, offsetgivptr, givcol, offsetgivcol, ldgcol, perm, offsetperm, givnum, offsetgivnum, c, offsetc, s, offsets, work, offsetwork, iwork, offsetiwork, info); } - protected void dlalsdK(String uplo, int smlsiz, int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] b, int _b_offset, int ldb, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlalsd.dlalsd(uplo, smlsiz, n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb, rcond, rank, work, _work_offset, iwork, _iwork_offset, info); + protected void dlalsdK(String uplo, int smlsiz, int n, int nrhs, double[] d, int offsetd, double[] e, int offsete, double[] b, int offsetb, int ldb, double rcond, org.netlib.util.intW rank, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dlalsd.dlalsd(uplo, smlsiz, n, nrhs, d, offsetd, e, offsete, b, offsetb, ldb, rcond, rank, work, offsetwork, iwork, offsetiwork, info); } - protected void dlamrgK(int n1, int n2, double[] a, int _a_offset, int dtrd1, int dtrd2, int[] index, int _index_offset) { - org.netlib.lapack.Dlamrg.dlamrg(n1, n2, a, _a_offset, dtrd1, dtrd2, index, _index_offset); + protected void dlamrgK(int n1, int n2, double[] a, int offseta, int dtrd1, int dtrd2, int[] index, int offsetindex) { + org.netlib.lapack.Dlamrg.dlamrg(n1, n2, a, offseta, dtrd1, dtrd2, index, offsetindex); } - protected int dlanegK(int n, double[] d, int _d_offset, double[] lld, int _lld_offset, double sigma, double pivmin, int r) { - return org.netlib.lapack.Dlaneg.dlaneg(n, d, _d_offset, lld, _lld_offset, sigma, pivmin, r); + protected int dlanegK(int n, double[] d, int offsetd, double[] lld, int offsetlld, double sigma, double pivmin, int r) { + return org.netlib.lapack.Dlaneg.dlaneg(n, d, offsetd, lld, offsetlld, sigma, pivmin, r); } - protected double dlangbK(String norm, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, double[] work, int _work_offset) { - return org.netlib.lapack.Dlangb.dlangb(norm, n, kl, ku, ab, _ab_offset, ldab, work, _work_offset); + protected double dlangbK(String norm, int n, int kl, int ku, double[] ab, int offsetab, int ldab, double[] work, int offsetwork) { + return org.netlib.lapack.Dlangb.dlangb(norm, n, kl, ku, ab, offsetab, ldab, work, offsetwork); } - protected double dlangeK(String norm, int m, int n, double[] a, int _a_offset, int lda, double[] work, int _work_offset) { - return org.netlib.lapack.Dlange.dlange(norm, m, n, a, _a_offset, lda, work, _work_offset); + protected double dlangeK(String norm, int m, int n, double[] a, int offseta, int lda, double[] work, int offsetwork) { + return org.netlib.lapack.Dlange.dlange(norm, m, n, a, offseta, lda, work, offsetwork); } - protected double dlangtK(String norm, int n, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset) { - return org.netlib.lapack.Dlangt.dlangt(norm, n, dl, _dl_offset, d, _d_offset, du, _du_offset); + protected double dlangtK(String norm, int n, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu) { + return org.netlib.lapack.Dlangt.dlangt(norm, n, dl, offsetdl, d, offsetd, du, offsetdu); } - protected double dlanhsK(String norm, int n, double[] a, int _a_offset, int lda, double[] work, int _work_offset) { - return org.netlib.lapack.Dlanhs.dlanhs(norm, n, a, _a_offset, lda, work, _work_offset); + protected double dlanhsK(String norm, int n, double[] a, int offseta, int lda, double[] work, int offsetwork) { + return org.netlib.lapack.Dlanhs.dlanhs(norm, n, a, offseta, lda, work, offsetwork); } - protected double dlansbK(String norm, String uplo, int n, int k, double[] ab, int _ab_offset, int ldab, double[] work, int _work_offset) { - return org.netlib.lapack.Dlansb.dlansb(norm, uplo, n, k, ab, _ab_offset, ldab, work, _work_offset); + protected double dlansbK(String norm, String uplo, int n, int k, double[] ab, int offsetab, int ldab, double[] work, int offsetwork) { + return org.netlib.lapack.Dlansb.dlansb(norm, uplo, n, k, ab, offsetab, ldab, work, offsetwork); } - protected double dlanspK(String norm, String uplo, int n, double[] ap, int _ap_offset, double[] work, int _work_offset) { - return org.netlib.lapack.Dlansp.dlansp(norm, uplo, n, ap, _ap_offset, work, _work_offset); + protected double dlanspK(String norm, String uplo, int n, double[] ap, int offsetap, double[] work, int offsetwork) { + return org.netlib.lapack.Dlansp.dlansp(norm, uplo, n, ap, offsetap, work, offsetwork); } - protected double dlanstK(String norm, int n, double[] d, int _d_offset, double[] e, int _e_offset) { - return org.netlib.lapack.Dlanst.dlanst(norm, n, d, _d_offset, e, _e_offset); + protected double dlanstK(String norm, int n, double[] d, int offsetd, double[] e, int offsete) { + return org.netlib.lapack.Dlanst.dlanst(norm, n, d, offsetd, e, offsete); } - protected double dlansyK(String norm, String uplo, int n, double[] a, int _a_offset, int lda, double[] work, int _work_offset) { - return org.netlib.lapack.Dlansy.dlansy(norm, uplo, n, a, _a_offset, lda, work, _work_offset); + protected double dlansyK(String norm, String uplo, int n, double[] a, int offseta, int lda, double[] work, int offsetwork) { + return org.netlib.lapack.Dlansy.dlansy(norm, uplo, n, a, offseta, lda, work, offsetwork); } - protected double dlantbK(String norm, String uplo, String diag, int n, int k, double[] ab, int _ab_offset, int ldab, double[] work, int _work_offset) { - return org.netlib.lapack.Dlantb.dlantb(norm, uplo, diag, n, k, ab, _ab_offset, ldab, work, _work_offset); + protected double dlantbK(String norm, String uplo, String diag, int n, int k, double[] ab, int offsetab, int ldab, double[] work, int offsetwork) { + return org.netlib.lapack.Dlantb.dlantb(norm, uplo, diag, n, k, ab, offsetab, ldab, work, offsetwork); } - protected double dlantpK(String norm, String uplo, String diag, int n, double[] ap, int _ap_offset, double[] work, int _work_offset) { - return org.netlib.lapack.Dlantp.dlantp(norm, uplo, diag, n, ap, _ap_offset, work, _work_offset); + protected double dlantpK(String norm, String uplo, String diag, int n, double[] ap, int offsetap, double[] work, int offsetwork) { + return org.netlib.lapack.Dlantp.dlantp(norm, uplo, diag, n, ap, offsetap, work, offsetwork); } - protected double dlantrK(String norm, String uplo, String diag, int m, int n, double[] a, int _a_offset, int lda, double[] work, int _work_offset) { - return org.netlib.lapack.Dlantr.dlantr(norm, uplo, diag, m, n, a, _a_offset, lda, work, _work_offset); + protected double dlantrK(String norm, String uplo, String diag, int m, int n, double[] a, int offseta, int lda, double[] work, int offsetwork) { + return org.netlib.lapack.Dlantr.dlantr(norm, uplo, diag, m, n, a, offseta, lda, work, offsetwork); } protected void dlanv2K(org.netlib.util.doubleW a, org.netlib.util.doubleW b, org.netlib.util.doubleW c, org.netlib.util.doubleW d, org.netlib.util.doubleW rt1r, org.netlib.util.doubleW rt1i, org.netlib.util.doubleW rt2r, org.netlib.util.doubleW rt2i, org.netlib.util.doubleW cs, org.netlib.util.doubleW sn) { org.netlib.lapack.Dlanv2.dlanv2(a, b, c, d, rt1r, rt1i, rt2r, rt2i, cs, sn); } - protected void dlapllK(int n, double[] x, int _x_offset, int incx, double[] y, int _y_offset, int incy, org.netlib.util.doubleW ssmin) { - org.netlib.lapack.Dlapll.dlapll(n, x, _x_offset, incx, y, _y_offset, incy, ssmin); + protected void dlapllK(int n, double[] x, int offsetx, int incx, double[] y, int offsety, int incy, org.netlib.util.doubleW ssmin) { + org.netlib.lapack.Dlapll.dlapll(n, x, offsetx, incx, y, offsety, incy, ssmin); } - protected void dlapmtK(boolean forwrd, int m, int n, double[] x, int _x_offset, int ldx, int[] k, int _k_offset) { - org.netlib.lapack.Dlapmt.dlapmt(forwrd, m, n, x, _x_offset, ldx, k, _k_offset); + protected void dlapmtK(boolean forwrd, int m, int n, double[] x, int offsetx, int ldx, int[] k, int offsetk) { + org.netlib.lapack.Dlapmt.dlapmt(forwrd, m, n, x, offsetx, ldx, k, offsetk); } protected double dlapy2K(double x, double y) { @@ -565,884 +565,884 @@ protected double dlapy3K(double x, double y, double z) { return org.netlib.lapack.Dlapy3.dlapy3(x, y, z); } - protected void dlaqgbK(int m, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, double[] r, int _r_offset, double[] c, int _c_offset, double rowcnd, double colcnd, double amax, org.netlib.util.StringW equed) { - org.netlib.lapack.Dlaqgb.dlaqgb(m, n, kl, ku, ab, _ab_offset, ldab, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, equed); + protected void dlaqgbK(int m, int n, int kl, int ku, double[] ab, int offsetab, int ldab, double[] r, int offsetr, double[] c, int offsetc, double rowcnd, double colcnd, double amax, org.netlib.util.StringW equed) { + org.netlib.lapack.Dlaqgb.dlaqgb(m, n, kl, ku, ab, offsetab, ldab, r, offsetr, c, offsetc, rowcnd, colcnd, amax, equed); } - protected void dlaqgeK(int m, int n, double[] a, int _a_offset, int lda, double[] r, int _r_offset, double[] c, int _c_offset, double rowcnd, double colcnd, double amax, org.netlib.util.StringW equed) { - org.netlib.lapack.Dlaqge.dlaqge(m, n, a, _a_offset, lda, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, equed); + protected void dlaqgeK(int m, int n, double[] a, int offseta, int lda, double[] r, int offsetr, double[] c, int offsetc, double rowcnd, double colcnd, double amax, org.netlib.util.StringW equed) { + org.netlib.lapack.Dlaqge.dlaqge(m, n, a, offseta, lda, r, offsetr, c, offsetc, rowcnd, colcnd, amax, equed); } - protected void dlaqp2K(int m, int n, int offset, double[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, double[] tau, int _tau_offset, double[] vn1, int _vn1_offset, double[] vn2, int _vn2_offset, double[] work, int _work_offset) { - org.netlib.lapack.Dlaqp2.dlaqp2(m, n, offset, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, vn1, _vn1_offset, vn2, _vn2_offset, work, _work_offset); + protected void dlaqp2K(int m, int n, int offset, double[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, double[] tau, int offsettau, double[] vn1, int offsetvn1, double[] vn2, int offsetvn2, double[] work, int offsetwork) { + org.netlib.lapack.Dlaqp2.dlaqp2(m, n, offset, a, offseta, lda, jpvt, offsetjpvt, tau, offsettau, vn1, offsetvn1, vn2, offsetvn2, work, offsetwork); } - protected void dlaqpsK(int m, int n, int offset, int nb, org.netlib.util.intW kb, double[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, double[] tau, int _tau_offset, double[] vn1, int _vn1_offset, double[] vn2, int _vn2_offset, double[] auxv, int _auxv_offset, double[] f, int _f_offset, int ldf) { - org.netlib.lapack.Dlaqps.dlaqps(m, n, offset, nb, kb, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, vn1, _vn1_offset, vn2, _vn2_offset, auxv, _auxv_offset, f, _f_offset, ldf); + protected void dlaqpsK(int m, int n, int offset, int nb, org.netlib.util.intW kb, double[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, double[] tau, int offsettau, double[] vn1, int offsetvn1, double[] vn2, int offsetvn2, double[] auxv, int offsetauxv, double[] f, int offsetf, int ldf) { + org.netlib.lapack.Dlaqps.dlaqps(m, n, offset, nb, kb, a, offseta, lda, jpvt, offsetjpvt, tau, offsettau, vn1, offsetvn1, vn2, offsetvn2, auxv, offsetauxv, f, offsetf, ldf); } - protected void dlaqr0K(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, int iloz, int ihiz, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dlaqr0.dlaqr0(wantt, wantz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, iloz, ihiz, z, _z_offset, ldz, work, _work_offset, lwork, info); + protected void dlaqr0K(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int offseth, int ldh, double[] wr, int offsetwr, double[] wi, int offsetwi, int iloz, int ihiz, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dlaqr0.dlaqr0(wantt, wantz, n, ilo, ihi, h, offseth, ldh, wr, offsetwr, wi, offsetwi, iloz, ihiz, z, offsetz, ldz, work, offsetwork, lwork, info); } - protected void dlaqr1K(int n, double[] h, int _h_offset, int ldh, double sr1, double si1, double sr2, double si2, double[] v, int _v_offset) { - org.netlib.lapack.Dlaqr1.dlaqr1(n, h, _h_offset, ldh, sr1, si1, sr2, si2, v, _v_offset); + protected void dlaqr1K(int n, double[] h, int offseth, int ldh, double sr1, double si1, double sr2, double si2, double[] v, int offsetv) { + org.netlib.lapack.Dlaqr1.dlaqr1(n, h, offseth, ldh, sr1, si1, sr2, si2, v, offsetv); } - protected void dlaqr2K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, double[] h, int _h_offset, int ldh, int iloz, int ihiz, double[] z, int _z_offset, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, double[] sr, int _sr_offset, double[] si, int _si_offset, double[] v, int _v_offset, int ldv, int nh, double[] t, int _t_offset, int ldt, int nv, double[] wv, int _wv_offset, int ldwv, double[] work, int _work_offset, int lwork) { - org.netlib.lapack.Dlaqr2.dlaqr2(wantt, wantz, n, ktop, kbot, nw, h, _h_offset, ldh, iloz, ihiz, z, _z_offset, ldz, ns, nd, sr, _sr_offset, si, _si_offset, v, _v_offset, ldv, nh, t, _t_offset, ldt, nv, wv, _wv_offset, ldwv, work, _work_offset, lwork); + protected void dlaqr2K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, double[] h, int offseth, int ldh, int iloz, int ihiz, double[] z, int offsetz, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, double[] sr, int offsetsr, double[] si, int offsetsi, double[] v, int offsetv, int ldv, int nh, double[] t, int offsett, int ldt, int nv, double[] wv, int offsetwv, int ldwv, double[] work, int offsetwork, int lwork) { + org.netlib.lapack.Dlaqr2.dlaqr2(wantt, wantz, n, ktop, kbot, nw, h, offseth, ldh, iloz, ihiz, z, offsetz, ldz, ns, nd, sr, offsetsr, si, offsetsi, v, offsetv, ldv, nh, t, offsett, ldt, nv, wv, offsetwv, ldwv, work, offsetwork, lwork); } - protected void dlaqr3K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, double[] h, int _h_offset, int ldh, int iloz, int ihiz, double[] z, int _z_offset, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, double[] sr, int _sr_offset, double[] si, int _si_offset, double[] v, int _v_offset, int ldv, int nh, double[] t, int _t_offset, int ldt, int nv, double[] wv, int _wv_offset, int ldwv, double[] work, int _work_offset, int lwork) { - org.netlib.lapack.Dlaqr3.dlaqr3(wantt, wantz, n, ktop, kbot, nw, h, _h_offset, ldh, iloz, ihiz, z, _z_offset, ldz, ns, nd, sr, _sr_offset, si, _si_offset, v, _v_offset, ldv, nh, t, _t_offset, ldt, nv, wv, _wv_offset, ldwv, work, _work_offset, lwork); + protected void dlaqr3K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, double[] h, int offseth, int ldh, int iloz, int ihiz, double[] z, int offsetz, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, double[] sr, int offsetsr, double[] si, int offsetsi, double[] v, int offsetv, int ldv, int nh, double[] t, int offsett, int ldt, int nv, double[] wv, int offsetwv, int ldwv, double[] work, int offsetwork, int lwork) { + org.netlib.lapack.Dlaqr3.dlaqr3(wantt, wantz, n, ktop, kbot, nw, h, offseth, ldh, iloz, ihiz, z, offsetz, ldz, ns, nd, sr, offsetsr, si, offsetsi, v, offsetv, ldv, nh, t, offsett, ldt, nv, wv, offsetwv, ldwv, work, offsetwork, lwork); } - protected void dlaqr4K(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, int iloz, int ihiz, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dlaqr4.dlaqr4(wantt, wantz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, iloz, ihiz, z, _z_offset, ldz, work, _work_offset, lwork, info); + protected void dlaqr4K(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int offseth, int ldh, double[] wr, int offsetwr, double[] wi, int offsetwi, int iloz, int ihiz, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dlaqr4.dlaqr4(wantt, wantz, n, ilo, ihi, h, offseth, ldh, wr, offsetwr, wi, offsetwi, iloz, ihiz, z, offsetz, ldz, work, offsetwork, lwork, info); } - protected void dlaqr5K(boolean wantt, boolean wantz, int kacc22, int n, int ktop, int kbot, int nshfts, double[] sr, int _sr_offset, double[] si, int _si_offset, double[] h, int _h_offset, int ldh, int iloz, int ihiz, double[] z, int _z_offset, int ldz, double[] v, int _v_offset, int ldv, double[] u, int _u_offset, int ldu, int nv, double[] wv, int _wv_offset, int ldwv, int nh, double[] wh, int _wh_offset, int ldwh) { - org.netlib.lapack.Dlaqr5.dlaqr5(wantt, wantz, kacc22, n, ktop, kbot, nshfts, sr, _sr_offset, si, _si_offset, h, _h_offset, ldh, iloz, ihiz, z, _z_offset, ldz, v, _v_offset, ldv, u, _u_offset, ldu, nv, wv, _wv_offset, ldwv, nh, wh, _wh_offset, ldwh); + protected void dlaqr5K(boolean wantt, boolean wantz, int kacc22, int n, int ktop, int kbot, int nshfts, double[] sr, int offsetsr, double[] si, int offsetsi, double[] h, int offseth, int ldh, int iloz, int ihiz, double[] z, int offsetz, int ldz, double[] v, int offsetv, int ldv, double[] u, int offsetu, int ldu, int nv, double[] wv, int offsetwv, int ldwv, int nh, double[] wh, int offsetwh, int ldwh) { + org.netlib.lapack.Dlaqr5.dlaqr5(wantt, wantz, kacc22, n, ktop, kbot, nshfts, sr, offsetsr, si, offsetsi, h, offseth, ldh, iloz, ihiz, z, offsetz, ldz, v, offsetv, ldv, u, offsetu, ldu, nv, wv, offsetwv, ldwv, nh, wh, offsetwh, ldwh); } - protected void dlaqsbK(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] s, int _s_offset, double scond, double amax, org.netlib.util.StringW equed) { - org.netlib.lapack.Dlaqsb.dlaqsb(uplo, n, kd, ab, _ab_offset, ldab, s, _s_offset, scond, amax, equed); + protected void dlaqsbK(String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double[] s, int offsets, double scond, double amax, org.netlib.util.StringW equed) { + org.netlib.lapack.Dlaqsb.dlaqsb(uplo, n, kd, ab, offsetab, ldab, s, offsets, scond, amax, equed); } - protected void dlaqspK(String uplo, int n, double[] ap, int _ap_offset, double[] s, int _s_offset, double scond, double amax, org.netlib.util.StringW equed) { - org.netlib.lapack.Dlaqsp.dlaqsp(uplo, n, ap, _ap_offset, s, _s_offset, scond, amax, equed); + protected void dlaqspK(String uplo, int n, double[] ap, int offsetap, double[] s, int offsets, double scond, double amax, org.netlib.util.StringW equed) { + org.netlib.lapack.Dlaqsp.dlaqsp(uplo, n, ap, offsetap, s, offsets, scond, amax, equed); } - protected void dlaqsyK(String uplo, int n, double[] a, int _a_offset, int lda, double[] s, int _s_offset, double scond, double amax, org.netlib.util.StringW equed) { - org.netlib.lapack.Dlaqsy.dlaqsy(uplo, n, a, _a_offset, lda, s, _s_offset, scond, amax, equed); + protected void dlaqsyK(String uplo, int n, double[] a, int offseta, int lda, double[] s, int offsets, double scond, double amax, org.netlib.util.StringW equed) { + org.netlib.lapack.Dlaqsy.dlaqsy(uplo, n, a, offseta, lda, s, offsets, scond, amax, equed); } - protected void dlaqtrK(boolean ltran, boolean lreal, int n, double[] t, int _t_offset, int ldt, double[] b, int _b_offset, double w, org.netlib.util.doubleW scale, double[] x, int _x_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlaqtr.dlaqtr(ltran, lreal, n, t, _t_offset, ldt, b, _b_offset, w, scale, x, _x_offset, work, _work_offset, info); + protected void dlaqtrK(boolean ltran, boolean lreal, int n, double[] t, int offsett, int ldt, double[] b, int offsetb, double w, org.netlib.util.doubleW scale, double[] x, int offsetx, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dlaqtr.dlaqtr(ltran, lreal, n, t, offsett, ldt, b, offsetb, w, scale, x, offsetx, work, offsetwork, info); } - protected void dlar1vK(int n, int b1, int bn, double lambda, double[] d, int _d_offset, double[] l, int _l_offset, double[] ld, int _ld_offset, double[] lld, int _lld_offset, double pivmin, double gaptol, double[] z, int _z_offset, boolean wantnc, org.netlib.util.intW negcnt, org.netlib.util.doubleW ztz, org.netlib.util.doubleW mingma, org.netlib.util.intW r, int[] isuppz, int _isuppz_offset, org.netlib.util.doubleW nrminv, org.netlib.util.doubleW resid, org.netlib.util.doubleW rqcorr, double[] work, int _work_offset) { - org.netlib.lapack.Dlar1v.dlar1v(n, b1, bn, lambda, d, _d_offset, l, _l_offset, ld, _ld_offset, lld, _lld_offset, pivmin, gaptol, z, _z_offset, wantnc, negcnt, ztz, mingma, r, isuppz, _isuppz_offset, nrminv, resid, rqcorr, work, _work_offset); + protected void dlar1vK(int n, int b1, int bn, double lambda, double[] d, int offsetd, double[] l, int offsetl, double[] ld, int offsetld, double[] lld, int offsetlld, double pivmin, double gaptol, double[] z, int offsetz, boolean wantnc, org.netlib.util.intW negcnt, org.netlib.util.doubleW ztz, org.netlib.util.doubleW mingma, org.netlib.util.intW r, int[] isuppz, int offsetisuppz, org.netlib.util.doubleW nrminv, org.netlib.util.doubleW resid, org.netlib.util.doubleW rqcorr, double[] work, int offsetwork) { + org.netlib.lapack.Dlar1v.dlar1v(n, b1, bn, lambda, d, offsetd, l, offsetl, ld, offsetld, lld, offsetlld, pivmin, gaptol, z, offsetz, wantnc, negcnt, ztz, mingma, r, isuppz, offsetisuppz, nrminv, resid, rqcorr, work, offsetwork); } - protected void dlar2vK(int n, double[] x, int _x_offset, double[] y, int _y_offset, double[] z, int _z_offset, int incx, double[] c, int _c_offset, double[] s, int _s_offset, int incc) { - org.netlib.lapack.Dlar2v.dlar2v(n, x, _x_offset, y, _y_offset, z, _z_offset, incx, c, _c_offset, s, _s_offset, incc); + protected void dlar2vK(int n, double[] x, int offsetx, double[] y, int offsety, double[] z, int offsetz, int incx, double[] c, int offsetc, double[] s, int offsets, int incc) { + org.netlib.lapack.Dlar2v.dlar2v(n, x, offsetx, y, offsety, z, offsetz, incx, c, offsetc, s, offsets, incc); } - protected void dlarfK(String side, int m, int n, double[] v, int _v_offset, int incv, double tau, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset) { - org.netlib.lapack.Dlarf.dlarf(side, m, n, v, _v_offset, incv, tau, c, _c_offset, Ldc, work, _work_offset); + protected void dlarfK(String side, int m, int n, double[] v, int offsetv, int incv, double tau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork) { + org.netlib.lapack.Dlarf.dlarf(side, m, n, v, offsetv, incv, tau, c, offsetc, Ldc, work, offsetwork); } - protected void dlarfbK(String side, String trans, String direct, String storev, int m, int n, int k, double[] v, int _v_offset, int ldv, double[] t, int _t_offset, int ldt, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int ldwork) { - org.netlib.lapack.Dlarfb.dlarfb(side, trans, direct, storev, m, n, k, v, _v_offset, ldv, t, _t_offset, ldt, c, _c_offset, Ldc, work, _work_offset, ldwork); + protected void dlarfbK(String side, String trans, String direct, String storev, int m, int n, int k, double[] v, int offsetv, int ldv, double[] t, int offsett, int ldt, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int ldwork) { + org.netlib.lapack.Dlarfb.dlarfb(side, trans, direct, storev, m, n, k, v, offsetv, ldv, t, offsett, ldt, c, offsetc, Ldc, work, offsetwork, ldwork); } - protected void dlarfgK(int n, org.netlib.util.doubleW alpha, double[] x, int _x_offset, int incx, org.netlib.util.doubleW tau) { - org.netlib.lapack.Dlarfg.dlarfg(n, alpha, x, _x_offset, incx, tau); + protected void dlarfgK(int n, org.netlib.util.doubleW alpha, double[] x, int offsetx, int incx, org.netlib.util.doubleW tau) { + org.netlib.lapack.Dlarfg.dlarfg(n, alpha, x, offsetx, incx, tau); } - protected void dlarftK(String direct, String storev, int n, int k, double[] v, int _v_offset, int ldv, double[] tau, int _tau_offset, double[] t, int _t_offset, int ldt) { - org.netlib.lapack.Dlarft.dlarft(direct, storev, n, k, v, _v_offset, ldv, tau, _tau_offset, t, _t_offset, ldt); + protected void dlarftK(String direct, String storev, int n, int k, double[] v, int offsetv, int ldv, double[] tau, int offsettau, double[] t, int offsett, int ldt) { + org.netlib.lapack.Dlarft.dlarft(direct, storev, n, k, v, offsetv, ldv, tau, offsettau, t, offsett, ldt); } - protected void dlarfxK(String side, int m, int n, double[] v, int _v_offset, double tau, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset) { - org.netlib.lapack.Dlarfx.dlarfx(side, m, n, v, _v_offset, tau, c, _c_offset, Ldc, work, _work_offset); + protected void dlarfxK(String side, int m, int n, double[] v, int offsetv, double tau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork) { + org.netlib.lapack.Dlarfx.dlarfx(side, m, n, v, offsetv, tau, c, offsetc, Ldc, work, offsetwork); } - protected void dlargvK(int n, double[] x, int _x_offset, int incx, double[] y, int _y_offset, int incy, double[] c, int _c_offset, int incc) { - org.netlib.lapack.Dlargv.dlargv(n, x, _x_offset, incx, y, _y_offset, incy, c, _c_offset, incc); + protected void dlargvK(int n, double[] x, int offsetx, int incx, double[] y, int offsety, int incy, double[] c, int offsetc, int incc) { + org.netlib.lapack.Dlargv.dlargv(n, x, offsetx, incx, y, offsety, incy, c, offsetc, incc); } - protected void dlarnvK(int idist, int[] iseed, int _iseed_offset, int n, double[] x, int _x_offset) { - org.netlib.lapack.Dlarnv.dlarnv(idist, iseed, _iseed_offset, n, x, _x_offset); + protected void dlarnvK(int idist, int[] iseed, int offsetiseed, int n, double[] x, int offsetx) { + org.netlib.lapack.Dlarnv.dlarnv(idist, iseed, offsetiseed, n, x, offsetx); } - protected void dlarraK(int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] e2, int _e2_offset, double spltol, double tnrm, org.netlib.util.intW nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlarra.dlarra(n, d, _d_offset, e, _e_offset, e2, _e2_offset, spltol, tnrm, nsplit, isplit, _isplit_offset, info); + protected void dlarraK(int n, double[] d, int offsetd, double[] e, int offsete, double[] e2, int offsete2, double spltol, double tnrm, org.netlib.util.intW nsplit, int[] isplit, int offsetisplit, org.netlib.util.intW info) { + org.netlib.lapack.Dlarra.dlarra(n, d, offsetd, e, offsete, e2, offsete2, spltol, tnrm, nsplit, isplit, offsetisplit, info); } - protected void dlarrbK(int n, double[] d, int _d_offset, double[] lld, int _lld_offset, int ifirst, int ilast, double rtol1, double rtol2, int offset, double[] w, int _w_offset, double[] wgap, int _wgap_offset, double[] werr, int _werr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, double pivmin, double spdiam, int twist, org.netlib.util.intW info) { - org.netlib.lapack.Dlarrb.dlarrb(n, d, _d_offset, lld, _lld_offset, ifirst, ilast, rtol1, rtol2, offset, w, _w_offset, wgap, _wgap_offset, werr, _werr_offset, work, _work_offset, iwork, _iwork_offset, pivmin, spdiam, twist, info); + protected void dlarrbK(int n, double[] d, int offsetd, double[] lld, int offsetlld, int ifirst, int ilast, double rtol1, double rtol2, int offset, double[] w, int offsetw, double[] wgap, int offsetwgap, double[] werr, int offsetwerr, double[] work, int offsetwork, int[] iwork, int offsetiwork, double pivmin, double spdiam, int twist, org.netlib.util.intW info) { + org.netlib.lapack.Dlarrb.dlarrb(n, d, offsetd, lld, offsetlld, ifirst, ilast, rtol1, rtol2, offset, w, offsetw, wgap, offsetwgap, werr, offsetwerr, work, offsetwork, iwork, offsetiwork, pivmin, spdiam, twist, info); } - protected void dlarrcK(String jobt, int n, double vl, double vu, double[] d, int _d_offset, double[] e, int _e_offset, double pivmin, org.netlib.util.intW eigcnt, org.netlib.util.intW lcnt, org.netlib.util.intW rcnt, org.netlib.util.intW info) { - org.netlib.lapack.Dlarrc.dlarrc(jobt, n, vl, vu, d, _d_offset, e, _e_offset, pivmin, eigcnt, lcnt, rcnt, info); + protected void dlarrcK(String jobt, int n, double vl, double vu, double[] d, int offsetd, double[] e, int offsete, double pivmin, org.netlib.util.intW eigcnt, org.netlib.util.intW lcnt, org.netlib.util.intW rcnt, org.netlib.util.intW info) { + org.netlib.lapack.Dlarrc.dlarrc(jobt, n, vl, vu, d, offsetd, e, offsete, pivmin, eigcnt, lcnt, rcnt, info); } - protected void dlarrdK(String range, String order, int n, double vl, double vu, int il, int iu, double[] gers, int _gers_offset, double reltol, double[] d, int _d_offset, double[] e, int _e_offset, double[] e2, int _e2_offset, double pivmin, int nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW m, double[] w, int _w_offset, double[] werr, int _werr_offset, org.netlib.util.doubleW wl, org.netlib.util.doubleW wu, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlarrd.dlarrd(range, order, n, vl, vu, il, iu, gers, _gers_offset, reltol, d, _d_offset, e, _e_offset, e2, _e2_offset, pivmin, nsplit, isplit, _isplit_offset, m, w, _w_offset, werr, _werr_offset, wl, wu, iblock, _iblock_offset, indexw, _indexw_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void dlarrdK(String range, String order, int n, double vl, double vu, int il, int iu, double[] gers, int offsetgers, double reltol, double[] d, int offsetd, double[] e, int offsete, double[] e2, int offsete2, double pivmin, int nsplit, int[] isplit, int offsetisplit, org.netlib.util.intW m, double[] w, int offsetw, double[] werr, int offsetwerr, org.netlib.util.doubleW wl, org.netlib.util.doubleW wu, int[] iblock, int offsetiblock, int[] indexw, int offsetindexw, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dlarrd.dlarrd(range, order, n, vl, vu, il, iu, gers, offsetgers, reltol, d, offsetd, e, offsete, e2, offsete2, pivmin, nsplit, isplit, offsetisplit, m, w, offsetw, werr, offsetwerr, wl, wu, iblock, offsetiblock, indexw, offsetindexw, work, offsetwork, iwork, offsetiwork, info); } - protected void dlarreK(String range, int n, org.netlib.util.doubleW vl, org.netlib.util.doubleW vu, int il, int iu, double[] d, int _d_offset, double[] e, int _e_offset, double[] e2, int _e2_offset, double rtol1, double rtol2, double spltol, org.netlib.util.intW nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW m, double[] w, int _w_offset, double[] werr, int _werr_offset, double[] wgap, int _wgap_offset, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, double[] gers, int _gers_offset, org.netlib.util.doubleW pivmin, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlarre.dlarre(range, n, vl, vu, il, iu, d, _d_offset, e, _e_offset, e2, _e2_offset, rtol1, rtol2, spltol, nsplit, isplit, _isplit_offset, m, w, _w_offset, werr, _werr_offset, wgap, _wgap_offset, iblock, _iblock_offset, indexw, _indexw_offset, gers, _gers_offset, pivmin, work, _work_offset, iwork, _iwork_offset, info); + protected void dlarreK(String range, int n, org.netlib.util.doubleW vl, org.netlib.util.doubleW vu, int il, int iu, double[] d, int offsetd, double[] e, int offsete, double[] e2, int offsete2, double rtol1, double rtol2, double spltol, org.netlib.util.intW nsplit, int[] isplit, int offsetisplit, org.netlib.util.intW m, double[] w, int offsetw, double[] werr, int offsetwerr, double[] wgap, int offsetwgap, int[] iblock, int offsetiblock, int[] indexw, int offsetindexw, double[] gers, int offsetgers, org.netlib.util.doubleW pivmin, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dlarre.dlarre(range, n, vl, vu, il, iu, d, offsetd, e, offsete, e2, offsete2, rtol1, rtol2, spltol, nsplit, isplit, offsetisplit, m, w, offsetw, werr, offsetwerr, wgap, offsetwgap, iblock, offsetiblock, indexw, offsetindexw, gers, offsetgers, pivmin, work, offsetwork, iwork, offsetiwork, info); } - protected void dlarrfK(int n, double[] d, int _d_offset, double[] l, int _l_offset, double[] ld, int _ld_offset, int clstrt, int clend, double[] w, int _w_offset, double[] wgap, int _wgap_offset, double[] werr, int _werr_offset, double spdiam, double clgapl, double clgapr, double pivmin, org.netlib.util.doubleW sigma, double[] dplus, int _dplus_offset, double[] lplus, int _lplus_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlarrf.dlarrf(n, d, _d_offset, l, _l_offset, ld, _ld_offset, clstrt, clend, w, _w_offset, wgap, _wgap_offset, werr, _werr_offset, spdiam, clgapl, clgapr, pivmin, sigma, dplus, _dplus_offset, lplus, _lplus_offset, work, _work_offset, info); + protected void dlarrfK(int n, double[] d, int offsetd, double[] l, int offsetl, double[] ld, int offsetld, int clstrt, int clend, double[] w, int offsetw, double[] wgap, int offsetwgap, double[] werr, int offsetwerr, double spdiam, double clgapl, double clgapr, double pivmin, org.netlib.util.doubleW sigma, double[] dplus, int offsetdplus, double[] lplus, int offsetlplus, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dlarrf.dlarrf(n, d, offsetd, l, offsetl, ld, offsetld, clstrt, clend, w, offsetw, wgap, offsetwgap, werr, offsetwerr, spdiam, clgapl, clgapr, pivmin, sigma, dplus, offsetdplus, lplus, offsetlplus, work, offsetwork, info); } - protected void dlarrjK(int n, double[] d, int _d_offset, double[] e2, int _e2_offset, int ifirst, int ilast, double rtol, int offset, double[] w, int _w_offset, double[] werr, int _werr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, double pivmin, double spdiam, org.netlib.util.intW info) { - org.netlib.lapack.Dlarrj.dlarrj(n, d, _d_offset, e2, _e2_offset, ifirst, ilast, rtol, offset, w, _w_offset, werr, _werr_offset, work, _work_offset, iwork, _iwork_offset, pivmin, spdiam, info); + protected void dlarrjK(int n, double[] d, int offsetd, double[] e2, int offsete2, int ifirst, int ilast, double rtol, int offset, double[] w, int offsetw, double[] werr, int offsetwerr, double[] work, int offsetwork, int[] iwork, int offsetiwork, double pivmin, double spdiam, org.netlib.util.intW info) { + org.netlib.lapack.Dlarrj.dlarrj(n, d, offsetd, e2, offsete2, ifirst, ilast, rtol, offset, w, offsetw, werr, offsetwerr, work, offsetwork, iwork, offsetiwork, pivmin, spdiam, info); } - protected void dlarrkK(int n, int iw, double gl, double gu, double[] d, int _d_offset, double[] e2, int _e2_offset, double pivmin, double reltol, org.netlib.util.doubleW w, org.netlib.util.doubleW werr, org.netlib.util.intW info) { - org.netlib.lapack.Dlarrk.dlarrk(n, iw, gl, gu, d, _d_offset, e2, _e2_offset, pivmin, reltol, w, werr, info); + protected void dlarrkK(int n, int iw, double gl, double gu, double[] d, int offsetd, double[] e2, int offsete2, double pivmin, double reltol, org.netlib.util.doubleW w, org.netlib.util.doubleW werr, org.netlib.util.intW info) { + org.netlib.lapack.Dlarrk.dlarrk(n, iw, gl, gu, d, offsetd, e2, offsete2, pivmin, reltol, w, werr, info); } - protected void dlarrrK(int n, double[] d, int _d_offset, double[] e, int _e_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlarrr.dlarrr(n, d, _d_offset, e, _e_offset, info); + protected void dlarrrK(int n, double[] d, int offsetd, double[] e, int offsete, org.netlib.util.intW info) { + org.netlib.lapack.Dlarrr.dlarrr(n, d, offsetd, e, offsete, info); } - protected void dlarrvK(int n, double vl, double vu, double[] d, int _d_offset, double[] l, int _l_offset, double pivmin, int[] isplit, int _isplit_offset, int m, int dol, int dou, double minrgp, org.netlib.util.doubleW rtol1, org.netlib.util.doubleW rtol2, double[] w, int _w_offset, double[] werr, int _werr_offset, double[] wgap, int _wgap_offset, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, double[] gers, int _gers_offset, double[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlarrv.dlarrv(n, vl, vu, d, _d_offset, l, _l_offset, pivmin, isplit, _isplit_offset, m, dol, dou, minrgp, rtol1, rtol2, w, _w_offset, werr, _werr_offset, wgap, _wgap_offset, iblock, _iblock_offset, indexw, _indexw_offset, gers, _gers_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void dlarrvK(int n, double vl, double vu, double[] d, int offsetd, double[] l, int offsetl, double pivmin, int[] isplit, int offsetisplit, int m, int dol, int dou, double minrgp, org.netlib.util.doubleW rtol1, org.netlib.util.doubleW rtol2, double[] w, int offsetw, double[] werr, int offsetwerr, double[] wgap, int offsetwgap, int[] iblock, int offsetiblock, int[] indexw, int offsetindexw, double[] gers, int offsetgers, double[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dlarrv.dlarrv(n, vl, vu, d, offsetd, l, offsetl, pivmin, isplit, offsetisplit, m, dol, dou, minrgp, rtol1, rtol2, w, offsetw, werr, offsetwerr, wgap, offsetwgap, iblock, offsetiblock, indexw, offsetindexw, gers, offsetgers, z, offsetz, ldz, isuppz, offsetisuppz, work, offsetwork, iwork, offsetiwork, info); } protected void dlartgK(double f, double g, org.netlib.util.doubleW cs, org.netlib.util.doubleW sn, org.netlib.util.doubleW r) { org.netlib.lapack.Dlartg.dlartg(f, g, cs, sn, r); } - protected void dlartvK(int n, double[] x, int _x_offset, int incx, double[] y, int _y_offset, int incy, double[] c, int _c_offset, double[] s, int _s_offset, int incc) { - org.netlib.lapack.Dlartv.dlartv(n, x, _x_offset, incx, y, _y_offset, incy, c, _c_offset, s, _s_offset, incc); + protected void dlartvK(int n, double[] x, int offsetx, int incx, double[] y, int offsety, int incy, double[] c, int offsetc, double[] s, int offsets, int incc) { + org.netlib.lapack.Dlartv.dlartv(n, x, offsetx, incx, y, offsety, incy, c, offsetc, s, offsets, incc); } - protected void dlaruvK(int[] iseed, int _iseed_offset, int n, double[] x, int _x_offset) { - org.netlib.lapack.Dlaruv.dlaruv(iseed, _iseed_offset, n, x, _x_offset); + protected void dlaruvK(int[] iseed, int offsetiseed, int n, double[] x, int offsetx) { + org.netlib.lapack.Dlaruv.dlaruv(iseed, offsetiseed, n, x, offsetx); } - protected void dlarzK(String side, int m, int n, int l, double[] v, int _v_offset, int incv, double tau, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset) { - org.netlib.lapack.Dlarz.dlarz(side, m, n, l, v, _v_offset, incv, tau, c, _c_offset, Ldc, work, _work_offset); + protected void dlarzK(String side, int m, int n, int l, double[] v, int offsetv, int incv, double tau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork) { + org.netlib.lapack.Dlarz.dlarz(side, m, n, l, v, offsetv, incv, tau, c, offsetc, Ldc, work, offsetwork); } - protected void dlarzbK(String side, String trans, String direct, String storev, int m, int n, int k, int l, double[] v, int _v_offset, int ldv, double[] t, int _t_offset, int ldt, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int ldwork) { - org.netlib.lapack.Dlarzb.dlarzb(side, trans, direct, storev, m, n, k, l, v, _v_offset, ldv, t, _t_offset, ldt, c, _c_offset, Ldc, work, _work_offset, ldwork); + protected void dlarzbK(String side, String trans, String direct, String storev, int m, int n, int k, int l, double[] v, int offsetv, int ldv, double[] t, int offsett, int ldt, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int ldwork) { + org.netlib.lapack.Dlarzb.dlarzb(side, trans, direct, storev, m, n, k, l, v, offsetv, ldv, t, offsett, ldt, c, offsetc, Ldc, work, offsetwork, ldwork); } - protected void dlarztK(String direct, String storev, int n, int k, double[] v, int _v_offset, int ldv, double[] tau, int _tau_offset, double[] t, int _t_offset, int ldt) { - org.netlib.lapack.Dlarzt.dlarzt(direct, storev, n, k, v, _v_offset, ldv, tau, _tau_offset, t, _t_offset, ldt); + protected void dlarztK(String direct, String storev, int n, int k, double[] v, int offsetv, int ldv, double[] tau, int offsettau, double[] t, int offsett, int ldt) { + org.netlib.lapack.Dlarzt.dlarzt(direct, storev, n, k, v, offsetv, ldv, tau, offsettau, t, offsett, ldt); } protected void dlas2K(double f, double g, double h, org.netlib.util.doubleW ssmin, org.netlib.util.doubleW ssmax) { org.netlib.lapack.Dlas2.dlas2(f, g, h, ssmin, ssmax); } - protected void dlasclK(String type, int kl, int ku, double cfrom, double cto, int m, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info) { - org.netlib.lapack.Dlascl.dlascl(type, kl, ku, cfrom, cto, m, n, a, _a_offset, lda, info); + protected void dlasclK(String type, int kl, int ku, double cfrom, double cto, int m, int n, double[] a, int offseta, int lda, org.netlib.util.intW info) { + org.netlib.lapack.Dlascl.dlascl(type, kl, ku, cfrom, cto, m, n, a, offseta, lda, info); } - protected void dlasd0K(int n, int sqre, double[] d, int _d_offset, double[] e, int _e_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, int smlsiz, int[] iwork, int _iwork_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlasd0.dlasd0(n, sqre, d, _d_offset, e, _e_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, smlsiz, iwork, _iwork_offset, work, _work_offset, info); + protected void dlasd0K(int n, int sqre, double[] d, int offsetd, double[] e, int offsete, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int ldvt, int smlsiz, int[] iwork, int offsetiwork, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dlasd0.dlasd0(n, sqre, d, offsetd, e, offsete, u, offsetu, ldu, vt, offsetvt, ldvt, smlsiz, iwork, offsetiwork, work, offsetwork, info); } - protected void dlasd1K(int nl, int nr, int sqre, double[] d, int _d_offset, org.netlib.util.doubleW alpha, org.netlib.util.doubleW beta, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, int[] idxq, int _idxq_offset, int[] iwork, int _iwork_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlasd1.dlasd1(nl, nr, sqre, d, _d_offset, alpha, beta, u, _u_offset, ldu, vt, _vt_offset, ldvt, idxq, _idxq_offset, iwork, _iwork_offset, work, _work_offset, info); + protected void dlasd1K(int nl, int nr, int sqre, double[] d, int offsetd, org.netlib.util.doubleW alpha, org.netlib.util.doubleW beta, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int ldvt, int[] idxq, int offsetidxq, int[] iwork, int offsetiwork, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dlasd1.dlasd1(nl, nr, sqre, d, offsetd, alpha, beta, u, offsetu, ldu, vt, offsetvt, ldvt, idxq, offsetidxq, iwork, offsetiwork, work, offsetwork, info); } - protected void dlasd2K(int nl, int nr, int sqre, org.netlib.util.intW k, double[] d, int _d_offset, double[] z, int _z_offset, double alpha, double beta, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, double[] dsigma, int _dsigma_offset, double[] u2, int _u2_offset, int ldu2, double[] vt2, int _vt2_offset, int ldvt2, int[] idxp, int _idxp_offset, int[] idx, int _idx_offset, int[] idxc, int _idxc_offset, int[] idxq, int _idxq_offset, int[] coltyp, int _coltyp_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlasd2.dlasd2(nl, nr, sqre, k, d, _d_offset, z, _z_offset, alpha, beta, u, _u_offset, ldu, vt, _vt_offset, ldvt, dsigma, _dsigma_offset, u2, _u2_offset, ldu2, vt2, _vt2_offset, ldvt2, idxp, _idxp_offset, idx, _idx_offset, idxc, _idxc_offset, idxq, _idxq_offset, coltyp, _coltyp_offset, info); + protected void dlasd2K(int nl, int nr, int sqre, org.netlib.util.intW k, double[] d, int offsetd, double[] z, int offsetz, double alpha, double beta, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int ldvt, double[] dsigma, int offsetdsigma, double[] u2, int offsetu2, int ldu2, double[] vt2, int offsetvt2, int ldvt2, int[] idxp, int offsetidxp, int[] idx, int offsetidx, int[] idxc, int offsetidxc, int[] idxq, int offsetidxq, int[] coltyp, int offsetcoltyp, org.netlib.util.intW info) { + org.netlib.lapack.Dlasd2.dlasd2(nl, nr, sqre, k, d, offsetd, z, offsetz, alpha, beta, u, offsetu, ldu, vt, offsetvt, ldvt, dsigma, offsetdsigma, u2, offsetu2, ldu2, vt2, offsetvt2, ldvt2, idxp, offsetidxp, idx, offsetidx, idxc, offsetidxc, idxq, offsetidxq, coltyp, offsetcoltyp, info); } - protected void dlasd3K(int nl, int nr, int sqre, int k, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, double[] dsigma, int _dsigma_offset, double[] u, int _u_offset, int ldu, double[] u2, int _u2_offset, int ldu2, double[] vt, int _vt_offset, int ldvt, double[] vt2, int _vt2_offset, int ldvt2, int[] idxc, int _idxc_offset, int[] ctot, int _ctot_offset, double[] z, int _z_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlasd3.dlasd3(nl, nr, sqre, k, d, _d_offset, q, _q_offset, ldq, dsigma, _dsigma_offset, u, _u_offset, ldu, u2, _u2_offset, ldu2, vt, _vt_offset, ldvt, vt2, _vt2_offset, ldvt2, idxc, _idxc_offset, ctot, _ctot_offset, z, _z_offset, info); + protected void dlasd3K(int nl, int nr, int sqre, int k, double[] d, int offsetd, double[] q, int offsetq, int ldq, double[] dsigma, int offsetdsigma, double[] u, int offsetu, int ldu, double[] u2, int offsetu2, int ldu2, double[] vt, int offsetvt, int ldvt, double[] vt2, int offsetvt2, int ldvt2, int[] idxc, int offsetidxc, int[] ctot, int offsetctot, double[] z, int offsetz, org.netlib.util.intW info) { + org.netlib.lapack.Dlasd3.dlasd3(nl, nr, sqre, k, d, offsetd, q, offsetq, ldq, dsigma, offsetdsigma, u, offsetu, ldu, u2, offsetu2, ldu2, vt, offsetvt, ldvt, vt2, offsetvt2, ldvt2, idxc, offsetidxc, ctot, offsetctot, z, offsetz, info); } - protected void dlasd4K(int n, int i, double[] d, int _d_offset, double[] z, int _z_offset, double[] delta, int _delta_offset, double rho, org.netlib.util.doubleW sigma, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlasd4.dlasd4(n, i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, sigma, work, _work_offset, info); + protected void dlasd4K(int n, int i, double[] d, int offsetd, double[] z, int offsetz, double[] delta, int offsetdelta, double rho, org.netlib.util.doubleW sigma, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dlasd4.dlasd4(n, i, d, offsetd, z, offsetz, delta, offsetdelta, rho, sigma, work, offsetwork, info); } - protected void dlasd5K(int i, double[] d, int _d_offset, double[] z, int _z_offset, double[] delta, int _delta_offset, double rho, org.netlib.util.doubleW dsigma, double[] work, int _work_offset) { - org.netlib.lapack.Dlasd5.dlasd5(i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, dsigma, work, _work_offset); + protected void dlasd5K(int i, double[] d, int offsetd, double[] z, int offsetz, double[] delta, int offsetdelta, double rho, org.netlib.util.doubleW dsigma, double[] work, int offsetwork) { + org.netlib.lapack.Dlasd5.dlasd5(i, d, offsetd, z, offsetz, delta, offsetdelta, rho, dsigma, work, offsetwork); } - protected void dlasd6K(int icompq, int nl, int nr, int sqre, double[] d, int _d_offset, double[] vf, int _vf_offset, double[] vl, int _vl_offset, org.netlib.util.doubleW alpha, org.netlib.util.doubleW beta, int[] idxq, int _idxq_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, int ldgcol, double[] givnum, int _givnum_offset, int ldgnum, double[] poles, int _poles_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, double[] z, int _z_offset, org.netlib.util.intW k, org.netlib.util.doubleW c, org.netlib.util.doubleW s, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlasd6.dlasd6(icompq, nl, nr, sqre, d, _d_offset, vf, _vf_offset, vl, _vl_offset, alpha, beta, idxq, _idxq_offset, perm, _perm_offset, givptr, givcol, _givcol_offset, ldgcol, givnum, _givnum_offset, ldgnum, poles, _poles_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, k, c, s, work, _work_offset, iwork, _iwork_offset, info); + protected void dlasd6K(int icompq, int nl, int nr, int sqre, double[] d, int offsetd, double[] vf, int offsetvf, double[] vl, int offsetvl, org.netlib.util.doubleW alpha, org.netlib.util.doubleW beta, int[] idxq, int offsetidxq, int[] perm, int offsetperm, org.netlib.util.intW givptr, int[] givcol, int offsetgivcol, int ldgcol, double[] givnum, int offsetgivnum, int ldgnum, double[] poles, int offsetpoles, double[] difl, int offsetdifl, double[] difr, int offsetdifr, double[] z, int offsetz, org.netlib.util.intW k, org.netlib.util.doubleW c, org.netlib.util.doubleW s, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dlasd6.dlasd6(icompq, nl, nr, sqre, d, offsetd, vf, offsetvf, vl, offsetvl, alpha, beta, idxq, offsetidxq, perm, offsetperm, givptr, givcol, offsetgivcol, ldgcol, givnum, offsetgivnum, ldgnum, poles, offsetpoles, difl, offsetdifl, difr, offsetdifr, z, offsetz, k, c, s, work, offsetwork, iwork, offsetiwork, info); } - protected void dlasd7K(int icompq, int nl, int nr, int sqre, org.netlib.util.intW k, double[] d, int _d_offset, double[] z, int _z_offset, double[] zw, int _zw_offset, double[] vf, int _vf_offset, double[] vfw, int _vfw_offset, double[] vl, int _vl_offset, double[] vlw, int _vlw_offset, double alpha, double beta, double[] dsigma, int _dsigma_offset, int[] idx, int _idx_offset, int[] idxp, int _idxp_offset, int[] idxq, int _idxq_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, int ldgcol, double[] givnum, int _givnum_offset, int ldgnum, org.netlib.util.doubleW c, org.netlib.util.doubleW s, org.netlib.util.intW info) { - org.netlib.lapack.Dlasd7.dlasd7(icompq, nl, nr, sqre, k, d, _d_offset, z, _z_offset, zw, _zw_offset, vf, _vf_offset, vfw, _vfw_offset, vl, _vl_offset, vlw, _vlw_offset, alpha, beta, dsigma, _dsigma_offset, idx, _idx_offset, idxp, _idxp_offset, idxq, _idxq_offset, perm, _perm_offset, givptr, givcol, _givcol_offset, ldgcol, givnum, _givnum_offset, ldgnum, c, s, info); + protected void dlasd7K(int icompq, int nl, int nr, int sqre, org.netlib.util.intW k, double[] d, int offsetd, double[] z, int offsetz, double[] zw, int offsetzw, double[] vf, int offsetvf, double[] vfw, int offsetvfw, double[] vl, int offsetvl, double[] vlw, int offsetvlw, double alpha, double beta, double[] dsigma, int offsetdsigma, int[] idx, int offsetidx, int[] idxp, int offsetidxp, int[] idxq, int offsetidxq, int[] perm, int offsetperm, org.netlib.util.intW givptr, int[] givcol, int offsetgivcol, int ldgcol, double[] givnum, int offsetgivnum, int ldgnum, org.netlib.util.doubleW c, org.netlib.util.doubleW s, org.netlib.util.intW info) { + org.netlib.lapack.Dlasd7.dlasd7(icompq, nl, nr, sqre, k, d, offsetd, z, offsetz, zw, offsetzw, vf, offsetvf, vfw, offsetvfw, vl, offsetvl, vlw, offsetvlw, alpha, beta, dsigma, offsetdsigma, idx, offsetidx, idxp, offsetidxp, idxq, offsetidxq, perm, offsetperm, givptr, givcol, offsetgivcol, ldgcol, givnum, offsetgivnum, ldgnum, c, s, info); } - protected void dlasd8K(int icompq, int k, double[] d, int _d_offset, double[] z, int _z_offset, double[] vf, int _vf_offset, double[] vl, int _vl_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, int lddifr, double[] dsigma, int _dsigma_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlasd8.dlasd8(icompq, k, d, _d_offset, z, _z_offset, vf, _vf_offset, vl, _vl_offset, difl, _difl_offset, difr, _difr_offset, lddifr, dsigma, _dsigma_offset, work, _work_offset, info); + protected void dlasd8K(int icompq, int k, double[] d, int offsetd, double[] z, int offsetz, double[] vf, int offsetvf, double[] vl, int offsetvl, double[] difl, int offsetdifl, double[] difr, int offsetdifr, int lddifr, double[] dsigma, int offsetdsigma, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dlasd8.dlasd8(icompq, k, d, offsetd, z, offsetz, vf, offsetvf, vl, offsetvl, difl, offsetdifl, difr, offsetdifr, lddifr, dsigma, offsetdsigma, work, offsetwork, info); } - protected void dlasdaK(int icompq, int smlsiz, int n, int sqre, double[] d, int _d_offset, double[] e, int _e_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int[] k, int _k_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, double[] z, int _z_offset, double[] poles, int _poles_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, int ldgcol, int[] perm, int _perm_offset, double[] givnum, int _givnum_offset, double[] c, int _c_offset, double[] s, int _s_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlasda.dlasda(icompq, smlsiz, n, sqre, d, _d_offset, e, _e_offset, u, _u_offset, ldu, vt, _vt_offset, k, _k_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, poles, _poles_offset, givptr, _givptr_offset, givcol, _givcol_offset, ldgcol, perm, _perm_offset, givnum, _givnum_offset, c, _c_offset, s, _s_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void dlasdaK(int icompq, int smlsiz, int n, int sqre, double[] d, int offsetd, double[] e, int offsete, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int[] k, int offsetk, double[] difl, int offsetdifl, double[] difr, int offsetdifr, double[] z, int offsetz, double[] poles, int offsetpoles, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, int ldgcol, int[] perm, int offsetperm, double[] givnum, int offsetgivnum, double[] c, int offsetc, double[] s, int offsets, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dlasda.dlasda(icompq, smlsiz, n, sqre, d, offsetd, e, offsete, u, offsetu, ldu, vt, offsetvt, k, offsetk, difl, offsetdifl, difr, offsetdifr, z, offsetz, poles, offsetpoles, givptr, offsetgivptr, givcol, offsetgivcol, ldgcol, perm, offsetperm, givnum, offsetgivnum, c, offsetc, s, offsets, work, offsetwork, iwork, offsetiwork, info); } - protected void dlasdqK(String uplo, int sqre, int n, int ncvt, int nru, int ncc, double[] d, int _d_offset, double[] e, int _e_offset, double[] vt, int _vt_offset, int ldvt, double[] u, int _u_offset, int ldu, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlasdq.dlasdq(uplo, sqre, n, ncvt, nru, ncc, d, _d_offset, e, _e_offset, vt, _vt_offset, ldvt, u, _u_offset, ldu, c, _c_offset, Ldc, work, _work_offset, info); + protected void dlasdqK(String uplo, int sqre, int n, int ncvt, int nru, int ncc, double[] d, int offsetd, double[] e, int offsete, double[] vt, int offsetvt, int ldvt, double[] u, int offsetu, int ldu, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dlasdq.dlasdq(uplo, sqre, n, ncvt, nru, ncc, d, offsetd, e, offsete, vt, offsetvt, ldvt, u, offsetu, ldu, c, offsetc, Ldc, work, offsetwork, info); } - protected void dlasdtK(int n, org.netlib.util.intW lvl, org.netlib.util.intW nd, int[] inode, int _inode_offset, int[] ndiml, int _ndiml_offset, int[] ndimr, int _ndimr_offset, int msub) { - org.netlib.lapack.Dlasdt.dlasdt(n, lvl, nd, inode, _inode_offset, ndiml, _ndiml_offset, ndimr, _ndimr_offset, msub); + protected void dlasdtK(int n, org.netlib.util.intW lvl, org.netlib.util.intW nd, int[] inode, int offsetinode, int[] ndiml, int offsetndiml, int[] ndimr, int offsetndimr, int msub) { + org.netlib.lapack.Dlasdt.dlasdt(n, lvl, nd, inode, offsetinode, ndiml, offsetndiml, ndimr, offsetndimr, msub); } - protected void dlasetK(String uplo, int m, int n, double alpha, double beta, double[] a, int _a_offset, int lda) { - org.netlib.lapack.Dlaset.dlaset(uplo, m, n, alpha, beta, a, _a_offset, lda); + protected void dlasetK(String uplo, int m, int n, double alpha, double beta, double[] a, int offseta, int lda) { + org.netlib.lapack.Dlaset.dlaset(uplo, m, n, alpha, beta, a, offseta, lda); } - protected void dlasq1K(int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlasq1.dlasq1(n, d, _d_offset, e, _e_offset, work, _work_offset, info); + protected void dlasq1K(int n, double[] d, int offsetd, double[] e, int offsete, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dlasq1.dlasq1(n, d, offsetd, e, offsete, work, offsetwork, info); } - protected void dlasq2K(int n, double[] z, int _z_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlasq2.dlasq2(n, z, _z_offset, info); + protected void dlasq2K(int n, double[] z, int offsetz, org.netlib.util.intW info) { + org.netlib.lapack.Dlasq2.dlasq2(n, z, offsetz, info); } - protected void dlasq3K(int i0, org.netlib.util.intW n0, double[] z, int _z_offset, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW sigma, org.netlib.util.doubleW desig, org.netlib.util.doubleW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee) { - org.netlib.lapack.Dlasq3.dlasq3(i0, n0, z, _z_offset, pp, dmin, sigma, desig, qmax, nfail, iter, ndiv, ieee); + protected void dlasq3K(int i0, org.netlib.util.intW n0, double[] z, int offsetz, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW sigma, org.netlib.util.doubleW desig, org.netlib.util.doubleW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee) { + org.netlib.lapack.Dlasq3.dlasq3(i0, n0, z, offsetz, pp, dmin, sigma, desig, qmax, nfail, iter, ndiv, ieee); } - protected void dlasq4K(int i0, int n0, double[] z, int _z_offset, int pp, int n0in, double dmin, double dmin1, double dmin2, double dn, double dn1, double dn2, org.netlib.util.doubleW tau, org.netlib.util.intW ttype) { - org.netlib.lapack.Dlasq4.dlasq4(i0, n0, z, _z_offset, pp, n0in, dmin, dmin1, dmin2, dn, dn1, dn2, tau, ttype); + protected void dlasq4K(int i0, int n0, double[] z, int offsetz, int pp, int n0in, double dmin, double dmin1, double dmin2, double dn, double dn1, double dn2, org.netlib.util.doubleW tau, org.netlib.util.intW ttype) { + org.netlib.lapack.Dlasq4.dlasq4(i0, n0, z, offsetz, pp, n0in, dmin, dmin1, dmin2, dn, dn1, dn2, tau, ttype); } - protected void dlasq5K(int i0, int n0, double[] z, int _z_offset, int pp, double tau, org.netlib.util.doubleW dmin, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dnm1, org.netlib.util.doubleW dnm2, boolean ieee) { - org.netlib.lapack.Dlasq5.dlasq5(i0, n0, z, _z_offset, pp, tau, dmin, dmin1, dmin2, dn, dnm1, dnm2, ieee); + protected void dlasq5K(int i0, int n0, double[] z, int offsetz, int pp, double tau, org.netlib.util.doubleW dmin, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dnm1, org.netlib.util.doubleW dnm2, boolean ieee) { + org.netlib.lapack.Dlasq5.dlasq5(i0, n0, z, offsetz, pp, tau, dmin, dmin1, dmin2, dn, dnm1, dnm2, ieee); } - protected void dlasq6K(int i0, int n0, double[] z, int _z_offset, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dnm1, org.netlib.util.doubleW dnm2) { - org.netlib.lapack.Dlasq6.dlasq6(i0, n0, z, _z_offset, pp, dmin, dmin1, dmin2, dn, dnm1, dnm2); + protected void dlasq6K(int i0, int n0, double[] z, int offsetz, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dnm1, org.netlib.util.doubleW dnm2) { + org.netlib.lapack.Dlasq6.dlasq6(i0, n0, z, offsetz, pp, dmin, dmin1, dmin2, dn, dnm1, dnm2); } - protected void dlasrK(String side, String pivot, String direct, int m, int n, double[] c, int _c_offset, double[] s, int _s_offset, double[] a, int _a_offset, int lda) { - org.netlib.lapack.Dlasr.dlasr(side, pivot, direct, m, n, c, _c_offset, s, _s_offset, a, _a_offset, lda); + protected void dlasrK(String side, String pivot, String direct, int m, int n, double[] c, int offsetc, double[] s, int offsets, double[] a, int offseta, int lda) { + org.netlib.lapack.Dlasr.dlasr(side, pivot, direct, m, n, c, offsetc, s, offsets, a, offseta, lda); } - protected void dlasrtK(String id, int n, double[] d, int _d_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlasrt.dlasrt(id, n, d, _d_offset, info); + protected void dlasrtK(String id, int n, double[] d, int offsetd, org.netlib.util.intW info) { + org.netlib.lapack.Dlasrt.dlasrt(id, n, d, offsetd, info); } - protected void dlassqK(int n, double[] x, int _x_offset, int incx, org.netlib.util.doubleW scale, org.netlib.util.doubleW sumsq) { - org.netlib.lapack.Dlassq.dlassq(n, x, _x_offset, incx, scale, sumsq); + protected void dlassqK(int n, double[] x, int offsetx, int incx, org.netlib.util.doubleW scale, org.netlib.util.doubleW sumsq) { + org.netlib.lapack.Dlassq.dlassq(n, x, offsetx, incx, scale, sumsq); } protected void dlasv2K(double f, double g, double h, org.netlib.util.doubleW ssmin, org.netlib.util.doubleW ssmax, org.netlib.util.doubleW snr, org.netlib.util.doubleW csr, org.netlib.util.doubleW snl, org.netlib.util.doubleW csl) { org.netlib.lapack.Dlasv2.dlasv2(f, g, h, ssmin, ssmax, snr, csr, snl, csl); } - protected void dlaswpK(int n, double[] a, int _a_offset, int lda, int k1, int k2, int[] ipiv, int _ipiv_offset, int incx) { - org.netlib.lapack.Dlaswp.dlaswp(n, a, _a_offset, lda, k1, k2, ipiv, _ipiv_offset, incx); + protected void dlaswpK(int n, double[] a, int offseta, int lda, int k1, int k2, int[] ipiv, int offsetipiv, int incx) { + org.netlib.lapack.Dlaswp.dlaswp(n, a, offseta, lda, k1, k2, ipiv, offsetipiv, incx); } - protected void dlasy2K(boolean ltranl, boolean ltranr, int isgn, int n1, int n2, double[] tl, int _tl_offset, int ldtl, double[] tr, int _tr_offset, int ldtr, double[] b, int _b_offset, int ldb, org.netlib.util.doubleW scale, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW xnorm, org.netlib.util.intW info) { - org.netlib.lapack.Dlasy2.dlasy2(ltranl, ltranr, isgn, n1, n2, tl, _tl_offset, ldtl, tr, _tr_offset, ldtr, b, _b_offset, ldb, scale, x, _x_offset, ldx, xnorm, info); + protected void dlasy2K(boolean ltranl, boolean ltranr, int isgn, int n1, int n2, double[] tl, int offsettl, int ldtl, double[] tr, int offsettr, int ldtr, double[] b, int offsetb, int ldb, org.netlib.util.doubleW scale, double[] x, int offsetx, int ldx, org.netlib.util.doubleW xnorm, org.netlib.util.intW info) { + org.netlib.lapack.Dlasy2.dlasy2(ltranl, ltranr, isgn, n1, n2, tl, offsettl, ldtl, tr, offsettr, ldtr, b, offsetb, ldb, scale, x, offsetx, ldx, xnorm, info); } - protected void dlasyfK(String uplo, int n, int nb, org.netlib.util.intW kb, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] w, int _w_offset, int ldw, org.netlib.util.intW info) { - org.netlib.lapack.Dlasyf.dlasyf(uplo, n, nb, kb, a, _a_offset, lda, ipiv, _ipiv_offset, w, _w_offset, ldw, info); + protected void dlasyfK(String uplo, int n, int nb, org.netlib.util.intW kb, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] w, int offsetw, int ldw, org.netlib.util.intW info) { + org.netlib.lapack.Dlasyf.dlasyf(uplo, n, nb, kb, a, offseta, lda, ipiv, offsetipiv, w, offsetw, ldw, info); } - protected void dlatbsK(String uplo, String trans, String diag, String normin, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] x, int _x_offset, org.netlib.util.doubleW scale, double[] cnorm, int _cnorm_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlatbs.dlatbs(uplo, trans, diag, normin, n, kd, ab, _ab_offset, ldab, x, _x_offset, scale, cnorm, _cnorm_offset, info); + protected void dlatbsK(String uplo, String trans, String diag, String normin, int n, int kd, double[] ab, int offsetab, int ldab, double[] x, int offsetx, org.netlib.util.doubleW scale, double[] cnorm, int offsetcnorm, org.netlib.util.intW info) { + org.netlib.lapack.Dlatbs.dlatbs(uplo, trans, diag, normin, n, kd, ab, offsetab, ldab, x, offsetx, scale, cnorm, offsetcnorm, info); } - protected void dlatdfK(int ijob, int n, double[] z, int _z_offset, int ldz, double[] rhs, int _rhs_offset, org.netlib.util.doubleW rdsum, org.netlib.util.doubleW rdscal, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset) { - org.netlib.lapack.Dlatdf.dlatdf(ijob, n, z, _z_offset, ldz, rhs, _rhs_offset, rdsum, rdscal, ipiv, _ipiv_offset, jpiv, _jpiv_offset); + protected void dlatdfK(int ijob, int n, double[] z, int offsetz, int ldz, double[] rhs, int offsetrhs, org.netlib.util.doubleW rdsum, org.netlib.util.doubleW rdscal, int[] ipiv, int offsetipiv, int[] jpiv, int offsetjpiv) { + org.netlib.lapack.Dlatdf.dlatdf(ijob, n, z, offsetz, ldz, rhs, offsetrhs, rdsum, rdscal, ipiv, offsetipiv, jpiv, offsetjpiv); } - protected void dlatpsK(String uplo, String trans, String diag, String normin, int n, double[] ap, int _ap_offset, double[] x, int _x_offset, org.netlib.util.doubleW scale, double[] cnorm, int _cnorm_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlatps.dlatps(uplo, trans, diag, normin, n, ap, _ap_offset, x, _x_offset, scale, cnorm, _cnorm_offset, info); + protected void dlatpsK(String uplo, String trans, String diag, String normin, int n, double[] ap, int offsetap, double[] x, int offsetx, org.netlib.util.doubleW scale, double[] cnorm, int offsetcnorm, org.netlib.util.intW info) { + org.netlib.lapack.Dlatps.dlatps(uplo, trans, diag, normin, n, ap, offsetap, x, offsetx, scale, cnorm, offsetcnorm, info); } - protected void dlatrdK(String uplo, int n, int nb, double[] a, int _a_offset, int lda, double[] e, int _e_offset, double[] tau, int _tau_offset, double[] w, int _w_offset, int ldw) { - org.netlib.lapack.Dlatrd.dlatrd(uplo, n, nb, a, _a_offset, lda, e, _e_offset, tau, _tau_offset, w, _w_offset, ldw); + protected void dlatrdK(String uplo, int n, int nb, double[] a, int offseta, int lda, double[] e, int offsete, double[] tau, int offsettau, double[] w, int offsetw, int ldw) { + org.netlib.lapack.Dlatrd.dlatrd(uplo, n, nb, a, offseta, lda, e, offsete, tau, offsettau, w, offsetw, ldw); } - protected void dlatrsK(String uplo, String trans, String diag, String normin, int n, double[] a, int _a_offset, int lda, double[] x, int _x_offset, org.netlib.util.doubleW scale, double[] cnorm, int _cnorm_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dlatrs.dlatrs(uplo, trans, diag, normin, n, a, _a_offset, lda, x, _x_offset, scale, cnorm, _cnorm_offset, info); + protected void dlatrsK(String uplo, String trans, String diag, String normin, int n, double[] a, int offseta, int lda, double[] x, int offsetx, org.netlib.util.doubleW scale, double[] cnorm, int offsetcnorm, org.netlib.util.intW info) { + org.netlib.lapack.Dlatrs.dlatrs(uplo, trans, diag, normin, n, a, offseta, lda, x, offsetx, scale, cnorm, offsetcnorm, info); } - protected void dlatrzK(int m, int n, int l, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset) { - org.netlib.lapack.Dlatrz.dlatrz(m, n, l, a, _a_offset, lda, tau, _tau_offset, work, _work_offset); + protected void dlatrzK(int m, int n, int l, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork) { + org.netlib.lapack.Dlatrz.dlatrz(m, n, l, a, offseta, lda, tau, offsettau, work, offsetwork); } - protected void dlatzmK(String side, int m, int n, double[] v, int _v_offset, int incv, double tau, double[] c1, int _c1_offset, double[] c2, int _c2_offset, int Ldc, double[] work, int _work_offset) { - org.netlib.lapack.Dlatzm.dlatzm(side, m, n, v, _v_offset, incv, tau, c1, _c1_offset, c2, _c2_offset, Ldc, work, _work_offset); + protected void dlatzmK(String side, int m, int n, double[] v, int offsetv, int incv, double tau, double[] c1, int offsetc1, double[] c2, int offsetc2, int Ldc, double[] work, int offsetwork) { + org.netlib.lapack.Dlatzm.dlatzm(side, m, n, v, offsetv, incv, tau, c1, offsetc1, c2, offsetc2, Ldc, work, offsetwork); } - protected void dlauu2K(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info) { - org.netlib.lapack.Dlauu2.dlauu2(uplo, n, a, _a_offset, lda, info); + protected void dlauu2K(String uplo, int n, double[] a, int offseta, int lda, org.netlib.util.intW info) { + org.netlib.lapack.Dlauu2.dlauu2(uplo, n, a, offseta, lda, info); } - protected void dlauumK(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info) { - org.netlib.lapack.Dlauum.dlauum(uplo, n, a, _a_offset, lda, info); + protected void dlauumK(String uplo, int n, double[] a, int offseta, int lda, org.netlib.util.intW info) { + org.netlib.lapack.Dlauum.dlauum(uplo, n, a, offseta, lda, info); } - protected void dlazq3K(int i0, org.netlib.util.intW n0, double[] z, int _z_offset, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW sigma, org.netlib.util.doubleW desig, org.netlib.util.doubleW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee, org.netlib.util.intW ttype, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dn1, org.netlib.util.doubleW dn2, org.netlib.util.doubleW tau) { - org.netlib.lapack.Dlazq3.dlazq3(i0, n0, z, _z_offset, pp, dmin, sigma, desig, qmax, nfail, iter, ndiv, ieee, ttype, dmin1, dmin2, dn, dn1, dn2, tau); + protected void dlazq3K(int i0, org.netlib.util.intW n0, double[] z, int offsetz, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW sigma, org.netlib.util.doubleW desig, org.netlib.util.doubleW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee, org.netlib.util.intW ttype, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dn1, org.netlib.util.doubleW dn2, org.netlib.util.doubleW tau) { + org.netlib.lapack.Dlazq3.dlazq3(i0, n0, z, offsetz, pp, dmin, sigma, desig, qmax, nfail, iter, ndiv, ieee, ttype, dmin1, dmin2, dn, dn1, dn2, tau); } - protected void dlazq4K(int i0, int n0, double[] z, int _z_offset, int pp, int n0in, double dmin, double dmin1, double dmin2, double dn, double dn1, double dn2, org.netlib.util.doubleW tau, org.netlib.util.intW ttype, org.netlib.util.doubleW g) { - org.netlib.lapack.Dlazq4.dlazq4(i0, n0, z, _z_offset, pp, n0in, dmin, dmin1, dmin2, dn, dn1, dn2, tau, ttype, g); + protected void dlazq4K(int i0, int n0, double[] z, int offsetz, int pp, int n0in, double dmin, double dmin1, double dmin2, double dn, double dn1, double dn2, org.netlib.util.doubleW tau, org.netlib.util.intW ttype, org.netlib.util.doubleW g) { + org.netlib.lapack.Dlazq4.dlazq4(i0, n0, z, offsetz, pp, n0in, dmin, dmin1, dmin2, dn, dn1, dn2, tau, ttype, g); } - protected void dopgtrK(String uplo, int n, double[] ap, int _ap_offset, double[] tau, int _tau_offset, double[] q, int _q_offset, int ldq, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dopgtr.dopgtr(uplo, n, ap, _ap_offset, tau, _tau_offset, q, _q_offset, ldq, work, _work_offset, info); + protected void dopgtrK(String uplo, int n, double[] ap, int offsetap, double[] tau, int offsettau, double[] q, int offsetq, int ldq, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dopgtr.dopgtr(uplo, n, ap, offsetap, tau, offsettau, q, offsetq, ldq, work, offsetwork, info); } - protected void dopmtrK(String side, String uplo, String trans, int m, int n, double[] ap, int _ap_offset, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dopmtr.dopmtr(side, uplo, trans, m, n, ap, _ap_offset, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + protected void dopmtrK(String side, String uplo, String trans, int m, int n, double[] ap, int offsetap, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dopmtr.dopmtr(side, uplo, trans, m, n, ap, offsetap, tau, offsettau, c, offsetc, Ldc, work, offsetwork, info); } - protected void dorg2lK(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dorg2l.dorg2l(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + protected void dorg2lK(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dorg2l.dorg2l(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected void dorg2rK(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dorg2r.dorg2r(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + protected void dorg2rK(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dorg2r.dorg2r(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected void dorgbrK(String vect, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dorgbr.dorgbr(vect, m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + protected void dorgbrK(String vect, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dorgbr.dorgbr(vect, m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected void dorghrK(int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dorghr.dorghr(n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + protected void dorghrK(int n, int ilo, int ihi, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dorghr.dorghr(n, ilo, ihi, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected void dorgl2K(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dorgl2.dorgl2(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + protected void dorgl2K(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dorgl2.dorgl2(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected void dorglqK(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dorglq.dorglq(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + protected void dorglqK(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dorglq.dorglq(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected void dorgqlK(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dorgql.dorgql(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + protected void dorgqlK(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dorgql.dorgql(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected void dorgqrK(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dorgqr.dorgqr(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + protected void dorgqrK(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dorgqr.dorgqr(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected void dorgr2K(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dorgr2.dorgr2(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + protected void dorgr2K(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dorgr2.dorgr2(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected void dorgrqK(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dorgrq.dorgrq(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + protected void dorgrqK(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dorgrq.dorgrq(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected void dorgtrK(String uplo, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dorgtr.dorgtr(uplo, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + protected void dorgtrK(String uplo, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dorgtr.dorgtr(uplo, n, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected void dorm2lK(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dorm2l.dorm2l(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + protected void dorm2lK(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dorm2l.dorm2l(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, info); } - protected void dorm2rK(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dorm2r.dorm2r(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + protected void dorm2rK(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dorm2r.dorm2r(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, info); } - protected void dormbrK(String vect, String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dormbr.dormbr(vect, side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + protected void dormbrK(String vect, String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dormbr.dormbr(vect, side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected void dormhrK(String side, String trans, int m, int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dormhr.dormhr(side, trans, m, n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + protected void dormhrK(String side, String trans, int m, int n, int ilo, int ihi, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dormhr.dormhr(side, trans, m, n, ilo, ihi, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected void dorml2K(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dorml2.dorml2(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + protected void dorml2K(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dorml2.dorml2(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, info); } - protected void dormlqK(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dormlq.dormlq(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + protected void dormlqK(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dormlq.dormlq(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected void dormqlK(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dormql.dormql(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + protected void dormqlK(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dormql.dormql(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected void dormqrK(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dormqr.dormqr(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + protected void dormqrK(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dormqr.dormqr(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected void dormr2K(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dormr2.dormr2(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + protected void dormr2K(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dormr2.dormr2(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, info); } - protected void dormr3K(String side, String trans, int m, int n, int k, int l, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dormr3.dormr3(side, trans, m, n, k, l, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + protected void dormr3K(String side, String trans, int m, int n, int k, int l, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dormr3.dormr3(side, trans, m, n, k, l, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, info); } - protected void dormrqK(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dormrq.dormrq(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + protected void dormrqK(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dormrq.dormrq(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected void dormrzK(String side, String trans, int m, int n, int k, int l, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dormrz.dormrz(side, trans, m, n, k, l, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + protected void dormrzK(String side, String trans, int m, int n, int k, int l, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dormrz.dormrz(side, trans, m, n, k, l, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected void dormtrK(String side, String uplo, String trans, int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dormtr.dormtr(side, uplo, trans, m, n, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + protected void dormtrK(String side, String uplo, String trans, int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dormtr.dormtr(side, uplo, trans, m, n, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected void dpbconK(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dpbcon.dpbcon(uplo, n, kd, ab, _ab_offset, ldab, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + protected void dpbconK(String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dpbcon.dpbcon(uplo, n, kd, ab, offsetab, ldab, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected void dpbequK(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] s, int _s_offset, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info) { - org.netlib.lapack.Dpbequ.dpbequ(uplo, n, kd, ab, _ab_offset, ldab, s, _s_offset, scond, amax, info); + protected void dpbequK(String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double[] s, int offsets, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info) { + org.netlib.lapack.Dpbequ.dpbequ(uplo, n, kd, ab, offsetab, ldab, s, offsets, scond, amax, info); } - protected void dpbrfsK(String uplo, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] afb, int _afb_offset, int ldafb, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dpbrfs.dpbrfs(uplo, n, kd, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void dpbrfsK(String uplo, int n, int kd, int nrhs, double[] ab, int offsetab, int ldab, double[] afb, int offsetafb, int ldafb, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dpbrfs.dpbrfs(uplo, n, kd, nrhs, ab, offsetab, ldab, afb, offsetafb, ldafb, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void dpbstfK(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, org.netlib.util.intW info) { - org.netlib.lapack.Dpbstf.dpbstf(uplo, n, kd, ab, _ab_offset, ldab, info); + protected void dpbstfK(String uplo, int n, int kd, double[] ab, int offsetab, int ldab, org.netlib.util.intW info) { + org.netlib.lapack.Dpbstf.dpbstf(uplo, n, kd, ab, offsetab, ldab, info); } - protected void dpbsvK(String uplo, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Dpbsv.dpbsv(uplo, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, info); + protected void dpbsvK(String uplo, int n, int kd, int nrhs, double[] ab, int offsetab, int ldab, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Dpbsv.dpbsv(uplo, n, kd, nrhs, ab, offsetab, ldab, b, offsetb, ldb, info); } - protected void dpbsvxK(String fact, String uplo, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] afb, int _afb_offset, int ldafb, org.netlib.util.StringW equed, double[] s, int _s_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dpbsvx.dpbsvx(fact, uplo, n, kd, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, equed, s, _s_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void dpbsvxK(String fact, String uplo, int n, int kd, int nrhs, double[] ab, int offsetab, int ldab, double[] afb, int offsetafb, int ldafb, org.netlib.util.StringW equed, double[] s, int offsets, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dpbsvx.dpbsvx(fact, uplo, n, kd, nrhs, ab, offsetab, ldab, afb, offsetafb, ldafb, equed, s, offsets, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void dpbtf2K(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, org.netlib.util.intW info) { - org.netlib.lapack.Dpbtf2.dpbtf2(uplo, n, kd, ab, _ab_offset, ldab, info); + protected void dpbtf2K(String uplo, int n, int kd, double[] ab, int offsetab, int ldab, org.netlib.util.intW info) { + org.netlib.lapack.Dpbtf2.dpbtf2(uplo, n, kd, ab, offsetab, ldab, info); } - protected void dpbtrfK(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, org.netlib.util.intW info) { - org.netlib.lapack.Dpbtrf.dpbtrf(uplo, n, kd, ab, _ab_offset, ldab, info); + protected void dpbtrfK(String uplo, int n, int kd, double[] ab, int offsetab, int ldab, org.netlib.util.intW info) { + org.netlib.lapack.Dpbtrf.dpbtrf(uplo, n, kd, ab, offsetab, ldab, info); } - protected void dpbtrsK(String uplo, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Dpbtrs.dpbtrs(uplo, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, info); + protected void dpbtrsK(String uplo, int n, int kd, int nrhs, double[] ab, int offsetab, int ldab, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Dpbtrs.dpbtrs(uplo, n, kd, nrhs, ab, offsetab, ldab, b, offsetb, ldb, info); } - protected void dpoconK(String uplo, int n, double[] a, int _a_offset, int lda, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dpocon.dpocon(uplo, n, a, _a_offset, lda, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + protected void dpoconK(String uplo, int n, double[] a, int offseta, int lda, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dpocon.dpocon(uplo, n, a, offseta, lda, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected void dpoequK(int n, double[] a, int _a_offset, int lda, double[] s, int _s_offset, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info) { - org.netlib.lapack.Dpoequ.dpoequ(n, a, _a_offset, lda, s, _s_offset, scond, amax, info); + protected void dpoequK(int n, double[] a, int offseta, int lda, double[] s, int offsets, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info) { + org.netlib.lapack.Dpoequ.dpoequ(n, a, offseta, lda, s, offsets, scond, amax, info); } - protected void dporfsK(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dporfs.dporfs(uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void dporfsK(String uplo, int n, int nrhs, double[] a, int offseta, int lda, double[] af, int offsetaf, int ldaf, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dporfs.dporfs(uplo, n, nrhs, a, offseta, lda, af, offsetaf, ldaf, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void dposvK(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Dposv.dposv(uplo, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, info); + protected void dposvK(String uplo, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Dposv.dposv(uplo, n, nrhs, a, offseta, lda, b, offsetb, ldb, info); } - protected void dposvxK(String fact, String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, org.netlib.util.StringW equed, double[] s, int _s_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dposvx.dposvx(fact, uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, equed, s, _s_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void dposvxK(String fact, String uplo, int n, int nrhs, double[] a, int offseta, int lda, double[] af, int offsetaf, int ldaf, org.netlib.util.StringW equed, double[] s, int offsets, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dposvx.dposvx(fact, uplo, n, nrhs, a, offseta, lda, af, offsetaf, ldaf, equed, s, offsets, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void dpotf2K(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info) { - org.netlib.lapack.Dpotf2.dpotf2(uplo, n, a, _a_offset, lda, info); + protected void dpotf2K(String uplo, int n, double[] a, int offseta, int lda, org.netlib.util.intW info) { + org.netlib.lapack.Dpotf2.dpotf2(uplo, n, a, offseta, lda, info); } - protected void dpotrfK(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info) { - org.netlib.lapack.Dpotrf.dpotrf(uplo, n, a, _a_offset, lda, info); + protected void dpotrfK(String uplo, int n, double[] a, int offseta, int lda, org.netlib.util.intW info) { + org.netlib.lapack.Dpotrf.dpotrf(uplo, n, a, offseta, lda, info); } - protected void dpotriK(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info) { - org.netlib.lapack.Dpotri.dpotri(uplo, n, a, _a_offset, lda, info); + protected void dpotriK(String uplo, int n, double[] a, int offseta, int lda, org.netlib.util.intW info) { + org.netlib.lapack.Dpotri.dpotri(uplo, n, a, offseta, lda, info); } - protected void dpotrsK(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Dpotrs.dpotrs(uplo, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, info); + protected void dpotrsK(String uplo, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Dpotrs.dpotrs(uplo, n, nrhs, a, offseta, lda, b, offsetb, ldb, info); } - protected void dppconK(String uplo, int n, double[] ap, int _ap_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dppcon.dppcon(uplo, n, ap, _ap_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + protected void dppconK(String uplo, int n, double[] ap, int offsetap, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dppcon.dppcon(uplo, n, ap, offsetap, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected void dppequK(String uplo, int n, double[] ap, int _ap_offset, double[] s, int _s_offset, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info) { - org.netlib.lapack.Dppequ.dppequ(uplo, n, ap, _ap_offset, s, _s_offset, scond, amax, info); + protected void dppequK(String uplo, int n, double[] ap, int offsetap, double[] s, int offsets, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info) { + org.netlib.lapack.Dppequ.dppequ(uplo, n, ap, offsetap, s, offsets, scond, amax, info); } - protected void dpprfsK(String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] afp, int _afp_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dpprfs.dpprfs(uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void dpprfsK(String uplo, int n, int nrhs, double[] ap, int offsetap, double[] afp, int offsetafp, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dpprfs.dpprfs(uplo, n, nrhs, ap, offsetap, afp, offsetafp, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void dppsvK(String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Dppsv.dppsv(uplo, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, info); + protected void dppsvK(String uplo, int n, int nrhs, double[] ap, int offsetap, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Dppsv.dppsv(uplo, n, nrhs, ap, offsetap, b, offsetb, ldb, info); } - protected void dppsvxK(String fact, String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] afp, int _afp_offset, org.netlib.util.StringW equed, double[] s, int _s_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dppsvx.dppsvx(fact, uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, equed, s, _s_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void dppsvxK(String fact, String uplo, int n, int nrhs, double[] ap, int offsetap, double[] afp, int offsetafp, org.netlib.util.StringW equed, double[] s, int offsets, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dppsvx.dppsvx(fact, uplo, n, nrhs, ap, offsetap, afp, offsetafp, equed, s, offsets, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void dpptrfK(String uplo, int n, double[] ap, int _ap_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dpptrf.dpptrf(uplo, n, ap, _ap_offset, info); + protected void dpptrfK(String uplo, int n, double[] ap, int offsetap, org.netlib.util.intW info) { + org.netlib.lapack.Dpptrf.dpptrf(uplo, n, ap, offsetap, info); } - protected void dpptriK(String uplo, int n, double[] ap, int _ap_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dpptri.dpptri(uplo, n, ap, _ap_offset, info); + protected void dpptriK(String uplo, int n, double[] ap, int offsetap, org.netlib.util.intW info) { + org.netlib.lapack.Dpptri.dpptri(uplo, n, ap, offsetap, info); } - protected void dpptrsK(String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Dpptrs.dpptrs(uplo, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, info); + protected void dpptrsK(String uplo, int n, int nrhs, double[] ap, int offsetap, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Dpptrs.dpptrs(uplo, n, nrhs, ap, offsetap, b, offsetb, ldb, info); } - protected void dptconK(int n, double[] d, int _d_offset, double[] e, int _e_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dptcon.dptcon(n, d, _d_offset, e, _e_offset, anorm, rcond, work, _work_offset, info); + protected void dptconK(int n, double[] d, int offsetd, double[] e, int offsete, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dptcon.dptcon(n, d, offsetd, e, offsete, anorm, rcond, work, offsetwork, info); } - protected void dpteqrK(String compz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dpteqr.dpteqr(compz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, info); + protected void dpteqrK(String compz, int n, double[] d, int offsetd, double[] e, int offsete, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dpteqr.dpteqr(compz, n, d, offsetd, e, offsete, z, offsetz, ldz, work, offsetwork, info); } - protected void dptrfsK(int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] df, int _df_offset, double[] ef, int _ef_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dptrfs.dptrfs(n, nrhs, d, _d_offset, e, _e_offset, df, _df_offset, ef, _ef_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, info); + protected void dptrfsK(int n, int nrhs, double[] d, int offsetd, double[] e, int offsete, double[] df, int offsetdf, double[] ef, int offsetef, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dptrfs.dptrfs(n, nrhs, d, offsetd, e, offsete, df, offsetdf, ef, offsetef, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, info); } - protected void dptsvK(int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Dptsv.dptsv(n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb, info); + protected void dptsvK(int n, int nrhs, double[] d, int offsetd, double[] e, int offsete, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Dptsv.dptsv(n, nrhs, d, offsetd, e, offsete, b, offsetb, ldb, info); } - protected void dptsvxK(String fact, int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] df, int _df_offset, double[] ef, int _ef_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dptsvx.dptsvx(fact, n, nrhs, d, _d_offset, e, _e_offset, df, _df_offset, ef, _ef_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, info); + protected void dptsvxK(String fact, int n, int nrhs, double[] d, int offsetd, double[] e, int offsete, double[] df, int offsetdf, double[] ef, int offsetef, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dptsvx.dptsvx(fact, n, nrhs, d, offsetd, e, offsete, df, offsetdf, ef, offsetef, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, info); } - protected void dpttrfK(int n, double[] d, int _d_offset, double[] e, int _e_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dpttrf.dpttrf(n, d, _d_offset, e, _e_offset, info); + protected void dpttrfK(int n, double[] d, int offsetd, double[] e, int offsete, org.netlib.util.intW info) { + org.netlib.lapack.Dpttrf.dpttrf(n, d, offsetd, e, offsete, info); } - protected void dpttrsK(int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Dpttrs.dpttrs(n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb, info); + protected void dpttrsK(int n, int nrhs, double[] d, int offsetd, double[] e, int offsete, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Dpttrs.dpttrs(n, nrhs, d, offsetd, e, offsete, b, offsetb, ldb, info); } - protected void dptts2K(int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] b, int _b_offset, int ldb) { - org.netlib.lapack.Dptts2.dptts2(n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb); + protected void dptts2K(int n, int nrhs, double[] d, int offsetd, double[] e, int offsete, double[] b, int offsetb, int ldb) { + org.netlib.lapack.Dptts2.dptts2(n, nrhs, d, offsetd, e, offsete, b, offsetb, ldb); } - protected void drsclK(int n, double sa, double[] sx, int _sx_offset, int incx) { - org.netlib.lapack.Drscl.drscl(n, sa, sx, _sx_offset, incx); + protected void drsclK(int n, double sa, double[] sx, int offsetsx, int incx) { + org.netlib.lapack.Drscl.drscl(n, sa, sx, offsetsx, incx); } - protected void dsbevK(String jobz, String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dsbev.dsbev(jobz, uplo, n, kd, ab, _ab_offset, ldab, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); + protected void dsbevK(String jobz, String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dsbev.dsbev(jobz, uplo, n, kd, ab, offsetab, ldab, w, offsetw, z, offsetz, ldz, work, offsetwork, info); } - protected void dsbevdK(String jobz, String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - org.netlib.lapack.Dsbevd.dsbevd(jobz, uplo, n, kd, ab, _ab_offset, ldab, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + protected void dsbevdK(String jobz, String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { + org.netlib.lapack.Dsbevd.dsbevd(jobz, uplo, n, kd, ab, offsetab, ldab, w, offsetw, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected void dsbevxK(String jobz, String range, String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] q, int _q_offset, int ldq, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dsbevx.dsbevx(jobz, range, uplo, n, kd, ab, _ab_offset, ldab, q, _q_offset, ldq, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + protected void dsbevxK(String jobz, String range, String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double[] q, int offsetq, int ldq, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { + org.netlib.lapack.Dsbevx.dsbevx(jobz, range, uplo, n, kd, ab, offsetab, ldab, q, offsetq, ldq, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, work, offsetwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected void dsbgstK(String vect, String uplo, int n, int ka, int kb, double[] ab, int _ab_offset, int ldab, double[] bb, int _bb_offset, int ldbb, double[] x, int _x_offset, int ldx, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dsbgst.dsbgst(vect, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, x, _x_offset, ldx, work, _work_offset, info); + protected void dsbgstK(String vect, String uplo, int n, int ka, int kb, double[] ab, int offsetab, int ldab, double[] bb, int offsetbb, int ldbb, double[] x, int offsetx, int ldx, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dsbgst.dsbgst(vect, uplo, n, ka, kb, ab, offsetab, ldab, bb, offsetbb, ldbb, x, offsetx, ldx, work, offsetwork, info); } - protected void dsbgvK(String jobz, String uplo, int n, int ka, int kb, double[] ab, int _ab_offset, int ldab, double[] bb, int _bb_offset, int ldbb, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dsbgv.dsbgv(jobz, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); + protected void dsbgvK(String jobz, String uplo, int n, int ka, int kb, double[] ab, int offsetab, int ldab, double[] bb, int offsetbb, int ldbb, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dsbgv.dsbgv(jobz, uplo, n, ka, kb, ab, offsetab, ldab, bb, offsetbb, ldbb, w, offsetw, z, offsetz, ldz, work, offsetwork, info); } - protected void dsbgvdK(String jobz, String uplo, int n, int ka, int kb, double[] ab, int _ab_offset, int ldab, double[] bb, int _bb_offset, int ldbb, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - org.netlib.lapack.Dsbgvd.dsbgvd(jobz, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + protected void dsbgvdK(String jobz, String uplo, int n, int ka, int kb, double[] ab, int offsetab, int ldab, double[] bb, int offsetbb, int ldbb, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { + org.netlib.lapack.Dsbgvd.dsbgvd(jobz, uplo, n, ka, kb, ab, offsetab, ldab, bb, offsetbb, ldbb, w, offsetw, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected void dsbgvxK(String jobz, String range, String uplo, int n, int ka, int kb, double[] ab, int _ab_offset, int ldab, double[] bb, int _bb_offset, int ldbb, double[] q, int _q_offset, int ldq, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dsbgvx.dsbgvx(jobz, range, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, q, _q_offset, ldq, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + protected void dsbgvxK(String jobz, String range, String uplo, int n, int ka, int kb, double[] ab, int offsetab, int ldab, double[] bb, int offsetbb, int ldbb, double[] q, int offsetq, int ldq, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { + org.netlib.lapack.Dsbgvx.dsbgvx(jobz, range, uplo, n, ka, kb, ab, offsetab, ldab, bb, offsetbb, ldbb, q, offsetq, ldq, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, work, offsetwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected void dsbtrdK(String vect, String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] d, int _d_offset, double[] e, int _e_offset, double[] q, int _q_offset, int ldq, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dsbtrd.dsbtrd(vect, uplo, n, kd, ab, _ab_offset, ldab, d, _d_offset, e, _e_offset, q, _q_offset, ldq, work, _work_offset, info); + protected void dsbtrdK(String vect, String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double[] d, int offsetd, double[] e, int offsete, double[] q, int offsetq, int ldq, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dsbtrd.dsbtrd(vect, uplo, n, kd, ab, offsetab, ldab, d, offsetd, e, offsete, q, offsetq, ldq, work, offsetwork, info); } - protected void dsgesvK(int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] work, int _work_offset, float[] swork, int _swork_offset, org.netlib.util.intW iter, org.netlib.util.intW info) { - org.netlib.lapack.Dsgesv.dsgesv(n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, work, _work_offset, swork, _swork_offset, iter, info); + protected void dsgesvK(int n, int nrhs, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] work, int offsetwork, float[] swork, int offsetswork, org.netlib.util.intW iter, org.netlib.util.intW info) { + org.netlib.lapack.Dsgesv.dsgesv(n, nrhs, a, offseta, lda, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, work, offsetwork, swork, offsetswork, iter, info); } - protected void dspconK(String uplo, int n, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dspcon.dspcon(uplo, n, ap, _ap_offset, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + protected void dspconK(String uplo, int n, double[] ap, int offsetap, int[] ipiv, int offsetipiv, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dspcon.dspcon(uplo, n, ap, offsetap, ipiv, offsetipiv, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected void dspevK(String jobz, String uplo, int n, double[] ap, int _ap_offset, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dspev.dspev(jobz, uplo, n, ap, _ap_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); + protected void dspevK(String jobz, String uplo, int n, double[] ap, int offsetap, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dspev.dspev(jobz, uplo, n, ap, offsetap, w, offsetw, z, offsetz, ldz, work, offsetwork, info); } - protected void dspevdK(String jobz, String uplo, int n, double[] ap, int _ap_offset, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - org.netlib.lapack.Dspevd.dspevd(jobz, uplo, n, ap, _ap_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + protected void dspevdK(String jobz, String uplo, int n, double[] ap, int offsetap, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { + org.netlib.lapack.Dspevd.dspevd(jobz, uplo, n, ap, offsetap, w, offsetw, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected void dspevxK(String jobz, String range, String uplo, int n, double[] ap, int _ap_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dspevx.dspevx(jobz, range, uplo, n, ap, _ap_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + protected void dspevxK(String jobz, String range, String uplo, int n, double[] ap, int offsetap, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { + org.netlib.lapack.Dspevx.dspevx(jobz, range, uplo, n, ap, offsetap, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, work, offsetwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected void dspgstK(int itype, String uplo, int n, double[] ap, int _ap_offset, double[] bp, int _bp_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dspgst.dspgst(itype, uplo, n, ap, _ap_offset, bp, _bp_offset, info); + protected void dspgstK(int itype, String uplo, int n, double[] ap, int offsetap, double[] bp, int offsetbp, org.netlib.util.intW info) { + org.netlib.lapack.Dspgst.dspgst(itype, uplo, n, ap, offsetap, bp, offsetbp, info); } - protected void dspgvK(int itype, String jobz, String uplo, int n, double[] ap, int _ap_offset, double[] bp, int _bp_offset, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dspgv.dspgv(itype, jobz, uplo, n, ap, _ap_offset, bp, _bp_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); + protected void dspgvK(int itype, String jobz, String uplo, int n, double[] ap, int offsetap, double[] bp, int offsetbp, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dspgv.dspgv(itype, jobz, uplo, n, ap, offsetap, bp, offsetbp, w, offsetw, z, offsetz, ldz, work, offsetwork, info); } - protected void dspgvdK(int itype, String jobz, String uplo, int n, double[] ap, int _ap_offset, double[] bp, int _bp_offset, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - org.netlib.lapack.Dspgvd.dspgvd(itype, jobz, uplo, n, ap, _ap_offset, bp, _bp_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + protected void dspgvdK(int itype, String jobz, String uplo, int n, double[] ap, int offsetap, double[] bp, int offsetbp, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { + org.netlib.lapack.Dspgvd.dspgvd(itype, jobz, uplo, n, ap, offsetap, bp, offsetbp, w, offsetw, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected void dspgvxK(int itype, String jobz, String range, String uplo, int n, double[] ap, int _ap_offset, double[] bp, int _bp_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dspgvx.dspgvx(itype, jobz, range, uplo, n, ap, _ap_offset, bp, _bp_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + protected void dspgvxK(int itype, String jobz, String range, String uplo, int n, double[] ap, int offsetap, double[] bp, int offsetbp, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { + org.netlib.lapack.Dspgvx.dspgvx(itype, jobz, range, uplo, n, ap, offsetap, bp, offsetbp, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, work, offsetwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected void dsprfsK(String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] afp, int _afp_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dsprfs.dsprfs(uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void dsprfsK(String uplo, int n, int nrhs, double[] ap, int offsetap, double[] afp, int offsetafp, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dsprfs.dsprfs(uplo, n, nrhs, ap, offsetap, afp, offsetafp, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void dspsvK(String uplo, int n, int nrhs, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Dspsv.dspsv(uplo, n, nrhs, ap, _ap_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + protected void dspsvK(String uplo, int n, int nrhs, double[] ap, int offsetap, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Dspsv.dspsv(uplo, n, nrhs, ap, offsetap, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected void dspsvxK(String fact, String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] afp, int _afp_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dspsvx.dspsvx(fact, uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void dspsvxK(String fact, String uplo, int n, int nrhs, double[] ap, int offsetap, double[] afp, int offsetafp, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dspsvx.dspsvx(fact, uplo, n, nrhs, ap, offsetap, afp, offsetafp, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void dsptrdK(String uplo, int n, double[] ap, int _ap_offset, double[] d, int _d_offset, double[] e, int _e_offset, double[] tau, int _tau_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dsptrd.dsptrd(uplo, n, ap, _ap_offset, d, _d_offset, e, _e_offset, tau, _tau_offset, info); + protected void dsptrdK(String uplo, int n, double[] ap, int offsetap, double[] d, int offsetd, double[] e, int offsete, double[] tau, int offsettau, org.netlib.util.intW info) { + org.netlib.lapack.Dsptrd.dsptrd(uplo, n, ap, offsetap, d, offsetd, e, offsete, tau, offsettau, info); } - protected void dsptrfK(String uplo, int n, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dsptrf.dsptrf(uplo, n, ap, _ap_offset, ipiv, _ipiv_offset, info); + protected void dsptrfK(String uplo, int n, double[] ap, int offsetap, int[] ipiv, int offsetipiv, org.netlib.util.intW info) { + org.netlib.lapack.Dsptrf.dsptrf(uplo, n, ap, offsetap, ipiv, offsetipiv, info); } - protected void dsptriK(String uplo, int n, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dsptri.dsptri(uplo, n, ap, _ap_offset, ipiv, _ipiv_offset, work, _work_offset, info); + protected void dsptriK(String uplo, int n, double[] ap, int offsetap, int[] ipiv, int offsetipiv, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dsptri.dsptri(uplo, n, ap, offsetap, ipiv, offsetipiv, work, offsetwork, info); } - protected void dsptrsK(String uplo, int n, int nrhs, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Dsptrs.dsptrs(uplo, n, nrhs, ap, _ap_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + protected void dsptrsK(String uplo, int n, int nrhs, double[] ap, int offsetap, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Dsptrs.dsptrs(uplo, n, nrhs, ap, offsetap, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected void dstebzK(String range, String order, int n, double vl, double vu, int il, int iu, double abstol, double[] d, int _d_offset, double[] e, int _e_offset, org.netlib.util.intW m, org.netlib.util.intW nsplit, double[] w, int _w_offset, int[] iblock, int _iblock_offset, int[] isplit, int _isplit_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dstebz.dstebz(range, order, n, vl, vu, il, iu, abstol, d, _d_offset, e, _e_offset, m, nsplit, w, _w_offset, iblock, _iblock_offset, isplit, _isplit_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void dstebzK(String range, String order, int n, double vl, double vu, int il, int iu, double abstol, double[] d, int offsetd, double[] e, int offsete, org.netlib.util.intW m, org.netlib.util.intW nsplit, double[] w, int offsetw, int[] iblock, int offsetiblock, int[] isplit, int offsetisplit, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dstebz.dstebz(range, order, n, vl, vu, il, iu, abstol, d, offsetd, e, offsete, m, nsplit, w, offsetw, iblock, offsetiblock, isplit, offsetisplit, work, offsetwork, iwork, offsetiwork, info); } - protected void dstedcK(String compz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - org.netlib.lapack.Dstedc.dstedc(compz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + protected void dstedcK(String compz, int n, double[] d, int offsetd, double[] e, int offsete, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { + org.netlib.lapack.Dstedc.dstedc(compz, n, d, offsetd, e, offsete, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected void dstegrK(String jobz, String range, int n, double[] d, int _d_offset, double[] e, int _e_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - org.netlib.lapack.Dstegr.dstegr(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + protected void dstegrK(String jobz, String range, int n, double[] d, int offsetd, double[] e, int offsete, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { + org.netlib.lapack.Dstegr.dstegr(jobz, range, n, d, offsetd, e, offsete, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, isuppz, offsetisuppz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected void dsteinK(int n, double[] d, int _d_offset, double[] e, int _e_offset, int m, double[] w, int _w_offset, int[] iblock, int _iblock_offset, int[] isplit, int _isplit_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dstein.dstein(n, d, _d_offset, e, _e_offset, m, w, _w_offset, iblock, _iblock_offset, isplit, _isplit_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + protected void dsteinK(int n, double[] d, int offsetd, double[] e, int offsete, int m, double[] w, int offsetw, int[] iblock, int offsetiblock, int[] isplit, int offsetisplit, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { + org.netlib.lapack.Dstein.dstein(n, d, offsetd, e, offsete, m, w, offsetw, iblock, offsetiblock, isplit, offsetisplit, z, offsetz, ldz, work, offsetwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected void dstemrK(String jobz, String range, int n, double[] d, int _d_offset, double[] e, int _e_offset, double vl, double vu, int il, int iu, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, int nzc, int[] isuppz, int _isuppz_offset, org.netlib.util.booleanW tryrac, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - org.netlib.lapack.Dstemr.dstemr(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, m, w, _w_offset, z, _z_offset, ldz, nzc, isuppz, _isuppz_offset, tryrac, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + protected void dstemrK(String jobz, String range, int n, double[] d, int offsetd, double[] e, int offsete, double vl, double vu, int il, int iu, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, int nzc, int[] isuppz, int offsetisuppz, org.netlib.util.booleanW tryrac, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { + org.netlib.lapack.Dstemr.dstemr(jobz, range, n, d, offsetd, e, offsete, vl, vu, il, iu, m, w, offsetw, z, offsetz, ldz, nzc, isuppz, offsetisuppz, tryrac, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected void dsteqrK(String compz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dsteqr.dsteqr(compz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, info); + protected void dsteqrK(String compz, int n, double[] d, int offsetd, double[] e, int offsete, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dsteqr.dsteqr(compz, n, d, offsetd, e, offsete, z, offsetz, ldz, work, offsetwork, info); } - protected void dsterfK(int n, double[] d, int _d_offset, double[] e, int _e_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dsterf.dsterf(n, d, _d_offset, e, _e_offset, info); + protected void dsterfK(int n, double[] d, int offsetd, double[] e, int offsete, org.netlib.util.intW info) { + org.netlib.lapack.Dsterf.dsterf(n, d, offsetd, e, offsete, info); } - protected void dstevK(String jobz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dstev.dstev(jobz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, info); + protected void dstevK(String jobz, int n, double[] d, int offsetd, double[] e, int offsete, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dstev.dstev(jobz, n, d, offsetd, e, offsete, z, offsetz, ldz, work, offsetwork, info); } - protected void dstevdK(String jobz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - org.netlib.lapack.Dstevd.dstevd(jobz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + protected void dstevdK(String jobz, int n, double[] d, int offsetd, double[] e, int offsete, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { + org.netlib.lapack.Dstevd.dstevd(jobz, n, d, offsetd, e, offsete, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected void dstevrK(String jobz, String range, int n, double[] d, int _d_offset, double[] e, int _e_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - org.netlib.lapack.Dstevr.dstevr(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + protected void dstevrK(String jobz, String range, int n, double[] d, int offsetd, double[] e, int offsete, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { + org.netlib.lapack.Dstevr.dstevr(jobz, range, n, d, offsetd, e, offsete, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, isuppz, offsetisuppz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected void dstevxK(String jobz, String range, int n, double[] d, int _d_offset, double[] e, int _e_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dstevx.dstevx(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + protected void dstevxK(String jobz, String range, int n, double[] d, int offsetd, double[] e, int offsete, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { + org.netlib.lapack.Dstevx.dstevx(jobz, range, n, d, offsetd, e, offsete, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, work, offsetwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected void dsyconK(String uplo, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dsycon.dsycon(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + protected void dsyconK(String uplo, int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dsycon.dsycon(uplo, n, a, offseta, lda, ipiv, offsetipiv, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected void dsyevK(String jobz, String uplo, int n, double[] a, int _a_offset, int lda, double[] w, int _w_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dsyev.dsyev(jobz, uplo, n, a, _a_offset, lda, w, _w_offset, work, _work_offset, lwork, info); + protected void dsyevK(String jobz, String uplo, int n, double[] a, int offseta, int lda, double[] w, int offsetw, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dsyev.dsyev(jobz, uplo, n, a, offseta, lda, w, offsetw, work, offsetwork, lwork, info); } - protected void dsyevdK(String jobz, String uplo, int n, double[] a, int _a_offset, int lda, double[] w, int _w_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - org.netlib.lapack.Dsyevd.dsyevd(jobz, uplo, n, a, _a_offset, lda, w, _w_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + protected void dsyevdK(String jobz, String uplo, int n, double[] a, int offseta, int lda, double[] w, int offsetw, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { + org.netlib.lapack.Dsyevd.dsyevd(jobz, uplo, n, a, offseta, lda, w, offsetw, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected void dsyevrK(String jobz, String range, String uplo, int n, double[] a, int _a_offset, int lda, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - org.netlib.lapack.Dsyevr.dsyevr(jobz, range, uplo, n, a, _a_offset, lda, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + protected void dsyevrK(String jobz, String range, String uplo, int n, double[] a, int offseta, int lda, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { + org.netlib.lapack.Dsyevr.dsyevr(jobz, range, uplo, n, a, offseta, lda, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, isuppz, offsetisuppz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected void dsyevxK(String jobz, String range, String uplo, int n, double[] a, int _a_offset, int lda, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dsyevx.dsyevx(jobz, range, uplo, n, a, _a_offset, lda, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, ifail, _ifail_offset, info); + protected void dsyevxK(String jobz, String range, String uplo, int n, double[] a, int offseta, int lda, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { + org.netlib.lapack.Dsyevx.dsyevx(jobz, range, uplo, n, a, offseta, lda, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected void dsygs2K(int itype, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Dsygs2.dsygs2(itype, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, info); + protected void dsygs2K(int itype, String uplo, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Dsygs2.dsygs2(itype, uplo, n, a, offseta, lda, b, offsetb, ldb, info); } - protected void dsygstK(int itype, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Dsygst.dsygst(itype, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, info); + protected void dsygstK(int itype, String uplo, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Dsygst.dsygst(itype, uplo, n, a, offseta, lda, b, offsetb, ldb, info); } - protected void dsygvK(int itype, String jobz, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] w, int _w_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dsygv.dsygv(itype, jobz, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, w, _w_offset, work, _work_offset, lwork, info); + protected void dsygvK(int itype, String jobz, String uplo, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] w, int offsetw, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dsygv.dsygv(itype, jobz, uplo, n, a, offseta, lda, b, offsetb, ldb, w, offsetw, work, offsetwork, lwork, info); } - protected void dsygvdK(int itype, String jobz, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] w, int _w_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - org.netlib.lapack.Dsygvd.dsygvd(itype, jobz, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, w, _w_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + protected void dsygvdK(int itype, String jobz, String uplo, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] w, int offsetw, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { + org.netlib.lapack.Dsygvd.dsygvd(itype, jobz, uplo, n, a, offseta, lda, b, offsetb, ldb, w, offsetw, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected void dsygvxK(int itype, String jobz, String range, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dsygvx.dsygvx(itype, jobz, range, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, ifail, _ifail_offset, info); + protected void dsygvxK(int itype, String jobz, String range, String uplo, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { + org.netlib.lapack.Dsygvx.dsygvx(itype, jobz, range, uplo, n, a, offseta, lda, b, offsetb, ldb, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected void dsyrfsK(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dsyrfs.dsyrfs(uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void dsyrfsK(String uplo, int n, int nrhs, double[] a, int offseta, int lda, double[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dsyrfs.dsyrfs(uplo, n, nrhs, a, offseta, lda, af, offsetaf, ldaf, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void dsysvK(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dsysv.dsysv(uplo, n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, work, _work_offset, lwork, info); + protected void dsysvK(String uplo, int n, int nrhs, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dsysv.dsysv(uplo, n, nrhs, a, offseta, lda, ipiv, offsetipiv, b, offsetb, ldb, work, offsetwork, lwork, info); } - protected void dsysvxK(String fact, String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dsysvx.dsysvx(fact, uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, lwork, iwork, _iwork_offset, info); + protected void dsysvxK(String fact, String uplo, int n, int nrhs, double[] a, int offseta, int lda, double[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dsysvx.dsysvx(fact, uplo, n, nrhs, a, offseta, lda, af, offsetaf, ldaf, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, lwork, iwork, offsetiwork, info); } - protected void dsytd2K(String uplo, int n, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tau, int _tau_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dsytd2.dsytd2(uplo, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tau, _tau_offset, info); + protected void dsytd2K(String uplo, int n, double[] a, int offseta, int lda, double[] d, int offsetd, double[] e, int offsete, double[] tau, int offsettau, org.netlib.util.intW info) { + org.netlib.lapack.Dsytd2.dsytd2(uplo, n, a, offseta, lda, d, offsetd, e, offsete, tau, offsettau, info); } - protected void dsytf2K(String uplo, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dsytf2.dsytf2(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, info); + protected void dsytf2K(String uplo, int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, org.netlib.util.intW info) { + org.netlib.lapack.Dsytf2.dsytf2(uplo, n, a, offseta, lda, ipiv, offsetipiv, info); } - protected void dsytrdK(String uplo, int n, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dsytrd.dsytrd(uplo, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tau, _tau_offset, work, _work_offset, lwork, info); + protected void dsytrdK(String uplo, int n, double[] a, int offseta, int lda, double[] d, int offsetd, double[] e, int offsete, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dsytrd.dsytrd(uplo, n, a, offseta, lda, d, offsetd, e, offsete, tau, offsettau, work, offsetwork, lwork, info); } - protected void dsytrfK(String uplo, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dsytrf.dsytrf(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, work, _work_offset, lwork, info); + protected void dsytrfK(String uplo, int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dsytrf.dsytrf(uplo, n, a, offseta, lda, ipiv, offsetipiv, work, offsetwork, lwork, info); } - protected void dsytriK(String uplo, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dsytri.dsytri(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, work, _work_offset, info); + protected void dsytriK(String uplo, int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dsytri.dsytri(uplo, n, a, offseta, lda, ipiv, offsetipiv, work, offsetwork, info); } - protected void dsytrsK(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Dsytrs.dsytrs(uplo, n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + protected void dsytrsK(String uplo, int n, int nrhs, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Dsytrs.dsytrs(uplo, n, nrhs, a, offseta, lda, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected void dtbconK(String norm, String uplo, String diag, int n, int kd, double[] ab, int _ab_offset, int ldab, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dtbcon.dtbcon(norm, uplo, diag, n, kd, ab, _ab_offset, ldab, rcond, work, _work_offset, iwork, _iwork_offset, info); + protected void dtbconK(String norm, String uplo, String diag, int n, int kd, double[] ab, int offsetab, int ldab, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dtbcon.dtbcon(norm, uplo, diag, n, kd, ab, offsetab, ldab, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected void dtbrfsK(String uplo, String trans, String diag, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dtbrfs.dtbrfs(uplo, trans, diag, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void dtbrfsK(String uplo, String trans, String diag, int n, int kd, int nrhs, double[] ab, int offsetab, int ldab, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dtbrfs.dtbrfs(uplo, trans, diag, n, kd, nrhs, ab, offsetab, ldab, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void dtbtrsK(String uplo, String trans, String diag, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Dtbtrs.dtbtrs(uplo, trans, diag, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, info); + protected void dtbtrsK(String uplo, String trans, String diag, int n, int kd, int nrhs, double[] ab, int offsetab, int ldab, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Dtbtrs.dtbtrs(uplo, trans, diag, n, kd, nrhs, ab, offsetab, ldab, b, offsetb, ldb, info); } - protected void dtgevcK(String side, String howmny, boolean[] select, int _select_offset, int n, double[] s, int _s_offset, int lds, double[] p, int _p_offset, int ldp, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dtgevc.dtgevc(side, howmny, select, _select_offset, n, s, _s_offset, lds, p, _p_offset, ldp, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, mm, m, work, _work_offset, info); + protected void dtgevcK(String side, String howmny, boolean[] select, int offsetselect, int n, double[] s, int offsets, int lds, double[] p, int offsetp, int ldp, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, int mm, org.netlib.util.intW m, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dtgevc.dtgevc(side, howmny, select, offsetselect, n, s, offsets, lds, p, offsetp, ldp, vl, offsetvl, ldvl, vr, offsetvr, ldvr, mm, m, work, offsetwork, info); } - protected void dtgex2K(boolean wantq, boolean wantz, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, int j1, int n1, int n2, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dtgex2.dtgex2(wantq, wantz, n, a, _a_offset, lda, b, _b_offset, ldb, q, _q_offset, ldq, z, _z_offset, ldz, j1, n1, n2, work, _work_offset, lwork, info); + protected void dtgex2K(boolean wantq, boolean wantz, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] q, int offsetq, int ldq, double[] z, int offsetz, int ldz, int j1, int n1, int n2, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dtgex2.dtgex2(wantq, wantz, n, a, offseta, lda, b, offsetb, ldb, q, offsetq, ldq, z, offsetz, ldz, j1, n1, n2, work, offsetwork, lwork, info); } - protected void dtgexcK(boolean wantq, boolean wantz, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, org.netlib.util.intW ifst, org.netlib.util.intW ilst, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dtgexc.dtgexc(wantq, wantz, n, a, _a_offset, lda, b, _b_offset, ldb, q, _q_offset, ldq, z, _z_offset, ldz, ifst, ilst, work, _work_offset, lwork, info); + protected void dtgexcK(boolean wantq, boolean wantz, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] q, int offsetq, int ldq, double[] z, int offsetz, int ldz, org.netlib.util.intW ifst, org.netlib.util.intW ilst, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dtgexc.dtgexc(wantq, wantz, n, a, offseta, lda, b, offsetb, ldb, q, offsetq, ldq, z, offsetz, ldz, ifst, ilst, work, offsetwork, lwork, info); } - protected void dtgsenK(int ijob, boolean wantq, boolean wantz, boolean[] select, int _select_offset, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, org.netlib.util.intW m, org.netlib.util.doubleW pl, org.netlib.util.doubleW pr, double[] dif, int _dif_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - org.netlib.lapack.Dtgsen.dtgsen(ijob, wantq, wantz, select, _select_offset, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, q, _q_offset, ldq, z, _z_offset, ldz, m, pl, pr, dif, _dif_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + protected void dtgsenK(int ijob, boolean wantq, boolean wantz, boolean[] select, int offsetselect, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] q, int offsetq, int ldq, double[] z, int offsetz, int ldz, org.netlib.util.intW m, org.netlib.util.doubleW pl, org.netlib.util.doubleW pr, double[] dif, int offsetdif, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { + org.netlib.lapack.Dtgsen.dtgsen(ijob, wantq, wantz, select, offsetselect, n, a, offseta, lda, b, offsetb, ldb, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, q, offsetq, ldq, z, offsetz, ldz, m, pl, pr, dif, offsetdif, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected void dtgsjaK(String jobu, String jobv, String jobq, int m, int p, int n, int k, int l, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double tola, double tolb, double[] alpha, int _alpha_offset, double[] beta, int _beta_offset, double[] u, int _u_offset, int ldu, double[] v, int _v_offset, int ldv, double[] q, int _q_offset, int ldq, double[] work, int _work_offset, org.netlib.util.intW ncycle, org.netlib.util.intW info) { - org.netlib.lapack.Dtgsja.dtgsja(jobu, jobv, jobq, m, p, n, k, l, a, _a_offset, lda, b, _b_offset, ldb, tola, tolb, alpha, _alpha_offset, beta, _beta_offset, u, _u_offset, ldu, v, _v_offset, ldv, q, _q_offset, ldq, work, _work_offset, ncycle, info); + protected void dtgsjaK(String jobu, String jobv, String jobq, int m, int p, int n, int k, int l, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double tola, double tolb, double[] alpha, int offsetalpha, double[] beta, int offsetbeta, double[] u, int offsetu, int ldu, double[] v, int offsetv, int ldv, double[] q, int offsetq, int ldq, double[] work, int offsetwork, org.netlib.util.intW ncycle, org.netlib.util.intW info) { + org.netlib.lapack.Dtgsja.dtgsja(jobu, jobv, jobq, m, p, n, k, l, a, offseta, lda, b, offsetb, ldb, tola, tolb, alpha, offsetalpha, beta, offsetbeta, u, offsetu, ldu, v, offsetv, ldv, q, offsetq, ldq, work, offsetwork, ncycle, info); } - protected void dtgsnaK(String job, String howmny, boolean[] select, int _select_offset, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] s, int _s_offset, double[] dif, int _dif_offset, int mm, org.netlib.util.intW m, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dtgsna.dtgsna(job, howmny, select, _select_offset, n, a, _a_offset, lda, b, _b_offset, ldb, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, s, _s_offset, dif, _dif_offset, mm, m, work, _work_offset, lwork, iwork, _iwork_offset, info); + protected void dtgsnaK(String job, String howmny, boolean[] select, int offsetselect, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, double[] s, int offsets, double[] dif, int offsetdif, int mm, org.netlib.util.intW m, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dtgsna.dtgsna(job, howmny, select, offsetselect, n, a, offseta, lda, b, offsetb, ldb, vl, offsetvl, ldvl, vr, offsetvr, ldvr, s, offsets, dif, offsetdif, mm, m, work, offsetwork, lwork, iwork, offsetiwork, info); } - protected void dtgsy2K(String trans, int ijob, int m, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] c, int _c_offset, int Ldc, double[] d, int _d_offset, int ldd, double[] e, int _e_offset, int lde, double[] f, int _f_offset, int ldf, org.netlib.util.doubleW scale, org.netlib.util.doubleW rdsum, org.netlib.util.doubleW rdscal, int[] iwork, int _iwork_offset, org.netlib.util.intW pq, org.netlib.util.intW info) { - org.netlib.lapack.Dtgsy2.dtgsy2(trans, ijob, m, n, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, Ldc, d, _d_offset, ldd, e, _e_offset, lde, f, _f_offset, ldf, scale, rdsum, rdscal, iwork, _iwork_offset, pq, info); + protected void dtgsy2K(String trans, int ijob, int m, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] c, int offsetc, int Ldc, double[] d, int offsetd, int ldd, double[] e, int offsete, int lde, double[] f, int offsetf, int ldf, org.netlib.util.doubleW scale, org.netlib.util.doubleW rdsum, org.netlib.util.doubleW rdscal, int[] iwork, int offsetiwork, org.netlib.util.intW pq, org.netlib.util.intW info) { + org.netlib.lapack.Dtgsy2.dtgsy2(trans, ijob, m, n, a, offseta, lda, b, offsetb, ldb, c, offsetc, Ldc, d, offsetd, ldd, e, offsete, lde, f, offsetf, ldf, scale, rdsum, rdscal, iwork, offsetiwork, pq, info); } - protected void dtgsylK(String trans, int ijob, int m, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] c, int _c_offset, int Ldc, double[] d, int _d_offset, int ldd, double[] e, int _e_offset, int lde, double[] f, int _f_offset, int ldf, org.netlib.util.doubleW scale, org.netlib.util.doubleW dif, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dtgsyl.dtgsyl(trans, ijob, m, n, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, Ldc, d, _d_offset, ldd, e, _e_offset, lde, f, _f_offset, ldf, scale, dif, work, _work_offset, lwork, iwork, _iwork_offset, info); + protected void dtgsylK(String trans, int ijob, int m, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] c, int offsetc, int Ldc, double[] d, int offsetd, int ldd, double[] e, int offsete, int lde, double[] f, int offsetf, int ldf, org.netlib.util.doubleW scale, org.netlib.util.doubleW dif, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dtgsyl.dtgsyl(trans, ijob, m, n, a, offseta, lda, b, offsetb, ldb, c, offsetc, Ldc, d, offsetd, ldd, e, offsete, lde, f, offsetf, ldf, scale, dif, work, offsetwork, lwork, iwork, offsetiwork, info); } - protected void dtpconK(String norm, String uplo, String diag, int n, double[] ap, int _ap_offset, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dtpcon.dtpcon(norm, uplo, diag, n, ap, _ap_offset, rcond, work, _work_offset, iwork, _iwork_offset, info); + protected void dtpconK(String norm, String uplo, String diag, int n, double[] ap, int offsetap, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dtpcon.dtpcon(norm, uplo, diag, n, ap, offsetap, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected void dtprfsK(String uplo, String trans, String diag, int n, int nrhs, double[] ap, int _ap_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dtprfs.dtprfs(uplo, trans, diag, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void dtprfsK(String uplo, String trans, String diag, int n, int nrhs, double[] ap, int offsetap, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dtprfs.dtprfs(uplo, trans, diag, n, nrhs, ap, offsetap, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void dtptriK(String uplo, String diag, int n, double[] ap, int _ap_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dtptri.dtptri(uplo, diag, n, ap, _ap_offset, info); + protected void dtptriK(String uplo, String diag, int n, double[] ap, int offsetap, org.netlib.util.intW info) { + org.netlib.lapack.Dtptri.dtptri(uplo, diag, n, ap, offsetap, info); } - protected void dtptrsK(String uplo, String trans, String diag, int n, int nrhs, double[] ap, int _ap_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Dtptrs.dtptrs(uplo, trans, diag, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, info); + protected void dtptrsK(String uplo, String trans, String diag, int n, int nrhs, double[] ap, int offsetap, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Dtptrs.dtptrs(uplo, trans, diag, n, nrhs, ap, offsetap, b, offsetb, ldb, info); } - protected void dtrconK(String norm, String uplo, String diag, int n, double[] a, int _a_offset, int lda, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dtrcon.dtrcon(norm, uplo, diag, n, a, _a_offset, lda, rcond, work, _work_offset, iwork, _iwork_offset, info); + protected void dtrconK(String norm, String uplo, String diag, int n, double[] a, int offseta, int lda, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dtrcon.dtrcon(norm, uplo, diag, n, a, offseta, lda, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected void dtrevcK(String side, String howmny, boolean[] select, int _select_offset, int n, double[] t, int _t_offset, int ldt, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dtrevc.dtrevc(side, howmny, select, _select_offset, n, t, _t_offset, ldt, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, mm, m, work, _work_offset, info); + protected void dtrevcK(String side, String howmny, boolean[] select, int offsetselect, int n, double[] t, int offsett, int ldt, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, int mm, org.netlib.util.intW m, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dtrevc.dtrevc(side, howmny, select, offsetselect, n, t, offsett, ldt, vl, offsetvl, ldvl, vr, offsetvr, ldvr, mm, m, work, offsetwork, info); } - protected void dtrexcK(String compq, int n, double[] t, int _t_offset, int ldt, double[] q, int _q_offset, int ldq, org.netlib.util.intW ifst, org.netlib.util.intW ilst, double[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dtrexc.dtrexc(compq, n, t, _t_offset, ldt, q, _q_offset, ldq, ifst, ilst, work, _work_offset, info); + protected void dtrexcK(String compq, int n, double[] t, int offsett, int ldt, double[] q, int offsetq, int ldq, org.netlib.util.intW ifst, org.netlib.util.intW ilst, double[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Dtrexc.dtrexc(compq, n, t, offsett, ldt, q, offsetq, ldq, ifst, ilst, work, offsetwork, info); } - protected void dtrrfsK(String uplo, String trans, String diag, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dtrrfs.dtrrfs(uplo, trans, diag, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void dtrrfsK(String uplo, String trans, String diag, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dtrrfs.dtrrfs(uplo, trans, diag, n, nrhs, a, offseta, lda, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void dtrsenK(String job, String compq, boolean[] select, int _select_offset, int n, double[] t, int _t_offset, int ldt, double[] q, int _q_offset, int ldq, double[] wr, int _wr_offset, double[] wi, int _wi_offset, org.netlib.util.intW m, org.netlib.util.doubleW s, org.netlib.util.doubleW sep, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - org.netlib.lapack.Dtrsen.dtrsen(job, compq, select, _select_offset, n, t, _t_offset, ldt, q, _q_offset, ldq, wr, _wr_offset, wi, _wi_offset, m, s, sep, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + protected void dtrsenK(String job, String compq, boolean[] select, int offsetselect, int n, double[] t, int offsett, int ldt, double[] q, int offsetq, int ldq, double[] wr, int offsetwr, double[] wi, int offsetwi, org.netlib.util.intW m, org.netlib.util.doubleW s, org.netlib.util.doubleW sep, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { + org.netlib.lapack.Dtrsen.dtrsen(job, compq, select, offsetselect, n, t, offsett, ldt, q, offsetq, ldq, wr, offsetwr, wi, offsetwi, m, s, sep, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected void dtrsnaK(String job, String howmny, boolean[] select, int _select_offset, int n, double[] t, int _t_offset, int ldt, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] s, int _s_offset, double[] sep, int _sep_offset, int mm, org.netlib.util.intW m, double[] work, int _work_offset, int ldwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dtrsna.dtrsna(job, howmny, select, _select_offset, n, t, _t_offset, ldt, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, s, _s_offset, sep, _sep_offset, mm, m, work, _work_offset, ldwork, iwork, _iwork_offset, info); + protected void dtrsnaK(String job, String howmny, boolean[] select, int offsetselect, int n, double[] t, int offsett, int ldt, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, double[] s, int offsets, double[] sep, int offsetsep, int mm, org.netlib.util.intW m, double[] work, int offsetwork, int ldwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Dtrsna.dtrsna(job, howmny, select, offsetselect, n, t, offsett, ldt, vl, offsetvl, ldvl, vr, offsetvr, ldvr, s, offsets, sep, offsetsep, mm, m, work, offsetwork, ldwork, iwork, offsetiwork, info); } - protected void dtrsylK(String trana, String tranb, int isgn, int m, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] c, int _c_offset, int Ldc, org.netlib.util.doubleW scale, org.netlib.util.intW info) { - org.netlib.lapack.Dtrsyl.dtrsyl(trana, tranb, isgn, m, n, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, Ldc, scale, info); + protected void dtrsylK(String trana, String tranb, int isgn, int m, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] c, int offsetc, int Ldc, org.netlib.util.doubleW scale, org.netlib.util.intW info) { + org.netlib.lapack.Dtrsyl.dtrsyl(trana, tranb, isgn, m, n, a, offseta, lda, b, offsetb, ldb, c, offsetc, Ldc, scale, info); } - protected void dtrti2K(String uplo, String diag, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info) { - org.netlib.lapack.Dtrti2.dtrti2(uplo, diag, n, a, _a_offset, lda, info); + protected void dtrti2K(String uplo, String diag, int n, double[] a, int offseta, int lda, org.netlib.util.intW info) { + org.netlib.lapack.Dtrti2.dtrti2(uplo, diag, n, a, offseta, lda, info); } - protected void dtrtriK(String uplo, String diag, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info) { - org.netlib.lapack.Dtrtri.dtrtri(uplo, diag, n, a, _a_offset, lda, info); + protected void dtrtriK(String uplo, String diag, int n, double[] a, int offseta, int lda, org.netlib.util.intW info) { + org.netlib.lapack.Dtrtri.dtrtri(uplo, diag, n, a, offseta, lda, info); } - protected void dtrtrsK(String uplo, String trans, String diag, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Dtrtrs.dtrtrs(uplo, trans, diag, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, info); + protected void dtrtrsK(String uplo, String trans, String diag, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Dtrtrs.dtrtrs(uplo, trans, diag, n, nrhs, a, offseta, lda, b, offsetb, ldb, info); } - protected void dtzrqfK(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, org.netlib.util.intW info) { - org.netlib.lapack.Dtzrqf.dtzrqf(m, n, a, _a_offset, lda, tau, _tau_offset, info); + protected void dtzrqfK(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, org.netlib.util.intW info) { + org.netlib.lapack.Dtzrqf.dtzrqf(m, n, a, offseta, lda, tau, offsettau, info); } - protected void dtzrzfK(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Dtzrzf.dtzrzf(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + protected void dtzrzfK(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Dtzrzf.dtzrzf(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } protected int ieeeckK(int ispec, float zero, float one) { @@ -1465,304 +1465,304 @@ protected boolean lsamenK(int n, String ca, String cb) { return org.netlib.lapack.Lsamen.lsamen(n, ca, cb); } - protected void sbdsdcK(String uplo, String compq, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, float[] q, int _q_offset, int[] iq, int _iq_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sbdsdc.sbdsdc(uplo, compq, n, d, _d_offset, e, _e_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, q, _q_offset, iq, _iq_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void sbdsdcK(String uplo, String compq, int n, float[] d, int offsetd, float[] e, int offsete, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int ldvt, float[] q, int offsetq, int[] iq, int offsetiq, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Sbdsdc.sbdsdc(uplo, compq, n, d, offsetd, e, offsete, u, offsetu, ldu, vt, offsetvt, ldvt, q, offsetq, iq, offsetiq, work, offsetwork, iwork, offsetiwork, info); } - protected void sbdsqrK(String uplo, int n, int ncvt, int nru, int ncc, float[] d, int _d_offset, float[] e, int _e_offset, float[] vt, int _vt_offset, int ldvt, float[] u, int _u_offset, int ldu, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sbdsqr.sbdsqr(uplo, n, ncvt, nru, ncc, d, _d_offset, e, _e_offset, vt, _vt_offset, ldvt, u, _u_offset, ldu, c, _c_offset, Ldc, work, _work_offset, info); + protected void sbdsqrK(String uplo, int n, int ncvt, int nru, int ncc, float[] d, int offsetd, float[] e, int offsete, float[] vt, int offsetvt, int ldvt, float[] u, int offsetu, int ldu, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Sbdsqr.sbdsqr(uplo, n, ncvt, nru, ncc, d, offsetd, e, offsete, vt, offsetvt, ldvt, u, offsetu, ldu, c, offsetc, Ldc, work, offsetwork, info); } - protected void sdisnaK(String job, int m, int n, float[] d, int _d_offset, float[] sep, int _sep_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sdisna.sdisna(job, m, n, d, _d_offset, sep, _sep_offset, info); + protected void sdisnaK(String job, int m, int n, float[] d, int offsetd, float[] sep, int offsetsep, org.netlib.util.intW info) { + org.netlib.lapack.Sdisna.sdisna(job, m, n, d, offsetd, sep, offsetsep, info); } - protected void sgbbrdK(String vect, int m, int n, int ncc, int kl, int ku, float[] ab, int _ab_offset, int ldab, float[] d, int _d_offset, float[] e, int _e_offset, float[] q, int _q_offset, int ldq, float[] pt, int _pt_offset, int ldpt, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sgbbrd.sgbbrd(vect, m, n, ncc, kl, ku, ab, _ab_offset, ldab, d, _d_offset, e, _e_offset, q, _q_offset, ldq, pt, _pt_offset, ldpt, c, _c_offset, Ldc, work, _work_offset, info); + protected void sgbbrdK(String vect, int m, int n, int ncc, int kl, int ku, float[] ab, int offsetab, int ldab, float[] d, int offsetd, float[] e, int offsete, float[] q, int offsetq, int ldq, float[] pt, int offsetpt, int ldpt, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgbbrd.sgbbrd(vect, m, n, ncc, kl, ku, ab, offsetab, ldab, d, offsetd, e, offsete, q, offsetq, ldq, pt, offsetpt, ldpt, c, offsetc, Ldc, work, offsetwork, info); } - protected void sgbconK(String norm, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sgbcon.sgbcon(norm, n, kl, ku, ab, _ab_offset, ldab, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + protected void sgbconK(String norm, int n, int kl, int ku, float[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgbcon.sgbcon(norm, n, kl, ku, ab, offsetab, ldab, ipiv, offsetipiv, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected void sgbequK(int m, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, float[] r, int _r_offset, float[] c, int _c_offset, org.netlib.util.floatW rowcnd, org.netlib.util.floatW colcnd, org.netlib.util.floatW amax, org.netlib.util.intW info) { - org.netlib.lapack.Sgbequ.sgbequ(m, n, kl, ku, ab, _ab_offset, ldab, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, info); + protected void sgbequK(int m, int n, int kl, int ku, float[] ab, int offsetab, int ldab, float[] r, int offsetr, float[] c, int offsetc, org.netlib.util.floatW rowcnd, org.netlib.util.floatW colcnd, org.netlib.util.floatW amax, org.netlib.util.intW info) { + org.netlib.lapack.Sgbequ.sgbequ(m, n, kl, ku, ab, offsetab, ldab, r, offsetr, c, offsetc, rowcnd, colcnd, amax, info); } - protected void sgbrfsK(String trans, int n, int kl, int ku, int nrhs, float[] ab, int _ab_offset, int ldab, float[] afb, int _afb_offset, int ldafb, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sgbrfs.sgbrfs(trans, n, kl, ku, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void sgbrfsK(String trans, int n, int kl, int ku, int nrhs, float[] ab, int offsetab, int ldab, float[] afb, int offsetafb, int ldafb, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgbrfs.sgbrfs(trans, n, kl, ku, nrhs, ab, offsetab, ldab, afb, offsetafb, ldafb, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void sgbsvK(int n, int kl, int ku, int nrhs, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Sgbsv.sgbsv(n, kl, ku, nrhs, ab, _ab_offset, ldab, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + protected void sgbsvK(int n, int kl, int ku, int nrhs, float[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Sgbsv.sgbsv(n, kl, ku, nrhs, ab, offsetab, ldab, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected void sgbsvxK(String fact, String trans, int n, int kl, int ku, int nrhs, float[] ab, int _ab_offset, int ldab, float[] afb, int _afb_offset, int ldafb, int[] ipiv, int _ipiv_offset, org.netlib.util.StringW equed, float[] r, int _r_offset, float[] c, int _c_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sgbsvx.sgbsvx(fact, trans, n, kl, ku, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, ipiv, _ipiv_offset, equed, r, _r_offset, c, _c_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void sgbsvxK(String fact, String trans, int n, int kl, int ku, int nrhs, float[] ab, int offsetab, int ldab, float[] afb, int offsetafb, int ldafb, int[] ipiv, int offsetipiv, org.netlib.util.StringW equed, float[] r, int offsetr, float[] c, int offsetc, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgbsvx.sgbsvx(fact, trans, n, kl, ku, nrhs, ab, offsetab, ldab, afb, offsetafb, ldafb, ipiv, offsetipiv, equed, r, offsetr, c, offsetc, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void sgbtf2K(int m, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sgbtf2.sgbtf2(m, n, kl, ku, ab, _ab_offset, ldab, ipiv, _ipiv_offset, info); + protected void sgbtf2K(int m, int n, int kl, int ku, float[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, org.netlib.util.intW info) { + org.netlib.lapack.Sgbtf2.sgbtf2(m, n, kl, ku, ab, offsetab, ldab, ipiv, offsetipiv, info); } - protected void sgbtrfK(int m, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sgbtrf.sgbtrf(m, n, kl, ku, ab, _ab_offset, ldab, ipiv, _ipiv_offset, info); + protected void sgbtrfK(int m, int n, int kl, int ku, float[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, org.netlib.util.intW info) { + org.netlib.lapack.Sgbtrf.sgbtrf(m, n, kl, ku, ab, offsetab, ldab, ipiv, offsetipiv, info); } - protected void sgbtrsK(String trans, int n, int kl, int ku, int nrhs, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Sgbtrs.sgbtrs(trans, n, kl, ku, nrhs, ab, _ab_offset, ldab, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + protected void sgbtrsK(String trans, int n, int kl, int ku, int nrhs, float[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Sgbtrs.sgbtrs(trans, n, kl, ku, nrhs, ab, offsetab, ldab, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected void sgebakK(String job, String side, int n, int ilo, int ihi, float[] scale, int _scale_offset, int m, float[] v, int _v_offset, int ldv, org.netlib.util.intW info) { - org.netlib.lapack.Sgebak.sgebak(job, side, n, ilo, ihi, scale, _scale_offset, m, v, _v_offset, ldv, info); + protected void sgebakK(String job, String side, int n, int ilo, int ihi, float[] scale, int offsetscale, int m, float[] v, int offsetv, int ldv, org.netlib.util.intW info) { + org.netlib.lapack.Sgebak.sgebak(job, side, n, ilo, ihi, scale, offsetscale, m, v, offsetv, ldv, info); } - protected void sgebalK(String job, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] scale, int _scale_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sgebal.sgebal(job, n, a, _a_offset, lda, ilo, ihi, scale, _scale_offset, info); + protected void sgebalK(String job, int n, float[] a, int offseta, int lda, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] scale, int offsetscale, org.netlib.util.intW info) { + org.netlib.lapack.Sgebal.sgebal(job, n, a, offseta, lda, ilo, ihi, scale, offsetscale, info); } - protected void sgebd2K(int m, int n, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tauq, int _tauq_offset, float[] taup, int _taup_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sgebd2.sgebd2(m, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tauq, _tauq_offset, taup, _taup_offset, work, _work_offset, info); + protected void sgebd2K(int m, int n, float[] a, int offseta, int lda, float[] d, int offsetd, float[] e, int offsete, float[] tauq, int offsettauq, float[] taup, int offsettaup, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgebd2.sgebd2(m, n, a, offseta, lda, d, offsetd, e, offsete, tauq, offsettauq, taup, offsettaup, work, offsetwork, info); } - protected void sgebrdK(int m, int n, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tauq, int _tauq_offset, float[] taup, int _taup_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sgebrd.sgebrd(m, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tauq, _tauq_offset, taup, _taup_offset, work, _work_offset, lwork, info); + protected void sgebrdK(int m, int n, float[] a, int offseta, int lda, float[] d, int offsetd, float[] e, int offsete, float[] tauq, int offsettauq, float[] taup, int offsettaup, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgebrd.sgebrd(m, n, a, offseta, lda, d, offsetd, e, offsete, tauq, offsettauq, taup, offsettaup, work, offsetwork, lwork, info); } - protected void sgeconK(String norm, int n, float[] a, int _a_offset, int lda, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sgecon.sgecon(norm, n, a, _a_offset, lda, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + protected void sgeconK(String norm, int n, float[] a, int offseta, int lda, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgecon.sgecon(norm, n, a, offseta, lda, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected void sgeequK(int m, int n, float[] a, int _a_offset, int lda, float[] r, int _r_offset, float[] c, int _c_offset, org.netlib.util.floatW rowcnd, org.netlib.util.floatW colcnd, org.netlib.util.floatW amax, org.netlib.util.intW info) { - org.netlib.lapack.Sgeequ.sgeequ(m, n, a, _a_offset, lda, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, info); + protected void sgeequK(int m, int n, float[] a, int offseta, int lda, float[] r, int offsetr, float[] c, int offsetc, org.netlib.util.floatW rowcnd, org.netlib.util.floatW colcnd, org.netlib.util.floatW amax, org.netlib.util.intW info) { + org.netlib.lapack.Sgeequ.sgeequ(m, n, a, offseta, lda, r, offsetr, c, offsetc, rowcnd, colcnd, amax, info); } - protected void sgeesK(String jobvs, String sort, java.lang.Object select, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW sdim, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vs, int _vs_offset, int ldvs, float[] work, int _work_offset, int lwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sgees.sgees(jobvs, sort, select, n, a, _a_offset, lda, sdim, wr, _wr_offset, wi, _wi_offset, vs, _vs_offset, ldvs, work, _work_offset, lwork, bwork, _bwork_offset, info); + protected void sgeesK(String jobvs, String sort, java.lang.Object select, int n, float[] a, int offseta, int lda, org.netlib.util.intW sdim, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] vs, int offsetvs, int ldvs, float[] work, int offsetwork, int lwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgees.sgees(jobvs, sort, select, n, a, offseta, lda, sdim, wr, offsetwr, wi, offsetwi, vs, offsetvs, ldvs, work, offsetwork, lwork, bwork, offsetbwork, info); } - protected void sgeesxK(String jobvs, String sort, java.lang.Object select, String sense, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW sdim, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vs, int _vs_offset, int ldvs, org.netlib.util.floatW rconde, org.netlib.util.floatW rcondv, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sgeesx.sgeesx(jobvs, sort, select, sense, n, a, _a_offset, lda, sdim, wr, _wr_offset, wi, _wi_offset, vs, _vs_offset, ldvs, rconde, rcondv, work, _work_offset, lwork, iwork, _iwork_offset, liwork, bwork, _bwork_offset, info); + protected void sgeesxK(String jobvs, String sort, java.lang.Object select, String sense, int n, float[] a, int offseta, int lda, org.netlib.util.intW sdim, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] vs, int offsetvs, int ldvs, org.netlib.util.floatW rconde, org.netlib.util.floatW rcondv, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgeesx.sgeesx(jobvs, sort, select, sense, n, a, offseta, lda, sdim, wr, offsetwr, wi, offsetwi, vs, offsetvs, ldvs, rconde, rcondv, work, offsetwork, lwork, iwork, offsetiwork, liwork, bwork, offsetbwork, info); } - protected void sgeevK(String jobvl, String jobvr, int n, float[] a, int _a_offset, int lda, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sgeev.sgeev(jobvl, jobvr, n, a, _a_offset, lda, wr, _wr_offset, wi, _wi_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, work, _work_offset, lwork, info); + protected void sgeevK(String jobvl, String jobvr, int n, float[] a, int offseta, int lda, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgeev.sgeev(jobvl, jobvr, n, a, offseta, lda, wr, offsetwr, wi, offsetwi, vl, offsetvl, ldvl, vr, offsetvr, ldvr, work, offsetwork, lwork, info); } - protected void sgeevxK(String balanc, String jobvl, String jobvr, String sense, int n, float[] a, int _a_offset, int lda, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] scale, int _scale_offset, org.netlib.util.floatW abnrm, float[] rconde, int _rconde_offset, float[] rcondv, int _rcondv_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sgeevx.sgeevx(balanc, jobvl, jobvr, sense, n, a, _a_offset, lda, wr, _wr_offset, wi, _wi_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, ilo, ihi, scale, _scale_offset, abnrm, rconde, _rconde_offset, rcondv, _rcondv_offset, work, _work_offset, lwork, iwork, _iwork_offset, info); + protected void sgeevxK(String balanc, String jobvl, String jobvr, String sense, int n, float[] a, int offseta, int lda, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] scale, int offsetscale, org.netlib.util.floatW abnrm, float[] rconde, int offsetrconde, float[] rcondv, int offsetrcondv, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgeevx.sgeevx(balanc, jobvl, jobvr, sense, n, a, offseta, lda, wr, offsetwr, wi, offsetwi, vl, offsetvl, ldvl, vr, offsetvr, ldvr, ilo, ihi, scale, offsetscale, abnrm, rconde, offsetrconde, rcondv, offsetrcondv, work, offsetwork, lwork, iwork, offsetiwork, info); } - protected void sgegsK(String jobvsl, String jobvsr, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vsl, int _vsl_offset, int ldvsl, float[] vsr, int _vsr_offset, int ldvsr, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sgegs.sgegs(jobvsl, jobvsr, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vsl, _vsl_offset, ldvsl, vsr, _vsr_offset, ldvsr, work, _work_offset, lwork, info); + protected void sgegsK(String jobvsl, String jobvsr, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] vsl, int offsetvsl, int ldvsl, float[] vsr, int offsetvsr, int ldvsr, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgegs.sgegs(jobvsl, jobvsr, n, a, offseta, lda, b, offsetb, ldb, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, vsl, offsetvsl, ldvsl, vsr, offsetvsr, ldvsr, work, offsetwork, lwork, info); } - protected void sgegvK(String jobvl, String jobvr, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sgegv.sgegv(jobvl, jobvr, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, work, _work_offset, lwork, info); + protected void sgegvK(String jobvl, String jobvr, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgegv.sgegv(jobvl, jobvr, n, a, offseta, lda, b, offsetb, ldb, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, vl, offsetvl, ldvl, vr, offsetvr, ldvr, work, offsetwork, lwork, info); } - protected void sgehd2K(int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sgehd2.sgehd2(n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + protected void sgehd2K(int n, int ilo, int ihi, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgehd2.sgehd2(n, ilo, ihi, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected void sgehrdK(int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sgehrd.sgehrd(n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + protected void sgehrdK(int n, int ilo, int ihi, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgehrd.sgehrd(n, ilo, ihi, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected void sgelq2K(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sgelq2.sgelq2(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + protected void sgelq2K(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgelq2.sgelq2(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected void sgelqfK(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sgelqf.sgelqf(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + protected void sgelqfK(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgelqf.sgelqf(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected void sgelsK(String trans, int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sgels.sgels(trans, m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, work, _work_offset, lwork, info); + protected void sgelsK(String trans, int m, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgels.sgels(trans, m, n, nrhs, a, offseta, lda, b, offsetb, ldb, work, offsetwork, lwork, info); } - protected void sgelsdK(int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] s, int _s_offset, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sgelsd.sgelsd(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, s, _s_offset, rcond, rank, work, _work_offset, lwork, iwork, _iwork_offset, info); + protected void sgelsdK(int m, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] s, int offsets, float rcond, org.netlib.util.intW rank, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgelsd.sgelsd(m, n, nrhs, a, offseta, lda, b, offsetb, ldb, s, offsets, rcond, rank, work, offsetwork, lwork, iwork, offsetiwork, info); } - protected void sgelssK(int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] s, int _s_offset, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sgelss.sgelss(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, s, _s_offset, rcond, rank, work, _work_offset, lwork, info); + protected void sgelssK(int m, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] s, int offsets, float rcond, org.netlib.util.intW rank, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgelss.sgelss(m, n, nrhs, a, offseta, lda, b, offsetb, ldb, s, offsets, rcond, rank, work, offsetwork, lwork, info); } - protected void sgelsxK(int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, int[] jpvt, int _jpvt_offset, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sgelsx.sgelsx(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, jpvt, _jpvt_offset, rcond, rank, work, _work_offset, info); + protected void sgelsxK(int m, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, int[] jpvt, int offsetjpvt, float rcond, org.netlib.util.intW rank, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgelsx.sgelsx(m, n, nrhs, a, offseta, lda, b, offsetb, ldb, jpvt, offsetjpvt, rcond, rank, work, offsetwork, info); } - protected void sgelsyK(int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, int[] jpvt, int _jpvt_offset, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sgelsy.sgelsy(m, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, jpvt, _jpvt_offset, rcond, rank, work, _work_offset, lwork, info); + protected void sgelsyK(int m, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, int[] jpvt, int offsetjpvt, float rcond, org.netlib.util.intW rank, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgelsy.sgelsy(m, n, nrhs, a, offseta, lda, b, offsetb, ldb, jpvt, offsetjpvt, rcond, rank, work, offsetwork, lwork, info); } - protected void sgeql2K(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sgeql2.sgeql2(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + protected void sgeql2K(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgeql2.sgeql2(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected void sgeqlfK(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sgeqlf.sgeqlf(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + protected void sgeqlfK(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgeqlf.sgeqlf(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected void sgeqp3K(int m, int n, float[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sgeqp3.sgeqp3(m, n, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, work, _work_offset, lwork, info); + protected void sgeqp3K(int m, int n, float[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgeqp3.sgeqp3(m, n, a, offseta, lda, jpvt, offsetjpvt, tau, offsettau, work, offsetwork, lwork, info); } - protected void sgeqpfK(int m, int n, float[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sgeqpf.sgeqpf(m, n, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, work, _work_offset, info); + protected void sgeqpfK(int m, int n, float[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgeqpf.sgeqpf(m, n, a, offseta, lda, jpvt, offsetjpvt, tau, offsettau, work, offsetwork, info); } - protected void sgeqr2K(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sgeqr2.sgeqr2(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + protected void sgeqr2K(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgeqr2.sgeqr2(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected void sgeqrfK(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sgeqrf.sgeqrf(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + protected void sgeqrfK(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgeqrf.sgeqrf(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected void sgerfsK(String trans, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sgerfs.sgerfs(trans, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void sgerfsK(String trans, int n, int nrhs, float[] a, int offseta, int lda, float[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgerfs.sgerfs(trans, n, nrhs, a, offseta, lda, af, offsetaf, ldaf, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void sgerq2K(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sgerq2.sgerq2(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + protected void sgerq2K(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgerq2.sgerq2(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected void sgerqfK(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sgerqf.sgerqf(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + protected void sgerqfK(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgerqf.sgerqf(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected void sgesc2K(int n, float[] a, int _a_offset, int lda, float[] rhs, int _rhs_offset, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset, org.netlib.util.floatW scale) { - org.netlib.lapack.Sgesc2.sgesc2(n, a, _a_offset, lda, rhs, _rhs_offset, ipiv, _ipiv_offset, jpiv, _jpiv_offset, scale); + protected void sgesc2K(int n, float[] a, int offseta, int lda, float[] rhs, int offsetrhs, int[] ipiv, int offsetipiv, int[] jpiv, int offsetjpiv, org.netlib.util.floatW scale) { + org.netlib.lapack.Sgesc2.sgesc2(n, a, offseta, lda, rhs, offsetrhs, ipiv, offsetipiv, jpiv, offsetjpiv, scale); } - protected void sgesddK(String jobz, int m, int n, float[] a, int _a_offset, int lda, float[] s, int _s_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sgesdd.sgesdd(jobz, m, n, a, _a_offset, lda, s, _s_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, work, _work_offset, lwork, iwork, _iwork_offset, info); + protected void sgesddK(String jobz, int m, int n, float[] a, int offseta, int lda, float[] s, int offsets, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int ldvt, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgesdd.sgesdd(jobz, m, n, a, offseta, lda, s, offsets, u, offsetu, ldu, vt, offsetvt, ldvt, work, offsetwork, lwork, iwork, offsetiwork, info); } - protected void sgesvK(int n, int nrhs, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Sgesv.sgesv(n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + protected void sgesvK(int n, int nrhs, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Sgesv.sgesv(n, nrhs, a, offseta, lda, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected void sgesvdK(String jobu, String jobvt, int m, int n, float[] a, int _a_offset, int lda, float[] s, int _s_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sgesvd.sgesvd(jobu, jobvt, m, n, a, _a_offset, lda, s, _s_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, work, _work_offset, lwork, info); + protected void sgesvdK(String jobu, String jobvt, int m, int n, float[] a, int offseta, int lda, float[] s, int offsets, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int ldvt, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgesvd.sgesvd(jobu, jobvt, m, n, a, offseta, lda, s, offsets, u, offsetu, ldu, vt, offsetvt, ldvt, work, offsetwork, lwork, info); } - protected void sgesvxK(String fact, String trans, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, org.netlib.util.StringW equed, float[] r, int _r_offset, float[] c, int _c_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sgesvx.sgesvx(fact, trans, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, equed, r, _r_offset, c, _c_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void sgesvxK(String fact, String trans, int n, int nrhs, float[] a, int offseta, int lda, float[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, org.netlib.util.StringW equed, float[] r, int offsetr, float[] c, int offsetc, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgesvx.sgesvx(fact, trans, n, nrhs, a, offseta, lda, af, offsetaf, ldaf, ipiv, offsetipiv, equed, r, offsetr, c, offsetc, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void sgetc2K(int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sgetc2.sgetc2(n, a, _a_offset, lda, ipiv, _ipiv_offset, jpiv, _jpiv_offset, info); + protected void sgetc2K(int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, int[] jpiv, int offsetjpiv, org.netlib.util.intW info) { + org.netlib.lapack.Sgetc2.sgetc2(n, a, offseta, lda, ipiv, offsetipiv, jpiv, offsetjpiv, info); } - protected void sgetf2K(int m, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sgetf2.sgetf2(m, n, a, _a_offset, lda, ipiv, _ipiv_offset, info); + protected void sgetf2K(int m, int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, org.netlib.util.intW info) { + org.netlib.lapack.Sgetf2.sgetf2(m, n, a, offseta, lda, ipiv, offsetipiv, info); } - protected void sgetrfK(int m, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sgetrf.sgetrf(m, n, a, _a_offset, lda, ipiv, _ipiv_offset, info); + protected void sgetrfK(int m, int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, org.netlib.util.intW info) { + org.netlib.lapack.Sgetrf.sgetrf(m, n, a, offseta, lda, ipiv, offsetipiv, info); } - protected void sgetriK(int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sgetri.sgetri(n, a, _a_offset, lda, ipiv, _ipiv_offset, work, _work_offset, lwork, info); + protected void sgetriK(int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgetri.sgetri(n, a, offseta, lda, ipiv, offsetipiv, work, offsetwork, lwork, info); } - protected void sgetrsK(String trans, int n, int nrhs, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Sgetrs.sgetrs(trans, n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + protected void sgetrsK(String trans, int n, int nrhs, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Sgetrs.sgetrs(trans, n, nrhs, a, offseta, lda, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected void sggbakK(String job, String side, int n, int ilo, int ihi, float[] lscale, int _lscale_offset, float[] rscale, int _rscale_offset, int m, float[] v, int _v_offset, int ldv, org.netlib.util.intW info) { - org.netlib.lapack.Sggbak.sggbak(job, side, n, ilo, ihi, lscale, _lscale_offset, rscale, _rscale_offset, m, v, _v_offset, ldv, info); + protected void sggbakK(String job, String side, int n, int ilo, int ihi, float[] lscale, int offsetlscale, float[] rscale, int offsetrscale, int m, float[] v, int offsetv, int ldv, org.netlib.util.intW info) { + org.netlib.lapack.Sggbak.sggbak(job, side, n, ilo, ihi, lscale, offsetlscale, rscale, offsetrscale, m, v, offsetv, ldv, info); } - protected void sggbalK(String job, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] lscale, int _lscale_offset, float[] rscale, int _rscale_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sggbal.sggbal(job, n, a, _a_offset, lda, b, _b_offset, ldb, ilo, ihi, lscale, _lscale_offset, rscale, _rscale_offset, work, _work_offset, info); + protected void sggbalK(String job, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] lscale, int offsetlscale, float[] rscale, int offsetrscale, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Sggbal.sggbal(job, n, a, offseta, lda, b, offsetb, ldb, ilo, ihi, lscale, offsetlscale, rscale, offsetrscale, work, offsetwork, info); } - protected void sggesK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW sdim, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vsl, int _vsl_offset, int ldvsl, float[] vsr, int _vsr_offset, int ldvsr, float[] work, int _work_offset, int lwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sgges.sgges(jobvsl, jobvsr, sort, selctg, n, a, _a_offset, lda, b, _b_offset, ldb, sdim, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vsl, _vsl_offset, ldvsl, vsr, _vsr_offset, ldvsr, work, _work_offset, lwork, bwork, _bwork_offset, info); + protected void sggesK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW sdim, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] vsl, int offsetvsl, int ldvsl, float[] vsr, int offsetvsr, int ldvsr, float[] work, int offsetwork, int lwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgges.sgges(jobvsl, jobvsr, sort, selctg, n, a, offseta, lda, b, offsetb, ldb, sdim, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, vsl, offsetvsl, ldvsl, vsr, offsetvsr, ldvsr, work, offsetwork, lwork, bwork, offsetbwork, info); } - protected void sggesxK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, String sense, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW sdim, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vsl, int _vsl_offset, int ldvsl, float[] vsr, int _vsr_offset, int ldvsr, float[] rconde, int _rconde_offset, float[] rcondv, int _rcondv_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sggesx.sggesx(jobvsl, jobvsr, sort, selctg, sense, n, a, _a_offset, lda, b, _b_offset, ldb, sdim, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vsl, _vsl_offset, ldvsl, vsr, _vsr_offset, ldvsr, rconde, _rconde_offset, rcondv, _rcondv_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, bwork, _bwork_offset, info); + protected void sggesxK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, String sense, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW sdim, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] vsl, int offsetvsl, int ldvsl, float[] vsr, int offsetvsr, int ldvsr, float[] rconde, int offsetrconde, float[] rcondv, int offsetrcondv, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info) { + org.netlib.lapack.Sggesx.sggesx(jobvsl, jobvsr, sort, selctg, sense, n, a, offseta, lda, b, offsetb, ldb, sdim, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, vsl, offsetvsl, ldvsl, vsr, offsetvsr, ldvsr, rconde, offsetrconde, rcondv, offsetrcondv, work, offsetwork, lwork, iwork, offsetiwork, liwork, bwork, offsetbwork, info); } - protected void sggevK(String jobvl, String jobvr, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sggev.sggev(jobvl, jobvr, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, work, _work_offset, lwork, info); + protected void sggevK(String jobvl, String jobvr, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sggev.sggev(jobvl, jobvr, n, a, offseta, lda, b, offsetb, ldb, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, vl, offsetvl, ldvl, vr, offsetvr, ldvr, work, offsetwork, lwork, info); } - protected void sggevxK(String balanc, String jobvl, String jobvr, String sense, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] lscale, int _lscale_offset, float[] rscale, int _rscale_offset, org.netlib.util.floatW abnrm, org.netlib.util.floatW bbnrm, float[] rconde, int _rconde_offset, float[] rcondv, int _rcondv_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sggevx.sggevx(balanc, jobvl, jobvr, sense, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, ilo, ihi, lscale, _lscale_offset, rscale, _rscale_offset, abnrm, bbnrm, rconde, _rconde_offset, rcondv, _rcondv_offset, work, _work_offset, lwork, iwork, _iwork_offset, bwork, _bwork_offset, info); + protected void sggevxK(String balanc, String jobvl, String jobvr, String sense, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] lscale, int offsetlscale, float[] rscale, int offsetrscale, org.netlib.util.floatW abnrm, org.netlib.util.floatW bbnrm, float[] rconde, int offsetrconde, float[] rcondv, int offsetrcondv, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info) { + org.netlib.lapack.Sggevx.sggevx(balanc, jobvl, jobvr, sense, n, a, offseta, lda, b, offsetb, ldb, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, vl, offsetvl, ldvl, vr, offsetvr, ldvr, ilo, ihi, lscale, offsetlscale, rscale, offsetrscale, abnrm, bbnrm, rconde, offsetrconde, rcondv, offsetrcondv, work, offsetwork, lwork, iwork, offsetiwork, bwork, offsetbwork, info); } - protected void sggglmK(int n, int m, int p, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] d, int _d_offset, float[] x, int _x_offset, float[] y, int _y_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sggglm.sggglm(n, m, p, a, _a_offset, lda, b, _b_offset, ldb, d, _d_offset, x, _x_offset, y, _y_offset, work, _work_offset, lwork, info); + protected void sggglmK(int n, int m, int p, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] d, int offsetd, float[] x, int offsetx, float[] y, int offsety, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sggglm.sggglm(n, m, p, a, offseta, lda, b, offsetb, ldb, d, offsetd, x, offsetx, y, offsety, work, offsetwork, lwork, info); } - protected void sgghrdK(String compq, String compz, int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, org.netlib.util.intW info) { - org.netlib.lapack.Sgghrd.sgghrd(compq, compz, n, ilo, ihi, a, _a_offset, lda, b, _b_offset, ldb, q, _q_offset, ldq, z, _z_offset, ldz, info); + protected void sgghrdK(String compq, String compz, int n, int ilo, int ihi, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] q, int offsetq, int ldq, float[] z, int offsetz, int ldz, org.netlib.util.intW info) { + org.netlib.lapack.Sgghrd.sgghrd(compq, compz, n, ilo, ihi, a, offseta, lda, b, offsetb, ldb, q, offsetq, ldq, z, offsetz, ldz, info); } - protected void sgglseK(int m, int n, int p, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] c, int _c_offset, float[] d, int _d_offset, float[] x, int _x_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sgglse.sgglse(m, n, p, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, d, _d_offset, x, _x_offset, work, _work_offset, lwork, info); + protected void sgglseK(int m, int n, int p, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] c, int offsetc, float[] d, int offsetd, float[] x, int offsetx, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgglse.sgglse(m, n, p, a, offseta, lda, b, offsetb, ldb, c, offsetc, d, offsetd, x, offsetx, work, offsetwork, lwork, info); } - protected void sggqrfK(int n, int m, int p, float[] a, int _a_offset, int lda, float[] taua, int _taua_offset, float[] b, int _b_offset, int ldb, float[] taub, int _taub_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sggqrf.sggqrf(n, m, p, a, _a_offset, lda, taua, _taua_offset, b, _b_offset, ldb, taub, _taub_offset, work, _work_offset, lwork, info); + protected void sggqrfK(int n, int m, int p, float[] a, int offseta, int lda, float[] taua, int offsettaua, float[] b, int offsetb, int ldb, float[] taub, int offsettaub, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sggqrf.sggqrf(n, m, p, a, offseta, lda, taua, offsettaua, b, offsetb, ldb, taub, offsettaub, work, offsetwork, lwork, info); } - protected void sggrqfK(int m, int p, int n, float[] a, int _a_offset, int lda, float[] taua, int _taua_offset, float[] b, int _b_offset, int ldb, float[] taub, int _taub_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sggrqf.sggrqf(m, p, n, a, _a_offset, lda, taua, _taua_offset, b, _b_offset, ldb, taub, _taub_offset, work, _work_offset, lwork, info); + protected void sggrqfK(int m, int p, int n, float[] a, int offseta, int lda, float[] taua, int offsettaua, float[] b, int offsetb, int ldb, float[] taub, int offsettaub, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sggrqf.sggrqf(m, p, n, a, offseta, lda, taua, offsettaua, b, offsetb, ldb, taub, offsettaub, work, offsetwork, lwork, info); } - protected void sggsvdK(String jobu, String jobv, String jobq, int m, int n, int p, org.netlib.util.intW k, org.netlib.util.intW l, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alpha, int _alpha_offset, float[] beta, int _beta_offset, float[] u, int _u_offset, int ldu, float[] v, int _v_offset, int ldv, float[] q, int _q_offset, int ldq, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sggsvd.sggsvd(jobu, jobv, jobq, m, n, p, k, l, a, _a_offset, lda, b, _b_offset, ldb, alpha, _alpha_offset, beta, _beta_offset, u, _u_offset, ldu, v, _v_offset, ldv, q, _q_offset, ldq, work, _work_offset, iwork, _iwork_offset, info); + protected void sggsvdK(String jobu, String jobv, String jobq, int m, int n, int p, org.netlib.util.intW k, org.netlib.util.intW l, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alpha, int offsetalpha, float[] beta, int offsetbeta, float[] u, int offsetu, int ldu, float[] v, int offsetv, int ldv, float[] q, int offsetq, int ldq, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Sggsvd.sggsvd(jobu, jobv, jobq, m, n, p, k, l, a, offseta, lda, b, offsetb, ldb, alpha, offsetalpha, beta, offsetbeta, u, offsetu, ldu, v, offsetv, ldv, q, offsetq, ldq, work, offsetwork, iwork, offsetiwork, info); } - protected void sggsvpK(String jobu, String jobv, String jobq, int m, int p, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float tola, float tolb, org.netlib.util.intW k, org.netlib.util.intW l, float[] u, int _u_offset, int ldu, float[] v, int _v_offset, int ldv, float[] q, int _q_offset, int ldq, int[] iwork, int _iwork_offset, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sggsvp.sggsvp(jobu, jobv, jobq, m, p, n, a, _a_offset, lda, b, _b_offset, ldb, tola, tolb, k, l, u, _u_offset, ldu, v, _v_offset, ldv, q, _q_offset, ldq, iwork, _iwork_offset, tau, _tau_offset, work, _work_offset, info); + protected void sggsvpK(String jobu, String jobv, String jobq, int m, int p, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float tola, float tolb, org.netlib.util.intW k, org.netlib.util.intW l, float[] u, int offsetu, int ldu, float[] v, int offsetv, int ldv, float[] q, int offsetq, int ldq, int[] iwork, int offsetiwork, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Sggsvp.sggsvp(jobu, jobv, jobq, m, p, n, a, offseta, lda, b, offsetb, ldb, tola, tolb, k, l, u, offsetu, ldu, v, offsetv, ldv, q, offsetq, ldq, iwork, offsetiwork, tau, offsettau, work, offsetwork, info); } - protected void sgtconK(String norm, int n, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sgtcon.sgtcon(norm, n, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + protected void sgtconK(String norm, int n, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] du2, int offsetdu2, int[] ipiv, int offsetipiv, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgtcon.sgtcon(norm, n, dl, offsetdl, d, offsetd, du, offsetdu, du2, offsetdu2, ipiv, offsetipiv, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected void sgtrfsK(String trans, int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] dlf, int _dlf_offset, float[] df, int _df_offset, float[] duf, int _duf_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sgtrfs.sgtrfs(trans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, dlf, _dlf_offset, df, _df_offset, duf, _duf_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void sgtrfsK(String trans, int n, int nrhs, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] dlf, int offsetdlf, float[] df, int offsetdf, float[] duf, int offsetduf, float[] du2, int offsetdu2, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgtrfs.sgtrfs(trans, n, nrhs, dl, offsetdl, d, offsetd, du, offsetdu, dlf, offsetdlf, df, offsetdf, duf, offsetduf, du2, offsetdu2, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void sgtsvK(int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Sgtsv.sgtsv(n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, b, _b_offset, ldb, info); + protected void sgtsvK(int n, int nrhs, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Sgtsv.sgtsv(n, nrhs, dl, offsetdl, d, offsetd, du, offsetdu, b, offsetb, ldb, info); } - protected void sgtsvxK(String fact, String trans, int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] dlf, int _dlf_offset, float[] df, int _df_offset, float[] duf, int _duf_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sgtsvx.sgtsvx(fact, trans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, dlf, _dlf_offset, df, _df_offset, duf, _duf_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void sgtsvxK(String fact, String trans, int n, int nrhs, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] dlf, int offsetdlf, float[] df, int offsetdf, float[] duf, int offsetduf, float[] du2, int offsetdu2, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Sgtsvx.sgtsvx(fact, trans, n, nrhs, dl, offsetdl, d, offsetd, du, offsetdu, dlf, offsetdlf, df, offsetdf, duf, offsetduf, du2, offsetdu2, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void sgttrfK(int n, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sgttrf.sgttrf(n, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, info); + protected void sgttrfK(int n, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] du2, int offsetdu2, int[] ipiv, int offsetipiv, org.netlib.util.intW info) { + org.netlib.lapack.Sgttrf.sgttrf(n, dl, offsetdl, d, offsetd, du, offsetdu, du2, offsetdu2, ipiv, offsetipiv, info); } - protected void sgttrsK(String trans, int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Sgttrs.sgttrs(trans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + protected void sgttrsK(String trans, int n, int nrhs, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] du2, int offsetdu2, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Sgttrs.sgttrs(trans, n, nrhs, dl, offsetdl, d, offsetd, du, offsetdu, du2, offsetdu2, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected void sgtts2K(int itrans, int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb) { - org.netlib.lapack.Sgtts2.sgtts2(itrans, n, nrhs, dl, _dl_offset, d, _d_offset, du, _du_offset, du2, _du2_offset, ipiv, _ipiv_offset, b, _b_offset, ldb); + protected void sgtts2K(int itrans, int n, int nrhs, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] du2, int offsetdu2, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb) { + org.netlib.lapack.Sgtts2.sgtts2(itrans, n, nrhs, dl, offsetdl, d, offsetd, du, offsetdu, du2, offsetdu2, ipiv, offsetipiv, b, offsetb, ldb); } - protected void shgeqzK(String job, String compq, String compz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] t, int _t_offset, int ldt, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Shgeqz.shgeqz(job, compq, compz, n, ilo, ihi, h, _h_offset, ldh, t, _t_offset, ldt, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, q, _q_offset, ldq, z, _z_offset, ldz, work, _work_offset, lwork, info); + protected void shgeqzK(String job, String compq, String compz, int n, int ilo, int ihi, float[] h, int offseth, int ldh, float[] t, int offsett, int ldt, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] q, int offsetq, int ldq, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Shgeqz.shgeqz(job, compq, compz, n, ilo, ihi, h, offseth, ldh, t, offsett, ldt, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, q, offsetq, ldq, z, offsetz, ldz, work, offsetwork, lwork, info); } - protected void shseinK(String side, String eigsrc, String initv, boolean[] select, int _select_offset, int n, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, float[] work, int _work_offset, int[] ifaill, int _ifaill_offset, int[] ifailr, int _ifailr_offset, org.netlib.util.intW info) { - org.netlib.lapack.Shsein.shsein(side, eigsrc, initv, select, _select_offset, n, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, mm, m, work, _work_offset, ifaill, _ifaill_offset, ifailr, _ifailr_offset, info); + protected void shseinK(String side, String eigsrc, String initv, boolean[] select, int offsetselect, int n, float[] h, int offseth, int ldh, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, int mm, org.netlib.util.intW m, float[] work, int offsetwork, int[] ifaill, int offsetifaill, int[] ifailr, int offsetifailr, org.netlib.util.intW info) { + org.netlib.lapack.Shsein.shsein(side, eigsrc, initv, select, offsetselect, n, h, offseth, ldh, wr, offsetwr, wi, offsetwi, vl, offsetvl, ldvl, vr, offsetvr, ldvr, mm, m, work, offsetwork, ifaill, offsetifaill, ifailr, offsetifailr, info); } - protected void shseqrK(String job, String compz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Shseqr.shseqr(job, compz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, z, _z_offset, ldz, work, _work_offset, lwork, info); + protected void shseqrK(String job, String compz, int n, int ilo, int ihi, float[] h, int offseth, int ldh, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Shseqr.shseqr(job, compz, n, ilo, ihi, h, offseth, ldh, wr, offsetwr, wi, offsetwi, z, offsetz, ldz, work, offsetwork, lwork, info); } protected boolean sisnanK(float sin) { @@ -1773,20 +1773,20 @@ protected void slabadK(org.netlib.util.floatW small, org.netlib.util.floatW larg org.netlib.lapack.Slabad.slabad(small, large); } - protected void slabrdK(int m, int n, int nb, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tauq, int _tauq_offset, float[] taup, int _taup_offset, float[] x, int _x_offset, int ldx, float[] y, int _y_offset, int ldy) { - org.netlib.lapack.Slabrd.slabrd(m, n, nb, a, _a_offset, lda, d, _d_offset, e, _e_offset, tauq, _tauq_offset, taup, _taup_offset, x, _x_offset, ldx, y, _y_offset, ldy); + protected void slabrdK(int m, int n, int nb, float[] a, int offseta, int lda, float[] d, int offsetd, float[] e, int offsete, float[] tauq, int offsettauq, float[] taup, int offsettaup, float[] x, int offsetx, int ldx, float[] y, int offsety, int ldy) { + org.netlib.lapack.Slabrd.slabrd(m, n, nb, a, offseta, lda, d, offsetd, e, offsete, tauq, offsettauq, taup, offsettaup, x, offsetx, ldx, y, offsety, ldy); } - protected void slacn2K(int n, float[] v, int _v_offset, float[] x, int _x_offset, int[] isgn, int _isgn_offset, org.netlib.util.floatW est, org.netlib.util.intW kase, int[] isave, int _isave_offset) { - org.netlib.lapack.Slacn2.slacn2(n, v, _v_offset, x, _x_offset, isgn, _isgn_offset, est, kase, isave, _isave_offset); + protected void slacn2K(int n, float[] v, int offsetv, float[] x, int offsetx, int[] isgn, int offsetisgn, org.netlib.util.floatW est, org.netlib.util.intW kase, int[] isave, int offsetisave) { + org.netlib.lapack.Slacn2.slacn2(n, v, offsetv, x, offsetx, isgn, offsetisgn, est, kase, isave, offsetisave); } - protected void slaconK(int n, float[] v, int _v_offset, float[] x, int _x_offset, int[] isgn, int _isgn_offset, org.netlib.util.floatW est, org.netlib.util.intW kase) { - org.netlib.lapack.Slacon.slacon(n, v, _v_offset, x, _x_offset, isgn, _isgn_offset, est, kase); + protected void slaconK(int n, float[] v, int offsetv, float[] x, int offsetx, int[] isgn, int offsetisgn, org.netlib.util.floatW est, org.netlib.util.intW kase) { + org.netlib.lapack.Slacon.slacon(n, v, offsetv, x, offsetx, isgn, offsetisgn, est, kase); } - protected void slacpyK(String uplo, int m, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb) { - org.netlib.lapack.Slacpy.slacpy(uplo, m, n, a, _a_offset, lda, b, _b_offset, ldb); + protected void slacpyK(String uplo, int m, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb) { + org.netlib.lapack.Slacpy.slacpy(uplo, m, n, a, offseta, lda, b, offsetb, ldb); } protected void sladivK(float a, float b, float c, float d, org.netlib.util.floatW p, org.netlib.util.floatW q) { @@ -1797,192 +1797,192 @@ protected void slae2K(float a, float b, float c, org.netlib.util.floatW rt1, org org.netlib.lapack.Slae2.slae2(a, b, c, rt1, rt2); } - protected void slaebzK(int ijob, int nitmax, int n, int mmax, int minp, int nbmin, float abstol, float reltol, float pivmin, float[] d, int _d_offset, float[] e, int _e_offset, float[] e2, int _e2_offset, int[] nval, int _nval_offset, float[] ab, int _ab_offset, float[] c, int _c_offset, org.netlib.util.intW mout, int[] nab, int _nab_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slaebz.slaebz(ijob, nitmax, n, mmax, minp, nbmin, abstol, reltol, pivmin, d, _d_offset, e, _e_offset, e2, _e2_offset, nval, _nval_offset, ab, _ab_offset, c, _c_offset, mout, nab, _nab_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void slaebzK(int ijob, int nitmax, int n, int mmax, int minp, int nbmin, float abstol, float reltol, float pivmin, float[] d, int offsetd, float[] e, int offsete, float[] e2, int offsete2, int[] nval, int offsetnval, float[] ab, int offsetab, float[] c, int offsetc, org.netlib.util.intW mout, int[] nab, int offsetnab, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Slaebz.slaebz(ijob, nitmax, n, mmax, minp, nbmin, abstol, reltol, pivmin, d, offsetd, e, offsete, e2, offsete2, nval, offsetnval, ab, offsetab, c, offsetc, mout, nab, offsetnab, work, offsetwork, iwork, offsetiwork, info); } - protected void slaed0K(int icompq, int qsiz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] q, int _q_offset, int ldq, float[] qstore, int _qstore_offset, int ldqs, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slaed0.slaed0(icompq, qsiz, n, d, _d_offset, e, _e_offset, q, _q_offset, ldq, qstore, _qstore_offset, ldqs, work, _work_offset, iwork, _iwork_offset, info); + protected void slaed0K(int icompq, int qsiz, int n, float[] d, int offsetd, float[] e, int offsete, float[] q, int offsetq, int ldq, float[] qstore, int offsetqstore, int ldqs, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Slaed0.slaed0(icompq, qsiz, n, d, offsetd, e, offsete, q, offsetq, ldq, qstore, offsetqstore, ldqs, work, offsetwork, iwork, offsetiwork, info); } - protected void slaed1K(int n, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.floatW rho, int cutpnt, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slaed1.slaed1(n, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, cutpnt, work, _work_offset, iwork, _iwork_offset, info); + protected void slaed1K(int n, float[] d, int offsetd, float[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.floatW rho, int cutpnt, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Slaed1.slaed1(n, d, offsetd, q, offsetq, ldq, indxq, offsetindxq, rho, cutpnt, work, offsetwork, iwork, offsetiwork, info); } - protected void slaed2K(org.netlib.util.intW k, int n, int n1, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.floatW rho, float[] z, int _z_offset, float[] dlamda, int _dlamda_offset, float[] w, int _w_offset, float[] q2, int _q2_offset, int[] indx, int _indx_offset, int[] indxc, int _indxc_offset, int[] indxp, int _indxp_offset, int[] coltyp, int _coltyp_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slaed2.slaed2(k, n, n1, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, z, _z_offset, dlamda, _dlamda_offset, w, _w_offset, q2, _q2_offset, indx, _indx_offset, indxc, _indxc_offset, indxp, _indxp_offset, coltyp, _coltyp_offset, info); + protected void slaed2K(org.netlib.util.intW k, int n, int n1, float[] d, int offsetd, float[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.floatW rho, float[] z, int offsetz, float[] dlamda, int offsetdlamda, float[] w, int offsetw, float[] q2, int offsetq2, int[] indx, int offsetindx, int[] indxc, int offsetindxc, int[] indxp, int offsetindxp, int[] coltyp, int offsetcoltyp, org.netlib.util.intW info) { + org.netlib.lapack.Slaed2.slaed2(k, n, n1, d, offsetd, q, offsetq, ldq, indxq, offsetindxq, rho, z, offsetz, dlamda, offsetdlamda, w, offsetw, q2, offsetq2, indx, offsetindx, indxc, offsetindxc, indxp, offsetindxp, coltyp, offsetcoltyp, info); } - protected void slaed3K(int k, int n, int n1, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, float rho, float[] dlamda, int _dlamda_offset, float[] q2, int _q2_offset, int[] indx, int _indx_offset, int[] ctot, int _ctot_offset, float[] w, int _w_offset, float[] s, int _s_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slaed3.slaed3(k, n, n1, d, _d_offset, q, _q_offset, ldq, rho, dlamda, _dlamda_offset, q2, _q2_offset, indx, _indx_offset, ctot, _ctot_offset, w, _w_offset, s, _s_offset, info); + protected void slaed3K(int k, int n, int n1, float[] d, int offsetd, float[] q, int offsetq, int ldq, float rho, float[] dlamda, int offsetdlamda, float[] q2, int offsetq2, int[] indx, int offsetindx, int[] ctot, int offsetctot, float[] w, int offsetw, float[] s, int offsets, org.netlib.util.intW info) { + org.netlib.lapack.Slaed3.slaed3(k, n, n1, d, offsetd, q, offsetq, ldq, rho, dlamda, offsetdlamda, q2, offsetq2, indx, offsetindx, ctot, offsetctot, w, offsetw, s, offsets, info); } - protected void slaed4K(int n, int i, float[] d, int _d_offset, float[] z, int _z_offset, float[] delta, int _delta_offset, float rho, org.netlib.util.floatW dlam, org.netlib.util.intW info) { - org.netlib.lapack.Slaed4.slaed4(n, i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, dlam, info); + protected void slaed4K(int n, int i, float[] d, int offsetd, float[] z, int offsetz, float[] delta, int offsetdelta, float rho, org.netlib.util.floatW dlam, org.netlib.util.intW info) { + org.netlib.lapack.Slaed4.slaed4(n, i, d, offsetd, z, offsetz, delta, offsetdelta, rho, dlam, info); } - protected void slaed5K(int i, float[] d, int _d_offset, float[] z, int _z_offset, float[] delta, int _delta_offset, float rho, org.netlib.util.floatW dlam) { - org.netlib.lapack.Slaed5.slaed5(i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, dlam); + protected void slaed5K(int i, float[] d, int offsetd, float[] z, int offsetz, float[] delta, int offsetdelta, float rho, org.netlib.util.floatW dlam) { + org.netlib.lapack.Slaed5.slaed5(i, d, offsetd, z, offsetz, delta, offsetdelta, rho, dlam); } - protected void slaed6K(int kniter, boolean orgati, float rho, float[] d, int _d_offset, float[] z, int _z_offset, float finit, org.netlib.util.floatW tau, org.netlib.util.intW info) { - org.netlib.lapack.Slaed6.slaed6(kniter, orgati, rho, d, _d_offset, z, _z_offset, finit, tau, info); + protected void slaed6K(int kniter, boolean orgati, float rho, float[] d, int offsetd, float[] z, int offsetz, float finit, org.netlib.util.floatW tau, org.netlib.util.intW info) { + org.netlib.lapack.Slaed6.slaed6(kniter, orgati, rho, d, offsetd, z, offsetz, finit, tau, info); } - protected void slaed7K(int icompq, int n, int qsiz, int tlvls, int curlvl, int curpbm, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.floatW rho, int cutpnt, float[] qstore, int _qstore_offset, int[] qptr, int _qptr_offset, int[] prmptr, int _prmptr_offset, int[] perm, int _perm_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, float[] givnum, int _givnum_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slaed7.slaed7(icompq, n, qsiz, tlvls, curlvl, curpbm, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, cutpnt, qstore, _qstore_offset, qptr, _qptr_offset, prmptr, _prmptr_offset, perm, _perm_offset, givptr, _givptr_offset, givcol, _givcol_offset, givnum, _givnum_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void slaed7K(int icompq, int n, int qsiz, int tlvls, int curlvl, int curpbm, float[] d, int offsetd, float[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.floatW rho, int cutpnt, float[] qstore, int offsetqstore, int[] qptr, int offsetqptr, int[] prmptr, int offsetprmptr, int[] perm, int offsetperm, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, float[] givnum, int offsetgivnum, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Slaed7.slaed7(icompq, n, qsiz, tlvls, curlvl, curpbm, d, offsetd, q, offsetq, ldq, indxq, offsetindxq, rho, cutpnt, qstore, offsetqstore, qptr, offsetqptr, prmptr, offsetprmptr, perm, offsetperm, givptr, offsetgivptr, givcol, offsetgivcol, givnum, offsetgivnum, work, offsetwork, iwork, offsetiwork, info); } - protected void slaed8K(int icompq, org.netlib.util.intW k, int n, int qsiz, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.floatW rho, int cutpnt, float[] z, int _z_offset, float[] dlamda, int _dlamda_offset, float[] q2, int _q2_offset, int ldq2, float[] w, int _w_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, float[] givnum, int _givnum_offset, int[] indxp, int _indxp_offset, int[] indx, int _indx_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slaed8.slaed8(icompq, k, n, qsiz, d, _d_offset, q, _q_offset, ldq, indxq, _indxq_offset, rho, cutpnt, z, _z_offset, dlamda, _dlamda_offset, q2, _q2_offset, ldq2, w, _w_offset, perm, _perm_offset, givptr, givcol, _givcol_offset, givnum, _givnum_offset, indxp, _indxp_offset, indx, _indx_offset, info); + protected void slaed8K(int icompq, org.netlib.util.intW k, int n, int qsiz, float[] d, int offsetd, float[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.floatW rho, int cutpnt, float[] z, int offsetz, float[] dlamda, int offsetdlamda, float[] q2, int offsetq2, int ldq2, float[] w, int offsetw, int[] perm, int offsetperm, org.netlib.util.intW givptr, int[] givcol, int offsetgivcol, float[] givnum, int offsetgivnum, int[] indxp, int offsetindxp, int[] indx, int offsetindx, org.netlib.util.intW info) { + org.netlib.lapack.Slaed8.slaed8(icompq, k, n, qsiz, d, offsetd, q, offsetq, ldq, indxq, offsetindxq, rho, cutpnt, z, offsetz, dlamda, offsetdlamda, q2, offsetq2, ldq2, w, offsetw, perm, offsetperm, givptr, givcol, offsetgivcol, givnum, offsetgivnum, indxp, offsetindxp, indx, offsetindx, info); } - protected void slaed9K(int k, int kstart, int kstop, int n, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, float rho, float[] dlamda, int _dlamda_offset, float[] w, int _w_offset, float[] s, int _s_offset, int lds, org.netlib.util.intW info) { - org.netlib.lapack.Slaed9.slaed9(k, kstart, kstop, n, d, _d_offset, q, _q_offset, ldq, rho, dlamda, _dlamda_offset, w, _w_offset, s, _s_offset, lds, info); + protected void slaed9K(int k, int kstart, int kstop, int n, float[] d, int offsetd, float[] q, int offsetq, int ldq, float rho, float[] dlamda, int offsetdlamda, float[] w, int offsetw, float[] s, int offsets, int lds, org.netlib.util.intW info) { + org.netlib.lapack.Slaed9.slaed9(k, kstart, kstop, n, d, offsetd, q, offsetq, ldq, rho, dlamda, offsetdlamda, w, offsetw, s, offsets, lds, info); } - protected void slaedaK(int n, int tlvls, int curlvl, int curpbm, int[] prmptr, int _prmptr_offset, int[] perm, int _perm_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, float[] givnum, int _givnum_offset, float[] q, int _q_offset, int[] qptr, int _qptr_offset, float[] z, int _z_offset, float[] ztemp, int _ztemp_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slaeda.slaeda(n, tlvls, curlvl, curpbm, prmptr, _prmptr_offset, perm, _perm_offset, givptr, _givptr_offset, givcol, _givcol_offset, givnum, _givnum_offset, q, _q_offset, qptr, _qptr_offset, z, _z_offset, ztemp, _ztemp_offset, info); + protected void slaedaK(int n, int tlvls, int curlvl, int curpbm, int[] prmptr, int offsetprmptr, int[] perm, int offsetperm, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, float[] givnum, int offsetgivnum, float[] q, int offsetq, int[] qptr, int offsetqptr, float[] z, int offsetz, float[] ztemp, int offsetztemp, org.netlib.util.intW info) { + org.netlib.lapack.Slaeda.slaeda(n, tlvls, curlvl, curpbm, prmptr, offsetprmptr, perm, offsetperm, givptr, offsetgivptr, givcol, offsetgivcol, givnum, offsetgivnum, q, offsetq, qptr, offsetqptr, z, offsetz, ztemp, offsetztemp, info); } - protected void slaeinK(boolean rightv, boolean noinit, int n, float[] h, int _h_offset, int ldh, float wr, float wi, float[] vr, int _vr_offset, float[] vi, int _vi_offset, float[] b, int _b_offset, int ldb, float[] work, int _work_offset, float eps3, float smlnum, float bignum, org.netlib.util.intW info) { - org.netlib.lapack.Slaein.slaein(rightv, noinit, n, h, _h_offset, ldh, wr, wi, vr, _vr_offset, vi, _vi_offset, b, _b_offset, ldb, work, _work_offset, eps3, smlnum, bignum, info); + protected void slaeinK(boolean rightv, boolean noinit, int n, float[] h, int offseth, int ldh, float wr, float wi, float[] vr, int offsetvr, float[] vi, int offsetvi, float[] b, int offsetb, int ldb, float[] work, int offsetwork, float eps3, float smlnum, float bignum, org.netlib.util.intW info) { + org.netlib.lapack.Slaein.slaein(rightv, noinit, n, h, offseth, ldh, wr, wi, vr, offsetvr, vi, offsetvi, b, offsetb, ldb, work, offsetwork, eps3, smlnum, bignum, info); } protected void slaev2K(float a, float b, float c, org.netlib.util.floatW rt1, org.netlib.util.floatW rt2, org.netlib.util.floatW cs1, org.netlib.util.floatW sn1) { org.netlib.lapack.Slaev2.slaev2(a, b, c, rt1, rt2, cs1, sn1); } - protected void slaexcK(boolean wantq, int n, float[] t, int _t_offset, int ldt, float[] q, int _q_offset, int ldq, int j1, int n1, int n2, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slaexc.slaexc(wantq, n, t, _t_offset, ldt, q, _q_offset, ldq, j1, n1, n2, work, _work_offset, info); + protected void slaexcK(boolean wantq, int n, float[] t, int offsett, int ldt, float[] q, int offsetq, int ldq, int j1, int n1, int n2, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Slaexc.slaexc(wantq, n, t, offsett, ldt, q, offsetq, ldq, j1, n1, n2, work, offsetwork, info); } - protected void slag2K(float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float safmin, org.netlib.util.floatW scale1, org.netlib.util.floatW scale2, org.netlib.util.floatW wr1, org.netlib.util.floatW wr2, org.netlib.util.floatW wi) { - org.netlib.lapack.Slag2.slag2(a, _a_offset, lda, b, _b_offset, ldb, safmin, scale1, scale2, wr1, wr2, wi); + protected void slag2K(float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float safmin, org.netlib.util.floatW scale1, org.netlib.util.floatW scale2, org.netlib.util.floatW wr1, org.netlib.util.floatW wr2, org.netlib.util.floatW wi) { + org.netlib.lapack.Slag2.slag2(a, offseta, lda, b, offsetb, ldb, safmin, scale1, scale2, wr1, wr2, wi); } - protected void slag2dK(int m, int n, float[] sa, int _sa_offset, int ldsa, double[] a, int _a_offset, int lda, org.netlib.util.intW info) { - org.netlib.lapack.Slag2d.slag2d(m, n, sa, _sa_offset, ldsa, a, _a_offset, lda, info); + protected void slag2dK(int m, int n, float[] sa, int offsetsa, int ldsa, double[] a, int offseta, int lda, org.netlib.util.intW info) { + org.netlib.lapack.Slag2d.slag2d(m, n, sa, offsetsa, ldsa, a, offseta, lda, info); } protected void slags2K(boolean upper, float a1, float a2, float a3, float b1, float b2, float b3, org.netlib.util.floatW csu, org.netlib.util.floatW snu, org.netlib.util.floatW csv, org.netlib.util.floatW snv, org.netlib.util.floatW csq, org.netlib.util.floatW snq) { org.netlib.lapack.Slags2.slags2(upper, a1, a2, a3, b1, b2, b3, csu, snu, csv, snv, csq, snq); } - protected void slagtfK(int n, float[] a, int _a_offset, float lambda, float[] b, int _b_offset, float[] c, int _c_offset, float tol, float[] d, int _d_offset, int[] in, int _in_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slagtf.slagtf(n, a, _a_offset, lambda, b, _b_offset, c, _c_offset, tol, d, _d_offset, in, _in_offset, info); + protected void slagtfK(int n, float[] a, int offseta, float lambda, float[] b, int offsetb, float[] c, int offsetc, float tol, float[] d, int offsetd, int[] in, int offsetin, org.netlib.util.intW info) { + org.netlib.lapack.Slagtf.slagtf(n, a, offseta, lambda, b, offsetb, c, offsetc, tol, d, offsetd, in, offsetin, info); } - protected void slagtmK(String trans, int n, int nrhs, float alpha, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] x, int _x_offset, int ldx, float beta, float[] b, int _b_offset, int ldb) { - org.netlib.lapack.Slagtm.slagtm(trans, n, nrhs, alpha, dl, _dl_offset, d, _d_offset, du, _du_offset, x, _x_offset, ldx, beta, b, _b_offset, ldb); + protected void slagtmK(String trans, int n, int nrhs, float alpha, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] x, int offsetx, int ldx, float beta, float[] b, int offsetb, int ldb) { + org.netlib.lapack.Slagtm.slagtm(trans, n, nrhs, alpha, dl, offsetdl, d, offsetd, du, offsetdu, x, offsetx, ldx, beta, b, offsetb, ldb); } - protected void slagtsK(int job, int n, float[] a, int _a_offset, float[] b, int _b_offset, float[] c, int _c_offset, float[] d, int _d_offset, int[] in, int _in_offset, float[] y, int _y_offset, org.netlib.util.floatW tol, org.netlib.util.intW info) { - org.netlib.lapack.Slagts.slagts(job, n, a, _a_offset, b, _b_offset, c, _c_offset, d, _d_offset, in, _in_offset, y, _y_offset, tol, info); + protected void slagtsK(int job, int n, float[] a, int offseta, float[] b, int offsetb, float[] c, int offsetc, float[] d, int offsetd, int[] in, int offsetin, float[] y, int offsety, org.netlib.util.floatW tol, org.netlib.util.intW info) { + org.netlib.lapack.Slagts.slagts(job, n, a, offseta, b, offsetb, c, offsetc, d, offsetd, in, offsetin, y, offsety, tol, info); } - protected void slagv2K(float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, org.netlib.util.floatW csl, org.netlib.util.floatW snl, org.netlib.util.floatW csr, org.netlib.util.floatW snr) { - org.netlib.lapack.Slagv2.slagv2(a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, csl, snl, csr, snr); + protected void slagv2K(float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, org.netlib.util.floatW csl, org.netlib.util.floatW snl, org.netlib.util.floatW csr, org.netlib.util.floatW snr) { + org.netlib.lapack.Slagv2.slagv2(a, offseta, lda, b, offsetb, ldb, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, csl, snl, csr, snr); } - protected void slahqrK(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, int iloz, int ihiz, float[] z, int _z_offset, int ldz, org.netlib.util.intW info) { - org.netlib.lapack.Slahqr.slahqr(wantt, wantz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, iloz, ihiz, z, _z_offset, ldz, info); + protected void slahqrK(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int offseth, int ldh, float[] wr, int offsetwr, float[] wi, int offsetwi, int iloz, int ihiz, float[] z, int offsetz, int ldz, org.netlib.util.intW info) { + org.netlib.lapack.Slahqr.slahqr(wantt, wantz, n, ilo, ihi, h, offseth, ldh, wr, offsetwr, wi, offsetwi, iloz, ihiz, z, offsetz, ldz, info); } - protected void slahr2K(int n, int k, int nb, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] t, int _t_offset, int ldt, float[] y, int _y_offset, int ldy) { - org.netlib.lapack.Slahr2.slahr2(n, k, nb, a, _a_offset, lda, tau, _tau_offset, t, _t_offset, ldt, y, _y_offset, ldy); + protected void slahr2K(int n, int k, int nb, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] t, int offsett, int ldt, float[] y, int offsety, int ldy) { + org.netlib.lapack.Slahr2.slahr2(n, k, nb, a, offseta, lda, tau, offsettau, t, offsett, ldt, y, offsety, ldy); } - protected void slahrdK(int n, int k, int nb, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] t, int _t_offset, int ldt, float[] y, int _y_offset, int ldy) { - org.netlib.lapack.Slahrd.slahrd(n, k, nb, a, _a_offset, lda, tau, _tau_offset, t, _t_offset, ldt, y, _y_offset, ldy); + protected void slahrdK(int n, int k, int nb, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] t, int offsett, int ldt, float[] y, int offsety, int ldy) { + org.netlib.lapack.Slahrd.slahrd(n, k, nb, a, offseta, lda, tau, offsettau, t, offsett, ldt, y, offsety, ldy); } - protected void slaic1K(int job, int j, float[] x, int _x_offset, float sest, float[] w, int _w_offset, float gamma, org.netlib.util.floatW sestpr, org.netlib.util.floatW s, org.netlib.util.floatW c) { - org.netlib.lapack.Slaic1.slaic1(job, j, x, _x_offset, sest, w, _w_offset, gamma, sestpr, s, c); + protected void slaic1K(int job, int j, float[] x, int offsetx, float sest, float[] w, int offsetw, float gamma, org.netlib.util.floatW sestpr, org.netlib.util.floatW s, org.netlib.util.floatW c) { + org.netlib.lapack.Slaic1.slaic1(job, j, x, offsetx, sest, w, offsetw, gamma, sestpr, s, c); } protected boolean slaisnanK(float sin1, float sin2) { return org.netlib.lapack.Slaisnan.slaisnan(sin1, sin2); } - protected void slaln2K(boolean ltrans, int na, int nw, float smin, float ca, float[] a, int _a_offset, int lda, float d1, float d2, float[] b, int _b_offset, int ldb, float wr, float wi, float[] x, int _x_offset, int ldx, org.netlib.util.floatW scale, org.netlib.util.floatW xnorm, org.netlib.util.intW info) { - org.netlib.lapack.Slaln2.slaln2(ltrans, na, nw, smin, ca, a, _a_offset, lda, d1, d2, b, _b_offset, ldb, wr, wi, x, _x_offset, ldx, scale, xnorm, info); + protected void slaln2K(boolean ltrans, int na, int nw, float smin, float ca, float[] a, int offseta, int lda, float d1, float d2, float[] b, int offsetb, int ldb, float wr, float wi, float[] x, int offsetx, int ldx, org.netlib.util.floatW scale, org.netlib.util.floatW xnorm, org.netlib.util.intW info) { + org.netlib.lapack.Slaln2.slaln2(ltrans, na, nw, smin, ca, a, offseta, lda, d1, d2, b, offsetb, ldb, wr, wi, x, offsetx, ldx, scale, xnorm, info); } - protected void slals0K(int icompq, int nl, int nr, int sqre, int nrhs, float[] b, int _b_offset, int ldb, float[] bx, int _bx_offset, int ldbx, int[] perm, int _perm_offset, int givptr, int[] givcol, int _givcol_offset, int ldgcol, float[] givnum, int _givnum_offset, int ldgnum, float[] poles, int _poles_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, float[] z, int _z_offset, int k, float c, float s, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slals0.slals0(icompq, nl, nr, sqre, nrhs, b, _b_offset, ldb, bx, _bx_offset, ldbx, perm, _perm_offset, givptr, givcol, _givcol_offset, ldgcol, givnum, _givnum_offset, ldgnum, poles, _poles_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, k, c, s, work, _work_offset, info); + protected void slals0K(int icompq, int nl, int nr, int sqre, int nrhs, float[] b, int offsetb, int ldb, float[] bx, int offsetbx, int ldbx, int[] perm, int offsetperm, int givptr, int[] givcol, int offsetgivcol, int ldgcol, float[] givnum, int offsetgivnum, int ldgnum, float[] poles, int offsetpoles, float[] difl, int offsetdifl, float[] difr, int offsetdifr, float[] z, int offsetz, int k, float c, float s, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Slals0.slals0(icompq, nl, nr, sqre, nrhs, b, offsetb, ldb, bx, offsetbx, ldbx, perm, offsetperm, givptr, givcol, offsetgivcol, ldgcol, givnum, offsetgivnum, ldgnum, poles, offsetpoles, difl, offsetdifl, difr, offsetdifr, z, offsetz, k, c, s, work, offsetwork, info); } - protected void slalsaK(int icompq, int smlsiz, int n, int nrhs, float[] b, int _b_offset, int ldb, float[] bx, int _bx_offset, int ldbx, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int[] k, int _k_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, float[] z, int _z_offset, float[] poles, int _poles_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, int ldgcol, int[] perm, int _perm_offset, float[] givnum, int _givnum_offset, float[] c, int _c_offset, float[] s, int _s_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slalsa.slalsa(icompq, smlsiz, n, nrhs, b, _b_offset, ldb, bx, _bx_offset, ldbx, u, _u_offset, ldu, vt, _vt_offset, k, _k_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, poles, _poles_offset, givptr, _givptr_offset, givcol, _givcol_offset, ldgcol, perm, _perm_offset, givnum, _givnum_offset, c, _c_offset, s, _s_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void slalsaK(int icompq, int smlsiz, int n, int nrhs, float[] b, int offsetb, int ldb, float[] bx, int offsetbx, int ldbx, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int[] k, int offsetk, float[] difl, int offsetdifl, float[] difr, int offsetdifr, float[] z, int offsetz, float[] poles, int offsetpoles, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, int ldgcol, int[] perm, int offsetperm, float[] givnum, int offsetgivnum, float[] c, int offsetc, float[] s, int offsets, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Slalsa.slalsa(icompq, smlsiz, n, nrhs, b, offsetb, ldb, bx, offsetbx, ldbx, u, offsetu, ldu, vt, offsetvt, k, offsetk, difl, offsetdifl, difr, offsetdifr, z, offsetz, poles, offsetpoles, givptr, offsetgivptr, givcol, offsetgivcol, ldgcol, perm, offsetperm, givnum, offsetgivnum, c, offsetc, s, offsets, work, offsetwork, iwork, offsetiwork, info); } - protected void slalsdK(String uplo, int smlsiz, int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] b, int _b_offset, int ldb, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slalsd.slalsd(uplo, smlsiz, n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb, rcond, rank, work, _work_offset, iwork, _iwork_offset, info); + protected void slalsdK(String uplo, int smlsiz, int n, int nrhs, float[] d, int offsetd, float[] e, int offsete, float[] b, int offsetb, int ldb, float rcond, org.netlib.util.intW rank, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Slalsd.slalsd(uplo, smlsiz, n, nrhs, d, offsetd, e, offsete, b, offsetb, ldb, rcond, rank, work, offsetwork, iwork, offsetiwork, info); } - protected void slamrgK(int n1, int n2, float[] a, int _a_offset, int strd1, int strd2, int[] index, int _index_offset) { - org.netlib.lapack.Slamrg.slamrg(n1, n2, a, _a_offset, strd1, strd2, index, _index_offset); + protected void slamrgK(int n1, int n2, float[] a, int offseta, int strd1, int strd2, int[] index, int offsetindex) { + org.netlib.lapack.Slamrg.slamrg(n1, n2, a, offseta, strd1, strd2, index, offsetindex); } - protected int slanegK(int n, float[] d, int _d_offset, float[] lld, int _lld_offset, float sigma, float pivmin, int r) { - return org.netlib.lapack.Slaneg.slaneg(n, d, _d_offset, lld, _lld_offset, sigma, pivmin, r); + protected int slanegK(int n, float[] d, int offsetd, float[] lld, int offsetlld, float sigma, float pivmin, int r) { + return org.netlib.lapack.Slaneg.slaneg(n, d, offsetd, lld, offsetlld, sigma, pivmin, r); } - protected float slangbK(String norm, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, float[] work, int _work_offset) { - return org.netlib.lapack.Slangb.slangb(norm, n, kl, ku, ab, _ab_offset, ldab, work, _work_offset); + protected float slangbK(String norm, int n, int kl, int ku, float[] ab, int offsetab, int ldab, float[] work, int offsetwork) { + return org.netlib.lapack.Slangb.slangb(norm, n, kl, ku, ab, offsetab, ldab, work, offsetwork); } - protected float slangeK(String norm, int m, int n, float[] a, int _a_offset, int lda, float[] work, int _work_offset) { - return org.netlib.lapack.Slange.slange(norm, m, n, a, _a_offset, lda, work, _work_offset); + protected float slangeK(String norm, int m, int n, float[] a, int offseta, int lda, float[] work, int offsetwork) { + return org.netlib.lapack.Slange.slange(norm, m, n, a, offseta, lda, work, offsetwork); } - protected float slangtK(String norm, int n, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset) { - return org.netlib.lapack.Slangt.slangt(norm, n, dl, _dl_offset, d, _d_offset, du, _du_offset); + protected float slangtK(String norm, int n, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu) { + return org.netlib.lapack.Slangt.slangt(norm, n, dl, offsetdl, d, offsetd, du, offsetdu); } - protected float slanhsK(String norm, int n, float[] a, int _a_offset, int lda, float[] work, int _work_offset) { - return org.netlib.lapack.Slanhs.slanhs(norm, n, a, _a_offset, lda, work, _work_offset); + protected float slanhsK(String norm, int n, float[] a, int offseta, int lda, float[] work, int offsetwork) { + return org.netlib.lapack.Slanhs.slanhs(norm, n, a, offseta, lda, work, offsetwork); } - protected float slansbK(String norm, String uplo, int n, int k, float[] ab, int _ab_offset, int ldab, float[] work, int _work_offset) { - return org.netlib.lapack.Slansb.slansb(norm, uplo, n, k, ab, _ab_offset, ldab, work, _work_offset); + protected float slansbK(String norm, String uplo, int n, int k, float[] ab, int offsetab, int ldab, float[] work, int offsetwork) { + return org.netlib.lapack.Slansb.slansb(norm, uplo, n, k, ab, offsetab, ldab, work, offsetwork); } - protected float slanspK(String norm, String uplo, int n, float[] ap, int _ap_offset, float[] work, int _work_offset) { - return org.netlib.lapack.Slansp.slansp(norm, uplo, n, ap, _ap_offset, work, _work_offset); + protected float slanspK(String norm, String uplo, int n, float[] ap, int offsetap, float[] work, int offsetwork) { + return org.netlib.lapack.Slansp.slansp(norm, uplo, n, ap, offsetap, work, offsetwork); } - protected float slanstK(String norm, int n, float[] d, int _d_offset, float[] e, int _e_offset) { - return org.netlib.lapack.Slanst.slanst(norm, n, d, _d_offset, e, _e_offset); + protected float slanstK(String norm, int n, float[] d, int offsetd, float[] e, int offsete) { + return org.netlib.lapack.Slanst.slanst(norm, n, d, offsetd, e, offsete); } - protected float slansyK(String norm, String uplo, int n, float[] a, int _a_offset, int lda, float[] work, int _work_offset) { - return org.netlib.lapack.Slansy.slansy(norm, uplo, n, a, _a_offset, lda, work, _work_offset); + protected float slansyK(String norm, String uplo, int n, float[] a, int offseta, int lda, float[] work, int offsetwork) { + return org.netlib.lapack.Slansy.slansy(norm, uplo, n, a, offseta, lda, work, offsetwork); } - protected float slantbK(String norm, String uplo, String diag, int n, int k, float[] ab, int _ab_offset, int ldab, float[] work, int _work_offset) { - return org.netlib.lapack.Slantb.slantb(norm, uplo, diag, n, k, ab, _ab_offset, ldab, work, _work_offset); + protected float slantbK(String norm, String uplo, String diag, int n, int k, float[] ab, int offsetab, int ldab, float[] work, int offsetwork) { + return org.netlib.lapack.Slantb.slantb(norm, uplo, diag, n, k, ab, offsetab, ldab, work, offsetwork); } - protected float slantpK(String norm, String uplo, String diag, int n, float[] ap, int _ap_offset, float[] work, int _work_offset) { - return org.netlib.lapack.Slantp.slantp(norm, uplo, diag, n, ap, _ap_offset, work, _work_offset); + protected float slantpK(String norm, String uplo, String diag, int n, float[] ap, int offsetap, float[] work, int offsetwork) { + return org.netlib.lapack.Slantp.slantp(norm, uplo, diag, n, ap, offsetap, work, offsetwork); } - protected float slantrK(String norm, String uplo, String diag, int m, int n, float[] a, int _a_offset, int lda, float[] work, int _work_offset) { - return org.netlib.lapack.Slantr.slantr(norm, uplo, diag, m, n, a, _a_offset, lda, work, _work_offset); + protected float slantrK(String norm, String uplo, String diag, int m, int n, float[] a, int offseta, int lda, float[] work, int offsetwork) { + return org.netlib.lapack.Slantr.slantr(norm, uplo, diag, m, n, a, offseta, lda, work, offsetwork); } protected void slanv2K(org.netlib.util.floatW a, org.netlib.util.floatW b, org.netlib.util.floatW c, org.netlib.util.floatW d, org.netlib.util.floatW rt1r, org.netlib.util.floatW rt1i, org.netlib.util.floatW rt2r, org.netlib.util.floatW rt2i, org.netlib.util.floatW cs, org.netlib.util.floatW sn) { org.netlib.lapack.Slanv2.slanv2(a, b, c, d, rt1r, rt1i, rt2r, rt2i, cs, sn); } - protected void slapllK(int n, float[] x, int _x_offset, int incx, float[] y, int _y_offset, int incy, org.netlib.util.floatW ssmin) { - org.netlib.lapack.Slapll.slapll(n, x, _x_offset, incx, y, _y_offset, incy, ssmin); + protected void slapllK(int n, float[] x, int offsetx, int incx, float[] y, int offsety, int incy, org.netlib.util.floatW ssmin) { + org.netlib.lapack.Slapll.slapll(n, x, offsetx, incx, y, offsety, incy, ssmin); } - protected void slapmtK(boolean forwrd, int m, int n, float[] x, int _x_offset, int ldx, int[] k, int _k_offset) { - org.netlib.lapack.Slapmt.slapmt(forwrd, m, n, x, _x_offset, ldx, k, _k_offset); + protected void slapmtK(boolean forwrd, int m, int n, float[] x, int offsetx, int ldx, int[] k, int offsetk) { + org.netlib.lapack.Slapmt.slapmt(forwrd, m, n, x, offsetx, ldx, k, offsetk); } protected float slapy2K(float x, float y) { @@ -1993,880 +1993,880 @@ protected float slapy3K(float x, float y, float z) { return org.netlib.lapack.Slapy3.slapy3(x, y, z); } - protected void slaqgbK(int m, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, float[] r, int _r_offset, float[] c, int _c_offset, float rowcnd, float colcnd, float amax, org.netlib.util.StringW equed) { - org.netlib.lapack.Slaqgb.slaqgb(m, n, kl, ku, ab, _ab_offset, ldab, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, equed); + protected void slaqgbK(int m, int n, int kl, int ku, float[] ab, int offsetab, int ldab, float[] r, int offsetr, float[] c, int offsetc, float rowcnd, float colcnd, float amax, org.netlib.util.StringW equed) { + org.netlib.lapack.Slaqgb.slaqgb(m, n, kl, ku, ab, offsetab, ldab, r, offsetr, c, offsetc, rowcnd, colcnd, amax, equed); } - protected void slaqgeK(int m, int n, float[] a, int _a_offset, int lda, float[] r, int _r_offset, float[] c, int _c_offset, float rowcnd, float colcnd, float amax, org.netlib.util.StringW equed) { - org.netlib.lapack.Slaqge.slaqge(m, n, a, _a_offset, lda, r, _r_offset, c, _c_offset, rowcnd, colcnd, amax, equed); + protected void slaqgeK(int m, int n, float[] a, int offseta, int lda, float[] r, int offsetr, float[] c, int offsetc, float rowcnd, float colcnd, float amax, org.netlib.util.StringW equed) { + org.netlib.lapack.Slaqge.slaqge(m, n, a, offseta, lda, r, offsetr, c, offsetc, rowcnd, colcnd, amax, equed); } - protected void slaqp2K(int m, int n, int offset, float[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, float[] tau, int _tau_offset, float[] vn1, int _vn1_offset, float[] vn2, int _vn2_offset, float[] work, int _work_offset) { - org.netlib.lapack.Slaqp2.slaqp2(m, n, offset, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, vn1, _vn1_offset, vn2, _vn2_offset, work, _work_offset); + protected void slaqp2K(int m, int n, int offset, float[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, float[] tau, int offsettau, float[] vn1, int offsetvn1, float[] vn2, int offsetvn2, float[] work, int offsetwork) { + org.netlib.lapack.Slaqp2.slaqp2(m, n, offset, a, offseta, lda, jpvt, offsetjpvt, tau, offsettau, vn1, offsetvn1, vn2, offsetvn2, work, offsetwork); } - protected void slaqpsK(int m, int n, int offset, int nb, org.netlib.util.intW kb, float[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, float[] tau, int _tau_offset, float[] vn1, int _vn1_offset, float[] vn2, int _vn2_offset, float[] auxv, int _auxv_offset, float[] f, int _f_offset, int ldf) { - org.netlib.lapack.Slaqps.slaqps(m, n, offset, nb, kb, a, _a_offset, lda, jpvt, _jpvt_offset, tau, _tau_offset, vn1, _vn1_offset, vn2, _vn2_offset, auxv, _auxv_offset, f, _f_offset, ldf); + protected void slaqpsK(int m, int n, int offset, int nb, org.netlib.util.intW kb, float[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, float[] tau, int offsettau, float[] vn1, int offsetvn1, float[] vn2, int offsetvn2, float[] auxv, int offsetauxv, float[] f, int offsetf, int ldf) { + org.netlib.lapack.Slaqps.slaqps(m, n, offset, nb, kb, a, offseta, lda, jpvt, offsetjpvt, tau, offsettau, vn1, offsetvn1, vn2, offsetvn2, auxv, offsetauxv, f, offsetf, ldf); } - protected void slaqr0K(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, int iloz, int ihiz, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Slaqr0.slaqr0(wantt, wantz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, iloz, ihiz, z, _z_offset, ldz, work, _work_offset, lwork, info); + protected void slaqr0K(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int offseth, int ldh, float[] wr, int offsetwr, float[] wi, int offsetwi, int iloz, int ihiz, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Slaqr0.slaqr0(wantt, wantz, n, ilo, ihi, h, offseth, ldh, wr, offsetwr, wi, offsetwi, iloz, ihiz, z, offsetz, ldz, work, offsetwork, lwork, info); } - protected void slaqr1K(int n, float[] h, int _h_offset, int ldh, float sr1, float si1, float sr2, float si2, float[] v, int _v_offset) { - org.netlib.lapack.Slaqr1.slaqr1(n, h, _h_offset, ldh, sr1, si1, sr2, si2, v, _v_offset); + protected void slaqr1K(int n, float[] h, int offseth, int ldh, float sr1, float si1, float sr2, float si2, float[] v, int offsetv) { + org.netlib.lapack.Slaqr1.slaqr1(n, h, offseth, ldh, sr1, si1, sr2, si2, v, offsetv); } - protected void slaqr2K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, float[] h, int _h_offset, int ldh, int iloz, int ihiz, float[] z, int _z_offset, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, float[] sr, int _sr_offset, float[] si, int _si_offset, float[] v, int _v_offset, int ldv, int nh, float[] t, int _t_offset, int ldt, int nv, float[] wv, int _wv_offset, int ldwv, float[] work, int _work_offset, int lwork) { - org.netlib.lapack.Slaqr2.slaqr2(wantt, wantz, n, ktop, kbot, nw, h, _h_offset, ldh, iloz, ihiz, z, _z_offset, ldz, ns, nd, sr, _sr_offset, si, _si_offset, v, _v_offset, ldv, nh, t, _t_offset, ldt, nv, wv, _wv_offset, ldwv, work, _work_offset, lwork); + protected void slaqr2K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, float[] h, int offseth, int ldh, int iloz, int ihiz, float[] z, int offsetz, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, float[] sr, int offsetsr, float[] si, int offsetsi, float[] v, int offsetv, int ldv, int nh, float[] t, int offsett, int ldt, int nv, float[] wv, int offsetwv, int ldwv, float[] work, int offsetwork, int lwork) { + org.netlib.lapack.Slaqr2.slaqr2(wantt, wantz, n, ktop, kbot, nw, h, offseth, ldh, iloz, ihiz, z, offsetz, ldz, ns, nd, sr, offsetsr, si, offsetsi, v, offsetv, ldv, nh, t, offsett, ldt, nv, wv, offsetwv, ldwv, work, offsetwork, lwork); } - protected void slaqr3K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, float[] h, int _h_offset, int ldh, int iloz, int ihiz, float[] z, int _z_offset, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, float[] sr, int _sr_offset, float[] si, int _si_offset, float[] v, int _v_offset, int ldv, int nh, float[] t, int _t_offset, int ldt, int nv, float[] wv, int _wv_offset, int ldwv, float[] work, int _work_offset, int lwork) { - org.netlib.lapack.Slaqr3.slaqr3(wantt, wantz, n, ktop, kbot, nw, h, _h_offset, ldh, iloz, ihiz, z, _z_offset, ldz, ns, nd, sr, _sr_offset, si, _si_offset, v, _v_offset, ldv, nh, t, _t_offset, ldt, nv, wv, _wv_offset, ldwv, work, _work_offset, lwork); + protected void slaqr3K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, float[] h, int offseth, int ldh, int iloz, int ihiz, float[] z, int offsetz, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, float[] sr, int offsetsr, float[] si, int offsetsi, float[] v, int offsetv, int ldv, int nh, float[] t, int offsett, int ldt, int nv, float[] wv, int offsetwv, int ldwv, float[] work, int offsetwork, int lwork) { + org.netlib.lapack.Slaqr3.slaqr3(wantt, wantz, n, ktop, kbot, nw, h, offseth, ldh, iloz, ihiz, z, offsetz, ldz, ns, nd, sr, offsetsr, si, offsetsi, v, offsetv, ldv, nh, t, offsett, ldt, nv, wv, offsetwv, ldwv, work, offsetwork, lwork); } - protected void slaqr4K(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, int iloz, int ihiz, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Slaqr4.slaqr4(wantt, wantz, n, ilo, ihi, h, _h_offset, ldh, wr, _wr_offset, wi, _wi_offset, iloz, ihiz, z, _z_offset, ldz, work, _work_offset, lwork, info); + protected void slaqr4K(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int offseth, int ldh, float[] wr, int offsetwr, float[] wi, int offsetwi, int iloz, int ihiz, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Slaqr4.slaqr4(wantt, wantz, n, ilo, ihi, h, offseth, ldh, wr, offsetwr, wi, offsetwi, iloz, ihiz, z, offsetz, ldz, work, offsetwork, lwork, info); } - protected void slaqr5K(boolean wantt, boolean wantz, int kacc22, int n, int ktop, int kbot, int nshfts, float[] sr, int _sr_offset, float[] si, int _si_offset, float[] h, int _h_offset, int ldh, int iloz, int ihiz, float[] z, int _z_offset, int ldz, float[] v, int _v_offset, int ldv, float[] u, int _u_offset, int ldu, int nv, float[] wv, int _wv_offset, int ldwv, int nh, float[] wh, int _wh_offset, int ldwh) { - org.netlib.lapack.Slaqr5.slaqr5(wantt, wantz, kacc22, n, ktop, kbot, nshfts, sr, _sr_offset, si, _si_offset, h, _h_offset, ldh, iloz, ihiz, z, _z_offset, ldz, v, _v_offset, ldv, u, _u_offset, ldu, nv, wv, _wv_offset, ldwv, nh, wh, _wh_offset, ldwh); + protected void slaqr5K(boolean wantt, boolean wantz, int kacc22, int n, int ktop, int kbot, int nshfts, float[] sr, int offsetsr, float[] si, int offsetsi, float[] h, int offseth, int ldh, int iloz, int ihiz, float[] z, int offsetz, int ldz, float[] v, int offsetv, int ldv, float[] u, int offsetu, int ldu, int nv, float[] wv, int offsetwv, int ldwv, int nh, float[] wh, int offsetwh, int ldwh) { + org.netlib.lapack.Slaqr5.slaqr5(wantt, wantz, kacc22, n, ktop, kbot, nshfts, sr, offsetsr, si, offsetsi, h, offseth, ldh, iloz, ihiz, z, offsetz, ldz, v, offsetv, ldv, u, offsetu, ldu, nv, wv, offsetwv, ldwv, nh, wh, offsetwh, ldwh); } - protected void slaqsbK(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] s, int _s_offset, float scond, float amax, org.netlib.util.StringW equed) { - org.netlib.lapack.Slaqsb.slaqsb(uplo, n, kd, ab, _ab_offset, ldab, s, _s_offset, scond, amax, equed); + protected void slaqsbK(String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float[] s, int offsets, float scond, float amax, org.netlib.util.StringW equed) { + org.netlib.lapack.Slaqsb.slaqsb(uplo, n, kd, ab, offsetab, ldab, s, offsets, scond, amax, equed); } - protected void slaqspK(String uplo, int n, float[] ap, int _ap_offset, float[] s, int _s_offset, float scond, float amax, org.netlib.util.StringW equed) { - org.netlib.lapack.Slaqsp.slaqsp(uplo, n, ap, _ap_offset, s, _s_offset, scond, amax, equed); + protected void slaqspK(String uplo, int n, float[] ap, int offsetap, float[] s, int offsets, float scond, float amax, org.netlib.util.StringW equed) { + org.netlib.lapack.Slaqsp.slaqsp(uplo, n, ap, offsetap, s, offsets, scond, amax, equed); } - protected void slaqsyK(String uplo, int n, float[] a, int _a_offset, int lda, float[] s, int _s_offset, float scond, float amax, org.netlib.util.StringW equed) { - org.netlib.lapack.Slaqsy.slaqsy(uplo, n, a, _a_offset, lda, s, _s_offset, scond, amax, equed); + protected void slaqsyK(String uplo, int n, float[] a, int offseta, int lda, float[] s, int offsets, float scond, float amax, org.netlib.util.StringW equed) { + org.netlib.lapack.Slaqsy.slaqsy(uplo, n, a, offseta, lda, s, offsets, scond, amax, equed); } - protected void slaqtrK(boolean ltran, boolean lreal, int n, float[] t, int _t_offset, int ldt, float[] b, int _b_offset, float w, org.netlib.util.floatW scale, float[] x, int _x_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slaqtr.slaqtr(ltran, lreal, n, t, _t_offset, ldt, b, _b_offset, w, scale, x, _x_offset, work, _work_offset, info); + protected void slaqtrK(boolean ltran, boolean lreal, int n, float[] t, int offsett, int ldt, float[] b, int offsetb, float w, org.netlib.util.floatW scale, float[] x, int offsetx, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Slaqtr.slaqtr(ltran, lreal, n, t, offsett, ldt, b, offsetb, w, scale, x, offsetx, work, offsetwork, info); } - protected void slar1vK(int n, int b1, int bn, float lambda, float[] d, int _d_offset, float[] l, int _l_offset, float[] ld, int _ld_offset, float[] lld, int _lld_offset, float pivmin, float gaptol, float[] z, int _z_offset, boolean wantnc, org.netlib.util.intW negcnt, org.netlib.util.floatW ztz, org.netlib.util.floatW mingma, org.netlib.util.intW r, int[] isuppz, int _isuppz_offset, org.netlib.util.floatW nrminv, org.netlib.util.floatW resid, org.netlib.util.floatW rqcorr, float[] work, int _work_offset) { - org.netlib.lapack.Slar1v.slar1v(n, b1, bn, lambda, d, _d_offset, l, _l_offset, ld, _ld_offset, lld, _lld_offset, pivmin, gaptol, z, _z_offset, wantnc, negcnt, ztz, mingma, r, isuppz, _isuppz_offset, nrminv, resid, rqcorr, work, _work_offset); + protected void slar1vK(int n, int b1, int bn, float lambda, float[] d, int offsetd, float[] l, int offsetl, float[] ld, int offsetld, float[] lld, int offsetlld, float pivmin, float gaptol, float[] z, int offsetz, boolean wantnc, org.netlib.util.intW negcnt, org.netlib.util.floatW ztz, org.netlib.util.floatW mingma, org.netlib.util.intW r, int[] isuppz, int offsetisuppz, org.netlib.util.floatW nrminv, org.netlib.util.floatW resid, org.netlib.util.floatW rqcorr, float[] work, int offsetwork) { + org.netlib.lapack.Slar1v.slar1v(n, b1, bn, lambda, d, offsetd, l, offsetl, ld, offsetld, lld, offsetlld, pivmin, gaptol, z, offsetz, wantnc, negcnt, ztz, mingma, r, isuppz, offsetisuppz, nrminv, resid, rqcorr, work, offsetwork); } - protected void slar2vK(int n, float[] x, int _x_offset, float[] y, int _y_offset, float[] z, int _z_offset, int incx, float[] c, int _c_offset, float[] s, int _s_offset, int incc) { - org.netlib.lapack.Slar2v.slar2v(n, x, _x_offset, y, _y_offset, z, _z_offset, incx, c, _c_offset, s, _s_offset, incc); + protected void slar2vK(int n, float[] x, int offsetx, float[] y, int offsety, float[] z, int offsetz, int incx, float[] c, int offsetc, float[] s, int offsets, int incc) { + org.netlib.lapack.Slar2v.slar2v(n, x, offsetx, y, offsety, z, offsetz, incx, c, offsetc, s, offsets, incc); } - protected void slarfK(String side, int m, int n, float[] v, int _v_offset, int incv, float tau, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset) { - org.netlib.lapack.Slarf.slarf(side, m, n, v, _v_offset, incv, tau, c, _c_offset, Ldc, work, _work_offset); + protected void slarfK(String side, int m, int n, float[] v, int offsetv, int incv, float tau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork) { + org.netlib.lapack.Slarf.slarf(side, m, n, v, offsetv, incv, tau, c, offsetc, Ldc, work, offsetwork); } - protected void slarfbK(String side, String trans, String direct, String storev, int m, int n, int k, float[] v, int _v_offset, int ldv, float[] t, int _t_offset, int ldt, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int ldwork) { - org.netlib.lapack.Slarfb.slarfb(side, trans, direct, storev, m, n, k, v, _v_offset, ldv, t, _t_offset, ldt, c, _c_offset, Ldc, work, _work_offset, ldwork); + protected void slarfbK(String side, String trans, String direct, String storev, int m, int n, int k, float[] v, int offsetv, int ldv, float[] t, int offsett, int ldt, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int ldwork) { + org.netlib.lapack.Slarfb.slarfb(side, trans, direct, storev, m, n, k, v, offsetv, ldv, t, offsett, ldt, c, offsetc, Ldc, work, offsetwork, ldwork); } - protected void slarfgK(int n, org.netlib.util.floatW alpha, float[] x, int _x_offset, int incx, org.netlib.util.floatW tau) { - org.netlib.lapack.Slarfg.slarfg(n, alpha, x, _x_offset, incx, tau); + protected void slarfgK(int n, org.netlib.util.floatW alpha, float[] x, int offsetx, int incx, org.netlib.util.floatW tau) { + org.netlib.lapack.Slarfg.slarfg(n, alpha, x, offsetx, incx, tau); } - protected void slarftK(String direct, String storev, int n, int k, float[] v, int _v_offset, int ldv, float[] tau, int _tau_offset, float[] t, int _t_offset, int ldt) { - org.netlib.lapack.Slarft.slarft(direct, storev, n, k, v, _v_offset, ldv, tau, _tau_offset, t, _t_offset, ldt); + protected void slarftK(String direct, String storev, int n, int k, float[] v, int offsetv, int ldv, float[] tau, int offsettau, float[] t, int offsett, int ldt) { + org.netlib.lapack.Slarft.slarft(direct, storev, n, k, v, offsetv, ldv, tau, offsettau, t, offsett, ldt); } - protected void slarfxK(String side, int m, int n, float[] v, int _v_offset, float tau, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset) { - org.netlib.lapack.Slarfx.slarfx(side, m, n, v, _v_offset, tau, c, _c_offset, Ldc, work, _work_offset); + protected void slarfxK(String side, int m, int n, float[] v, int offsetv, float tau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork) { + org.netlib.lapack.Slarfx.slarfx(side, m, n, v, offsetv, tau, c, offsetc, Ldc, work, offsetwork); } - protected void slargvK(int n, float[] x, int _x_offset, int incx, float[] y, int _y_offset, int incy, float[] c, int _c_offset, int incc) { - org.netlib.lapack.Slargv.slargv(n, x, _x_offset, incx, y, _y_offset, incy, c, _c_offset, incc); + protected void slargvK(int n, float[] x, int offsetx, int incx, float[] y, int offsety, int incy, float[] c, int offsetc, int incc) { + org.netlib.lapack.Slargv.slargv(n, x, offsetx, incx, y, offsety, incy, c, offsetc, incc); } - protected void slarnvK(int idist, int[] iseed, int _iseed_offset, int n, float[] x, int _x_offset) { - org.netlib.lapack.Slarnv.slarnv(idist, iseed, _iseed_offset, n, x, _x_offset); + protected void slarnvK(int idist, int[] iseed, int offsetiseed, int n, float[] x, int offsetx) { + org.netlib.lapack.Slarnv.slarnv(idist, iseed, offsetiseed, n, x, offsetx); } - protected void slarraK(int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] e2, int _e2_offset, float spltol, float tnrm, org.netlib.util.intW nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slarra.slarra(n, d, _d_offset, e, _e_offset, e2, _e2_offset, spltol, tnrm, nsplit, isplit, _isplit_offset, info); + protected void slarraK(int n, float[] d, int offsetd, float[] e, int offsete, float[] e2, int offsete2, float spltol, float tnrm, org.netlib.util.intW nsplit, int[] isplit, int offsetisplit, org.netlib.util.intW info) { + org.netlib.lapack.Slarra.slarra(n, d, offsetd, e, offsete, e2, offsete2, spltol, tnrm, nsplit, isplit, offsetisplit, info); } - protected void slarrbK(int n, float[] d, int _d_offset, float[] lld, int _lld_offset, int ifirst, int ilast, float rtol1, float rtol2, int offset, float[] w, int _w_offset, float[] wgap, int _wgap_offset, float[] werr, int _werr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, float pivmin, float spdiam, int twist, org.netlib.util.intW info) { - org.netlib.lapack.Slarrb.slarrb(n, d, _d_offset, lld, _lld_offset, ifirst, ilast, rtol1, rtol2, offset, w, _w_offset, wgap, _wgap_offset, werr, _werr_offset, work, _work_offset, iwork, _iwork_offset, pivmin, spdiam, twist, info); + protected void slarrbK(int n, float[] d, int offsetd, float[] lld, int offsetlld, int ifirst, int ilast, float rtol1, float rtol2, int offset, float[] w, int offsetw, float[] wgap, int offsetwgap, float[] werr, int offsetwerr, float[] work, int offsetwork, int[] iwork, int offsetiwork, float pivmin, float spdiam, int twist, org.netlib.util.intW info) { + org.netlib.lapack.Slarrb.slarrb(n, d, offsetd, lld, offsetlld, ifirst, ilast, rtol1, rtol2, offset, w, offsetw, wgap, offsetwgap, werr, offsetwerr, work, offsetwork, iwork, offsetiwork, pivmin, spdiam, twist, info); } - protected void slarrcK(String jobt, int n, float vl, float vu, float[] d, int _d_offset, float[] e, int _e_offset, float pivmin, org.netlib.util.intW eigcnt, org.netlib.util.intW lcnt, org.netlib.util.intW rcnt, org.netlib.util.intW info) { - org.netlib.lapack.Slarrc.slarrc(jobt, n, vl, vu, d, _d_offset, e, _e_offset, pivmin, eigcnt, lcnt, rcnt, info); + protected void slarrcK(String jobt, int n, float vl, float vu, float[] d, int offsetd, float[] e, int offsete, float pivmin, org.netlib.util.intW eigcnt, org.netlib.util.intW lcnt, org.netlib.util.intW rcnt, org.netlib.util.intW info) { + org.netlib.lapack.Slarrc.slarrc(jobt, n, vl, vu, d, offsetd, e, offsete, pivmin, eigcnt, lcnt, rcnt, info); } - protected void slarrdK(String range, String order, int n, float vl, float vu, int il, int iu, float[] gers, int _gers_offset, float reltol, float[] d, int _d_offset, float[] e, int _e_offset, float[] e2, int _e2_offset, float pivmin, int nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW m, float[] w, int _w_offset, float[] werr, int _werr_offset, org.netlib.util.floatW wl, org.netlib.util.floatW wu, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slarrd.slarrd(range, order, n, vl, vu, il, iu, gers, _gers_offset, reltol, d, _d_offset, e, _e_offset, e2, _e2_offset, pivmin, nsplit, isplit, _isplit_offset, m, w, _w_offset, werr, _werr_offset, wl, wu, iblock, _iblock_offset, indexw, _indexw_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void slarrdK(String range, String order, int n, float vl, float vu, int il, int iu, float[] gers, int offsetgers, float reltol, float[] d, int offsetd, float[] e, int offsete, float[] e2, int offsete2, float pivmin, int nsplit, int[] isplit, int offsetisplit, org.netlib.util.intW m, float[] w, int offsetw, float[] werr, int offsetwerr, org.netlib.util.floatW wl, org.netlib.util.floatW wu, int[] iblock, int offsetiblock, int[] indexw, int offsetindexw, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Slarrd.slarrd(range, order, n, vl, vu, il, iu, gers, offsetgers, reltol, d, offsetd, e, offsete, e2, offsete2, pivmin, nsplit, isplit, offsetisplit, m, w, offsetw, werr, offsetwerr, wl, wu, iblock, offsetiblock, indexw, offsetindexw, work, offsetwork, iwork, offsetiwork, info); } - protected void slarreK(String range, int n, org.netlib.util.floatW vl, org.netlib.util.floatW vu, int il, int iu, float[] d, int _d_offset, float[] e, int _e_offset, float[] e2, int _e2_offset, float rtol1, float rtol2, float spltol, org.netlib.util.intW nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW m, float[] w, int _w_offset, float[] werr, int _werr_offset, float[] wgap, int _wgap_offset, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, float[] gers, int _gers_offset, org.netlib.util.floatW pivmin, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slarre.slarre(range, n, vl, vu, il, iu, d, _d_offset, e, _e_offset, e2, _e2_offset, rtol1, rtol2, spltol, nsplit, isplit, _isplit_offset, m, w, _w_offset, werr, _werr_offset, wgap, _wgap_offset, iblock, _iblock_offset, indexw, _indexw_offset, gers, _gers_offset, pivmin, work, _work_offset, iwork, _iwork_offset, info); + protected void slarreK(String range, int n, org.netlib.util.floatW vl, org.netlib.util.floatW vu, int il, int iu, float[] d, int offsetd, float[] e, int offsete, float[] e2, int offsete2, float rtol1, float rtol2, float spltol, org.netlib.util.intW nsplit, int[] isplit, int offsetisplit, org.netlib.util.intW m, float[] w, int offsetw, float[] werr, int offsetwerr, float[] wgap, int offsetwgap, int[] iblock, int offsetiblock, int[] indexw, int offsetindexw, float[] gers, int offsetgers, org.netlib.util.floatW pivmin, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Slarre.slarre(range, n, vl, vu, il, iu, d, offsetd, e, offsete, e2, offsete2, rtol1, rtol2, spltol, nsplit, isplit, offsetisplit, m, w, offsetw, werr, offsetwerr, wgap, offsetwgap, iblock, offsetiblock, indexw, offsetindexw, gers, offsetgers, pivmin, work, offsetwork, iwork, offsetiwork, info); } - protected void slarrfK(int n, float[] d, int _d_offset, float[] l, int _l_offset, float[] ld, int _ld_offset, int clstrt, int clend, float[] w, int _w_offset, float[] wgap, int _wgap_offset, float[] werr, int _werr_offset, float spdiam, float clgapl, float clgapr, float pivmin, org.netlib.util.floatW sigma, float[] dplus, int _dplus_offset, float[] lplus, int _lplus_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slarrf.slarrf(n, d, _d_offset, l, _l_offset, ld, _ld_offset, clstrt, clend, w, _w_offset, wgap, _wgap_offset, werr, _werr_offset, spdiam, clgapl, clgapr, pivmin, sigma, dplus, _dplus_offset, lplus, _lplus_offset, work, _work_offset, info); + protected void slarrfK(int n, float[] d, int offsetd, float[] l, int offsetl, float[] ld, int offsetld, int clstrt, int clend, float[] w, int offsetw, float[] wgap, int offsetwgap, float[] werr, int offsetwerr, float spdiam, float clgapl, float clgapr, float pivmin, org.netlib.util.floatW sigma, float[] dplus, int offsetdplus, float[] lplus, int offsetlplus, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Slarrf.slarrf(n, d, offsetd, l, offsetl, ld, offsetld, clstrt, clend, w, offsetw, wgap, offsetwgap, werr, offsetwerr, spdiam, clgapl, clgapr, pivmin, sigma, dplus, offsetdplus, lplus, offsetlplus, work, offsetwork, info); } - protected void slarrjK(int n, float[] d, int _d_offset, float[] e2, int _e2_offset, int ifirst, int ilast, float rtol, int offset, float[] w, int _w_offset, float[] werr, int _werr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, float pivmin, float spdiam, org.netlib.util.intW info) { - org.netlib.lapack.Slarrj.slarrj(n, d, _d_offset, e2, _e2_offset, ifirst, ilast, rtol, offset, w, _w_offset, werr, _werr_offset, work, _work_offset, iwork, _iwork_offset, pivmin, spdiam, info); + protected void slarrjK(int n, float[] d, int offsetd, float[] e2, int offsete2, int ifirst, int ilast, float rtol, int offset, float[] w, int offsetw, float[] werr, int offsetwerr, float[] work, int offsetwork, int[] iwork, int offsetiwork, float pivmin, float spdiam, org.netlib.util.intW info) { + org.netlib.lapack.Slarrj.slarrj(n, d, offsetd, e2, offsete2, ifirst, ilast, rtol, offset, w, offsetw, werr, offsetwerr, work, offsetwork, iwork, offsetiwork, pivmin, spdiam, info); } - protected void slarrkK(int n, int iw, float gl, float gu, float[] d, int _d_offset, float[] e2, int _e2_offset, float pivmin, float reltol, org.netlib.util.floatW w, org.netlib.util.floatW werr, org.netlib.util.intW info) { - org.netlib.lapack.Slarrk.slarrk(n, iw, gl, gu, d, _d_offset, e2, _e2_offset, pivmin, reltol, w, werr, info); + protected void slarrkK(int n, int iw, float gl, float gu, float[] d, int offsetd, float[] e2, int offsete2, float pivmin, float reltol, org.netlib.util.floatW w, org.netlib.util.floatW werr, org.netlib.util.intW info) { + org.netlib.lapack.Slarrk.slarrk(n, iw, gl, gu, d, offsetd, e2, offsete2, pivmin, reltol, w, werr, info); } - protected void slarrrK(int n, float[] d, int _d_offset, float[] e, int _e_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slarrr.slarrr(n, d, _d_offset, e, _e_offset, info); + protected void slarrrK(int n, float[] d, int offsetd, float[] e, int offsete, org.netlib.util.intW info) { + org.netlib.lapack.Slarrr.slarrr(n, d, offsetd, e, offsete, info); } - protected void slarrvK(int n, float vl, float vu, float[] d, int _d_offset, float[] l, int _l_offset, float pivmin, int[] isplit, int _isplit_offset, int m, int dol, int dou, float minrgp, org.netlib.util.floatW rtol1, org.netlib.util.floatW rtol2, float[] w, int _w_offset, float[] werr, int _werr_offset, float[] wgap, int _wgap_offset, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, float[] gers, int _gers_offset, float[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slarrv.slarrv(n, vl, vu, d, _d_offset, l, _l_offset, pivmin, isplit, _isplit_offset, m, dol, dou, minrgp, rtol1, rtol2, w, _w_offset, werr, _werr_offset, wgap, _wgap_offset, iblock, _iblock_offset, indexw, _indexw_offset, gers, _gers_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void slarrvK(int n, float vl, float vu, float[] d, int offsetd, float[] l, int offsetl, float pivmin, int[] isplit, int offsetisplit, int m, int dol, int dou, float minrgp, org.netlib.util.floatW rtol1, org.netlib.util.floatW rtol2, float[] w, int offsetw, float[] werr, int offsetwerr, float[] wgap, int offsetwgap, int[] iblock, int offsetiblock, int[] indexw, int offsetindexw, float[] gers, int offsetgers, float[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Slarrv.slarrv(n, vl, vu, d, offsetd, l, offsetl, pivmin, isplit, offsetisplit, m, dol, dou, minrgp, rtol1, rtol2, w, offsetw, werr, offsetwerr, wgap, offsetwgap, iblock, offsetiblock, indexw, offsetindexw, gers, offsetgers, z, offsetz, ldz, isuppz, offsetisuppz, work, offsetwork, iwork, offsetiwork, info); } protected void slartgK(float f, float g, org.netlib.util.floatW cs, org.netlib.util.floatW sn, org.netlib.util.floatW r) { org.netlib.lapack.Slartg.slartg(f, g, cs, sn, r); } - protected void slartvK(int n, float[] x, int _x_offset, int incx, float[] y, int _y_offset, int incy, float[] c, int _c_offset, float[] s, int _s_offset, int incc) { - org.netlib.lapack.Slartv.slartv(n, x, _x_offset, incx, y, _y_offset, incy, c, _c_offset, s, _s_offset, incc); + protected void slartvK(int n, float[] x, int offsetx, int incx, float[] y, int offsety, int incy, float[] c, int offsetc, float[] s, int offsets, int incc) { + org.netlib.lapack.Slartv.slartv(n, x, offsetx, incx, y, offsety, incy, c, offsetc, s, offsets, incc); } - protected void slaruvK(int[] iseed, int _iseed_offset, int n, float[] x, int _x_offset) { - org.netlib.lapack.Slaruv.slaruv(iseed, _iseed_offset, n, x, _x_offset); + protected void slaruvK(int[] iseed, int offsetiseed, int n, float[] x, int offsetx) { + org.netlib.lapack.Slaruv.slaruv(iseed, offsetiseed, n, x, offsetx); } - protected void slarzK(String side, int m, int n, int l, float[] v, int _v_offset, int incv, float tau, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset) { - org.netlib.lapack.Slarz.slarz(side, m, n, l, v, _v_offset, incv, tau, c, _c_offset, Ldc, work, _work_offset); + protected void slarzK(String side, int m, int n, int l, float[] v, int offsetv, int incv, float tau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork) { + org.netlib.lapack.Slarz.slarz(side, m, n, l, v, offsetv, incv, tau, c, offsetc, Ldc, work, offsetwork); } - protected void slarzbK(String side, String trans, String direct, String storev, int m, int n, int k, int l, float[] v, int _v_offset, int ldv, float[] t, int _t_offset, int ldt, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int ldwork) { - org.netlib.lapack.Slarzb.slarzb(side, trans, direct, storev, m, n, k, l, v, _v_offset, ldv, t, _t_offset, ldt, c, _c_offset, Ldc, work, _work_offset, ldwork); + protected void slarzbK(String side, String trans, String direct, String storev, int m, int n, int k, int l, float[] v, int offsetv, int ldv, float[] t, int offsett, int ldt, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int ldwork) { + org.netlib.lapack.Slarzb.slarzb(side, trans, direct, storev, m, n, k, l, v, offsetv, ldv, t, offsett, ldt, c, offsetc, Ldc, work, offsetwork, ldwork); } - protected void slarztK(String direct, String storev, int n, int k, float[] v, int _v_offset, int ldv, float[] tau, int _tau_offset, float[] t, int _t_offset, int ldt) { - org.netlib.lapack.Slarzt.slarzt(direct, storev, n, k, v, _v_offset, ldv, tau, _tau_offset, t, _t_offset, ldt); + protected void slarztK(String direct, String storev, int n, int k, float[] v, int offsetv, int ldv, float[] tau, int offsettau, float[] t, int offsett, int ldt) { + org.netlib.lapack.Slarzt.slarzt(direct, storev, n, k, v, offsetv, ldv, tau, offsettau, t, offsett, ldt); } protected void slas2K(float f, float g, float h, org.netlib.util.floatW ssmin, org.netlib.util.floatW ssmax) { org.netlib.lapack.Slas2.slas2(f, g, h, ssmin, ssmax); } - protected void slasclK(String type, int kl, int ku, float cfrom, float cto, int m, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info) { - org.netlib.lapack.Slascl.slascl(type, kl, ku, cfrom, cto, m, n, a, _a_offset, lda, info); + protected void slasclK(String type, int kl, int ku, float cfrom, float cto, int m, int n, float[] a, int offseta, int lda, org.netlib.util.intW info) { + org.netlib.lapack.Slascl.slascl(type, kl, ku, cfrom, cto, m, n, a, offseta, lda, info); } - protected void slasd0K(int n, int sqre, float[] d, int _d_offset, float[] e, int _e_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, int smlsiz, int[] iwork, int _iwork_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slasd0.slasd0(n, sqre, d, _d_offset, e, _e_offset, u, _u_offset, ldu, vt, _vt_offset, ldvt, smlsiz, iwork, _iwork_offset, work, _work_offset, info); + protected void slasd0K(int n, int sqre, float[] d, int offsetd, float[] e, int offsete, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int ldvt, int smlsiz, int[] iwork, int offsetiwork, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Slasd0.slasd0(n, sqre, d, offsetd, e, offsete, u, offsetu, ldu, vt, offsetvt, ldvt, smlsiz, iwork, offsetiwork, work, offsetwork, info); } - protected void slasd1K(int nl, int nr, int sqre, float[] d, int _d_offset, org.netlib.util.floatW alpha, org.netlib.util.floatW beta, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, int[] idxq, int _idxq_offset, int[] iwork, int _iwork_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slasd1.slasd1(nl, nr, sqre, d, _d_offset, alpha, beta, u, _u_offset, ldu, vt, _vt_offset, ldvt, idxq, _idxq_offset, iwork, _iwork_offset, work, _work_offset, info); + protected void slasd1K(int nl, int nr, int sqre, float[] d, int offsetd, org.netlib.util.floatW alpha, org.netlib.util.floatW beta, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int ldvt, int[] idxq, int offsetidxq, int[] iwork, int offsetiwork, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Slasd1.slasd1(nl, nr, sqre, d, offsetd, alpha, beta, u, offsetu, ldu, vt, offsetvt, ldvt, idxq, offsetidxq, iwork, offsetiwork, work, offsetwork, info); } - protected void slasd2K(int nl, int nr, int sqre, org.netlib.util.intW k, float[] d, int _d_offset, float[] z, int _z_offset, float alpha, float beta, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, float[] dsigma, int _dsigma_offset, float[] u2, int _u2_offset, int ldu2, float[] vt2, int _vt2_offset, int ldvt2, int[] idxp, int _idxp_offset, int[] idx, int _idx_offset, int[] idxc, int _idxc_offset, int[] idxq, int _idxq_offset, int[] coltyp, int _coltyp_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slasd2.slasd2(nl, nr, sqre, k, d, _d_offset, z, _z_offset, alpha, beta, u, _u_offset, ldu, vt, _vt_offset, ldvt, dsigma, _dsigma_offset, u2, _u2_offset, ldu2, vt2, _vt2_offset, ldvt2, idxp, _idxp_offset, idx, _idx_offset, idxc, _idxc_offset, idxq, _idxq_offset, coltyp, _coltyp_offset, info); + protected void slasd2K(int nl, int nr, int sqre, org.netlib.util.intW k, float[] d, int offsetd, float[] z, int offsetz, float alpha, float beta, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int ldvt, float[] dsigma, int offsetdsigma, float[] u2, int offsetu2, int ldu2, float[] vt2, int offsetvt2, int ldvt2, int[] idxp, int offsetidxp, int[] idx, int offsetidx, int[] idxc, int offsetidxc, int[] idxq, int offsetidxq, int[] coltyp, int offsetcoltyp, org.netlib.util.intW info) { + org.netlib.lapack.Slasd2.slasd2(nl, nr, sqre, k, d, offsetd, z, offsetz, alpha, beta, u, offsetu, ldu, vt, offsetvt, ldvt, dsigma, offsetdsigma, u2, offsetu2, ldu2, vt2, offsetvt2, ldvt2, idxp, offsetidxp, idx, offsetidx, idxc, offsetidxc, idxq, offsetidxq, coltyp, offsetcoltyp, info); } - protected void slasd3K(int nl, int nr, int sqre, int k, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, float[] dsigma, int _dsigma_offset, float[] u, int _u_offset, int ldu, float[] u2, int _u2_offset, int ldu2, float[] vt, int _vt_offset, int ldvt, float[] vt2, int _vt2_offset, int ldvt2, int[] idxc, int _idxc_offset, int[] ctot, int _ctot_offset, float[] z, int _z_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slasd3.slasd3(nl, nr, sqre, k, d, _d_offset, q, _q_offset, ldq, dsigma, _dsigma_offset, u, _u_offset, ldu, u2, _u2_offset, ldu2, vt, _vt_offset, ldvt, vt2, _vt2_offset, ldvt2, idxc, _idxc_offset, ctot, _ctot_offset, z, _z_offset, info); + protected void slasd3K(int nl, int nr, int sqre, int k, float[] d, int offsetd, float[] q, int offsetq, int ldq, float[] dsigma, int offsetdsigma, float[] u, int offsetu, int ldu, float[] u2, int offsetu2, int ldu2, float[] vt, int offsetvt, int ldvt, float[] vt2, int offsetvt2, int ldvt2, int[] idxc, int offsetidxc, int[] ctot, int offsetctot, float[] z, int offsetz, org.netlib.util.intW info) { + org.netlib.lapack.Slasd3.slasd3(nl, nr, sqre, k, d, offsetd, q, offsetq, ldq, dsigma, offsetdsigma, u, offsetu, ldu, u2, offsetu2, ldu2, vt, offsetvt, ldvt, vt2, offsetvt2, ldvt2, idxc, offsetidxc, ctot, offsetctot, z, offsetz, info); } - protected void slasd4K(int n, int i, float[] d, int _d_offset, float[] z, int _z_offset, float[] delta, int _delta_offset, float rho, org.netlib.util.floatW sigma, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slasd4.slasd4(n, i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, sigma, work, _work_offset, info); + protected void slasd4K(int n, int i, float[] d, int offsetd, float[] z, int offsetz, float[] delta, int offsetdelta, float rho, org.netlib.util.floatW sigma, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Slasd4.slasd4(n, i, d, offsetd, z, offsetz, delta, offsetdelta, rho, sigma, work, offsetwork, info); } - protected void slasd5K(int i, float[] d, int _d_offset, float[] z, int _z_offset, float[] delta, int _delta_offset, float rho, org.netlib.util.floatW dsigma, float[] work, int _work_offset) { - org.netlib.lapack.Slasd5.slasd5(i, d, _d_offset, z, _z_offset, delta, _delta_offset, rho, dsigma, work, _work_offset); + protected void slasd5K(int i, float[] d, int offsetd, float[] z, int offsetz, float[] delta, int offsetdelta, float rho, org.netlib.util.floatW dsigma, float[] work, int offsetwork) { + org.netlib.lapack.Slasd5.slasd5(i, d, offsetd, z, offsetz, delta, offsetdelta, rho, dsigma, work, offsetwork); } - protected void slasd6K(int icompq, int nl, int nr, int sqre, float[] d, int _d_offset, float[] vf, int _vf_offset, float[] vl, int _vl_offset, org.netlib.util.floatW alpha, org.netlib.util.floatW beta, int[] idxq, int _idxq_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, int ldgcol, float[] givnum, int _givnum_offset, int ldgnum, float[] poles, int _poles_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, float[] z, int _z_offset, org.netlib.util.intW k, org.netlib.util.floatW c, org.netlib.util.floatW s, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slasd6.slasd6(icompq, nl, nr, sqre, d, _d_offset, vf, _vf_offset, vl, _vl_offset, alpha, beta, idxq, _idxq_offset, perm, _perm_offset, givptr, givcol, _givcol_offset, ldgcol, givnum, _givnum_offset, ldgnum, poles, _poles_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, k, c, s, work, _work_offset, iwork, _iwork_offset, info); + protected void slasd6K(int icompq, int nl, int nr, int sqre, float[] d, int offsetd, float[] vf, int offsetvf, float[] vl, int offsetvl, org.netlib.util.floatW alpha, org.netlib.util.floatW beta, int[] idxq, int offsetidxq, int[] perm, int offsetperm, org.netlib.util.intW givptr, int[] givcol, int offsetgivcol, int ldgcol, float[] givnum, int offsetgivnum, int ldgnum, float[] poles, int offsetpoles, float[] difl, int offsetdifl, float[] difr, int offsetdifr, float[] z, int offsetz, org.netlib.util.intW k, org.netlib.util.floatW c, org.netlib.util.floatW s, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Slasd6.slasd6(icompq, nl, nr, sqre, d, offsetd, vf, offsetvf, vl, offsetvl, alpha, beta, idxq, offsetidxq, perm, offsetperm, givptr, givcol, offsetgivcol, ldgcol, givnum, offsetgivnum, ldgnum, poles, offsetpoles, difl, offsetdifl, difr, offsetdifr, z, offsetz, k, c, s, work, offsetwork, iwork, offsetiwork, info); } - protected void slasd7K(int icompq, int nl, int nr, int sqre, org.netlib.util.intW k, float[] d, int _d_offset, float[] z, int _z_offset, float[] zw, int _zw_offset, float[] vf, int _vf_offset, float[] vfw, int _vfw_offset, float[] vl, int _vl_offset, float[] vlw, int _vlw_offset, float alpha, float beta, float[] dsigma, int _dsigma_offset, int[] idx, int _idx_offset, int[] idxp, int _idxp_offset, int[] idxq, int _idxq_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, int ldgcol, float[] givnum, int _givnum_offset, int ldgnum, org.netlib.util.floatW c, org.netlib.util.floatW s, org.netlib.util.intW info) { - org.netlib.lapack.Slasd7.slasd7(icompq, nl, nr, sqre, k, d, _d_offset, z, _z_offset, zw, _zw_offset, vf, _vf_offset, vfw, _vfw_offset, vl, _vl_offset, vlw, _vlw_offset, alpha, beta, dsigma, _dsigma_offset, idx, _idx_offset, idxp, _idxp_offset, idxq, _idxq_offset, perm, _perm_offset, givptr, givcol, _givcol_offset, ldgcol, givnum, _givnum_offset, ldgnum, c, s, info); + protected void slasd7K(int icompq, int nl, int nr, int sqre, org.netlib.util.intW k, float[] d, int offsetd, float[] z, int offsetz, float[] zw, int offsetzw, float[] vf, int offsetvf, float[] vfw, int offsetvfw, float[] vl, int offsetvl, float[] vlw, int offsetvlw, float alpha, float beta, float[] dsigma, int offsetdsigma, int[] idx, int offsetidx, int[] idxp, int offsetidxp, int[] idxq, int offsetidxq, int[] perm, int offsetperm, org.netlib.util.intW givptr, int[] givcol, int offsetgivcol, int ldgcol, float[] givnum, int offsetgivnum, int ldgnum, org.netlib.util.floatW c, org.netlib.util.floatW s, org.netlib.util.intW info) { + org.netlib.lapack.Slasd7.slasd7(icompq, nl, nr, sqre, k, d, offsetd, z, offsetz, zw, offsetzw, vf, offsetvf, vfw, offsetvfw, vl, offsetvl, vlw, offsetvlw, alpha, beta, dsigma, offsetdsigma, idx, offsetidx, idxp, offsetidxp, idxq, offsetidxq, perm, offsetperm, givptr, givcol, offsetgivcol, ldgcol, givnum, offsetgivnum, ldgnum, c, s, info); } - protected void slasd8K(int icompq, int k, float[] d, int _d_offset, float[] z, int _z_offset, float[] vf, int _vf_offset, float[] vl, int _vl_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, int lddifr, float[] dsigma, int _dsigma_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slasd8.slasd8(icompq, k, d, _d_offset, z, _z_offset, vf, _vf_offset, vl, _vl_offset, difl, _difl_offset, difr, _difr_offset, lddifr, dsigma, _dsigma_offset, work, _work_offset, info); + protected void slasd8K(int icompq, int k, float[] d, int offsetd, float[] z, int offsetz, float[] vf, int offsetvf, float[] vl, int offsetvl, float[] difl, int offsetdifl, float[] difr, int offsetdifr, int lddifr, float[] dsigma, int offsetdsigma, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Slasd8.slasd8(icompq, k, d, offsetd, z, offsetz, vf, offsetvf, vl, offsetvl, difl, offsetdifl, difr, offsetdifr, lddifr, dsigma, offsetdsigma, work, offsetwork, info); } - protected void slasdaK(int icompq, int smlsiz, int n, int sqre, float[] d, int _d_offset, float[] e, int _e_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int[] k, int _k_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, float[] z, int _z_offset, float[] poles, int _poles_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, int ldgcol, int[] perm, int _perm_offset, float[] givnum, int _givnum_offset, float[] c, int _c_offset, float[] s, int _s_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slasda.slasda(icompq, smlsiz, n, sqre, d, _d_offset, e, _e_offset, u, _u_offset, ldu, vt, _vt_offset, k, _k_offset, difl, _difl_offset, difr, _difr_offset, z, _z_offset, poles, _poles_offset, givptr, _givptr_offset, givcol, _givcol_offset, ldgcol, perm, _perm_offset, givnum, _givnum_offset, c, _c_offset, s, _s_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void slasdaK(int icompq, int smlsiz, int n, int sqre, float[] d, int offsetd, float[] e, int offsete, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int[] k, int offsetk, float[] difl, int offsetdifl, float[] difr, int offsetdifr, float[] z, int offsetz, float[] poles, int offsetpoles, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, int ldgcol, int[] perm, int offsetperm, float[] givnum, int offsetgivnum, float[] c, int offsetc, float[] s, int offsets, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Slasda.slasda(icompq, smlsiz, n, sqre, d, offsetd, e, offsete, u, offsetu, ldu, vt, offsetvt, k, offsetk, difl, offsetdifl, difr, offsetdifr, z, offsetz, poles, offsetpoles, givptr, offsetgivptr, givcol, offsetgivcol, ldgcol, perm, offsetperm, givnum, offsetgivnum, c, offsetc, s, offsets, work, offsetwork, iwork, offsetiwork, info); } - protected void slasdqK(String uplo, int sqre, int n, int ncvt, int nru, int ncc, float[] d, int _d_offset, float[] e, int _e_offset, float[] vt, int _vt_offset, int ldvt, float[] u, int _u_offset, int ldu, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slasdq.slasdq(uplo, sqre, n, ncvt, nru, ncc, d, _d_offset, e, _e_offset, vt, _vt_offset, ldvt, u, _u_offset, ldu, c, _c_offset, Ldc, work, _work_offset, info); + protected void slasdqK(String uplo, int sqre, int n, int ncvt, int nru, int ncc, float[] d, int offsetd, float[] e, int offsete, float[] vt, int offsetvt, int ldvt, float[] u, int offsetu, int ldu, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Slasdq.slasdq(uplo, sqre, n, ncvt, nru, ncc, d, offsetd, e, offsete, vt, offsetvt, ldvt, u, offsetu, ldu, c, offsetc, Ldc, work, offsetwork, info); } - protected void slasdtK(int n, org.netlib.util.intW lvl, org.netlib.util.intW nd, int[] inode, int _inode_offset, int[] ndiml, int _ndiml_offset, int[] ndimr, int _ndimr_offset, int msub) { - org.netlib.lapack.Slasdt.slasdt(n, lvl, nd, inode, _inode_offset, ndiml, _ndiml_offset, ndimr, _ndimr_offset, msub); + protected void slasdtK(int n, org.netlib.util.intW lvl, org.netlib.util.intW nd, int[] inode, int offsetinode, int[] ndiml, int offsetndiml, int[] ndimr, int offsetndimr, int msub) { + org.netlib.lapack.Slasdt.slasdt(n, lvl, nd, inode, offsetinode, ndiml, offsetndiml, ndimr, offsetndimr, msub); } - protected void slasetK(String uplo, int m, int n, float alpha, float beta, float[] a, int _a_offset, int lda) { - org.netlib.lapack.Slaset.slaset(uplo, m, n, alpha, beta, a, _a_offset, lda); + protected void slasetK(String uplo, int m, int n, float alpha, float beta, float[] a, int offseta, int lda) { + org.netlib.lapack.Slaset.slaset(uplo, m, n, alpha, beta, a, offseta, lda); } - protected void slasq1K(int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slasq1.slasq1(n, d, _d_offset, e, _e_offset, work, _work_offset, info); + protected void slasq1K(int n, float[] d, int offsetd, float[] e, int offsete, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Slasq1.slasq1(n, d, offsetd, e, offsete, work, offsetwork, info); } - protected void slasq2K(int n, float[] z, int _z_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slasq2.slasq2(n, z, _z_offset, info); + protected void slasq2K(int n, float[] z, int offsetz, org.netlib.util.intW info) { + org.netlib.lapack.Slasq2.slasq2(n, z, offsetz, info); } - protected void slasq3K(int i0, org.netlib.util.intW n0, float[] z, int _z_offset, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW sigma, org.netlib.util.floatW desig, org.netlib.util.floatW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee) { - org.netlib.lapack.Slasq3.slasq3(i0, n0, z, _z_offset, pp, dmin, sigma, desig, qmax, nfail, iter, ndiv, ieee); + protected void slasq3K(int i0, org.netlib.util.intW n0, float[] z, int offsetz, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW sigma, org.netlib.util.floatW desig, org.netlib.util.floatW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee) { + org.netlib.lapack.Slasq3.slasq3(i0, n0, z, offsetz, pp, dmin, sigma, desig, qmax, nfail, iter, ndiv, ieee); } - protected void slasq4K(int i0, int n0, float[] z, int _z_offset, int pp, int n0in, float dmin, float dmin1, float dmin2, float dn, float dn1, float dn2, org.netlib.util.floatW tau, org.netlib.util.intW ttype) { - org.netlib.lapack.Slasq4.slasq4(i0, n0, z, _z_offset, pp, n0in, dmin, dmin1, dmin2, dn, dn1, dn2, tau, ttype); + protected void slasq4K(int i0, int n0, float[] z, int offsetz, int pp, int n0in, float dmin, float dmin1, float dmin2, float dn, float dn1, float dn2, org.netlib.util.floatW tau, org.netlib.util.intW ttype) { + org.netlib.lapack.Slasq4.slasq4(i0, n0, z, offsetz, pp, n0in, dmin, dmin1, dmin2, dn, dn1, dn2, tau, ttype); } - protected void slasq5K(int i0, int n0, float[] z, int _z_offset, int pp, float tau, org.netlib.util.floatW dmin, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dnm1, org.netlib.util.floatW dnm2, boolean ieee) { - org.netlib.lapack.Slasq5.slasq5(i0, n0, z, _z_offset, pp, tau, dmin, dmin1, dmin2, dn, dnm1, dnm2, ieee); + protected void slasq5K(int i0, int n0, float[] z, int offsetz, int pp, float tau, org.netlib.util.floatW dmin, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dnm1, org.netlib.util.floatW dnm2, boolean ieee) { + org.netlib.lapack.Slasq5.slasq5(i0, n0, z, offsetz, pp, tau, dmin, dmin1, dmin2, dn, dnm1, dnm2, ieee); } - protected void slasq6K(int i0, int n0, float[] z, int _z_offset, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dnm1, org.netlib.util.floatW dnm2) { - org.netlib.lapack.Slasq6.slasq6(i0, n0, z, _z_offset, pp, dmin, dmin1, dmin2, dn, dnm1, dnm2); + protected void slasq6K(int i0, int n0, float[] z, int offsetz, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dnm1, org.netlib.util.floatW dnm2) { + org.netlib.lapack.Slasq6.slasq6(i0, n0, z, offsetz, pp, dmin, dmin1, dmin2, dn, dnm1, dnm2); } - protected void slasrK(String side, String pivot, String direct, int m, int n, float[] c, int _c_offset, float[] s, int _s_offset, float[] a, int _a_offset, int lda) { - org.netlib.lapack.Slasr.slasr(side, pivot, direct, m, n, c, _c_offset, s, _s_offset, a, _a_offset, lda); + protected void slasrK(String side, String pivot, String direct, int m, int n, float[] c, int offsetc, float[] s, int offsets, float[] a, int offseta, int lda) { + org.netlib.lapack.Slasr.slasr(side, pivot, direct, m, n, c, offsetc, s, offsets, a, offseta, lda); } - protected void slasrtK(String id, int n, float[] d, int _d_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slasrt.slasrt(id, n, d, _d_offset, info); + protected void slasrtK(String id, int n, float[] d, int offsetd, org.netlib.util.intW info) { + org.netlib.lapack.Slasrt.slasrt(id, n, d, offsetd, info); } - protected void slassqK(int n, float[] x, int _x_offset, int incx, org.netlib.util.floatW scale, org.netlib.util.floatW sumsq) { - org.netlib.lapack.Slassq.slassq(n, x, _x_offset, incx, scale, sumsq); + protected void slassqK(int n, float[] x, int offsetx, int incx, org.netlib.util.floatW scale, org.netlib.util.floatW sumsq) { + org.netlib.lapack.Slassq.slassq(n, x, offsetx, incx, scale, sumsq); } protected void slasv2K(float f, float g, float h, org.netlib.util.floatW ssmin, org.netlib.util.floatW ssmax, org.netlib.util.floatW snr, org.netlib.util.floatW csr, org.netlib.util.floatW snl, org.netlib.util.floatW csl) { org.netlib.lapack.Slasv2.slasv2(f, g, h, ssmin, ssmax, snr, csr, snl, csl); } - protected void slaswpK(int n, float[] a, int _a_offset, int lda, int k1, int k2, int[] ipiv, int _ipiv_offset, int incx) { - org.netlib.lapack.Slaswp.slaswp(n, a, _a_offset, lda, k1, k2, ipiv, _ipiv_offset, incx); + protected void slaswpK(int n, float[] a, int offseta, int lda, int k1, int k2, int[] ipiv, int offsetipiv, int incx) { + org.netlib.lapack.Slaswp.slaswp(n, a, offseta, lda, k1, k2, ipiv, offsetipiv, incx); } - protected void slasy2K(boolean ltranl, boolean ltranr, int isgn, int n1, int n2, float[] tl, int _tl_offset, int ldtl, float[] tr, int _tr_offset, int ldtr, float[] b, int _b_offset, int ldb, org.netlib.util.floatW scale, float[] x, int _x_offset, int ldx, org.netlib.util.floatW xnorm, org.netlib.util.intW info) { - org.netlib.lapack.Slasy2.slasy2(ltranl, ltranr, isgn, n1, n2, tl, _tl_offset, ldtl, tr, _tr_offset, ldtr, b, _b_offset, ldb, scale, x, _x_offset, ldx, xnorm, info); + protected void slasy2K(boolean ltranl, boolean ltranr, int isgn, int n1, int n2, float[] tl, int offsettl, int ldtl, float[] tr, int offsettr, int ldtr, float[] b, int offsetb, int ldb, org.netlib.util.floatW scale, float[] x, int offsetx, int ldx, org.netlib.util.floatW xnorm, org.netlib.util.intW info) { + org.netlib.lapack.Slasy2.slasy2(ltranl, ltranr, isgn, n1, n2, tl, offsettl, ldtl, tr, offsettr, ldtr, b, offsetb, ldb, scale, x, offsetx, ldx, xnorm, info); } - protected void slasyfK(String uplo, int n, int nb, org.netlib.util.intW kb, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] w, int _w_offset, int ldw, org.netlib.util.intW info) { - org.netlib.lapack.Slasyf.slasyf(uplo, n, nb, kb, a, _a_offset, lda, ipiv, _ipiv_offset, w, _w_offset, ldw, info); + protected void slasyfK(String uplo, int n, int nb, org.netlib.util.intW kb, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] w, int offsetw, int ldw, org.netlib.util.intW info) { + org.netlib.lapack.Slasyf.slasyf(uplo, n, nb, kb, a, offseta, lda, ipiv, offsetipiv, w, offsetw, ldw, info); } - protected void slatbsK(String uplo, String trans, String diag, String normin, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] x, int _x_offset, org.netlib.util.floatW scale, float[] cnorm, int _cnorm_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slatbs.slatbs(uplo, trans, diag, normin, n, kd, ab, _ab_offset, ldab, x, _x_offset, scale, cnorm, _cnorm_offset, info); + protected void slatbsK(String uplo, String trans, String diag, String normin, int n, int kd, float[] ab, int offsetab, int ldab, float[] x, int offsetx, org.netlib.util.floatW scale, float[] cnorm, int offsetcnorm, org.netlib.util.intW info) { + org.netlib.lapack.Slatbs.slatbs(uplo, trans, diag, normin, n, kd, ab, offsetab, ldab, x, offsetx, scale, cnorm, offsetcnorm, info); } - protected void slatdfK(int ijob, int n, float[] z, int _z_offset, int ldz, float[] rhs, int _rhs_offset, org.netlib.util.floatW rdsum, org.netlib.util.floatW rdscal, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset) { - org.netlib.lapack.Slatdf.slatdf(ijob, n, z, _z_offset, ldz, rhs, _rhs_offset, rdsum, rdscal, ipiv, _ipiv_offset, jpiv, _jpiv_offset); + protected void slatdfK(int ijob, int n, float[] z, int offsetz, int ldz, float[] rhs, int offsetrhs, org.netlib.util.floatW rdsum, org.netlib.util.floatW rdscal, int[] ipiv, int offsetipiv, int[] jpiv, int offsetjpiv) { + org.netlib.lapack.Slatdf.slatdf(ijob, n, z, offsetz, ldz, rhs, offsetrhs, rdsum, rdscal, ipiv, offsetipiv, jpiv, offsetjpiv); } - protected void slatpsK(String uplo, String trans, String diag, String normin, int n, float[] ap, int _ap_offset, float[] x, int _x_offset, org.netlib.util.floatW scale, float[] cnorm, int _cnorm_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slatps.slatps(uplo, trans, diag, normin, n, ap, _ap_offset, x, _x_offset, scale, cnorm, _cnorm_offset, info); + protected void slatpsK(String uplo, String trans, String diag, String normin, int n, float[] ap, int offsetap, float[] x, int offsetx, org.netlib.util.floatW scale, float[] cnorm, int offsetcnorm, org.netlib.util.intW info) { + org.netlib.lapack.Slatps.slatps(uplo, trans, diag, normin, n, ap, offsetap, x, offsetx, scale, cnorm, offsetcnorm, info); } - protected void slatrdK(String uplo, int n, int nb, float[] a, int _a_offset, int lda, float[] e, int _e_offset, float[] tau, int _tau_offset, float[] w, int _w_offset, int ldw) { - org.netlib.lapack.Slatrd.slatrd(uplo, n, nb, a, _a_offset, lda, e, _e_offset, tau, _tau_offset, w, _w_offset, ldw); + protected void slatrdK(String uplo, int n, int nb, float[] a, int offseta, int lda, float[] e, int offsete, float[] tau, int offsettau, float[] w, int offsetw, int ldw) { + org.netlib.lapack.Slatrd.slatrd(uplo, n, nb, a, offseta, lda, e, offsete, tau, offsettau, w, offsetw, ldw); } - protected void slatrsK(String uplo, String trans, String diag, String normin, int n, float[] a, int _a_offset, int lda, float[] x, int _x_offset, org.netlib.util.floatW scale, float[] cnorm, int _cnorm_offset, org.netlib.util.intW info) { - org.netlib.lapack.Slatrs.slatrs(uplo, trans, diag, normin, n, a, _a_offset, lda, x, _x_offset, scale, cnorm, _cnorm_offset, info); + protected void slatrsK(String uplo, String trans, String diag, String normin, int n, float[] a, int offseta, int lda, float[] x, int offsetx, org.netlib.util.floatW scale, float[] cnorm, int offsetcnorm, org.netlib.util.intW info) { + org.netlib.lapack.Slatrs.slatrs(uplo, trans, diag, normin, n, a, offseta, lda, x, offsetx, scale, cnorm, offsetcnorm, info); } - protected void slatrzK(int m, int n, int l, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset) { - org.netlib.lapack.Slatrz.slatrz(m, n, l, a, _a_offset, lda, tau, _tau_offset, work, _work_offset); + protected void slatrzK(int m, int n, int l, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork) { + org.netlib.lapack.Slatrz.slatrz(m, n, l, a, offseta, lda, tau, offsettau, work, offsetwork); } - protected void slatzmK(String side, int m, int n, float[] v, int _v_offset, int incv, float tau, float[] c1, int _c1_offset, float[] c2, int _c2_offset, int Ldc, float[] work, int _work_offset) { - org.netlib.lapack.Slatzm.slatzm(side, m, n, v, _v_offset, incv, tau, c1, _c1_offset, c2, _c2_offset, Ldc, work, _work_offset); + protected void slatzmK(String side, int m, int n, float[] v, int offsetv, int incv, float tau, float[] c1, int offsetc1, float[] c2, int offsetc2, int Ldc, float[] work, int offsetwork) { + org.netlib.lapack.Slatzm.slatzm(side, m, n, v, offsetv, incv, tau, c1, offsetc1, c2, offsetc2, Ldc, work, offsetwork); } - protected void slauu2K(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info) { - org.netlib.lapack.Slauu2.slauu2(uplo, n, a, _a_offset, lda, info); + protected void slauu2K(String uplo, int n, float[] a, int offseta, int lda, org.netlib.util.intW info) { + org.netlib.lapack.Slauu2.slauu2(uplo, n, a, offseta, lda, info); } - protected void slauumK(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info) { - org.netlib.lapack.Slauum.slauum(uplo, n, a, _a_offset, lda, info); + protected void slauumK(String uplo, int n, float[] a, int offseta, int lda, org.netlib.util.intW info) { + org.netlib.lapack.Slauum.slauum(uplo, n, a, offseta, lda, info); } - protected void slazq3K(int i0, org.netlib.util.intW n0, float[] z, int _z_offset, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW sigma, org.netlib.util.floatW desig, org.netlib.util.floatW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee, org.netlib.util.intW ttype, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dn1, org.netlib.util.floatW dn2, org.netlib.util.floatW tau) { - org.netlib.lapack.Slazq3.slazq3(i0, n0, z, _z_offset, pp, dmin, sigma, desig, qmax, nfail, iter, ndiv, ieee, ttype, dmin1, dmin2, dn, dn1, dn2, tau); + protected void slazq3K(int i0, org.netlib.util.intW n0, float[] z, int offsetz, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW sigma, org.netlib.util.floatW desig, org.netlib.util.floatW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee, org.netlib.util.intW ttype, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dn1, org.netlib.util.floatW dn2, org.netlib.util.floatW tau) { + org.netlib.lapack.Slazq3.slazq3(i0, n0, z, offsetz, pp, dmin, sigma, desig, qmax, nfail, iter, ndiv, ieee, ttype, dmin1, dmin2, dn, dn1, dn2, tau); } - protected void slazq4K(int i0, int n0, float[] z, int _z_offset, int pp, int n0in, float dmin, float dmin1, float dmin2, float dn, float dn1, float dn2, org.netlib.util.floatW tau, org.netlib.util.intW ttype, org.netlib.util.floatW g) { - org.netlib.lapack.Slazq4.slazq4(i0, n0, z, _z_offset, pp, n0in, dmin, dmin1, dmin2, dn, dn1, dn2, tau, ttype, g); + protected void slazq4K(int i0, int n0, float[] z, int offsetz, int pp, int n0in, float dmin, float dmin1, float dmin2, float dn, float dn1, float dn2, org.netlib.util.floatW tau, org.netlib.util.intW ttype, org.netlib.util.floatW g) { + org.netlib.lapack.Slazq4.slazq4(i0, n0, z, offsetz, pp, n0in, dmin, dmin1, dmin2, dn, dn1, dn2, tau, ttype, g); } - protected void sopgtrK(String uplo, int n, float[] ap, int _ap_offset, float[] tau, int _tau_offset, float[] q, int _q_offset, int ldq, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sopgtr.sopgtr(uplo, n, ap, _ap_offset, tau, _tau_offset, q, _q_offset, ldq, work, _work_offset, info); + protected void sopgtrK(String uplo, int n, float[] ap, int offsetap, float[] tau, int offsettau, float[] q, int offsetq, int ldq, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Sopgtr.sopgtr(uplo, n, ap, offsetap, tau, offsettau, q, offsetq, ldq, work, offsetwork, info); } - protected void sopmtrK(String side, String uplo, String trans, int m, int n, float[] ap, int _ap_offset, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sopmtr.sopmtr(side, uplo, trans, m, n, ap, _ap_offset, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + protected void sopmtrK(String side, String uplo, String trans, int m, int n, float[] ap, int offsetap, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Sopmtr.sopmtr(side, uplo, trans, m, n, ap, offsetap, tau, offsettau, c, offsetc, Ldc, work, offsetwork, info); } - protected void sorg2lK(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sorg2l.sorg2l(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + protected void sorg2lK(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Sorg2l.sorg2l(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected void sorg2rK(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sorg2r.sorg2r(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + protected void sorg2rK(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Sorg2r.sorg2r(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected void sorgbrK(String vect, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sorgbr.sorgbr(vect, m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + protected void sorgbrK(String vect, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sorgbr.sorgbr(vect, m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected void sorghrK(int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sorghr.sorghr(n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + protected void sorghrK(int n, int ilo, int ihi, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sorghr.sorghr(n, ilo, ihi, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected void sorgl2K(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sorgl2.sorgl2(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + protected void sorgl2K(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Sorgl2.sorgl2(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected void sorglqK(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sorglq.sorglq(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + protected void sorglqK(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sorglq.sorglq(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected void sorgqlK(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sorgql.sorgql(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + protected void sorgqlK(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sorgql.sorgql(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected void sorgqrK(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sorgqr.sorgqr(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + protected void sorgqrK(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sorgqr.sorgqr(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected void sorgr2K(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sorgr2.sorgr2(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, info); + protected void sorgr2K(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Sorgr2.sorgr2(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, info); } - protected void sorgrqK(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sorgrq.sorgrq(m, n, k, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + protected void sorgrqK(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sorgrq.sorgrq(m, n, k, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected void sorgtrK(String uplo, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sorgtr.sorgtr(uplo, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + protected void sorgtrK(String uplo, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sorgtr.sorgtr(uplo, n, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } - protected void sorm2lK(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sorm2l.sorm2l(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + protected void sorm2lK(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Sorm2l.sorm2l(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, info); } - protected void sorm2rK(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sorm2r.sorm2r(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + protected void sorm2rK(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Sorm2r.sorm2r(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, info); } - protected void sormbrK(String vect, String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sormbr.sormbr(vect, side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + protected void sormbrK(String vect, String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sormbr.sormbr(vect, side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected void sormhrK(String side, String trans, int m, int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sormhr.sormhr(side, trans, m, n, ilo, ihi, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + protected void sormhrK(String side, String trans, int m, int n, int ilo, int ihi, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sormhr.sormhr(side, trans, m, n, ilo, ihi, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected void sorml2K(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sorml2.sorml2(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + protected void sorml2K(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Sorml2.sorml2(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, info); } - protected void sormlqK(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sormlq.sormlq(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + protected void sormlqK(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sormlq.sormlq(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected void sormqlK(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sormql.sormql(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + protected void sormqlK(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sormql.sormql(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected void sormqrK(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sormqr.sormqr(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + protected void sormqrK(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sormqr.sormqr(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected void sormr2K(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sormr2.sormr2(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + protected void sormr2K(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Sormr2.sormr2(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, info); } - protected void sormr3K(String side, String trans, int m, int n, int k, int l, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sormr3.sormr3(side, trans, m, n, k, l, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, info); + protected void sormr3K(String side, String trans, int m, int n, int k, int l, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Sormr3.sormr3(side, trans, m, n, k, l, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, info); } - protected void sormrqK(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sormrq.sormrq(side, trans, m, n, k, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + protected void sormrqK(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sormrq.sormrq(side, trans, m, n, k, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected void sormrzK(String side, String trans, int m, int n, int k, int l, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sormrz.sormrz(side, trans, m, n, k, l, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + protected void sormrzK(String side, String trans, int m, int n, int k, int l, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sormrz.sormrz(side, trans, m, n, k, l, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected void sormtrK(String side, String uplo, String trans, int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Sormtr.sormtr(side, uplo, trans, m, n, a, _a_offset, lda, tau, _tau_offset, c, _c_offset, Ldc, work, _work_offset, lwork, info); + protected void sormtrK(String side, String uplo, String trans, int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Sormtr.sormtr(side, uplo, trans, m, n, a, offseta, lda, tau, offsettau, c, offsetc, Ldc, work, offsetwork, lwork, info); } - protected void spbconK(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Spbcon.spbcon(uplo, n, kd, ab, _ab_offset, ldab, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + protected void spbconK(String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Spbcon.spbcon(uplo, n, kd, ab, offsetab, ldab, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected void spbequK(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] s, int _s_offset, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info) { - org.netlib.lapack.Spbequ.spbequ(uplo, n, kd, ab, _ab_offset, ldab, s, _s_offset, scond, amax, info); + protected void spbequK(String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float[] s, int offsets, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info) { + org.netlib.lapack.Spbequ.spbequ(uplo, n, kd, ab, offsetab, ldab, s, offsets, scond, amax, info); } - protected void spbrfsK(String uplo, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] afb, int _afb_offset, int ldafb, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Spbrfs.spbrfs(uplo, n, kd, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void spbrfsK(String uplo, int n, int kd, int nrhs, float[] ab, int offsetab, int ldab, float[] afb, int offsetafb, int ldafb, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Spbrfs.spbrfs(uplo, n, kd, nrhs, ab, offsetab, ldab, afb, offsetafb, ldafb, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void spbstfK(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, org.netlib.util.intW info) { - org.netlib.lapack.Spbstf.spbstf(uplo, n, kd, ab, _ab_offset, ldab, info); + protected void spbstfK(String uplo, int n, int kd, float[] ab, int offsetab, int ldab, org.netlib.util.intW info) { + org.netlib.lapack.Spbstf.spbstf(uplo, n, kd, ab, offsetab, ldab, info); } - protected void spbsvK(String uplo, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Spbsv.spbsv(uplo, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, info); + protected void spbsvK(String uplo, int n, int kd, int nrhs, float[] ab, int offsetab, int ldab, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Spbsv.spbsv(uplo, n, kd, nrhs, ab, offsetab, ldab, b, offsetb, ldb, info); } - protected void spbsvxK(String fact, String uplo, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] afb, int _afb_offset, int ldafb, org.netlib.util.StringW equed, float[] s, int _s_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Spbsvx.spbsvx(fact, uplo, n, kd, nrhs, ab, _ab_offset, ldab, afb, _afb_offset, ldafb, equed, s, _s_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void spbsvxK(String fact, String uplo, int n, int kd, int nrhs, float[] ab, int offsetab, int ldab, float[] afb, int offsetafb, int ldafb, org.netlib.util.StringW equed, float[] s, int offsets, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Spbsvx.spbsvx(fact, uplo, n, kd, nrhs, ab, offsetab, ldab, afb, offsetafb, ldafb, equed, s, offsets, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void spbtf2K(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, org.netlib.util.intW info) { - org.netlib.lapack.Spbtf2.spbtf2(uplo, n, kd, ab, _ab_offset, ldab, info); + protected void spbtf2K(String uplo, int n, int kd, float[] ab, int offsetab, int ldab, org.netlib.util.intW info) { + org.netlib.lapack.Spbtf2.spbtf2(uplo, n, kd, ab, offsetab, ldab, info); } - protected void spbtrfK(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, org.netlib.util.intW info) { - org.netlib.lapack.Spbtrf.spbtrf(uplo, n, kd, ab, _ab_offset, ldab, info); + protected void spbtrfK(String uplo, int n, int kd, float[] ab, int offsetab, int ldab, org.netlib.util.intW info) { + org.netlib.lapack.Spbtrf.spbtrf(uplo, n, kd, ab, offsetab, ldab, info); } - protected void spbtrsK(String uplo, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Spbtrs.spbtrs(uplo, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, info); + protected void spbtrsK(String uplo, int n, int kd, int nrhs, float[] ab, int offsetab, int ldab, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Spbtrs.spbtrs(uplo, n, kd, nrhs, ab, offsetab, ldab, b, offsetb, ldb, info); } - protected void spoconK(String uplo, int n, float[] a, int _a_offset, int lda, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Spocon.spocon(uplo, n, a, _a_offset, lda, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + protected void spoconK(String uplo, int n, float[] a, int offseta, int lda, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Spocon.spocon(uplo, n, a, offseta, lda, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected void spoequK(int n, float[] a, int _a_offset, int lda, float[] s, int _s_offset, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info) { - org.netlib.lapack.Spoequ.spoequ(n, a, _a_offset, lda, s, _s_offset, scond, amax, info); + protected void spoequK(int n, float[] a, int offseta, int lda, float[] s, int offsets, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info) { + org.netlib.lapack.Spoequ.spoequ(n, a, offseta, lda, s, offsets, scond, amax, info); } - protected void sporfsK(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sporfs.sporfs(uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void sporfsK(String uplo, int n, int nrhs, float[] a, int offseta, int lda, float[] af, int offsetaf, int ldaf, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Sporfs.sporfs(uplo, n, nrhs, a, offseta, lda, af, offsetaf, ldaf, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void sposvK(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Sposv.sposv(uplo, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, info); + protected void sposvK(String uplo, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Sposv.sposv(uplo, n, nrhs, a, offseta, lda, b, offsetb, ldb, info); } - protected void sposvxK(String fact, String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, org.netlib.util.StringW equed, float[] s, int _s_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sposvx.sposvx(fact, uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, equed, s, _s_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void sposvxK(String fact, String uplo, int n, int nrhs, float[] a, int offseta, int lda, float[] af, int offsetaf, int ldaf, org.netlib.util.StringW equed, float[] s, int offsets, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Sposvx.sposvx(fact, uplo, n, nrhs, a, offseta, lda, af, offsetaf, ldaf, equed, s, offsets, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void spotf2K(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info) { - org.netlib.lapack.Spotf2.spotf2(uplo, n, a, _a_offset, lda, info); + protected void spotf2K(String uplo, int n, float[] a, int offseta, int lda, org.netlib.util.intW info) { + org.netlib.lapack.Spotf2.spotf2(uplo, n, a, offseta, lda, info); } - protected void spotrfK(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info) { - org.netlib.lapack.Spotrf.spotrf(uplo, n, a, _a_offset, lda, info); + protected void spotrfK(String uplo, int n, float[] a, int offseta, int lda, org.netlib.util.intW info) { + org.netlib.lapack.Spotrf.spotrf(uplo, n, a, offseta, lda, info); } - protected void spotriK(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info) { - org.netlib.lapack.Spotri.spotri(uplo, n, a, _a_offset, lda, info); + protected void spotriK(String uplo, int n, float[] a, int offseta, int lda, org.netlib.util.intW info) { + org.netlib.lapack.Spotri.spotri(uplo, n, a, offseta, lda, info); } - protected void spotrsK(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Spotrs.spotrs(uplo, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, info); + protected void spotrsK(String uplo, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Spotrs.spotrs(uplo, n, nrhs, a, offseta, lda, b, offsetb, ldb, info); } - protected void sppconK(String uplo, int n, float[] ap, int _ap_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sppcon.sppcon(uplo, n, ap, _ap_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + protected void sppconK(String uplo, int n, float[] ap, int offsetap, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Sppcon.sppcon(uplo, n, ap, offsetap, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected void sppequK(String uplo, int n, float[] ap, int _ap_offset, float[] s, int _s_offset, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info) { - org.netlib.lapack.Sppequ.sppequ(uplo, n, ap, _ap_offset, s, _s_offset, scond, amax, info); + protected void sppequK(String uplo, int n, float[] ap, int offsetap, float[] s, int offsets, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info) { + org.netlib.lapack.Sppequ.sppequ(uplo, n, ap, offsetap, s, offsets, scond, amax, info); } - protected void spprfsK(String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] afp, int _afp_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Spprfs.spprfs(uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void spprfsK(String uplo, int n, int nrhs, float[] ap, int offsetap, float[] afp, int offsetafp, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Spprfs.spprfs(uplo, n, nrhs, ap, offsetap, afp, offsetafp, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void sppsvK(String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Sppsv.sppsv(uplo, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, info); + protected void sppsvK(String uplo, int n, int nrhs, float[] ap, int offsetap, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Sppsv.sppsv(uplo, n, nrhs, ap, offsetap, b, offsetb, ldb, info); } - protected void sppsvxK(String fact, String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] afp, int _afp_offset, org.netlib.util.StringW equed, float[] s, int _s_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sppsvx.sppsvx(fact, uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, equed, s, _s_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void sppsvxK(String fact, String uplo, int n, int nrhs, float[] ap, int offsetap, float[] afp, int offsetafp, org.netlib.util.StringW equed, float[] s, int offsets, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Sppsvx.sppsvx(fact, uplo, n, nrhs, ap, offsetap, afp, offsetafp, equed, s, offsets, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void spptrfK(String uplo, int n, float[] ap, int _ap_offset, org.netlib.util.intW info) { - org.netlib.lapack.Spptrf.spptrf(uplo, n, ap, _ap_offset, info); + protected void spptrfK(String uplo, int n, float[] ap, int offsetap, org.netlib.util.intW info) { + org.netlib.lapack.Spptrf.spptrf(uplo, n, ap, offsetap, info); } - protected void spptriK(String uplo, int n, float[] ap, int _ap_offset, org.netlib.util.intW info) { - org.netlib.lapack.Spptri.spptri(uplo, n, ap, _ap_offset, info); + protected void spptriK(String uplo, int n, float[] ap, int offsetap, org.netlib.util.intW info) { + org.netlib.lapack.Spptri.spptri(uplo, n, ap, offsetap, info); } - protected void spptrsK(String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Spptrs.spptrs(uplo, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, info); + protected void spptrsK(String uplo, int n, int nrhs, float[] ap, int offsetap, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Spptrs.spptrs(uplo, n, nrhs, ap, offsetap, b, offsetb, ldb, info); } - protected void sptconK(int n, float[] d, int _d_offset, float[] e, int _e_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sptcon.sptcon(n, d, _d_offset, e, _e_offset, anorm, rcond, work, _work_offset, info); + protected void sptconK(int n, float[] d, int offsetd, float[] e, int offsete, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Sptcon.sptcon(n, d, offsetd, e, offsete, anorm, rcond, work, offsetwork, info); } - protected void spteqrK(String compz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Spteqr.spteqr(compz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, info); + protected void spteqrK(String compz, int n, float[] d, int offsetd, float[] e, int offsete, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Spteqr.spteqr(compz, n, d, offsetd, e, offsete, z, offsetz, ldz, work, offsetwork, info); } - protected void sptrfsK(int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] df, int _df_offset, float[] ef, int _ef_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sptrfs.sptrfs(n, nrhs, d, _d_offset, e, _e_offset, df, _df_offset, ef, _ef_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, info); + protected void sptrfsK(int n, int nrhs, float[] d, int offsetd, float[] e, int offsete, float[] df, int offsetdf, float[] ef, int offsetef, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Sptrfs.sptrfs(n, nrhs, d, offsetd, e, offsete, df, offsetdf, ef, offsetef, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, info); } - protected void sptsvK(int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Sptsv.sptsv(n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb, info); + protected void sptsvK(int n, int nrhs, float[] d, int offsetd, float[] e, int offsete, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Sptsv.sptsv(n, nrhs, d, offsetd, e, offsete, b, offsetb, ldb, info); } - protected void sptsvxK(String fact, int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] df, int _df_offset, float[] ef, int _ef_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sptsvx.sptsvx(fact, n, nrhs, d, _d_offset, e, _e_offset, df, _df_offset, ef, _ef_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, info); + protected void sptsvxK(String fact, int n, int nrhs, float[] d, int offsetd, float[] e, int offsete, float[] df, int offsetdf, float[] ef, int offsetef, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Sptsvx.sptsvx(fact, n, nrhs, d, offsetd, e, offsete, df, offsetdf, ef, offsetef, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, info); } - protected void spttrfK(int n, float[] d, int _d_offset, float[] e, int _e_offset, org.netlib.util.intW info) { - org.netlib.lapack.Spttrf.spttrf(n, d, _d_offset, e, _e_offset, info); + protected void spttrfK(int n, float[] d, int offsetd, float[] e, int offsete, org.netlib.util.intW info) { + org.netlib.lapack.Spttrf.spttrf(n, d, offsetd, e, offsete, info); } - protected void spttrsK(int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Spttrs.spttrs(n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb, info); + protected void spttrsK(int n, int nrhs, float[] d, int offsetd, float[] e, int offsete, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Spttrs.spttrs(n, nrhs, d, offsetd, e, offsete, b, offsetb, ldb, info); } - protected void sptts2K(int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] b, int _b_offset, int ldb) { - org.netlib.lapack.Sptts2.sptts2(n, nrhs, d, _d_offset, e, _e_offset, b, _b_offset, ldb); + protected void sptts2K(int n, int nrhs, float[] d, int offsetd, float[] e, int offsete, float[] b, int offsetb, int ldb) { + org.netlib.lapack.Sptts2.sptts2(n, nrhs, d, offsetd, e, offsete, b, offsetb, ldb); } - protected void srsclK(int n, float sa, float[] sx, int _sx_offset, int incx) { - org.netlib.lapack.Srscl.srscl(n, sa, sx, _sx_offset, incx); + protected void srsclK(int n, float sa, float[] sx, int offsetsx, int incx) { + org.netlib.lapack.Srscl.srscl(n, sa, sx, offsetsx, incx); } - protected void ssbevK(String jobz, String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Ssbev.ssbev(jobz, uplo, n, kd, ab, _ab_offset, ldab, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); + protected void ssbevK(String jobz, String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Ssbev.ssbev(jobz, uplo, n, kd, ab, offsetab, ldab, w, offsetw, z, offsetz, ldz, work, offsetwork, info); } - protected void ssbevdK(String jobz, String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - org.netlib.lapack.Ssbevd.ssbevd(jobz, uplo, n, kd, ab, _ab_offset, ldab, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + protected void ssbevdK(String jobz, String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { + org.netlib.lapack.Ssbevd.ssbevd(jobz, uplo, n, kd, ab, offsetab, ldab, w, offsetw, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected void ssbevxK(String jobz, String range, String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] q, int _q_offset, int ldq, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - org.netlib.lapack.Ssbevx.ssbevx(jobz, range, uplo, n, kd, ab, _ab_offset, ldab, q, _q_offset, ldq, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + protected void ssbevxK(String jobz, String range, String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float[] q, int offsetq, int ldq, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { + org.netlib.lapack.Ssbevx.ssbevx(jobz, range, uplo, n, kd, ab, offsetab, ldab, q, offsetq, ldq, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, work, offsetwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected void ssbgstK(String vect, String uplo, int n, int ka, int kb, float[] ab, int _ab_offset, int ldab, float[] bb, int _bb_offset, int ldbb, float[] x, int _x_offset, int ldx, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Ssbgst.ssbgst(vect, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, x, _x_offset, ldx, work, _work_offset, info); + protected void ssbgstK(String vect, String uplo, int n, int ka, int kb, float[] ab, int offsetab, int ldab, float[] bb, int offsetbb, int ldbb, float[] x, int offsetx, int ldx, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Ssbgst.ssbgst(vect, uplo, n, ka, kb, ab, offsetab, ldab, bb, offsetbb, ldbb, x, offsetx, ldx, work, offsetwork, info); } - protected void ssbgvK(String jobz, String uplo, int n, int ka, int kb, float[] ab, int _ab_offset, int ldab, float[] bb, int _bb_offset, int ldbb, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Ssbgv.ssbgv(jobz, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); + protected void ssbgvK(String jobz, String uplo, int n, int ka, int kb, float[] ab, int offsetab, int ldab, float[] bb, int offsetbb, int ldbb, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Ssbgv.ssbgv(jobz, uplo, n, ka, kb, ab, offsetab, ldab, bb, offsetbb, ldbb, w, offsetw, z, offsetz, ldz, work, offsetwork, info); } - protected void ssbgvdK(String jobz, String uplo, int n, int ka, int kb, float[] ab, int _ab_offset, int ldab, float[] bb, int _bb_offset, int ldbb, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - org.netlib.lapack.Ssbgvd.ssbgvd(jobz, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + protected void ssbgvdK(String jobz, String uplo, int n, int ka, int kb, float[] ab, int offsetab, int ldab, float[] bb, int offsetbb, int ldbb, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { + org.netlib.lapack.Ssbgvd.ssbgvd(jobz, uplo, n, ka, kb, ab, offsetab, ldab, bb, offsetbb, ldbb, w, offsetw, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected void ssbgvxK(String jobz, String range, String uplo, int n, int ka, int kb, float[] ab, int _ab_offset, int ldab, float[] bb, int _bb_offset, int ldbb, float[] q, int _q_offset, int ldq, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - org.netlib.lapack.Ssbgvx.ssbgvx(jobz, range, uplo, n, ka, kb, ab, _ab_offset, ldab, bb, _bb_offset, ldbb, q, _q_offset, ldq, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + protected void ssbgvxK(String jobz, String range, String uplo, int n, int ka, int kb, float[] ab, int offsetab, int ldab, float[] bb, int offsetbb, int ldbb, float[] q, int offsetq, int ldq, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { + org.netlib.lapack.Ssbgvx.ssbgvx(jobz, range, uplo, n, ka, kb, ab, offsetab, ldab, bb, offsetbb, ldbb, q, offsetq, ldq, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, work, offsetwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected void ssbtrdK(String vect, String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] d, int _d_offset, float[] e, int _e_offset, float[] q, int _q_offset, int ldq, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Ssbtrd.ssbtrd(vect, uplo, n, kd, ab, _ab_offset, ldab, d, _d_offset, e, _e_offset, q, _q_offset, ldq, work, _work_offset, info); + protected void ssbtrdK(String vect, String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float[] d, int offsetd, float[] e, int offsete, float[] q, int offsetq, int ldq, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Ssbtrd.ssbtrd(vect, uplo, n, kd, ab, offsetab, ldab, d, offsetd, e, offsete, q, offsetq, ldq, work, offsetwork, info); } - protected void sspconK(String uplo, int n, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sspcon.sspcon(uplo, n, ap, _ap_offset, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + protected void sspconK(String uplo, int n, float[] ap, int offsetap, int[] ipiv, int offsetipiv, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Sspcon.sspcon(uplo, n, ap, offsetap, ipiv, offsetipiv, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected void sspevK(String jobz, String uplo, int n, float[] ap, int _ap_offset, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sspev.sspev(jobz, uplo, n, ap, _ap_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); + protected void sspevK(String jobz, String uplo, int n, float[] ap, int offsetap, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Sspev.sspev(jobz, uplo, n, ap, offsetap, w, offsetw, z, offsetz, ldz, work, offsetwork, info); } - protected void sspevdK(String jobz, String uplo, int n, float[] ap, int _ap_offset, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - org.netlib.lapack.Sspevd.sspevd(jobz, uplo, n, ap, _ap_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + protected void sspevdK(String jobz, String uplo, int n, float[] ap, int offsetap, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { + org.netlib.lapack.Sspevd.sspevd(jobz, uplo, n, ap, offsetap, w, offsetw, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected void sspevxK(String jobz, String range, String uplo, int n, float[] ap, int _ap_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sspevx.sspevx(jobz, range, uplo, n, ap, _ap_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + protected void sspevxK(String jobz, String range, String uplo, int n, float[] ap, int offsetap, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { + org.netlib.lapack.Sspevx.sspevx(jobz, range, uplo, n, ap, offsetap, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, work, offsetwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected void sspgstK(int itype, String uplo, int n, float[] ap, int _ap_offset, float[] bp, int _bp_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sspgst.sspgst(itype, uplo, n, ap, _ap_offset, bp, _bp_offset, info); + protected void sspgstK(int itype, String uplo, int n, float[] ap, int offsetap, float[] bp, int offsetbp, org.netlib.util.intW info) { + org.netlib.lapack.Sspgst.sspgst(itype, uplo, n, ap, offsetap, bp, offsetbp, info); } - protected void sspgvK(int itype, String jobz, String uplo, int n, float[] ap, int _ap_offset, float[] bp, int _bp_offset, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sspgv.sspgv(itype, jobz, uplo, n, ap, _ap_offset, bp, _bp_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, info); + protected void sspgvK(int itype, String jobz, String uplo, int n, float[] ap, int offsetap, float[] bp, int offsetbp, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Sspgv.sspgv(itype, jobz, uplo, n, ap, offsetap, bp, offsetbp, w, offsetw, z, offsetz, ldz, work, offsetwork, info); } - protected void sspgvdK(int itype, String jobz, String uplo, int n, float[] ap, int _ap_offset, float[] bp, int _bp_offset, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - org.netlib.lapack.Sspgvd.sspgvd(itype, jobz, uplo, n, ap, _ap_offset, bp, _bp_offset, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + protected void sspgvdK(int itype, String jobz, String uplo, int n, float[] ap, int offsetap, float[] bp, int offsetbp, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { + org.netlib.lapack.Sspgvd.sspgvd(itype, jobz, uplo, n, ap, offsetap, bp, offsetbp, w, offsetw, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected void sspgvxK(int itype, String jobz, String range, String uplo, int n, float[] ap, int _ap_offset, float[] bp, int _bp_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sspgvx.sspgvx(itype, jobz, range, uplo, n, ap, _ap_offset, bp, _bp_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + protected void sspgvxK(int itype, String jobz, String range, String uplo, int n, float[] ap, int offsetap, float[] bp, int offsetbp, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { + org.netlib.lapack.Sspgvx.sspgvx(itype, jobz, range, uplo, n, ap, offsetap, bp, offsetbp, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, work, offsetwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected void ssprfsK(String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] afp, int _afp_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Ssprfs.ssprfs(uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void ssprfsK(String uplo, int n, int nrhs, float[] ap, int offsetap, float[] afp, int offsetafp, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Ssprfs.ssprfs(uplo, n, nrhs, ap, offsetap, afp, offsetafp, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void sspsvK(String uplo, int n, int nrhs, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Sspsv.sspsv(uplo, n, nrhs, ap, _ap_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + protected void sspsvK(String uplo, int n, int nrhs, float[] ap, int offsetap, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Sspsv.sspsv(uplo, n, nrhs, ap, offsetap, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected void sspsvxK(String fact, String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] afp, int _afp_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sspsvx.sspsvx(fact, uplo, n, nrhs, ap, _ap_offset, afp, _afp_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void sspsvxK(String fact, String uplo, int n, int nrhs, float[] ap, int offsetap, float[] afp, int offsetafp, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Sspsvx.sspsvx(fact, uplo, n, nrhs, ap, offsetap, afp, offsetafp, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void ssptrdK(String uplo, int n, float[] ap, int _ap_offset, float[] d, int _d_offset, float[] e, int _e_offset, float[] tau, int _tau_offset, org.netlib.util.intW info) { - org.netlib.lapack.Ssptrd.ssptrd(uplo, n, ap, _ap_offset, d, _d_offset, e, _e_offset, tau, _tau_offset, info); + protected void ssptrdK(String uplo, int n, float[] ap, int offsetap, float[] d, int offsetd, float[] e, int offsete, float[] tau, int offsettau, org.netlib.util.intW info) { + org.netlib.lapack.Ssptrd.ssptrd(uplo, n, ap, offsetap, d, offsetd, e, offsete, tau, offsettau, info); } - protected void ssptrfK(String uplo, int n, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { - org.netlib.lapack.Ssptrf.ssptrf(uplo, n, ap, _ap_offset, ipiv, _ipiv_offset, info); + protected void ssptrfK(String uplo, int n, float[] ap, int offsetap, int[] ipiv, int offsetipiv, org.netlib.util.intW info) { + org.netlib.lapack.Ssptrf.ssptrf(uplo, n, ap, offsetap, ipiv, offsetipiv, info); } - protected void ssptriK(String uplo, int n, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Ssptri.ssptri(uplo, n, ap, _ap_offset, ipiv, _ipiv_offset, work, _work_offset, info); + protected void ssptriK(String uplo, int n, float[] ap, int offsetap, int[] ipiv, int offsetipiv, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Ssptri.ssptri(uplo, n, ap, offsetap, ipiv, offsetipiv, work, offsetwork, info); } - protected void ssptrsK(String uplo, int n, int nrhs, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Ssptrs.ssptrs(uplo, n, nrhs, ap, _ap_offset, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + protected void ssptrsK(String uplo, int n, int nrhs, float[] ap, int offsetap, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Ssptrs.ssptrs(uplo, n, nrhs, ap, offsetap, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected void sstebzK(String range, String order, int n, float vl, float vu, int il, int iu, float abstol, float[] d, int _d_offset, float[] e, int _e_offset, org.netlib.util.intW m, org.netlib.util.intW nsplit, float[] w, int _w_offset, int[] iblock, int _iblock_offset, int[] isplit, int _isplit_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sstebz.sstebz(range, order, n, vl, vu, il, iu, abstol, d, _d_offset, e, _e_offset, m, nsplit, w, _w_offset, iblock, _iblock_offset, isplit, _isplit_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void sstebzK(String range, String order, int n, float vl, float vu, int il, int iu, float abstol, float[] d, int offsetd, float[] e, int offsete, org.netlib.util.intW m, org.netlib.util.intW nsplit, float[] w, int offsetw, int[] iblock, int offsetiblock, int[] isplit, int offsetisplit, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Sstebz.sstebz(range, order, n, vl, vu, il, iu, abstol, d, offsetd, e, offsete, m, nsplit, w, offsetw, iblock, offsetiblock, isplit, offsetisplit, work, offsetwork, iwork, offsetiwork, info); } - protected void sstedcK(String compz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - org.netlib.lapack.Sstedc.sstedc(compz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + protected void sstedcK(String compz, int n, float[] d, int offsetd, float[] e, int offsete, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { + org.netlib.lapack.Sstedc.sstedc(compz, n, d, offsetd, e, offsete, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected void sstegrK(String jobz, String range, int n, float[] d, int _d_offset, float[] e, int _e_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - org.netlib.lapack.Sstegr.sstegr(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + protected void sstegrK(String jobz, String range, int n, float[] d, int offsetd, float[] e, int offsete, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { + org.netlib.lapack.Sstegr.sstegr(jobz, range, n, d, offsetd, e, offsete, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, isuppz, offsetisuppz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected void ssteinK(int n, float[] d, int _d_offset, float[] e, int _e_offset, int m, float[] w, int _w_offset, int[] iblock, int _iblock_offset, int[] isplit, int _isplit_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sstein.sstein(n, d, _d_offset, e, _e_offset, m, w, _w_offset, iblock, _iblock_offset, isplit, _isplit_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + protected void ssteinK(int n, float[] d, int offsetd, float[] e, int offsete, int m, float[] w, int offsetw, int[] iblock, int offsetiblock, int[] isplit, int offsetisplit, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { + org.netlib.lapack.Sstein.sstein(n, d, offsetd, e, offsete, m, w, offsetw, iblock, offsetiblock, isplit, offsetisplit, z, offsetz, ldz, work, offsetwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected void sstemrK(String jobz, String range, int n, float[] d, int _d_offset, float[] e, int _e_offset, float vl, float vu, int il, int iu, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, int nzc, int[] isuppz, int _isuppz_offset, org.netlib.util.booleanW tryrac, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - org.netlib.lapack.Sstemr.sstemr(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, m, w, _w_offset, z, _z_offset, ldz, nzc, isuppz, _isuppz_offset, tryrac, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + protected void sstemrK(String jobz, String range, int n, float[] d, int offsetd, float[] e, int offsete, float vl, float vu, int il, int iu, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, int nzc, int[] isuppz, int offsetisuppz, org.netlib.util.booleanW tryrac, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { + org.netlib.lapack.Sstemr.sstemr(jobz, range, n, d, offsetd, e, offsete, vl, vu, il, iu, m, w, offsetw, z, offsetz, ldz, nzc, isuppz, offsetisuppz, tryrac, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected void ssteqrK(String compz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Ssteqr.ssteqr(compz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, info); + protected void ssteqrK(String compz, int n, float[] d, int offsetd, float[] e, int offsete, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Ssteqr.ssteqr(compz, n, d, offsetd, e, offsete, z, offsetz, ldz, work, offsetwork, info); } - protected void ssterfK(int n, float[] d, int _d_offset, float[] e, int _e_offset, org.netlib.util.intW info) { - org.netlib.lapack.Ssterf.ssterf(n, d, _d_offset, e, _e_offset, info); + protected void ssterfK(int n, float[] d, int offsetd, float[] e, int offsete, org.netlib.util.intW info) { + org.netlib.lapack.Ssterf.ssterf(n, d, offsetd, e, offsete, info); } - protected void sstevK(String jobz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sstev.sstev(jobz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, info); + protected void sstevK(String jobz, int n, float[] d, int offsetd, float[] e, int offsete, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Sstev.sstev(jobz, n, d, offsetd, e, offsete, z, offsetz, ldz, work, offsetwork, info); } - protected void sstevdK(String jobz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - org.netlib.lapack.Sstevd.sstevd(jobz, n, d, _d_offset, e, _e_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + protected void sstevdK(String jobz, int n, float[] d, int offsetd, float[] e, int offsete, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { + org.netlib.lapack.Sstevd.sstevd(jobz, n, d, offsetd, e, offsete, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected void sstevrK(String jobz, String range, int n, float[] d, int _d_offset, float[] e, int _e_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - org.netlib.lapack.Sstevr.sstevr(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + protected void sstevrK(String jobz, String range, int n, float[] d, int offsetd, float[] e, int offsete, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { + org.netlib.lapack.Sstevr.sstevr(jobz, range, n, d, offsetd, e, offsete, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, isuppz, offsetisuppz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected void sstevxK(String jobz, String range, int n, float[] d, int _d_offset, float[] e, int _e_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - org.netlib.lapack.Sstevx.sstevx(jobz, range, n, d, _d_offset, e, _e_offset, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, iwork, _iwork_offset, ifail, _ifail_offset, info); + protected void sstevxK(String jobz, String range, int n, float[] d, int offsetd, float[] e, int offsete, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { + org.netlib.lapack.Sstevx.sstevx(jobz, range, n, d, offsetd, e, offsete, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, work, offsetwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected void ssyconK(String uplo, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Ssycon.ssycon(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, anorm, rcond, work, _work_offset, iwork, _iwork_offset, info); + protected void ssyconK(String uplo, int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Ssycon.ssycon(uplo, n, a, offseta, lda, ipiv, offsetipiv, anorm, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected void ssyevK(String jobz, String uplo, int n, float[] a, int _a_offset, int lda, float[] w, int _w_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Ssyev.ssyev(jobz, uplo, n, a, _a_offset, lda, w, _w_offset, work, _work_offset, lwork, info); + protected void ssyevK(String jobz, String uplo, int n, float[] a, int offseta, int lda, float[] w, int offsetw, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Ssyev.ssyev(jobz, uplo, n, a, offseta, lda, w, offsetw, work, offsetwork, lwork, info); } - protected void ssyevdK(String jobz, String uplo, int n, float[] a, int _a_offset, int lda, float[] w, int _w_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - org.netlib.lapack.Ssyevd.ssyevd(jobz, uplo, n, a, _a_offset, lda, w, _w_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + protected void ssyevdK(String jobz, String uplo, int n, float[] a, int offseta, int lda, float[] w, int offsetw, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { + org.netlib.lapack.Ssyevd.ssyevd(jobz, uplo, n, a, offseta, lda, w, offsetw, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected void ssyevrK(String jobz, String range, String uplo, int n, float[] a, int _a_offset, int lda, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - org.netlib.lapack.Ssyevr.ssyevr(jobz, range, uplo, n, a, _a_offset, lda, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, isuppz, _isuppz_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + protected void ssyevrK(String jobz, String range, String uplo, int n, float[] a, int offseta, int lda, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { + org.netlib.lapack.Ssyevr.ssyevr(jobz, range, uplo, n, a, offseta, lda, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, isuppz, offsetisuppz, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected void ssyevxK(String jobz, String range, String uplo, int n, float[] a, int _a_offset, int lda, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - org.netlib.lapack.Ssyevx.ssyevx(jobz, range, uplo, n, a, _a_offset, lda, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, ifail, _ifail_offset, info); + protected void ssyevxK(String jobz, String range, String uplo, int n, float[] a, int offseta, int lda, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { + org.netlib.lapack.Ssyevx.ssyevx(jobz, range, uplo, n, a, offseta, lda, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected void ssygs2K(int itype, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Ssygs2.ssygs2(itype, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, info); + protected void ssygs2K(int itype, String uplo, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Ssygs2.ssygs2(itype, uplo, n, a, offseta, lda, b, offsetb, ldb, info); } - protected void ssygstK(int itype, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Ssygst.ssygst(itype, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, info); + protected void ssygstK(int itype, String uplo, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Ssygst.ssygst(itype, uplo, n, a, offseta, lda, b, offsetb, ldb, info); } - protected void ssygvK(int itype, String jobz, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] w, int _w_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Ssygv.ssygv(itype, jobz, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, w, _w_offset, work, _work_offset, lwork, info); + protected void ssygvK(int itype, String jobz, String uplo, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] w, int offsetw, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Ssygv.ssygv(itype, jobz, uplo, n, a, offseta, lda, b, offsetb, ldb, w, offsetw, work, offsetwork, lwork, info); } - protected void ssygvdK(int itype, String jobz, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] w, int _w_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - org.netlib.lapack.Ssygvd.ssygvd(itype, jobz, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, w, _w_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + protected void ssygvdK(int itype, String jobz, String uplo, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] w, int offsetw, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { + org.netlib.lapack.Ssygvd.ssygvd(itype, jobz, uplo, n, a, offseta, lda, b, offsetb, ldb, w, offsetw, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected void ssygvxK(int itype, String jobz, String range, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info) { - org.netlib.lapack.Ssygvx.ssygvx(itype, jobz, range, uplo, n, a, _a_offset, lda, b, _b_offset, ldb, vl, vu, il, iu, abstol, m, w, _w_offset, z, _z_offset, ldz, work, _work_offset, lwork, iwork, _iwork_offset, ifail, _ifail_offset, info); + protected void ssygvxK(int itype, String jobz, String range, String uplo, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info) { + org.netlib.lapack.Ssygvx.ssygvx(itype, jobz, range, uplo, n, a, offseta, lda, b, offsetb, ldb, vl, vu, il, iu, abstol, m, w, offsetw, z, offsetz, ldz, work, offsetwork, lwork, iwork, offsetiwork, ifail, offsetifail, info); } - protected void ssyrfsK(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Ssyrfs.ssyrfs(uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void ssyrfsK(String uplo, int n, int nrhs, float[] a, int offseta, int lda, float[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Ssyrfs.ssyrfs(uplo, n, nrhs, a, offseta, lda, af, offsetaf, ldaf, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void ssysvK(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Ssysv.ssysv(uplo, n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, work, _work_offset, lwork, info); + protected void ssysvK(String uplo, int n, int nrhs, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Ssysv.ssysv(uplo, n, nrhs, a, offseta, lda, ipiv, offsetipiv, b, offsetb, ldb, work, offsetwork, lwork, info); } - protected void ssysvxK(String fact, String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Ssysvx.ssysvx(fact, uplo, n, nrhs, a, _a_offset, lda, af, _af_offset, ldaf, ipiv, _ipiv_offset, b, _b_offset, ldb, x, _x_offset, ldx, rcond, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, lwork, iwork, _iwork_offset, info); + protected void ssysvxK(String fact, String uplo, int n, int nrhs, float[] a, int offseta, int lda, float[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Ssysvx.ssysvx(fact, uplo, n, nrhs, a, offseta, lda, af, offsetaf, ldaf, ipiv, offsetipiv, b, offsetb, ldb, x, offsetx, ldx, rcond, ferr, offsetferr, berr, offsetberr, work, offsetwork, lwork, iwork, offsetiwork, info); } - protected void ssytd2K(String uplo, int n, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tau, int _tau_offset, org.netlib.util.intW info) { - org.netlib.lapack.Ssytd2.ssytd2(uplo, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tau, _tau_offset, info); + protected void ssytd2K(String uplo, int n, float[] a, int offseta, int lda, float[] d, int offsetd, float[] e, int offsete, float[] tau, int offsettau, org.netlib.util.intW info) { + org.netlib.lapack.Ssytd2.ssytd2(uplo, n, a, offseta, lda, d, offsetd, e, offsete, tau, offsettau, info); } - protected void ssytf2K(String uplo, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info) { - org.netlib.lapack.Ssytf2.ssytf2(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, info); + protected void ssytf2K(String uplo, int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, org.netlib.util.intW info) { + org.netlib.lapack.Ssytf2.ssytf2(uplo, n, a, offseta, lda, ipiv, offsetipiv, info); } - protected void ssytrdK(String uplo, int n, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Ssytrd.ssytrd(uplo, n, a, _a_offset, lda, d, _d_offset, e, _e_offset, tau, _tau_offset, work, _work_offset, lwork, info); + protected void ssytrdK(String uplo, int n, float[] a, int offseta, int lda, float[] d, int offsetd, float[] e, int offsete, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Ssytrd.ssytrd(uplo, n, a, offseta, lda, d, offsetd, e, offsete, tau, offsettau, work, offsetwork, lwork, info); } - protected void ssytrfK(String uplo, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Ssytrf.ssytrf(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, work, _work_offset, lwork, info); + protected void ssytrfK(String uplo, int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Ssytrf.ssytrf(uplo, n, a, offseta, lda, ipiv, offsetipiv, work, offsetwork, lwork, info); } - protected void ssytriK(String uplo, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Ssytri.ssytri(uplo, n, a, _a_offset, lda, ipiv, _ipiv_offset, work, _work_offset, info); + protected void ssytriK(String uplo, int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Ssytri.ssytri(uplo, n, a, offseta, lda, ipiv, offsetipiv, work, offsetwork, info); } - protected void ssytrsK(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Ssytrs.ssytrs(uplo, n, nrhs, a, _a_offset, lda, ipiv, _ipiv_offset, b, _b_offset, ldb, info); + protected void ssytrsK(String uplo, int n, int nrhs, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Ssytrs.ssytrs(uplo, n, nrhs, a, offseta, lda, ipiv, offsetipiv, b, offsetb, ldb, info); } - protected void stbconK(String norm, String uplo, String diag, int n, int kd, float[] ab, int _ab_offset, int ldab, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Stbcon.stbcon(norm, uplo, diag, n, kd, ab, _ab_offset, ldab, rcond, work, _work_offset, iwork, _iwork_offset, info); + protected void stbconK(String norm, String uplo, String diag, int n, int kd, float[] ab, int offsetab, int ldab, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Stbcon.stbcon(norm, uplo, diag, n, kd, ab, offsetab, ldab, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected void stbrfsK(String uplo, String trans, String diag, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Stbrfs.stbrfs(uplo, trans, diag, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void stbrfsK(String uplo, String trans, String diag, int n, int kd, int nrhs, float[] ab, int offsetab, int ldab, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Stbrfs.stbrfs(uplo, trans, diag, n, kd, nrhs, ab, offsetab, ldab, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void stbtrsK(String uplo, String trans, String diag, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Stbtrs.stbtrs(uplo, trans, diag, n, kd, nrhs, ab, _ab_offset, ldab, b, _b_offset, ldb, info); + protected void stbtrsK(String uplo, String trans, String diag, int n, int kd, int nrhs, float[] ab, int offsetab, int ldab, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Stbtrs.stbtrs(uplo, trans, diag, n, kd, nrhs, ab, offsetab, ldab, b, offsetb, ldb, info); } - protected void stgevcK(String side, String howmny, boolean[] select, int _select_offset, int n, float[] s, int _s_offset, int lds, float[] p, int _p_offset, int ldp, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Stgevc.stgevc(side, howmny, select, _select_offset, n, s, _s_offset, lds, p, _p_offset, ldp, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, mm, m, work, _work_offset, info); + protected void stgevcK(String side, String howmny, boolean[] select, int offsetselect, int n, float[] s, int offsets, int lds, float[] p, int offsetp, int ldp, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, int mm, org.netlib.util.intW m, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Stgevc.stgevc(side, howmny, select, offsetselect, n, s, offsets, lds, p, offsetp, ldp, vl, offsetvl, ldvl, vr, offsetvr, ldvr, mm, m, work, offsetwork, info); } - protected void stgex2K(boolean wantq, boolean wantz, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, int j1, int n1, int n2, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Stgex2.stgex2(wantq, wantz, n, a, _a_offset, lda, b, _b_offset, ldb, q, _q_offset, ldq, z, _z_offset, ldz, j1, n1, n2, work, _work_offset, lwork, info); + protected void stgex2K(boolean wantq, boolean wantz, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] q, int offsetq, int ldq, float[] z, int offsetz, int ldz, int j1, int n1, int n2, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Stgex2.stgex2(wantq, wantz, n, a, offseta, lda, b, offsetb, ldb, q, offsetq, ldq, z, offsetz, ldz, j1, n1, n2, work, offsetwork, lwork, info); } - protected void stgexcK(boolean wantq, boolean wantz, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, org.netlib.util.intW ifst, org.netlib.util.intW ilst, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Stgexc.stgexc(wantq, wantz, n, a, _a_offset, lda, b, _b_offset, ldb, q, _q_offset, ldq, z, _z_offset, ldz, ifst, ilst, work, _work_offset, lwork, info); + protected void stgexcK(boolean wantq, boolean wantz, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] q, int offsetq, int ldq, float[] z, int offsetz, int ldz, org.netlib.util.intW ifst, org.netlib.util.intW ilst, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Stgexc.stgexc(wantq, wantz, n, a, offseta, lda, b, offsetb, ldb, q, offsetq, ldq, z, offsetz, ldz, ifst, ilst, work, offsetwork, lwork, info); } - protected void stgsenK(int ijob, boolean wantq, boolean wantz, boolean[] select, int _select_offset, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, org.netlib.util.intW m, org.netlib.util.floatW pl, org.netlib.util.floatW pr, float[] dif, int _dif_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - org.netlib.lapack.Stgsen.stgsen(ijob, wantq, wantz, select, _select_offset, n, a, _a_offset, lda, b, _b_offset, ldb, alphar, _alphar_offset, alphai, _alphai_offset, beta, _beta_offset, q, _q_offset, ldq, z, _z_offset, ldz, m, pl, pr, dif, _dif_offset, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + protected void stgsenK(int ijob, boolean wantq, boolean wantz, boolean[] select, int offsetselect, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] q, int offsetq, int ldq, float[] z, int offsetz, int ldz, org.netlib.util.intW m, org.netlib.util.floatW pl, org.netlib.util.floatW pr, float[] dif, int offsetdif, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { + org.netlib.lapack.Stgsen.stgsen(ijob, wantq, wantz, select, offsetselect, n, a, offseta, lda, b, offsetb, ldb, alphar, offsetalphar, alphai, offsetalphai, beta, offsetbeta, q, offsetq, ldq, z, offsetz, ldz, m, pl, pr, dif, offsetdif, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected void stgsjaK(String jobu, String jobv, String jobq, int m, int p, int n, int k, int l, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float tola, float tolb, float[] alpha, int _alpha_offset, float[] beta, int _beta_offset, float[] u, int _u_offset, int ldu, float[] v, int _v_offset, int ldv, float[] q, int _q_offset, int ldq, float[] work, int _work_offset, org.netlib.util.intW ncycle, org.netlib.util.intW info) { - org.netlib.lapack.Stgsja.stgsja(jobu, jobv, jobq, m, p, n, k, l, a, _a_offset, lda, b, _b_offset, ldb, tola, tolb, alpha, _alpha_offset, beta, _beta_offset, u, _u_offset, ldu, v, _v_offset, ldv, q, _q_offset, ldq, work, _work_offset, ncycle, info); + protected void stgsjaK(String jobu, String jobv, String jobq, int m, int p, int n, int k, int l, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float tola, float tolb, float[] alpha, int offsetalpha, float[] beta, int offsetbeta, float[] u, int offsetu, int ldu, float[] v, int offsetv, int ldv, float[] q, int offsetq, int ldq, float[] work, int offsetwork, org.netlib.util.intW ncycle, org.netlib.util.intW info) { + org.netlib.lapack.Stgsja.stgsja(jobu, jobv, jobq, m, p, n, k, l, a, offseta, lda, b, offsetb, ldb, tola, tolb, alpha, offsetalpha, beta, offsetbeta, u, offsetu, ldu, v, offsetv, ldv, q, offsetq, ldq, work, offsetwork, ncycle, info); } - protected void stgsnaK(String job, String howmny, boolean[] select, int _select_offset, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] s, int _s_offset, float[] dif, int _dif_offset, int mm, org.netlib.util.intW m, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Stgsna.stgsna(job, howmny, select, _select_offset, n, a, _a_offset, lda, b, _b_offset, ldb, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, s, _s_offset, dif, _dif_offset, mm, m, work, _work_offset, lwork, iwork, _iwork_offset, info); + protected void stgsnaK(String job, String howmny, boolean[] select, int offsetselect, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, float[] s, int offsets, float[] dif, int offsetdif, int mm, org.netlib.util.intW m, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Stgsna.stgsna(job, howmny, select, offsetselect, n, a, offseta, lda, b, offsetb, ldb, vl, offsetvl, ldvl, vr, offsetvr, ldvr, s, offsets, dif, offsetdif, mm, m, work, offsetwork, lwork, iwork, offsetiwork, info); } - protected void stgsy2K(String trans, int ijob, int m, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] c, int _c_offset, int Ldc, float[] d, int _d_offset, int ldd, float[] e, int _e_offset, int lde, float[] f, int _f_offset, int ldf, org.netlib.util.floatW scale, org.netlib.util.floatW rdsum, org.netlib.util.floatW rdscal, int[] iwork, int _iwork_offset, org.netlib.util.intW pq, org.netlib.util.intW info) { - org.netlib.lapack.Stgsy2.stgsy2(trans, ijob, m, n, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, Ldc, d, _d_offset, ldd, e, _e_offset, lde, f, _f_offset, ldf, scale, rdsum, rdscal, iwork, _iwork_offset, pq, info); + protected void stgsy2K(String trans, int ijob, int m, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] c, int offsetc, int Ldc, float[] d, int offsetd, int ldd, float[] e, int offsete, int lde, float[] f, int offsetf, int ldf, org.netlib.util.floatW scale, org.netlib.util.floatW rdsum, org.netlib.util.floatW rdscal, int[] iwork, int offsetiwork, org.netlib.util.intW pq, org.netlib.util.intW info) { + org.netlib.lapack.Stgsy2.stgsy2(trans, ijob, m, n, a, offseta, lda, b, offsetb, ldb, c, offsetc, Ldc, d, offsetd, ldd, e, offsete, lde, f, offsetf, ldf, scale, rdsum, rdscal, iwork, offsetiwork, pq, info); } - protected void stgsylK(String trans, int ijob, int m, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] c, int _c_offset, int Ldc, float[] d, int _d_offset, int ldd, float[] e, int _e_offset, int lde, float[] f, int _f_offset, int ldf, org.netlib.util.floatW scale, org.netlib.util.floatW dif, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Stgsyl.stgsyl(trans, ijob, m, n, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, Ldc, d, _d_offset, ldd, e, _e_offset, lde, f, _f_offset, ldf, scale, dif, work, _work_offset, lwork, iwork, _iwork_offset, info); + protected void stgsylK(String trans, int ijob, int m, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] c, int offsetc, int Ldc, float[] d, int offsetd, int ldd, float[] e, int offsete, int lde, float[] f, int offsetf, int ldf, org.netlib.util.floatW scale, org.netlib.util.floatW dif, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Stgsyl.stgsyl(trans, ijob, m, n, a, offseta, lda, b, offsetb, ldb, c, offsetc, Ldc, d, offsetd, ldd, e, offsete, lde, f, offsetf, ldf, scale, dif, work, offsetwork, lwork, iwork, offsetiwork, info); } - protected void stpconK(String norm, String uplo, String diag, int n, float[] ap, int _ap_offset, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Stpcon.stpcon(norm, uplo, diag, n, ap, _ap_offset, rcond, work, _work_offset, iwork, _iwork_offset, info); + protected void stpconK(String norm, String uplo, String diag, int n, float[] ap, int offsetap, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Stpcon.stpcon(norm, uplo, diag, n, ap, offsetap, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected void stprfsK(String uplo, String trans, String diag, int n, int nrhs, float[] ap, int _ap_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Stprfs.stprfs(uplo, trans, diag, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void stprfsK(String uplo, String trans, String diag, int n, int nrhs, float[] ap, int offsetap, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Stprfs.stprfs(uplo, trans, diag, n, nrhs, ap, offsetap, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void stptriK(String uplo, String diag, int n, float[] ap, int _ap_offset, org.netlib.util.intW info) { - org.netlib.lapack.Stptri.stptri(uplo, diag, n, ap, _ap_offset, info); + protected void stptriK(String uplo, String diag, int n, float[] ap, int offsetap, org.netlib.util.intW info) { + org.netlib.lapack.Stptri.stptri(uplo, diag, n, ap, offsetap, info); } - protected void stptrsK(String uplo, String trans, String diag, int n, int nrhs, float[] ap, int _ap_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Stptrs.stptrs(uplo, trans, diag, n, nrhs, ap, _ap_offset, b, _b_offset, ldb, info); + protected void stptrsK(String uplo, String trans, String diag, int n, int nrhs, float[] ap, int offsetap, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Stptrs.stptrs(uplo, trans, diag, n, nrhs, ap, offsetap, b, offsetb, ldb, info); } - protected void strconK(String norm, String uplo, String diag, int n, float[] a, int _a_offset, int lda, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Strcon.strcon(norm, uplo, diag, n, a, _a_offset, lda, rcond, work, _work_offset, iwork, _iwork_offset, info); + protected void strconK(String norm, String uplo, String diag, int n, float[] a, int offseta, int lda, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Strcon.strcon(norm, uplo, diag, n, a, offseta, lda, rcond, work, offsetwork, iwork, offsetiwork, info); } - protected void strevcK(String side, String howmny, boolean[] select, int _select_offset, int n, float[] t, int _t_offset, int ldt, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Strevc.strevc(side, howmny, select, _select_offset, n, t, _t_offset, ldt, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, mm, m, work, _work_offset, info); + protected void strevcK(String side, String howmny, boolean[] select, int offsetselect, int n, float[] t, int offsett, int ldt, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, int mm, org.netlib.util.intW m, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Strevc.strevc(side, howmny, select, offsetselect, n, t, offsett, ldt, vl, offsetvl, ldvl, vr, offsetvr, ldvr, mm, m, work, offsetwork, info); } - protected void strexcK(String compq, int n, float[] t, int _t_offset, int ldt, float[] q, int _q_offset, int ldq, org.netlib.util.intW ifst, org.netlib.util.intW ilst, float[] work, int _work_offset, org.netlib.util.intW info) { - org.netlib.lapack.Strexc.strexc(compq, n, t, _t_offset, ldt, q, _q_offset, ldq, ifst, ilst, work, _work_offset, info); + protected void strexcK(String compq, int n, float[] t, int offsett, int ldt, float[] q, int offsetq, int ldq, org.netlib.util.intW ifst, org.netlib.util.intW ilst, float[] work, int offsetwork, org.netlib.util.intW info) { + org.netlib.lapack.Strexc.strexc(compq, n, t, offsett, ldt, q, offsetq, ldq, ifst, ilst, work, offsetwork, info); } - protected void strrfsK(String uplo, String trans, String diag, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Strrfs.strrfs(uplo, trans, diag, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, x, _x_offset, ldx, ferr, _ferr_offset, berr, _berr_offset, work, _work_offset, iwork, _iwork_offset, info); + protected void strrfsK(String uplo, String trans, String diag, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Strrfs.strrfs(uplo, trans, diag, n, nrhs, a, offseta, lda, b, offsetb, ldb, x, offsetx, ldx, ferr, offsetferr, berr, offsetberr, work, offsetwork, iwork, offsetiwork, info); } - protected void strsenK(String job, String compq, boolean[] select, int _select_offset, int n, float[] t, int _t_offset, int ldt, float[] q, int _q_offset, int ldq, float[] wr, int _wr_offset, float[] wi, int _wi_offset, org.netlib.util.intW m, org.netlib.util.floatW s, org.netlib.util.floatW sep, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info) { - org.netlib.lapack.Strsen.strsen(job, compq, select, _select_offset, n, t, _t_offset, ldt, q, _q_offset, ldq, wr, _wr_offset, wi, _wi_offset, m, s, sep, work, _work_offset, lwork, iwork, _iwork_offset, liwork, info); + protected void strsenK(String job, String compq, boolean[] select, int offsetselect, int n, float[] t, int offsett, int ldt, float[] q, int offsetq, int ldq, float[] wr, int offsetwr, float[] wi, int offsetwi, org.netlib.util.intW m, org.netlib.util.floatW s, org.netlib.util.floatW sep, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info) { + org.netlib.lapack.Strsen.strsen(job, compq, select, offsetselect, n, t, offsett, ldt, q, offsetq, ldq, wr, offsetwr, wi, offsetwi, m, s, sep, work, offsetwork, lwork, iwork, offsetiwork, liwork, info); } - protected void strsnaK(String job, String howmny, boolean[] select, int _select_offset, int n, float[] t, int _t_offset, int ldt, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] s, int _s_offset, float[] sep, int _sep_offset, int mm, org.netlib.util.intW m, float[] work, int _work_offset, int ldwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info) { - org.netlib.lapack.Strsna.strsna(job, howmny, select, _select_offset, n, t, _t_offset, ldt, vl, _vl_offset, ldvl, vr, _vr_offset, ldvr, s, _s_offset, sep, _sep_offset, mm, m, work, _work_offset, ldwork, iwork, _iwork_offset, info); + protected void strsnaK(String job, String howmny, boolean[] select, int offsetselect, int n, float[] t, int offsett, int ldt, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, float[] s, int offsets, float[] sep, int offsetsep, int mm, org.netlib.util.intW m, float[] work, int offsetwork, int ldwork, int[] iwork, int offsetiwork, org.netlib.util.intW info) { + org.netlib.lapack.Strsna.strsna(job, howmny, select, offsetselect, n, t, offsett, ldt, vl, offsetvl, ldvl, vr, offsetvr, ldvr, s, offsets, sep, offsetsep, mm, m, work, offsetwork, ldwork, iwork, offsetiwork, info); } - protected void strsylK(String trana, String tranb, int isgn, int m, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] c, int _c_offset, int Ldc, org.netlib.util.floatW scale, org.netlib.util.intW info) { - org.netlib.lapack.Strsyl.strsyl(trana, tranb, isgn, m, n, a, _a_offset, lda, b, _b_offset, ldb, c, _c_offset, Ldc, scale, info); + protected void strsylK(String trana, String tranb, int isgn, int m, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] c, int offsetc, int Ldc, org.netlib.util.floatW scale, org.netlib.util.intW info) { + org.netlib.lapack.Strsyl.strsyl(trana, tranb, isgn, m, n, a, offseta, lda, b, offsetb, ldb, c, offsetc, Ldc, scale, info); } - protected void strti2K(String uplo, String diag, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info) { - org.netlib.lapack.Strti2.strti2(uplo, diag, n, a, _a_offset, lda, info); + protected void strti2K(String uplo, String diag, int n, float[] a, int offseta, int lda, org.netlib.util.intW info) { + org.netlib.lapack.Strti2.strti2(uplo, diag, n, a, offseta, lda, info); } - protected void strtriK(String uplo, String diag, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info) { - org.netlib.lapack.Strtri.strtri(uplo, diag, n, a, _a_offset, lda, info); + protected void strtriK(String uplo, String diag, int n, float[] a, int offseta, int lda, org.netlib.util.intW info) { + org.netlib.lapack.Strtri.strtri(uplo, diag, n, a, offseta, lda, info); } - protected void strtrsK(String uplo, String trans, String diag, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info) { - org.netlib.lapack.Strtrs.strtrs(uplo, trans, diag, n, nrhs, a, _a_offset, lda, b, _b_offset, ldb, info); + protected void strtrsK(String uplo, String trans, String diag, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW info) { + org.netlib.lapack.Strtrs.strtrs(uplo, trans, diag, n, nrhs, a, offseta, lda, b, offsetb, ldb, info); } - protected void stzrqfK(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, org.netlib.util.intW info) { - org.netlib.lapack.Stzrqf.stzrqf(m, n, a, _a_offset, lda, tau, _tau_offset, info); + protected void stzrqfK(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, org.netlib.util.intW info) { + org.netlib.lapack.Stzrqf.stzrqf(m, n, a, offseta, lda, tau, offsettau, info); } - protected void stzrzfK(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info) { - org.netlib.lapack.Stzrzf.stzrzf(m, n, a, _a_offset, lda, tau, _tau_offset, work, _work_offset, lwork, info); + protected void stzrzfK(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info) { + org.netlib.lapack.Stzrzf.stzrzf(m, n, a, offseta, lda, tau, offsettau, work, offsetwork, lwork, info); } protected double dlamchK(String cmach) { diff --git a/lapack/src/main/java/dev/ludovic/netlib/lapack/JNILAPACK.java b/lapack/src/main/java/dev/ludovic/netlib/lapack/JNILAPACK.java index a505d08b..1ff2ea8c 100644 --- a/lapack/src/main/java/dev/ludovic/netlib/lapack/JNILAPACK.java +++ b/lapack/src/main/java/dev/ludovic/netlib/lapack/JNILAPACK.java @@ -63,709 +63,709 @@ public static dev.ludovic.netlib.NativeLAPACK getInstance() { return instance; } - protected native void dbdsdcK(String uplo, String compq, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, double[] q, int _q_offset, int[] iq, int _iq_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dbdsdcK(String uplo, String compq, int n, double[] d, int offsetd, double[] e, int offsete, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int ldvt, double[] q, int offsetq, int[] iq, int offsetiq, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dbdsqrK(String uplo, int n, int ncvt, int nru, int ncc, double[] d, int _d_offset, double[] e, int _e_offset, double[] vt, int _vt_offset, int ldvt, double[] u, int _u_offset, int ldu, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dbdsqrK(String uplo, int n, int ncvt, int nru, int ncc, double[] d, int offsetd, double[] e, int offsete, double[] vt, int offsetvt, int ldvt, double[] u, int offsetu, int ldu, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void ddisnaK(String job, int m, int n, double[] d, int _d_offset, double[] sep, int _sep_offset, org.netlib.util.intW info); + protected native void ddisnaK(String job, int m, int n, double[] d, int offsetd, double[] sep, int offsetsep, org.netlib.util.intW info); - protected native void dgbbrdK(String vect, int m, int n, int ncc, int kl, int ku, double[] ab, int _ab_offset, int ldab, double[] d, int _d_offset, double[] e, int _e_offset, double[] q, int _q_offset, int ldq, double[] pt, int _pt_offset, int ldpt, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dgbbrdK(String vect, int m, int n, int ncc, int kl, int ku, double[] ab, int offsetab, int ldab, double[] d, int offsetd, double[] e, int offsete, double[] q, int offsetq, int ldq, double[] pt, int offsetpt, int ldpt, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dgbconK(String norm, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dgbconK(String norm, int n, int kl, int ku, double[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dgbequK(int m, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, double[] r, int _r_offset, double[] c, int _c_offset, org.netlib.util.doubleW rowcnd, org.netlib.util.doubleW colcnd, org.netlib.util.doubleW amax, org.netlib.util.intW info); + protected native void dgbequK(int m, int n, int kl, int ku, double[] ab, int offsetab, int ldab, double[] r, int offsetr, double[] c, int offsetc, org.netlib.util.doubleW rowcnd, org.netlib.util.doubleW colcnd, org.netlib.util.doubleW amax, org.netlib.util.intW info); - protected native void dgbrfsK(String trans, int n, int kl, int ku, int nrhs, double[] ab, int _ab_offset, int ldab, double[] afb, int _afb_offset, int ldafb, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dgbrfsK(String trans, int n, int kl, int ku, int nrhs, double[] ab, int offsetab, int ldab, double[] afb, int offsetafb, int ldafb, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dgbsvK(int n, int kl, int ku, int nrhs, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void dgbsvK(int n, int kl, int ku, int nrhs, double[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void dgbsvxK(String fact, String trans, int n, int kl, int ku, int nrhs, double[] ab, int _ab_offset, int ldab, double[] afb, int _afb_offset, int ldafb, int[] ipiv, int _ipiv_offset, org.netlib.util.StringW equed, double[] r, int _r_offset, double[] c, int _c_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dgbsvxK(String fact, String trans, int n, int kl, int ku, int nrhs, double[] ab, int offsetab, int ldab, double[] afb, int offsetafb, int ldafb, int[] ipiv, int offsetipiv, org.netlib.util.StringW equed, double[] r, int offsetr, double[] c, int offsetc, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dgbtf2K(int m, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + protected native void dgbtf2K(int m, int n, int kl, int ku, double[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, org.netlib.util.intW info); - protected native void dgbtrfK(int m, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + protected native void dgbtrfK(int m, int n, int kl, int ku, double[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, org.netlib.util.intW info); - protected native void dgbtrsK(String trans, int n, int kl, int ku, int nrhs, double[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void dgbtrsK(String trans, int n, int kl, int ku, int nrhs, double[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void dgebakK(String job, String side, int n, int ilo, int ihi, double[] scale, int _scale_offset, int m, double[] v, int _v_offset, int ldv, org.netlib.util.intW info); + protected native void dgebakK(String job, String side, int n, int ilo, int ihi, double[] scale, int offsetscale, int m, double[] v, int offsetv, int ldv, org.netlib.util.intW info); - protected native void dgebalK(String job, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] scale, int _scale_offset, org.netlib.util.intW info); + protected native void dgebalK(String job, int n, double[] a, int offseta, int lda, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] scale, int offsetscale, org.netlib.util.intW info); - protected native void dgebd2K(int m, int n, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tauq, int _tauq_offset, double[] taup, int _taup_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dgebd2K(int m, int n, double[] a, int offseta, int lda, double[] d, int offsetd, double[] e, int offsete, double[] tauq, int offsettauq, double[] taup, int offsettaup, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dgebrdK(int m, int n, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tauq, int _tauq_offset, double[] taup, int _taup_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dgebrdK(int m, int n, double[] a, int offseta, int lda, double[] d, int offsetd, double[] e, int offsete, double[] tauq, int offsettauq, double[] taup, int offsettaup, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dgeconK(String norm, int n, double[] a, int _a_offset, int lda, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dgeconK(String norm, int n, double[] a, int offseta, int lda, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dgeequK(int m, int n, double[] a, int _a_offset, int lda, double[] r, int _r_offset, double[] c, int _c_offset, org.netlib.util.doubleW rowcnd, org.netlib.util.doubleW colcnd, org.netlib.util.doubleW amax, org.netlib.util.intW info); + protected native void dgeequK(int m, int n, double[] a, int offseta, int lda, double[] r, int offsetr, double[] c, int offsetc, org.netlib.util.doubleW rowcnd, org.netlib.util.doubleW colcnd, org.netlib.util.doubleW amax, org.netlib.util.intW info); - protected native void dgeesK(String jobvs, String sort, java.lang.Object select, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW sdim, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vs, int _vs_offset, int ldvs, double[] work, int _work_offset, int lwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + protected native void dgeesK(String jobvs, String sort, java.lang.Object select, int n, double[] a, int offseta, int lda, org.netlib.util.intW sdim, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] vs, int offsetvs, int ldvs, double[] work, int offsetwork, int lwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info); - protected native void dgeesxK(String jobvs, String sort, java.lang.Object select, String sense, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW sdim, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vs, int _vs_offset, int ldvs, org.netlib.util.doubleW rconde, org.netlib.util.doubleW rcondv, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + protected native void dgeesxK(String jobvs, String sort, java.lang.Object select, String sense, int n, double[] a, int offseta, int lda, org.netlib.util.intW sdim, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] vs, int offsetvs, int ldvs, org.netlib.util.doubleW rconde, org.netlib.util.doubleW rcondv, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info); - protected native void dgeevK(String jobvl, String jobvr, int n, double[] a, int _a_offset, int lda, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dgeevK(String jobvl, String jobvr, int n, double[] a, int offseta, int lda, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dgeevxK(String balanc, String jobvl, String jobvr, String sense, int n, double[] a, int _a_offset, int lda, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] scale, int _scale_offset, org.netlib.util.doubleW abnrm, double[] rconde, int _rconde_offset, double[] rcondv, int _rcondv_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dgeevxK(String balanc, String jobvl, String jobvr, String sense, int n, double[] a, int offseta, int lda, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] scale, int offsetscale, org.netlib.util.doubleW abnrm, double[] rconde, int offsetrconde, double[] rcondv, int offsetrcondv, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dgegsK(String jobvsl, String jobvsr, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vsl, int _vsl_offset, int ldvsl, double[] vsr, int _vsr_offset, int ldvsr, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dgegsK(String jobvsl, String jobvsr, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] vsl, int offsetvsl, int ldvsl, double[] vsr, int offsetvsr, int ldvsr, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dgegvK(String jobvl, String jobvr, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dgegvK(String jobvl, String jobvr, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dgehd2K(int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dgehd2K(int n, int ilo, int ihi, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dgehrdK(int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dgehrdK(int n, int ilo, int ihi, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dgelq2K(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dgelq2K(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dgelqfK(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dgelqfK(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dgelsK(String trans, int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dgelsK(String trans, int m, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dgelsdK(int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] s, int _s_offset, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dgelsdK(int m, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] s, int offsets, double rcond, org.netlib.util.intW rank, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dgelssK(int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] s, int _s_offset, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dgelssK(int m, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] s, int offsets, double rcond, org.netlib.util.intW rank, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dgelsxK(int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, int[] jpvt, int _jpvt_offset, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dgelsxK(int m, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, int[] jpvt, int offsetjpvt, double rcond, org.netlib.util.intW rank, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dgelsyK(int m, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, int[] jpvt, int _jpvt_offset, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dgelsyK(int m, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, int[] jpvt, int offsetjpvt, double rcond, org.netlib.util.intW rank, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dgeql2K(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dgeql2K(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dgeqlfK(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dgeqlfK(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dgeqp3K(int m, int n, double[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dgeqp3K(int m, int n, double[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dgeqpfK(int m, int n, double[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dgeqpfK(int m, int n, double[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dgeqr2K(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dgeqr2K(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dgeqrfK(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dgeqrfK(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dgerfsK(String trans, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dgerfsK(String trans, int n, int nrhs, double[] a, int offseta, int lda, double[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dgerq2K(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dgerq2K(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dgerqfK(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dgerqfK(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dgesc2K(int n, double[] a, int _a_offset, int lda, double[] rhs, int _rhs_offset, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset, org.netlib.util.doubleW scale); + protected native void dgesc2K(int n, double[] a, int offseta, int lda, double[] rhs, int offsetrhs, int[] ipiv, int offsetipiv, int[] jpiv, int offsetjpiv, org.netlib.util.doubleW scale); - protected native void dgesddK(String jobz, int m, int n, double[] a, int _a_offset, int lda, double[] s, int _s_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dgesddK(String jobz, int m, int n, double[] a, int offseta, int lda, double[] s, int offsets, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int ldvt, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dgesvK(int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void dgesvK(int n, int nrhs, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void dgesvdK(String jobu, String jobvt, int m, int n, double[] a, int _a_offset, int lda, double[] s, int _s_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dgesvdK(String jobu, String jobvt, int m, int n, double[] a, int offseta, int lda, double[] s, int offsets, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int ldvt, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dgesvxK(String fact, String trans, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, org.netlib.util.StringW equed, double[] r, int _r_offset, double[] c, int _c_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dgesvxK(String fact, String trans, int n, int nrhs, double[] a, int offseta, int lda, double[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, org.netlib.util.StringW equed, double[] r, int offsetr, double[] c, int offsetc, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dgetc2K(int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset, org.netlib.util.intW info); + protected native void dgetc2K(int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, int[] jpiv, int offsetjpiv, org.netlib.util.intW info); - protected native void dgetf2K(int m, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + protected native void dgetf2K(int m, int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, org.netlib.util.intW info); - protected native void dgetrfK(int m, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + protected native void dgetrfK(int m, int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, org.netlib.util.intW info); - protected native void dgetriK(int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dgetriK(int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dgetrsK(String trans, int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void dgetrsK(String trans, int n, int nrhs, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void dggbakK(String job, String side, int n, int ilo, int ihi, double[] lscale, int _lscale_offset, double[] rscale, int _rscale_offset, int m, double[] v, int _v_offset, int ldv, org.netlib.util.intW info); + protected native void dggbakK(String job, String side, int n, int ilo, int ihi, double[] lscale, int offsetlscale, double[] rscale, int offsetrscale, int m, double[] v, int offsetv, int ldv, org.netlib.util.intW info); - protected native void dggbalK(String job, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] lscale, int _lscale_offset, double[] rscale, int _rscale_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dggbalK(String job, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] lscale, int offsetlscale, double[] rscale, int offsetrscale, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dggesK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW sdim, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vsl, int _vsl_offset, int ldvsl, double[] vsr, int _vsr_offset, int ldvsr, double[] work, int _work_offset, int lwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + protected native void dggesK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW sdim, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] vsl, int offsetvsl, int ldvsl, double[] vsr, int offsetvsr, int ldvsr, double[] work, int offsetwork, int lwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info); - protected native void dggesxK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, String sense, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW sdim, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vsl, int _vsl_offset, int ldvsl, double[] vsr, int _vsr_offset, int ldvsr, double[] rconde, int _rconde_offset, double[] rcondv, int _rcondv_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + protected native void dggesxK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, String sense, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW sdim, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] vsl, int offsetvsl, int ldvsl, double[] vsr, int offsetvsr, int ldvsr, double[] rconde, int offsetrconde, double[] rcondv, int offsetrcondv, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info); - protected native void dggevK(String jobvl, String jobvr, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dggevK(String jobvl, String jobvr, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dggevxK(String balanc, String jobvl, String jobvr, String sense, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] lscale, int _lscale_offset, double[] rscale, int _rscale_offset, org.netlib.util.doubleW abnrm, org.netlib.util.doubleW bbnrm, double[] rconde, int _rconde_offset, double[] rcondv, int _rcondv_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + protected native void dggevxK(String balanc, String jobvl, String jobvr, String sense, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, double[] lscale, int offsetlscale, double[] rscale, int offsetrscale, org.netlib.util.doubleW abnrm, org.netlib.util.doubleW bbnrm, double[] rconde, int offsetrconde, double[] rcondv, int offsetrcondv, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info); - protected native void dggglmK(int n, int m, int p, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] d, int _d_offset, double[] x, int _x_offset, double[] y, int _y_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dggglmK(int n, int m, int p, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] d, int offsetd, double[] x, int offsetx, double[] y, int offsety, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dgghrdK(String compq, String compz, int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, org.netlib.util.intW info); + protected native void dgghrdK(String compq, String compz, int n, int ilo, int ihi, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] q, int offsetq, int ldq, double[] z, int offsetz, int ldz, org.netlib.util.intW info); - protected native void dgglseK(int m, int n, int p, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] c, int _c_offset, double[] d, int _d_offset, double[] x, int _x_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dgglseK(int m, int n, int p, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] c, int offsetc, double[] d, int offsetd, double[] x, int offsetx, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dggqrfK(int n, int m, int p, double[] a, int _a_offset, int lda, double[] taua, int _taua_offset, double[] b, int _b_offset, int ldb, double[] taub, int _taub_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dggqrfK(int n, int m, int p, double[] a, int offseta, int lda, double[] taua, int offsettaua, double[] b, int offsetb, int ldb, double[] taub, int offsettaub, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dggrqfK(int m, int p, int n, double[] a, int _a_offset, int lda, double[] taua, int _taua_offset, double[] b, int _b_offset, int ldb, double[] taub, int _taub_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dggrqfK(int m, int p, int n, double[] a, int offseta, int lda, double[] taua, int offsettaua, double[] b, int offsetb, int ldb, double[] taub, int offsettaub, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dggsvdK(String jobu, String jobv, String jobq, int m, int n, int p, org.netlib.util.intW k, org.netlib.util.intW l, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alpha, int _alpha_offset, double[] beta, int _beta_offset, double[] u, int _u_offset, int ldu, double[] v, int _v_offset, int ldv, double[] q, int _q_offset, int ldq, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dggsvdK(String jobu, String jobv, String jobq, int m, int n, int p, org.netlib.util.intW k, org.netlib.util.intW l, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alpha, int offsetalpha, double[] beta, int offsetbeta, double[] u, int offsetu, int ldu, double[] v, int offsetv, int ldv, double[] q, int offsetq, int ldq, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dggsvpK(String jobu, String jobv, String jobq, int m, int p, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double tola, double tolb, org.netlib.util.intW k, org.netlib.util.intW l, double[] u, int _u_offset, int ldu, double[] v, int _v_offset, int ldv, double[] q, int _q_offset, int ldq, int[] iwork, int _iwork_offset, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dggsvpK(String jobu, String jobv, String jobq, int m, int p, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double tola, double tolb, org.netlib.util.intW k, org.netlib.util.intW l, double[] u, int offsetu, int ldu, double[] v, int offsetv, int ldv, double[] q, int offsetq, int ldq, int[] iwork, int offsetiwork, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dgtconK(String norm, int n, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dgtconK(String norm, int n, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] du2, int offsetdu2, int[] ipiv, int offsetipiv, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dgtrfsK(String trans, int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] dlf, int _dlf_offset, double[] df, int _df_offset, double[] duf, int _duf_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dgtrfsK(String trans, int n, int nrhs, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] dlf, int offsetdlf, double[] df, int offsetdf, double[] duf, int offsetduf, double[] du2, int offsetdu2, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dgtsvK(int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void dgtsvK(int n, int nrhs, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void dgtsvxK(String fact, String trans, int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] dlf, int _dlf_offset, double[] df, int _df_offset, double[] duf, int _duf_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dgtsvxK(String fact, String trans, int n, int nrhs, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] dlf, int offsetdlf, double[] df, int offsetdf, double[] duf, int offsetduf, double[] du2, int offsetdu2, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dgttrfK(int n, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + protected native void dgttrfK(int n, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] du2, int offsetdu2, int[] ipiv, int offsetipiv, org.netlib.util.intW info); - protected native void dgttrsK(String trans, int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void dgttrsK(String trans, int n, int nrhs, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] du2, int offsetdu2, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void dgtts2K(int itrans, int n, int nrhs, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb); + protected native void dgtts2K(int itrans, int n, int nrhs, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] du2, int offsetdu2, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb); - protected native void dhgeqzK(String job, String compq, String compz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] t, int _t_offset, int ldt, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dhgeqzK(String job, String compq, String compz, int n, int ilo, int ihi, double[] h, int offseth, int ldh, double[] t, int offsett, int ldt, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] q, int offsetq, int ldq, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dhseinK(String side, String eigsrc, String initv, boolean[] select, int _select_offset, int n, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, double[] work, int _work_offset, int[] ifaill, int _ifaill_offset, int[] ifailr, int _ifailr_offset, org.netlib.util.intW info); + protected native void dhseinK(String side, String eigsrc, String initv, boolean[] select, int offsetselect, int n, double[] h, int offseth, int ldh, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, int mm, org.netlib.util.intW m, double[] work, int offsetwork, int[] ifaill, int offsetifaill, int[] ifailr, int offsetifailr, org.netlib.util.intW info); - protected native void dhseqrK(String job, String compz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dhseqrK(String job, String compz, int n, int ilo, int ihi, double[] h, int offseth, int ldh, double[] wr, int offsetwr, double[] wi, int offsetwi, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); protected native boolean disnanK(double din); protected native void dlabadK(org.netlib.util.doubleW small, org.netlib.util.doubleW large); - protected native void dlabrdK(int m, int n, int nb, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tauq, int _tauq_offset, double[] taup, int _taup_offset, double[] x, int _x_offset, int ldx, double[] y, int _y_offset, int ldy); + protected native void dlabrdK(int m, int n, int nb, double[] a, int offseta, int lda, double[] d, int offsetd, double[] e, int offsete, double[] tauq, int offsettauq, double[] taup, int offsettaup, double[] x, int offsetx, int ldx, double[] y, int offsety, int ldy); - protected native void dlacn2K(int n, double[] v, int _v_offset, double[] x, int _x_offset, int[] isgn, int _isgn_offset, org.netlib.util.doubleW est, org.netlib.util.intW kase, int[] isave, int _isave_offset); + protected native void dlacn2K(int n, double[] v, int offsetv, double[] x, int offsetx, int[] isgn, int offsetisgn, org.netlib.util.doubleW est, org.netlib.util.intW kase, int[] isave, int offsetisave); - protected native void dlaconK(int n, double[] v, int _v_offset, double[] x, int _x_offset, int[] isgn, int _isgn_offset, org.netlib.util.doubleW est, org.netlib.util.intW kase); + protected native void dlaconK(int n, double[] v, int offsetv, double[] x, int offsetx, int[] isgn, int offsetisgn, org.netlib.util.doubleW est, org.netlib.util.intW kase); - protected native void dlacpyK(String uplo, int m, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb); + protected native void dlacpyK(String uplo, int m, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb); protected native void dladivK(double a, double b, double c, double d, org.netlib.util.doubleW p, org.netlib.util.doubleW q); protected native void dlae2K(double a, double b, double c, org.netlib.util.doubleW rt1, org.netlib.util.doubleW rt2); - protected native void dlaebzK(int ijob, int nitmax, int n, int mmax, int minp, int nbmin, double abstol, double reltol, double pivmin, double[] d, int _d_offset, double[] e, int _e_offset, double[] e2, int _e2_offset, int[] nval, int _nval_offset, double[] ab, int _ab_offset, double[] c, int _c_offset, org.netlib.util.intW mout, int[] nab, int _nab_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dlaebzK(int ijob, int nitmax, int n, int mmax, int minp, int nbmin, double abstol, double reltol, double pivmin, double[] d, int offsetd, double[] e, int offsete, double[] e2, int offsete2, int[] nval, int offsetnval, double[] ab, int offsetab, double[] c, int offsetc, org.netlib.util.intW mout, int[] nab, int offsetnab, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dlaed0K(int icompq, int qsiz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] q, int _q_offset, int ldq, double[] qstore, int _qstore_offset, int ldqs, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dlaed0K(int icompq, int qsiz, int n, double[] d, int offsetd, double[] e, int offsete, double[] q, int offsetq, int ldq, double[] qstore, int offsetqstore, int ldqs, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dlaed1K(int n, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.doubleW rho, int cutpnt, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dlaed1K(int n, double[] d, int offsetd, double[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.doubleW rho, int cutpnt, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dlaed2K(org.netlib.util.intW k, int n, int n1, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.doubleW rho, double[] z, int _z_offset, double[] dlamda, int _dlamda_offset, double[] w, int _w_offset, double[] q2, int _q2_offset, int[] indx, int _indx_offset, int[] indxc, int _indxc_offset, int[] indxp, int _indxp_offset, int[] coltyp, int _coltyp_offset, org.netlib.util.intW info); + protected native void dlaed2K(org.netlib.util.intW k, int n, int n1, double[] d, int offsetd, double[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.doubleW rho, double[] z, int offsetz, double[] dlamda, int offsetdlamda, double[] w, int offsetw, double[] q2, int offsetq2, int[] indx, int offsetindx, int[] indxc, int offsetindxc, int[] indxp, int offsetindxp, int[] coltyp, int offsetcoltyp, org.netlib.util.intW info); - protected native void dlaed3K(int k, int n, int n1, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, double rho, double[] dlamda, int _dlamda_offset, double[] q2, int _q2_offset, int[] indx, int _indx_offset, int[] ctot, int _ctot_offset, double[] w, int _w_offset, double[] s, int _s_offset, org.netlib.util.intW info); + protected native void dlaed3K(int k, int n, int n1, double[] d, int offsetd, double[] q, int offsetq, int ldq, double rho, double[] dlamda, int offsetdlamda, double[] q2, int offsetq2, int[] indx, int offsetindx, int[] ctot, int offsetctot, double[] w, int offsetw, double[] s, int offsets, org.netlib.util.intW info); - protected native void dlaed4K(int n, int i, double[] d, int _d_offset, double[] z, int _z_offset, double[] delta, int _delta_offset, double rho, org.netlib.util.doubleW dlam, org.netlib.util.intW info); + protected native void dlaed4K(int n, int i, double[] d, int offsetd, double[] z, int offsetz, double[] delta, int offsetdelta, double rho, org.netlib.util.doubleW dlam, org.netlib.util.intW info); - protected native void dlaed5K(int i, double[] d, int _d_offset, double[] z, int _z_offset, double[] delta, int _delta_offset, double rho, org.netlib.util.doubleW dlam); + protected native void dlaed5K(int i, double[] d, int offsetd, double[] z, int offsetz, double[] delta, int offsetdelta, double rho, org.netlib.util.doubleW dlam); - protected native void dlaed6K(int kniter, boolean orgati, double rho, double[] d, int _d_offset, double[] z, int _z_offset, double finit, org.netlib.util.doubleW tau, org.netlib.util.intW info); + protected native void dlaed6K(int kniter, boolean orgati, double rho, double[] d, int offsetd, double[] z, int offsetz, double finit, org.netlib.util.doubleW tau, org.netlib.util.intW info); - protected native void dlaed7K(int icompq, int n, int qsiz, int tlvls, int curlvl, int curpbm, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.doubleW rho, int cutpnt, double[] qstore, int _qstore_offset, int[] qptr, int _qptr_offset, int[] prmptr, int _prmptr_offset, int[] perm, int _perm_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, double[] givnum, int _givnum_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dlaed7K(int icompq, int n, int qsiz, int tlvls, int curlvl, int curpbm, double[] d, int offsetd, double[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.doubleW rho, int cutpnt, double[] qstore, int offsetqstore, int[] qptr, int offsetqptr, int[] prmptr, int offsetprmptr, int[] perm, int offsetperm, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, double[] givnum, int offsetgivnum, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dlaed8K(int icompq, org.netlib.util.intW k, int n, int qsiz, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.doubleW rho, int cutpnt, double[] z, int _z_offset, double[] dlamda, int _dlamda_offset, double[] q2, int _q2_offset, int ldq2, double[] w, int _w_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, double[] givnum, int _givnum_offset, int[] indxp, int _indxp_offset, int[] indx, int _indx_offset, org.netlib.util.intW info); + protected native void dlaed8K(int icompq, org.netlib.util.intW k, int n, int qsiz, double[] d, int offsetd, double[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.doubleW rho, int cutpnt, double[] z, int offsetz, double[] dlamda, int offsetdlamda, double[] q2, int offsetq2, int ldq2, double[] w, int offsetw, int[] perm, int offsetperm, org.netlib.util.intW givptr, int[] givcol, int offsetgivcol, double[] givnum, int offsetgivnum, int[] indxp, int offsetindxp, int[] indx, int offsetindx, org.netlib.util.intW info); - protected native void dlaed9K(int k, int kstart, int kstop, int n, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, double rho, double[] dlamda, int _dlamda_offset, double[] w, int _w_offset, double[] s, int _s_offset, int lds, org.netlib.util.intW info); + protected native void dlaed9K(int k, int kstart, int kstop, int n, double[] d, int offsetd, double[] q, int offsetq, int ldq, double rho, double[] dlamda, int offsetdlamda, double[] w, int offsetw, double[] s, int offsets, int lds, org.netlib.util.intW info); - protected native void dlaedaK(int n, int tlvls, int curlvl, int curpbm, int[] prmptr, int _prmptr_offset, int[] perm, int _perm_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, double[] givnum, int _givnum_offset, double[] q, int _q_offset, int[] qptr, int _qptr_offset, double[] z, int _z_offset, double[] ztemp, int _ztemp_offset, org.netlib.util.intW info); + protected native void dlaedaK(int n, int tlvls, int curlvl, int curpbm, int[] prmptr, int offsetprmptr, int[] perm, int offsetperm, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, double[] givnum, int offsetgivnum, double[] q, int offsetq, int[] qptr, int offsetqptr, double[] z, int offsetz, double[] ztemp, int offsetztemp, org.netlib.util.intW info); - protected native void dlaeinK(boolean rightv, boolean noinit, int n, double[] h, int _h_offset, int ldh, double wr, double wi, double[] vr, int _vr_offset, double[] vi, int _vi_offset, double[] b, int _b_offset, int ldb, double[] work, int _work_offset, double eps3, double smlnum, double bignum, org.netlib.util.intW info); + protected native void dlaeinK(boolean rightv, boolean noinit, int n, double[] h, int offseth, int ldh, double wr, double wi, double[] vr, int offsetvr, double[] vi, int offsetvi, double[] b, int offsetb, int ldb, double[] work, int offsetwork, double eps3, double smlnum, double bignum, org.netlib.util.intW info); protected native void dlaev2K(double a, double b, double c, org.netlib.util.doubleW rt1, org.netlib.util.doubleW rt2, org.netlib.util.doubleW cs1, org.netlib.util.doubleW sn1); - protected native void dlaexcK(boolean wantq, int n, double[] t, int _t_offset, int ldt, double[] q, int _q_offset, int ldq, int j1, int n1, int n2, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dlaexcK(boolean wantq, int n, double[] t, int offsett, int ldt, double[] q, int offsetq, int ldq, int j1, int n1, int n2, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dlag2K(double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double safmin, org.netlib.util.doubleW scale1, org.netlib.util.doubleW scale2, org.netlib.util.doubleW wr1, org.netlib.util.doubleW wr2, org.netlib.util.doubleW wi); + protected native void dlag2K(double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double safmin, org.netlib.util.doubleW scale1, org.netlib.util.doubleW scale2, org.netlib.util.doubleW wr1, org.netlib.util.doubleW wr2, org.netlib.util.doubleW wi); - protected native void dlag2sK(int m, int n, double[] a, int _a_offset, int lda, float[] sa, int _sa_offset, int ldsa, org.netlib.util.intW info); + protected native void dlag2sK(int m, int n, double[] a, int offseta, int lda, float[] sa, int offsetsa, int ldsa, org.netlib.util.intW info); protected native void dlags2K(boolean upper, double a1, double a2, double a3, double b1, double b2, double b3, org.netlib.util.doubleW csu, org.netlib.util.doubleW snu, org.netlib.util.doubleW csv, org.netlib.util.doubleW snv, org.netlib.util.doubleW csq, org.netlib.util.doubleW snq); - protected native void dlagtfK(int n, double[] a, int _a_offset, double lambda, double[] b, int _b_offset, double[] c, int _c_offset, double tol, double[] d, int _d_offset, int[] in, int _in_offset, org.netlib.util.intW info); + protected native void dlagtfK(int n, double[] a, int offseta, double lambda, double[] b, int offsetb, double[] c, int offsetc, double tol, double[] d, int offsetd, int[] in, int offsetin, org.netlib.util.intW info); - protected native void dlagtmK(String trans, int n, int nrhs, double alpha, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset, double[] x, int _x_offset, int ldx, double beta, double[] b, int _b_offset, int ldb); + protected native void dlagtmK(String trans, int n, int nrhs, double alpha, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu, double[] x, int offsetx, int ldx, double beta, double[] b, int offsetb, int ldb); - protected native void dlagtsK(int job, int n, double[] a, int _a_offset, double[] b, int _b_offset, double[] c, int _c_offset, double[] d, int _d_offset, int[] in, int _in_offset, double[] y, int _y_offset, org.netlib.util.doubleW tol, org.netlib.util.intW info); + protected native void dlagtsK(int job, int n, double[] a, int offseta, double[] b, int offsetb, double[] c, int offsetc, double[] d, int offsetd, int[] in, int offsetin, double[] y, int offsety, org.netlib.util.doubleW tol, org.netlib.util.intW info); - protected native void dlagv2K(double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, org.netlib.util.doubleW csl, org.netlib.util.doubleW snl, org.netlib.util.doubleW csr, org.netlib.util.doubleW snr); + protected native void dlagv2K(double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, org.netlib.util.doubleW csl, org.netlib.util.doubleW snl, org.netlib.util.doubleW csr, org.netlib.util.doubleW snr); - protected native void dlahqrK(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, int iloz, int ihiz, double[] z, int _z_offset, int ldz, org.netlib.util.intW info); + protected native void dlahqrK(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int offseth, int ldh, double[] wr, int offsetwr, double[] wi, int offsetwi, int iloz, int ihiz, double[] z, int offsetz, int ldz, org.netlib.util.intW info); - protected native void dlahr2K(int n, int k, int nb, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] t, int _t_offset, int ldt, double[] y, int _y_offset, int ldy); + protected native void dlahr2K(int n, int k, int nb, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] t, int offsett, int ldt, double[] y, int offsety, int ldy); - protected native void dlahrdK(int n, int k, int nb, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] t, int _t_offset, int ldt, double[] y, int _y_offset, int ldy); + protected native void dlahrdK(int n, int k, int nb, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] t, int offsett, int ldt, double[] y, int offsety, int ldy); - protected native void dlaic1K(int job, int j, double[] x, int _x_offset, double sest, double[] w, int _w_offset, double gamma, org.netlib.util.doubleW sestpr, org.netlib.util.doubleW s, org.netlib.util.doubleW c); + protected native void dlaic1K(int job, int j, double[] x, int offsetx, double sest, double[] w, int offsetw, double gamma, org.netlib.util.doubleW sestpr, org.netlib.util.doubleW s, org.netlib.util.doubleW c); protected native boolean dlaisnanK(double din1, double din2); - protected native void dlaln2K(boolean ltrans, int na, int nw, double smin, double ca, double[] a, int _a_offset, int lda, double d1, double d2, double[] b, int _b_offset, int ldb, double wr, double wi, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW scale, org.netlib.util.doubleW xnorm, org.netlib.util.intW info); + protected native void dlaln2K(boolean ltrans, int na, int nw, double smin, double ca, double[] a, int offseta, int lda, double d1, double d2, double[] b, int offsetb, int ldb, double wr, double wi, double[] x, int offsetx, int ldx, org.netlib.util.doubleW scale, org.netlib.util.doubleW xnorm, org.netlib.util.intW info); - protected native void dlals0K(int icompq, int nl, int nr, int sqre, int nrhs, double[] b, int _b_offset, int ldb, double[] bx, int _bx_offset, int ldbx, int[] perm, int _perm_offset, int givptr, int[] givcol, int _givcol_offset, int ldgcol, double[] givnum, int _givnum_offset, int ldgnum, double[] poles, int _poles_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, double[] z, int _z_offset, int k, double c, double s, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dlals0K(int icompq, int nl, int nr, int sqre, int nrhs, double[] b, int offsetb, int ldb, double[] bx, int offsetbx, int ldbx, int[] perm, int offsetperm, int givptr, int[] givcol, int offsetgivcol, int ldgcol, double[] givnum, int offsetgivnum, int ldgnum, double[] poles, int offsetpoles, double[] difl, int offsetdifl, double[] difr, int offsetdifr, double[] z, int offsetz, int k, double c, double s, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dlalsaK(int icompq, int smlsiz, int n, int nrhs, double[] b, int _b_offset, int ldb, double[] bx, int _bx_offset, int ldbx, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int[] k, int _k_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, double[] z, int _z_offset, double[] poles, int _poles_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, int ldgcol, int[] perm, int _perm_offset, double[] givnum, int _givnum_offset, double[] c, int _c_offset, double[] s, int _s_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dlalsaK(int icompq, int smlsiz, int n, int nrhs, double[] b, int offsetb, int ldb, double[] bx, int offsetbx, int ldbx, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int[] k, int offsetk, double[] difl, int offsetdifl, double[] difr, int offsetdifr, double[] z, int offsetz, double[] poles, int offsetpoles, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, int ldgcol, int[] perm, int offsetperm, double[] givnum, int offsetgivnum, double[] c, int offsetc, double[] s, int offsets, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dlalsdK(String uplo, int smlsiz, int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] b, int _b_offset, int ldb, double rcond, org.netlib.util.intW rank, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dlalsdK(String uplo, int smlsiz, int n, int nrhs, double[] d, int offsetd, double[] e, int offsete, double[] b, int offsetb, int ldb, double rcond, org.netlib.util.intW rank, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dlamrgK(int n1, int n2, double[] a, int _a_offset, int dtrd1, int dtrd2, int[] index, int _index_offset); + protected native void dlamrgK(int n1, int n2, double[] a, int offseta, int dtrd1, int dtrd2, int[] index, int offsetindex); - protected native int dlanegK(int n, double[] d, int _d_offset, double[] lld, int _lld_offset, double sigma, double pivmin, int r); + protected native int dlanegK(int n, double[] d, int offsetd, double[] lld, int offsetlld, double sigma, double pivmin, int r); - protected native double dlangbK(String norm, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, double[] work, int _work_offset); + protected native double dlangbK(String norm, int n, int kl, int ku, double[] ab, int offsetab, int ldab, double[] work, int offsetwork); - protected native double dlangeK(String norm, int m, int n, double[] a, int _a_offset, int lda, double[] work, int _work_offset); + protected native double dlangeK(String norm, int m, int n, double[] a, int offseta, int lda, double[] work, int offsetwork); - protected native double dlangtK(String norm, int n, double[] dl, int _dl_offset, double[] d, int _d_offset, double[] du, int _du_offset); + protected native double dlangtK(String norm, int n, double[] dl, int offsetdl, double[] d, int offsetd, double[] du, int offsetdu); - protected native double dlanhsK(String norm, int n, double[] a, int _a_offset, int lda, double[] work, int _work_offset); + protected native double dlanhsK(String norm, int n, double[] a, int offseta, int lda, double[] work, int offsetwork); - protected native double dlansbK(String norm, String uplo, int n, int k, double[] ab, int _ab_offset, int ldab, double[] work, int _work_offset); + protected native double dlansbK(String norm, String uplo, int n, int k, double[] ab, int offsetab, int ldab, double[] work, int offsetwork); - protected native double dlanspK(String norm, String uplo, int n, double[] ap, int _ap_offset, double[] work, int _work_offset); + protected native double dlanspK(String norm, String uplo, int n, double[] ap, int offsetap, double[] work, int offsetwork); - protected native double dlanstK(String norm, int n, double[] d, int _d_offset, double[] e, int _e_offset); + protected native double dlanstK(String norm, int n, double[] d, int offsetd, double[] e, int offsete); - protected native double dlansyK(String norm, String uplo, int n, double[] a, int _a_offset, int lda, double[] work, int _work_offset); + protected native double dlansyK(String norm, String uplo, int n, double[] a, int offseta, int lda, double[] work, int offsetwork); - protected native double dlantbK(String norm, String uplo, String diag, int n, int k, double[] ab, int _ab_offset, int ldab, double[] work, int _work_offset); + protected native double dlantbK(String norm, String uplo, String diag, int n, int k, double[] ab, int offsetab, int ldab, double[] work, int offsetwork); - protected native double dlantpK(String norm, String uplo, String diag, int n, double[] ap, int _ap_offset, double[] work, int _work_offset); + protected native double dlantpK(String norm, String uplo, String diag, int n, double[] ap, int offsetap, double[] work, int offsetwork); - protected native double dlantrK(String norm, String uplo, String diag, int m, int n, double[] a, int _a_offset, int lda, double[] work, int _work_offset); + protected native double dlantrK(String norm, String uplo, String diag, int m, int n, double[] a, int offseta, int lda, double[] work, int offsetwork); protected native void dlanv2K(org.netlib.util.doubleW a, org.netlib.util.doubleW b, org.netlib.util.doubleW c, org.netlib.util.doubleW d, org.netlib.util.doubleW rt1r, org.netlib.util.doubleW rt1i, org.netlib.util.doubleW rt2r, org.netlib.util.doubleW rt2i, org.netlib.util.doubleW cs, org.netlib.util.doubleW sn); - protected native void dlapllK(int n, double[] x, int _x_offset, int incx, double[] y, int _y_offset, int incy, org.netlib.util.doubleW ssmin); + protected native void dlapllK(int n, double[] x, int offsetx, int incx, double[] y, int offsety, int incy, org.netlib.util.doubleW ssmin); - protected native void dlapmtK(boolean forwrd, int m, int n, double[] x, int _x_offset, int ldx, int[] k, int _k_offset); + protected native void dlapmtK(boolean forwrd, int m, int n, double[] x, int offsetx, int ldx, int[] k, int offsetk); protected native double dlapy2K(double x, double y); protected native double dlapy3K(double x, double y, double z); - protected native void dlaqgbK(int m, int n, int kl, int ku, double[] ab, int _ab_offset, int ldab, double[] r, int _r_offset, double[] c, int _c_offset, double rowcnd, double colcnd, double amax, org.netlib.util.StringW equed); + protected native void dlaqgbK(int m, int n, int kl, int ku, double[] ab, int offsetab, int ldab, double[] r, int offsetr, double[] c, int offsetc, double rowcnd, double colcnd, double amax, org.netlib.util.StringW equed); - protected native void dlaqgeK(int m, int n, double[] a, int _a_offset, int lda, double[] r, int _r_offset, double[] c, int _c_offset, double rowcnd, double colcnd, double amax, org.netlib.util.StringW equed); + protected native void dlaqgeK(int m, int n, double[] a, int offseta, int lda, double[] r, int offsetr, double[] c, int offsetc, double rowcnd, double colcnd, double amax, org.netlib.util.StringW equed); - protected native void dlaqp2K(int m, int n, int offset, double[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, double[] tau, int _tau_offset, double[] vn1, int _vn1_offset, double[] vn2, int _vn2_offset, double[] work, int _work_offset); + protected native void dlaqp2K(int m, int n, int offset, double[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, double[] tau, int offsettau, double[] vn1, int offsetvn1, double[] vn2, int offsetvn2, double[] work, int offsetwork); - protected native void dlaqpsK(int m, int n, int offset, int nb, org.netlib.util.intW kb, double[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, double[] tau, int _tau_offset, double[] vn1, int _vn1_offset, double[] vn2, int _vn2_offset, double[] auxv, int _auxv_offset, double[] f, int _f_offset, int ldf); + protected native void dlaqpsK(int m, int n, int offset, int nb, org.netlib.util.intW kb, double[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, double[] tau, int offsettau, double[] vn1, int offsetvn1, double[] vn2, int offsetvn2, double[] auxv, int offsetauxv, double[] f, int offsetf, int ldf); - protected native void dlaqr0K(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, int iloz, int ihiz, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dlaqr0K(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int offseth, int ldh, double[] wr, int offsetwr, double[] wi, int offsetwi, int iloz, int ihiz, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dlaqr1K(int n, double[] h, int _h_offset, int ldh, double sr1, double si1, double sr2, double si2, double[] v, int _v_offset); + protected native void dlaqr1K(int n, double[] h, int offseth, int ldh, double sr1, double si1, double sr2, double si2, double[] v, int offsetv); - protected native void dlaqr2K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, double[] h, int _h_offset, int ldh, int iloz, int ihiz, double[] z, int _z_offset, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, double[] sr, int _sr_offset, double[] si, int _si_offset, double[] v, int _v_offset, int ldv, int nh, double[] t, int _t_offset, int ldt, int nv, double[] wv, int _wv_offset, int ldwv, double[] work, int _work_offset, int lwork); + protected native void dlaqr2K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, double[] h, int offseth, int ldh, int iloz, int ihiz, double[] z, int offsetz, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, double[] sr, int offsetsr, double[] si, int offsetsi, double[] v, int offsetv, int ldv, int nh, double[] t, int offsett, int ldt, int nv, double[] wv, int offsetwv, int ldwv, double[] work, int offsetwork, int lwork); - protected native void dlaqr3K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, double[] h, int _h_offset, int ldh, int iloz, int ihiz, double[] z, int _z_offset, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, double[] sr, int _sr_offset, double[] si, int _si_offset, double[] v, int _v_offset, int ldv, int nh, double[] t, int _t_offset, int ldt, int nv, double[] wv, int _wv_offset, int ldwv, double[] work, int _work_offset, int lwork); + protected native void dlaqr3K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, double[] h, int offseth, int ldh, int iloz, int ihiz, double[] z, int offsetz, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, double[] sr, int offsetsr, double[] si, int offsetsi, double[] v, int offsetv, int ldv, int nh, double[] t, int offsett, int ldt, int nv, double[] wv, int offsetwv, int ldwv, double[] work, int offsetwork, int lwork); - protected native void dlaqr4K(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int _h_offset, int ldh, double[] wr, int _wr_offset, double[] wi, int _wi_offset, int iloz, int ihiz, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dlaqr4K(boolean wantt, boolean wantz, int n, int ilo, int ihi, double[] h, int offseth, int ldh, double[] wr, int offsetwr, double[] wi, int offsetwi, int iloz, int ihiz, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dlaqr5K(boolean wantt, boolean wantz, int kacc22, int n, int ktop, int kbot, int nshfts, double[] sr, int _sr_offset, double[] si, int _si_offset, double[] h, int _h_offset, int ldh, int iloz, int ihiz, double[] z, int _z_offset, int ldz, double[] v, int _v_offset, int ldv, double[] u, int _u_offset, int ldu, int nv, double[] wv, int _wv_offset, int ldwv, int nh, double[] wh, int _wh_offset, int ldwh); + protected native void dlaqr5K(boolean wantt, boolean wantz, int kacc22, int n, int ktop, int kbot, int nshfts, double[] sr, int offsetsr, double[] si, int offsetsi, double[] h, int offseth, int ldh, int iloz, int ihiz, double[] z, int offsetz, int ldz, double[] v, int offsetv, int ldv, double[] u, int offsetu, int ldu, int nv, double[] wv, int offsetwv, int ldwv, int nh, double[] wh, int offsetwh, int ldwh); - protected native void dlaqsbK(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] s, int _s_offset, double scond, double amax, org.netlib.util.StringW equed); + protected native void dlaqsbK(String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double[] s, int offsets, double scond, double amax, org.netlib.util.StringW equed); - protected native void dlaqspK(String uplo, int n, double[] ap, int _ap_offset, double[] s, int _s_offset, double scond, double amax, org.netlib.util.StringW equed); + protected native void dlaqspK(String uplo, int n, double[] ap, int offsetap, double[] s, int offsets, double scond, double amax, org.netlib.util.StringW equed); - protected native void dlaqsyK(String uplo, int n, double[] a, int _a_offset, int lda, double[] s, int _s_offset, double scond, double amax, org.netlib.util.StringW equed); + protected native void dlaqsyK(String uplo, int n, double[] a, int offseta, int lda, double[] s, int offsets, double scond, double amax, org.netlib.util.StringW equed); - protected native void dlaqtrK(boolean ltran, boolean lreal, int n, double[] t, int _t_offset, int ldt, double[] b, int _b_offset, double w, org.netlib.util.doubleW scale, double[] x, int _x_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dlaqtrK(boolean ltran, boolean lreal, int n, double[] t, int offsett, int ldt, double[] b, int offsetb, double w, org.netlib.util.doubleW scale, double[] x, int offsetx, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dlar1vK(int n, int b1, int bn, double lambda, double[] d, int _d_offset, double[] l, int _l_offset, double[] ld, int _ld_offset, double[] lld, int _lld_offset, double pivmin, double gaptol, double[] z, int _z_offset, boolean wantnc, org.netlib.util.intW negcnt, org.netlib.util.doubleW ztz, org.netlib.util.doubleW mingma, org.netlib.util.intW r, int[] isuppz, int _isuppz_offset, org.netlib.util.doubleW nrminv, org.netlib.util.doubleW resid, org.netlib.util.doubleW rqcorr, double[] work, int _work_offset); + protected native void dlar1vK(int n, int b1, int bn, double lambda, double[] d, int offsetd, double[] l, int offsetl, double[] ld, int offsetld, double[] lld, int offsetlld, double pivmin, double gaptol, double[] z, int offsetz, boolean wantnc, org.netlib.util.intW negcnt, org.netlib.util.doubleW ztz, org.netlib.util.doubleW mingma, org.netlib.util.intW r, int[] isuppz, int offsetisuppz, org.netlib.util.doubleW nrminv, org.netlib.util.doubleW resid, org.netlib.util.doubleW rqcorr, double[] work, int offsetwork); - protected native void dlar2vK(int n, double[] x, int _x_offset, double[] y, int _y_offset, double[] z, int _z_offset, int incx, double[] c, int _c_offset, double[] s, int _s_offset, int incc); + protected native void dlar2vK(int n, double[] x, int offsetx, double[] y, int offsety, double[] z, int offsetz, int incx, double[] c, int offsetc, double[] s, int offsets, int incc); - protected native void dlarfK(String side, int m, int n, double[] v, int _v_offset, int incv, double tau, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset); + protected native void dlarfK(String side, int m, int n, double[] v, int offsetv, int incv, double tau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork); - protected native void dlarfbK(String side, String trans, String direct, String storev, int m, int n, int k, double[] v, int _v_offset, int ldv, double[] t, int _t_offset, int ldt, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int ldwork); + protected native void dlarfbK(String side, String trans, String direct, String storev, int m, int n, int k, double[] v, int offsetv, int ldv, double[] t, int offsett, int ldt, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int ldwork); - protected native void dlarfgK(int n, org.netlib.util.doubleW alpha, double[] x, int _x_offset, int incx, org.netlib.util.doubleW tau); + protected native void dlarfgK(int n, org.netlib.util.doubleW alpha, double[] x, int offsetx, int incx, org.netlib.util.doubleW tau); - protected native void dlarftK(String direct, String storev, int n, int k, double[] v, int _v_offset, int ldv, double[] tau, int _tau_offset, double[] t, int _t_offset, int ldt); + protected native void dlarftK(String direct, String storev, int n, int k, double[] v, int offsetv, int ldv, double[] tau, int offsettau, double[] t, int offsett, int ldt); - protected native void dlarfxK(String side, int m, int n, double[] v, int _v_offset, double tau, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset); + protected native void dlarfxK(String side, int m, int n, double[] v, int offsetv, double tau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork); - protected native void dlargvK(int n, double[] x, int _x_offset, int incx, double[] y, int _y_offset, int incy, double[] c, int _c_offset, int incc); + protected native void dlargvK(int n, double[] x, int offsetx, int incx, double[] y, int offsety, int incy, double[] c, int offsetc, int incc); - protected native void dlarnvK(int idist, int[] iseed, int _iseed_offset, int n, double[] x, int _x_offset); + protected native void dlarnvK(int idist, int[] iseed, int offsetiseed, int n, double[] x, int offsetx); - protected native void dlarraK(int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] e2, int _e2_offset, double spltol, double tnrm, org.netlib.util.intW nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW info); + protected native void dlarraK(int n, double[] d, int offsetd, double[] e, int offsete, double[] e2, int offsete2, double spltol, double tnrm, org.netlib.util.intW nsplit, int[] isplit, int offsetisplit, org.netlib.util.intW info); - protected native void dlarrbK(int n, double[] d, int _d_offset, double[] lld, int _lld_offset, int ifirst, int ilast, double rtol1, double rtol2, int offset, double[] w, int _w_offset, double[] wgap, int _wgap_offset, double[] werr, int _werr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, double pivmin, double spdiam, int twist, org.netlib.util.intW info); + protected native void dlarrbK(int n, double[] d, int offsetd, double[] lld, int offsetlld, int ifirst, int ilast, double rtol1, double rtol2, int offset, double[] w, int offsetw, double[] wgap, int offsetwgap, double[] werr, int offsetwerr, double[] work, int offsetwork, int[] iwork, int offsetiwork, double pivmin, double spdiam, int twist, org.netlib.util.intW info); - protected native void dlarrcK(String jobt, int n, double vl, double vu, double[] d, int _d_offset, double[] e, int _e_offset, double pivmin, org.netlib.util.intW eigcnt, org.netlib.util.intW lcnt, org.netlib.util.intW rcnt, org.netlib.util.intW info); + protected native void dlarrcK(String jobt, int n, double vl, double vu, double[] d, int offsetd, double[] e, int offsete, double pivmin, org.netlib.util.intW eigcnt, org.netlib.util.intW lcnt, org.netlib.util.intW rcnt, org.netlib.util.intW info); - protected native void dlarrdK(String range, String order, int n, double vl, double vu, int il, int iu, double[] gers, int _gers_offset, double reltol, double[] d, int _d_offset, double[] e, int _e_offset, double[] e2, int _e2_offset, double pivmin, int nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW m, double[] w, int _w_offset, double[] werr, int _werr_offset, org.netlib.util.doubleW wl, org.netlib.util.doubleW wu, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dlarrdK(String range, String order, int n, double vl, double vu, int il, int iu, double[] gers, int offsetgers, double reltol, double[] d, int offsetd, double[] e, int offsete, double[] e2, int offsete2, double pivmin, int nsplit, int[] isplit, int offsetisplit, org.netlib.util.intW m, double[] w, int offsetw, double[] werr, int offsetwerr, org.netlib.util.doubleW wl, org.netlib.util.doubleW wu, int[] iblock, int offsetiblock, int[] indexw, int offsetindexw, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dlarreK(String range, int n, org.netlib.util.doubleW vl, org.netlib.util.doubleW vu, int il, int iu, double[] d, int _d_offset, double[] e, int _e_offset, double[] e2, int _e2_offset, double rtol1, double rtol2, double spltol, org.netlib.util.intW nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW m, double[] w, int _w_offset, double[] werr, int _werr_offset, double[] wgap, int _wgap_offset, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, double[] gers, int _gers_offset, org.netlib.util.doubleW pivmin, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dlarreK(String range, int n, org.netlib.util.doubleW vl, org.netlib.util.doubleW vu, int il, int iu, double[] d, int offsetd, double[] e, int offsete, double[] e2, int offsete2, double rtol1, double rtol2, double spltol, org.netlib.util.intW nsplit, int[] isplit, int offsetisplit, org.netlib.util.intW m, double[] w, int offsetw, double[] werr, int offsetwerr, double[] wgap, int offsetwgap, int[] iblock, int offsetiblock, int[] indexw, int offsetindexw, double[] gers, int offsetgers, org.netlib.util.doubleW pivmin, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dlarrfK(int n, double[] d, int _d_offset, double[] l, int _l_offset, double[] ld, int _ld_offset, int clstrt, int clend, double[] w, int _w_offset, double[] wgap, int _wgap_offset, double[] werr, int _werr_offset, double spdiam, double clgapl, double clgapr, double pivmin, org.netlib.util.doubleW sigma, double[] dplus, int _dplus_offset, double[] lplus, int _lplus_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dlarrfK(int n, double[] d, int offsetd, double[] l, int offsetl, double[] ld, int offsetld, int clstrt, int clend, double[] w, int offsetw, double[] wgap, int offsetwgap, double[] werr, int offsetwerr, double spdiam, double clgapl, double clgapr, double pivmin, org.netlib.util.doubleW sigma, double[] dplus, int offsetdplus, double[] lplus, int offsetlplus, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dlarrjK(int n, double[] d, int _d_offset, double[] e2, int _e2_offset, int ifirst, int ilast, double rtol, int offset, double[] w, int _w_offset, double[] werr, int _werr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, double pivmin, double spdiam, org.netlib.util.intW info); + protected native void dlarrjK(int n, double[] d, int offsetd, double[] e2, int offsete2, int ifirst, int ilast, double rtol, int offset, double[] w, int offsetw, double[] werr, int offsetwerr, double[] work, int offsetwork, int[] iwork, int offsetiwork, double pivmin, double spdiam, org.netlib.util.intW info); - protected native void dlarrkK(int n, int iw, double gl, double gu, double[] d, int _d_offset, double[] e2, int _e2_offset, double pivmin, double reltol, org.netlib.util.doubleW w, org.netlib.util.doubleW werr, org.netlib.util.intW info); + protected native void dlarrkK(int n, int iw, double gl, double gu, double[] d, int offsetd, double[] e2, int offsete2, double pivmin, double reltol, org.netlib.util.doubleW w, org.netlib.util.doubleW werr, org.netlib.util.intW info); - protected native void dlarrrK(int n, double[] d, int _d_offset, double[] e, int _e_offset, org.netlib.util.intW info); + protected native void dlarrrK(int n, double[] d, int offsetd, double[] e, int offsete, org.netlib.util.intW info); - protected native void dlarrvK(int n, double vl, double vu, double[] d, int _d_offset, double[] l, int _l_offset, double pivmin, int[] isplit, int _isplit_offset, int m, int dol, int dou, double minrgp, org.netlib.util.doubleW rtol1, org.netlib.util.doubleW rtol2, double[] w, int _w_offset, double[] werr, int _werr_offset, double[] wgap, int _wgap_offset, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, double[] gers, int _gers_offset, double[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dlarrvK(int n, double vl, double vu, double[] d, int offsetd, double[] l, int offsetl, double pivmin, int[] isplit, int offsetisplit, int m, int dol, int dou, double minrgp, org.netlib.util.doubleW rtol1, org.netlib.util.doubleW rtol2, double[] w, int offsetw, double[] werr, int offsetwerr, double[] wgap, int offsetwgap, int[] iblock, int offsetiblock, int[] indexw, int offsetindexw, double[] gers, int offsetgers, double[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); protected native void dlartgK(double f, double g, org.netlib.util.doubleW cs, org.netlib.util.doubleW sn, org.netlib.util.doubleW r); - protected native void dlartvK(int n, double[] x, int _x_offset, int incx, double[] y, int _y_offset, int incy, double[] c, int _c_offset, double[] s, int _s_offset, int incc); + protected native void dlartvK(int n, double[] x, int offsetx, int incx, double[] y, int offsety, int incy, double[] c, int offsetc, double[] s, int offsets, int incc); - protected native void dlaruvK(int[] iseed, int _iseed_offset, int n, double[] x, int _x_offset); + protected native void dlaruvK(int[] iseed, int offsetiseed, int n, double[] x, int offsetx); - protected native void dlarzK(String side, int m, int n, int l, double[] v, int _v_offset, int incv, double tau, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset); + protected native void dlarzK(String side, int m, int n, int l, double[] v, int offsetv, int incv, double tau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork); - protected native void dlarzbK(String side, String trans, String direct, String storev, int m, int n, int k, int l, double[] v, int _v_offset, int ldv, double[] t, int _t_offset, int ldt, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int ldwork); + protected native void dlarzbK(String side, String trans, String direct, String storev, int m, int n, int k, int l, double[] v, int offsetv, int ldv, double[] t, int offsett, int ldt, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int ldwork); - protected native void dlarztK(String direct, String storev, int n, int k, double[] v, int _v_offset, int ldv, double[] tau, int _tau_offset, double[] t, int _t_offset, int ldt); + protected native void dlarztK(String direct, String storev, int n, int k, double[] v, int offsetv, int ldv, double[] tau, int offsettau, double[] t, int offsett, int ldt); protected native void dlas2K(double f, double g, double h, org.netlib.util.doubleW ssmin, org.netlib.util.doubleW ssmax); - protected native void dlasclK(String type, int kl, int ku, double cfrom, double cto, int m, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected native void dlasclK(String type, int kl, int ku, double cfrom, double cto, int m, int n, double[] a, int offseta, int lda, org.netlib.util.intW info); - protected native void dlasd0K(int n, int sqre, double[] d, int _d_offset, double[] e, int _e_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, int smlsiz, int[] iwork, int _iwork_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dlasd0K(int n, int sqre, double[] d, int offsetd, double[] e, int offsete, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int ldvt, int smlsiz, int[] iwork, int offsetiwork, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dlasd1K(int nl, int nr, int sqre, double[] d, int _d_offset, org.netlib.util.doubleW alpha, org.netlib.util.doubleW beta, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, int[] idxq, int _idxq_offset, int[] iwork, int _iwork_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dlasd1K(int nl, int nr, int sqre, double[] d, int offsetd, org.netlib.util.doubleW alpha, org.netlib.util.doubleW beta, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int ldvt, int[] idxq, int offsetidxq, int[] iwork, int offsetiwork, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dlasd2K(int nl, int nr, int sqre, org.netlib.util.intW k, double[] d, int _d_offset, double[] z, int _z_offset, double alpha, double beta, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int ldvt, double[] dsigma, int _dsigma_offset, double[] u2, int _u2_offset, int ldu2, double[] vt2, int _vt2_offset, int ldvt2, int[] idxp, int _idxp_offset, int[] idx, int _idx_offset, int[] idxc, int _idxc_offset, int[] idxq, int _idxq_offset, int[] coltyp, int _coltyp_offset, org.netlib.util.intW info); + protected native void dlasd2K(int nl, int nr, int sqre, org.netlib.util.intW k, double[] d, int offsetd, double[] z, int offsetz, double alpha, double beta, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int ldvt, double[] dsigma, int offsetdsigma, double[] u2, int offsetu2, int ldu2, double[] vt2, int offsetvt2, int ldvt2, int[] idxp, int offsetidxp, int[] idx, int offsetidx, int[] idxc, int offsetidxc, int[] idxq, int offsetidxq, int[] coltyp, int offsetcoltyp, org.netlib.util.intW info); - protected native void dlasd3K(int nl, int nr, int sqre, int k, double[] d, int _d_offset, double[] q, int _q_offset, int ldq, double[] dsigma, int _dsigma_offset, double[] u, int _u_offset, int ldu, double[] u2, int _u2_offset, int ldu2, double[] vt, int _vt_offset, int ldvt, double[] vt2, int _vt2_offset, int ldvt2, int[] idxc, int _idxc_offset, int[] ctot, int _ctot_offset, double[] z, int _z_offset, org.netlib.util.intW info); + protected native void dlasd3K(int nl, int nr, int sqre, int k, double[] d, int offsetd, double[] q, int offsetq, int ldq, double[] dsigma, int offsetdsigma, double[] u, int offsetu, int ldu, double[] u2, int offsetu2, int ldu2, double[] vt, int offsetvt, int ldvt, double[] vt2, int offsetvt2, int ldvt2, int[] idxc, int offsetidxc, int[] ctot, int offsetctot, double[] z, int offsetz, org.netlib.util.intW info); - protected native void dlasd4K(int n, int i, double[] d, int _d_offset, double[] z, int _z_offset, double[] delta, int _delta_offset, double rho, org.netlib.util.doubleW sigma, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dlasd4K(int n, int i, double[] d, int offsetd, double[] z, int offsetz, double[] delta, int offsetdelta, double rho, org.netlib.util.doubleW sigma, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dlasd5K(int i, double[] d, int _d_offset, double[] z, int _z_offset, double[] delta, int _delta_offset, double rho, org.netlib.util.doubleW dsigma, double[] work, int _work_offset); + protected native void dlasd5K(int i, double[] d, int offsetd, double[] z, int offsetz, double[] delta, int offsetdelta, double rho, org.netlib.util.doubleW dsigma, double[] work, int offsetwork); - protected native void dlasd6K(int icompq, int nl, int nr, int sqre, double[] d, int _d_offset, double[] vf, int _vf_offset, double[] vl, int _vl_offset, org.netlib.util.doubleW alpha, org.netlib.util.doubleW beta, int[] idxq, int _idxq_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, int ldgcol, double[] givnum, int _givnum_offset, int ldgnum, double[] poles, int _poles_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, double[] z, int _z_offset, org.netlib.util.intW k, org.netlib.util.doubleW c, org.netlib.util.doubleW s, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dlasd6K(int icompq, int nl, int nr, int sqre, double[] d, int offsetd, double[] vf, int offsetvf, double[] vl, int offsetvl, org.netlib.util.doubleW alpha, org.netlib.util.doubleW beta, int[] idxq, int offsetidxq, int[] perm, int offsetperm, org.netlib.util.intW givptr, int[] givcol, int offsetgivcol, int ldgcol, double[] givnum, int offsetgivnum, int ldgnum, double[] poles, int offsetpoles, double[] difl, int offsetdifl, double[] difr, int offsetdifr, double[] z, int offsetz, org.netlib.util.intW k, org.netlib.util.doubleW c, org.netlib.util.doubleW s, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dlasd7K(int icompq, int nl, int nr, int sqre, org.netlib.util.intW k, double[] d, int _d_offset, double[] z, int _z_offset, double[] zw, int _zw_offset, double[] vf, int _vf_offset, double[] vfw, int _vfw_offset, double[] vl, int _vl_offset, double[] vlw, int _vlw_offset, double alpha, double beta, double[] dsigma, int _dsigma_offset, int[] idx, int _idx_offset, int[] idxp, int _idxp_offset, int[] idxq, int _idxq_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, int ldgcol, double[] givnum, int _givnum_offset, int ldgnum, org.netlib.util.doubleW c, org.netlib.util.doubleW s, org.netlib.util.intW info); + protected native void dlasd7K(int icompq, int nl, int nr, int sqre, org.netlib.util.intW k, double[] d, int offsetd, double[] z, int offsetz, double[] zw, int offsetzw, double[] vf, int offsetvf, double[] vfw, int offsetvfw, double[] vl, int offsetvl, double[] vlw, int offsetvlw, double alpha, double beta, double[] dsigma, int offsetdsigma, int[] idx, int offsetidx, int[] idxp, int offsetidxp, int[] idxq, int offsetidxq, int[] perm, int offsetperm, org.netlib.util.intW givptr, int[] givcol, int offsetgivcol, int ldgcol, double[] givnum, int offsetgivnum, int ldgnum, org.netlib.util.doubleW c, org.netlib.util.doubleW s, org.netlib.util.intW info); - protected native void dlasd8K(int icompq, int k, double[] d, int _d_offset, double[] z, int _z_offset, double[] vf, int _vf_offset, double[] vl, int _vl_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, int lddifr, double[] dsigma, int _dsigma_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dlasd8K(int icompq, int k, double[] d, int offsetd, double[] z, int offsetz, double[] vf, int offsetvf, double[] vl, int offsetvl, double[] difl, int offsetdifl, double[] difr, int offsetdifr, int lddifr, double[] dsigma, int offsetdsigma, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dlasdaK(int icompq, int smlsiz, int n, int sqre, double[] d, int _d_offset, double[] e, int _e_offset, double[] u, int _u_offset, int ldu, double[] vt, int _vt_offset, int[] k, int _k_offset, double[] difl, int _difl_offset, double[] difr, int _difr_offset, double[] z, int _z_offset, double[] poles, int _poles_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, int ldgcol, int[] perm, int _perm_offset, double[] givnum, int _givnum_offset, double[] c, int _c_offset, double[] s, int _s_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dlasdaK(int icompq, int smlsiz, int n, int sqre, double[] d, int offsetd, double[] e, int offsete, double[] u, int offsetu, int ldu, double[] vt, int offsetvt, int[] k, int offsetk, double[] difl, int offsetdifl, double[] difr, int offsetdifr, double[] z, int offsetz, double[] poles, int offsetpoles, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, int ldgcol, int[] perm, int offsetperm, double[] givnum, int offsetgivnum, double[] c, int offsetc, double[] s, int offsets, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dlasdqK(String uplo, int sqre, int n, int ncvt, int nru, int ncc, double[] d, int _d_offset, double[] e, int _e_offset, double[] vt, int _vt_offset, int ldvt, double[] u, int _u_offset, int ldu, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dlasdqK(String uplo, int sqre, int n, int ncvt, int nru, int ncc, double[] d, int offsetd, double[] e, int offsete, double[] vt, int offsetvt, int ldvt, double[] u, int offsetu, int ldu, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dlasdtK(int n, org.netlib.util.intW lvl, org.netlib.util.intW nd, int[] inode, int _inode_offset, int[] ndiml, int _ndiml_offset, int[] ndimr, int _ndimr_offset, int msub); + protected native void dlasdtK(int n, org.netlib.util.intW lvl, org.netlib.util.intW nd, int[] inode, int offsetinode, int[] ndiml, int offsetndiml, int[] ndimr, int offsetndimr, int msub); - protected native void dlasetK(String uplo, int m, int n, double alpha, double beta, double[] a, int _a_offset, int lda); + protected native void dlasetK(String uplo, int m, int n, double alpha, double beta, double[] a, int offseta, int lda); - protected native void dlasq1K(int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dlasq1K(int n, double[] d, int offsetd, double[] e, int offsete, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dlasq2K(int n, double[] z, int _z_offset, org.netlib.util.intW info); + protected native void dlasq2K(int n, double[] z, int offsetz, org.netlib.util.intW info); - protected native void dlasq3K(int i0, org.netlib.util.intW n0, double[] z, int _z_offset, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW sigma, org.netlib.util.doubleW desig, org.netlib.util.doubleW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee); + protected native void dlasq3K(int i0, org.netlib.util.intW n0, double[] z, int offsetz, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW sigma, org.netlib.util.doubleW desig, org.netlib.util.doubleW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee); - protected native void dlasq4K(int i0, int n0, double[] z, int _z_offset, int pp, int n0in, double dmin, double dmin1, double dmin2, double dn, double dn1, double dn2, org.netlib.util.doubleW tau, org.netlib.util.intW ttype); + protected native void dlasq4K(int i0, int n0, double[] z, int offsetz, int pp, int n0in, double dmin, double dmin1, double dmin2, double dn, double dn1, double dn2, org.netlib.util.doubleW tau, org.netlib.util.intW ttype); - protected native void dlasq5K(int i0, int n0, double[] z, int _z_offset, int pp, double tau, org.netlib.util.doubleW dmin, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dnm1, org.netlib.util.doubleW dnm2, boolean ieee); + protected native void dlasq5K(int i0, int n0, double[] z, int offsetz, int pp, double tau, org.netlib.util.doubleW dmin, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dnm1, org.netlib.util.doubleW dnm2, boolean ieee); - protected native void dlasq6K(int i0, int n0, double[] z, int _z_offset, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dnm1, org.netlib.util.doubleW dnm2); + protected native void dlasq6K(int i0, int n0, double[] z, int offsetz, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dnm1, org.netlib.util.doubleW dnm2); - protected native void dlasrK(String side, String pivot, String direct, int m, int n, double[] c, int _c_offset, double[] s, int _s_offset, double[] a, int _a_offset, int lda); + protected native void dlasrK(String side, String pivot, String direct, int m, int n, double[] c, int offsetc, double[] s, int offsets, double[] a, int offseta, int lda); - protected native void dlasrtK(String id, int n, double[] d, int _d_offset, org.netlib.util.intW info); + protected native void dlasrtK(String id, int n, double[] d, int offsetd, org.netlib.util.intW info); - protected native void dlassqK(int n, double[] x, int _x_offset, int incx, org.netlib.util.doubleW scale, org.netlib.util.doubleW sumsq); + protected native void dlassqK(int n, double[] x, int offsetx, int incx, org.netlib.util.doubleW scale, org.netlib.util.doubleW sumsq); protected native void dlasv2K(double f, double g, double h, org.netlib.util.doubleW ssmin, org.netlib.util.doubleW ssmax, org.netlib.util.doubleW snr, org.netlib.util.doubleW csr, org.netlib.util.doubleW snl, org.netlib.util.doubleW csl); - protected native void dlaswpK(int n, double[] a, int _a_offset, int lda, int k1, int k2, int[] ipiv, int _ipiv_offset, int incx); + protected native void dlaswpK(int n, double[] a, int offseta, int lda, int k1, int k2, int[] ipiv, int offsetipiv, int incx); - protected native void dlasy2K(boolean ltranl, boolean ltranr, int isgn, int n1, int n2, double[] tl, int _tl_offset, int ldtl, double[] tr, int _tr_offset, int ldtr, double[] b, int _b_offset, int ldb, org.netlib.util.doubleW scale, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW xnorm, org.netlib.util.intW info); + protected native void dlasy2K(boolean ltranl, boolean ltranr, int isgn, int n1, int n2, double[] tl, int offsettl, int ldtl, double[] tr, int offsettr, int ldtr, double[] b, int offsetb, int ldb, org.netlib.util.doubleW scale, double[] x, int offsetx, int ldx, org.netlib.util.doubleW xnorm, org.netlib.util.intW info); - protected native void dlasyfK(String uplo, int n, int nb, org.netlib.util.intW kb, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] w, int _w_offset, int ldw, org.netlib.util.intW info); + protected native void dlasyfK(String uplo, int n, int nb, org.netlib.util.intW kb, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] w, int offsetw, int ldw, org.netlib.util.intW info); - protected native void dlatbsK(String uplo, String trans, String diag, String normin, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] x, int _x_offset, org.netlib.util.doubleW scale, double[] cnorm, int _cnorm_offset, org.netlib.util.intW info); + protected native void dlatbsK(String uplo, String trans, String diag, String normin, int n, int kd, double[] ab, int offsetab, int ldab, double[] x, int offsetx, org.netlib.util.doubleW scale, double[] cnorm, int offsetcnorm, org.netlib.util.intW info); - protected native void dlatdfK(int ijob, int n, double[] z, int _z_offset, int ldz, double[] rhs, int _rhs_offset, org.netlib.util.doubleW rdsum, org.netlib.util.doubleW rdscal, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset); + protected native void dlatdfK(int ijob, int n, double[] z, int offsetz, int ldz, double[] rhs, int offsetrhs, org.netlib.util.doubleW rdsum, org.netlib.util.doubleW rdscal, int[] ipiv, int offsetipiv, int[] jpiv, int offsetjpiv); - protected native void dlatpsK(String uplo, String trans, String diag, String normin, int n, double[] ap, int _ap_offset, double[] x, int _x_offset, org.netlib.util.doubleW scale, double[] cnorm, int _cnorm_offset, org.netlib.util.intW info); + protected native void dlatpsK(String uplo, String trans, String diag, String normin, int n, double[] ap, int offsetap, double[] x, int offsetx, org.netlib.util.doubleW scale, double[] cnorm, int offsetcnorm, org.netlib.util.intW info); - protected native void dlatrdK(String uplo, int n, int nb, double[] a, int _a_offset, int lda, double[] e, int _e_offset, double[] tau, int _tau_offset, double[] w, int _w_offset, int ldw); + protected native void dlatrdK(String uplo, int n, int nb, double[] a, int offseta, int lda, double[] e, int offsete, double[] tau, int offsettau, double[] w, int offsetw, int ldw); - protected native void dlatrsK(String uplo, String trans, String diag, String normin, int n, double[] a, int _a_offset, int lda, double[] x, int _x_offset, org.netlib.util.doubleW scale, double[] cnorm, int _cnorm_offset, org.netlib.util.intW info); + protected native void dlatrsK(String uplo, String trans, String diag, String normin, int n, double[] a, int offseta, int lda, double[] x, int offsetx, org.netlib.util.doubleW scale, double[] cnorm, int offsetcnorm, org.netlib.util.intW info); - protected native void dlatrzK(int m, int n, int l, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset); + protected native void dlatrzK(int m, int n, int l, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork); - protected native void dlatzmK(String side, int m, int n, double[] v, int _v_offset, int incv, double tau, double[] c1, int _c1_offset, double[] c2, int _c2_offset, int Ldc, double[] work, int _work_offset); + protected native void dlatzmK(String side, int m, int n, double[] v, int offsetv, int incv, double tau, double[] c1, int offsetc1, double[] c2, int offsetc2, int Ldc, double[] work, int offsetwork); - protected native void dlauu2K(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected native void dlauu2K(String uplo, int n, double[] a, int offseta, int lda, org.netlib.util.intW info); - protected native void dlauumK(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected native void dlauumK(String uplo, int n, double[] a, int offseta, int lda, org.netlib.util.intW info); - protected native void dlazq3K(int i0, org.netlib.util.intW n0, double[] z, int _z_offset, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW sigma, org.netlib.util.doubleW desig, org.netlib.util.doubleW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee, org.netlib.util.intW ttype, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dn1, org.netlib.util.doubleW dn2, org.netlib.util.doubleW tau); + protected native void dlazq3K(int i0, org.netlib.util.intW n0, double[] z, int offsetz, int pp, org.netlib.util.doubleW dmin, org.netlib.util.doubleW sigma, org.netlib.util.doubleW desig, org.netlib.util.doubleW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee, org.netlib.util.intW ttype, org.netlib.util.doubleW dmin1, org.netlib.util.doubleW dmin2, org.netlib.util.doubleW dn, org.netlib.util.doubleW dn1, org.netlib.util.doubleW dn2, org.netlib.util.doubleW tau); - protected native void dlazq4K(int i0, int n0, double[] z, int _z_offset, int pp, int n0in, double dmin, double dmin1, double dmin2, double dn, double dn1, double dn2, org.netlib.util.doubleW tau, org.netlib.util.intW ttype, org.netlib.util.doubleW g); + protected native void dlazq4K(int i0, int n0, double[] z, int offsetz, int pp, int n0in, double dmin, double dmin1, double dmin2, double dn, double dn1, double dn2, org.netlib.util.doubleW tau, org.netlib.util.intW ttype, org.netlib.util.doubleW g); - protected native void dopgtrK(String uplo, int n, double[] ap, int _ap_offset, double[] tau, int _tau_offset, double[] q, int _q_offset, int ldq, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dopgtrK(String uplo, int n, double[] ap, int offsetap, double[] tau, int offsettau, double[] q, int offsetq, int ldq, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dopmtrK(String side, String uplo, String trans, int m, int n, double[] ap, int _ap_offset, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dopmtrK(String side, String uplo, String trans, int m, int n, double[] ap, int offsetap, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dorg2lK(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dorg2lK(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dorg2rK(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dorg2rK(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dorgbrK(String vect, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dorgbrK(String vect, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dorghrK(int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dorghrK(int n, int ilo, int ihi, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dorgl2K(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dorgl2K(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dorglqK(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dorglqK(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dorgqlK(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dorgqlK(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dorgqrK(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dorgqrK(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dorgr2K(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dorgr2K(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dorgrqK(int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dorgrqK(int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dorgtrK(String uplo, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dorgtrK(String uplo, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dorm2lK(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dorm2lK(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dorm2rK(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dorm2rK(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dormbrK(String vect, String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dormbrK(String vect, String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dormhrK(String side, String trans, int m, int n, int ilo, int ihi, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dormhrK(String side, String trans, int m, int n, int ilo, int ihi, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dorml2K(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dorml2K(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dormlqK(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dormlqK(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dormqlK(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dormqlK(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dormqrK(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dormqrK(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dormr2K(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dormr2K(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dormr3K(String side, String trans, int m, int n, int k, int l, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dormr3K(String side, String trans, int m, int n, int k, int l, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dormrqK(String side, String trans, int m, int n, int k, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dormrqK(String side, String trans, int m, int n, int k, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dormrzK(String side, String trans, int m, int n, int k, int l, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dormrzK(String side, String trans, int m, int n, int k, int l, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dormtrK(String side, String uplo, String trans, int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] c, int _c_offset, int Ldc, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dormtrK(String side, String uplo, String trans, int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] c, int offsetc, int Ldc, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dpbconK(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dpbconK(String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dpbequK(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] s, int _s_offset, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info); + protected native void dpbequK(String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double[] s, int offsets, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info); - protected native void dpbrfsK(String uplo, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] afb, int _afb_offset, int ldafb, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dpbrfsK(String uplo, int n, int kd, int nrhs, double[] ab, int offsetab, int ldab, double[] afb, int offsetafb, int ldafb, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dpbstfK(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, org.netlib.util.intW info); + protected native void dpbstfK(String uplo, int n, int kd, double[] ab, int offsetab, int ldab, org.netlib.util.intW info); - protected native void dpbsvK(String uplo, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void dpbsvK(String uplo, int n, int kd, int nrhs, double[] ab, int offsetab, int ldab, double[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void dpbsvxK(String fact, String uplo, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] afb, int _afb_offset, int ldafb, org.netlib.util.StringW equed, double[] s, int _s_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dpbsvxK(String fact, String uplo, int n, int kd, int nrhs, double[] ab, int offsetab, int ldab, double[] afb, int offsetafb, int ldafb, org.netlib.util.StringW equed, double[] s, int offsets, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dpbtf2K(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, org.netlib.util.intW info); + protected native void dpbtf2K(String uplo, int n, int kd, double[] ab, int offsetab, int ldab, org.netlib.util.intW info); - protected native void dpbtrfK(String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, org.netlib.util.intW info); + protected native void dpbtrfK(String uplo, int n, int kd, double[] ab, int offsetab, int ldab, org.netlib.util.intW info); - protected native void dpbtrsK(String uplo, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void dpbtrsK(String uplo, int n, int kd, int nrhs, double[] ab, int offsetab, int ldab, double[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void dpoconK(String uplo, int n, double[] a, int _a_offset, int lda, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dpoconK(String uplo, int n, double[] a, int offseta, int lda, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dpoequK(int n, double[] a, int _a_offset, int lda, double[] s, int _s_offset, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info); + protected native void dpoequK(int n, double[] a, int offseta, int lda, double[] s, int offsets, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info); - protected native void dporfsK(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dporfsK(String uplo, int n, int nrhs, double[] a, int offseta, int lda, double[] af, int offsetaf, int ldaf, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dposvK(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void dposvK(String uplo, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void dposvxK(String fact, String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, org.netlib.util.StringW equed, double[] s, int _s_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dposvxK(String fact, String uplo, int n, int nrhs, double[] a, int offseta, int lda, double[] af, int offsetaf, int ldaf, org.netlib.util.StringW equed, double[] s, int offsets, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dpotf2K(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected native void dpotf2K(String uplo, int n, double[] a, int offseta, int lda, org.netlib.util.intW info); - protected native void dpotrfK(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected native void dpotrfK(String uplo, int n, double[] a, int offseta, int lda, org.netlib.util.intW info); - protected native void dpotriK(String uplo, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected native void dpotriK(String uplo, int n, double[] a, int offseta, int lda, org.netlib.util.intW info); - protected native void dpotrsK(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void dpotrsK(String uplo, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void dppconK(String uplo, int n, double[] ap, int _ap_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dppconK(String uplo, int n, double[] ap, int offsetap, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dppequK(String uplo, int n, double[] ap, int _ap_offset, double[] s, int _s_offset, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info); + protected native void dppequK(String uplo, int n, double[] ap, int offsetap, double[] s, int offsets, org.netlib.util.doubleW scond, org.netlib.util.doubleW amax, org.netlib.util.intW info); - protected native void dpprfsK(String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] afp, int _afp_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dpprfsK(String uplo, int n, int nrhs, double[] ap, int offsetap, double[] afp, int offsetafp, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dppsvK(String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void dppsvK(String uplo, int n, int nrhs, double[] ap, int offsetap, double[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void dppsvxK(String fact, String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] afp, int _afp_offset, org.netlib.util.StringW equed, double[] s, int _s_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dppsvxK(String fact, String uplo, int n, int nrhs, double[] ap, int offsetap, double[] afp, int offsetafp, org.netlib.util.StringW equed, double[] s, int offsets, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dpptrfK(String uplo, int n, double[] ap, int _ap_offset, org.netlib.util.intW info); + protected native void dpptrfK(String uplo, int n, double[] ap, int offsetap, org.netlib.util.intW info); - protected native void dpptriK(String uplo, int n, double[] ap, int _ap_offset, org.netlib.util.intW info); + protected native void dpptriK(String uplo, int n, double[] ap, int offsetap, org.netlib.util.intW info); - protected native void dpptrsK(String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void dpptrsK(String uplo, int n, int nrhs, double[] ap, int offsetap, double[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void dptconK(int n, double[] d, int _d_offset, double[] e, int _e_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dptconK(int n, double[] d, int offsetd, double[] e, int offsete, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dpteqrK(String compz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dpteqrK(String compz, int n, double[] d, int offsetd, double[] e, int offsete, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dptrfsK(int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] df, int _df_offset, double[] ef, int _ef_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dptrfsK(int n, int nrhs, double[] d, int offsetd, double[] e, int offsete, double[] df, int offsetdf, double[] ef, int offsetef, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dptsvK(int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void dptsvK(int n, int nrhs, double[] d, int offsetd, double[] e, int offsete, double[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void dptsvxK(String fact, int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] df, int _df_offset, double[] ef, int _ef_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dptsvxK(String fact, int n, int nrhs, double[] d, int offsetd, double[] e, int offsete, double[] df, int offsetdf, double[] ef, int offsetef, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dpttrfK(int n, double[] d, int _d_offset, double[] e, int _e_offset, org.netlib.util.intW info); + protected native void dpttrfK(int n, double[] d, int offsetd, double[] e, int offsete, org.netlib.util.intW info); - protected native void dpttrsK(int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void dpttrsK(int n, int nrhs, double[] d, int offsetd, double[] e, int offsete, double[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void dptts2K(int n, int nrhs, double[] d, int _d_offset, double[] e, int _e_offset, double[] b, int _b_offset, int ldb); + protected native void dptts2K(int n, int nrhs, double[] d, int offsetd, double[] e, int offsete, double[] b, int offsetb, int ldb); - protected native void drsclK(int n, double sa, double[] sx, int _sx_offset, int incx); + protected native void drsclK(int n, double sa, double[] sx, int offsetsx, int incx); - protected native void dsbevK(String jobz, String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dsbevK(String jobz, String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dsbevdK(String jobz, String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected native void dsbevdK(String jobz, String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); - protected native void dsbevxK(String jobz, String range, String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] q, int _q_offset, int ldq, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected native void dsbevxK(String jobz, String range, String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double[] q, int offsetq, int ldq, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); - protected native void dsbgstK(String vect, String uplo, int n, int ka, int kb, double[] ab, int _ab_offset, int ldab, double[] bb, int _bb_offset, int ldbb, double[] x, int _x_offset, int ldx, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dsbgstK(String vect, String uplo, int n, int ka, int kb, double[] ab, int offsetab, int ldab, double[] bb, int offsetbb, int ldbb, double[] x, int offsetx, int ldx, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dsbgvK(String jobz, String uplo, int n, int ka, int kb, double[] ab, int _ab_offset, int ldab, double[] bb, int _bb_offset, int ldbb, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dsbgvK(String jobz, String uplo, int n, int ka, int kb, double[] ab, int offsetab, int ldab, double[] bb, int offsetbb, int ldbb, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dsbgvdK(String jobz, String uplo, int n, int ka, int kb, double[] ab, int _ab_offset, int ldab, double[] bb, int _bb_offset, int ldbb, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected native void dsbgvdK(String jobz, String uplo, int n, int ka, int kb, double[] ab, int offsetab, int ldab, double[] bb, int offsetbb, int ldbb, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); - protected native void dsbgvxK(String jobz, String range, String uplo, int n, int ka, int kb, double[] ab, int _ab_offset, int ldab, double[] bb, int _bb_offset, int ldbb, double[] q, int _q_offset, int ldq, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected native void dsbgvxK(String jobz, String range, String uplo, int n, int ka, int kb, double[] ab, int offsetab, int ldab, double[] bb, int offsetbb, int ldbb, double[] q, int offsetq, int ldq, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); - protected native void dsbtrdK(String vect, String uplo, int n, int kd, double[] ab, int _ab_offset, int ldab, double[] d, int _d_offset, double[] e, int _e_offset, double[] q, int _q_offset, int ldq, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dsbtrdK(String vect, String uplo, int n, int kd, double[] ab, int offsetab, int ldab, double[] d, int offsetd, double[] e, int offsete, double[] q, int offsetq, int ldq, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dsgesvK(int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] work, int _work_offset, float[] swork, int _swork_offset, org.netlib.util.intW iter, org.netlib.util.intW info); + protected native void dsgesvK(int n, int nrhs, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] work, int offsetwork, float[] swork, int offsetswork, org.netlib.util.intW iter, org.netlib.util.intW info); - protected native void dspconK(String uplo, int n, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dspconK(String uplo, int n, double[] ap, int offsetap, int[] ipiv, int offsetipiv, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dspevK(String jobz, String uplo, int n, double[] ap, int _ap_offset, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dspevK(String jobz, String uplo, int n, double[] ap, int offsetap, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dspevdK(String jobz, String uplo, int n, double[] ap, int _ap_offset, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected native void dspevdK(String jobz, String uplo, int n, double[] ap, int offsetap, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); - protected native void dspevxK(String jobz, String range, String uplo, int n, double[] ap, int _ap_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected native void dspevxK(String jobz, String range, String uplo, int n, double[] ap, int offsetap, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); - protected native void dspgstK(int itype, String uplo, int n, double[] ap, int _ap_offset, double[] bp, int _bp_offset, org.netlib.util.intW info); + protected native void dspgstK(int itype, String uplo, int n, double[] ap, int offsetap, double[] bp, int offsetbp, org.netlib.util.intW info); - protected native void dspgvK(int itype, String jobz, String uplo, int n, double[] ap, int _ap_offset, double[] bp, int _bp_offset, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dspgvK(int itype, String jobz, String uplo, int n, double[] ap, int offsetap, double[] bp, int offsetbp, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dspgvdK(int itype, String jobz, String uplo, int n, double[] ap, int _ap_offset, double[] bp, int _bp_offset, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected native void dspgvdK(int itype, String jobz, String uplo, int n, double[] ap, int offsetap, double[] bp, int offsetbp, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); - protected native void dspgvxK(int itype, String jobz, String range, String uplo, int n, double[] ap, int _ap_offset, double[] bp, int _bp_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected native void dspgvxK(int itype, String jobz, String range, String uplo, int n, double[] ap, int offsetap, double[] bp, int offsetbp, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); - protected native void dsprfsK(String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] afp, int _afp_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dsprfsK(String uplo, int n, int nrhs, double[] ap, int offsetap, double[] afp, int offsetafp, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dspsvK(String uplo, int n, int nrhs, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void dspsvK(String uplo, int n, int nrhs, double[] ap, int offsetap, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void dspsvxK(String fact, String uplo, int n, int nrhs, double[] ap, int _ap_offset, double[] afp, int _afp_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dspsvxK(String fact, String uplo, int n, int nrhs, double[] ap, int offsetap, double[] afp, int offsetafp, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dsptrdK(String uplo, int n, double[] ap, int _ap_offset, double[] d, int _d_offset, double[] e, int _e_offset, double[] tau, int _tau_offset, org.netlib.util.intW info); + protected native void dsptrdK(String uplo, int n, double[] ap, int offsetap, double[] d, int offsetd, double[] e, int offsete, double[] tau, int offsettau, org.netlib.util.intW info); - protected native void dsptrfK(String uplo, int n, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + protected native void dsptrfK(String uplo, int n, double[] ap, int offsetap, int[] ipiv, int offsetipiv, org.netlib.util.intW info); - protected native void dsptriK(String uplo, int n, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dsptriK(String uplo, int n, double[] ap, int offsetap, int[] ipiv, int offsetipiv, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dsptrsK(String uplo, int n, int nrhs, double[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void dsptrsK(String uplo, int n, int nrhs, double[] ap, int offsetap, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void dstebzK(String range, String order, int n, double vl, double vu, int il, int iu, double abstol, double[] d, int _d_offset, double[] e, int _e_offset, org.netlib.util.intW m, org.netlib.util.intW nsplit, double[] w, int _w_offset, int[] iblock, int _iblock_offset, int[] isplit, int _isplit_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dstebzK(String range, String order, int n, double vl, double vu, int il, int iu, double abstol, double[] d, int offsetd, double[] e, int offsete, org.netlib.util.intW m, org.netlib.util.intW nsplit, double[] w, int offsetw, int[] iblock, int offsetiblock, int[] isplit, int offsetisplit, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dstedcK(String compz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected native void dstedcK(String compz, int n, double[] d, int offsetd, double[] e, int offsete, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); - protected native void dstegrK(String jobz, String range, int n, double[] d, int _d_offset, double[] e, int _e_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected native void dstegrK(String jobz, String range, int n, double[] d, int offsetd, double[] e, int offsete, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); - protected native void dsteinK(int n, double[] d, int _d_offset, double[] e, int _e_offset, int m, double[] w, int _w_offset, int[] iblock, int _iblock_offset, int[] isplit, int _isplit_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected native void dsteinK(int n, double[] d, int offsetd, double[] e, int offsete, int m, double[] w, int offsetw, int[] iblock, int offsetiblock, int[] isplit, int offsetisplit, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); - protected native void dstemrK(String jobz, String range, int n, double[] d, int _d_offset, double[] e, int _e_offset, double vl, double vu, int il, int iu, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, int nzc, int[] isuppz, int _isuppz_offset, org.netlib.util.booleanW tryrac, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected native void dstemrK(String jobz, String range, int n, double[] d, int offsetd, double[] e, int offsete, double vl, double vu, int il, int iu, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, int nzc, int[] isuppz, int offsetisuppz, org.netlib.util.booleanW tryrac, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); - protected native void dsteqrK(String compz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dsteqrK(String compz, int n, double[] d, int offsetd, double[] e, int offsete, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dsterfK(int n, double[] d, int _d_offset, double[] e, int _e_offset, org.netlib.util.intW info); + protected native void dsterfK(int n, double[] d, int offsetd, double[] e, int offsete, org.netlib.util.intW info); - protected native void dstevK(String jobz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dstevK(String jobz, int n, double[] d, int offsetd, double[] e, int offsete, double[] z, int offsetz, int ldz, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dstevdK(String jobz, int n, double[] d, int _d_offset, double[] e, int _e_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected native void dstevdK(String jobz, int n, double[] d, int offsetd, double[] e, int offsete, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); - protected native void dstevrK(String jobz, String range, int n, double[] d, int _d_offset, double[] e, int _e_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected native void dstevrK(String jobz, String range, int n, double[] d, int offsetd, double[] e, int offsete, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); - protected native void dstevxK(String jobz, String range, int n, double[] d, int _d_offset, double[] e, int _e_offset, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected native void dstevxK(String jobz, String range, int n, double[] d, int offsetd, double[] e, int offsete, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); - protected native void dsyconK(String uplo, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double anorm, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dsyconK(String uplo, int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double anorm, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dsyevK(String jobz, String uplo, int n, double[] a, int _a_offset, int lda, double[] w, int _w_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dsyevK(String jobz, String uplo, int n, double[] a, int offseta, int lda, double[] w, int offsetw, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dsyevdK(String jobz, String uplo, int n, double[] a, int _a_offset, int lda, double[] w, int _w_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected native void dsyevdK(String jobz, String uplo, int n, double[] a, int offseta, int lda, double[] w, int offsetw, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); - protected native void dsyevrK(String jobz, String range, String uplo, int n, double[] a, int _a_offset, int lda, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected native void dsyevrK(String jobz, String range, String uplo, int n, double[] a, int offseta, int lda, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); - protected native void dsyevxK(String jobz, String range, String uplo, int n, double[] a, int _a_offset, int lda, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected native void dsyevxK(String jobz, String range, String uplo, int n, double[] a, int offseta, int lda, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); - protected native void dsygs2K(int itype, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void dsygs2K(int itype, String uplo, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void dsygstK(int itype, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void dsygstK(int itype, String uplo, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void dsygvK(int itype, String jobz, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] w, int _w_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dsygvK(int itype, String jobz, String uplo, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] w, int offsetw, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dsygvdK(int itype, String jobz, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] w, int _w_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected native void dsygvdK(int itype, String jobz, String uplo, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] w, int offsetw, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); - protected native void dsygvxK(int itype, String jobz, String range, String uplo, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int _w_offset, double[] z, int _z_offset, int ldz, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected native void dsygvxK(int itype, String jobz, String range, String uplo, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double vl, double vu, int il, int iu, double abstol, org.netlib.util.intW m, double[] w, int offsetw, double[] z, int offsetz, int ldz, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); - protected native void dsyrfsK(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dsyrfsK(String uplo, int n, int nrhs, double[] a, int offseta, int lda, double[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dsysvK(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dsysvK(String uplo, int n, int nrhs, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dsysvxK(String fact, String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, double[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dsysvxK(String fact, String uplo, int n, int nrhs, double[] a, int offseta, int lda, double[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, org.netlib.util.doubleW rcond, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dsytd2K(String uplo, int n, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tau, int _tau_offset, org.netlib.util.intW info); + protected native void dsytd2K(String uplo, int n, double[] a, int offseta, int lda, double[] d, int offsetd, double[] e, int offsete, double[] tau, int offsettau, org.netlib.util.intW info); - protected native void dsytf2K(String uplo, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + protected native void dsytf2K(String uplo, int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, org.netlib.util.intW info); - protected native void dsytrdK(String uplo, int n, double[] a, int _a_offset, int lda, double[] d, int _d_offset, double[] e, int _e_offset, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dsytrdK(String uplo, int n, double[] a, int offseta, int lda, double[] d, int offsetd, double[] e, int offsete, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dsytrfK(String uplo, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dsytrfK(String uplo, int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dsytriK(String uplo, int n, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dsytriK(String uplo, int n, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dsytrsK(String uplo, int n, int nrhs, double[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void dsytrsK(String uplo, int n, int nrhs, double[] a, int offseta, int lda, int[] ipiv, int offsetipiv, double[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void dtbconK(String norm, String uplo, String diag, int n, int kd, double[] ab, int _ab_offset, int ldab, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dtbconK(String norm, String uplo, String diag, int n, int kd, double[] ab, int offsetab, int ldab, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dtbrfsK(String uplo, String trans, String diag, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dtbrfsK(String uplo, String trans, String diag, int n, int kd, int nrhs, double[] ab, int offsetab, int ldab, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dtbtrsK(String uplo, String trans, String diag, int n, int kd, int nrhs, double[] ab, int _ab_offset, int ldab, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void dtbtrsK(String uplo, String trans, String diag, int n, int kd, int nrhs, double[] ab, int offsetab, int ldab, double[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void dtgevcK(String side, String howmny, boolean[] select, int _select_offset, int n, double[] s, int _s_offset, int lds, double[] p, int _p_offset, int ldp, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dtgevcK(String side, String howmny, boolean[] select, int offsetselect, int n, double[] s, int offsets, int lds, double[] p, int offsetp, int ldp, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, int mm, org.netlib.util.intW m, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dtgex2K(boolean wantq, boolean wantz, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, int j1, int n1, int n2, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dtgex2K(boolean wantq, boolean wantz, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] q, int offsetq, int ldq, double[] z, int offsetz, int ldz, int j1, int n1, int n2, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dtgexcK(boolean wantq, boolean wantz, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, org.netlib.util.intW ifst, org.netlib.util.intW ilst, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dtgexcK(boolean wantq, boolean wantz, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] q, int offsetq, int ldq, double[] z, int offsetz, int ldz, org.netlib.util.intW ifst, org.netlib.util.intW ilst, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void dtgsenK(int ijob, boolean wantq, boolean wantz, boolean[] select, int _select_offset, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] alphar, int _alphar_offset, double[] alphai, int _alphai_offset, double[] beta, int _beta_offset, double[] q, int _q_offset, int ldq, double[] z, int _z_offset, int ldz, org.netlib.util.intW m, org.netlib.util.doubleW pl, org.netlib.util.doubleW pr, double[] dif, int _dif_offset, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected native void dtgsenK(int ijob, boolean wantq, boolean wantz, boolean[] select, int offsetselect, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] alphar, int offsetalphar, double[] alphai, int offsetalphai, double[] beta, int offsetbeta, double[] q, int offsetq, int ldq, double[] z, int offsetz, int ldz, org.netlib.util.intW m, org.netlib.util.doubleW pl, org.netlib.util.doubleW pr, double[] dif, int offsetdif, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); - protected native void dtgsjaK(String jobu, String jobv, String jobq, int m, int p, int n, int k, int l, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double tola, double tolb, double[] alpha, int _alpha_offset, double[] beta, int _beta_offset, double[] u, int _u_offset, int ldu, double[] v, int _v_offset, int ldv, double[] q, int _q_offset, int ldq, double[] work, int _work_offset, org.netlib.util.intW ncycle, org.netlib.util.intW info); + protected native void dtgsjaK(String jobu, String jobv, String jobq, int m, int p, int n, int k, int l, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double tola, double tolb, double[] alpha, int offsetalpha, double[] beta, int offsetbeta, double[] u, int offsetu, int ldu, double[] v, int offsetv, int ldv, double[] q, int offsetq, int ldq, double[] work, int offsetwork, org.netlib.util.intW ncycle, org.netlib.util.intW info); - protected native void dtgsnaK(String job, String howmny, boolean[] select, int _select_offset, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] s, int _s_offset, double[] dif, int _dif_offset, int mm, org.netlib.util.intW m, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dtgsnaK(String job, String howmny, boolean[] select, int offsetselect, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, double[] s, int offsets, double[] dif, int offsetdif, int mm, org.netlib.util.intW m, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dtgsy2K(String trans, int ijob, int m, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] c, int _c_offset, int Ldc, double[] d, int _d_offset, int ldd, double[] e, int _e_offset, int lde, double[] f, int _f_offset, int ldf, org.netlib.util.doubleW scale, org.netlib.util.doubleW rdsum, org.netlib.util.doubleW rdscal, int[] iwork, int _iwork_offset, org.netlib.util.intW pq, org.netlib.util.intW info); + protected native void dtgsy2K(String trans, int ijob, int m, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] c, int offsetc, int Ldc, double[] d, int offsetd, int ldd, double[] e, int offsete, int lde, double[] f, int offsetf, int ldf, org.netlib.util.doubleW scale, org.netlib.util.doubleW rdsum, org.netlib.util.doubleW rdscal, int[] iwork, int offsetiwork, org.netlib.util.intW pq, org.netlib.util.intW info); - protected native void dtgsylK(String trans, int ijob, int m, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] c, int _c_offset, int Ldc, double[] d, int _d_offset, int ldd, double[] e, int _e_offset, int lde, double[] f, int _f_offset, int ldf, org.netlib.util.doubleW scale, org.netlib.util.doubleW dif, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dtgsylK(String trans, int ijob, int m, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] c, int offsetc, int Ldc, double[] d, int offsetd, int ldd, double[] e, int offsete, int lde, double[] f, int offsetf, int ldf, org.netlib.util.doubleW scale, org.netlib.util.doubleW dif, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dtpconK(String norm, String uplo, String diag, int n, double[] ap, int _ap_offset, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dtpconK(String norm, String uplo, String diag, int n, double[] ap, int offsetap, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dtprfsK(String uplo, String trans, String diag, int n, int nrhs, double[] ap, int _ap_offset, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dtprfsK(String uplo, String trans, String diag, int n, int nrhs, double[] ap, int offsetap, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dtptriK(String uplo, String diag, int n, double[] ap, int _ap_offset, org.netlib.util.intW info); + protected native void dtptriK(String uplo, String diag, int n, double[] ap, int offsetap, org.netlib.util.intW info); - protected native void dtptrsK(String uplo, String trans, String diag, int n, int nrhs, double[] ap, int _ap_offset, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void dtptrsK(String uplo, String trans, String diag, int n, int nrhs, double[] ap, int offsetap, double[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void dtrconK(String norm, String uplo, String diag, int n, double[] a, int _a_offset, int lda, org.netlib.util.doubleW rcond, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dtrconK(String norm, String uplo, String diag, int n, double[] a, int offseta, int lda, org.netlib.util.doubleW rcond, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dtrevcK(String side, String howmny, boolean[] select, int _select_offset, int n, double[] t, int _t_offset, int ldt, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dtrevcK(String side, String howmny, boolean[] select, int offsetselect, int n, double[] t, int offsett, int ldt, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, int mm, org.netlib.util.intW m, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dtrexcK(String compq, int n, double[] t, int _t_offset, int ldt, double[] q, int _q_offset, int ldq, org.netlib.util.intW ifst, org.netlib.util.intW ilst, double[] work, int _work_offset, org.netlib.util.intW info); + protected native void dtrexcK(String compq, int n, double[] t, int offsett, int ldt, double[] q, int offsetq, int ldq, org.netlib.util.intW ifst, org.netlib.util.intW ilst, double[] work, int offsetwork, org.netlib.util.intW info); - protected native void dtrrfsK(String uplo, String trans, String diag, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] x, int _x_offset, int ldx, double[] ferr, int _ferr_offset, double[] berr, int _berr_offset, double[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dtrrfsK(String uplo, String trans, String diag, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] x, int offsetx, int ldx, double[] ferr, int offsetferr, double[] berr, int offsetberr, double[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dtrsenK(String job, String compq, boolean[] select, int _select_offset, int n, double[] t, int _t_offset, int ldt, double[] q, int _q_offset, int ldq, double[] wr, int _wr_offset, double[] wi, int _wi_offset, org.netlib.util.intW m, org.netlib.util.doubleW s, org.netlib.util.doubleW sep, double[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected native void dtrsenK(String job, String compq, boolean[] select, int offsetselect, int n, double[] t, int offsett, int ldt, double[] q, int offsetq, int ldq, double[] wr, int offsetwr, double[] wi, int offsetwi, org.netlib.util.intW m, org.netlib.util.doubleW s, org.netlib.util.doubleW sep, double[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); - protected native void dtrsnaK(String job, String howmny, boolean[] select, int _select_offset, int n, double[] t, int _t_offset, int ldt, double[] vl, int _vl_offset, int ldvl, double[] vr, int _vr_offset, int ldvr, double[] s, int _s_offset, double[] sep, int _sep_offset, int mm, org.netlib.util.intW m, double[] work, int _work_offset, int ldwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void dtrsnaK(String job, String howmny, boolean[] select, int offsetselect, int n, double[] t, int offsett, int ldt, double[] vl, int offsetvl, int ldvl, double[] vr, int offsetvr, int ldvr, double[] s, int offsets, double[] sep, int offsetsep, int mm, org.netlib.util.intW m, double[] work, int offsetwork, int ldwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void dtrsylK(String trana, String tranb, int isgn, int m, int n, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, double[] c, int _c_offset, int Ldc, org.netlib.util.doubleW scale, org.netlib.util.intW info); + protected native void dtrsylK(String trana, String tranb, int isgn, int m, int n, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, double[] c, int offsetc, int Ldc, org.netlib.util.doubleW scale, org.netlib.util.intW info); - protected native void dtrti2K(String uplo, String diag, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected native void dtrti2K(String uplo, String diag, int n, double[] a, int offseta, int lda, org.netlib.util.intW info); - protected native void dtrtriK(String uplo, String diag, int n, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected native void dtrtriK(String uplo, String diag, int n, double[] a, int offseta, int lda, org.netlib.util.intW info); - protected native void dtrtrsK(String uplo, String trans, String diag, int n, int nrhs, double[] a, int _a_offset, int lda, double[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void dtrtrsK(String uplo, String trans, String diag, int n, int nrhs, double[] a, int offseta, int lda, double[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void dtzrqfK(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, org.netlib.util.intW info); + protected native void dtzrqfK(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, org.netlib.util.intW info); - protected native void dtzrzfK(int m, int n, double[] a, int _a_offset, int lda, double[] tau, int _tau_offset, double[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void dtzrzfK(int m, int n, double[] a, int offseta, int lda, double[] tau, int offsettau, double[] work, int offsetwork, int lwork, org.netlib.util.intW info); protected native int ieeeckK(int ispec, float zero, float one); @@ -777,707 +777,707 @@ public static dev.ludovic.netlib.NativeLAPACK getInstance() { protected native boolean lsamenK(int n, String ca, String cb); - protected native void sbdsdcK(String uplo, String compq, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, float[] q, int _q_offset, int[] iq, int _iq_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void sbdsdcK(String uplo, String compq, int n, float[] d, int offsetd, float[] e, int offsete, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int ldvt, float[] q, int offsetq, int[] iq, int offsetiq, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void sbdsqrK(String uplo, int n, int ncvt, int nru, int ncc, float[] d, int _d_offset, float[] e, int _e_offset, float[] vt, int _vt_offset, int ldvt, float[] u, int _u_offset, int ldu, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void sbdsqrK(String uplo, int n, int ncvt, int nru, int ncc, float[] d, int offsetd, float[] e, int offsete, float[] vt, int offsetvt, int ldvt, float[] u, int offsetu, int ldu, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void sdisnaK(String job, int m, int n, float[] d, int _d_offset, float[] sep, int _sep_offset, org.netlib.util.intW info); + protected native void sdisnaK(String job, int m, int n, float[] d, int offsetd, float[] sep, int offsetsep, org.netlib.util.intW info); - protected native void sgbbrdK(String vect, int m, int n, int ncc, int kl, int ku, float[] ab, int _ab_offset, int ldab, float[] d, int _d_offset, float[] e, int _e_offset, float[] q, int _q_offset, int ldq, float[] pt, int _pt_offset, int ldpt, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void sgbbrdK(String vect, int m, int n, int ncc, int kl, int ku, float[] ab, int offsetab, int ldab, float[] d, int offsetd, float[] e, int offsete, float[] q, int offsetq, int ldq, float[] pt, int offsetpt, int ldpt, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void sgbconK(String norm, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void sgbconK(String norm, int n, int kl, int ku, float[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void sgbequK(int m, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, float[] r, int _r_offset, float[] c, int _c_offset, org.netlib.util.floatW rowcnd, org.netlib.util.floatW colcnd, org.netlib.util.floatW amax, org.netlib.util.intW info); + protected native void sgbequK(int m, int n, int kl, int ku, float[] ab, int offsetab, int ldab, float[] r, int offsetr, float[] c, int offsetc, org.netlib.util.floatW rowcnd, org.netlib.util.floatW colcnd, org.netlib.util.floatW amax, org.netlib.util.intW info); - protected native void sgbrfsK(String trans, int n, int kl, int ku, int nrhs, float[] ab, int _ab_offset, int ldab, float[] afb, int _afb_offset, int ldafb, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void sgbrfsK(String trans, int n, int kl, int ku, int nrhs, float[] ab, int offsetab, int ldab, float[] afb, int offsetafb, int ldafb, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void sgbsvK(int n, int kl, int ku, int nrhs, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void sgbsvK(int n, int kl, int ku, int nrhs, float[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void sgbsvxK(String fact, String trans, int n, int kl, int ku, int nrhs, float[] ab, int _ab_offset, int ldab, float[] afb, int _afb_offset, int ldafb, int[] ipiv, int _ipiv_offset, org.netlib.util.StringW equed, float[] r, int _r_offset, float[] c, int _c_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void sgbsvxK(String fact, String trans, int n, int kl, int ku, int nrhs, float[] ab, int offsetab, int ldab, float[] afb, int offsetafb, int ldafb, int[] ipiv, int offsetipiv, org.netlib.util.StringW equed, float[] r, int offsetr, float[] c, int offsetc, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void sgbtf2K(int m, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + protected native void sgbtf2K(int m, int n, int kl, int ku, float[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, org.netlib.util.intW info); - protected native void sgbtrfK(int m, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + protected native void sgbtrfK(int m, int n, int kl, int ku, float[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, org.netlib.util.intW info); - protected native void sgbtrsK(String trans, int n, int kl, int ku, int nrhs, float[] ab, int _ab_offset, int ldab, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void sgbtrsK(String trans, int n, int kl, int ku, int nrhs, float[] ab, int offsetab, int ldab, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void sgebakK(String job, String side, int n, int ilo, int ihi, float[] scale, int _scale_offset, int m, float[] v, int _v_offset, int ldv, org.netlib.util.intW info); + protected native void sgebakK(String job, String side, int n, int ilo, int ihi, float[] scale, int offsetscale, int m, float[] v, int offsetv, int ldv, org.netlib.util.intW info); - protected native void sgebalK(String job, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] scale, int _scale_offset, org.netlib.util.intW info); + protected native void sgebalK(String job, int n, float[] a, int offseta, int lda, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] scale, int offsetscale, org.netlib.util.intW info); - protected native void sgebd2K(int m, int n, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tauq, int _tauq_offset, float[] taup, int _taup_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void sgebd2K(int m, int n, float[] a, int offseta, int lda, float[] d, int offsetd, float[] e, int offsete, float[] tauq, int offsettauq, float[] taup, int offsettaup, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void sgebrdK(int m, int n, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tauq, int _tauq_offset, float[] taup, int _taup_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sgebrdK(int m, int n, float[] a, int offseta, int lda, float[] d, int offsetd, float[] e, int offsete, float[] tauq, int offsettauq, float[] taup, int offsettaup, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sgeconK(String norm, int n, float[] a, int _a_offset, int lda, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void sgeconK(String norm, int n, float[] a, int offseta, int lda, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void sgeequK(int m, int n, float[] a, int _a_offset, int lda, float[] r, int _r_offset, float[] c, int _c_offset, org.netlib.util.floatW rowcnd, org.netlib.util.floatW colcnd, org.netlib.util.floatW amax, org.netlib.util.intW info); + protected native void sgeequK(int m, int n, float[] a, int offseta, int lda, float[] r, int offsetr, float[] c, int offsetc, org.netlib.util.floatW rowcnd, org.netlib.util.floatW colcnd, org.netlib.util.floatW amax, org.netlib.util.intW info); - protected native void sgeesK(String jobvs, String sort, java.lang.Object select, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW sdim, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vs, int _vs_offset, int ldvs, float[] work, int _work_offset, int lwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + protected native void sgeesK(String jobvs, String sort, java.lang.Object select, int n, float[] a, int offseta, int lda, org.netlib.util.intW sdim, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] vs, int offsetvs, int ldvs, float[] work, int offsetwork, int lwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info); - protected native void sgeesxK(String jobvs, String sort, java.lang.Object select, String sense, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW sdim, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vs, int _vs_offset, int ldvs, org.netlib.util.floatW rconde, org.netlib.util.floatW rcondv, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + protected native void sgeesxK(String jobvs, String sort, java.lang.Object select, String sense, int n, float[] a, int offseta, int lda, org.netlib.util.intW sdim, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] vs, int offsetvs, int ldvs, org.netlib.util.floatW rconde, org.netlib.util.floatW rcondv, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info); - protected native void sgeevK(String jobvl, String jobvr, int n, float[] a, int _a_offset, int lda, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sgeevK(String jobvl, String jobvr, int n, float[] a, int offseta, int lda, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sgeevxK(String balanc, String jobvl, String jobvr, String sense, int n, float[] a, int _a_offset, int lda, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] scale, int _scale_offset, org.netlib.util.floatW abnrm, float[] rconde, int _rconde_offset, float[] rcondv, int _rcondv_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void sgeevxK(String balanc, String jobvl, String jobvr, String sense, int n, float[] a, int offseta, int lda, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] scale, int offsetscale, org.netlib.util.floatW abnrm, float[] rconde, int offsetrconde, float[] rcondv, int offsetrcondv, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void sgegsK(String jobvsl, String jobvsr, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vsl, int _vsl_offset, int ldvsl, float[] vsr, int _vsr_offset, int ldvsr, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sgegsK(String jobvsl, String jobvsr, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] vsl, int offsetvsl, int ldvsl, float[] vsr, int offsetvsr, int ldvsr, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sgegvK(String jobvl, String jobvr, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sgegvK(String jobvl, String jobvr, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sgehd2K(int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void sgehd2K(int n, int ilo, int ihi, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void sgehrdK(int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sgehrdK(int n, int ilo, int ihi, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sgelq2K(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void sgelq2K(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void sgelqfK(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sgelqfK(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sgelsK(String trans, int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sgelsK(String trans, int m, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sgelsdK(int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] s, int _s_offset, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void sgelsdK(int m, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] s, int offsets, float rcond, org.netlib.util.intW rank, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void sgelssK(int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] s, int _s_offset, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sgelssK(int m, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] s, int offsets, float rcond, org.netlib.util.intW rank, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sgelsxK(int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, int[] jpvt, int _jpvt_offset, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void sgelsxK(int m, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, int[] jpvt, int offsetjpvt, float rcond, org.netlib.util.intW rank, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void sgelsyK(int m, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, int[] jpvt, int _jpvt_offset, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sgelsyK(int m, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, int[] jpvt, int offsetjpvt, float rcond, org.netlib.util.intW rank, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sgeql2K(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void sgeql2K(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void sgeqlfK(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sgeqlfK(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sgeqp3K(int m, int n, float[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sgeqp3K(int m, int n, float[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sgeqpfK(int m, int n, float[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void sgeqpfK(int m, int n, float[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void sgeqr2K(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void sgeqr2K(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void sgeqrfK(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sgeqrfK(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sgerfsK(String trans, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void sgerfsK(String trans, int n, int nrhs, float[] a, int offseta, int lda, float[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void sgerq2K(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void sgerq2K(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void sgerqfK(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sgerqfK(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sgesc2K(int n, float[] a, int _a_offset, int lda, float[] rhs, int _rhs_offset, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset, org.netlib.util.floatW scale); + protected native void sgesc2K(int n, float[] a, int offseta, int lda, float[] rhs, int offsetrhs, int[] ipiv, int offsetipiv, int[] jpiv, int offsetjpiv, org.netlib.util.floatW scale); - protected native void sgesddK(String jobz, int m, int n, float[] a, int _a_offset, int lda, float[] s, int _s_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void sgesddK(String jobz, int m, int n, float[] a, int offseta, int lda, float[] s, int offsets, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int ldvt, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void sgesvK(int n, int nrhs, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void sgesvK(int n, int nrhs, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void sgesvdK(String jobu, String jobvt, int m, int n, float[] a, int _a_offset, int lda, float[] s, int _s_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sgesvdK(String jobu, String jobvt, int m, int n, float[] a, int offseta, int lda, float[] s, int offsets, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int ldvt, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sgesvxK(String fact, String trans, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, org.netlib.util.StringW equed, float[] r, int _r_offset, float[] c, int _c_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void sgesvxK(String fact, String trans, int n, int nrhs, float[] a, int offseta, int lda, float[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, org.netlib.util.StringW equed, float[] r, int offsetr, float[] c, int offsetc, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void sgetc2K(int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset, org.netlib.util.intW info); + protected native void sgetc2K(int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, int[] jpiv, int offsetjpiv, org.netlib.util.intW info); - protected native void sgetf2K(int m, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + protected native void sgetf2K(int m, int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, org.netlib.util.intW info); - protected native void sgetrfK(int m, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + protected native void sgetrfK(int m, int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, org.netlib.util.intW info); - protected native void sgetriK(int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sgetriK(int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sgetrsK(String trans, int n, int nrhs, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void sgetrsK(String trans, int n, int nrhs, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void sggbakK(String job, String side, int n, int ilo, int ihi, float[] lscale, int _lscale_offset, float[] rscale, int _rscale_offset, int m, float[] v, int _v_offset, int ldv, org.netlib.util.intW info); + protected native void sggbakK(String job, String side, int n, int ilo, int ihi, float[] lscale, int offsetlscale, float[] rscale, int offsetrscale, int m, float[] v, int offsetv, int ldv, org.netlib.util.intW info); - protected native void sggbalK(String job, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] lscale, int _lscale_offset, float[] rscale, int _rscale_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void sggbalK(String job, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] lscale, int offsetlscale, float[] rscale, int offsetrscale, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void sggesK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW sdim, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vsl, int _vsl_offset, int ldvsl, float[] vsr, int _vsr_offset, int ldvsr, float[] work, int _work_offset, int lwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + protected native void sggesK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW sdim, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] vsl, int offsetvsl, int ldvsl, float[] vsr, int offsetvsr, int ldvsr, float[] work, int offsetwork, int lwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info); - protected native void sggesxK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, String sense, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW sdim, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vsl, int _vsl_offset, int ldvsl, float[] vsr, int _vsr_offset, int ldvsr, float[] rconde, int _rconde_offset, float[] rcondv, int _rcondv_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + protected native void sggesxK(String jobvsl, String jobvsr, String sort, java.lang.Object selctg, String sense, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW sdim, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] vsl, int offsetvsl, int ldvsl, float[] vsr, int offsetvsr, int ldvsr, float[] rconde, int offsetrconde, float[] rcondv, int offsetrcondv, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info); - protected native void sggevK(String jobvl, String jobvr, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sggevK(String jobvl, String jobvr, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sggevxK(String balanc, String jobvl, String jobvr, String sense, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] lscale, int _lscale_offset, float[] rscale, int _rscale_offset, org.netlib.util.floatW abnrm, org.netlib.util.floatW bbnrm, float[] rconde, int _rconde_offset, float[] rcondv, int _rcondv_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, boolean[] bwork, int _bwork_offset, org.netlib.util.intW info); + protected native void sggevxK(String balanc, String jobvl, String jobvr, String sense, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, org.netlib.util.intW ilo, org.netlib.util.intW ihi, float[] lscale, int offsetlscale, float[] rscale, int offsetrscale, org.netlib.util.floatW abnrm, org.netlib.util.floatW bbnrm, float[] rconde, int offsetrconde, float[] rcondv, int offsetrcondv, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, boolean[] bwork, int offsetbwork, org.netlib.util.intW info); - protected native void sggglmK(int n, int m, int p, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] d, int _d_offset, float[] x, int _x_offset, float[] y, int _y_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sggglmK(int n, int m, int p, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] d, int offsetd, float[] x, int offsetx, float[] y, int offsety, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sgghrdK(String compq, String compz, int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, org.netlib.util.intW info); + protected native void sgghrdK(String compq, String compz, int n, int ilo, int ihi, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] q, int offsetq, int ldq, float[] z, int offsetz, int ldz, org.netlib.util.intW info); - protected native void sgglseK(int m, int n, int p, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] c, int _c_offset, float[] d, int _d_offset, float[] x, int _x_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sgglseK(int m, int n, int p, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] c, int offsetc, float[] d, int offsetd, float[] x, int offsetx, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sggqrfK(int n, int m, int p, float[] a, int _a_offset, int lda, float[] taua, int _taua_offset, float[] b, int _b_offset, int ldb, float[] taub, int _taub_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sggqrfK(int n, int m, int p, float[] a, int offseta, int lda, float[] taua, int offsettaua, float[] b, int offsetb, int ldb, float[] taub, int offsettaub, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sggrqfK(int m, int p, int n, float[] a, int _a_offset, int lda, float[] taua, int _taua_offset, float[] b, int _b_offset, int ldb, float[] taub, int _taub_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sggrqfK(int m, int p, int n, float[] a, int offseta, int lda, float[] taua, int offsettaua, float[] b, int offsetb, int ldb, float[] taub, int offsettaub, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sggsvdK(String jobu, String jobv, String jobq, int m, int n, int p, org.netlib.util.intW k, org.netlib.util.intW l, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alpha, int _alpha_offset, float[] beta, int _beta_offset, float[] u, int _u_offset, int ldu, float[] v, int _v_offset, int ldv, float[] q, int _q_offset, int ldq, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void sggsvdK(String jobu, String jobv, String jobq, int m, int n, int p, org.netlib.util.intW k, org.netlib.util.intW l, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alpha, int offsetalpha, float[] beta, int offsetbeta, float[] u, int offsetu, int ldu, float[] v, int offsetv, int ldv, float[] q, int offsetq, int ldq, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void sggsvpK(String jobu, String jobv, String jobq, int m, int p, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float tola, float tolb, org.netlib.util.intW k, org.netlib.util.intW l, float[] u, int _u_offset, int ldu, float[] v, int _v_offset, int ldv, float[] q, int _q_offset, int ldq, int[] iwork, int _iwork_offset, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void sggsvpK(String jobu, String jobv, String jobq, int m, int p, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float tola, float tolb, org.netlib.util.intW k, org.netlib.util.intW l, float[] u, int offsetu, int ldu, float[] v, int offsetv, int ldv, float[] q, int offsetq, int ldq, int[] iwork, int offsetiwork, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void sgtconK(String norm, int n, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void sgtconK(String norm, int n, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] du2, int offsetdu2, int[] ipiv, int offsetipiv, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void sgtrfsK(String trans, int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] dlf, int _dlf_offset, float[] df, int _df_offset, float[] duf, int _duf_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void sgtrfsK(String trans, int n, int nrhs, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] dlf, int offsetdlf, float[] df, int offsetdf, float[] duf, int offsetduf, float[] du2, int offsetdu2, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void sgtsvK(int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void sgtsvK(int n, int nrhs, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void sgtsvxK(String fact, String trans, int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] dlf, int _dlf_offset, float[] df, int _df_offset, float[] duf, int _duf_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void sgtsvxK(String fact, String trans, int n, int nrhs, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] dlf, int offsetdlf, float[] df, int offsetdf, float[] duf, int offsetduf, float[] du2, int offsetdu2, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void sgttrfK(int n, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + protected native void sgttrfK(int n, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] du2, int offsetdu2, int[] ipiv, int offsetipiv, org.netlib.util.intW info); - protected native void sgttrsK(String trans, int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void sgttrsK(String trans, int n, int nrhs, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] du2, int offsetdu2, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void sgtts2K(int itrans, int n, int nrhs, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] du2, int _du2_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb); + protected native void sgtts2K(int itrans, int n, int nrhs, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] du2, int offsetdu2, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb); - protected native void shgeqzK(String job, String compq, String compz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] t, int _t_offset, int ldt, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void shgeqzK(String job, String compq, String compz, int n, int ilo, int ihi, float[] h, int offseth, int ldh, float[] t, int offsett, int ldt, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] q, int offsetq, int ldq, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void shseinK(String side, String eigsrc, String initv, boolean[] select, int _select_offset, int n, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, float[] work, int _work_offset, int[] ifaill, int _ifaill_offset, int[] ifailr, int _ifailr_offset, org.netlib.util.intW info); + protected native void shseinK(String side, String eigsrc, String initv, boolean[] select, int offsetselect, int n, float[] h, int offseth, int ldh, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, int mm, org.netlib.util.intW m, float[] work, int offsetwork, int[] ifaill, int offsetifaill, int[] ifailr, int offsetifailr, org.netlib.util.intW info); - protected native void shseqrK(String job, String compz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void shseqrK(String job, String compz, int n, int ilo, int ihi, float[] h, int offseth, int ldh, float[] wr, int offsetwr, float[] wi, int offsetwi, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); protected native boolean sisnanK(float sin); protected native void slabadK(org.netlib.util.floatW small, org.netlib.util.floatW large); - protected native void slabrdK(int m, int n, int nb, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tauq, int _tauq_offset, float[] taup, int _taup_offset, float[] x, int _x_offset, int ldx, float[] y, int _y_offset, int ldy); + protected native void slabrdK(int m, int n, int nb, float[] a, int offseta, int lda, float[] d, int offsetd, float[] e, int offsete, float[] tauq, int offsettauq, float[] taup, int offsettaup, float[] x, int offsetx, int ldx, float[] y, int offsety, int ldy); - protected native void slacn2K(int n, float[] v, int _v_offset, float[] x, int _x_offset, int[] isgn, int _isgn_offset, org.netlib.util.floatW est, org.netlib.util.intW kase, int[] isave, int _isave_offset); + protected native void slacn2K(int n, float[] v, int offsetv, float[] x, int offsetx, int[] isgn, int offsetisgn, org.netlib.util.floatW est, org.netlib.util.intW kase, int[] isave, int offsetisave); - protected native void slaconK(int n, float[] v, int _v_offset, float[] x, int _x_offset, int[] isgn, int _isgn_offset, org.netlib.util.floatW est, org.netlib.util.intW kase); + protected native void slaconK(int n, float[] v, int offsetv, float[] x, int offsetx, int[] isgn, int offsetisgn, org.netlib.util.floatW est, org.netlib.util.intW kase); - protected native void slacpyK(String uplo, int m, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb); + protected native void slacpyK(String uplo, int m, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb); protected native void sladivK(float a, float b, float c, float d, org.netlib.util.floatW p, org.netlib.util.floatW q); protected native void slae2K(float a, float b, float c, org.netlib.util.floatW rt1, org.netlib.util.floatW rt2); - protected native void slaebzK(int ijob, int nitmax, int n, int mmax, int minp, int nbmin, float abstol, float reltol, float pivmin, float[] d, int _d_offset, float[] e, int _e_offset, float[] e2, int _e2_offset, int[] nval, int _nval_offset, float[] ab, int _ab_offset, float[] c, int _c_offset, org.netlib.util.intW mout, int[] nab, int _nab_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void slaebzK(int ijob, int nitmax, int n, int mmax, int minp, int nbmin, float abstol, float reltol, float pivmin, float[] d, int offsetd, float[] e, int offsete, float[] e2, int offsete2, int[] nval, int offsetnval, float[] ab, int offsetab, float[] c, int offsetc, org.netlib.util.intW mout, int[] nab, int offsetnab, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void slaed0K(int icompq, int qsiz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] q, int _q_offset, int ldq, float[] qstore, int _qstore_offset, int ldqs, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void slaed0K(int icompq, int qsiz, int n, float[] d, int offsetd, float[] e, int offsete, float[] q, int offsetq, int ldq, float[] qstore, int offsetqstore, int ldqs, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void slaed1K(int n, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.floatW rho, int cutpnt, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void slaed1K(int n, float[] d, int offsetd, float[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.floatW rho, int cutpnt, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void slaed2K(org.netlib.util.intW k, int n, int n1, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.floatW rho, float[] z, int _z_offset, float[] dlamda, int _dlamda_offset, float[] w, int _w_offset, float[] q2, int _q2_offset, int[] indx, int _indx_offset, int[] indxc, int _indxc_offset, int[] indxp, int _indxp_offset, int[] coltyp, int _coltyp_offset, org.netlib.util.intW info); + protected native void slaed2K(org.netlib.util.intW k, int n, int n1, float[] d, int offsetd, float[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.floatW rho, float[] z, int offsetz, float[] dlamda, int offsetdlamda, float[] w, int offsetw, float[] q2, int offsetq2, int[] indx, int offsetindx, int[] indxc, int offsetindxc, int[] indxp, int offsetindxp, int[] coltyp, int offsetcoltyp, org.netlib.util.intW info); - protected native void slaed3K(int k, int n, int n1, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, float rho, float[] dlamda, int _dlamda_offset, float[] q2, int _q2_offset, int[] indx, int _indx_offset, int[] ctot, int _ctot_offset, float[] w, int _w_offset, float[] s, int _s_offset, org.netlib.util.intW info); + protected native void slaed3K(int k, int n, int n1, float[] d, int offsetd, float[] q, int offsetq, int ldq, float rho, float[] dlamda, int offsetdlamda, float[] q2, int offsetq2, int[] indx, int offsetindx, int[] ctot, int offsetctot, float[] w, int offsetw, float[] s, int offsets, org.netlib.util.intW info); - protected native void slaed4K(int n, int i, float[] d, int _d_offset, float[] z, int _z_offset, float[] delta, int _delta_offset, float rho, org.netlib.util.floatW dlam, org.netlib.util.intW info); + protected native void slaed4K(int n, int i, float[] d, int offsetd, float[] z, int offsetz, float[] delta, int offsetdelta, float rho, org.netlib.util.floatW dlam, org.netlib.util.intW info); - protected native void slaed5K(int i, float[] d, int _d_offset, float[] z, int _z_offset, float[] delta, int _delta_offset, float rho, org.netlib.util.floatW dlam); + protected native void slaed5K(int i, float[] d, int offsetd, float[] z, int offsetz, float[] delta, int offsetdelta, float rho, org.netlib.util.floatW dlam); - protected native void slaed6K(int kniter, boolean orgati, float rho, float[] d, int _d_offset, float[] z, int _z_offset, float finit, org.netlib.util.floatW tau, org.netlib.util.intW info); + protected native void slaed6K(int kniter, boolean orgati, float rho, float[] d, int offsetd, float[] z, int offsetz, float finit, org.netlib.util.floatW tau, org.netlib.util.intW info); - protected native void slaed7K(int icompq, int n, int qsiz, int tlvls, int curlvl, int curpbm, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.floatW rho, int cutpnt, float[] qstore, int _qstore_offset, int[] qptr, int _qptr_offset, int[] prmptr, int _prmptr_offset, int[] perm, int _perm_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, float[] givnum, int _givnum_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void slaed7K(int icompq, int n, int qsiz, int tlvls, int curlvl, int curpbm, float[] d, int offsetd, float[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.floatW rho, int cutpnt, float[] qstore, int offsetqstore, int[] qptr, int offsetqptr, int[] prmptr, int offsetprmptr, int[] perm, int offsetperm, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, float[] givnum, int offsetgivnum, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void slaed8K(int icompq, org.netlib.util.intW k, int n, int qsiz, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, int[] indxq, int _indxq_offset, org.netlib.util.floatW rho, int cutpnt, float[] z, int _z_offset, float[] dlamda, int _dlamda_offset, float[] q2, int _q2_offset, int ldq2, float[] w, int _w_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, float[] givnum, int _givnum_offset, int[] indxp, int _indxp_offset, int[] indx, int _indx_offset, org.netlib.util.intW info); + protected native void slaed8K(int icompq, org.netlib.util.intW k, int n, int qsiz, float[] d, int offsetd, float[] q, int offsetq, int ldq, int[] indxq, int offsetindxq, org.netlib.util.floatW rho, int cutpnt, float[] z, int offsetz, float[] dlamda, int offsetdlamda, float[] q2, int offsetq2, int ldq2, float[] w, int offsetw, int[] perm, int offsetperm, org.netlib.util.intW givptr, int[] givcol, int offsetgivcol, float[] givnum, int offsetgivnum, int[] indxp, int offsetindxp, int[] indx, int offsetindx, org.netlib.util.intW info); - protected native void slaed9K(int k, int kstart, int kstop, int n, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, float rho, float[] dlamda, int _dlamda_offset, float[] w, int _w_offset, float[] s, int _s_offset, int lds, org.netlib.util.intW info); + protected native void slaed9K(int k, int kstart, int kstop, int n, float[] d, int offsetd, float[] q, int offsetq, int ldq, float rho, float[] dlamda, int offsetdlamda, float[] w, int offsetw, float[] s, int offsets, int lds, org.netlib.util.intW info); - protected native void slaedaK(int n, int tlvls, int curlvl, int curpbm, int[] prmptr, int _prmptr_offset, int[] perm, int _perm_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, float[] givnum, int _givnum_offset, float[] q, int _q_offset, int[] qptr, int _qptr_offset, float[] z, int _z_offset, float[] ztemp, int _ztemp_offset, org.netlib.util.intW info); + protected native void slaedaK(int n, int tlvls, int curlvl, int curpbm, int[] prmptr, int offsetprmptr, int[] perm, int offsetperm, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, float[] givnum, int offsetgivnum, float[] q, int offsetq, int[] qptr, int offsetqptr, float[] z, int offsetz, float[] ztemp, int offsetztemp, org.netlib.util.intW info); - protected native void slaeinK(boolean rightv, boolean noinit, int n, float[] h, int _h_offset, int ldh, float wr, float wi, float[] vr, int _vr_offset, float[] vi, int _vi_offset, float[] b, int _b_offset, int ldb, float[] work, int _work_offset, float eps3, float smlnum, float bignum, org.netlib.util.intW info); + protected native void slaeinK(boolean rightv, boolean noinit, int n, float[] h, int offseth, int ldh, float wr, float wi, float[] vr, int offsetvr, float[] vi, int offsetvi, float[] b, int offsetb, int ldb, float[] work, int offsetwork, float eps3, float smlnum, float bignum, org.netlib.util.intW info); protected native void slaev2K(float a, float b, float c, org.netlib.util.floatW rt1, org.netlib.util.floatW rt2, org.netlib.util.floatW cs1, org.netlib.util.floatW sn1); - protected native void slaexcK(boolean wantq, int n, float[] t, int _t_offset, int ldt, float[] q, int _q_offset, int ldq, int j1, int n1, int n2, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void slaexcK(boolean wantq, int n, float[] t, int offsett, int ldt, float[] q, int offsetq, int ldq, int j1, int n1, int n2, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void slag2K(float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float safmin, org.netlib.util.floatW scale1, org.netlib.util.floatW scale2, org.netlib.util.floatW wr1, org.netlib.util.floatW wr2, org.netlib.util.floatW wi); + protected native void slag2K(float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float safmin, org.netlib.util.floatW scale1, org.netlib.util.floatW scale2, org.netlib.util.floatW wr1, org.netlib.util.floatW wr2, org.netlib.util.floatW wi); - protected native void slag2dK(int m, int n, float[] sa, int _sa_offset, int ldsa, double[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected native void slag2dK(int m, int n, float[] sa, int offsetsa, int ldsa, double[] a, int offseta, int lda, org.netlib.util.intW info); protected native void slags2K(boolean upper, float a1, float a2, float a3, float b1, float b2, float b3, org.netlib.util.floatW csu, org.netlib.util.floatW snu, org.netlib.util.floatW csv, org.netlib.util.floatW snv, org.netlib.util.floatW csq, org.netlib.util.floatW snq); - protected native void slagtfK(int n, float[] a, int _a_offset, float lambda, float[] b, int _b_offset, float[] c, int _c_offset, float tol, float[] d, int _d_offset, int[] in, int _in_offset, org.netlib.util.intW info); + protected native void slagtfK(int n, float[] a, int offseta, float lambda, float[] b, int offsetb, float[] c, int offsetc, float tol, float[] d, int offsetd, int[] in, int offsetin, org.netlib.util.intW info); - protected native void slagtmK(String trans, int n, int nrhs, float alpha, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset, float[] x, int _x_offset, int ldx, float beta, float[] b, int _b_offset, int ldb); + protected native void slagtmK(String trans, int n, int nrhs, float alpha, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu, float[] x, int offsetx, int ldx, float beta, float[] b, int offsetb, int ldb); - protected native void slagtsK(int job, int n, float[] a, int _a_offset, float[] b, int _b_offset, float[] c, int _c_offset, float[] d, int _d_offset, int[] in, int _in_offset, float[] y, int _y_offset, org.netlib.util.floatW tol, org.netlib.util.intW info); + protected native void slagtsK(int job, int n, float[] a, int offseta, float[] b, int offsetb, float[] c, int offsetc, float[] d, int offsetd, int[] in, int offsetin, float[] y, int offsety, org.netlib.util.floatW tol, org.netlib.util.intW info); - protected native void slagv2K(float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, org.netlib.util.floatW csl, org.netlib.util.floatW snl, org.netlib.util.floatW csr, org.netlib.util.floatW snr); + protected native void slagv2K(float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, org.netlib.util.floatW csl, org.netlib.util.floatW snl, org.netlib.util.floatW csr, org.netlib.util.floatW snr); - protected native void slahqrK(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, int iloz, int ihiz, float[] z, int _z_offset, int ldz, org.netlib.util.intW info); + protected native void slahqrK(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int offseth, int ldh, float[] wr, int offsetwr, float[] wi, int offsetwi, int iloz, int ihiz, float[] z, int offsetz, int ldz, org.netlib.util.intW info); - protected native void slahr2K(int n, int k, int nb, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] t, int _t_offset, int ldt, float[] y, int _y_offset, int ldy); + protected native void slahr2K(int n, int k, int nb, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] t, int offsett, int ldt, float[] y, int offsety, int ldy); - protected native void slahrdK(int n, int k, int nb, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] t, int _t_offset, int ldt, float[] y, int _y_offset, int ldy); + protected native void slahrdK(int n, int k, int nb, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] t, int offsett, int ldt, float[] y, int offsety, int ldy); - protected native void slaic1K(int job, int j, float[] x, int _x_offset, float sest, float[] w, int _w_offset, float gamma, org.netlib.util.floatW sestpr, org.netlib.util.floatW s, org.netlib.util.floatW c); + protected native void slaic1K(int job, int j, float[] x, int offsetx, float sest, float[] w, int offsetw, float gamma, org.netlib.util.floatW sestpr, org.netlib.util.floatW s, org.netlib.util.floatW c); protected native boolean slaisnanK(float sin1, float sin2); - protected native void slaln2K(boolean ltrans, int na, int nw, float smin, float ca, float[] a, int _a_offset, int lda, float d1, float d2, float[] b, int _b_offset, int ldb, float wr, float wi, float[] x, int _x_offset, int ldx, org.netlib.util.floatW scale, org.netlib.util.floatW xnorm, org.netlib.util.intW info); + protected native void slaln2K(boolean ltrans, int na, int nw, float smin, float ca, float[] a, int offseta, int lda, float d1, float d2, float[] b, int offsetb, int ldb, float wr, float wi, float[] x, int offsetx, int ldx, org.netlib.util.floatW scale, org.netlib.util.floatW xnorm, org.netlib.util.intW info); - protected native void slals0K(int icompq, int nl, int nr, int sqre, int nrhs, float[] b, int _b_offset, int ldb, float[] bx, int _bx_offset, int ldbx, int[] perm, int _perm_offset, int givptr, int[] givcol, int _givcol_offset, int ldgcol, float[] givnum, int _givnum_offset, int ldgnum, float[] poles, int _poles_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, float[] z, int _z_offset, int k, float c, float s, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void slals0K(int icompq, int nl, int nr, int sqre, int nrhs, float[] b, int offsetb, int ldb, float[] bx, int offsetbx, int ldbx, int[] perm, int offsetperm, int givptr, int[] givcol, int offsetgivcol, int ldgcol, float[] givnum, int offsetgivnum, int ldgnum, float[] poles, int offsetpoles, float[] difl, int offsetdifl, float[] difr, int offsetdifr, float[] z, int offsetz, int k, float c, float s, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void slalsaK(int icompq, int smlsiz, int n, int nrhs, float[] b, int _b_offset, int ldb, float[] bx, int _bx_offset, int ldbx, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int[] k, int _k_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, float[] z, int _z_offset, float[] poles, int _poles_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, int ldgcol, int[] perm, int _perm_offset, float[] givnum, int _givnum_offset, float[] c, int _c_offset, float[] s, int _s_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void slalsaK(int icompq, int smlsiz, int n, int nrhs, float[] b, int offsetb, int ldb, float[] bx, int offsetbx, int ldbx, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int[] k, int offsetk, float[] difl, int offsetdifl, float[] difr, int offsetdifr, float[] z, int offsetz, float[] poles, int offsetpoles, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, int ldgcol, int[] perm, int offsetperm, float[] givnum, int offsetgivnum, float[] c, int offsetc, float[] s, int offsets, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void slalsdK(String uplo, int smlsiz, int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] b, int _b_offset, int ldb, float rcond, org.netlib.util.intW rank, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void slalsdK(String uplo, int smlsiz, int n, int nrhs, float[] d, int offsetd, float[] e, int offsete, float[] b, int offsetb, int ldb, float rcond, org.netlib.util.intW rank, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void slamrgK(int n1, int n2, float[] a, int _a_offset, int strd1, int strd2, int[] index, int _index_offset); + protected native void slamrgK(int n1, int n2, float[] a, int offseta, int strd1, int strd2, int[] index, int offsetindex); - protected native int slanegK(int n, float[] d, int _d_offset, float[] lld, int _lld_offset, float sigma, float pivmin, int r); + protected native int slanegK(int n, float[] d, int offsetd, float[] lld, int offsetlld, float sigma, float pivmin, int r); - protected native float slangbK(String norm, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, float[] work, int _work_offset); + protected native float slangbK(String norm, int n, int kl, int ku, float[] ab, int offsetab, int ldab, float[] work, int offsetwork); - protected native float slangeK(String norm, int m, int n, float[] a, int _a_offset, int lda, float[] work, int _work_offset); + protected native float slangeK(String norm, int m, int n, float[] a, int offseta, int lda, float[] work, int offsetwork); - protected native float slangtK(String norm, int n, float[] dl, int _dl_offset, float[] d, int _d_offset, float[] du, int _du_offset); + protected native float slangtK(String norm, int n, float[] dl, int offsetdl, float[] d, int offsetd, float[] du, int offsetdu); - protected native float slanhsK(String norm, int n, float[] a, int _a_offset, int lda, float[] work, int _work_offset); + protected native float slanhsK(String norm, int n, float[] a, int offseta, int lda, float[] work, int offsetwork); - protected native float slansbK(String norm, String uplo, int n, int k, float[] ab, int _ab_offset, int ldab, float[] work, int _work_offset); + protected native float slansbK(String norm, String uplo, int n, int k, float[] ab, int offsetab, int ldab, float[] work, int offsetwork); - protected native float slanspK(String norm, String uplo, int n, float[] ap, int _ap_offset, float[] work, int _work_offset); + protected native float slanspK(String norm, String uplo, int n, float[] ap, int offsetap, float[] work, int offsetwork); - protected native float slanstK(String norm, int n, float[] d, int _d_offset, float[] e, int _e_offset); + protected native float slanstK(String norm, int n, float[] d, int offsetd, float[] e, int offsete); - protected native float slansyK(String norm, String uplo, int n, float[] a, int _a_offset, int lda, float[] work, int _work_offset); + protected native float slansyK(String norm, String uplo, int n, float[] a, int offseta, int lda, float[] work, int offsetwork); - protected native float slantbK(String norm, String uplo, String diag, int n, int k, float[] ab, int _ab_offset, int ldab, float[] work, int _work_offset); + protected native float slantbK(String norm, String uplo, String diag, int n, int k, float[] ab, int offsetab, int ldab, float[] work, int offsetwork); - protected native float slantpK(String norm, String uplo, String diag, int n, float[] ap, int _ap_offset, float[] work, int _work_offset); + protected native float slantpK(String norm, String uplo, String diag, int n, float[] ap, int offsetap, float[] work, int offsetwork); - protected native float slantrK(String norm, String uplo, String diag, int m, int n, float[] a, int _a_offset, int lda, float[] work, int _work_offset); + protected native float slantrK(String norm, String uplo, String diag, int m, int n, float[] a, int offseta, int lda, float[] work, int offsetwork); protected native void slanv2K(org.netlib.util.floatW a, org.netlib.util.floatW b, org.netlib.util.floatW c, org.netlib.util.floatW d, org.netlib.util.floatW rt1r, org.netlib.util.floatW rt1i, org.netlib.util.floatW rt2r, org.netlib.util.floatW rt2i, org.netlib.util.floatW cs, org.netlib.util.floatW sn); - protected native void slapllK(int n, float[] x, int _x_offset, int incx, float[] y, int _y_offset, int incy, org.netlib.util.floatW ssmin); + protected native void slapllK(int n, float[] x, int offsetx, int incx, float[] y, int offsety, int incy, org.netlib.util.floatW ssmin); - protected native void slapmtK(boolean forwrd, int m, int n, float[] x, int _x_offset, int ldx, int[] k, int _k_offset); + protected native void slapmtK(boolean forwrd, int m, int n, float[] x, int offsetx, int ldx, int[] k, int offsetk); protected native float slapy2K(float x, float y); protected native float slapy3K(float x, float y, float z); - protected native void slaqgbK(int m, int n, int kl, int ku, float[] ab, int _ab_offset, int ldab, float[] r, int _r_offset, float[] c, int _c_offset, float rowcnd, float colcnd, float amax, org.netlib.util.StringW equed); + protected native void slaqgbK(int m, int n, int kl, int ku, float[] ab, int offsetab, int ldab, float[] r, int offsetr, float[] c, int offsetc, float rowcnd, float colcnd, float amax, org.netlib.util.StringW equed); - protected native void slaqgeK(int m, int n, float[] a, int _a_offset, int lda, float[] r, int _r_offset, float[] c, int _c_offset, float rowcnd, float colcnd, float amax, org.netlib.util.StringW equed); + protected native void slaqgeK(int m, int n, float[] a, int offseta, int lda, float[] r, int offsetr, float[] c, int offsetc, float rowcnd, float colcnd, float amax, org.netlib.util.StringW equed); - protected native void slaqp2K(int m, int n, int offset, float[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, float[] tau, int _tau_offset, float[] vn1, int _vn1_offset, float[] vn2, int _vn2_offset, float[] work, int _work_offset); + protected native void slaqp2K(int m, int n, int offset, float[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, float[] tau, int offsettau, float[] vn1, int offsetvn1, float[] vn2, int offsetvn2, float[] work, int offsetwork); - protected native void slaqpsK(int m, int n, int offset, int nb, org.netlib.util.intW kb, float[] a, int _a_offset, int lda, int[] jpvt, int _jpvt_offset, float[] tau, int _tau_offset, float[] vn1, int _vn1_offset, float[] vn2, int _vn2_offset, float[] auxv, int _auxv_offset, float[] f, int _f_offset, int ldf); + protected native void slaqpsK(int m, int n, int offset, int nb, org.netlib.util.intW kb, float[] a, int offseta, int lda, int[] jpvt, int offsetjpvt, float[] tau, int offsettau, float[] vn1, int offsetvn1, float[] vn2, int offsetvn2, float[] auxv, int offsetauxv, float[] f, int offsetf, int ldf); - protected native void slaqr0K(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, int iloz, int ihiz, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void slaqr0K(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int offseth, int ldh, float[] wr, int offsetwr, float[] wi, int offsetwi, int iloz, int ihiz, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void slaqr1K(int n, float[] h, int _h_offset, int ldh, float sr1, float si1, float sr2, float si2, float[] v, int _v_offset); + protected native void slaqr1K(int n, float[] h, int offseth, int ldh, float sr1, float si1, float sr2, float si2, float[] v, int offsetv); - protected native void slaqr2K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, float[] h, int _h_offset, int ldh, int iloz, int ihiz, float[] z, int _z_offset, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, float[] sr, int _sr_offset, float[] si, int _si_offset, float[] v, int _v_offset, int ldv, int nh, float[] t, int _t_offset, int ldt, int nv, float[] wv, int _wv_offset, int ldwv, float[] work, int _work_offset, int lwork); + protected native void slaqr2K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, float[] h, int offseth, int ldh, int iloz, int ihiz, float[] z, int offsetz, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, float[] sr, int offsetsr, float[] si, int offsetsi, float[] v, int offsetv, int ldv, int nh, float[] t, int offsett, int ldt, int nv, float[] wv, int offsetwv, int ldwv, float[] work, int offsetwork, int lwork); - protected native void slaqr3K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, float[] h, int _h_offset, int ldh, int iloz, int ihiz, float[] z, int _z_offset, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, float[] sr, int _sr_offset, float[] si, int _si_offset, float[] v, int _v_offset, int ldv, int nh, float[] t, int _t_offset, int ldt, int nv, float[] wv, int _wv_offset, int ldwv, float[] work, int _work_offset, int lwork); + protected native void slaqr3K(boolean wantt, boolean wantz, int n, int ktop, int kbot, int nw, float[] h, int offseth, int ldh, int iloz, int ihiz, float[] z, int offsetz, int ldz, org.netlib.util.intW ns, org.netlib.util.intW nd, float[] sr, int offsetsr, float[] si, int offsetsi, float[] v, int offsetv, int ldv, int nh, float[] t, int offsett, int ldt, int nv, float[] wv, int offsetwv, int ldwv, float[] work, int offsetwork, int lwork); - protected native void slaqr4K(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int _h_offset, int ldh, float[] wr, int _wr_offset, float[] wi, int _wi_offset, int iloz, int ihiz, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void slaqr4K(boolean wantt, boolean wantz, int n, int ilo, int ihi, float[] h, int offseth, int ldh, float[] wr, int offsetwr, float[] wi, int offsetwi, int iloz, int ihiz, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void slaqr5K(boolean wantt, boolean wantz, int kacc22, int n, int ktop, int kbot, int nshfts, float[] sr, int _sr_offset, float[] si, int _si_offset, float[] h, int _h_offset, int ldh, int iloz, int ihiz, float[] z, int _z_offset, int ldz, float[] v, int _v_offset, int ldv, float[] u, int _u_offset, int ldu, int nv, float[] wv, int _wv_offset, int ldwv, int nh, float[] wh, int _wh_offset, int ldwh); + protected native void slaqr5K(boolean wantt, boolean wantz, int kacc22, int n, int ktop, int kbot, int nshfts, float[] sr, int offsetsr, float[] si, int offsetsi, float[] h, int offseth, int ldh, int iloz, int ihiz, float[] z, int offsetz, int ldz, float[] v, int offsetv, int ldv, float[] u, int offsetu, int ldu, int nv, float[] wv, int offsetwv, int ldwv, int nh, float[] wh, int offsetwh, int ldwh); - protected native void slaqsbK(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] s, int _s_offset, float scond, float amax, org.netlib.util.StringW equed); + protected native void slaqsbK(String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float[] s, int offsets, float scond, float amax, org.netlib.util.StringW equed); - protected native void slaqspK(String uplo, int n, float[] ap, int _ap_offset, float[] s, int _s_offset, float scond, float amax, org.netlib.util.StringW equed); + protected native void slaqspK(String uplo, int n, float[] ap, int offsetap, float[] s, int offsets, float scond, float amax, org.netlib.util.StringW equed); - protected native void slaqsyK(String uplo, int n, float[] a, int _a_offset, int lda, float[] s, int _s_offset, float scond, float amax, org.netlib.util.StringW equed); + protected native void slaqsyK(String uplo, int n, float[] a, int offseta, int lda, float[] s, int offsets, float scond, float amax, org.netlib.util.StringW equed); - protected native void slaqtrK(boolean ltran, boolean lreal, int n, float[] t, int _t_offset, int ldt, float[] b, int _b_offset, float w, org.netlib.util.floatW scale, float[] x, int _x_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void slaqtrK(boolean ltran, boolean lreal, int n, float[] t, int offsett, int ldt, float[] b, int offsetb, float w, org.netlib.util.floatW scale, float[] x, int offsetx, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void slar1vK(int n, int b1, int bn, float lambda, float[] d, int _d_offset, float[] l, int _l_offset, float[] ld, int _ld_offset, float[] lld, int _lld_offset, float pivmin, float gaptol, float[] z, int _z_offset, boolean wantnc, org.netlib.util.intW negcnt, org.netlib.util.floatW ztz, org.netlib.util.floatW mingma, org.netlib.util.intW r, int[] isuppz, int _isuppz_offset, org.netlib.util.floatW nrminv, org.netlib.util.floatW resid, org.netlib.util.floatW rqcorr, float[] work, int _work_offset); + protected native void slar1vK(int n, int b1, int bn, float lambda, float[] d, int offsetd, float[] l, int offsetl, float[] ld, int offsetld, float[] lld, int offsetlld, float pivmin, float gaptol, float[] z, int offsetz, boolean wantnc, org.netlib.util.intW negcnt, org.netlib.util.floatW ztz, org.netlib.util.floatW mingma, org.netlib.util.intW r, int[] isuppz, int offsetisuppz, org.netlib.util.floatW nrminv, org.netlib.util.floatW resid, org.netlib.util.floatW rqcorr, float[] work, int offsetwork); - protected native void slar2vK(int n, float[] x, int _x_offset, float[] y, int _y_offset, float[] z, int _z_offset, int incx, float[] c, int _c_offset, float[] s, int _s_offset, int incc); + protected native void slar2vK(int n, float[] x, int offsetx, float[] y, int offsety, float[] z, int offsetz, int incx, float[] c, int offsetc, float[] s, int offsets, int incc); - protected native void slarfK(String side, int m, int n, float[] v, int _v_offset, int incv, float tau, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset); + protected native void slarfK(String side, int m, int n, float[] v, int offsetv, int incv, float tau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork); - protected native void slarfbK(String side, String trans, String direct, String storev, int m, int n, int k, float[] v, int _v_offset, int ldv, float[] t, int _t_offset, int ldt, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int ldwork); + protected native void slarfbK(String side, String trans, String direct, String storev, int m, int n, int k, float[] v, int offsetv, int ldv, float[] t, int offsett, int ldt, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int ldwork); - protected native void slarfgK(int n, org.netlib.util.floatW alpha, float[] x, int _x_offset, int incx, org.netlib.util.floatW tau); + protected native void slarfgK(int n, org.netlib.util.floatW alpha, float[] x, int offsetx, int incx, org.netlib.util.floatW tau); - protected native void slarftK(String direct, String storev, int n, int k, float[] v, int _v_offset, int ldv, float[] tau, int _tau_offset, float[] t, int _t_offset, int ldt); + protected native void slarftK(String direct, String storev, int n, int k, float[] v, int offsetv, int ldv, float[] tau, int offsettau, float[] t, int offsett, int ldt); - protected native void slarfxK(String side, int m, int n, float[] v, int _v_offset, float tau, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset); + protected native void slarfxK(String side, int m, int n, float[] v, int offsetv, float tau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork); - protected native void slargvK(int n, float[] x, int _x_offset, int incx, float[] y, int _y_offset, int incy, float[] c, int _c_offset, int incc); + protected native void slargvK(int n, float[] x, int offsetx, int incx, float[] y, int offsety, int incy, float[] c, int offsetc, int incc); - protected native void slarnvK(int idist, int[] iseed, int _iseed_offset, int n, float[] x, int _x_offset); + protected native void slarnvK(int idist, int[] iseed, int offsetiseed, int n, float[] x, int offsetx); - protected native void slarraK(int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] e2, int _e2_offset, float spltol, float tnrm, org.netlib.util.intW nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW info); + protected native void slarraK(int n, float[] d, int offsetd, float[] e, int offsete, float[] e2, int offsete2, float spltol, float tnrm, org.netlib.util.intW nsplit, int[] isplit, int offsetisplit, org.netlib.util.intW info); - protected native void slarrbK(int n, float[] d, int _d_offset, float[] lld, int _lld_offset, int ifirst, int ilast, float rtol1, float rtol2, int offset, float[] w, int _w_offset, float[] wgap, int _wgap_offset, float[] werr, int _werr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, float pivmin, float spdiam, int twist, org.netlib.util.intW info); + protected native void slarrbK(int n, float[] d, int offsetd, float[] lld, int offsetlld, int ifirst, int ilast, float rtol1, float rtol2, int offset, float[] w, int offsetw, float[] wgap, int offsetwgap, float[] werr, int offsetwerr, float[] work, int offsetwork, int[] iwork, int offsetiwork, float pivmin, float spdiam, int twist, org.netlib.util.intW info); - protected native void slarrcK(String jobt, int n, float vl, float vu, float[] d, int _d_offset, float[] e, int _e_offset, float pivmin, org.netlib.util.intW eigcnt, org.netlib.util.intW lcnt, org.netlib.util.intW rcnt, org.netlib.util.intW info); + protected native void slarrcK(String jobt, int n, float vl, float vu, float[] d, int offsetd, float[] e, int offsete, float pivmin, org.netlib.util.intW eigcnt, org.netlib.util.intW lcnt, org.netlib.util.intW rcnt, org.netlib.util.intW info); - protected native void slarrdK(String range, String order, int n, float vl, float vu, int il, int iu, float[] gers, int _gers_offset, float reltol, float[] d, int _d_offset, float[] e, int _e_offset, float[] e2, int _e2_offset, float pivmin, int nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW m, float[] w, int _w_offset, float[] werr, int _werr_offset, org.netlib.util.floatW wl, org.netlib.util.floatW wu, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void slarrdK(String range, String order, int n, float vl, float vu, int il, int iu, float[] gers, int offsetgers, float reltol, float[] d, int offsetd, float[] e, int offsete, float[] e2, int offsete2, float pivmin, int nsplit, int[] isplit, int offsetisplit, org.netlib.util.intW m, float[] w, int offsetw, float[] werr, int offsetwerr, org.netlib.util.floatW wl, org.netlib.util.floatW wu, int[] iblock, int offsetiblock, int[] indexw, int offsetindexw, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void slarreK(String range, int n, org.netlib.util.floatW vl, org.netlib.util.floatW vu, int il, int iu, float[] d, int _d_offset, float[] e, int _e_offset, float[] e2, int _e2_offset, float rtol1, float rtol2, float spltol, org.netlib.util.intW nsplit, int[] isplit, int _isplit_offset, org.netlib.util.intW m, float[] w, int _w_offset, float[] werr, int _werr_offset, float[] wgap, int _wgap_offset, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, float[] gers, int _gers_offset, org.netlib.util.floatW pivmin, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void slarreK(String range, int n, org.netlib.util.floatW vl, org.netlib.util.floatW vu, int il, int iu, float[] d, int offsetd, float[] e, int offsete, float[] e2, int offsete2, float rtol1, float rtol2, float spltol, org.netlib.util.intW nsplit, int[] isplit, int offsetisplit, org.netlib.util.intW m, float[] w, int offsetw, float[] werr, int offsetwerr, float[] wgap, int offsetwgap, int[] iblock, int offsetiblock, int[] indexw, int offsetindexw, float[] gers, int offsetgers, org.netlib.util.floatW pivmin, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void slarrfK(int n, float[] d, int _d_offset, float[] l, int _l_offset, float[] ld, int _ld_offset, int clstrt, int clend, float[] w, int _w_offset, float[] wgap, int _wgap_offset, float[] werr, int _werr_offset, float spdiam, float clgapl, float clgapr, float pivmin, org.netlib.util.floatW sigma, float[] dplus, int _dplus_offset, float[] lplus, int _lplus_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void slarrfK(int n, float[] d, int offsetd, float[] l, int offsetl, float[] ld, int offsetld, int clstrt, int clend, float[] w, int offsetw, float[] wgap, int offsetwgap, float[] werr, int offsetwerr, float spdiam, float clgapl, float clgapr, float pivmin, org.netlib.util.floatW sigma, float[] dplus, int offsetdplus, float[] lplus, int offsetlplus, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void slarrjK(int n, float[] d, int _d_offset, float[] e2, int _e2_offset, int ifirst, int ilast, float rtol, int offset, float[] w, int _w_offset, float[] werr, int _werr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, float pivmin, float spdiam, org.netlib.util.intW info); + protected native void slarrjK(int n, float[] d, int offsetd, float[] e2, int offsete2, int ifirst, int ilast, float rtol, int offset, float[] w, int offsetw, float[] werr, int offsetwerr, float[] work, int offsetwork, int[] iwork, int offsetiwork, float pivmin, float spdiam, org.netlib.util.intW info); - protected native void slarrkK(int n, int iw, float gl, float gu, float[] d, int _d_offset, float[] e2, int _e2_offset, float pivmin, float reltol, org.netlib.util.floatW w, org.netlib.util.floatW werr, org.netlib.util.intW info); + protected native void slarrkK(int n, int iw, float gl, float gu, float[] d, int offsetd, float[] e2, int offsete2, float pivmin, float reltol, org.netlib.util.floatW w, org.netlib.util.floatW werr, org.netlib.util.intW info); - protected native void slarrrK(int n, float[] d, int _d_offset, float[] e, int _e_offset, org.netlib.util.intW info); + protected native void slarrrK(int n, float[] d, int offsetd, float[] e, int offsete, org.netlib.util.intW info); - protected native void slarrvK(int n, float vl, float vu, float[] d, int _d_offset, float[] l, int _l_offset, float pivmin, int[] isplit, int _isplit_offset, int m, int dol, int dou, float minrgp, org.netlib.util.floatW rtol1, org.netlib.util.floatW rtol2, float[] w, int _w_offset, float[] werr, int _werr_offset, float[] wgap, int _wgap_offset, int[] iblock, int _iblock_offset, int[] indexw, int _indexw_offset, float[] gers, int _gers_offset, float[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void slarrvK(int n, float vl, float vu, float[] d, int offsetd, float[] l, int offsetl, float pivmin, int[] isplit, int offsetisplit, int m, int dol, int dou, float minrgp, org.netlib.util.floatW rtol1, org.netlib.util.floatW rtol2, float[] w, int offsetw, float[] werr, int offsetwerr, float[] wgap, int offsetwgap, int[] iblock, int offsetiblock, int[] indexw, int offsetindexw, float[] gers, int offsetgers, float[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); protected native void slartgK(float f, float g, org.netlib.util.floatW cs, org.netlib.util.floatW sn, org.netlib.util.floatW r); - protected native void slartvK(int n, float[] x, int _x_offset, int incx, float[] y, int _y_offset, int incy, float[] c, int _c_offset, float[] s, int _s_offset, int incc); + protected native void slartvK(int n, float[] x, int offsetx, int incx, float[] y, int offsety, int incy, float[] c, int offsetc, float[] s, int offsets, int incc); - protected native void slaruvK(int[] iseed, int _iseed_offset, int n, float[] x, int _x_offset); + protected native void slaruvK(int[] iseed, int offsetiseed, int n, float[] x, int offsetx); - protected native void slarzK(String side, int m, int n, int l, float[] v, int _v_offset, int incv, float tau, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset); + protected native void slarzK(String side, int m, int n, int l, float[] v, int offsetv, int incv, float tau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork); - protected native void slarzbK(String side, String trans, String direct, String storev, int m, int n, int k, int l, float[] v, int _v_offset, int ldv, float[] t, int _t_offset, int ldt, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int ldwork); + protected native void slarzbK(String side, String trans, String direct, String storev, int m, int n, int k, int l, float[] v, int offsetv, int ldv, float[] t, int offsett, int ldt, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int ldwork); - protected native void slarztK(String direct, String storev, int n, int k, float[] v, int _v_offset, int ldv, float[] tau, int _tau_offset, float[] t, int _t_offset, int ldt); + protected native void slarztK(String direct, String storev, int n, int k, float[] v, int offsetv, int ldv, float[] tau, int offsettau, float[] t, int offsett, int ldt); protected native void slas2K(float f, float g, float h, org.netlib.util.floatW ssmin, org.netlib.util.floatW ssmax); - protected native void slasclK(String type, int kl, int ku, float cfrom, float cto, int m, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected native void slasclK(String type, int kl, int ku, float cfrom, float cto, int m, int n, float[] a, int offseta, int lda, org.netlib.util.intW info); - protected native void slasd0K(int n, int sqre, float[] d, int _d_offset, float[] e, int _e_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, int smlsiz, int[] iwork, int _iwork_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void slasd0K(int n, int sqre, float[] d, int offsetd, float[] e, int offsete, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int ldvt, int smlsiz, int[] iwork, int offsetiwork, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void slasd1K(int nl, int nr, int sqre, float[] d, int _d_offset, org.netlib.util.floatW alpha, org.netlib.util.floatW beta, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, int[] idxq, int _idxq_offset, int[] iwork, int _iwork_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void slasd1K(int nl, int nr, int sqre, float[] d, int offsetd, org.netlib.util.floatW alpha, org.netlib.util.floatW beta, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int ldvt, int[] idxq, int offsetidxq, int[] iwork, int offsetiwork, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void slasd2K(int nl, int nr, int sqre, org.netlib.util.intW k, float[] d, int _d_offset, float[] z, int _z_offset, float alpha, float beta, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int ldvt, float[] dsigma, int _dsigma_offset, float[] u2, int _u2_offset, int ldu2, float[] vt2, int _vt2_offset, int ldvt2, int[] idxp, int _idxp_offset, int[] idx, int _idx_offset, int[] idxc, int _idxc_offset, int[] idxq, int _idxq_offset, int[] coltyp, int _coltyp_offset, org.netlib.util.intW info); + protected native void slasd2K(int nl, int nr, int sqre, org.netlib.util.intW k, float[] d, int offsetd, float[] z, int offsetz, float alpha, float beta, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int ldvt, float[] dsigma, int offsetdsigma, float[] u2, int offsetu2, int ldu2, float[] vt2, int offsetvt2, int ldvt2, int[] idxp, int offsetidxp, int[] idx, int offsetidx, int[] idxc, int offsetidxc, int[] idxq, int offsetidxq, int[] coltyp, int offsetcoltyp, org.netlib.util.intW info); - protected native void slasd3K(int nl, int nr, int sqre, int k, float[] d, int _d_offset, float[] q, int _q_offset, int ldq, float[] dsigma, int _dsigma_offset, float[] u, int _u_offset, int ldu, float[] u2, int _u2_offset, int ldu2, float[] vt, int _vt_offset, int ldvt, float[] vt2, int _vt2_offset, int ldvt2, int[] idxc, int _idxc_offset, int[] ctot, int _ctot_offset, float[] z, int _z_offset, org.netlib.util.intW info); + protected native void slasd3K(int nl, int nr, int sqre, int k, float[] d, int offsetd, float[] q, int offsetq, int ldq, float[] dsigma, int offsetdsigma, float[] u, int offsetu, int ldu, float[] u2, int offsetu2, int ldu2, float[] vt, int offsetvt, int ldvt, float[] vt2, int offsetvt2, int ldvt2, int[] idxc, int offsetidxc, int[] ctot, int offsetctot, float[] z, int offsetz, org.netlib.util.intW info); - protected native void slasd4K(int n, int i, float[] d, int _d_offset, float[] z, int _z_offset, float[] delta, int _delta_offset, float rho, org.netlib.util.floatW sigma, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void slasd4K(int n, int i, float[] d, int offsetd, float[] z, int offsetz, float[] delta, int offsetdelta, float rho, org.netlib.util.floatW sigma, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void slasd5K(int i, float[] d, int _d_offset, float[] z, int _z_offset, float[] delta, int _delta_offset, float rho, org.netlib.util.floatW dsigma, float[] work, int _work_offset); + protected native void slasd5K(int i, float[] d, int offsetd, float[] z, int offsetz, float[] delta, int offsetdelta, float rho, org.netlib.util.floatW dsigma, float[] work, int offsetwork); - protected native void slasd6K(int icompq, int nl, int nr, int sqre, float[] d, int _d_offset, float[] vf, int _vf_offset, float[] vl, int _vl_offset, org.netlib.util.floatW alpha, org.netlib.util.floatW beta, int[] idxq, int _idxq_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, int ldgcol, float[] givnum, int _givnum_offset, int ldgnum, float[] poles, int _poles_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, float[] z, int _z_offset, org.netlib.util.intW k, org.netlib.util.floatW c, org.netlib.util.floatW s, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void slasd6K(int icompq, int nl, int nr, int sqre, float[] d, int offsetd, float[] vf, int offsetvf, float[] vl, int offsetvl, org.netlib.util.floatW alpha, org.netlib.util.floatW beta, int[] idxq, int offsetidxq, int[] perm, int offsetperm, org.netlib.util.intW givptr, int[] givcol, int offsetgivcol, int ldgcol, float[] givnum, int offsetgivnum, int ldgnum, float[] poles, int offsetpoles, float[] difl, int offsetdifl, float[] difr, int offsetdifr, float[] z, int offsetz, org.netlib.util.intW k, org.netlib.util.floatW c, org.netlib.util.floatW s, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void slasd7K(int icompq, int nl, int nr, int sqre, org.netlib.util.intW k, float[] d, int _d_offset, float[] z, int _z_offset, float[] zw, int _zw_offset, float[] vf, int _vf_offset, float[] vfw, int _vfw_offset, float[] vl, int _vl_offset, float[] vlw, int _vlw_offset, float alpha, float beta, float[] dsigma, int _dsigma_offset, int[] idx, int _idx_offset, int[] idxp, int _idxp_offset, int[] idxq, int _idxq_offset, int[] perm, int _perm_offset, org.netlib.util.intW givptr, int[] givcol, int _givcol_offset, int ldgcol, float[] givnum, int _givnum_offset, int ldgnum, org.netlib.util.floatW c, org.netlib.util.floatW s, org.netlib.util.intW info); + protected native void slasd7K(int icompq, int nl, int nr, int sqre, org.netlib.util.intW k, float[] d, int offsetd, float[] z, int offsetz, float[] zw, int offsetzw, float[] vf, int offsetvf, float[] vfw, int offsetvfw, float[] vl, int offsetvl, float[] vlw, int offsetvlw, float alpha, float beta, float[] dsigma, int offsetdsigma, int[] idx, int offsetidx, int[] idxp, int offsetidxp, int[] idxq, int offsetidxq, int[] perm, int offsetperm, org.netlib.util.intW givptr, int[] givcol, int offsetgivcol, int ldgcol, float[] givnum, int offsetgivnum, int ldgnum, org.netlib.util.floatW c, org.netlib.util.floatW s, org.netlib.util.intW info); - protected native void slasd8K(int icompq, int k, float[] d, int _d_offset, float[] z, int _z_offset, float[] vf, int _vf_offset, float[] vl, int _vl_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, int lddifr, float[] dsigma, int _dsigma_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void slasd8K(int icompq, int k, float[] d, int offsetd, float[] z, int offsetz, float[] vf, int offsetvf, float[] vl, int offsetvl, float[] difl, int offsetdifl, float[] difr, int offsetdifr, int lddifr, float[] dsigma, int offsetdsigma, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void slasdaK(int icompq, int smlsiz, int n, int sqre, float[] d, int _d_offset, float[] e, int _e_offset, float[] u, int _u_offset, int ldu, float[] vt, int _vt_offset, int[] k, int _k_offset, float[] difl, int _difl_offset, float[] difr, int _difr_offset, float[] z, int _z_offset, float[] poles, int _poles_offset, int[] givptr, int _givptr_offset, int[] givcol, int _givcol_offset, int ldgcol, int[] perm, int _perm_offset, float[] givnum, int _givnum_offset, float[] c, int _c_offset, float[] s, int _s_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void slasdaK(int icompq, int smlsiz, int n, int sqre, float[] d, int offsetd, float[] e, int offsete, float[] u, int offsetu, int ldu, float[] vt, int offsetvt, int[] k, int offsetk, float[] difl, int offsetdifl, float[] difr, int offsetdifr, float[] z, int offsetz, float[] poles, int offsetpoles, int[] givptr, int offsetgivptr, int[] givcol, int offsetgivcol, int ldgcol, int[] perm, int offsetperm, float[] givnum, int offsetgivnum, float[] c, int offsetc, float[] s, int offsets, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void slasdqK(String uplo, int sqre, int n, int ncvt, int nru, int ncc, float[] d, int _d_offset, float[] e, int _e_offset, float[] vt, int _vt_offset, int ldvt, float[] u, int _u_offset, int ldu, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void slasdqK(String uplo, int sqre, int n, int ncvt, int nru, int ncc, float[] d, int offsetd, float[] e, int offsete, float[] vt, int offsetvt, int ldvt, float[] u, int offsetu, int ldu, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void slasdtK(int n, org.netlib.util.intW lvl, org.netlib.util.intW nd, int[] inode, int _inode_offset, int[] ndiml, int _ndiml_offset, int[] ndimr, int _ndimr_offset, int msub); + protected native void slasdtK(int n, org.netlib.util.intW lvl, org.netlib.util.intW nd, int[] inode, int offsetinode, int[] ndiml, int offsetndiml, int[] ndimr, int offsetndimr, int msub); - protected native void slasetK(String uplo, int m, int n, float alpha, float beta, float[] a, int _a_offset, int lda); + protected native void slasetK(String uplo, int m, int n, float alpha, float beta, float[] a, int offseta, int lda); - protected native void slasq1K(int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void slasq1K(int n, float[] d, int offsetd, float[] e, int offsete, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void slasq2K(int n, float[] z, int _z_offset, org.netlib.util.intW info); + protected native void slasq2K(int n, float[] z, int offsetz, org.netlib.util.intW info); - protected native void slasq3K(int i0, org.netlib.util.intW n0, float[] z, int _z_offset, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW sigma, org.netlib.util.floatW desig, org.netlib.util.floatW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee); + protected native void slasq3K(int i0, org.netlib.util.intW n0, float[] z, int offsetz, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW sigma, org.netlib.util.floatW desig, org.netlib.util.floatW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee); - protected native void slasq4K(int i0, int n0, float[] z, int _z_offset, int pp, int n0in, float dmin, float dmin1, float dmin2, float dn, float dn1, float dn2, org.netlib.util.floatW tau, org.netlib.util.intW ttype); + protected native void slasq4K(int i0, int n0, float[] z, int offsetz, int pp, int n0in, float dmin, float dmin1, float dmin2, float dn, float dn1, float dn2, org.netlib.util.floatW tau, org.netlib.util.intW ttype); - protected native void slasq5K(int i0, int n0, float[] z, int _z_offset, int pp, float tau, org.netlib.util.floatW dmin, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dnm1, org.netlib.util.floatW dnm2, boolean ieee); + protected native void slasq5K(int i0, int n0, float[] z, int offsetz, int pp, float tau, org.netlib.util.floatW dmin, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dnm1, org.netlib.util.floatW dnm2, boolean ieee); - protected native void slasq6K(int i0, int n0, float[] z, int _z_offset, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dnm1, org.netlib.util.floatW dnm2); + protected native void slasq6K(int i0, int n0, float[] z, int offsetz, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dnm1, org.netlib.util.floatW dnm2); - protected native void slasrK(String side, String pivot, String direct, int m, int n, float[] c, int _c_offset, float[] s, int _s_offset, float[] a, int _a_offset, int lda); + protected native void slasrK(String side, String pivot, String direct, int m, int n, float[] c, int offsetc, float[] s, int offsets, float[] a, int offseta, int lda); - protected native void slasrtK(String id, int n, float[] d, int _d_offset, org.netlib.util.intW info); + protected native void slasrtK(String id, int n, float[] d, int offsetd, org.netlib.util.intW info); - protected native void slassqK(int n, float[] x, int _x_offset, int incx, org.netlib.util.floatW scale, org.netlib.util.floatW sumsq); + protected native void slassqK(int n, float[] x, int offsetx, int incx, org.netlib.util.floatW scale, org.netlib.util.floatW sumsq); protected native void slasv2K(float f, float g, float h, org.netlib.util.floatW ssmin, org.netlib.util.floatW ssmax, org.netlib.util.floatW snr, org.netlib.util.floatW csr, org.netlib.util.floatW snl, org.netlib.util.floatW csl); - protected native void slaswpK(int n, float[] a, int _a_offset, int lda, int k1, int k2, int[] ipiv, int _ipiv_offset, int incx); + protected native void slaswpK(int n, float[] a, int offseta, int lda, int k1, int k2, int[] ipiv, int offsetipiv, int incx); - protected native void slasy2K(boolean ltranl, boolean ltranr, int isgn, int n1, int n2, float[] tl, int _tl_offset, int ldtl, float[] tr, int _tr_offset, int ldtr, float[] b, int _b_offset, int ldb, org.netlib.util.floatW scale, float[] x, int _x_offset, int ldx, org.netlib.util.floatW xnorm, org.netlib.util.intW info); + protected native void slasy2K(boolean ltranl, boolean ltranr, int isgn, int n1, int n2, float[] tl, int offsettl, int ldtl, float[] tr, int offsettr, int ldtr, float[] b, int offsetb, int ldb, org.netlib.util.floatW scale, float[] x, int offsetx, int ldx, org.netlib.util.floatW xnorm, org.netlib.util.intW info); - protected native void slasyfK(String uplo, int n, int nb, org.netlib.util.intW kb, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] w, int _w_offset, int ldw, org.netlib.util.intW info); + protected native void slasyfK(String uplo, int n, int nb, org.netlib.util.intW kb, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] w, int offsetw, int ldw, org.netlib.util.intW info); - protected native void slatbsK(String uplo, String trans, String diag, String normin, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] x, int _x_offset, org.netlib.util.floatW scale, float[] cnorm, int _cnorm_offset, org.netlib.util.intW info); + protected native void slatbsK(String uplo, String trans, String diag, String normin, int n, int kd, float[] ab, int offsetab, int ldab, float[] x, int offsetx, org.netlib.util.floatW scale, float[] cnorm, int offsetcnorm, org.netlib.util.intW info); - protected native void slatdfK(int ijob, int n, float[] z, int _z_offset, int ldz, float[] rhs, int _rhs_offset, org.netlib.util.floatW rdsum, org.netlib.util.floatW rdscal, int[] ipiv, int _ipiv_offset, int[] jpiv, int _jpiv_offset); + protected native void slatdfK(int ijob, int n, float[] z, int offsetz, int ldz, float[] rhs, int offsetrhs, org.netlib.util.floatW rdsum, org.netlib.util.floatW rdscal, int[] ipiv, int offsetipiv, int[] jpiv, int offsetjpiv); - protected native void slatpsK(String uplo, String trans, String diag, String normin, int n, float[] ap, int _ap_offset, float[] x, int _x_offset, org.netlib.util.floatW scale, float[] cnorm, int _cnorm_offset, org.netlib.util.intW info); + protected native void slatpsK(String uplo, String trans, String diag, String normin, int n, float[] ap, int offsetap, float[] x, int offsetx, org.netlib.util.floatW scale, float[] cnorm, int offsetcnorm, org.netlib.util.intW info); - protected native void slatrdK(String uplo, int n, int nb, float[] a, int _a_offset, int lda, float[] e, int _e_offset, float[] tau, int _tau_offset, float[] w, int _w_offset, int ldw); + protected native void slatrdK(String uplo, int n, int nb, float[] a, int offseta, int lda, float[] e, int offsete, float[] tau, int offsettau, float[] w, int offsetw, int ldw); - protected native void slatrsK(String uplo, String trans, String diag, String normin, int n, float[] a, int _a_offset, int lda, float[] x, int _x_offset, org.netlib.util.floatW scale, float[] cnorm, int _cnorm_offset, org.netlib.util.intW info); + protected native void slatrsK(String uplo, String trans, String diag, String normin, int n, float[] a, int offseta, int lda, float[] x, int offsetx, org.netlib.util.floatW scale, float[] cnorm, int offsetcnorm, org.netlib.util.intW info); - protected native void slatrzK(int m, int n, int l, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset); + protected native void slatrzK(int m, int n, int l, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork); - protected native void slatzmK(String side, int m, int n, float[] v, int _v_offset, int incv, float tau, float[] c1, int _c1_offset, float[] c2, int _c2_offset, int Ldc, float[] work, int _work_offset); + protected native void slatzmK(String side, int m, int n, float[] v, int offsetv, int incv, float tau, float[] c1, int offsetc1, float[] c2, int offsetc2, int Ldc, float[] work, int offsetwork); - protected native void slauu2K(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected native void slauu2K(String uplo, int n, float[] a, int offseta, int lda, org.netlib.util.intW info); - protected native void slauumK(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected native void slauumK(String uplo, int n, float[] a, int offseta, int lda, org.netlib.util.intW info); - protected native void slazq3K(int i0, org.netlib.util.intW n0, float[] z, int _z_offset, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW sigma, org.netlib.util.floatW desig, org.netlib.util.floatW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee, org.netlib.util.intW ttype, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dn1, org.netlib.util.floatW dn2, org.netlib.util.floatW tau); + protected native void slazq3K(int i0, org.netlib.util.intW n0, float[] z, int offsetz, int pp, org.netlib.util.floatW dmin, org.netlib.util.floatW sigma, org.netlib.util.floatW desig, org.netlib.util.floatW qmax, org.netlib.util.intW nfail, org.netlib.util.intW iter, org.netlib.util.intW ndiv, boolean ieee, org.netlib.util.intW ttype, org.netlib.util.floatW dmin1, org.netlib.util.floatW dmin2, org.netlib.util.floatW dn, org.netlib.util.floatW dn1, org.netlib.util.floatW dn2, org.netlib.util.floatW tau); - protected native void slazq4K(int i0, int n0, float[] z, int _z_offset, int pp, int n0in, float dmin, float dmin1, float dmin2, float dn, float dn1, float dn2, org.netlib.util.floatW tau, org.netlib.util.intW ttype, org.netlib.util.floatW g); + protected native void slazq4K(int i0, int n0, float[] z, int offsetz, int pp, int n0in, float dmin, float dmin1, float dmin2, float dn, float dn1, float dn2, org.netlib.util.floatW tau, org.netlib.util.intW ttype, org.netlib.util.floatW g); - protected native void sopgtrK(String uplo, int n, float[] ap, int _ap_offset, float[] tau, int _tau_offset, float[] q, int _q_offset, int ldq, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void sopgtrK(String uplo, int n, float[] ap, int offsetap, float[] tau, int offsettau, float[] q, int offsetq, int ldq, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void sopmtrK(String side, String uplo, String trans, int m, int n, float[] ap, int _ap_offset, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void sopmtrK(String side, String uplo, String trans, int m, int n, float[] ap, int offsetap, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void sorg2lK(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void sorg2lK(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void sorg2rK(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void sorg2rK(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void sorgbrK(String vect, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sorgbrK(String vect, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sorghrK(int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sorghrK(int n, int ilo, int ihi, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sorgl2K(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void sorgl2K(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void sorglqK(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sorglqK(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sorgqlK(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sorgqlK(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sorgqrK(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sorgqrK(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sorgr2K(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void sorgr2K(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void sorgrqK(int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sorgrqK(int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sorgtrK(String uplo, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sorgtrK(String uplo, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sorm2lK(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void sorm2lK(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void sorm2rK(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void sorm2rK(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void sormbrK(String vect, String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sormbrK(String vect, String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sormhrK(String side, String trans, int m, int n, int ilo, int ihi, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sormhrK(String side, String trans, int m, int n, int ilo, int ihi, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sorml2K(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void sorml2K(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void sormlqK(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sormlqK(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sormqlK(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sormqlK(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sormqrK(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sormqrK(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sormr2K(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void sormr2K(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void sormr3K(String side, String trans, int m, int n, int k, int l, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void sormr3K(String side, String trans, int m, int n, int k, int l, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void sormrqK(String side, String trans, int m, int n, int k, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sormrqK(String side, String trans, int m, int n, int k, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sormrzK(String side, String trans, int m, int n, int k, int l, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sormrzK(String side, String trans, int m, int n, int k, int l, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void sormtrK(String side, String uplo, String trans, int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] c, int _c_offset, int Ldc, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void sormtrK(String side, String uplo, String trans, int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] c, int offsetc, int Ldc, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void spbconK(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void spbconK(String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void spbequK(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] s, int _s_offset, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info); + protected native void spbequK(String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float[] s, int offsets, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info); - protected native void spbrfsK(String uplo, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] afb, int _afb_offset, int ldafb, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void spbrfsK(String uplo, int n, int kd, int nrhs, float[] ab, int offsetab, int ldab, float[] afb, int offsetafb, int ldafb, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void spbstfK(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, org.netlib.util.intW info); + protected native void spbstfK(String uplo, int n, int kd, float[] ab, int offsetab, int ldab, org.netlib.util.intW info); - protected native void spbsvK(String uplo, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void spbsvK(String uplo, int n, int kd, int nrhs, float[] ab, int offsetab, int ldab, float[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void spbsvxK(String fact, String uplo, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] afb, int _afb_offset, int ldafb, org.netlib.util.StringW equed, float[] s, int _s_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void spbsvxK(String fact, String uplo, int n, int kd, int nrhs, float[] ab, int offsetab, int ldab, float[] afb, int offsetafb, int ldafb, org.netlib.util.StringW equed, float[] s, int offsets, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void spbtf2K(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, org.netlib.util.intW info); + protected native void spbtf2K(String uplo, int n, int kd, float[] ab, int offsetab, int ldab, org.netlib.util.intW info); - protected native void spbtrfK(String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, org.netlib.util.intW info); + protected native void spbtrfK(String uplo, int n, int kd, float[] ab, int offsetab, int ldab, org.netlib.util.intW info); - protected native void spbtrsK(String uplo, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void spbtrsK(String uplo, int n, int kd, int nrhs, float[] ab, int offsetab, int ldab, float[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void spoconK(String uplo, int n, float[] a, int _a_offset, int lda, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void spoconK(String uplo, int n, float[] a, int offseta, int lda, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void spoequK(int n, float[] a, int _a_offset, int lda, float[] s, int _s_offset, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info); + protected native void spoequK(int n, float[] a, int offseta, int lda, float[] s, int offsets, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info); - protected native void sporfsK(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void sporfsK(String uplo, int n, int nrhs, float[] a, int offseta, int lda, float[] af, int offsetaf, int ldaf, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void sposvK(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void sposvK(String uplo, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void sposvxK(String fact, String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, org.netlib.util.StringW equed, float[] s, int _s_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void sposvxK(String fact, String uplo, int n, int nrhs, float[] a, int offseta, int lda, float[] af, int offsetaf, int ldaf, org.netlib.util.StringW equed, float[] s, int offsets, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void spotf2K(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected native void spotf2K(String uplo, int n, float[] a, int offseta, int lda, org.netlib.util.intW info); - protected native void spotrfK(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected native void spotrfK(String uplo, int n, float[] a, int offseta, int lda, org.netlib.util.intW info); - protected native void spotriK(String uplo, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected native void spotriK(String uplo, int n, float[] a, int offseta, int lda, org.netlib.util.intW info); - protected native void spotrsK(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void spotrsK(String uplo, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void sppconK(String uplo, int n, float[] ap, int _ap_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void sppconK(String uplo, int n, float[] ap, int offsetap, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void sppequK(String uplo, int n, float[] ap, int _ap_offset, float[] s, int _s_offset, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info); + protected native void sppequK(String uplo, int n, float[] ap, int offsetap, float[] s, int offsets, org.netlib.util.floatW scond, org.netlib.util.floatW amax, org.netlib.util.intW info); - protected native void spprfsK(String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] afp, int _afp_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void spprfsK(String uplo, int n, int nrhs, float[] ap, int offsetap, float[] afp, int offsetafp, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void sppsvK(String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void sppsvK(String uplo, int n, int nrhs, float[] ap, int offsetap, float[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void sppsvxK(String fact, String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] afp, int _afp_offset, org.netlib.util.StringW equed, float[] s, int _s_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void sppsvxK(String fact, String uplo, int n, int nrhs, float[] ap, int offsetap, float[] afp, int offsetafp, org.netlib.util.StringW equed, float[] s, int offsets, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void spptrfK(String uplo, int n, float[] ap, int _ap_offset, org.netlib.util.intW info); + protected native void spptrfK(String uplo, int n, float[] ap, int offsetap, org.netlib.util.intW info); - protected native void spptriK(String uplo, int n, float[] ap, int _ap_offset, org.netlib.util.intW info); + protected native void spptriK(String uplo, int n, float[] ap, int offsetap, org.netlib.util.intW info); - protected native void spptrsK(String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void spptrsK(String uplo, int n, int nrhs, float[] ap, int offsetap, float[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void sptconK(int n, float[] d, int _d_offset, float[] e, int _e_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void sptconK(int n, float[] d, int offsetd, float[] e, int offsete, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void spteqrK(String compz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void spteqrK(String compz, int n, float[] d, int offsetd, float[] e, int offsete, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void sptrfsK(int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] df, int _df_offset, float[] ef, int _ef_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void sptrfsK(int n, int nrhs, float[] d, int offsetd, float[] e, int offsete, float[] df, int offsetdf, float[] ef, int offsetef, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void sptsvK(int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void sptsvK(int n, int nrhs, float[] d, int offsetd, float[] e, int offsete, float[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void sptsvxK(String fact, int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] df, int _df_offset, float[] ef, int _ef_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void sptsvxK(String fact, int n, int nrhs, float[] d, int offsetd, float[] e, int offsete, float[] df, int offsetdf, float[] ef, int offsetef, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void spttrfK(int n, float[] d, int _d_offset, float[] e, int _e_offset, org.netlib.util.intW info); + protected native void spttrfK(int n, float[] d, int offsetd, float[] e, int offsete, org.netlib.util.intW info); - protected native void spttrsK(int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void spttrsK(int n, int nrhs, float[] d, int offsetd, float[] e, int offsete, float[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void sptts2K(int n, int nrhs, float[] d, int _d_offset, float[] e, int _e_offset, float[] b, int _b_offset, int ldb); + protected native void sptts2K(int n, int nrhs, float[] d, int offsetd, float[] e, int offsete, float[] b, int offsetb, int ldb); - protected native void srsclK(int n, float sa, float[] sx, int _sx_offset, int incx); + protected native void srsclK(int n, float sa, float[] sx, int offsetsx, int incx); - protected native void ssbevK(String jobz, String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void ssbevK(String jobz, String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void ssbevdK(String jobz, String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected native void ssbevdK(String jobz, String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); - protected native void ssbevxK(String jobz, String range, String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] q, int _q_offset, int ldq, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected native void ssbevxK(String jobz, String range, String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float[] q, int offsetq, int ldq, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); - protected native void ssbgstK(String vect, String uplo, int n, int ka, int kb, float[] ab, int _ab_offset, int ldab, float[] bb, int _bb_offset, int ldbb, float[] x, int _x_offset, int ldx, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void ssbgstK(String vect, String uplo, int n, int ka, int kb, float[] ab, int offsetab, int ldab, float[] bb, int offsetbb, int ldbb, float[] x, int offsetx, int ldx, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void ssbgvK(String jobz, String uplo, int n, int ka, int kb, float[] ab, int _ab_offset, int ldab, float[] bb, int _bb_offset, int ldbb, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void ssbgvK(String jobz, String uplo, int n, int ka, int kb, float[] ab, int offsetab, int ldab, float[] bb, int offsetbb, int ldbb, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void ssbgvdK(String jobz, String uplo, int n, int ka, int kb, float[] ab, int _ab_offset, int ldab, float[] bb, int _bb_offset, int ldbb, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected native void ssbgvdK(String jobz, String uplo, int n, int ka, int kb, float[] ab, int offsetab, int ldab, float[] bb, int offsetbb, int ldbb, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); - protected native void ssbgvxK(String jobz, String range, String uplo, int n, int ka, int kb, float[] ab, int _ab_offset, int ldab, float[] bb, int _bb_offset, int ldbb, float[] q, int _q_offset, int ldq, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected native void ssbgvxK(String jobz, String range, String uplo, int n, int ka, int kb, float[] ab, int offsetab, int ldab, float[] bb, int offsetbb, int ldbb, float[] q, int offsetq, int ldq, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); - protected native void ssbtrdK(String vect, String uplo, int n, int kd, float[] ab, int _ab_offset, int ldab, float[] d, int _d_offset, float[] e, int _e_offset, float[] q, int _q_offset, int ldq, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void ssbtrdK(String vect, String uplo, int n, int kd, float[] ab, int offsetab, int ldab, float[] d, int offsetd, float[] e, int offsete, float[] q, int offsetq, int ldq, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void sspconK(String uplo, int n, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void sspconK(String uplo, int n, float[] ap, int offsetap, int[] ipiv, int offsetipiv, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void sspevK(String jobz, String uplo, int n, float[] ap, int _ap_offset, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void sspevK(String jobz, String uplo, int n, float[] ap, int offsetap, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void sspevdK(String jobz, String uplo, int n, float[] ap, int _ap_offset, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected native void sspevdK(String jobz, String uplo, int n, float[] ap, int offsetap, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); - protected native void sspevxK(String jobz, String range, String uplo, int n, float[] ap, int _ap_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected native void sspevxK(String jobz, String range, String uplo, int n, float[] ap, int offsetap, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); - protected native void sspgstK(int itype, String uplo, int n, float[] ap, int _ap_offset, float[] bp, int _bp_offset, org.netlib.util.intW info); + protected native void sspgstK(int itype, String uplo, int n, float[] ap, int offsetap, float[] bp, int offsetbp, org.netlib.util.intW info); - protected native void sspgvK(int itype, String jobz, String uplo, int n, float[] ap, int _ap_offset, float[] bp, int _bp_offset, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void sspgvK(int itype, String jobz, String uplo, int n, float[] ap, int offsetap, float[] bp, int offsetbp, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void sspgvdK(int itype, String jobz, String uplo, int n, float[] ap, int _ap_offset, float[] bp, int _bp_offset, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected native void sspgvdK(int itype, String jobz, String uplo, int n, float[] ap, int offsetap, float[] bp, int offsetbp, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); - protected native void sspgvxK(int itype, String jobz, String range, String uplo, int n, float[] ap, int _ap_offset, float[] bp, int _bp_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected native void sspgvxK(int itype, String jobz, String range, String uplo, int n, float[] ap, int offsetap, float[] bp, int offsetbp, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); - protected native void ssprfsK(String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] afp, int _afp_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void ssprfsK(String uplo, int n, int nrhs, float[] ap, int offsetap, float[] afp, int offsetafp, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void sspsvK(String uplo, int n, int nrhs, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void sspsvK(String uplo, int n, int nrhs, float[] ap, int offsetap, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void sspsvxK(String fact, String uplo, int n, int nrhs, float[] ap, int _ap_offset, float[] afp, int _afp_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void sspsvxK(String fact, String uplo, int n, int nrhs, float[] ap, int offsetap, float[] afp, int offsetafp, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void ssptrdK(String uplo, int n, float[] ap, int _ap_offset, float[] d, int _d_offset, float[] e, int _e_offset, float[] tau, int _tau_offset, org.netlib.util.intW info); + protected native void ssptrdK(String uplo, int n, float[] ap, int offsetap, float[] d, int offsetd, float[] e, int offsete, float[] tau, int offsettau, org.netlib.util.intW info); - protected native void ssptrfK(String uplo, int n, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + protected native void ssptrfK(String uplo, int n, float[] ap, int offsetap, int[] ipiv, int offsetipiv, org.netlib.util.intW info); - protected native void ssptriK(String uplo, int n, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void ssptriK(String uplo, int n, float[] ap, int offsetap, int[] ipiv, int offsetipiv, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void ssptrsK(String uplo, int n, int nrhs, float[] ap, int _ap_offset, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void ssptrsK(String uplo, int n, int nrhs, float[] ap, int offsetap, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void sstebzK(String range, String order, int n, float vl, float vu, int il, int iu, float abstol, float[] d, int _d_offset, float[] e, int _e_offset, org.netlib.util.intW m, org.netlib.util.intW nsplit, float[] w, int _w_offset, int[] iblock, int _iblock_offset, int[] isplit, int _isplit_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void sstebzK(String range, String order, int n, float vl, float vu, int il, int iu, float abstol, float[] d, int offsetd, float[] e, int offsete, org.netlib.util.intW m, org.netlib.util.intW nsplit, float[] w, int offsetw, int[] iblock, int offsetiblock, int[] isplit, int offsetisplit, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void sstedcK(String compz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected native void sstedcK(String compz, int n, float[] d, int offsetd, float[] e, int offsete, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); - protected native void sstegrK(String jobz, String range, int n, float[] d, int _d_offset, float[] e, int _e_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected native void sstegrK(String jobz, String range, int n, float[] d, int offsetd, float[] e, int offsete, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); - protected native void ssteinK(int n, float[] d, int _d_offset, float[] e, int _e_offset, int m, float[] w, int _w_offset, int[] iblock, int _iblock_offset, int[] isplit, int _isplit_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected native void ssteinK(int n, float[] d, int offsetd, float[] e, int offsete, int m, float[] w, int offsetw, int[] iblock, int offsetiblock, int[] isplit, int offsetisplit, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); - protected native void sstemrK(String jobz, String range, int n, float[] d, int _d_offset, float[] e, int _e_offset, float vl, float vu, int il, int iu, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, int nzc, int[] isuppz, int _isuppz_offset, org.netlib.util.booleanW tryrac, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected native void sstemrK(String jobz, String range, int n, float[] d, int offsetd, float[] e, int offsete, float vl, float vu, int il, int iu, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, int nzc, int[] isuppz, int offsetisuppz, org.netlib.util.booleanW tryrac, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); - protected native void ssteqrK(String compz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void ssteqrK(String compz, int n, float[] d, int offsetd, float[] e, int offsete, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void ssterfK(int n, float[] d, int _d_offset, float[] e, int _e_offset, org.netlib.util.intW info); + protected native void ssterfK(int n, float[] d, int offsetd, float[] e, int offsete, org.netlib.util.intW info); - protected native void sstevK(String jobz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void sstevK(String jobz, int n, float[] d, int offsetd, float[] e, int offsete, float[] z, int offsetz, int ldz, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void sstevdK(String jobz, int n, float[] d, int _d_offset, float[] e, int _e_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected native void sstevdK(String jobz, int n, float[] d, int offsetd, float[] e, int offsete, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); - protected native void sstevrK(String jobz, String range, int n, float[] d, int _d_offset, float[] e, int _e_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected native void sstevrK(String jobz, String range, int n, float[] d, int offsetd, float[] e, int offsete, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); - protected native void sstevxK(String jobz, String range, int n, float[] d, int _d_offset, float[] e, int _e_offset, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected native void sstevxK(String jobz, String range, int n, float[] d, int offsetd, float[] e, int offsete, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); - protected native void ssyconK(String uplo, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float anorm, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void ssyconK(String uplo, int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float anorm, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void ssyevK(String jobz, String uplo, int n, float[] a, int _a_offset, int lda, float[] w, int _w_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void ssyevK(String jobz, String uplo, int n, float[] a, int offseta, int lda, float[] w, int offsetw, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void ssyevdK(String jobz, String uplo, int n, float[] a, int _a_offset, int lda, float[] w, int _w_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected native void ssyevdK(String jobz, String uplo, int n, float[] a, int offseta, int lda, float[] w, int offsetw, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); - protected native void ssyevrK(String jobz, String range, String uplo, int n, float[] a, int _a_offset, int lda, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, int[] isuppz, int _isuppz_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected native void ssyevrK(String jobz, String range, String uplo, int n, float[] a, int offseta, int lda, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, int[] isuppz, int offsetisuppz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); - protected native void ssyevxK(String jobz, String range, String uplo, int n, float[] a, int _a_offset, int lda, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected native void ssyevxK(String jobz, String range, String uplo, int n, float[] a, int offseta, int lda, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); - protected native void ssygs2K(int itype, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void ssygs2K(int itype, String uplo, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void ssygstK(int itype, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void ssygstK(int itype, String uplo, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void ssygvK(int itype, String jobz, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] w, int _w_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void ssygvK(int itype, String jobz, String uplo, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] w, int offsetw, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void ssygvdK(int itype, String jobz, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] w, int _w_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected native void ssygvdK(int itype, String jobz, String uplo, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] w, int offsetw, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); - protected native void ssygvxK(int itype, String jobz, String range, String uplo, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int _w_offset, float[] z, int _z_offset, int ldz, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int[] ifail, int _ifail_offset, org.netlib.util.intW info); + protected native void ssygvxK(int itype, String jobz, String range, String uplo, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float vl, float vu, int il, int iu, float abstol, org.netlib.util.intW m, float[] w, int offsetw, float[] z, int offsetz, int ldz, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int[] ifail, int offsetifail, org.netlib.util.intW info); - protected native void ssyrfsK(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void ssyrfsK(String uplo, int n, int nrhs, float[] a, int offseta, int lda, float[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void ssysvK(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void ssysvK(String uplo, int n, int nrhs, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void ssysvxK(String fact, String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, float[] af, int _af_offset, int ldaf, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, org.netlib.util.floatW rcond, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void ssysvxK(String fact, String uplo, int n, int nrhs, float[] a, int offseta, int lda, float[] af, int offsetaf, int ldaf, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, org.netlib.util.floatW rcond, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void ssytd2K(String uplo, int n, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tau, int _tau_offset, org.netlib.util.intW info); + protected native void ssytd2K(String uplo, int n, float[] a, int offseta, int lda, float[] d, int offsetd, float[] e, int offsete, float[] tau, int offsettau, org.netlib.util.intW info); - protected native void ssytf2K(String uplo, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, org.netlib.util.intW info); + protected native void ssytf2K(String uplo, int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, org.netlib.util.intW info); - protected native void ssytrdK(String uplo, int n, float[] a, int _a_offset, int lda, float[] d, int _d_offset, float[] e, int _e_offset, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void ssytrdK(String uplo, int n, float[] a, int offseta, int lda, float[] d, int offsetd, float[] e, int offsete, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void ssytrfK(String uplo, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void ssytrfK(String uplo, int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void ssytriK(String uplo, int n, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void ssytriK(String uplo, int n, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void ssytrsK(String uplo, int n, int nrhs, float[] a, int _a_offset, int lda, int[] ipiv, int _ipiv_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void ssytrsK(String uplo, int n, int nrhs, float[] a, int offseta, int lda, int[] ipiv, int offsetipiv, float[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void stbconK(String norm, String uplo, String diag, int n, int kd, float[] ab, int _ab_offset, int ldab, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void stbconK(String norm, String uplo, String diag, int n, int kd, float[] ab, int offsetab, int ldab, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void stbrfsK(String uplo, String trans, String diag, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void stbrfsK(String uplo, String trans, String diag, int n, int kd, int nrhs, float[] ab, int offsetab, int ldab, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void stbtrsK(String uplo, String trans, String diag, int n, int kd, int nrhs, float[] ab, int _ab_offset, int ldab, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void stbtrsK(String uplo, String trans, String diag, int n, int kd, int nrhs, float[] ab, int offsetab, int ldab, float[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void stgevcK(String side, String howmny, boolean[] select, int _select_offset, int n, float[] s, int _s_offset, int lds, float[] p, int _p_offset, int ldp, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void stgevcK(String side, String howmny, boolean[] select, int offsetselect, int n, float[] s, int offsets, int lds, float[] p, int offsetp, int ldp, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, int mm, org.netlib.util.intW m, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void stgex2K(boolean wantq, boolean wantz, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, int j1, int n1, int n2, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void stgex2K(boolean wantq, boolean wantz, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] q, int offsetq, int ldq, float[] z, int offsetz, int ldz, int j1, int n1, int n2, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void stgexcK(boolean wantq, boolean wantz, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, org.netlib.util.intW ifst, org.netlib.util.intW ilst, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void stgexcK(boolean wantq, boolean wantz, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] q, int offsetq, int ldq, float[] z, int offsetz, int ldz, org.netlib.util.intW ifst, org.netlib.util.intW ilst, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); - protected native void stgsenK(int ijob, boolean wantq, boolean wantz, boolean[] select, int _select_offset, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] alphar, int _alphar_offset, float[] alphai, int _alphai_offset, float[] beta, int _beta_offset, float[] q, int _q_offset, int ldq, float[] z, int _z_offset, int ldz, org.netlib.util.intW m, org.netlib.util.floatW pl, org.netlib.util.floatW pr, float[] dif, int _dif_offset, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected native void stgsenK(int ijob, boolean wantq, boolean wantz, boolean[] select, int offsetselect, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] alphar, int offsetalphar, float[] alphai, int offsetalphai, float[] beta, int offsetbeta, float[] q, int offsetq, int ldq, float[] z, int offsetz, int ldz, org.netlib.util.intW m, org.netlib.util.floatW pl, org.netlib.util.floatW pr, float[] dif, int offsetdif, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); - protected native void stgsjaK(String jobu, String jobv, String jobq, int m, int p, int n, int k, int l, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float tola, float tolb, float[] alpha, int _alpha_offset, float[] beta, int _beta_offset, float[] u, int _u_offset, int ldu, float[] v, int _v_offset, int ldv, float[] q, int _q_offset, int ldq, float[] work, int _work_offset, org.netlib.util.intW ncycle, org.netlib.util.intW info); + protected native void stgsjaK(String jobu, String jobv, String jobq, int m, int p, int n, int k, int l, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float tola, float tolb, float[] alpha, int offsetalpha, float[] beta, int offsetbeta, float[] u, int offsetu, int ldu, float[] v, int offsetv, int ldv, float[] q, int offsetq, int ldq, float[] work, int offsetwork, org.netlib.util.intW ncycle, org.netlib.util.intW info); - protected native void stgsnaK(String job, String howmny, boolean[] select, int _select_offset, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] s, int _s_offset, float[] dif, int _dif_offset, int mm, org.netlib.util.intW m, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void stgsnaK(String job, String howmny, boolean[] select, int offsetselect, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, float[] s, int offsets, float[] dif, int offsetdif, int mm, org.netlib.util.intW m, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void stgsy2K(String trans, int ijob, int m, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] c, int _c_offset, int Ldc, float[] d, int _d_offset, int ldd, float[] e, int _e_offset, int lde, float[] f, int _f_offset, int ldf, org.netlib.util.floatW scale, org.netlib.util.floatW rdsum, org.netlib.util.floatW rdscal, int[] iwork, int _iwork_offset, org.netlib.util.intW pq, org.netlib.util.intW info); + protected native void stgsy2K(String trans, int ijob, int m, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] c, int offsetc, int Ldc, float[] d, int offsetd, int ldd, float[] e, int offsete, int lde, float[] f, int offsetf, int ldf, org.netlib.util.floatW scale, org.netlib.util.floatW rdsum, org.netlib.util.floatW rdscal, int[] iwork, int offsetiwork, org.netlib.util.intW pq, org.netlib.util.intW info); - protected native void stgsylK(String trans, int ijob, int m, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] c, int _c_offset, int Ldc, float[] d, int _d_offset, int ldd, float[] e, int _e_offset, int lde, float[] f, int _f_offset, int ldf, org.netlib.util.floatW scale, org.netlib.util.floatW dif, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void stgsylK(String trans, int ijob, int m, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] c, int offsetc, int Ldc, float[] d, int offsetd, int ldd, float[] e, int offsete, int lde, float[] f, int offsetf, int ldf, org.netlib.util.floatW scale, org.netlib.util.floatW dif, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void stpconK(String norm, String uplo, String diag, int n, float[] ap, int _ap_offset, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void stpconK(String norm, String uplo, String diag, int n, float[] ap, int offsetap, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void stprfsK(String uplo, String trans, String diag, int n, int nrhs, float[] ap, int _ap_offset, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void stprfsK(String uplo, String trans, String diag, int n, int nrhs, float[] ap, int offsetap, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void stptriK(String uplo, String diag, int n, float[] ap, int _ap_offset, org.netlib.util.intW info); + protected native void stptriK(String uplo, String diag, int n, float[] ap, int offsetap, org.netlib.util.intW info); - protected native void stptrsK(String uplo, String trans, String diag, int n, int nrhs, float[] ap, int _ap_offset, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void stptrsK(String uplo, String trans, String diag, int n, int nrhs, float[] ap, int offsetap, float[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void strconK(String norm, String uplo, String diag, int n, float[] a, int _a_offset, int lda, org.netlib.util.floatW rcond, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void strconK(String norm, String uplo, String diag, int n, float[] a, int offseta, int lda, org.netlib.util.floatW rcond, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void strevcK(String side, String howmny, boolean[] select, int _select_offset, int n, float[] t, int _t_offset, int ldt, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, int mm, org.netlib.util.intW m, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void strevcK(String side, String howmny, boolean[] select, int offsetselect, int n, float[] t, int offsett, int ldt, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, int mm, org.netlib.util.intW m, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void strexcK(String compq, int n, float[] t, int _t_offset, int ldt, float[] q, int _q_offset, int ldq, org.netlib.util.intW ifst, org.netlib.util.intW ilst, float[] work, int _work_offset, org.netlib.util.intW info); + protected native void strexcK(String compq, int n, float[] t, int offsett, int ldt, float[] q, int offsetq, int ldq, org.netlib.util.intW ifst, org.netlib.util.intW ilst, float[] work, int offsetwork, org.netlib.util.intW info); - protected native void strrfsK(String uplo, String trans, String diag, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] x, int _x_offset, int ldx, float[] ferr, int _ferr_offset, float[] berr, int _berr_offset, float[] work, int _work_offset, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void strrfsK(String uplo, String trans, String diag, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] x, int offsetx, int ldx, float[] ferr, int offsetferr, float[] berr, int offsetberr, float[] work, int offsetwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void strsenK(String job, String compq, boolean[] select, int _select_offset, int n, float[] t, int _t_offset, int ldt, float[] q, int _q_offset, int ldq, float[] wr, int _wr_offset, float[] wi, int _wi_offset, org.netlib.util.intW m, org.netlib.util.floatW s, org.netlib.util.floatW sep, float[] work, int _work_offset, int lwork, int[] iwork, int _iwork_offset, int liwork, org.netlib.util.intW info); + protected native void strsenK(String job, String compq, boolean[] select, int offsetselect, int n, float[] t, int offsett, int ldt, float[] q, int offsetq, int ldq, float[] wr, int offsetwr, float[] wi, int offsetwi, org.netlib.util.intW m, org.netlib.util.floatW s, org.netlib.util.floatW sep, float[] work, int offsetwork, int lwork, int[] iwork, int offsetiwork, int liwork, org.netlib.util.intW info); - protected native void strsnaK(String job, String howmny, boolean[] select, int _select_offset, int n, float[] t, int _t_offset, int ldt, float[] vl, int _vl_offset, int ldvl, float[] vr, int _vr_offset, int ldvr, float[] s, int _s_offset, float[] sep, int _sep_offset, int mm, org.netlib.util.intW m, float[] work, int _work_offset, int ldwork, int[] iwork, int _iwork_offset, org.netlib.util.intW info); + protected native void strsnaK(String job, String howmny, boolean[] select, int offsetselect, int n, float[] t, int offsett, int ldt, float[] vl, int offsetvl, int ldvl, float[] vr, int offsetvr, int ldvr, float[] s, int offsets, float[] sep, int offsetsep, int mm, org.netlib.util.intW m, float[] work, int offsetwork, int ldwork, int[] iwork, int offsetiwork, org.netlib.util.intW info); - protected native void strsylK(String trana, String tranb, int isgn, int m, int n, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, float[] c, int _c_offset, int Ldc, org.netlib.util.floatW scale, org.netlib.util.intW info); + protected native void strsylK(String trana, String tranb, int isgn, int m, int n, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, float[] c, int offsetc, int Ldc, org.netlib.util.floatW scale, org.netlib.util.intW info); - protected native void strti2K(String uplo, String diag, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected native void strti2K(String uplo, String diag, int n, float[] a, int offseta, int lda, org.netlib.util.intW info); - protected native void strtriK(String uplo, String diag, int n, float[] a, int _a_offset, int lda, org.netlib.util.intW info); + protected native void strtriK(String uplo, String diag, int n, float[] a, int offseta, int lda, org.netlib.util.intW info); - protected native void strtrsK(String uplo, String trans, String diag, int n, int nrhs, float[] a, int _a_offset, int lda, float[] b, int _b_offset, int ldb, org.netlib.util.intW info); + protected native void strtrsK(String uplo, String trans, String diag, int n, int nrhs, float[] a, int offseta, int lda, float[] b, int offsetb, int ldb, org.netlib.util.intW info); - protected native void stzrqfK(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, org.netlib.util.intW info); + protected native void stzrqfK(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, org.netlib.util.intW info); - protected native void stzrzfK(int m, int n, float[] a, int _a_offset, int lda, float[] tau, int _tau_offset, float[] work, int _work_offset, int lwork, org.netlib.util.intW info); + protected native void stzrzfK(int m, int n, float[] a, int offseta, int lda, float[] tau, int offsettau, float[] work, int offsetwork, int lwork, org.netlib.util.intW info); protected native double dlamchK(String cmach); From 2a960f9e1759727ec9f9e2d70259fcf73344047b Mon Sep 17 00:00:00 2001 From: Ludovic Henry Date: Mon, 3 May 2021 13:14:30 +0200 Subject: [PATCH 42/42] Remove unused test resources and methods --- .../dev/ludovic/netlib/arpack/ARPACKTest.java | 137 ------------------ arpack/src/test/resources/X.vec | 1 - arpack/src/test/resources/Y.vec | 1 - arpack/src/test/resources/geA.mat | 1 - arpack/src/test/resources/geB.mat | 1 - arpack/src/test/resources/geC.mat | 1 - .../dev/ludovic/netlib/lapack/LAPACKTest.java | 137 ------------------ lapack/src/test/resources/X.vec | 1 - lapack/src/test/resources/Y.vec | 1 - lapack/src/test/resources/geA.mat | 1 - lapack/src/test/resources/geB.mat | 1 - lapack/src/test/resources/geC.mat | 1 - 12 files changed, 284 deletions(-) delete mode 100644 arpack/src/test/resources/X.vec delete mode 100644 arpack/src/test/resources/Y.vec delete mode 100644 arpack/src/test/resources/geA.mat delete mode 100644 arpack/src/test/resources/geB.mat delete mode 100644 arpack/src/test/resources/geC.mat delete mode 100644 lapack/src/test/resources/X.vec delete mode 100644 lapack/src/test/resources/Y.vec delete mode 100644 lapack/src/test/resources/geA.mat delete mode 100644 lapack/src/test/resources/geB.mat delete mode 100644 lapack/src/test/resources/geC.mat diff --git a/arpack/src/test/java/dev/ludovic/netlib/arpack/ARPACKTest.java b/arpack/src/test/java/dev/ludovic/netlib/arpack/ARPACKTest.java index 4be2b83c..3705dd4e 100644 --- a/arpack/src/test/java/dev/ludovic/netlib/arpack/ARPACKTest.java +++ b/arpack/src/test/java/dev/ludovic/netlib/arpack/ARPACKTest.java @@ -50,141 +50,4 @@ private static Stream ARPACKImplementations() { return instances; } - - protected static final double[] readArray(String name) { - InputStream is = ARPACKTest.class.getResourceAsStream(name); - assert is != null; - try (BufferedReader reader = new BufferedReader(new InputStreamReader(is))) { - String[] values = reader.readLine().split(","); - double[] result = new double[values.length]; - for (int i = 0; i < values.length; i += 1) { - result[i] = Double.parseDouble(values[i]); - } - return result; - } catch (Throwable t) { - t.printStackTrace(); - throw new UnsupportedOperationException(t); - } - } - - protected static final double[] transpose(String trans, double[] arr, int m, int n) { - assert arr.length == m * n; - double[] result = new double[n * m]; - if (trans.equals("N")) { - for (int col = 0; col < n; col += 1) { - for (int row = 0; row < m; row += 1) { - result[col + row * n] = arr[row + col * m]; - } - } - } else { - for (int row = 0; row < m; row += 1) { - for (int col = 0; col < n; col += 1) { - result[row + col * m] = arr[col + row * n]; - } - } - } - return result; - } - - protected static final double[] extractUPLO(String uplo, double[] arr, int n, int ldarr) { - assert n <= ldarr; - double[] result = new double[n * (n + 1) / 2]; - int i = 0; - if (uplo.equals("U")) { - for (int col = 0; col < n; col += 1) { - for (int row = 0; row < col + 1; row += 1) { - result[i++] = arr[row + col * ldarr]; - } - } - } else { - for (int col = 0; col < n; col += 1) { - for (int row = col; row < n; row += 1) { - result[i++] = arr[row + col * ldarr]; - } - } - } - assert i == n * (n + 1) / 2; - return result; - } - - protected static final double[] extractSymmetric(double[] arr, int n, int ldarr) { - assert n <= ldarr; - double[] result = new double[n * n]; - for (int col = 0; col < n; col += 1) { - for (int row = 0; row < col + 1; row += 1) { - result[row + col * n] = result[col + row * n] = arr[row + col * ldarr]; - } - } - return result; - } - - protected static final float[] convertToFloat(double[] src) { - float[] result = new float[src.length]; - for (int i = 0; i < src.length; i += 1) { - result[i] = (float)src[i]; - } - return result; - } - - protected static final void dumpArray(String name, double[] arr) { - System.out.print(name + ": "); - for(double e : arr) { - System.out.print(String.format("%.3f,", e)); - } - System.out.println(); - } - - protected final int M = 103; - protected final int N = 103; - protected final int K = 103; - - // double[m, k] - protected final double[] dgeA = readArray("/geA.mat"); - // double[k, n] - protected final double[] dgeB = readArray("/geB.mat"); - // double[m, n] - protected final double[] dgeC = readArray("/geC.mat"); - - // double[m, m] - protected final double[] dsyA = extractSymmetric(dgeA, M, M); - - // double[m] - protected final double[] dX = readArray("/X.vec"); - // double[m] - protected final double[] dY = readArray("/Y.vec"); - - // double[k, m] - protected final double[] dgeAT = transpose("N", dgeA, M, K); - // double[n, k] - protected final double[] dgeBT = transpose("N", dgeB, K, N); - - // double[m, m][U] - protected final double[] dgeAU = extractUPLO("U", dgeA, M, M); - // double[m, m][L] - protected final double[] dgeAL = extractUPLO("L", dgeA, M, M); - - // float[m, k] - protected final float[] sgeA = convertToFloat(dgeA); - // float[k, n] - protected final float[] sgeB = convertToFloat(dgeB); - // float[m, n] - protected final float[] sgeC = convertToFloat(dgeC); - - // float[m, m] - protected final float[] ssyA = convertToFloat(dsyA); - - // double[m] - protected final float[] sX = convertToFloat(dX); - // double[m] - protected final float[] sY = convertToFloat(dY); - - // float[k, m] - protected final float[] sgeAT = convertToFloat(dgeAT); - // float[n, k] - protected final float[] sgeBT = convertToFloat(dgeBT); - - // float[m, k][U] - protected final float[] sgeAU = convertToFloat(dgeAU); - // float[m, k][L] - protected final float[] sgeAL = convertToFloat(dgeAL); } diff --git a/arpack/src/test/resources/X.vec b/arpack/src/test/resources/X.vec deleted file mode 100644 index 5785c50c..00000000 --- a/arpack/src/test/resources/X.vec +++ /dev/null @@ -1 +0,0 @@ -2.743770,0.835428,4.056319,1.057763,1.288122,0.743487,0.297624,0.720599,4.733356,3.985322,3.689118,2.863023,3.840879,3.841770,1.388431,0.829788,1.992641,2.361518,0.296504,4.544581,1.315937,4.071398,1.222224,1.040035,1.729134,3.159764,4.104973,1.944296,3.332840,1.263181,1.144171,2.119526,4.667703,0.206606,2.789823,4.867032,3.039553,4.559095,3.921917,2.396661,1.773202,3.193527,4.452662,0.225245,3.787477,1.748217,0.020557,0.204250,0.235989,3.295322,2.607994,1.661676,1.829283,1.057310,2.141564,1.248551,3.653989,1.368927,2.794324,3.996130,2.265062,1.857542,0.359007,3.256106,0.167688,4.232306,4.194821,2.420912,2.654466,3.646937,4.274297,2.150499,4.738874,2.725356,4.278588,0.194970,1.141882,2.705893,0.208498,2.530241,2.839940,2.587016,0.572437,3.994174,3.110979,3.714781,2.053858,4.077423,1.408685,4.629359,2.206141,1.299046,4.108358,2.764698,1.433918,0.779362,4.763679,3.561891,4.686232,3.660752,2.956290,2.539581,4.999594 \ No newline at end of file diff --git a/arpack/src/test/resources/Y.vec b/arpack/src/test/resources/Y.vec deleted file mode 100644 index 552ed8b5..00000000 --- a/arpack/src/test/resources/Y.vec +++ /dev/null @@ -1 +0,0 @@ -1.308161,1.859244,4.271887,2.385419,0.783308,2.460314,2.912655,3.497239,0.489631,3.916928,1.337877,1.423239,3.568072,0.908391,4.471557,3.271646,1.410359,4.456444,1.708393,0.214084,4.793527,1.225499,4.397703,2.923277,4.753397,4.167854,3.083996,1.381753,4.887306,3.264405,0.749737,1.044536,1.717942,2.491489,1.515707,0.776045,3.721097,0.231149,0.891569,2.305177,1.379286,4.388693,2.723391,4.880161,3.816186,0.423202,0.137105,2.338054,0.712574,2.400618,1.648705,2.011272,2.180356,0.231902,4.804938,4.918287,2.458577,1.178577,0.784749,4.442337,4.935286,1.406488,1.756818,0.117174,4.952333,2.184810,2.528438,1.194373,4.205853,0.549411,1.830910,1.753192,2.011837,1.913712,3.023300,1.184178,2.549540,1.210492,3.153036,2.182013,3.418065,2.688047,0.934378,0.334523,0.692445,1.470172,2.386988,3.844825,2.224413,0.769167,0.031627,1.589413,1.845898,0.842862,4.991723,4.275119,1.513772,2.301607,2.333696,0.082954,2.733651,3.399653,0.016225 \ No newline at end of file diff --git a/arpack/src/test/resources/geA.mat b/arpack/src/test/resources/geA.mat deleted file mode 100644 index d3b4b11e..00000000 --- a/arpack/src/test/resources/geA.mat +++ /dev/null @@ -1 +0,0 @@ -2.744068,3.575947,3.013817,2.724416,2.118274,3.229471,2.187936,4.458865,4.818314,1.917208,3.958625,2.644475,2.840223,4.627983,0.355180,0.435646,0.101092,4.163099,3.890784,4.350061,4.893092,3.995793,2.307397,3.902646,0.591372,3.199605,0.716766,4.723345,2.609242,2.073310,1.322778,3.871168,2.280752,2.842170,0.093949,3.088177,3.060479,3.084670,4.718740,3.409101,1.797540,2.185160,3.488156,0.301127,3.333834,3.353189,1.051913,0.644631,1.577142,1.818554,2.850984,2.193008,4.941869,0.510224,1.044384,0.806548,3.265542,1.266458,2.331554,1.222128,0.794848,0.551876,3.281648,0.690915,0.982912,1.843626,4.104966,0.485506,4.189725,0.480492,4.882297,2.343256,4.883805,3.024228,3.696318,0.195939,1.414035,0.600983,1.480701,0.593639,1.589916,2.071315,0.320737,3.462361,2.833007,1.326947,2.616240,0.469703,2.879732,4.646481,1.592845,3.337052,0.658989,3.581636,1.447030,0.915957,2.932565,0.100538,4.144700,0.023477,3.389083,1.350040,3.675970,4.810943,1.243766,2.880787,2.960210,2.861260,1.115408,4.763745,2.235627,4.232043,3.497396,1.487185,4.068989,1.982529,4.405516,2.906364,4.408677,3.462658,3.626271,2.506622,4.780418,3.219951,2.119275,3.031966,0.095966,1.507874,3.300868,1.450388,3.090077,2.143844,0.677370,1.491412,2.849825,2.954364,2.871626,3.266004,3.260516,2.157092,4.482733,1.837809,2.179325,4.459617,4.030970,3.519443,0.501134,4.597413,3.571206,4.994235,0.747242,4.340630,0.812465,3.077798,0.619100,4.240041,4.036595,2.845504,2.035916,0.345835,3.487144,2.267713,3.610278,4.331912,4.877608,4.279017,0.058570,1.799890,3.649953,0.858148,2.605183,0.271690,0.999983,0.092609,3.968489,1.119623,1.726758,4.640406,3.522072,0.159195,0.823471,3.107392,2.886143,1.189464,4.671070,3.069830,2.678164,2.949550,3.650610,1.559725,1.991105,1.049219,0.930965,4.721862,3.697754,2.452294,1.137073,1.271782,0.290146,2.172083,1.558979,3.481717,1.888759,0.898018,0.123394,0.336248,3.396964,2.268484,2.682896,4.483356,4.951695,1.084485,3.315391,1.316612,0.103255,3.791893,1.600086,1.917319,2.941586,4.155242,3.144909,4.363253,1.367710,3.990234,0.928180,4.763958,3.437441,1.077538,4.736853,3.654279,1.269708,1.066560,2.591004,0.128314,1.037350,2.123427,1.870850,2.317877,1.388144,2.933922,4.319278,0.587659,2.586896,0.660341,3.584298,1.980299,2.827107,0.916399,0.724239,2.440281,1.778064,4.702160,3.826626,3.743318,4.518599,0.417112,2.760962,2.922380,4.809682,1.460738,1.204144,0.501470,0.082148,4.647647,3.349583,3.925765,1.408651,2.932051,0.319776,2.428138,4.887476,4.382526,1.690795,4.807851,1.158508,4.746594,4.706889,3.996013,3.152240,4.371440,1.465101,4.244718,3.089383,0.066184,1.736168,0.740704,4.909147,2.391852,2.486957,3.197363,1.842923,0.684501,4.110589,0.949240,2.556595,1.121585,0.489222,4.310958,4.864597,4.804173,4.532777,3.870237,1.665726,0.405507,2.036206,1.161171,0.662438,0.267136,3.627972,0.057137,3.852904,0.734733,0.397610,0.448015,3.360239,1.226836,2.102697,2.786844,4.302756,3.635221,1.351640,0.657414,0.276872,1.507993,1.310591,2.280703,3.416407,3.478127,1.417594,1.899635,0.905755,3.942728,0.284240,3.484986,3.893477,3.887038,1.297113,1.869066,2.937998,1.364110,1.854264,0.985271,2.299279,0.223062,3.998979,0.384782,2.594176,1.534050,2.887715,4.797167,3.227851,0.176812,2.152012,2.550084,2.680887,3.406963,1.387980,0.644303,1.963378,4.782029,0.935654,4.519920,2.719030,2.284557,4.410207,2.293020,3.620838,1.995127,4.520222,3.450125,3.498110,1.638602,3.783893,3.180305,1.200101,0.802694,3.981957,4.795833,2.290694,2.954921,4.288613,2.286117,4.759372,2.878756,4.103836,4.544219,4.077619,0.797072,3.144492,1.992171,0.313565,2.120161,1.293420,4.245192,0.166523,4.794914,1.776844,1.783534,0.081643,0.926162,2.006298,4.646457,0.498075,4.726508,4.347443,2.270812,1.633504,1.163721,3.072324,0.165373,0.078030,2.143979,0.340370,1.259705,1.105805,1.265956,0.655276,0.060181,0.577421,3.092401,4.871281,4.951725,2.045270,0.814772,3.193809,2.451527,4.947049,0.326521,3.916172,1.441992,1.207093,3.312523,1.230316,3.329296,2.586543,2.120445,2.773439,1.435258,3.532874,2.074284,1.802728,4.143285,4.624835,0.230037,1.163135,1.742597,4.074832,4.927457,4.844859,4.524742,1.482781,4.960056,1.247100,0.529531,4.754763,1.167101,3.448841,0.291782,3.653545,4.408601,1.362184,1.895284,1.871481,3.743941,1.189036,0.859265,2.246458,1.522342,4.195946,1.188709,2.511947,4.712918,3.169988,4.336447,4.701048,3.753824,3.497875,4.839828,4.972004,2.259108,0.354349,1.463970,0.761774,2.087432,0.656447,3.020589,1.914040,4.476929,4.838973,2.734425,1.374118,2.961152,4.483806,2.033667,2.760391,1.358264,2.277221,2.008568,1.242067,2.529332,1.551904,1.865174,2.624852,3.752975,1.667537,4.620794,4.311593,0.243451,1.268213,2.230678,0.523139,1.742380,3.700488,3.402572,3.111922,3.552642,1.024618,1.708491,3.381212,4.396174,2.718390,1.413498,0.151176,3.551684,0.039421,1.863395,2.652686,4.610557,0.447473,2.029712,0.121566,1.713055,3.111155,1.395340,1.048750,0.578516,2.885701,3.476350,3.359786,4.744305,0.013516,3.235983,3.001961,2.943698,4.813852,0.084358,3.482412,4.068393,2.549036,1.669824,3.954201,0.486215,2.210178,2.599762,3.469782,0.454429,1.138798,2.051508,3.116473,4.434804,3.094131,0.667307,4.902901,4.358929,2.513604,4.611740,2.706904,4.616530,4.149487,4.841432,4.598914,0.180169,0.873860,1.945673,4.760713,1.500145,0.802338,4.431523,2.231972,4.539378,0.801152,3.305588,2.201319,0.382434,3.482316,1.236994,0.198078,0.299721,0.305393,4.538665,3.699420,4.490312,3.362912,2.644700,1.522232,4.989811,1.810945,2.353245,1.891226,4.897635,0.873292,1.639940,3.401743,0.316038,3.036247,2.388233,1.420000,1.192066,2.572564,1.839638,2.282599,1.687387,4.852468,0.667197,0.484020,1.716959,2.955135,3.295882,1.986284,4.996390,1.759465,3.607033,3.187913,4.065269,4.881128,4.448968,3.822810,3.491242,1.677491,0.738428,0.313180,1.209509,2.161407,2.609981,3.865418,4.793705,0.586602,0.535021,2.948474,3.726990,4.240752,4.679160,4.917131,1.999008,1.901676,0.739043,3.424672,3.283810,4.310313,0.486290,2.488885,2.905410,1.207785,0.845127,4.297904,0.292675,2.353105,0.579170,2.285294,4.899812,2.118532,4.285625,0.586578,1.356260,2.018964,1.999061,3.356917,1.723591,3.568834,3.195934,1.995806,2.158801,3.072638,0.350211,4.112034,3.267106,3.631712,2.684615,0.552386,2.025178,2.026868,1.605215,0.149752,3.686271,0.548922,3.031541,3.516087,3.173932,4.795711,0.516491,4.335836,0.145951,2.674584,2.021218,2.620919,1.825499,0.952835,0.095614,2.590749,4.213884,1.866080,1.114319,0.402660,0.426555,1.106982,0.500070,1.325198,0.330747,0.328024,4.281381,0.810601,2.798412,3.867278,2.282048,0.766844,0.997981,2.164921,2.641170,1.747201,3.907398,3.755108,4.636059,0.144763,4.478456,1.962844,4.391862,3.453924,4.936744,3.796412,1.822723,2.505316,1.881946,1.824559,1.304522,2.479851,3.408700,1.386701,2.621899,0.586901,0.799226,0.234032,4.853657,0.019302,0.892900,3.064334,0.406848,4.409483,3.598101,4.831950,2.538178,1.502018,2.747503,4.654094,2.603807,1.336035,4.386994,1.859594,0.006917,1.238425,1.591168,4.293887,2.292516,2.222936,1.680511,4.403391,4.725134,4.959452,1.883706,4.830737,3.959398,3.378446,1.224447,1.082286,0.830239,4.613783,1.470383,2.265471,2.469789,3.890858,4.221175,0.695364,2.134522,4.214274,4.090167,0.512069,0.781917,1.520993,0.376795,2.123315,0.538089,2.841088,1.232785,2.982165,0.587628,4.879419,4.662806,1.958985,1.210893,1.251991,2.416968,0.199964,3.198526,2.041515,1.887033,4.046825,3.545177,4.771669,1.759681,4.487714,3.849836,1.787123,3.108327,1.442850,4.372000,0.562137,1.062172,0.915166,2.015130,3.726165,2.634537,2.438382,0.002730,2.127009,0.317769,1.041266,4.661970,1.076991,4.291688,4.014467,0.795731,3.028560,0.578309,3.639441,3.187311,4.059693,2.396923,4.574315,0.246745,1.464443,3.575263,2.090546,0.864757,0.536054,4.086696,2.365715,4.411418,3.666446,2.048631,1.867555,2.578192,4.445300,3.686393,0.025765,3.470789,4.597537,3.552279,0.885029,2.417591,0.701580,1.794976,4.685585,4.616527,1.414184,1.698155,3.001064,4.815986,0.739007,1.284583,4.367784,2.459461,4.494805,0.927589,2.663343,1.631348,1.582713,2.234385,2.165387,1.786734,4.574854,3.658721,3.637735,1.449567,2.888547,3.895897,3.977952,1.722652,3.854364,3.679469,0.707532,4.329727,2.206607,2.432052,2.241846,2.839230,3.105846,2.490898,4.333943,3.138674,2.007140,2.083459,4.054193,1.740960,1.057274,0.296916,4.380134,4.592732,0.600601,1.672369,0.876860,0.579492,4.499334,0.284386,4.902428,0.482254,4.317353,2.832531,1.839587,1.711712,3.786821,1.572866,3.286595,2.586630,2.424828,4.505811,2.773225,4.134308,3.627868,0.192786,3.865550,1.084351,4.515748,0.214621,1.665360,0.498665,2.377946,4.100112,1.490937,0.754674,1.651335,4.069401,0.701920,1.136812,0.344260,3.528550,1.976166,1.554200,3.593132,1.679888,3.638856,4.075997,1.088314,4.869093,0.811790,1.454205,0.898976,1.727528,2.400304,2.610879,4.268030,4.447240,1.100519,3.114470,0.557480,2.294849,1.611668,1.582504,2.412921,3.649138,0.345913,4.395867,3.674069,0.882497,4.695805,2.531561,4.999043,0.986297,2.674541,1.451240,1.520868,2.955327,4.608595,4.026319,3.619707,2.795869,4.611493,2.461807,4.369161,4.169908,1.069177,3.856127,0.060856,1.614148,1.147837,2.534315,3.684266,0.488382,2.574611,4.692060,1.143233,3.385706,2.964401,0.050318,2.379131,3.543852,0.219877,4.397607,2.600407,0.153305,1.122068,4.768378,2.911599,0.537363,1.437723,2.283518,0.104750,2.058078,2.447293,1.218389,2.943195,3.766201,1.179171,3.102500,3.198111,4.742702,3.891381,4.241726,2.452100,0.926743,4.979076,0.646779,2.357287,0.340465,4.719254,4.824625,3.596945,1.749964,1.271912,1.326517,0.636470,2.629045,0.709086,1.583653,3.133532,3.637718,0.121364,2.150580,3.260623,4.266230,2.376624,4.846029,1.328163,0.067544,2.418764,1.280569,4.118588,1.163863,1.553146,3.956137,3.575716,2.790256,3.524740,2.093184,0.026550,0.056776,2.556109,0.416455,0.255377,4.827583,4.295013,0.760136,0.003321,4.708339,1.391626,0.929488,3.457541,0.544519,1.323248,4.875473,3.197314,2.603389,1.989593,3.872505,0.704787,4.836689,4.305615,3.088285,0.214531,3.504278,4.566422,2.622885,1.771124,0.601387,3.774506,4.425109,0.501259,3.794923,0.085302,4.835275,3.075290,2.762195,1.479749,4.646458,1.329528,4.140733,4.925543,3.916983,2.594950,0.330371,2.362069,2.191280,1.013980,2.117938,1.788789,0.818421,2.206871,1.314000,2.610312,0.175800,4.531157,4.081822,2.762907,4.259043,4.811975,0.552611,3.154159,4.989970,4.939446,3.016615,0.640104,2.915964,0.010323,0.994557,4.780616,1.652203,3.191951,1.404297,4.739109,3.642794,1.648256,3.958807,0.540828,1.961595,1.106091,3.418632,0.512231,1.985129,1.383249,2.531715,1.749488,3.532053,0.122885,3.169935,1.152856,1.343545,4.001278,4.777842,1.582751,4.134026,0.519954,3.169908,3.755161,0.779890,2.130012,4.463536,0.517892,0.090482,2.952927,2.177658,3.993446,4.617278,1.495768,1.942021,2.431360,2.940757,4.919269,3.486651,1.947743,1.318838,4.723129,0.677742,3.601329,4.626975,3.323328,2.115272,0.994955,1.837377,3.534359,3.247671,4.639881,4.334305,4.080754,4.557254,1.381686,1.847618,1.899470,2.802253,3.341091,1.433583,0.097312,1.996112,1.542640,4.710924,4.441325,4.301553,3.264999,1.721446,2.744246,4.076125,0.493052,4.005374,0.205899,4.082105,4.037819,0.255037,3.135804,2.512265,0.849098,0.741895,3.866296,2.838464,4.914996,4.911239,4.963335,0.593078,4.691281,1.222848,2.291061,3.787033,1.018105,2.831558,0.929084,0.523681,0.582793,1.788195,0.023274,2.124270,3.320986,2.008441,0.428973,0.313444,1.390583,0.846563,4.825475,0.756151,4.027312,2.930540,2.846435,2.560404,4.858815,1.819224,3.939579,2.776471,1.978168,4.777330,2.991580,0.594585,2.087696,3.907909,3.468735,4.581702,1.296887,3.790969,2.299376,2.868049,4.775233,4.896432,4.307955,1.795485,4.438504,3.193046,2.149984,0.178713,3.850641,2.510528,3.930942,3.740114,3.967837,1.503256,4.003993,2.744232,2.366631,3.375630,0.106793,0.511584,1.460887,4.914951,0.698729,1.652982,0.255265,1.656344,1.601631,4.734036,4.225770,1.913821,0.123845,4.155156,3.302681,0.761822,4.980356,0.501167,4.335573,1.471331,2.176767,3.977283,3.387542,4.689322,3.105702,0.489051,4.421802,3.845778,3.559352,0.268668,1.981114,0.837179,4.109520,3.502643,4.415388,4.832876,3.873738,4.971165,3.073849,0.185648,0.071258,1.710519,4.117359,4.330674,4.804063,0.325607,0.222856,4.566418,1.525233,2.789937,4.912224,2.002243,3.329357,2.004398,3.840973,2.638574,1.187616,1.356531,1.290296,2.661602,3.515945,4.746400,3.470437,3.905964,0.844631,1.870313,2.068901,3.431901,1.479460,1.516460,1.779446,4.051510,2.887950,0.376386,0.391230,1.856435,3.832955,3.443417,3.539912,3.836050,1.435764,2.741281,2.716763,3.698163,4.784353,1.389950,3.966408,3.299853,2.901189,3.874399,4.720162,0.183457,0.737001,3.781436,0.418957,2.580619,1.099304,1.371479,3.509202,0.150964,4.366597,2.222395,2.511966,2.700240,3.227721,1.724283,0.505537,1.591895,0.840711,2.780666,1.590143,4.790336,4.828671,3.100629,3.087486,4.926893,4.436416,3.825350,1.567953,1.827695,1.006334,2.435741,4.951843,4.560755,0.591747,0.125951,4.493188,2.685851,1.000949,3.368266,3.221116,0.610428,1.298001,0.300390,1.049302,0.661528,0.966181,3.427336,0.247499,0.509273,0.670868,1.582706,1.493752,1.275319,3.752683,4.990114,2.669890,4.721014,1.983051,0.533412,2.043869,1.480639,2.467035,3.285218,2.305251,4.675803,4.423824,3.509888,2.448425,0.658436,1.985068,3.522008,1.424428,0.519940,4.539492,3.545254,3.076382,3.962495,4.178230,2.417295,4.405941,4.582095,1.357755,3.037727,2.632920,2.689729,4.688315,1.525944,4.917170,4.510656,2.293614,4.087266,3.845235,3.389475,1.599169,0.982255,3.357638,4.214866,0.081264,3.214017,2.214365,4.490439,1.607365,2.370924,2.573836,0.702198,3.564462,4.152382,0.289546,1.456944,0.190223,4.782721,3.335844,4.821002,2.657471,4.010343,1.872070,1.769095,1.891339,3.289311,1.797266,4.501837,4.916374,0.152133,0.968116,0.561250,0.211820,1.138705,2.233967,4.184952,1.109120,2.469726,4.648094,3.336074,3.990395,2.754970,4.902332,2.943311,0.227554,0.989914,2.023868,3.006386,3.859654,2.065431,3.550292,3.949348,1.586301,4.896351,3.248282,4.404990,2.779688,3.708016,3.852720,4.541242,0.751749,2.791417,2.141893,4.615795,0.525473,4.912869,4.377257,0.369131,2.454832,3.587798,3.690758,4.532471,3.999327,1.554652,2.492174,3.508929,0.692184,0.969954,2.405212,1.491229,4.312796,2.931387,1.743326,4.244165,4.024392,4.991774,4.236538,2.072283,0.637494,4.203205,0.298790,1.751356,4.598690,4.803832,3.202823,3.443242,0.212272,2.572402,2.734341,1.700504,0.342984,1.144538,1.789920,2.175710,2.954634,3.611958,1.588159,1.644769,0.098458,0.204374,1.289108,3.701225,3.141569,3.848945,3.844597,4.282837,3.601596,4.895055,4.494126,2.933586,2.940788,0.171335,4.992633,0.657880,3.701736,4.105076,1.865273,0.984260,0.493799,3.743030,2.263268,3.568589,4.577038,0.732919,4.595855,2.058132,1.526335,4.715311,4.953258,0.994461,3.284192,0.532477,3.254570,4.136566,3.422493,2.086666,1.915332,1.965612,2.948559,4.407836,4.645331,0.267648,0.908112,0.561122,0.966673,1.733039,2.532658,3.147306,3.660711,4.450558,4.945442,3.314282,4.226823,3.890194,1.537660,4.378461,0.213816,0.001837,1.368663,2.310488,3.191814,0.508851,3.365051,4.009079,0.926565,2.075626,2.599925,2.259035,3.999150,4.802612,3.994766,0.389964,4.024678,0.332982,1.179852,0.765484,0.987596,2.641576,3.358449,2.351606,4.798478,1.201462,3.815701,4.350911,2.810331,2.281113,2.980922,2.144049,2.775969,2.084670,2.002349,3.476732,0.464256,0.832710,4.255992,3.855387,1.407269,1.886345,4.630133,4.090386,3.071731,1.107451,0.221260,2.156289,3.363136,4.142402,4.263445,0.163880,1.220785,1.695473,0.943661,4.014877,3.837329,2.584165,4.914632,0.720293,4.498259,0.582316,0.815909,3.481096,0.547848,2.829225,2.101168,3.642370,4.503376,3.849358,4.248449,0.164727,1.550977,2.577165,2.079767,1.156275,1.539370,4.727155,1.470904,1.769521,0.018549,4.225388,0.774204,1.020721,1.276323,4.423110,1.032257,3.987632,4.040247,4.635103,0.577807,1.086395,3.714491,0.980004,1.431648,0.833708,0.863483,2.407767,0.548415,1.608488,2.132970,0.122741,1.941666,0.470612,2.467893,4.128691,4.092111,0.402243,3.006139,4.172932,1.189863,3.809633,4.453822,4.030621,0.536505,0.045300,0.958621,1.352387,3.080915,1.921366,3.517035,1.765375,0.772127,1.563449,4.421621,4.792662,1.037564,3.942342,1.366744,4.435658,0.827728,3.329800,0.421056,4.869467,3.503167,4.209079,2.833347,2.384007,3.109412,2.643708,2.346922,3.797251,0.891005,0.855860,2.159213,1.603740,0.370623,4.222352,3.858014,2.719607,4.896623,0.363000,3.833347,1.331852,1.842995,1.096397,3.945189,0.721201,4.200083,3.307888,0.295116,4.054909,3.138779,4.524912,3.743612,2.805605,4.182736,1.390251,2.734750,1.468084,4.841022,1.130982,0.078691,1.629274,2.512547,0.141815,2.796242,4.371414,3.523661,3.114842,4.779809,4.791397,4.121332,3.038709,2.438823,0.066581,3.031310,4.945440,4.090505,1.703023,0.760235,3.920293,3.719689,4.835234,4.374212,2.778313,0.506421,2.417503,1.568475,2.562042,1.508508,4.309115,4.221635,1.577326,2.997907,2.150904,4.545464,0.936805,3.488642,4.851877,0.876378,1.009832,3.468617,3.895770,2.452745,3.048432,1.063412,2.383071,0.560359,1.607110,1.423899,2.223127,4.650632,0.906338,2.006941,3.077986,4.732785,0.665741,4.589383,0.405269,2.403707,2.272949,1.048014,1.737298,2.270826,4.326057,4.775321,2.594628,4.350499,3.040858,1.745437,0.970971,2.065674,2.614121,0.222217,0.729206,3.000922,1.125008,4.186632,1.634711,0.524171,0.417653,4.685615,0.590102,0.704549,4.313330,1.271441,3.329757,4.083628,3.035903,4.787443,3.544414,0.563758,2.792050,3.590933,4.009786,0.131607,3.594395,4.128404,3.734169,2.561746,2.290105,2.747093,3.523218,4.614571,3.085176,4.439172,3.506284,0.341682,2.504141,1.432432,1.425875,1.779638,1.573664,2.893050,3.418008,1.343747,0.648813,0.294044,2.878764,0.930651,0.046240,4.638765,2.685702,0.462241,4.214606,4.916014,2.243003,0.212448,0.587730,1.908269,4.427613,0.740193,4.119950,0.074881,2.286943,3.221986,0.301897,3.073814,4.722021,0.801300,3.648057,3.045469,0.925582,0.031017,0.046422,2.660462,4.713897,3.221493,3.571499,2.469327,2.909445,0.631838,4.384103,3.803963,4.990995,1.488615,1.135089,0.625808,4.821049,3.904426,0.831623,2.763432,2.068841,0.757430,0.810365,4.817350,1.524821,4.707196,0.378053,2.304015,0.648095,0.023937,2.768830,0.569471,3.610123,3.490582,0.881665,4.708711,3.605217,1.489851,3.546169,3.659651,1.711132,1.877943,1.795533,3.083092,4.502051,0.865966,4.375998,0.138266,3.301693,2.072194,3.956408,3.605991,2.400539,3.219320,2.508866,4.057592,2.380420,2.615780,1.252603,3.025215,1.514524,2.886420,0.848391,0.797345,2.085149,2.134098,1.340546,0.657984,0.196053,0.126159,1.357751,2.309267,3.631216,2.374359,4.520254,0.176099,0.903303,1.692572,2.887481,4.263681,1.751010,1.339943,0.309446,4.106517,1.898332,2.857751,4.917777,0.007973,0.727251,3.895555,4.025637,3.846236,2.684994,4.894285,1.980923,3.009718,0.316845,2.049287,3.612500,1.193694,4.719138,3.433917,1.437877,3.844995,0.415824,4.873872,0.246426,4.667279,1.264269,3.789121,0.000368,1.271200,3.745503,2.661680,0.574761,1.968149,1.877747,2.840811,3.339885,4.204151,2.486157,1.960109,0.719883,4.024115,3.566852,2.043387,2.592162,3.325914,0.824028,0.135989,1.587518,2.977925,2.433030,3.462773,4.098449,2.442212,0.671335,4.253140,2.874952,3.699687,3.523323,4.841059,1.476537,3.526534,1.828382,1.977054,1.152973,1.720051,4.741484,1.462854,1.229953,2.915690,1.290180,2.366929,4.170881,1.152002,2.133457,3.052449,2.728145,4.873616,3.401851,3.699731,4.834780,2.072190,1.776899,0.219312,0.921022,1.185948,0.917522,3.773919,2.679415,3.338169,4.102311,1.153870,1.629620,3.541801,1.963795,0.146355,2.174776,4.541365,2.045108,1.661245,4.947625,3.222078,1.829990,0.510098,3.939247,3.540375,4.609579,1.086378,0.574622,3.620363,1.016979,0.880519,1.599037,4.084126,2.697683,0.229252,2.319473,3.419898,2.691842,2.862251,1.123887,4.238697,2.806994,3.566230,4.909321,2.140993,4.405333,0.036405,0.167036,2.951400,1.557247,1.241383,1.389677,1.592015,3.644738,2.845980,3.945180,4.150983,4.214674,2.073221,2.106367,4.631329,3.308818,0.402336,2.710935,1.780036,4.937175,0.068277,3.060904,3.618115,1.444534,4.868208,4.297683,4.578264,0.096160,2.849361,1.473251,4.245143,3.164248,2.694385,0.572941,2.701114,3.159521,4.779562,2.925255,4.837003,4.808031,3.251002,2.529540,2.330109,4.451893,0.141283,0.569041,0.510359,3.784677,1.698255,3.189843,3.018915,1.929140,2.657839,3.225693,4.704752,2.878170,3.071838,0.339279,4.761079,2.640410,4.006367,0.251455,2.104551,1.284877,1.334879,3.957269,3.119334,2.198727,0.052929,4.824640,4.810116,1.087761,0.206732,2.650997,4.757054,4.551979,2.923314,1.517744,1.649804,4.489568,2.458920,0.655581,1.242127,1.383975,0.617733,2.315222,4.580255,3.343913,0.362370,0.027474,1.381238,1.813465,3.883748,4.835028,1.937836,3.433450,4.974510,3.728333,3.180948,0.390374,1.616076,4.566961,1.005027,4.217952,3.481618,1.831622,2.645871,2.714032,3.570269,2.582780,0.665380,3.867273,2.031362,4.815469,1.417569,1.315394,1.667537,2.861585,4.474349,0.881408,1.398394,2.908399,2.271671,2.236614,4.103671,4.619392,2.406535,3.436759,4.005294,2.591832,1.471582,3.190423,2.925546,4.507814,0.262035,4.550657,2.672160,0.078381,1.723511,3.621668,2.442165,4.900795,2.113050,1.633176,4.108360,2.739533,3.411633,4.028512,3.357138,2.112037,0.623982,2.901241,4.487167,2.094462,4.553626,2.517639,3.104208,4.164942,2.822986,0.454847,4.904897,1.229247,3.552527,2.525567,2.393863,1.219704,3.610754,0.563941,4.952267,4.226868,2.672545,2.122765,1.432323,2.507957,4.397087,1.375032,2.502687,1.172750,1.685746,0.951303,4.952696,2.857487,3.664076,0.491250,1.830588,4.463199,0.422192,0.827416,3.127088,3.113945,4.191135,4.677464,0.709932,1.296869,2.137307,0.004516,0.349072,1.132456,2.405510,1.257614,4.383409,1.621364,4.623114,4.873936,2.249308,1.135644,1.458331,3.881668,1.366749,1.902914,2.392879,2.875556,4.980502,1.161049,1.767119,1.314456,1.805567,0.504023,1.799049,4.439325,1.492949,1.859674,4.722371,3.641895,2.583694,3.885964,0.615898,2.322452,0.591181,1.168091,0.709336,1.809006,1.908197,4.736543,1.320629,2.362144,4.056897,4.078088,3.751716,1.439169,2.474858,0.931058,0.941998,2.179206,3.692961,2.632921,4.433416,4.154544,0.158027,2.842095,3.045806,4.807876,0.116183,2.655519,1.023907,0.268315,2.937443,3.863021,3.874327,0.151442,2.034732,0.222548,1.239193,0.964404,1.075913,1.695592,1.387090,4.811400,1.762036,4.470863,0.905208,3.818734,0.306728,2.313806,0.027552,4.051454,4.752430,0.175537,4.669232,3.869269,1.794308,4.544383,1.481286,2.046477,0.483556,3.284695,0.148004,2.424526,3.415959,4.106188,0.749707,3.770452,3.595385,2.797853,2.923223,0.456354,3.002355,1.907611,4.337904,1.565494,2.882975,2.132857,4.381310,1.269583,0.394012,3.743279,2.064483,2.945492,0.131947,4.760549,4.388092,3.119340,0.085149,1.889882,4.893983,3.406652,0.804939,2.302984,4.833689,2.673541,0.123073,3.098860,1.356083,0.494230,2.014542,2.792615,0.085204,2.795234,2.556016,3.969542,2.117749,2.767252,3.710047,4.485729,1.900173,3.008167,3.473055,0.216353,4.003803,1.887151,3.351195,2.358320,3.511696,3.621655,0.957855,3.310871,4.256617,1.177836,3.790917,3.169126,4.775630,1.301233,0.771389,1.560605,1.289794,3.784164,3.665547,3.348425,1.081896,4.309034,4.782858,2.658029,3.246864,2.503460,1.417789,1.430738,1.567103,0.954250,4.509618,4.291991,2.308197,1.836257,4.695392,1.111867,2.767710,0.272491,0.956011,3.020135,3.310918,2.904979,4.348007,4.967026,3.819309,2.325459,4.169673,0.601937,3.416353,2.591689,0.890329,4.864668,1.692187,3.077117,4.392971,2.533444,0.575689,4.093695,1.766069,4.915334,4.419127,4.267247,1.781266,3.785649,4.931645,2.631608,2.353661,0.073329,3.501019,4.292388,1.237286,1.575123,2.503385,0.360401,0.448212,2.105554,1.306095,2.030187,2.271931,4.881367,4.721299,0.698651,4.412930,0.401033,2.538177,0.819550,1.829461,3.716701,2.122527,4.034756,3.594079,4.714197,2.670780,4.010740,1.614536,1.728729,2.002552,2.054579,0.516266,2.595495,0.484016,4.448811,0.309224,2.248472,1.423470,0.774347,3.919183,3.574662,0.729739,3.163828,3.962776,3.866661,0.461398,3.427564,3.580120,4.310831,2.540222,2.305470,4.825582,3.982561,2.793655,1.653085,4.226190,2.277182,0.463426,2.274521,4.359842,2.241411,0.071746,3.057427,4.979150,4.086243,3.086190,4.571994,4.067908,2.493197,2.956101,3.656464,4.232131,0.290882,3.874019,2.237517,3.303993,3.823165,2.697510,0.792574,2.047634,0.384365,3.446503,4.768531,3.976264,1.948932,2.921457,1.521003,2.705228,1.503635,3.691624,1.296708,4.820102,3.309744,0.343889,0.053889,4.985232,1.102528,1.562814,1.042070,4.640509,3.260064,2.521932,2.788254,1.589364,3.070875,2.098002,0.996141,3.283025,1.869203,3.925332,2.076975,2.541357,3.937332,2.239390,4.831106,3.965143,4.132152,4.769602,1.944253,2.900401,3.467959,3.367292,4.764684,1.441743,1.456808,4.590022,3.996528,1.016783,2.850234,3.728819,1.765182,2.171911,2.876983,2.335543,3.765212,0.029694,2.173163,1.687907,3.045820,3.879792,0.380726,0.790299,3.325408,3.692012,2.941009,4.914017,2.497307,0.681462,3.431455,3.010378,2.952107,2.729268,4.695479,0.645782,0.365986,0.770586,1.224951,2.964732,3.062126,1.163009,2.446127,2.410309,2.265554,4.017726,2.358465,3.791827,0.832406,2.659837,4.120524,0.888583,2.324611,3.045397,0.923873,3.783828,0.394981,4.732078,2.341107,1.680615,0.584035,2.162983,3.299020,0.472436,1.531345,4.180088,3.230905,1.031865,0.804549,4.522425,1.435101,0.897501,4.999820,1.545959,0.623701,2.308788,2.171726,4.634012,0.671025,0.455682,0.464893,4.521437,2.246846,0.753033,2.969150,2.688117,0.992034,3.015191,1.701156,1.191854,2.552003,1.458246,1.110700,4.398612,0.778813,1.402950,1.930692,1.368192,1.053553,3.855730,1.645081,0.562565,2.704476,0.627442,1.787598,4.409134,1.845806,3.162545,2.573128,0.688624,3.245348,4.280175,0.466062,3.768400,3.451056,4.333303,0.520460,1.528477,3.471457,0.110090,3.670378,4.289893,2.266520,2.171650,1.392345,0.025259,0.931518,4.899321,4.336430,1.332523,4.818744,1.838563,1.487927,0.764038,4.508055,4.934962,1.637057,3.517152,1.676517,0.524954,1.963462,2.757850,0.615084,4.091364,2.486816,1.171915,2.963798,3.966297,1.638122,3.507382,2.139296,4.820256,3.854700,1.781755,0.088740,3.287599,0.989361,0.609396,4.658882,4.999745,1.349444,1.508843,0.824945,2.288424,4.329219,3.507530,4.231658,1.142408,3.652280,4.592633,1.407081,3.453268,2.003287,1.451133,4.848117,1.743166,0.539248,1.942946,2.238391,3.761054,4.749571,4.085285,4.654707,2.375301,3.596583,1.545248,0.347936,1.827368,3.489576,1.373111,4.307029,3.953864,0.970213,1.654184,4.126513,1.219689,1.658011,1.715335,4.005210,0.185151,0.368935,2.892258,1.985560,3.164427,1.332306,4.547913,3.804709,0.338731,3.919527,4.847912,4.712178,3.677419,0.617969,2.880384,1.421164,4.851065,3.587429,3.053828,3.475440,2.189896,1.863684,4.678998,1.659636,0.207181,2.004201,3.951702,3.242342,4.810854,0.531009,4.557732,1.844246,2.370013,2.142411,0.582261,1.238982,3.711358,0.115038,0.669439,0.126051,4.286940,3.086624,0.849643,3.843861,4.834003,4.672802,4.607738,0.039051,2.945067,1.283163,2.823236,1.590151,0.768333,2.222469,2.475482,4.948828,0.211939,1.505776,4.259469,3.298477,4.133415,3.301455,3.797682,2.464609,1.024388,4.050019,2.839103,0.697526,4.024470,4.792930,1.730819,1.467561,0.408876,3.322456,4.794808,0.679963,2.425798,0.491191,0.170550,3.322505,4.338436,1.687853,4.378826,0.585265,1.189803,4.508034,2.542549,3.040962,0.190091,0.641950,0.278954,4.525004,0.673975,4.248364,1.755173,4.002987,1.825218,1.338420,0.468304,1.403533,2.357399,4.087544,2.262575,4.857178,2.708165,0.124728,2.076837,3.444496,1.171458,3.493150,2.518487,0.128689,3.871765,2.801869,0.412468,2.376070,1.436464,4.398408,1.424635,4.708435,2.730664,1.618069,4.067725,3.487002,2.069812,3.148092,3.892921,4.257789,4.082064,0.830385,4.141948,0.293145,1.000853,3.114634,0.573463,3.016738,1.539828,2.147333,1.575758,0.350868,2.503794,4.817997,3.058917,1.500159,4.780749,1.946186,3.487589,3.170564,4.764554,4.573013,0.740020,0.428429,4.048212,4.524716,2.464868,3.453806,0.348941,1.099022,0.746881,3.005803,0.987699,0.299232,1.511036,3.386062,2.889319,1.653625,4.167394,1.381346,1.302738,2.799737,2.391078,2.229863,0.778928,2.523231,1.295095,1.960899,3.667852,4.684314,3.869315,2.028169,2.965166,3.732489,2.071105,1.801241,0.676216,3.681304,4.192543,1.582922,3.917539,3.051065,3.920415,2.056687,3.737882,2.042546,0.443790,2.752895,2.271644,1.264399,4.460567,1.914267,0.195631,1.910679,2.122549,4.308189,3.995916,0.999833,4.195146,1.239636,1.709671,0.384092,0.276782,3.404301,4.616705,2.465084,4.220469,3.968756,3.323394,4.891145,4.010940,1.374222,3.945071,3.463308,1.997602,0.383987,1.071798,3.986189,1.242426,4.989290,3.469941,2.386112,2.852183,3.054364,4.844724,0.808706,1.361979,3.547955,1.199290,4.356486,1.732671,0.904197,0.238104,2.977975,4.126411,1.368966,4.587697,3.788671,0.306503,2.863165,2.837205,1.011862,1.672722,2.291394,0.240389,0.748882,0.820022,1.896179,3.736787,4.156518,0.814245,3.759530,3.353550,4.453437,4.843956,0.622303,0.403369,3.998651,0.810854,0.972873,4.410180,4.694824,1.592356,4.210841,4.294285,3.026952,2.830442,2.879192,1.506446,3.094335,1.217901,0.888161,2.064752,3.528902,3.107138,4.824410,3.232280,0.706570,0.806091,0.465336,0.955869,2.989755,4.191432,4.469338,2.000219,2.792915,4.045998,1.560353,2.978345,0.870413,2.382702,0.865361,2.312132,1.984098,2.166324,1.218561,0.680217,1.378327,1.197900,3.671481,3.584875,2.922415,0.456669,2.831309,0.396185,0.090865,1.762981,1.202725,2.973238,4.643212,3.599260,3.836804,4.754466,3.170455,2.888655,3.009340,4.329026,1.940495,3.976681,3.261285,1.522858,0.068442,1.049600,3.499944,2.898452,1.372973,2.171512,3.305744,0.635431,2.161398,2.083121,2.713005,2.609568,1.838633,3.813668,0.336145,0.177692,2.101297,4.483471,1.387847,0.861547,4.641042,0.841116,1.874203,3.645078,1.304620,1.149248,1.988336,3.936824,4.554917,0.156463,0.825541,4.793006,2.963956,2.757051,4.067718,0.198916,0.069181,4.837470,4.142853,3.736909,0.778504,2.383020,4.686468,4.667998,0.046236,3.762457,0.031189,4.921509,2.084836,4.867594,1.838734,1.465936,1.581460,3.653395,0.998364,4.320288,2.952863,4.849555,4.935425,0.925910,4.778910,0.232692,0.139319,4.719323,4.811984,0.736238,2.212079,2.470463,4.301406,3.139586,3.872832,2.425484,3.242069,3.677047,3.689406,0.008689,0.499540,1.818302,0.305987,1.914949,1.947834,4.601168,2.835359,3.531756,4.435993,2.210647,0.009811,1.426680,4.070794,4.509206,1.757548,1.469956,4.622526,1.755369,3.261226,1.401546,0.489594,2.506182,4.616159,3.093204,1.044133,3.412148,3.841806,1.603803,2.796047,3.409766,0.801766,4.820505,2.256260,4.898322,0.947869,2.418868,0.829268,0.050904,1.189376,2.015937,2.155654,4.432526,3.178386,2.172208,4.939988,3.071122,1.613315,3.456554,2.478500,4.405838,4.482556,1.836752,2.811695,1.328867,3.133184,4.961735,4.162943,1.832050,0.476902,4.833410,1.947924,1.466904,1.581677,2.449617,4.783757,4.933112,1.480634,1.757344,2.559033,0.040936,0.874183,4.680295,0.147176,0.504881,2.103235,3.657251,1.344391,1.529828,1.527365,4.363010,1.130488,2.812009,4.999656,3.642327,1.681753,3.827295,4.769579,1.867689,3.540056,0.379021,4.476484,0.481284,1.864625,2.712529,1.317888,3.246347,2.772144,3.585926,1.770697,2.730069,4.060927,4.053482,3.571200,2.709679,3.366306,0.434401,2.356586,4.300718,3.036824,4.708416,1.310893,0.481509,3.133067,0.454630,3.910677,1.283712,2.693759,4.056885,3.940177,2.479875,4.879232,2.488166,1.393957,1.512156,3.718214,2.185535,2.093942,0.102433,1.526391,4.301915,4.017522,3.732554,0.115642,0.134951,1.557325,2.372266,4.548706,1.923149,1.442625,2.855765,4.573471,3.693194,4.283331,0.910988,0.628322,2.720356,3.486854,4.774940,1.857672,1.732784,2.579271,3.424690,2.830119,3.615153,1.901575,4.310988,0.914878,1.579523,3.868388,1.678361,3.340773,1.438988,0.935522,1.503663,4.434966,2.304416,1.127076,1.607193,0.013855,3.779041,1.128387,2.989605,0.125548,4.172492,0.937224,0.023842,1.505939,4.602436,1.313071,2.517394,2.036149,1.471246,4.636768,3.944975,3.809567,2.630536,4.124308,2.292143,2.325948,2.468870,1.184551,4.618259,1.293753,0.990797,1.218759,4.086761,3.842728,2.135534,0.068910,4.878675,0.662655,4.257113,3.908615,4.690379,3.866993,1.656858,1.159570,1.888454,1.015436,3.597874,4.132593,3.232194,0.930464,0.186924,2.902006,2.313366,0.998520,1.840420,2.707331,3.164586,2.383219,4.856964,0.231132,3.291040,4.547790,1.182821,1.068536,3.811164,2.431869,4.960888,2.945618,4.617210,0.061053,0.772698,3.422095,2.082332,4.179823,2.144490,3.564983,2.830800,0.599518,3.589756,3.531859,0.578591,2.809557,1.678250,2.294249,2.113793,0.523872,0.790115,0.434043,0.962235,4.262222,0.122613,2.158086,4.004682,0.501291,1.138568,3.637199,3.237762,2.815119,0.858204,3.972655,0.707071,0.673989,3.975175,1.846117,1.563086,1.393360,1.624861,1.702938,3.481838,1.201311,1.626632,3.881058,4.565753,3.064180,0.525591,2.707923,3.138894,1.570263,4.140002,3.910394,2.876534,0.725078,3.486907,4.476743,1.250506,4.793429,3.856512,1.501608,3.084106,1.539240,0.497339,4.120743,3.329035,3.070003,0.710864,1.886886,4.383180,0.816522,0.239514,0.955757,1.250900,3.918213,3.240707,0.086714,0.086448,2.834482,3.166462,0.627109,3.052311,1.201760,1.683607,2.044158,0.580974,4.815468,4.868822,2.225008,1.287332,4.792972,4.090287,3.621143,2.309059,2.052894,3.896746,2.598068,3.302911,2.830965,3.560927,0.470525,1.888105,0.835446,1.210220,1.004121,2.516611,0.094965,4.819838,2.594819,0.262858,3.410269,1.344440,0.533838,4.151518,0.989538,0.523771,0.284532,3.642789,3.276356,0.040996,1.107403,3.523410,0.760704,2.883754,1.065782,2.246171,4.337115,1.512982,3.429862,2.191406,0.480776,1.803175,4.206400,4.865231,4.225408,0.811142,1.727546,4.155941,2.769480,3.880929,3.888916,0.355440,1.712033,2.395108,4.726124,4.491144,2.115160,0.478330,2.022711,2.679517,4.521986,1.474396,1.544321,3.135916,2.525958,0.979345,0.723636,2.447486,3.896955,3.894156,4.879018,1.913591,1.959947,0.009097,4.149587,3.233142,3.849611,2.353116,4.600967,0.145569,0.576406,1.880087,0.425530,0.439439,2.834363,1.080610,3.132676,4.646999,4.119411,1.242152,0.448315,4.750962,4.972480,1.872474,2.303386,0.726668,3.550904,2.109168,4.015076,2.886484,0.213919,1.674773,4.042981,3.440569,3.162660,3.362523,3.025184,3.205622,3.102106,2.667140,3.788736,1.847463,2.376192,2.007248,1.046052,1.609445,0.275075,1.627638,1.952915,0.466920,1.102276,1.247709,1.137351,1.751109,0.724381,3.657507,1.713274,0.611826,2.967999,0.898241,0.290282,0.816461,2.099974,3.467545,3.207504,0.026030,3.966453,1.678439,3.398578,0.163366,1.968941,0.098053,4.081728,0.934836,3.372740,1.385331,0.676756,4.651477,2.975123,4.453155,1.532997,4.149177,4.708412,1.975919,4.520655,1.675429,1.623000,4.978663,4.762052,1.143092,4.186010,1.712289,4.896217,4.249088,4.524597,2.868368,1.470757,0.987625,2.639360,3.357579,3.708943,0.851916,2.679440,2.180549,1.041121,2.764812,1.379569,2.675273,1.000547,4.499713,1.690514,3.051673,0.609665,3.150086,1.360202,4.782658,1.970771,3.037033,1.079067,4.307381,4.021665,1.228177,4.555243,0.200775,3.762866,2.289344,4.177297,2.327430,0.327910,1.132728,4.971874,1.670888,0.801526,4.029154,0.225349,0.332044,1.487594,0.237005,4.978563,3.455644,2.597932,4.025832,3.312434,0.866325,1.098169,4.338471,1.684807,2.238202,1.955679,0.260149,3.522869,2.700370,3.380700,1.391157,2.034570,0.963249,2.098413,3.267457,4.723445,3.317286,2.625799,2.081836,0.527748,2.385371,0.775540,2.910936,3.651235,4.732478,1.484264,1.984528,0.914760,4.389703,4.120386,3.874799,0.286450,2.783597,1.175068,0.598426,3.908066,1.057907,2.504058,2.630482,1.066410,2.461306,0.264099,0.000362,4.401610,2.077944,4.537099,2.481537,2.155541,1.479561,0.408445,1.548473,3.042351,3.813932,2.704128,3.791279,0.788758,2.916200,4.413016,1.089801,1.138345,3.742163,4.060284,1.240232,1.657849,3.158847,1.992159,3.120055,2.482150,3.868257,4.229443,4.319136,3.057625,3.062921,2.248234,0.138070,1.495901,0.318489,2.188926,4.247426,2.984010,3.377663,0.940040,1.309766,0.815661,4.213444,1.401565,2.811632,0.705643,0.619945,1.737917,1.651766,1.644266,3.004664,1.579951,3.843679,0.453354,1.623929,3.345966,3.014661,0.597578,2.197367,1.546107,3.159352,0.649351,3.352830,2.319163,1.374450,3.737220,0.939549,0.761190,0.076780,4.306502,2.461828,2.583578,0.573813,0.538881,1.668917,2.581153,3.504361,2.496352,4.157792,1.886962,0.140440,2.130761,0.425013,1.610272,4.925773,4.286771,1.182279,1.879812,2.155826,3.819342,0.167286,0.193114,0.585589,3.141625,2.072733,4.244628,1.420289,2.446260,3.533929,2.726006,1.584000,0.762714,2.703017,0.710783,4.696522,2.699453,0.874577,3.603213,0.517736,3.858224,2.286446,0.663310,0.186055,4.966890,1.371841,4.761243,2.509182,2.515077,0.455349,4.753529,3.664479,2.593639,0.601286,0.878383,2.160833,1.811294,2.790690,0.381720,0.201730,2.555515,0.142507,0.297760,1.881707,0.308895,1.927348,1.208753,0.938851,2.023399,0.599520,1.748197,2.174368,4.150015,4.664031,1.541692,1.463210,2.832591,0.687072,1.748561,0.266082,1.895341,0.570757,2.809065,3.207969,4.935458,0.975693,1.036011,4.737098,4.323204,3.080270,4.207036,1.048461,4.370144,4.336538,1.240561,2.541867,4.648871,3.395750,3.302596,2.798823,1.344158,4.892077,2.237548,1.557250,3.642904,3.038524,1.711207,1.518958,1.072533,0.392432,3.128555,2.528468,1.174242,0.275623,0.094505,3.692480,0.941266,1.333218,0.070561,0.753195,4.372229,1.210304,4.769791,0.821734,1.266307,4.338550,2.133042,1.339145,3.464069,0.256142,4.453026,4.207808,0.428985,3.993094,4.805852,2.460348,2.840767,3.398984,1.333635,3.248306,2.374338,2.027709,4.514008,3.989516,4.673038,4.183259,0.209053,3.032647,3.488184,3.324287,1.359782,2.128152,0.195146,0.470471,2.802560,2.912059,1.006146,2.241014,2.360386,0.056684,0.712604,3.121500,4.964101,3.251959,0.601083,4.107201,2.157689,0.418501,2.999123,1.140230,2.083909,1.591471,3.214270,2.155173,0.519910,1.078378,2.502226,3.945921,0.048716,3.062136,0.579409,3.020247,4.184038,1.142415,2.477574,3.870265,0.877887,0.762806,4.525229,3.473233,3.682867,4.219843,2.697129,2.442027,2.781287,3.585090,1.954687,0.475841,0.677984,4.869515,0.258588,3.558097,4.718408,0.646298,3.611322,1.512283,1.184825,4.263113,4.546768,1.735253,3.163238,0.879688,3.948797,4.406199,1.593362,3.264835,4.382088,0.076875,4.278676,2.860572,2.070077,2.613079,4.120310,3.610648,2.506324,2.438262,4.496289,1.161711,0.478508,3.393191,3.511059,2.841930,1.312683,1.479765,3.085216,1.364792,2.498106,1.660372,2.552191,1.146819,0.990302,3.669992,1.928638,1.162831,4.292102,2.008502,0.579351,3.540240,1.399860,2.826211,3.118465,4.812872,0.955506,1.420860,4.661099,3.591465,2.246655,3.673867,2.066926,2.050258,0.782084,2.610241,1.313322,3.167967,1.993031,4.268605,3.856813,0.739666,2.955460,3.568703,2.572205,0.569736,2.516237,2.164495,1.628772,2.912678,1.624362,1.177783,3.679506,1.066855,4.026441,4.895805,2.206194,4.061962,0.841839,3.986518,4.812336,2.585117,1.278599,0.804131,4.583134,1.622863,2.485019,2.167158,2.176078,3.826291,4.675792,3.183873,4.785691,0.952223,2.819686,3.427535,3.574882,3.779237,1.665751,4.410973,0.658528,1.392679,2.343570,2.959990,1.476421,4.539128,2.259234,0.501687,4.095259,4.827269,1.731638,2.773218,2.915353,4.008105,0.759191,4.206270,3.608048,0.174600,2.834576,0.140169,2.482200,2.997066,3.174399,4.634393,1.485285,4.222829,2.261106,3.334699,4.039717,3.620206,3.977503,3.180348,4.003903,4.545067,4.522094,1.639441,4.859864,0.288335,3.082013,2.476123,1.152380,2.675740,0.329773,2.768571,4.272327,0.704862,1.626761,3.155616,1.796506,2.075015,1.692254,2.413349,1.865980,0.721242,0.994064,0.396233,2.338285,4.227020,0.452755,3.293627,2.101116,4.356905,1.816568,3.472217,1.995561,2.709742,3.874728,4.839285,0.674437,2.645485,0.661343,0.152519,3.739753,4.916357,2.977016,0.362163,0.308640,1.572737,1.904420,0.019332,4.213415,2.342899,4.978538,4.420735,2.503882,3.135291,1.572760,1.516781,0.651025,2.727001,0.408356,2.234298,1.608622,3.952667,1.907228,4.507477,0.947652,4.652733,2.966433,0.601208,2.510751,1.339591,3.745182,3.256547,0.313683,2.087731,4.435681,2.039135,3.718153,0.566913,4.334583,2.512159,4.737861,2.686606,3.846128,4.860569,3.646735,2.886367,1.833541,0.212625,2.162729,2.062402,4.115311,0.946264,3.713224,0.187818,4.431827,3.339713,2.112219,1.327539,0.922005,2.928226,2.051193,3.715114,4.533873,1.478258,3.249502,2.113611,0.213695,3.077163,1.818513,0.068630,2.361400,0.458345,3.140848,2.632482,2.501744,4.684396,4.402137,3.569670,2.887704,1.261847,0.040814,0.598174,1.601471,0.983639,2.850019,2.674749,1.948957,4.002723,3.655786,3.439414,2.513376,0.217226,2.140139,2.495909,2.239238,0.022373,3.262144,1.286964,0.223294,2.517343,4.602737,0.147201,0.068708,2.938740,2.714931,0.078532,0.515344,4.181973,2.263192,0.621936,0.779602,3.057114,1.643330,0.128526,3.180092,0.161765,0.551400,0.793841,0.716390,3.807815,0.467227,0.743208,2.235078,0.700418,3.734680,2.438729,4.398217,0.190579,4.275992,0.769055,4.628174,1.630206,2.553915,0.118470,3.645695,1.068856,4.583084,3.308935,1.418096,1.304543,0.852396,4.009353,2.192384,1.384728,4.764098,4.011204,2.931515,4.012243,0.600634,3.360819,1.620758,3.437545,4.808286,3.901798,2.827794,3.727666,2.341658,1.399726,0.203170,3.386015,0.712957,2.296740,3.333773,4.456470,3.046818,1.088623,2.370278,3.338100,0.976588,3.660859,3.819121,2.612647,4.294006,1.123699,2.688687,4.470821,3.520758,4.034372,1.110465,2.863903,1.620214,3.294582,2.613048,3.127444,3.088350,3.682179,3.994411,0.309389,4.741884,2.032225,0.850485,4.609901,3.919957,2.101769,2.999573,1.130986,2.065652,2.004700,3.770202,2.158615,3.774356,3.950397,1.928099,2.200317,2.603580,0.017553,0.975275,4.235686,3.804702,0.385758,3.174488,0.103677,2.671018,0.807408,4.267262,3.074076,0.319911,3.206269,4.460991,3.668532,0.576012,3.325466,3.053513,3.156759,3.975811,1.522096,1.777343,1.009081,2.285880,2.049217,0.420509,1.213033,0.599638,2.772542,0.936333,1.628011,4.085267,2.859246,2.597916,4.721814,2.186757,4.418205,2.889270,2.026677,1.730360,4.516890,2.826227,1.258568,2.597344,1.248854,1.203344,0.645707,3.446546,3.905218,1.618060,2.046483,3.965340,0.081516,1.664155,1.537972,2.717258,4.474346,0.202584,4.213857,2.785639,2.938335,4.784828,0.641416,1.383218,1.150259,2.344200,2.899149,3.639315,0.265196,2.130647,4.621372,2.312964,4.088114,0.559899,1.448408,3.676984,3.106771,2.215763,3.344570,3.854842,4.487544,2.201776,3.213048,1.907301,4.635249,2.403418,2.052615,4.697356,0.009806,1.659855,4.191028,2.257242,1.741932,2.939082,2.023379,1.647518,1.329867,1.565227,4.620810,4.798365,0.494153,3.677069,3.288813,3.154843,0.164217,1.367270,3.730514,2.479034,0.119442,2.632578,4.239024,4.392101,4.493130,2.636662,2.334838,1.221723,4.330388,3.999286,4.317874,1.129725,0.489515,3.492225,4.565756,4.582884,2.643157,3.210526,0.560406,1.376439,2.688755,4.403844,2.420699,2.963541,0.277682,4.823270,2.462136,0.801352,1.694855,2.566537,0.692572,0.983234,4.579485,4.362763,0.611511,1.394990,3.177922,1.298768,0.010419,3.506073,0.965393,1.624778,1.419682,0.761846,0.678426,0.724567,4.837458,3.634254,4.700377,2.857700,1.655044,0.819634,2.416781,2.466993,3.887349,2.642197,0.974252,4.070954,0.739580,2.644570,0.212346,1.845905,3.359366,0.693543,2.624400,2.694196,4.546776,2.333147,0.391754,0.729686,1.378043,3.994770,1.275542,3.047146,0.391908,1.010727,3.095714,0.490694,3.577713,2.245501,1.397876,4.369501,3.365791,0.320922,3.350988,0.991896,4.601295,0.768660,3.083448,1.212033,4.710832,1.622336,2.948183,0.647547,2.396860,3.044181,3.853481,2.785337,3.517994,4.295408,1.492784,1.700835,0.147869,2.771309,4.857655,3.680513,4.962928,2.271760,3.737368,0.806041,2.110032,3.218069,2.251560,0.148611,1.584213,3.380339,1.975969,2.242025,4.280896,1.346954,3.079658,4.228853,4.035753,1.193618,0.255449,1.384139,0.882017,0.138554,1.521808,2.604057,3.251595,1.889476,1.021415,2.846530,3.761832,3.474758,4.284923,1.319335,2.515049,2.442187,1.607913,3.432105,0.671171,4.025746,0.183096,1.940899,3.036602,2.121820,3.278461,0.194003,4.335803,0.388286,1.438732,1.466845,0.059068,0.470119,4.259420,3.879074,3.689967,3.446481,0.372650,1.493287,0.032866,0.302605,0.189438,0.994670,0.281418,0.084419,1.224574,3.994270,0.281555,4.922746,3.287916,4.334104,3.303505,3.884369,1.503894,1.286623,3.322125,2.815772,2.528316,0.886276,1.153243,2.748626,2.049590,4.812561,2.764112,2.158558,4.752994,0.458069,1.358910,1.731972,4.267513,3.832060,1.523571,4.362817,0.312783,2.467335,3.273421,1.560972,0.345855,1.285802,2.418859,1.590532,2.078359,0.465623,0.071368,4.388063,0.390559,1.464123,3.320227,4.222522,1.606314,3.260343,2.360656,0.255065,2.041815,0.149240,4.820951,3.810919,1.696462,1.173702,2.001636,1.580822,1.853972,4.593572,2.022626,3.706997,0.784065,2.668405,2.468670,2.956160,3.399437,4.305097,1.149836,1.907671,0.285914,3.120906,4.673800,1.980986,4.858755,2.989376,1.056234,2.647645,3.200228,3.331364,3.190209,0.948070,1.041553,1.207315,3.664970,2.496773,3.356278,3.996817,2.820348,2.355705,2.012575,2.681314,0.747892,3.932228,4.563796,4.061825,4.109478,4.147007,0.878246,4.979064,3.285929,2.104635,4.440119,2.911756,4.968123,3.760368,1.837554,3.712811,3.650550,1.564954,4.420876,0.703825,1.826368,3.181371,2.395696,3.390779,4.986768,0.389983,3.794844,4.087123,1.411007,1.275780,2.206788,1.969284,2.539095,1.057921,2.469002,4.063762,4.414417,3.333811,1.440652,4.366226,2.106140,1.159036,0.672987,4.808344,0.439896,2.648802,1.010886,4.341402,0.972633,3.682399,0.825580,4.690561,3.316625,2.075604,4.812413,2.620254,1.920369,0.812378,3.605447,2.981665,1.114464,1.249809,1.101911,2.479209,0.236447,1.446237,3.683120,3.106150,4.092981,3.724125,0.106387,2.847846,2.192084,1.806500,4.961908,3.284817,1.255350,2.664330,0.476160,3.726366,1.738259,0.844417,0.812107,0.076144,3.889401,3.643499,2.425129,1.529824,1.958058,4.420442,0.606499,0.147824,1.078622,2.603428,0.038415,0.521324,3.489320,2.240314,4.743195,4.553833,1.382289,1.888580,4.590859,2.896288,1.848610,4.002034,4.622521,3.367465,1.154518,4.096303,2.102631,3.490233,2.431768,4.704325,0.341876,0.778984,0.972841,1.105003,1.177138,0.764251,3.464588,1.090779,1.177267,0.986941,1.993436,4.792966,1.833901,1.488121,0.342998,1.762638,1.160980,3.814637,0.558141,0.718405,1.392552,1.440134,4.231525,3.956418,2.893178,1.442943,1.594392,2.961091,3.699333,1.920490,2.547810,4.440166,3.248954,2.677751,0.356112,0.880076,1.004958,3.115741,0.540564,0.144974,1.801753,3.594296,3.466247,3.963352,3.481241,3.066428,2.430810,1.042492,2.842740,3.183124,0.618717,2.825737,0.488744,2.735384,0.794594,0.595068,0.565500,4.555127,2.990437,1.250794,0.357244,2.680907,0.724015,3.892015,2.480548,3.632244,1.978633,3.511614,3.423072,2.807081,4.228698,2.912368,2.890552,1.539916,4.657531,2.585698,1.958573,2.708211,0.726211,1.325626,1.533409,2.575794,3.477554,1.436012,0.678830,2.796091,4.273249,2.091160,2.378865,1.446043,4.044171,0.603325,0.855444,4.999783,3.411079,2.740262,3.975540,4.984412,0.954371,3.956965,1.710810,3.656163,3.538299,4.991650,0.559360,0.010627,3.738922,2.843885,3.454371,3.767625,2.467533,1.782673,3.851879,1.900650,3.110961,4.467030,0.791957,0.044531,1.283783,3.987360,2.834128,4.730804,2.739370,1.328907,3.829427,3.287752,4.103417,3.339992,2.259745,1.385413,0.278002,1.539681,0.231292,2.150135,1.129000,3.518238,1.100893,0.407159,4.193986,0.300164,3.754792,4.647127,0.535646,2.798340,2.258634,3.993550,3.117400,1.391367,0.007345,2.414339,4.470544,4.526816,0.626485,4.303385,0.172156,0.461746,4.831104,1.934837,0.353919,2.352277,0.230685,0.081851,2.808751,1.056031,3.109563,1.673496,0.662385,4.922009,1.249707,0.309886,1.394183,1.258500,1.498232,1.778371,4.025826,0.298922,1.772663,0.518728,4.910983,0.719859,2.395175,2.400217,3.905891,1.360729,3.688869,0.131693,4.635752,0.494778,2.404148,0.867149,1.843084,3.210103,0.712361,1.445543,3.395912,4.222723,2.964489,2.614923,0.548045,0.732702,4.790957,0.013124,2.422093,3.781712,1.049815,2.297819,2.465306,1.301986,4.393756,4.625781,3.746684,0.043183,3.144628,1.160559,1.335923,0.919020,2.862057,2.233593,0.967821,4.663205,1.196116,3.893695,0.123455,0.917401,4.094330,2.682133,3.230538,2.144492,2.178161,0.627020,0.854963,4.594985,2.288161,2.362275,3.331654,0.070635,2.663471,4.426678,2.086523,2.063018,2.266551,4.275510,3.050005,3.736755,3.590751,0.254299,4.883498,3.531041,2.900626,0.225883,4.590406,2.347784,4.555962,2.092035,2.886525,4.468590,2.304155,0.897657,2.125325,1.908133,3.654315,4.203668,0.056661,2.474076,1.336335,0.822163,3.328528,4.177728,2.722029,0.968971,3.756427,2.606663,4.023191,4.823614,2.096755,1.595010,1.410398,3.454932,4.859387,1.429095,2.311391,2.881655,4.769618,1.235726,4.808165,2.620130,3.641935,3.906704,0.823046,4.873723,4.880603,4.330850,4.216774,1.631322,4.260332,4.441640,1.332632,0.853281,3.784894,2.888676,0.539316,1.997528,1.660000,3.303454,2.102026,3.243381,3.996940,3.535363,3.087677,4.532339,1.238909,2.537782,3.780558,1.120172,1.058468,3.421365,3.903196,4.431824,2.241568,3.581480,0.854748,1.573796,3.160604,0.739418,4.778412,0.639287,3.883821,1.593069,3.664526,2.023789,3.738144,4.501692,2.980717,0.819640,4.755347,2.662428,1.197137,2.042137,3.605463,4.676502,4.532932,0.701446,4.358948,2.950836,2.048397,2.321835,3.973059,4.223875,3.289484,0.292306,4.042318,0.128721,1.938841,2.220837,2.530533,1.279767,2.095331,3.936492,1.356332,4.066254,0.062879,0.713994,4.626503,2.352000,0.253988,3.052216,2.280035,0.442938,1.739812,3.072130,3.138543,4.434515,2.462530,0.523689,0.567766,2.084017,0.926606,4.604769,1.060391,1.881849,2.561909,1.652011,3.322981,3.026278,4.696838,4.159795,3.014808,2.233559,3.073873,3.115330,1.347888,0.890088,2.595038,1.536316,1.926152,0.008318,3.408390,0.290077,3.677357,1.039799,0.823825,3.002781,4.917365,2.110348,4.346596,0.309204,2.543341,3.408829,1.876946,0.647348,0.077032,1.933712,3.713692,4.952759,2.315363,1.474586,1.733334,0.459655,2.250566,3.135643,3.117887,0.063845,3.168660,3.328432,2.510123,4.724396,1.290224,4.259580,0.871108,1.309776,1.024494,4.426597,3.967628,2.252419,1.890115,0.064506,3.509698,4.824691,3.892597,1.165383,1.322510,2.114014,2.038658,1.161688,3.958089,3.930428,3.532354,0.024803,4.586891,1.687791,0.144094,3.187095,3.687996,3.354805,1.954581,4.305830,1.782543,2.691291,4.608783,3.639477,0.473342,3.885693,4.508455,4.126941,2.383826,4.125739,0.378145,1.271133,4.334334,0.206939,1.990270,4.302349,2.229274,0.423104,2.295563,3.661080,1.581960,4.532655,4.703982,0.838828,0.466932,1.496784,2.345213,0.785070,1.207842,4.666494,3.574400,2.989730,3.539779,0.013629,0.727607,3.458751,3.574842,4.264865,2.927751,2.786250,1.988189,4.082780,4.260115,2.257965,1.877964,0.252025,3.960383,3.365285,2.196010,2.523427,4.480261,4.388370,0.895418,4.245047,2.548695,0.530590,1.557419,3.434729,4.467170,0.541749,3.048266,3.390645,1.380885,3.783203,0.516642,1.198384,0.002455,2.513690,1.317180,0.390337,4.404407,0.993325,2.836599,1.357327,2.987498,3.271483,3.627956,1.478630,0.236276,4.286358,4.846469,4.431124,0.413050,3.925681,2.430017,3.160607,3.058576,2.675156,3.375390,3.081607,2.884204,0.714123,4.324687,3.767477,4.821846,3.958715,2.912606,4.585838,3.271314,1.550648,0.877517,3.021539,3.680871,4.120811,1.426440,4.510001,2.889856,3.615465,4.040664,4.656410,1.449952,1.962333,4.499837,4.172381,1.995681,2.336691,3.585738,0.306248,1.836593,1.031151,2.593976,3.860512,0.649624,4.933672,2.335559,3.865083,1.762082,2.440684,4.824321,3.451311,0.128266,1.159911,1.296304,4.794535,3.847843,3.393153,0.348254,4.019073,0.908366,0.743902,4.344250,0.025186,0.316399,4.597030,1.257777,3.871691,3.285866,0.561162,3.974645,1.036955,3.477133,1.904267,2.723799,4.731032,1.295899,1.505497,1.462627,1.850114,2.883117,4.001256,4.465568,0.305944,3.250483,2.962023,3.004695,3.966667,4.689281,3.741281,0.858124,4.773256,4.326030,1.498277,0.611262,4.029953,4.881759,0.637436,3.256797,0.049184,0.177465,3.925911,4.077918,1.746731,2.239802,3.897386,4.288523,1.380504,3.921439,1.004390,2.236711,3.594486,3.428992,2.511445,3.349367,0.252664,1.441336,1.081365,0.408965,1.038446,4.300151,4.481397,2.665531,2.421976,2.315838,4.795225,4.704093,1.082440,0.474959,0.271916,1.788317,2.087714,1.238379,4.601125,4.185770,3.722315,2.419482,4.432479,4.725937,4.438360,1.306806,4.321137,1.751836,0.616341,3.718112,4.044423,4.933904,2.404787,1.255113,0.326958,2.065918,2.887143,2.482490,0.813938,1.857727,4.589532,2.296469,2.561117,2.359558,1.923576,0.303135,1.145923,2.499989,2.922164,2.390690,1.819464,4.017487,3.473828,4.727101,0.138678,3.720397,0.306879,1.454897,4.585510,3.876776,3.310096,1.998482,0.249138,1.301264,2.404344,2.113892,2.290663,0.151555,3.165371,2.254828,0.083944,4.696067,0.988502,0.847948,3.775470,1.743316,3.057742,0.029831,2.157169,0.124170,1.047809,0.973587,4.854634,1.512065,4.196257,2.103783,4.310647,3.313936,0.035462,0.558001,0.156725,0.452225,1.101570,3.927913,3.668403,1.223568,1.952115,4.297440,0.361606,2.824079,0.575140,4.970274,2.208231,4.576356,0.764914,4.951531,0.296520,0.294612,4.116186,3.882961,1.239684,1.234230,2.363275,4.718013,3.129433,4.162648,4.335517,0.672247,2.894043,4.934704,0.478226,2.217732,3.824267,4.947885,0.598581,2.022197,3.764803,2.970400,4.393265,0.510733,2.712563,3.045970,4.071323,4.228113,2.370825,3.021625,0.039264,3.445145,0.077230,3.235442,2.529480,4.770299,0.815370,1.918884,4.286488,2.570477,4.073122,2.537127,3.412010,4.407713,0.274079,4.404290,0.894803,3.776485,2.829156,1.664612,4.792549,4.207167,1.427786,1.013416,1.794953,1.660579,0.798786,4.687038,4.438125,4.374225,2.278557,3.948001,1.801788,4.302994,4.532225,2.691500,2.380961,2.663495,1.190611,0.459293,1.934600,3.920373,3.408759,4.204364,2.257341,0.621360,2.613126,0.197450,2.154342,1.007084,4.221240,0.644630,2.373187,1.925688,4.226925,2.808124,2.374773,2.980970,1.160706,2.606918,1.750188,0.544590,3.957493,1.803977,1.394556,0.002848,0.190022,1.259222,1.647651,3.495638,1.842280,3.982624,2.935831,1.752835,0.786987,0.006847,1.915571,2.033602,1.819456,4.012020,0.477776,0.574511,1.167317,2.568664,3.629507,4.518319,1.335474,0.638997,2.546072,1.497962,4.922460,0.199213,0.954475,3.767794,1.931888,2.811191,4.077259,3.334316,3.017755,3.409118,0.321223,0.488996,3.037745,1.839222,4.978571,4.103295,4.632392,0.902316,3.123651,0.139387,3.675712,0.211108,3.370398,1.061844,2.955955,1.379873,0.112014,3.427685,2.243296,3.621153,0.281422,2.651017,0.271332,0.719235,3.922066,1.143362,0.466618,0.709044,0.707161,4.219119,2.949713,3.961745,1.286095,3.131704,4.494538,2.669777,4.353670,1.090229,4.834634,0.398462,3.805542,1.008594,0.584439,2.795130,1.585111,1.112600,2.195616,4.942107,3.163388,1.393015,4.929511,1.395833,3.598258,1.316664,3.871532,3.219921,2.863534,2.294474,1.214216,3.047136,4.371738,0.156527,3.663349,4.399613,3.084439,1.292153,1.757375,3.744024,1.834112,0.040366,0.527591,1.426702,1.965849,1.821624,4.032139,1.107914,2.051567,4.071134,3.967186,1.026127,1.820365,0.781566,0.450500,2.770966,1.597461,2.568446,2.939549,3.030961,4.703826,1.173246,4.490426,0.256543,0.151914,0.543840,3.218446,2.651468,0.810616,0.739525,2.647147,4.795029,0.913650,1.295648,0.602916,2.973009,4.633846,1.190076,2.362106,4.538073,3.541416,2.641433,3.196534,3.654198,3.642392,2.424886,1.407380,1.030873,4.593069,0.291233,1.685366,3.450251,3.000345,2.166093,0.521164,0.697640,3.482614,2.418483,1.697754,1.873968,2.143430,3.415283,3.004739,0.352415,0.787389,0.352778,0.172951,3.880025,4.254795,2.080889,4.844204,4.317989,4.301925,1.835922,4.771736,3.744649,1.768462,4.444164,0.020561,2.857955,2.600864,0.408950,4.311782,1.408556,1.881750,2.375767,4.084674,2.974690,2.819786,1.811888,1.398423,2.390601,1.278668,1.697557,2.201882,4.217504,4.652553,4.148707,2.628499,3.557786,1.676043,2.295985,4.702448,1.774737,0.864928,2.360470,3.262958,0.632571,0.610507,1.518474,4.538246,3.373019,1.109671,3.017438,3.301199,2.615273,3.796912,0.123695,0.955586,4.831859,2.488700,0.382574,1.540898,0.008862,2.897071,4.997391,2.950497,3.050365,1.638633,1.185163,2.540783,4.498931,0.048756,2.848254,2.142555,3.105897,4.199790,2.245220,1.088414,1.883035,0.752757,0.424496,1.879382,3.128493,1.314177,4.578421,3.444756,3.431567,3.458553,0.008422,4.065034,4.588043,0.096990,2.991470,3.382879,0.981213,4.191056,3.129157,1.125275,4.835951,1.079328,3.392939,2.369449,3.616424,0.488796,4.762726,1.022445,1.101920,2.770143,1.748666,2.210648,0.185492,1.174422,3.867666,4.511076,1.167387,3.866745,0.144733,0.223621,1.965046,0.739556,0.830693,3.136985,4.290821,3.894836,1.682469,4.376080,4.206730,2.621058,2.379380,0.292312,0.752625,0.427066,2.633863,3.383192,3.093910,4.364426,3.293512,4.148538,0.702126,0.858240,4.592061,1.773523,1.084994,4.560346,4.850523,3.188848,1.941693,3.441929,0.077789,0.723561,1.843572,4.161123,1.521580,0.289359,1.893676,1.206271,0.280300,1.994621,1.757107,3.669200,0.316024,1.895272,1.712168,3.234108,4.439604,0.714949,4.081269,3.048617,0.146213,3.834443,2.688440,3.999644,2.044340,3.327514,0.994021,0.959223,1.701312,2.597203,3.582634,3.334024,4.106723,2.131985,4.562646,0.545839,0.936017,3.418588,1.268863,0.822953,4.432469,0.342004,4.957356,4.312947,4.341289,3.143565,1.124278,3.990458,0.269003,2.910577,2.195798,3.752034,0.118841,1.933928,2.385472,0.761796,2.073601,4.552388,2.343171,1.258881,2.661675,0.304212,1.471343,3.918184,3.209571,0.119924,2.849380,1.086700,4.878749,3.918435,0.639540,1.927728,2.449848,0.911859,3.521419,4.206894,0.022323,0.666117,1.417314,4.920551,2.022639,0.851260,0.604636,4.506781,4.051220,3.096503,2.698478,3.885769,1.590753,3.199273,3.684227,2.878244,0.843660,4.929524,4.055978,2.453135,3.099851,3.800380,2.292926,3.695581,3.864639,2.295037,0.938841,2.988835,2.771444,2.502468,0.292910,3.887816,2.693541,2.153257,4.074461,0.984423,1.358407,3.198635,1.950290,1.515346,1.273080,2.428654,3.877684,4.026630,3.952849,4.428226,0.253709,4.911084,2.132307,0.964911,4.850114,4.125912,4.648618,2.615769,3.738709,2.597320,2.697251,4.757505,3.691785,2.833889,1.963676,0.821638,0.578652,1.498331,3.464022,0.957763,0.657311,0.388787,4.231247,1.205949,1.004252,1.954269,3.147431,2.931299,4.618289,3.409861,2.809858,3.557991,3.318617,3.837392,2.862132,4.036454,4.500287,3.482384,1.788099,1.399891,3.185928,3.157146,0.119553,3.735547,1.109372,0.272451,0.765996,3.283904,2.615273,4.234689,0.531264,4.147583,3.254589,1.074648,3.684528,3.706666,0.540008,1.332234,3.194325,1.902873,3.826225,2.680212,4.284985,0.555130,3.668734,2.323200,2.596955,1.420228,1.345316,0.949019,1.866728,1.194939,0.948640,4.808980,2.237071,3.390612,1.870741,2.848969,2.496011,3.063441,3.613644,3.319546,3.810517,0.731522,0.470156,1.694497,2.409139,1.122013,3.866123,3.597780,4.567895,3.644801,0.535727,3.324974,2.060297,1.298074,3.009757,1.510951,2.654282,2.879887,2.645335,0.053433,1.743695,3.952311,1.734478,2.546897,1.733160,0.996190,0.998767,3.744298,3.139763,4.660285,2.105023,3.182836,2.342698,2.369689,4.270437,2.271514,4.640834,3.102536,0.427121,0.339915,4.911571,1.996797,2.937294,2.157930,0.794482,0.627759,1.063481,3.026689,2.732668,1.642942,0.220871,1.620140,1.991517,3.782119,3.687420,1.107040,1.138370,3.139414,3.258882,2.805514,0.559857,1.428601,0.158516,3.807971,4.032517,4.602403,0.439578,4.531065,4.592126,4.988530,3.889443,1.313189,1.322794,3.441084,3.398663,3.301646,1.765604,2.598986,1.507487,2.983954,3.862011,3.493481,2.162527,2.623642,3.862092,1.164265,1.106493,2.424934,2.470682,0.117364,2.909732,2.088707,2.881899,4.574118,1.665590,0.539179,1.032593,1.532685,4.317350,2.745371,4.975410,1.425160,0.343634,1.505941,4.962975,3.715496,4.575307,2.974224,1.376817,4.772157,1.145782,1.985570,1.466939,3.217295,2.090049,4.785541,4.837100,0.484570,4.641665,3.989980,3.561687,1.813930,3.397786,4.053332,4.152124,4.028878,1.600118,0.925065,2.718877,1.271130,3.924926,0.223350,2.127043,3.892940,0.402796,3.434896,1.155316,0.636969,1.539434,0.096681,3.150112,1.664544,4.968556,0.489197,4.474421,2.489789,0.588504,4.280587,0.555228,3.229296,1.226088,2.245588,2.865100,4.598377,1.422569,1.938474,0.997979,1.718108,0.629059,2.740417,2.796158,3.116866,1.151762,2.161778,0.207145,0.201283,1.547314,2.445715,3.464870,3.793367,2.008905,3.778032,3.638020,3.162371,0.708149,1.436220,2.669384,4.069660,2.016569,4.835331,3.327003,1.565278,2.807170,1.875368,4.559906,0.241736,1.144578,0.482833,4.028098,0.955397,3.714237,2.807982,4.151080,4.974744,0.771184,0.752087,3.181078,0.181522,4.087090,1.883196,1.994674,2.860229,1.710477,1.501176,1.024846,3.594107,3.843063,3.040513,1.180169,3.473795,0.789295,4.391412,2.231630,2.379306,1.020741,3.077556,4.925244,2.945502,3.261726,1.442446,1.629257,0.981778,2.573008,0.739873,3.092406,2.326551,3.121559,0.353604,4.420285,1.892907,1.034657,2.503919,4.649104,3.471431,1.700434,1.519218,3.306433,0.444023,1.827051,2.393389,3.802587,1.627587,3.960759,3.913437,0.097316,0.952066,3.266971,2.480210,0.138182,1.798244,3.128868,4.958432,1.034372,0.763595,1.821842,2.754563,3.322497,1.804074,1.142208,0.026122,0.917235,0.500318,1.210549,1.612872,0.393692,2.029230,0.838130,2.906838,1.889387,3.198260,3.880772,0.423515,1.912393,4.888876,0.011548,2.294555,2.344548,4.118608,1.451135,3.880153,0.011001,2.453750,1.596602,4.040778,2.014736,0.349392,3.541935,0.066115,1.672083,2.491650,3.708712,1.565320,0.520487,4.126283,0.049113,4.365656,0.532488,0.628505,0.831144,0.741715,3.973895,4.054907,0.847340,0.562588,2.862403,3.498535,2.795199,0.138449,3.830441,3.570951,3.586298,1.036066,0.351414,4.986422,2.388986,3.631214,0.482087,2.524661,2.520483,0.614290,1.758038,4.457317,3.451075,3.658354,4.391444,1.551428,3.949724,0.482694,2.887744,2.670740,2.155961,1.045846,2.137633,4.221416,3.653517,2.203016,4.837943,3.926460,0.221303,3.753683,3.592689,0.246103,4.632786,2.335194,1.195637,2.241129,4.168902,1.252529,4.570464,0.323699,0.446785,2.996620,2.548985,3.357525,0.217230,1.301212,3.515723,1.722008,1.523273,4.098885,3.980315,3.724955,3.138127,4.772026,0.105285,0.763215,2.299441,1.403449,1.466797,4.901481,0.221102,0.129489,4.675724,0.800450,0.214886,2.292726,4.409453,1.530324,4.661257,4.326381,1.402089,2.177196,4.618690,0.616434,0.309467,0.943598,1.128106,0.896945,0.158560,3.588295,0.809760,2.276945,0.601942,1.827591,1.987338,4.564930,3.526584,4.530711,2.445482,0.846708,2.048166,2.968392,2.706226,4.481527,2.961889,1.283154,4.762932,0.869631,2.382191,4.438253,3.549609,2.676912,3.439140,2.188967,1.984029,3.139190,3.685041,4.687301,4.182728,4.803463,0.579431,4.947367,1.001509,0.404520,3.284053,3.367436,4.869111,3.855118,1.963292,3.000527,3.047272,3.827094,2.905490,1.932203,3.407291,1.200508,1.747756,0.358156,4.081151,0.354995,1.493984,4.628165,2.797048,1.089400,4.964436,4.403647,0.340901,1.151425,3.211303,0.994016,2.685890,0.829304,3.363528,2.656181,4.847161,0.669066,2.653606,1.558619,3.063444,1.016278,4.626962,2.189609,2.158857,3.931625,4.537591,2.469869,3.856446,0.719705,1.262046,3.464952,4.633736,0.586044,0.671936,4.876136,0.456182,0.214479,2.658772,1.122057,1.488133,3.089468,1.756232,4.978271,1.141105,4.326377,4.376114,2.187932,4.986682,1.414001,0.455319,2.835975,0.037359,2.370819,4.184019,2.098535,1.019962,1.278278,4.569041,3.311064,0.806559,2.315967,3.072969,2.525702,3.925444,0.031462,1.405322,2.872954,2.694499,0.520401,0.876081,3.764794,2.673927,3.199837,4.083761,2.919133,1.569747,2.616251,0.651958,1.360386,3.275652,0.205555,0.004255,4.435362,4.821644,4.528063,1.077308,3.773289,2.282340,0.354719,3.974931,4.040874,3.609888,4.982754,4.960586,0.897102,3.977062,3.299120,3.632340,4.954503,4.183096,1.957586,4.687328,4.375827,3.531168,4.684797,2.311334,3.566281,0.020436,2.842905,3.618445,1.915059,4.339591,2.425339,1.412757,2.747225,4.527579,3.412244,4.750397,2.238096,3.292397,3.141968,1.195616,3.722878,0.339958,2.875621,0.890075,0.941718,4.899158,1.922603,2.598057,3.325569,2.491455,3.629382,0.130151,3.383508,1.621967,4.396820,0.717040,0.153217,0.304755,2.610926,1.076243,3.765888,0.277630,1.174144,4.151208,0.228206,3.938064,0.558825,4.213795,3.920211,1.093779,2.009862,2.290023,1.968883,1.055158,1.130789,3.453479,0.757786,1.409933,0.315129,1.090542,0.189043,3.491694,2.022145,1.888341,2.428191,1.306473,1.801668,2.954828,1.122619,2.309840,2.874613,0.690470,1.534850,2.761061,2.006299,3.579973,1.156609,2.353619,4.105230,0.713847,4.474640,2.236229,2.399201,3.179542,2.709168,4.116251,0.933200,0.649523,1.317423,4.989067,0.494322,2.652259,3.866904,4.162981,4.787123,4.975835,2.761281,1.203934,2.599482,3.680161,2.383339,1.361551,4.110465,4.145574,2.753239,3.007800,2.567671,3.910687,4.435391,0.010060,4.868135,1.720604,1.995637,1.838416,4.221817,3.683963,0.894554,2.040468,0.013634,4.015567,1.181402,0.415083,3.303845,1.095478,2.745038,0.806025,3.950542,4.909868,0.537460,4.207063,2.448948,0.257054,2.606538,2.409615,4.457065,1.701959,3.787461,0.661530,1.942516,2.696794,0.907612,0.988850,1.226704,3.713982,4.717455,0.635776,2.739700,0.735519,0.271279,0.197285,2.144532,2.126614,3.320962,1.949659,1.148582,0.481517,2.855789,1.086693,1.885753,0.087652,1.245210,3.255014,0.615689,3.306777,4.302104,4.346845,0.786979,2.336663,4.472818,3.649631,4.331932,1.934465,2.495063,4.475570,2.145069,3.350839,2.122954,3.540032,3.066124,2.208017,2.745110,2.990744,4.395291,3.384356,3.568772,4.849633,0.338309,0.938068,1.590611,4.730337,1.142775,2.825473,0.588806,1.353336,1.380549,3.542331,0.544145,3.784922,1.517731,3.667352,1.832806,2.132005,0.629154,0.534210,2.709209,3.185351,0.460653,0.697161,0.162214,0.812043,1.112888,3.453515,0.326073,3.437033,2.027142,0.714769,4.911646,2.521345,1.470921,0.277526,1.571608,3.062281,1.228865,2.846207,1.391391,0.222272,2.065831,1.783101,1.229451,2.644859,1.948114,4.749727,3.106146,1.790771,1.071683,3.325619,4.600644,3.135566,4.146961,3.421143,4.735908,2.036045,3.863626,2.545930,0.247457,0.066311,2.125617,3.299872,4.316363,0.163116,4.709221,4.423803,4.368086,3.213349,2.333290,4.019970,1.030871,1.461458,0.863466,4.989909,0.960906,3.503755,2.310361,0.166476,0.406318,4.647142,3.722713,2.730049,1.047324,0.031781,3.863250,1.561493,1.070203,0.861558,4.043982,3.103165,3.206504,4.627186,4.458995,3.402306,4.805135,1.144805,0.098011,4.608534,1.321640,4.865515,1.120195,1.392298,4.547249,4.063276,0.486956,2.877356,0.788758,0.358358,3.061909,0.390263,2.359475,3.072564,4.695513,4.606361,3.037287,2.513563,3.251956,4.624827,4.954702,0.165452,4.847760,4.015930,0.375024,4.000839,3.313165,4.528690,2.288986,2.516692,4.186567,2.418939,2.631840,1.221794,1.652113,1.438242,0.228316,2.915169,4.213258,3.851563,1.232928,2.931548,2.452153,4.082770,1.767400,0.182985,4.436379,3.351402,0.909292,1.028521,1.990999,2.381941,1.651501,2.578352,4.462251,3.149804,1.847646,4.302215,3.478615,2.968619,2.582591,0.439185,2.964676,1.991296,2.751645,0.620325,3.930888,2.559780,4.154653,1.034061,4.690421,2.890923,0.378429,1.568588,4.913425,3.066671,2.098735,4.578457,1.806423,3.735729,0.731325,3.485798,2.457199,2.123146,1.158046,4.937279,0.618097,1.017459,1.887057,0.655602,4.676622,4.551907,2.190964,2.462003,0.310453,4.196864,3.902438,1.966445,2.385436,3.296809,2.327895,1.365952,1.487427,2.586565,4.972655,2.449628,0.278987,4.693477,1.529854,0.199127,0.361429,0.855673,3.170782,1.839930,4.586500,3.966368,1.604184,4.930579,3.332494,0.087194,2.315441,4.551619,1.479802,4.634332,3.076816,2.915218,1.829136,4.784618,2.153081,3.171931,3.185427,3.216967,1.530214,4.323707,2.968018,1.942228,1.611372,0.568424,3.051212,3.913037,2.112329,4.578304,0.627678,2.439446,3.212129,2.848021,4.447472,3.420167,4.125166,3.310630,1.721217,1.362919,1.749807,2.040891,4.134037,3.554680,4.134212,4.625682,4.073986,4.811388,4.749307,1.604809,1.961535,2.876029,3.452731,2.323528,3.938845,3.160034,2.979351,0.726976,0.856572,1.566436,4.812375,0.381052,4.801256,2.385536,2.179806,4.234399,4.157381,0.669920,4.058722,2.553517,1.615635,0.541896,2.961139,3.901658,4.428373,4.858096,0.615943,1.983920,0.243382,3.178720,4.438348,3.436315,1.943546,3.799619,4.983065,0.005610,4.140279,1.631358,3.735332,1.185204,1.009102,4.047991,3.836941,4.056102,3.786701,0.479310,4.414392,1.888088,1.098323,2.837835,1.729324,3.549349,3.473093,4.250537,4.967793,3.997820,0.707745,3.813214,2.834498,2.815906,1.686228,0.803665,0.865260,0.287998,4.026749,3.719742,4.283643,3.520716,0.838930,3.679795,2.789260,0.543365,4.525612,4.511586,3.139321,2.098206,1.189621,0.488003,4.029997,4.833765,0.070203,2.396806,0.530179,2.092695,2.903064,2.145503,0.086117,4.939224,4.629021,3.861866,2.003404,3.447451,3.548842,1.701273,0.198433,3.111573,4.740419,3.738936,1.139937,2.779052,1.951074,2.732503,3.620297,2.433586,4.561581,3.460573,1.761594,3.061669,2.276884,3.960154,0.037248,2.927828,0.117457,4.896672,2.537663,1.393998,0.553498,1.708476,3.170396,4.864442,0.472002,1.051185,1.384717,3.830021,0.394867,4.471987,1.094935,3.590138,3.802759,4.465419,1.037695,3.616338,1.765380,1.941435,2.541560,0.655869,1.793623,4.702447,0.903144,1.575820,4.036392,1.249893,0.823952,0.952572,4.928382,2.066538,1.979837,3.785090,0.313698,0.847689,3.599401,1.598256,3.508392,0.114302,2.951798,2.721229,0.724282,0.593679,4.640771,2.525085,0.249503,0.742789,3.362764,2.383822,2.988314,2.291375,4.627575,4.126244,4.900722,4.696165,3.643489,0.262652,4.995509,2.366593,0.304985,4.957117,2.851884,2.295020,0.098947,2.142006,0.916354,3.594745,0.039335,2.665178,0.218581,3.574150,4.765097,0.216603,0.515421,2.577965,4.912311,2.057284,3.077865,3.808267,4.639600,0.885083,4.557130,3.132121,4.028035,1.477776,2.500505,1.044796,4.273021,1.022895,2.741634,2.089566,0.247948,2.060738,3.921987,2.644663,1.523984,2.227067,3.871328,3.340769,0.554516,2.656233,0.993476,4.892037,3.693127,0.405004,1.241146,0.390628,1.850482,4.113423,0.333778,0.826786,1.337226,3.120402,4.873417,4.113660,1.004633,3.550314,2.781939,2.458139,4.541929,2.940649,0.686048,0.824839,4.609867,0.401026,0.689571,3.265568,1.121687,4.130496,2.080032,2.411999,0.643191,0.140818,3.796181,0.369949,3.200795,2.687657,2.592453,1.498425,3.780143,2.003068,0.756273,0.280216,1.712740,3.040275,1.101610,3.711024,0.543629,2.359824,2.683521,4.105060,0.589738,0.008375,2.668549,0.753625,2.858467,0.164514,2.453375,1.953700,0.781237,2.339236,2.385847,0.339407,3.384539,4.568500,3.067214,3.135956,3.742015,4.680353,4.912385,2.463424,4.725039,1.796213,3.638224,4.683978,0.081164,4.602716,4.425251,1.027429,2.048568,0.614598,3.735934,3.887068,4.404710,2.207260,3.150307,4.218238,0.466892,0.595791,4.088923,2.209847,4.014347,0.000752,0.575140,1.841716,1.988286,4.168789,2.548912,4.589823,2.123489,0.334819,2.289810,2.055044,2.747286,3.199146,0.294522,3.087647,0.661368,2.159066,4.461651,0.669183,1.043798,2.115094,0.301969,1.431383,0.387346,2.385218,2.866894,3.746412,4.616197,2.188104,3.139050,0.300341,2.376569,4.350037,2.961393,1.875507,0.446231,2.492929,4.593517,0.369471,2.654357,2.131616,3.797319,0.755752,0.855976,3.580022,3.399788,2.588414,0.022790,4.278324,4.936988,3.337221,4.666140,3.789073,3.420810,1.756317,0.398298,0.160854,2.252808,2.297679,1.930926,0.149615,0.996726,0.682572,0.063693,3.095668,0.494730,0.741948,0.495566,3.823327,4.416892,0.593970,3.078325,3.098443,1.406632,2.942566,2.166409,0.538226,4.791235,3.393177,4.769798,0.755117,3.970768,2.103129,4.648431,3.434955,0.735827,0.162373,0.628111,3.563449,0.052709,2.391323,2.765267,4.061338,2.232974,0.027433,1.093911,0.237771,4.904762,3.192112,0.009600,0.192646,1.127610,3.894278,1.995096,2.526813,4.362544,4.456215,2.139191,3.800797,1.170879,0.875932,4.881471,3.191005,3.286437,4.389189,0.135172,1.429442,3.595850,2.273116,4.714345,2.252872,0.635161,4.536501,0.025584,3.793817,0.041688,2.316075,1.027733,4.758314,1.983702,0.154764,3.883972,1.582920,3.197292,2.026140,2.192570,1.318982,3.941663,2.318602,0.198087,4.723836,2.484604,2.429860,1.732253,3.175739,2.007713,3.747397,4.382913,2.448657,3.262762,1.477685,3.127014,3.176197,2.559875,0.799230,3.626549,1.598321,1.941074,4.257719,3.405625,0.413354,2.826895,0.434601,3.227282,1.973262,4.064995,3.900894,4.998542,1.495851,0.875394,0.926591,2.994595,1.672721,4.534274,0.396781,3.824084,2.448553,3.187167,2.939121,2.651293,3.491737,2.728532,4.612358,2.758388,4.598329,4.031675,4.237739,4.486437,1.012782,1.712773,4.496870,0.746074,2.450724,0.523743,0.762734,2.944446,1.980508,2.118461,2.540657,3.303640,2.496647,1.708862,0.964042,2.322366,1.877765,4.077226,0.076486,2.851989,3.092296,4.939483,4.426821,2.587836,1.442577,0.050925,1.203904,4.237177,4.866281,3.505271,3.019271,3.031171,3.249538,0.008946,1.849792,1.646394,4.889666,0.003633,3.681724,2.026435,0.323802,1.804764,0.639244,0.186800,3.417265,0.123423,0.059821,2.129920,0.652827,2.230638,1.830172,0.511387,3.198536,3.248611,3.223390,4.323150,0.033869,0.138675,2.615826,2.330078,4.952837,1.787680,1.945521,4.178532,3.115461,0.355376,0.288296,2.642759,1.983862,3.677157,3.140311,0.001533,0.084388,4.198572,0.822926,2.847978,4.702484,4.833033,4.221264,4.444616,4.525294,0.382779,4.286214,2.078661,0.213328,2.665856,0.583520,0.395572,2.337894,1.573845,4.406588,1.577954,4.112882,0.024456,4.746043,0.271645,1.314417,0.124433,4.796775,0.258426,1.745015,3.319201,1.610079,0.037434,1.202863,3.573463,1.891392,4.101427,3.694900,2.929933,0.472377,4.909997,2.603364,1.300896,3.010673,3.533899,2.337522,3.209155,0.540201,4.370328,3.403626,3.864935,0.568675,2.596513,3.462974,2.611414,0.496045,0.303296,3.080081,3.984456,4.983145,2.841087,1.147487,2.025383,0.533198,2.069353,4.200836,1.950999,0.258668,0.829557,3.348389,3.456128,0.990209,4.050708,1.404278,2.778576,1.538528,3.465585,1.878376,3.809035,2.417130,3.201351,4.630266,2.176724,2.753225,0.945589,3.467161,1.063537,3.449791,4.615917,4.706504,4.009141,2.695723,4.186093,2.288798,1.884589,3.511676,1.036621,0.371398,1.830133,1.703177,0.602621,4.272811,3.340739,0.128956,2.700798,0.769016,2.556101,3.856263,2.065268,2.984324,2.732195,2.888029,2.390586,0.835160,1.208071,4.470247,3.691032,4.914329,0.270650,1.582861,4.796438,2.196894,3.021687,2.848707,0.703447,3.655521,0.291563,2.689814,2.763189,1.009242,3.752121,4.480884,4.895340,0.134085,1.548625,4.624119,0.252527,1.360126,2.666943,3.700986,1.140282,1.501721,0.972692,2.215310,2.521730,4.496135,3.853772,3.576725,2.863349,1.642901,0.350385,1.294038,0.973436,1.139486,1.133874,2.152733,1.903574,1.685234,4.406188,1.013687,0.818268,0.380014,4.624301,0.971732,2.861340,1.868589,2.776499,3.212832,4.200385,2.536315,1.636204,0.905400,3.034085,0.660022,4.279036,0.138947,4.226499,1.096233,2.439289,3.652604,3.920834,2.008899,2.497274,0.147863,1.720130,1.307894,1.950345,1.504467,0.798699,4.708652,2.146394,3.189014,4.633806,2.862369,0.634996,3.942907,3.873320,2.023049,2.696968,2.124430,1.121222,3.814609,3.722175,3.235279,2.278202,2.324030,1.492219,1.328623,4.244857,4.296871,0.076724,3.598032,1.649611,4.596737,1.210601,1.677016,3.736680,0.370497,3.540195,3.373394,1.520108,3.563847,4.514624,4.019706,2.589212,0.662228,4.461696,2.448590,2.039388,2.738766,1.067738,1.680956,3.677528,2.817372,3.811394,3.809823,3.767897,0.720943,3.251007,2.400900,0.310455,4.175269,1.098576,0.064701,3.217184,0.860527,0.308533,4.668855,0.742393,2.600247,1.836496,0.223703,1.571769,1.752352,2.467188,3.533673,4.999890,2.592856,4.713766,2.637255,2.968412,0.695335,2.854129,1.302810,1.370242,2.169388,3.268691,3.086649,1.531378,0.143758,1.220233,2.264155,4.547577,3.051814,4.387540,2.970137,2.215837,1.642909,4.850466,2.391244,1.796233,4.538641,4.059322,2.943697,2.830321,2.486753,0.481588,3.437486,1.877668,0.085111,3.630278,0.646535,3.989583,1.297828,2.932038,2.848821,0.884351,2.195187,4.095188,4.859899,0.090825,0.733271,3.087198,0.012566,3.789950,2.915065,3.364323,3.121204,2.995069,0.512062,1.176124,2.319587,1.671952,3.915303,3.376365,1.557352,4.755446,3.221210,4.233126,4.522926,0.988166,1.988656,0.304845,0.739106,2.937331,2.585666,2.187617,3.584812,1.329533,2.072235,4.691081,2.835452,3.407167,3.727486,2.233572,2.154047,2.351022,4.310098,1.818078,4.426410,0.204584,1.264176,4.486944,4.663855,1.038375,1.085799,3.771230,1.807327,1.028279,1.136177,1.520921,4.164940,2.281888,0.635443,1.857680,1.615839,0.380509,4.116458,3.656753,2.177810,3.507714,1.693547,4.679180,2.503909,0.556015,2.375910,1.800654,0.170521,1.748549,4.881704,1.298247,3.620014,0.770699,0.846602,1.482455,0.073074,2.418227,4.849128,1.407655,3.349138,4.221406,4.697280,0.126632,4.225592,0.406998,1.566933,3.713261,1.841198,0.282578,3.716225,2.783830,2.326301,2.067784,3.140778,4.585248,2.102298,1.938070,1.806334,0.995954,4.163816,1.150808,2.772058,3.906707,0.128972,2.517571,2.011092,0.363915,4.093622,2.014931,1.863514,3.367084,2.217382,1.860421,2.812208,1.806179,3.768184,3.791426,3.775203,3.951729,2.717363,4.100338,1.342418,4.571971,2.010182,2.651079,0.831226,0.175220,0.458774,0.010891,3.853129,3.798161,2.083783,3.043169,0.750221,4.222747,3.105331,1.761831,4.281446,3.553142,2.091385,1.815607,1.007576,0.873944,2.257420,1.849879,0.306940,1.550745,0.668697,4.010421,2.391081,0.920747,0.807157,4.093163,2.783944,2.514583,2.239995,3.722511,2.751590,0.596631,0.347288,1.339367,4.866320,0.408365,2.689952,4.604296,0.384282,0.951292,3.104941,0.069157,4.631259,0.536805,0.302131,0.961149,3.051724,4.705319,2.395375,2.676350,2.215402,2.681737,1.346764,3.474634,3.549643,2.604205,4.297542,3.303984,2.467478,4.210566,2.921603,0.380012,4.013041,4.227952,0.240380,3.852079,4.904294,3.953666,1.989397,3.588647,1.460871,3.288733,2.587605,3.311137,2.069179,0.770838,2.105215,2.387046,3.389309,1.422568,3.228254,1.169187,3.824543,3.610558,0.588742,2.963275,0.440250,4.845622,1.696198,0.101306,2.518075,0.609313,3.254714,3.655030,4.296330,4.443218,1.547248,1.788799,4.872364,2.169609,2.023529,4.626803,0.936512,2.370379,2.427130,3.712641,2.177068,4.316111,3.351235,4.654838,1.310106,4.062013,0.583866,4.009650,4.243646,2.032982,3.500069,4.843512,0.924670,3.090705,0.237153,1.693018,0.705934,2.683915,3.016079,4.947029,4.834012,4.413307,2.837406,4.430314,1.774589,1.004656,2.630227,2.656046,4.550358,0.028681,4.277757,3.041177,4.698222,3.726080,1.831297,3.173996,1.848598,4.607827,0.098424,2.773951,2.536657,0.950698,2.140733,1.484460,3.352049,3.765644,3.856978,1.971760,0.956947,1.470251,2.673671,3.076513,3.974365,3.598682,0.871850,3.719955,0.575554,4.588772,3.448850,0.559567,4.182889,3.392095,3.559486,2.437144,3.023526,2.140568,2.837548,3.948956,0.998822,4.379480,1.530045,0.737833,3.172745,2.622049,1.457667,3.140854,3.571759,1.362940,0.583204,2.551526,1.414897,1.626126,2.469845,3.656002,0.074800,2.391087,0.617451,4.266139,1.298884,2.020017,0.237117,0.745714,0.008949,1.800177,4.053439,2.878892,4.199531,0.877292,3.386708,3.729288,1.720004,0.571488,3.711014,2.607353,2.348657,4.185550,2.464531,1.474877,3.742159,1.349236,1.381427,1.043674,0.516937,4.007878,3.503425,1.916066,3.624922,4.806229,2.331243,2.441427,2.645304,1.332801,1.240020,2.441924,2.503652,1.446410,2.911565,3.853957,3.447893,0.735542,3.211959,0.017091,1.963484,2.305139,3.977784,4.400469,3.590989,3.876261,4.658069,2.422736,1.398601,1.850704,2.143119,1.580766,1.518571,4.913449,4.961634,3.214640,4.048969,3.605724,3.410559,0.732541,0.683609,4.429199,0.071336,3.398819,4.023927,3.589565,0.722046,3.202520,0.617434,2.311236,3.274163,1.859350,2.586229,4.734773,1.551948,0.875050,4.537826,2.416269,2.481783,4.767813,1.339038,3.982388,2.800780,3.450089,2.353218,1.919294,0.720301,4.937501,3.636005,2.275347,2.464589,0.001269,0.148038,4.037883,0.230848,3.858563,3.566820,3.396620,2.722529,1.736641,4.862991,4.553688,2.371575,0.877100,1.172888,0.070081,4.361376,1.817069,2.429099,2.632266,3.965666,3.075649,0.346405,1.885480,2.281343,3.591180,3.920213,0.025814,2.993322,0.148725,4.177276,1.200197,1.665656,1.164707,4.338865,1.503422,3.710607,3.064843,4.313607,0.988806,2.586108,4.168351,3.052990,0.061274,1.267820,3.421738,3.057946,4.482413,4.627590,4.001578,0.918195,1.859980,4.823428,2.419130,1.669994,4.809987,3.497596,3.482213,2.061823,0.467563,4.917478,0.424004,3.329844,0.255546,0.071615,0.049692,4.712172,2.310810,3.010149,0.706604,2.438664,2.594017,0.763217,2.290133,4.432590,2.875989,0.929767,4.776607,4.464237,4.635034,3.904586,2.806798,3.878839,3.097068,0.028472,0.581411,0.547728,2.769316,3.478675,4.696763,4.506138,2.989172,2.856068,0.341573,3.856058,1.329795,4.589582,1.106028,3.481612,0.561468,2.469412,0.744904,4.213427,3.070036,4.886202,0.705123,4.280506,3.671551,1.936064,0.089511,3.679842,0.490740,4.044717,3.992470,1.078636,4.829543,3.964510,3.022950,3.674757,2.341569,0.464235,3.184651,2.081143,4.894290,0.316725,0.802560,4.501748,2.434963,0.965677,1.563334,0.381500,3.169556,4.600403,2.850990,3.209909,1.464022,3.542095,4.575848,0.231859,1.086404,4.683144,4.024866,0.351286,1.164660,1.825970,1.596454,0.256339,0.853583,1.411850,0.765668,4.137259,2.602062,1.107237,4.238624,3.803333,1.931387,4.206046,3.187243,3.117297,0.519591,2.041024,0.357072,2.004564,0.297240,0.964384,2.281905,3.090411,0.904838,0.411968,4.368603,0.417272,2.843602,3.956262,0.837703,3.231584,3.653110,3.535957,0.258549,3.207943,0.785581,1.509831,4.644069,0.261158,4.308643,2.756138,0.156616,3.769983,4.287510,2.287758,3.959196,4.552354,2.841149,4.583456,2.084875,4.059326,3.903330,3.594649,2.057230,2.341135,1.046972,1.390432,3.411301,1.627194,3.621482,3.122052,1.782318,0.838091,1.598765,1.826149,3.228911,0.309111,4.330575,3.126501,0.265888,1.257279,0.753031,2.909203,2.845082,1.821035,3.798885,0.308861,4.136849,4.442641,0.929380,4.702222,3.661826,4.467229,3.957409,0.339560,1.234467,4.254433,0.240432,3.546044,3.406727,2.220058,2.874127,1.302670,2.953296,3.440411,1.928101,0.740147,4.724772,4.947519,0.349596,0.278263,1.813387,4.697346,1.899838,1.144064,4.881095,1.167778,3.423404,0.558548,3.160705,0.724762,1.393530,2.182496,3.825084,2.775792,0.900378,3.774489,3.188621,0.096131,0.327995,0.460585,1.247532,1.383599,3.387441,3.251643,4.360016,4.076573,3.942754,2.944533,0.533163,3.438743,1.511607,3.916974,1.833434,0.672030,3.026542,4.414027,0.879291,1.472130,1.322170,3.911386,0.760897,2.201948,1.883014,3.846654,2.197063,1.244527,0.403082,2.429097,1.245085,3.427534,1.200416,2.684956,3.182848,4.503389,4.526925,3.342492,1.067130,0.301125,3.761087,1.799899,0.603387,4.176160,2.685325,4.745062,2.894372,4.756401,2.742654,0.859940,4.819850,0.449002,0.913271,4.979514,3.892984,4.204134,2.357429,1.893398,1.357586,0.269170,0.236587,1.639940,1.119385,3.333945,0.848105,4.545253,4.838633,2.374461,0.255581,0.853172,1.335875,4.379890,4.441345,4.831485,1.313228,0.879108,2.624139,1.721793,1.990657,2.261955,0.304504,1.622998,3.716065,2.393291,3.827454,3.361697,4.705794,3.451752,2.797747,0.785857,4.605529,4.983601,4.212389,0.467395,0.557112,1.824577,3.480117,4.134522,0.904076,3.126202,0.797832,0.560520,2.354861,4.305219,3.138528,3.407718,1.965831,1.334402,4.660482,2.057042,2.567023,0.361110,0.345757,3.790320,4.660030,3.183477,4.500228,3.869764,0.644327,0.333287,4.710446,0.808021,3.145781,1.178828,2.577741,2.437619,3.593646,4.102686,4.994274,1.042638,2.183317,1.880042,0.168972,1.184135,2.732244,4.384717,1.568989,3.507114,4.700489,0.896834,0.542853,4.932689,0.250129,1.405035,4.346699,1.377101,0.877654,3.909156,3.628521,0.538864,2.508960,4.467384,2.120331,1.110877,3.471932,1.139709,4.539771,2.094103,2.438927,3.472528,1.797579,4.710204,1.364540,4.828712,1.941025,3.901523,4.049947,3.105159,4.059356,2.953724,3.011737,0.703386,4.452320,0.770019,2.526829,1.591707,1.442615,0.848163,2.738959,4.222698,2.484605,1.799492,4.635554,0.669248,2.401596,3.807056,4.489616,4.638902,0.560023,2.702724,1.057628,0.885843,4.327989,1.845368,0.530318,1.091271,1.904548,3.248256,3.121134,4.622504,1.576469,1.985551,1.415378,0.582986,4.804846,0.480226,2.363869,2.850051,3.501036,1.360354,2.580349,1.938248,0.484790,0.602538,2.018408,0.017620,0.124852,0.266323,3.827010,4.446989,4.521335,0.040615,3.270929,1.432126,0.349397,0.518782,0.333665,2.751338,1.534378,0.831386,0.727381,4.197055,0.112754,2.476287,0.363707,0.729764,2.326470,1.034490,3.183473,1.894915,3.922399,3.289473,4.889575,1.785182,2.230768,3.340992,2.110408,1.195284,0.033386,1.378029,4.320983,2.947696,0.023251,3.939637,0.078058,4.765848,2.569049,4.540460,4.429629,4.426334,1.879011,0.929391,1.755955,0.671383,4.171962,2.842952,1.242912,4.099913,2.304428,0.054397,0.766484,2.108781,0.388057,3.216747,0.986632,2.970555,0.047087,0.724003,1.629656,0.438410,4.917661,1.160086,4.493426,3.431841,4.792831,4.552478,4.393306,2.888866,4.823212,0.904100,2.270961,3.905633,2.417559,4.972112,3.665741,1.031777,4.056978,4.437309,2.697086,4.952701,2.679517,3.865655,1.620143,1.194150,3.918802,0.964853,1.419649,1.841077,3.122536,1.711181,1.604626,2.215322,2.248910,0.104834,1.582382,2.348313,1.177444,2.385021,2.846443,4.197592,3.873732,1.283142,0.643617,0.006485,1.993095,4.276825,0.806964,1.433598,2.716014,2.969091,2.736131,0.012681,3.853584,4.501512,1.263894,0.666081,3.842329,3.650163,3.965244,4.594720,0.221204,2.685166,3.945369,2.506170,2.760711,2.833116,0.051948,4.521443,1.053938,0.127290,3.167195,2.800870,0.638796,4.991473,1.957475,1.329971,0.505985,2.672686,0.821378,0.728377,3.637541,0.334303,3.565759,0.348226,1.971568,0.624693,4.923294,1.181228,1.822311,1.056656,2.719420,4.611342,2.413293,3.710666,1.774443,1.411946,0.492996,4.849494,1.892561,4.368065,3.098482,3.391063,2.286333,1.636228,2.368450,3.831901,4.560472,2.476456,2.654313,3.662291,4.796732,3.289112,4.250241,2.020591,0.897434,3.523574,1.225321,4.429171,0.393618,2.379667,2.181941,4.311771,4.843932,4.768131,0.274649,4.953831,3.339833,1.261431,1.885220,4.443488,4.580263,0.609447,0.716577,0.220978,1.969232,1.725678,3.363574,0.808225,3.984889,2.900740,0.555042,4.484263,4.247134,3.770496,2.398707,3.051897,0.988875,3.798994,3.469724,3.994559,4.689481,4.444340,4.477021,2.149958,3.942992,4.847893,1.330396,3.826010,1.215591,1.426578,2.138413,2.210800,3.504001,0.523701,4.208128,0.680637,0.127883,2.015979,3.875301,1.742118,4.251441,3.316850,3.544496,2.584592,2.946953,0.818978,4.437494,2.128797,2.194471,3.392361,4.441969,3.720224,2.206739,2.311888,1.391778,0.291960,4.698423,0.498114,1.352629,4.737242,2.888875,4.265349,3.475624,0.232017,0.749104,0.587690,2.406417,4.082048,3.590922,1.035696,2.084032,3.491493,4.471934,4.580621,2.523166,2.081006,3.258632,3.312762,4.866410,2.490274,2.688071,2.295904,3.585350,1.676182,0.178311,2.780779,1.406441,3.740018,0.858821,4.225524,3.804549,1.882974,0.861246,4.275899,1.708481,0.520754,2.540535,0.201599,0.803984,0.662032,2.494800,1.641182,3.623379,0.540886,1.528310,1.493489,3.736447,4.398873,2.463574,2.808386,3.984488,4.356048,3.818650,1.294983,0.364842,1.054597,3.097832,2.744435,2.539124,0.365909,2.054348,0.130946,3.266951,1.229352,3.535249,2.661239,0.270870,0.696069,4.558888,4.378924,4.078771,2.855764,1.800946,4.793820,4.547204,0.085137,0.605331,2.715246,3.452626,2.324193,0.910334,2.101403,1.026809,4.021004,2.711114,2.044263,0.708331,2.572191,2.831952,3.265524,3.527775,0.209139,1.888986,1.860188,0.852458,1.611090,0.220689,2.310716,2.569096,2.446015,0.709920,0.529325,3.795822,3.744378,1.484822,3.400140,4.707575,4.195120,1.477093,0.666152,0.256139,2.518642,2.287682,3.755692,3.841770,0.349894,4.857158,1.289571,1.870512,2.881435,0.191413,3.564421,0.960999,4.584995,1.233692,2.066538,1.121626,3.230495,1.886514,1.195876,4.219607,3.514726,2.358243,1.429677,4.361466,2.096919,2.326984,0.959965,4.169602,2.749525,3.284489,2.094086,0.096887,1.502559,0.103361,0.149643,4.925642,0.473734,2.254984,4.193597,2.107752,1.243762,2.070008,4.119444,0.224457,2.443889,0.967530,0.301347,3.927772,0.072413,2.074790,2.727514,0.864419,4.497283,2.043403,0.910519,3.055898,3.197243,1.943357,0.157342,3.308230,1.188833,0.749628,4.104686,2.521207,2.239649,3.774211,2.353446,3.059199,2.031203,4.437611,2.827828,4.512555,4.494148,3.792854,2.740256,3.271098,1.110424,4.595637,4.298680,3.935716,0.127405,0.972636,4.583487,4.045270,4.230798,2.022848,1.281874,4.453489,1.864777,1.494353,1.504312,4.412162,0.884650,4.164787,2.387839,1.305719,2.921156,1.394957,2.574443,3.068379,2.915119,4.081186,3.093834,1.103198,1.474466,2.010889,3.847437,4.520912,0.122662,4.967091,2.457310,0.658720,2.827208,2.292667,0.246608,2.888121,4.657856,2.363153,1.146013,3.354702,1.338127,4.575955,2.385228,3.922772,0.245688,3.662444,0.739881,1.088589,4.306542,0.619626,1.473554,1.849536,4.550053,0.714448,3.084675,1.014539,1.444045,2.225300,2.736133,0.876868,2.977610,3.036222,2.042676,1.003601,1.669636,0.490183,3.724189,0.073087,1.658954,4.621703,0.937597,2.617578,0.746225,4.748842,4.102897,1.563127,3.759729,2.836761,1.108261,0.671936,1.246224,3.144953,4.773875,3.884376,4.517304,0.970392,4.572947,0.423410,4.720934,0.706078,1.807649,1.727777,1.649285,3.683077,4.197360,2.852367,2.730375,1.306540,4.516625,2.823887,2.056561,2.797496,0.522333,0.557171,4.636426,1.092779,1.351406,2.786211,2.434310,2.778664,1.827146,2.026076,0.843994,2.485086,2.114781,4.700419,0.648936,3.078702,4.832630,0.489809,3.605593,4.327580,1.661165,2.846817,0.448151,1.685283,1.244157,3.426840,0.278439,2.416145,2.769229,4.656273,4.605611,0.032965,2.905155,1.998941,2.681281,3.248000,1.371884,3.805754,4.602598,4.443930,3.776714,2.622283,2.425963,3.724993,3.863651,0.060597,0.189139,2.387800,4.331782,1.075032,0.717884,4.665811,4.455562,1.343371,4.201425,3.785051,4.976955,0.816872,4.486968,0.284902,3.365323,3.345789,4.578470,1.139378,0.858162,2.567557,4.762859,1.394330,3.983325,1.599711,1.275609,3.420529,3.857030,0.065317,2.918004,2.654516,1.945036,3.926589,1.779604,2.720140,2.139291,2.240258,2.428088,0.780905,4.017294,1.452962,2.581479,1.365341,4.296417,4.158435,4.753099,1.821321,4.434768,4.294287,2.869022,0.737872,3.520743,4.723939,4.096525,0.382655,0.112617,2.303180,4.565044,3.611814,4.996928,3.136493,4.411150,4.060125,2.693045,0.452253,0.654165,4.077410,1.846869,3.013205,1.458558,4.457646,4.579982,4.778527,4.643184,2.820085,3.009399,4.811238,1.863173,3.154185,2.198591,1.723609,4.647211,2.848221,2.325531,0.270644,0.777444,2.703717,4.973092,2.297182,3.125958,4.258462,4.591986,1.830650,0.817969,4.856515,2.637448,4.428896,1.492531,0.443317,4.392011,2.082817,2.202888,4.917693,2.044213,2.868398,3.686456,1.125992,1.348490,3.694127,4.035724,1.002982,1.543696,0.043606,1.924164,4.505575,2.006702,3.795075,0.286935,2.939474,4.770220,4.921920,2.892019,0.071595,4.199478,3.673576,0.123406,3.783309,3.597492,0.482964,2.681886,2.744380,4.474275,2.215611,2.795788,2.754732,2.596880,4.265792,4.733147,4.574610,0.982258,4.339999,1.588774,0.064058,2.665621,0.471366,2.496541,3.698877,4.228875,1.614067,4.194019,0.285651,3.078107,1.747849,2.743760,0.959739,1.156176,4.181929,3.987969,4.271634,2.391940,3.310658,2.290958,1.245621,0.030989,4.599034,3.485517,3.909159,0.370568,4.414552,0.733673,4.215205,3.823601,3.694091,3.435988,1.012509,3.288955,0.542952,4.298087,1.001854,2.198027,4.530222,3.977137,0.190611,2.442531,2.625731,4.176416,2.984826,0.329622,2.098654,3.301002,4.940172,1.920422,4.922966,2.744304,2.318770,2.077170,2.896697,2.142683,1.917378,4.890845,2.472542,3.900943,2.531492,1.159658,4.741840,4.406535,0.709667,4.424912,0.985070,2.843067,4.655076,2.822466,1.058143,1.324770,3.392854,3.735198,2.958761,1.407129,0.933854,3.273233,1.146656,0.813895,0.655706,3.694223,3.559558,4.637373,1.308563,2.947273,4.598081,1.117528,2.269845,4.829088,4.774412,2.557931,2.243344,4.724134,2.997283,1.234707,2.586633,2.862765,2.761459,2.028396,0.732102,4.340281,0.561640,0.697341,0.746241,0.197053,4.288659,4.458542,0.612818,2.307844,1.965923,0.630769,4.321963,4.320337,3.704092,0.832829,1.318148,0.961521,4.162343,2.338093,0.752231,0.050476,1.392553,4.870653,0.158454,4.557258,0.289702,3.358851,1.748485,2.277492,1.105694,1.692629,1.540531,3.544501,4.356268,2.046583,4.081106,0.057746,3.938488,2.629769,4.168645,1.120203,1.883714,3.488543,4.242102,2.391583,4.231800,2.741597,4.956855,4.523556,1.928140,4.777413,3.826709,2.627514,4.955216,3.474917,0.973034,0.570184,1.310579,3.677511,2.752234,1.985757,3.792148,0.118937,4.067875,3.741340,0.901014,1.945116,0.188001,0.058939,4.981339,2.440983,1.860124,0.980860,4.035961,3.528764,0.007781,3.856133,0.557414,4.743163,1.663680,2.255514,0.024905,4.121963,1.540841,2.782234,4.633004,0.781112,4.336648,2.501195,4.622281,4.111775,2.214900,0.443559,0.150987,4.371154,2.371425,3.318475,4.408242,1.523295,4.478815,0.137662,1.399628,4.058832,4.266102,4.724177,1.515056,3.901178,4.925652,2.635030,1.262981,0.194812,3.798265,0.694227,1.934713,1.546389,2.084253,4.529995,2.129739,4.563722,4.027004,1.441892,1.590445,1.849221,3.028236,3.370313,4.861149,4.632580,3.059359,0.231194,2.726538,2.018201,2.723894,0.200882,4.978811,0.284792,1.363400,0.360620,2.738056,1.759091,1.876499,3.945838,4.520101,0.828485,1.394885,2.363643,0.564408,1.932690,1.510440,4.609882,0.992671,3.606057,1.079466,3.128292,2.909954,2.293621,4.084537,1.113586,2.386401,4.912088,0.916309,2.727162,1.465529,0.619030,4.257965,2.888394,2.894146,2.726674,0.922341,2.843166,0.456945,3.413209,0.257286,0.945756,1.471089,1.394656,4.060511,1.438753,0.369790,0.339913,0.747068,1.970960,0.984071,1.175112,0.919878,1.493677,2.524294,4.856735,3.959952,0.862604,4.014253,3.550465,4.528992,2.173534,4.335493,3.490451,1.365463,1.948881,4.192393,4.038561,1.227530,4.181369,4.728785,4.388847,1.906440,2.705809,4.229803,3.582002,3.545525,1.426257,3.054009,0.272306,1.485737,1.013944,1.935073,3.691148,1.302706,0.894575,4.210178,4.575490,2.231083,1.222489,1.261830,2.080899,4.012215,2.807408,2.886680,4.890787,0.388376,2.375067,2.397011,2.769870,0.839701,0.844611,2.077243,3.031086,1.514013,2.487596,4.933786,0.152155,2.329336,2.369523,3.459032,1.332001,3.999670,2.004967,0.475812,3.150302,0.131966,3.584011,0.060701,2.983351,4.354460,3.492042,3.121719,2.158956,1.680978,1.851478,1.875132,2.649418,0.716650,4.409410,3.129378,1.872181,4.911061,4.362638,3.034081,1.858744,1.845469,0.333534,1.712605,1.228421,3.042756,3.600817,1.462124,2.730737,3.935398,3.209519,3.718307,1.090398,3.175249,1.368922,1.153753,1.354686,1.832628,2.354702,1.146307,1.749817,4.482484,0.673135,1.078620,0.303463,3.544406,2.647054,2.371602,0.172076,4.806713,4.220387,4.101871,4.376087,3.885126,0.697188,4.857462,4.668592,3.480386,1.460053,0.005556,2.429309,2.974017,4.969907,0.664575,0.444100,2.131592,3.754781,1.700352,3.311801,4.447192,3.965810,0.507979,2.230377,0.189963,0.843192,3.853555,0.870466,2.794070,3.074892,0.783182,4.574111,0.292509,4.596173,0.568997,4.504350,1.839455,3.949204,1.971188,3.665782,4.261954,2.627194,2.010698,1.973163,0.282959,0.074079,3.717851,2.076997,0.755464,4.357685,3.188859,2.372522,1.784925,1.723732,1.857101,4.432772,1.893021,0.096582,0.724668,1.731041,0.831761,4.114907,4.993658,1.670815,2.425932,0.238091,0.972321,1.145303,1.937415,4.132083,1.996051,3.707143,2.642949,3.318246,0.986119,0.194059,1.233352,0.506163,3.513341,2.846128,3.968442,2.012982,1.302461,4.305204,2.827653,2.364494,4.456719,1.739063,2.044511,1.287223,0.663538,2.854480,4.606711,3.244012,3.319302,4.292119,3.500605,1.879702,4.016626,0.619987,4.357345,2.545709,2.729107,4.613378,3.413399,0.390842,1.264530,3.553833,0.465605,1.306484,1.318435,3.538543,0.258116,1.724906,2.131865,0.366464,2.292008,2.657039,4.854093,4.367591,4.652766,1.353650,0.750836,3.192462,1.007624,2.932410,0.978624,0.325720,2.244621,3.182249,0.470673,2.748590,2.184174,1.276209,0.859389,1.171630,4.483058,0.159352,0.737423,2.590849,3.413205,2.051598,1.201789,1.371737,3.246993,3.564509,4.851428,3.517539,2.109577,1.227698,2.673194,3.632831,0.582960,0.299046,1.120791,2.096237,3.335872,0.045718,2.692781,1.454373,1.675078,2.166150,2.300124,2.008903,0.436965,0.795719,2.466797,1.932784,4.983508,3.848098,2.914256,2.739175,0.249980,3.383658,2.827151,2.579501,3.832223,3.914952,1.083453,0.923246,3.298333,1.654012,2.273896,0.221887,2.114695,4.709245,3.438343,4.097027,3.137624,2.925542,4.854275,2.448569,3.951510,1.157055,0.509806,0.906635,1.711521,2.303414,4.446935,2.963128,3.213050,1.924745,3.348100,2.020580,3.040346,2.679050,1.539533,0.418012,0.613020,2.874528,0.365557,2.265278,4.495305,2.913195,4.883315,1.439404,3.249567,4.673774,1.747021,2.667903,4.235892,1.656673,0.044768,4.951128,2.030613,0.547375,3.680137,1.625297,0.842284,0.592453,3.487868,4.966311,1.959573,3.818693,3.271202,2.104808,0.244670,2.047145,0.146328,4.761208,2.046941,2.896201,4.703674,2.880123,0.861645,4.758068,0.939699,0.640731,1.812257,2.174254,4.886863,2.770275,4.029203,3.844919,2.011131,0.373246,0.598656,4.963586,4.299726,1.728591,4.163901,4.499337,4.616975,4.376030,0.931100,3.967325,0.278176,4.032635,2.884543,3.674681,2.748528,2.987595,0.185107,0.157279,4.060653,1.455282,4.036071,3.517521,2.824738,0.524805,0.330212,1.919907,4.626259,1.131317,2.111204,3.208439,2.483509,0.125480,3.476433,4.592038,2.998471,2.902063,4.176491,4.164192,0.933783,2.111496,4.096349,3.674170,4.221940,0.647217,2.197335,3.544766,3.650806,0.359025,3.559702,3.131142,1.744565,1.520543,0.145047,1.959949,1.534976,2.157507,3.543728,0.727410,2.399812,3.964266,1.243173,4.318422,4.664797,0.564198,0.578502,3.226010,2.585950,4.517888,4.009760,2.509463,0.343453,0.494352,2.242455,1.522858,4.715647,3.329229,1.352653,1.784793,0.403914,1.248440,1.593857,3.209742,0.862769,3.385918,0.588247,4.470631,3.132183,2.887363,0.936358,3.704353,1.180261,3.990216,3.894773,4.696979,3.913466,1.824726,2.553261,3.134345,1.337590,4.000258,1.645490,0.650680,0.297607,3.300047,1.323557,4.257878,3.862159,0.576040,2.776406,4.836869,4.146155,4.361198,1.313783,3.627392,1.699408,4.140313,0.513261,3.425570,3.224522,1.306591,3.160807,4.554405 \ No newline at end of file diff --git a/arpack/src/test/resources/geB.mat b/arpack/src/test/resources/geB.mat deleted file mode 100644 index c58fe294..00000000 --- a/arpack/src/test/resources/geB.mat +++ /dev/null @@ -1 +0,0 @@ -3.075829,0.920215,1.530812,1.757792,1.555847,3.422037,4.750014,2.519551,3.951285,4.721925,1.872222,0.231393,3.766508,3.674952,1.516258,1.345649,3.516641,0.782026,4.217241,4.303145,2.831742,1.094025,4.745015,1.176408,1.545005,2.209160,2.603650,2.277587,0.001035,4.310982,0.118693,4.407753,4.114089,4.683496,1.569817,0.898535,0.271433,3.438713,0.782794,0.839157,1.151965,1.393095,1.067983,3.037086,2.555580,3.253433,3.210241,4.275779,0.183633,2.788558,1.929708,3.946323,1.142774,3.044759,1.347967,1.173356,1.639185,0.317879,3.731931,4.406550,0.084926,3.262212,2.814503,4.526970,3.426801,2.092925,2.890980,0.636072,0.810751,1.119185,2.415450,1.334121,0.502722,2.592542,3.489149,0.482195,3.644764,0.118341,3.494703,4.765426,2.283834,0.329454,1.413410,0.737569,2.504683,0.904017,4.981908,2.097829,1.936706,0.320820,2.992951,0.621517,1.308707,1.495696,0.490580,4.150069,0.552645,2.415025,1.445313,1.182723,1.116479,3.349322,3.968988,2.044567,1.592642,3.655178,1.345821,4.352304,1.469388,0.256263,2.351713,1.499527,2.329769,1.460132,4.935073,4.872680,3.087676,4.532801,1.564680,3.939464,3.825263,1.776573,3.607359,0.468087,1.162906,1.049509,3.128857,1.008811,1.417786,1.361797,4.716747,4.739999,4.158233,2.257610,2.450330,1.872886,2.304148,0.707519,1.354922,0.925507,4.404531,3.449866,0.666674,2.152048,1.628213,0.074714,3.697138,2.201049,1.808299,0.910756,2.441446,1.358195,2.538882,1.251967,1.463226,2.125815,3.054557,4.212815,1.393273,1.636871,3.223375,4.974227,1.153830,1.103868,4.101527,3.990348,1.645059,0.073750,2.147590,2.717418,3.800772,3.304735,3.360633,4.016903,3.874359,2.366270,0.524063,4.071678,3.008870,0.165067,3.942455,1.966697,1.570564,2.575242,3.357802,4.624232,0.130089,1.523358,0.202225,4.215657,3.517689,1.352851,3.846921,3.166899,3.300653,3.752149,0.804886,3.002299,2.588215,1.702393,3.653119,2.171201,2.350340,1.046172,3.694770,0.053002,2.486163,2.688224,1.337923,0.842617,1.739806,0.529340,3.605915,2.905666,0.208845,4.769149,3.858811,4.871949,3.213851,4.710569,4.015770,1.543322,3.770739,0.608033,2.531747,4.543861,2.623102,4.733560,1.908855,2.620768,2.847477,4.802488,3.538408,2.974076,0.328545,1.115284,0.616819,2.555792,4.954087,4.187772,2.444176,2.571967,0.206545,4.176446,1.909155,0.138259,4.621481,2.199384,3.372858,2.700237,3.948270,4.811896,3.104828,0.584596,2.941110,0.158539,1.724206,0.369940,1.428552,4.493644,1.059235,3.912550,1.981957,1.846033,4.221970,2.063323,4.912035,0.994245,4.397451,1.355436,2.776574,0.599137,0.234364,1.863837,0.896418,2.441016,1.214960,0.194369,3.591466,1.669001,0.861510,4.739868,2.442796,2.814792,4.811118,0.590772,0.911347,3.551024,2.803941,2.076359,0.560775,2.919800,2.207227,3.355331,1.502109,2.012550,1.540082,1.004660,2.540070,4.145694,0.172161,2.426895,3.760507,3.170272,4.965128,0.286194,0.808711,1.598399,0.031136,2.597331,3.203173,2.093682,2.086701,4.386394,3.059510,1.317512,1.598230,1.004123,1.323215,3.350811,3.188820,1.308233,2.698659,4.303158,1.341897,0.124481,1.380431,4.703615,0.102562,0.607763,0.868621,3.531543,4.893432,2.941546,0.442490,2.289983,3.915352,0.895444,1.479202,3.337873,1.589173,3.644290,3.975737,4.153910,2.756336,1.893975,3.092315,0.931355,1.022826,4.093522,4.086389,2.034313,2.337031,2.148766,2.261919,1.138956,1.091442,4.163896,3.335410,4.878894,0.801124,4.617227,3.827887,2.637874,3.266259,4.188134,2.638138,3.236912,4.883850,3.601481,0.392371,3.584022,4.869380,1.953647,0.217141,3.636628,1.545730,4.589628,0.912694,1.883343,0.118385,2.193512,0.950019,2.985462,3.730933,1.399199,0.668656,0.598718,1.273684,4.142107,2.165346,0.964821,1.418186,1.749623,1.019784,2.697641,2.847384,3.897904,3.477573,1.229021,0.787531,4.519399,4.128175,0.037199,0.117135,2.444137,4.191700,4.626696,0.969803,4.046730,2.080040,3.259858,1.577711,0.629859,3.537727,1.540347,0.148616,4.833965,2.143976,0.496539,4.062133,4.243022,1.506750,3.413825,0.601183,1.935404,1.107585,1.227917,4.823929,0.173379,2.753662,3.182017,1.669243,1.215069,3.981985,0.855072,3.252699,4.998971,4.189009,2.118588,3.408506,2.942346,3.260548,1.557177,2.524934,0.382243,1.159934,1.998697,0.783629,0.797439,0.891374,2.757598,2.262099,3.110307,4.904938,3.034905,1.126328,1.327035,0.987164,3.884156,2.483999,0.567985,4.368588,1.978487,3.048051,4.873086,2.918009,2.540404,4.539169,4.477362,2.279188,3.412821,3.389036,1.482270,0.816425,2.843969,0.180378,4.114471,3.803135,3.544162,4.640774,4.789952,2.336082,3.374087,4.872877,4.267262,3.270687,2.197458,3.712733,0.292441,0.115907,3.768086,0.647619,4.059428,1.972334,4.757597,0.319922,2.514432,1.349031,0.505431,2.705715,0.031428,1.051103,2.259024,1.730843,4.315854,1.429502,1.610667,4.553730,0.857326,3.122900,1.979370,0.325698,3.984570,4.990543,2.112280,2.991496,4.185531,3.928694,2.525262,1.420949,1.259295,4.346273,0.383753,2.951622,2.445663,2.458582,4.024404,0.760212,4.942612,1.572908,4.130097,0.833382,3.797002,3.378242,3.975354,4.995713,3.416875,2.578876,3.493327,3.792165,2.302115,1.144348,1.090405,0.109379,3.792475,1.747783,3.792958,0.651148,3.361084,0.215132,2.968788,0.128900,3.486822,3.959861,2.061967,1.780561,1.160579,4.269403,2.337225,3.780966,3.099278,0.728940,0.850710,1.311195,4.290845,1.619700,4.444700,3.148847,3.541560,1.402402,0.240964,2.269459,3.203055,1.676150,4.763622,3.193984,4.968320,4.006459,2.551404,0.821625,3.249670,0.756127,2.028524,2.467923,2.473374,1.239116,0.114985,2.766429,2.258744,0.319078,2.588017,0.575002,4.959124,3.700300,1.819176,4.198649,0.510917,4.388904,3.294368,0.408047,2.187231,2.983794,3.118664,3.685033,3.295568,3.218442,4.102231,0.102795,4.798566,2.151306,1.421983,2.448088,4.701484,4.594520,4.088595,1.116290,1.429858,4.145092,3.261052,1.229695,4.345607,4.520672,3.174576,4.923153,2.757673,4.290719,1.516111,4.760337,1.810732,0.497748,0.775671,3.167260,3.785924,0.273630,2.347563,3.921035,2.634921,2.094352,0.884714,0.568197,1.665232,1.424745,1.838640,0.380914,1.130096,2.576583,4.958065,2.078815,2.065460,1.420610,2.788605,4.299349,3.346928,4.993418,4.726382,4.216793,0.208763,3.773843,3.079418,3.729073,4.887271,1.102374,1.806905,2.762946,1.680434,4.323124,2.712687,0.026266,4.555013,2.610959,3.430174,2.543606,3.070553,4.904975,2.208982,3.489842,4.297146,0.522541,2.906700,2.292862,4.960874,4.684867,0.931019,0.488025,2.268192,0.095759,2.484817,3.692213,4.416334,4.816191,4.584390,4.569724,1.674365,1.932933,4.071070,2.335731,0.752807,2.271343,1.849599,0.426611,1.752065,4.796103,4.632371,4.845690,2.858414,0.529475,1.134942,0.931827,0.943268,4.441714,1.020089,1.894827,0.465335,0.182540,4.739254,3.812076,2.174469,0.844084,4.902019,2.170816,2.722770,0.377119,1.397717,1.311670,0.695120,4.470922,0.969096,0.154013,4.929299,4.697868,3.614732,4.207205,0.781199,0.399887,4.321088,1.792424,1.613881,3.443475,3.785203,3.068429,0.476439,1.826363,0.065789,0.487297,3.641852,1.363023,0.798102,4.902278,4.101774,3.410733,1.627977,0.838915,4.080514,4.632697,4.318470,1.263110,0.445923,2.520989,3.865608,4.908215,4.579359,0.159990,0.110352,3.158620,0.639011,3.036897,0.047018,3.708507,1.935760,3.789404,3.463606,2.388200,2.543164,0.451025,3.241801,3.203775,4.079160,0.245845,0.938868,3.314792,2.758663,2.074356,0.134826,4.170098,1.450639,1.823945,2.277655,2.724635,1.204705,2.493556,4.626904,1.008522,2.752821,4.865551,2.398834,4.525603,0.189901,2.619587,0.014373,1.354938,4.583164,2.077235,2.315192,2.015369,3.697346,1.990870,2.554979,0.317136,3.566478,2.671607,4.867841,4.355635,1.727228,1.862288,3.301391,2.292233,2.773057,4.854831,0.453288,2.973928,3.387950,1.096854,2.930474,3.874748,1.427539,4.885055,0.651328,2.369636,3.644355,2.200954,2.572454,2.374079,0.268065,1.607412,0.414567,3.801576,2.387948,2.035808,3.804645,3.285596,2.066368,0.669490,2.412986,0.962185,2.097422,4.403759,1.379438,2.168542,0.157403,4.470150,0.397665,3.172317,4.857129,4.565571,0.154792,1.351036,0.538530,2.027552,2.263712,0.836001,3.872690,1.744690,1.995828,1.486114,1.432749,2.099950,2.051240,2.575852,3.544496,0.558856,0.465110,0.777152,0.480886,0.813153,0.156175,4.135156,4.005483,0.119119,1.625000,3.132469,0.766111,0.858270,0.336670,0.787449,3.235623,3.148735,1.335188,1.290308,2.078116,2.393838,4.587950,3.387457,1.599877,3.827761,2.213284,2.947008,3.281490,1.625651,2.503144,0.505317,4.235222,4.762083,4.509193,0.223768,4.264368,4.210370,0.653345,3.604789,0.269247,4.059304,4.010136,4.838243,2.169734,2.484503,2.155539,2.551872,4.076830,4.341866,0.076822,3.341184,3.120973,3.059353,3.747956,3.665006,0.537034,3.551475,4.145559,0.061318,1.598635,1.000796,0.093975,4.343428,2.688094,3.684679,1.088011,0.623288,0.779391,4.229570,1.292284,3.088326,1.772305,2.201978,4.275869,3.671407,1.678327,4.486002,1.578977,3.751244,3.949162,1.803721,2.622464,2.297160,3.122623,3.649290,4.560704,2.919279,4.511797,4.964570,2.728671,1.260600,3.212567,3.645954,3.241378,0.278544,0.943222,1.192918,1.225109,4.695536,3.340074,1.160968,0.827815,0.241622,1.415060,1.683534,1.403477,3.599096,2.834944,0.516513,3.246805,1.552710,3.706800,2.444846,0.704481,0.914717,2.757375,1.422418,1.910353,3.927836,2.779925,4.386301,3.440192,0.769072,0.497757,3.216607,2.677825,3.671484,2.772750,4.938161,4.908209,1.360796,3.959348,3.830578,4.202307,2.101694,4.639007,1.883881,3.566622,3.011890,1.819736,1.139416,3.426768,4.511659,1.992491,0.482343,1.403038,2.003268,2.035288,3.188375,0.575751,0.563032,0.867716,0.828666,0.878797,0.026126,1.371016,2.828456,4.960959,2.055339,4.230278,1.047357,4.698849,0.085101,0.135666,1.810344,4.376577,2.834622,0.175673,4.201752,0.810906,1.879990,0.427002,4.656046,0.031187,4.392283,0.841810,1.011289,1.103577,0.711733,0.715484,4.357948,2.085418,1.813383,1.227318,4.524552,2.924976,1.726165,0.988385,4.564596,1.024052,0.326645,3.152679,1.385472,0.889461,3.025456,2.281860,0.785351,2.872282,3.336158,3.468883,1.260719,2.594274,1.687569,4.633369,2.406108,2.852766,2.656933,4.990066,4.479693,4.937037,1.201938,2.411830,2.264035,3.507460,3.612926,2.091780,2.633444,2.328259,3.827980,2.472052,3.390175,4.115642,3.391400,1.820858,2.392215,2.331173,4.796346,2.178713,4.567919,4.548205,3.732735,1.010246,2.125745,3.225188,1.283924,0.802041,2.411218,2.999158,3.236722,3.057671,1.457077,1.740993,1.914601,1.022676,1.034661,2.292846,0.641974,0.549845,2.527450,0.238186,2.012367,3.743415,4.871285,2.499384,1.285699,3.139772,0.724706,4.652490,3.775219,0.753293,0.488363,4.631417,4.780268,1.256714,0.859329,3.448070,4.968510,1.288831,1.804301,1.799352,2.327122,1.312000,2.794533,4.158194,2.001805,1.400875,4.672445,2.748730,1.163516,1.735718,2.504713,0.444667,0.169162,3.553522,3.710018,2.351856,4.321581,2.942031,3.786813,4.679913,3.951818,1.552743,0.594857,0.198853,1.952740,0.037265,3.689525,2.258838,3.661150,2.488721,0.074471,4.360631,4.602662,3.005298,3.495831,0.303353,3.478583,0.420002,1.603939,1.492654,4.207151,2.314483,0.313619,1.210999,2.221804,4.737461,1.206611,3.876993,0.874713,3.211680,1.127921,3.859935,2.712602,4.462967,0.533907,0.946418,3.831239,1.679836,0.347380,3.515442,0.678601,0.595969,2.514245,2.059952,0.869984,3.352834,2.077440,3.425801,1.914095,4.129313,2.870366,4.059150,3.130113,1.808450,1.938747,4.037230,0.146134,0.865719,3.147686,3.717109,4.261776,3.855055,4.907416,4.599283,2.104708,3.942544,1.480100,4.643712,4.985817,3.672894,1.672738,4.814978,0.204749,2.050008,2.550174,2.573134,1.124379,2.011186,3.555740,3.887913,3.591601,0.083775,3.377745,1.205890,3.228562,1.900396,2.867503,1.123691,3.386913,4.513132,1.672952,0.318308,4.697065,2.745226,4.158894,4.731007,4.374350,2.601888,4.886553,2.188749,1.248643,4.341144,4.410106,0.296918,3.683919,1.675665,4.300488,1.214660,2.901513,0.651237,4.416650,0.680062,3.239565,1.127867,3.783196,0.920970,3.791425,2.529951,3.543431,2.603039,2.782711,3.022161,1.141719,2.878740,1.319197,1.497299,2.495117,1.141278,3.094901,1.497840,0.930207,4.493600,2.179112,4.714638,2.073600,0.052940,0.996090,4.176752,1.800931,4.231885,1.941045,1.483619,4.003634,0.361443,4.379758,2.099332,1.643551,1.099603,2.972037,4.739730,1.762095,1.153343,1.238260,0.455159,1.183574,3.221000,3.567245,2.083019,4.718216,0.834817,3.578547,2.025727,1.196880,0.973243,0.838065,4.889277,1.947123,3.040691,2.161848,4.054819,3.792935,0.233694,3.206853,4.844106,4.252125,1.478371,3.054676,2.251824,2.922876,2.808841,3.666141,1.604095,2.161609,2.895513,0.040443,1.358301,2.430738,0.902538,3.595365,0.526124,3.614258,4.111076,3.427964,4.586319,3.558388,1.105941,4.110047,1.216400,4.157692,2.944260,2.563266,2.894917,1.967979,1.352352,2.301968,0.690283,3.098191,2.734296,3.365392,3.191333,4.619802,2.585734,0.062380,4.401659,0.604879,3.645972,0.987120,0.616498,4.773728,0.178554,0.150997,2.241692,2.928513,0.883050,3.623390,4.696011,2.492402,0.608809,4.217405,4.714546,4.164112,2.823452,4.198730,1.884418,2.498380,0.406512,1.620776,4.578257,4.267262,2.970783,4.526828,2.134639,4.688054,4.729354,2.849839,0.251016,4.423310,4.556942,4.715268,2.360098,1.456466,0.437565,4.396674,3.615101,4.009028,3.845332,4.086827,0.554948,1.691390,4.070852,3.671381,3.833782,3.798054,0.334600,4.130368,0.429563,4.112027,1.585441,1.060621,0.979530,0.386132,2.491315,3.923012,3.252206,4.960217,3.855134,3.641447,2.056606,0.604046,1.898792,4.298250,1.679234,0.612582,2.656775,3.037238,0.591568,3.831553,2.539515,2.935688,0.192014,1.078951,2.202344,0.520443,3.649393,1.083890,1.806399,0.166972,1.265508,4.245271,2.667584,3.660650,1.037938,0.980890,2.919133,0.960009,0.988615,0.496104,3.797794,0.440903,4.444884,4.352768,0.806309,4.836971,1.704639,4.444984,0.361373,0.718855,2.206979,0.238360,1.347568,2.994183,0.658145,0.622340,2.005933,0.515602,3.264206,3.952128,2.369196,0.326522,3.061536,1.199172,1.900174,0.963898,3.202384,4.094630,4.292715,3.859043,2.733037,2.779124,1.015016,0.075975,2.796250,3.488272,1.980113,3.214622,1.624976,1.764548,1.896340,4.231832,1.017757,4.839369,1.301376,2.453378,1.283494,2.387155,1.996332,1.873896,1.497570,0.109864,4.037890,2.255004,1.298803,0.941172,0.789541,4.745137,2.983474,1.312113,1.306249,4.967372,3.223418,0.816246,3.984175,2.184550,3.344527,2.938898,0.713279,0.616244,3.776547,1.198279,3.564000,0.115280,4.879407,2.502451,2.143559,3.974908,2.050782,3.435797,0.120237,4.588290,2.740781,3.643147,4.708740,2.101554,0.521562,0.168701,2.366068,2.876501,1.759345,2.440032,0.633799,0.809456,4.517640,0.885167,2.686369,1.640872,4.745640,0.487770,1.151088,1.496138,1.806206,0.482274,0.773361,4.327923,2.403950,0.799688,4.585893,3.617939,1.270055,4.382664,3.689760,4.973432,0.394200,3.097453,1.301496,0.762859,1.449818,3.634059,3.143583,1.568580,0.523209,0.619085,3.051045,2.375408,1.854397,0.483743,2.466762,1.323550,4.368029,3.470007,2.087165,4.597568,2.795249,4.145722,2.966873,4.716247,0.444131,3.890005,0.207252,0.536427,4.040641,3.630768,2.973939,4.582183,1.977020,0.027282,0.358271,3.620093,1.296853,2.925791,2.198109,1.160688,3.717346,0.152270,3.433016,3.745832,0.417574,1.397517,4.619796,2.317518,2.916284,3.869173,4.276560,0.514982,2.663556,1.032187,3.468852,4.721209,0.234218,3.228438,3.208562,2.073545,3.135724,1.949361,4.934990,2.399358,4.124496,4.648535,3.706026,3.375389,3.519365,0.646376,1.360936,2.287280,2.119495,0.813759,1.614118,3.574456,0.269999,3.165030,1.827697,4.677249,1.448991,4.844719,4.263646,1.054032,4.485361,1.553377,2.211560,2.169322,0.816075,2.554401,0.260429,4.846001,2.108273,4.168938,1.537730,1.435635,3.020014,3.860453,1.642115,3.681942,0.528917,0.367684,0.448613,1.411791,2.607433,1.499436,1.502649,2.514246,0.208863,4.158942,2.843751,0.590259,4.887878,1.440462,1.162748,4.337340,3.743651,2.466474,4.390397,2.316448,0.132208,3.609113,1.318354,1.616518,4.648922,3.109558,3.819055,2.667904,2.952424,3.833628,4.731425,3.549385,0.140694,1.784971,3.868047,0.166864,4.399792,3.362817,1.185738,2.181970,0.145353,0.352598,2.751347,1.134687,0.894797,4.732053,3.264702,0.216428,1.481330,0.914765,4.791044,1.531208,3.043550,2.599086,4.535554,0.025077,1.629947,0.871908,3.908850,1.945301,4.184943,2.640863,4.750033,2.212530,1.750676,3.682488,0.916648,3.203424,0.297764,3.627862,3.870931,0.660183,4.417428,0.454079,3.726703,4.574578,3.225597,2.835699,3.599274,1.107914,1.509447,4.167587,0.452480,2.936695,4.427393,0.410074,0.850082,0.517484,0.532679,4.012089,3.128278,1.118453,2.153888,2.883673,3.492770,1.792938,1.798188,1.958945,0.812820,0.209814,3.100869,2.300392,1.414831,2.242110,0.474519,1.930010,3.089294,4.655705,2.491443,1.227758,2.223911,1.074828,4.540111,4.653897,0.261840,3.737064,2.196055,4.127900,2.951257,1.562524,0.127675,4.400793,2.973227,1.490352,0.573596,2.774872,3.506257,3.105476,0.082711,4.451710,2.175650,0.361027,3.556113,2.361777,1.927035,2.760120,1.633828,1.191576,4.538362,4.022857,1.664782,1.451601,3.779015,3.861311,0.030426,4.255968,2.235095,0.483744,3.103567,1.603926,4.645427,4.018978,0.839726,3.867941,1.266310,1.438017,4.919151,0.574724,3.723037,3.725090,1.047048,4.411657,0.445522,3.584315,0.001704,3.554410,3.092752,1.894638,3.250316,3.331978,3.061171,1.007819,1.539457,4.372385,4.177582,1.682519,4.942260,4.734557,3.561257,1.029579,1.157091,2.385553,0.374192,4.490359,2.041118,1.785204,2.266722,4.614634,4.554786,1.282387,2.745349,2.163342,0.229592,2.622879,3.837776,3.864161,3.669764,1.017057,0.366042,0.845239,0.049575,3.778932,1.022831,2.177197,0.463057,2.691870,2.042212,1.365656,4.750134,1.552084,3.348362,4.818889,3.489932,3.436936,3.916947,3.249688,2.045775,1.169948,4.783375,3.228654,0.034865,1.879938,0.205960,4.286360,1.103817,2.695536,1.003143,3.191882,3.259411,3.823839,2.628999,4.162765,3.809594,2.583794,4.261829,0.613554,0.701233,4.949411,0.653937,3.153422,3.195062,1.935388,2.178259,2.585092,2.383595,3.152134,0.317611,1.147785,2.834367,2.813124,1.207737,0.464828,1.047757,2.648248,1.910568,1.479080,0.242158,0.263180,4.063362,2.748975,4.666971,1.228561,0.694192,0.150275,2.967484,2.967722,1.076062,2.043020,0.598666,0.737342,3.155728,1.577575,1.511001,3.000356,1.233398,0.080157,1.527563,4.370014,4.378674,4.593216,0.966391,3.349228,2.461023,1.315843,3.218489,3.050105,0.724193,3.804857,4.553206,1.544943,0.495856,1.817488,4.245601,2.311350,3.819611,2.926852,4.878801,2.785450,3.913450,1.923528,2.245473,1.351398,1.268281,2.765143,3.356035,0.178888,0.195704,0.139216,2.666002,2.916119,2.745601,2.420028,2.802560,1.505013,4.571923,4.254688,2.503890,3.057799,3.048818,1.204211,0.797112,4.449728,1.956976,4.543769,3.467145,3.658154,0.913380,4.438593,3.969769,0.292404,4.497926,2.726975,3.482916,4.132127,1.151640,1.716355,4.033710,1.856077,3.269729,4.093949,3.874047,3.023562,4.621733,1.489255,2.142966,3.863439,3.809464,3.298041,0.627934,2.892310,4.829505,1.319614,0.344864,0.073837,3.017183,0.260732,4.625544,4.420920,4.506044,3.241224,0.155130,2.809218,0.387605,0.410705,0.278439,0.607221,2.644178,2.834372,3.884378,3.916206,1.491104,2.223161,2.542824,0.026330,4.386452,2.489809,2.895596,1.159362,3.880196,1.807051,3.421659,2.579065,4.221442,2.658391,4.218077,1.648893,1.750431,3.542386,3.457782,0.555968,1.544898,0.643496,1.166324,1.860353,4.901400,1.856094,2.235600,0.381996,1.856233,1.513249,1.829872,0.592647,3.284498,0.388375,3.481284,1.179696,3.484141,2.242527,4.802163,1.949044,4.089567,4.695862,0.186708,2.998234,1.299310,1.171177,2.557444,4.703994,0.309623,4.795683,4.032965,4.501040,0.251785,1.503671,0.611139,2.007736,0.867759,0.345685,3.234835,2.669978,4.409770,0.780203,1.739384,2.913624,0.404848,4.461266,4.829622,2.690918,4.139555,2.458420,0.478333,2.009604,2.627751,3.661661,0.676394,2.201153,3.478259,3.164438,0.420184,1.682184,0.239245,0.748086,1.045131,2.075917,2.504204,4.114403,3.888507,2.499822,1.547279,0.664430,4.416867,2.281402,3.092345,3.477416,3.724686,4.117052,2.452845,2.166241,3.764546,1.806750,0.272935,4.079726,3.265901,2.295528,4.901469,3.380985,0.669624,1.753869,2.674973,3.961906,4.261765,2.956545,0.386423,1.874800,1.690280,4.400925,0.767690,1.317639,0.236421,2.329491,0.807210,4.882624,2.157164,4.529543,1.013021,2.857924,3.705445,3.973972,3.327626,4.995099,3.581461,3.058804,4.373967,3.591089,0.651556,3.845049,0.753352,0.743369,1.452300,3.732892,2.921558,1.730248,4.004824,0.470219,1.486195,4.241257,1.812028,1.631287,2.675651,4.542907,4.810448,0.396393,4.742349,4.803876,1.746855,0.090393,1.764067,3.852301,0.612588,1.223637,0.598033,0.170820,4.188253,2.984098,4.383579,0.616882,3.400234,2.875227,4.188956,2.401808,1.437401,2.540912,2.385881,3.430618,4.720789,1.833058,2.854024,1.776024,2.788900,4.563009,1.647654,4.661910,3.843361,3.633414,4.028778,2.719651,1.028530,4.948450,1.416358,1.416108,2.638052,2.056052,0.434193,2.292553,1.698119,4.573383,4.470749,3.028164,3.563576,2.940429,1.155103,3.782382,1.358158,1.828146,4.214526,1.825240,0.240744,0.118909,3.656188,0.226308,4.978565,4.963993,2.097965,1.237900,4.037981,3.651348,4.700213,1.086213,4.738669,2.992911,2.763920,3.121446,1.354880,1.854875,4.421833,3.291607,4.321075,1.434865,0.366853,0.675783,1.291591,2.471260,0.958772,3.392922,3.890833,3.565376,3.639172,2.850926,3.722364,4.423892,3.195202,4.716959,2.799737,3.337378,2.379572,2.755012,3.772623,4.991698,0.238010,2.734144,2.046900,4.647256,0.774581,4.118574,0.652094,3.864287,4.463741,3.732553,4.747227,3.001572,1.404818,4.337122,3.748622,4.192174,2.645344,4.211442,0.575875,4.598181,1.129607,3.927644,0.004912,4.648667,4.758047,4.680659,2.743681,0.885669,0.376173,3.111269,2.666999,2.361374,0.511611,4.372936,3.639144,4.372149,1.950886,3.081703,2.397111,4.915993,1.949910,4.078017,2.948906,1.573203,2.058978,1.761665,3.824835,3.332551,0.581142,3.869435,2.306740,1.632599,1.869454,0.650420,1.561579,0.866207,2.288032,2.639564,4.950098,3.844486,2.644469,1.871641,0.795035,1.896488,2.722900,0.889048,4.499570,3.195586,2.025166,3.971281,0.672745,4.188923,0.094615,1.975421,2.793970,0.839631,3.349074,4.805544,0.404589,0.046179,3.541309,3.966780,2.081385,1.729671,1.758175,4.192692,0.289010,3.980948,0.708483,4.104001,2.707323,4.179615,0.730037,0.723432,1.075488,2.587629,2.215153,1.308003,1.400085,3.830445,0.389364,4.490950,1.971835,3.765013,0.773054,3.944201,1.271773,0.012333,3.885669,2.951493,3.357282,2.993131,1.161592,1.645523,0.037070,4.560410,2.194329,0.840402,0.002118,3.925938,1.718709,1.422153,2.657486,2.462802,3.094413,0.021062,1.824327,4.872911,1.036025,1.640765,0.570327,2.502002,2.003361,2.021917,2.107642,3.510473,2.259566,1.302904,2.465583,4.728445,2.355836,0.695058,4.117257,4.587394,1.702451,0.110348,4.028530,1.625506,2.738700,3.923189,2.383992,1.461992,4.283134,4.615406,3.584709,0.060485,0.215711,2.888618,3.879011,0.707177,4.512598,4.585090,3.960986,3.242517,1.836633,0.463227,4.694793,1.421651,0.914516,4.740143,2.984859,4.774512,4.147748,1.454905,3.329660,3.038837,1.987377,2.710318,2.639500,0.324114,0.897811,2.727837,0.217516,4.050686,1.961761,0.378067,4.206815,0.342971,0.842650,3.833319,4.668295,0.172955,0.302489,2.413137,2.099417,4.817037,2.237147,3.551537,1.751992,0.921328,3.447830,2.276322,2.846217,4.023276,1.767194,2.462596,2.534269,0.341429,3.437563,2.219389,2.995819,4.434779,1.311161,3.368437,2.787900,2.705355,4.682423,1.795444,0.341650,1.711394,0.030677,4.113102,4.944672,4.063953,3.969063,3.226125,2.877568,2.838948,2.026617,0.866509,3.264254,0.125888,1.158789,0.021193,2.495872,1.782184,2.135595,2.866710,0.380250,1.313954,1.150081,4.431642,3.706197,0.929468,4.191747,2.463636,4.062289,3.657923,1.808309,3.008791,2.997642,4.600340,0.480835,4.197712,1.968133,0.702981,1.430672,0.871382,0.446103,1.307782,2.223734,3.565116,4.764352,0.940627,0.452980,1.979320,3.681680,4.127143,1.009305,1.661838,0.445188,1.842550,1.624866,2.776486,3.509134,2.241429,0.006595,3.689839,1.007466,3.255958,4.453670,2.045589,0.154319,4.661451,1.463160,3.642642,1.712034,4.208075,3.260311,1.465084,0.682712,0.816817,3.888480,0.506499,0.728905,2.956465,0.632528,0.267040,0.970146,1.458083,2.006932,3.472470,3.790043,3.135828,2.604133,0.322722,2.277759,0.530920,4.158319,1.462799,2.018377,0.291579,2.110854,3.224336,2.484530,4.116329,1.987680,4.746442,4.139760,3.935649,0.767110,1.202283,1.748328,0.902651,0.373666,0.129227,2.062689,0.189182,0.874572,4.606132,2.492726,0.516731,4.432611,0.928389,2.475076,4.214342,4.940038,0.632454,3.491891,0.385331,2.903403,3.855475,1.687594,3.034103,1.617719,1.553172,1.662268,3.242983,3.089612,4.564037,4.096979,2.904095,3.080385,2.762748,3.388346,2.122395,4.825000,0.061759,0.766101,0.933800,0.737797,2.956544,0.092981,0.509885,0.642505,4.030384,4.212976,3.304523,1.961886,3.709838,4.251957,1.860172,3.370828,3.468241,1.899150,0.177958,2.412905,1.913505,4.552969,0.367226,4.925847,3.449731,4.564273,1.068515,3.299636,0.957703,3.796248,0.144880,2.100687,1.506905,3.867664,4.588577,0.115178,4.197672,0.770588,3.297484,3.279259,3.374320,3.464290,4.608832,1.559886,2.185534,3.058361,2.489942,2.176155,4.472902,4.016147,2.546219,1.581104,3.676624,4.238129,1.539834,4.623627,2.117335,1.605702,3.069497,0.705384,4.556203,3.956667,0.604923,4.584500,4.382892,3.143410,4.671864,3.867576,3.447794,4.402457,1.478583,1.479075,0.406823,3.844668,4.428098,3.471883,4.319044,4.343309,2.275220,3.590203,1.884757,1.419829,4.810685,2.110084,4.294660,3.013716,1.737628,1.890810,4.203513,0.997125,2.287143,0.324733,1.289827,0.682034,1.713617,3.578167,1.884377,2.294836,2.367952,3.021235,0.811022,0.413708,4.734558,1.441373,3.808199,2.669562,3.422322,0.230072,3.404947,4.219286,3.815870,2.735328,0.185391,2.467077,1.355333,2.808952,2.893283,1.978918,3.765784,1.744369,1.148102,3.135352,0.471196,1.560515,2.003219,0.378195,0.458797,2.724167,3.561413,4.501321,4.444904,1.958161,3.088218,0.561600,0.444719,1.305160,3.337909,0.591715,1.635733,4.979687,1.241428,3.793640,0.297491,3.563435,2.092461,3.287793,0.102868,3.821305,0.821702,1.254088,3.572536,3.038280,1.271953,4.218572,0.282756,1.038619,0.895604,0.217236,2.993152,4.882849,4.461944,3.305349,1.206844,3.786163,4.636489,3.367882,3.776916,3.964111,3.151041,2.360849,2.616242,4.641389,4.891420,4.209313,1.785163,2.731853,0.346109,1.188845,4.284136,0.246968,3.069992,2.892243,0.124431,0.681041,2.951313,2.686960,0.151874,2.580222,0.108727,1.455322,1.226075,0.376434,3.368531,2.144828,1.236763,1.344105,4.552119,2.750880,1.268514,2.564701,1.893578,4.476734,1.135947,0.825635,4.486919,1.044872,0.011321,2.493932,4.495811,0.892663,4.170658,4.767841,4.301012,3.893205,1.455075,1.710630,0.785394,2.563898,4.138157,2.483122,4.116790,2.399931,1.742377,0.635509,0.063935,1.765462,4.110278,1.729924,4.094876,3.450333,2.196611,0.213257,3.547611,2.838376,2.325463,4.880643,3.741968,1.725009,1.703023,3.073449,0.774426,2.707043,2.788732,3.295384,4.258264,3.297552,4.518264,0.105764,3.028979,0.155168,4.203866,0.634715,2.462641,0.536573,3.214962,2.743859,0.199736,3.753887,2.658665,2.264369,4.468459,3.922241,4.358252,1.021123,2.454677,1.844230,1.592442,1.509492,1.413556,3.040584,2.750090,0.307753,1.558626,1.756804,0.567634,2.786727,3.575219,0.680059,1.218550,2.438131,0.877313,4.448909,1.488626,3.791177,2.589664,2.995532,3.523904,0.901258,2.657858,1.264198,0.545615,4.246686,1.649256,3.839503,3.615294,2.975722,3.055725,2.579347,2.011998,0.116612,2.970597,2.735414,3.601160,1.226265,2.283047,3.649737,4.252771,2.619008,3.065694,1.389178,2.268608,2.480872,0.714830,0.345794,0.929049,4.172307,2.397890,0.593662,4.788416,0.682532,2.903848,2.696833,1.049978,0.667817,4.603996,0.616566,1.470410,2.775966,3.508168,1.433490,0.185980,3.123909,2.713779,0.288442,2.772783,1.636026,4.052043,1.773120,2.810205,2.598924,4.709860,2.966189,3.254098,2.129968,0.678445,2.352317,3.615572,2.550756,3.022746,3.987102,0.041393,2.767143,3.588804,4.849009,4.234230,3.883802,1.649936,2.464245,3.192468,4.748474,4.969678,3.959201,3.024698,4.979205,4.181634,2.579620,2.652463,1.601895,1.672653,3.981462,1.001410,2.480745,3.307386,4.332354,3.432471,1.129632,1.832517,1.186386,2.302619,0.174114,2.259595,0.543039,3.030563,4.076930,4.320459,4.679651,4.871386,0.228186,4.512719,2.707400,4.055878,2.132324,0.564237,2.560431,2.621800,2.178518,0.606657,0.178657,0.182700,0.562708,0.140716,3.440118,4.686193,1.056256,4.391898,2.621344,0.378502,4.367382,2.360911,4.797873,0.035765,1.691176,1.023370,0.085456,1.689338,2.483509,2.617633,3.898062,1.604487,0.244786,3.187351,4.543093,2.936313,1.183952,1.328228,1.794106,4.354834,4.141129,0.417257,0.722695,3.449286,3.364282,4.400072,2.306694,2.829088,4.370372,1.422621,3.721692,1.216576,0.359456,2.251970,0.092967,3.678369,1.239770,4.492458,0.124439,1.936449,2.059489,4.946670,1.983389,3.444197,0.069012,2.693335,2.080084,1.238278,2.465128,4.430323,4.379707,3.352218,1.763327,3.872333,3.868054,4.454154,4.531654,1.532626,2.714634,2.887558,1.003044,4.733992,3.486069,3.814484,2.322705,4.330668,4.329517,0.343084,4.217684,4.251013,4.126951,1.944877,2.912485,2.773314,3.752275,4.912304,0.304251,3.947846,2.089156,1.875900,2.966587,1.030051,4.346839,0.263661,0.516774,4.069170,3.453369,3.657194,1.901525,3.565390,1.533283,3.909949,0.676259,4.636828,4.301580,0.005088,1.936521,1.373575,3.885680,0.903628,1.390077,0.329315,1.308136,0.963994,4.649903,4.034866,4.696390,1.329679,1.052251,2.848992,3.182027,4.671586,3.108150,1.234664,2.314019,1.909434,0.537279,1.741327,2.822408,2.416099,0.796204,1.089897,4.710687,0.951135,2.643277,4.840735,3.804053,3.747166,3.646316,4.776272,4.569839,2.198778,0.927971,1.105164,4.639203,4.957149,4.928726,1.483929,0.259599,2.950114,4.403531,3.617829,2.710598,1.320237,0.055025,3.279686,3.556389,1.062315,3.859676,1.998140,4.453286,3.784288,0.485116,2.780055,0.815021,2.829397,2.856589,1.466429,3.006414,0.633410,4.078682,4.012361,3.348919,0.672668,3.301032,1.876299,2.714188,2.092898,3.680182,0.202065,0.821017,2.160229,3.005176,0.107709,3.858799,1.018775,0.374372,3.481313,0.828125,0.340571,0.302742,2.791798,2.585188,2.597201,2.945685,3.532929,2.037872,2.023436,2.230596,4.388498,3.901437,3.780031,1.259365,0.252013,0.108601,3.348190,4.951243,3.729055,1.732338,0.336434,2.380695,3.204419,2.292245,4.053653,0.950707,4.436740,3.415142,4.883718,1.529274,3.915617,1.654396,2.614724,1.435983,0.516383,0.614503,1.830987,0.074981,4.682488,2.623839,1.900335,4.704483,3.668552,1.558455,2.970157,2.776374,2.046441,0.028923,4.306895,2.785126,0.561374,1.152757,1.665560,1.620365,1.243756,0.004865,0.294995,2.848655,2.746570,3.553345,3.016380,0.940520,2.702832,3.806999,0.089604,2.865776,3.415224,0.337061,1.573634,0.891916,2.862052,4.126202,4.191489,0.809998,3.443102,3.157177,1.153802,1.198747,2.978362,0.484835,1.429635,3.330438,0.354457,4.884002,3.674821,2.993718,2.712419,3.174283,3.949195,0.632844,2.561346,0.316795,3.641004,2.932339,3.280219,4.718267,2.245218,1.597585,1.901050,4.531007,2.880982,4.905066,4.775073,2.990775,1.818957,4.513543,2.233176,3.583089,2.361926,0.450220,4.536187,0.373268,2.535582,3.139826,4.781851,0.848771,1.464108,2.327391,4.282035,0.056232,3.855040,2.832783,4.384424,0.736707,4.262945,3.996940,3.900754,4.747861,2.364568,1.908267,3.167333,0.527299,3.384066,1.695114,2.107045,1.088369,4.386594,0.542121,0.051243,4.824074,2.166372,3.038268,4.761537,2.393525,3.144956,4.078144,4.699222,3.765919,0.512281,1.602975,1.249334,0.155364,4.269614,0.371304,0.681491,4.597270,2.308000,4.249426,4.498548,0.453169,1.475009,3.955415,0.976544,2.133152,4.959531,2.059914,2.151230,2.048495,4.377997,2.675146,4.087957,4.599635,1.834619,1.790886,0.466379,2.055323,4.827922,1.659421,1.600273,2.178385,4.431402,2.609629,2.209905,0.135687,1.302434,2.819658,1.305920,0.269087,0.535151,1.776625,3.254386,4.868521,4.382332,3.977588,0.125823,0.536350,3.462509,2.626026,3.759341,1.421077,2.492215,1.357346,1.364651,3.546299,1.014299,0.682778,0.381722,4.417507,4.247989,4.205198,2.645205,0.259026,1.344918,0.714141,0.844975,4.713435,3.970405,1.843008,1.015124,4.635089,3.042701,4.583773,3.561227,0.945548,1.338397,1.548915,2.204474,0.930205,0.877226,0.350580,0.996630,1.871581,3.711296,3.120414,2.017677,3.555992,1.129122,1.694889,2.740109,2.463442,3.915357,1.139341,4.321489,4.078608,2.000048,4.369202,3.177576,2.752606,2.935491,2.572436,3.237256,2.173577,2.268409,1.140347,2.559801,1.519515,1.781807,0.519242,2.867250,4.895406,1.350613,4.429143,0.100325,2.175201,4.304443,1.510673,0.846738,3.294251,4.748234,3.141517,0.451538,3.745454,0.029675,2.709315,4.245618,2.148784,1.098045,4.384715,0.773090,1.990433,2.302528,0.157339,2.625487,3.015462,2.078590,0.175525,0.551528,1.961355,2.120057,4.566978,1.862401,3.622308,3.076822,0.192308,2.300743,3.362728,1.549336,3.680120,4.674364,1.352243,2.938420,0.069980,3.165050,2.556168,1.903877,4.520137,4.704881,1.695058,2.661194,0.447480,2.661164,4.398601,1.002916,0.240733,1.961915,0.998469,1.434215,4.628930,4.374606,1.662541,4.507802,4.201143,4.900933,2.634339,2.609546,4.721356,4.408671,4.782932,1.738530,2.197150,3.972713,3.137482,0.263698,4.433041,2.648089,2.004976,3.789931,0.512722,2.405442,2.827655,1.465439,3.915761,4.689790,3.155412,3.272331,4.623479,2.590938,0.639072,4.213411,4.720198,1.163003,1.031430,2.661603,1.495588,4.248769,2.292231,1.171765,0.003166,0.514679,1.786995,4.410424,1.851857,0.675104,4.718389,3.428864,2.081369,3.522307,4.532186,0.884699,2.777556,3.706792,4.896298,1.045381,2.289899,0.687573,2.857387,2.577060,3.399518,2.587573,1.136250,2.214183,0.857374,1.055751,1.602914,4.257126,2.425508,0.075356,4.772927,0.629560,4.427163,2.784420,3.113326,3.399999,2.011455,1.822709,0.171945,4.802169,4.755352,2.306995,2.535766,1.681117,0.938573,0.417838,4.697045,0.104544,2.561481,3.403367,4.544192,3.536267,1.947541,0.235492,0.273572,3.821744,4.710701,3.974253,2.241948,1.696783,0.937056,2.712735,2.142540,3.422929,4.147272,0.443423,1.241374,0.537287,1.146989,0.990988,0.297844,0.292198,0.656486,2.429573,1.429524,4.369328,0.229274,1.872227,2.529325,3.988554,4.669316,4.649673,4.252534,3.343745,1.742310,1.305660,4.285774,2.847123,1.503836,3.466413,4.356383,2.120549,4.960333,2.777178,4.463122,2.438360,1.705762,0.811586,1.870223,2.706291,4.029137,0.525619,3.161109,3.910803,3.169497,3.488591,3.996762,4.397293,0.365701,3.106768,0.700391,1.083687,0.248548,0.204551,0.241570,1.958602,0.365330,4.102196,4.525545,1.504732,1.623931,1.959245,2.223716,4.807704,1.284104,0.670516,0.111952,0.207528,4.195915,1.561740,2.422808,2.480275,2.055026,0.753769,3.411894,2.536449,0.869340,3.755578,3.971925,1.123734,0.451448,4.084427,2.570423,1.319747,0.983717,0.269071,1.582126,1.277956,0.834428,2.221023,2.864172,0.291979,3.155089,4.484042,1.615084,1.207576,0.529183,1.859377,3.388634,0.577990,3.915073,3.385918,1.938995,0.873849,2.019066,2.455799,0.707652,1.440777,0.033602,0.038239,3.466207,2.883245,3.671698,1.545770,3.004355,3.588537,0.508854,3.619407,2.756604,0.833672,2.019875,0.216047,1.236370,4.573646,4.587738,3.987756,0.113453,3.916157,1.302490,2.170740,3.115953,2.243692,0.203076,4.619941,0.162105,1.161307,1.913349,4.698815,2.401907,1.092888,3.936985,3.044911,4.038020,0.964144,1.683528,2.474575,2.640831,1.267963,3.654362,0.223151,3.789089,2.557301,4.489938,2.150452,0.126572,3.236838,0.377707,0.637862,4.967666,3.396686,3.300379,1.676407,2.709212,1.920460,2.228013,1.142946,2.487727,0.172006,3.614238,3.548366,4.029215,0.312819,2.692038,1.408500,0.839637,1.272816,1.931568,1.587287,1.780408,0.553507,4.797060,2.986690,0.030428,4.370891,1.014962,0.808011,2.500787,0.009044,4.171407,0.433114,1.156473,1.674888,1.698448,3.608688,0.700599,4.480269,0.775156,3.385956,4.908951,3.695676,3.815217,1.630828,2.971416,0.085421,3.309265,2.966349,3.081388,4.134720,2.470876,4.696059,2.671688,1.408302,0.159173,3.878112,0.630510,3.902961,3.083341,2.371591,2.402293,0.463290,1.113904,3.214236,4.365491,1.186013,0.423885,0.745174,1.248793,0.162119,1.270054,1.550790,3.229415,4.017756,2.285464,1.665157,1.963746,3.065748,0.048751,1.522386,2.755564,4.244111,0.375339,4.695750,1.314607,2.396565,0.544693,3.932600,3.919630,4.611882,3.064039,4.635121,4.114930,2.074875,4.567463,1.458326,2.229192,4.114397,3.073784,1.655949,4.473488,0.037001,4.255448,1.247300,4.919149,0.203680,0.734759,1.353694,0.659123,1.507770,2.918737,0.639341,3.521032,2.200686,3.346347,2.001705,2.711226,0.849300,4.097774,3.611560,1.121786,1.162236,1.145212,0.750898,2.764868,0.955310,2.212228,0.776322,2.889503,0.319120,4.105848,1.711984,0.500757,2.493026,4.499449,2.610814,3.091339,3.692764,0.162449,4.093689,0.266187,0.516704,0.492026,4.798885,2.657763,0.006464,4.575771,4.798861,4.854402,1.961371,1.604175,3.330552,1.591523,2.792571,0.502064,1.421181,4.559163,0.102807,2.517714,0.890576,4.250422,2.620917,4.810754,2.593735,1.452136,0.629130,0.061848,2.362897,2.933033,0.799801,1.689047,1.903257,1.759164,2.977851,2.617756,2.505488,1.338424,4.012588,4.889803,3.837833,0.478315,4.887652,3.353698,0.419817,4.845338,3.087130,0.124515,1.122682,2.596412,4.718003,0.252943,2.264145,0.452670,2.068826,0.681826,4.138498,1.545968,3.831614,0.566316,4.804493,2.804117,1.184936,4.010823,2.886761,1.213734,3.305921,3.164700,4.808243,3.592669,3.320128,1.559146,3.881365,0.435296,0.585631,0.903589,3.034645,0.956434,0.000832,2.914290,1.419348,3.194121,2.399804,4.316399,0.117752,2.835070,2.370655,3.375601,2.845924,4.793098,1.257927,3.366228,3.966954,2.623745,1.402847,1.757926,2.273530,0.542605,1.593767,0.348542,2.256252,1.192186,2.837911,4.328526,0.991863,1.903724,0.659277,2.434056,2.341118,2.395420,4.939868,0.116740,1.748398,3.274996,0.972528,3.584536,0.638611,2.250367,3.343061,0.583067,4.591940,1.769524,4.392303,3.644238,0.871033,4.631225,1.576059,2.449884,3.594211,4.643305,1.577487,4.375485,0.730439,4.409117,4.009102,1.639670,1.441834,3.757875,1.617879,3.730195,3.291654,2.989005,1.411431,3.216646,2.592474,0.136755,4.559607,2.442619,4.389332,0.084334,3.917706,4.770037,1.688418,3.022779,0.009520,1.822500,1.849924,4.551399,1.680015,3.845397,4.416877,4.467529,2.173366,4.819684,4.867668,4.124355,4.464465,0.422637,2.154239,1.926185,0.996383,1.628676,1.291254,3.194502,1.560650,1.492210,0.856012,1.234446,2.979944,3.167373,2.115329,3.491334,0.826602,2.766361,3.335660,3.178438,2.627500,0.613503,0.338881,1.644346,2.109619,1.011198,1.229457,0.007691,0.823538,0.230778,2.462535,3.544356,4.008426,3.229595,1.335382,1.951521,2.475545,1.469557,2.934030,2.467841,3.972403,4.509665,1.911333,4.388927,2.688839,1.316633,4.389546,4.637151,4.515435,2.227713,2.693540,0.781402,4.689474,0.178000,4.118781,1.016092,1.567326,3.571467,0.330383,3.870330,0.264475,4.142949,2.509636,4.590174,2.791856,1.092240,1.176653,2.340394,4.960264,1.820802,4.059448,2.876663,4.692332,3.752263,0.090469,0.487090,0.847553,2.442436,4.109590,4.327810,2.623073,3.068920,1.147076,0.399452,0.347010,0.529893,1.556044,1.820274,4.322121,4.659551,0.780639,3.582139,2.832213,2.820614,2.651106,0.442574,0.812678,1.704661,2.053741,0.101911,0.184657,0.468570,0.328284,4.663364,1.095762,4.803038,0.365473,4.148524,2.951648,1.998830,2.555671,4.966958,0.738238,2.252955,4.949604,3.221013,4.952371,0.565006,0.761020,1.423056,3.156506,1.556071,3.146767,0.252885,1.113830,2.211174,2.364015,2.277183,2.664771,2.088777,4.517094,4.031505,2.114712,4.110790,3.922520,2.685950,2.834706,2.396369,2.751693,2.550372,1.380528,1.697322,4.871888,4.863179,0.372452,4.202395,4.223698,3.289382,4.557591,4.690168,1.790203,4.666115,1.935850,2.096938,2.715362,4.508270,1.587786,3.319944,2.009669,3.294275,4.167980,1.643766,1.183671,4.399228,1.985185,3.486682,2.977539,4.061332,0.254886,0.604605,2.260111,0.896893,2.510272,1.614741,3.597723,3.937684,3.464584,1.240242,1.509389,0.223388,4.073882,2.526185,1.495890,3.379029,4.795526,0.412707,3.740195,2.178326,1.596343,2.179988,1.008929,0.964066,1.591731,4.487341,0.272873,1.506320,1.238576,3.006399,1.035373,0.053403,0.769270,1.809668,4.017345,4.234592,3.232994,2.069247,3.257779,0.976284,3.955354,2.216412,4.827373,1.290554,3.197203,4.267695,1.231504,0.110048,2.185130,2.559368,1.080205,4.022759,3.644770,2.826745,4.916018,2.830752,2.069355,0.755858,4.842150,2.255021,1.672757,3.849769,4.010191,0.458241,0.436678,0.442892,0.167087,2.808362,0.919499,3.342230,4.240147,2.633358,4.146056,1.834287,3.956396,4.167909,1.178526,4.951195,3.620832,0.248498,0.822266,4.180902,3.055302,2.203958,2.698042,1.426765,2.877112,0.117772,4.822246,4.999810,1.134952,1.786269,1.642010,1.239204,0.547875,3.444690,1.671411,0.977492,2.662150,1.870584,0.533560,1.930689,3.562383,2.904927,2.315689,4.718230,3.711982,4.722333,4.013030,0.770262,1.034351,0.330396,1.983772,2.469690,4.948803,4.520096,1.062701,1.992701,2.573405,2.863758,1.185166,1.442729,3.078730,1.688396,3.598606,1.491765,1.052105,2.688249,0.530024,4.673576,1.113784,2.308084,3.578301,3.021788,1.456470,4.679412,2.281587,3.406531,0.725286,1.311479,0.816922,3.065566,0.395236,2.111550,2.040772,0.912019,0.907836,1.641349,2.588216,3.065527,3.539093,4.053478,2.008178,2.061269,2.784942,3.995224,2.873013,0.776705,0.710812,0.386079,0.014654,3.754411,0.776060,0.252979,3.515930,2.034132,3.876119,3.283906,2.140892,4.922741,0.479566,0.243763,1.655460,4.816509,0.066547,0.300738,4.505294,4.446759,4.146224,3.433403,4.629085,3.248321,1.651804,4.619588,0.683281,3.929826,0.058869,1.842875,4.892724,0.574653,3.166642,4.478026,1.245243,0.996255,3.919192,0.839811,4.349045,3.217299,4.350959,4.903703,3.342917,4.461976,3.443470,0.255061,0.312316,0.970630,2.937031,2.377213,3.310437,1.544416,0.197697,1.965277,1.221883,1.747217,4.742623,4.691969,1.545292,1.433388,0.911985,4.650756,1.159331,2.099584,3.481668,3.697679,4.963415,0.681263,2.006307,2.829065,4.059997,1.729714,4.518013,4.754177,4.892212,0.653301,0.821554,1.588274,2.098294,4.988014,3.861090,3.240149,3.597343,1.758017,3.209771,0.196338,1.379322,4.918661,2.760540,3.815204,3.102349,3.750972,2.482881,4.991053,4.622851,4.263124,0.361194,0.058055,1.832823,2.739064,1.602222,3.416860,1.024966,2.053507,3.609740,1.839065,4.957027,2.569671,4.005037,2.820471,3.379422,3.214803,0.240544,3.894415,1.164037,1.527561,0.625235,2.416185,2.226472,1.495223,4.962774,4.582009,0.525687,3.695237,1.685101,3.282144,4.374485,3.626923,0.097438,4.435287,2.998101,4.286777,4.735437,3.846845,2.505695,0.747084,3.928279,2.549715,4.590907,4.685213,0.447935,3.418388,3.199824,2.518675,1.187970,1.510547,3.026118,4.661200,4.740342,3.474450,0.010150,0.905700,0.126487,0.552218,1.732833,1.230156,3.570024,0.374860,4.342909,0.738689,2.305000,4.930842,0.157690,4.550087,4.531975,2.981103,4.046937,1.137972,2.338331,4.698308,2.713753,4.947933,2.863459,1.430027,2.648980,1.613520,1.443902,3.208254,4.641027,1.241832,1.873868,0.920300,0.550967,1.933937,4.587173,2.382940,2.254797,4.761635,4.823401,2.579451,3.455616,3.159567,1.843924,4.346443,2.606280,3.275740,2.133611,0.206312,1.682629,1.473764,0.641931,0.701510,4.480436,3.332036,2.190816,4.071175,1.619539,1.491403,4.363836,2.363032,0.532045,0.060349,3.692558,3.314082,3.912583,0.024715,1.420708,3.342360,3.426254,2.461567,0.459233,2.095924,2.811310,4.943523,2.151735,3.280637,4.245230,2.199416,0.774892,3.949992,4.705891,3.408038,3.047580,4.400033,4.622659,1.367860,4.126343,1.075845,1.127244,1.971382,1.182203,3.945822,2.833491,4.841725,1.756734,3.768717,4.408769,3.137014,3.395735,2.065290,2.415413,2.900937,1.078423,0.279602,0.378133,4.716759,2.981817,0.026816,0.595233,3.953615,1.630640,3.594269,3.630536,3.607723,0.114595,1.332122,1.487497,0.542303,2.227474,4.580892,0.464603,0.999954,2.258123,2.029983,3.404676,0.993704,1.989794,4.081056,3.079026,2.343154,2.838621,2.662206,2.810141,0.104361,4.888252,0.312222,1.632353,4.836554,2.778998,2.297945,3.440686,0.405018,4.198325,2.864459,4.663865,4.933275,4.649016,4.987857,1.863405,2.922746,4.656094,1.007646,0.324450,2.248971,4.220114,0.557858,0.554348,1.379471,3.803146,3.908949,1.720155,3.457038,1.166920,0.952691,2.339853,2.425203,2.652524,0.179686,2.074892,3.765629,1.337366,0.379795,1.885841,2.866550,4.267591,2.136306,0.634988,2.565418,1.780541,4.096381,2.558934,0.943316,0.158529,0.764970,3.648631,4.929578,3.621613,3.420511,0.977780,1.453172,0.217556,2.639637,1.437916,2.998469,2.545990,2.127742,1.087333,2.660288,3.768768,3.647080,4.327901,0.447370,1.894875,4.349831,2.344140,0.448889,1.538284,1.541594,2.042790,3.202651,0.600467,2.589068,0.522972,0.940238,1.776007,2.784687,2.516437,2.300285,2.146050,1.714940,0.303807,2.989515,2.496856,2.436032,3.641802,3.268971,2.620362,0.059728,4.764283,3.041399,0.217352,0.911982,2.200772,4.148299,0.424230,2.145129,1.570741,3.251405,4.423514,2.832810,3.285840,2.258152,4.629104,3.136842,0.128525,0.829183,4.128687,0.447109,3.747440,0.400065,2.870041,0.830121,4.984992,3.873496,3.021855,3.990871,1.302502,4.020170,0.658999,3.875889,4.154736,1.093629,4.864679,0.767380,3.506681,3.526377,4.927266,0.688182,3.363090,1.730725,1.266231,4.674367,0.090346,4.467525,1.723707,2.540079,2.048737,4.116577,2.576299,0.517913,0.376578,3.986684,1.710247,1.960722,4.946449,0.888785,0.374157,2.005151,4.293128,0.509130,3.014484,0.489774,2.524886,0.873599,0.432678,2.268917,2.711537,4.114304,2.881918,2.931735,1.588892,1.487340,1.494136,0.235778,1.415060,3.960058,3.965816,3.721764,3.211543,4.390775,4.327293,1.911634,3.326345,4.426679,3.699247,4.625822,4.886574,2.539281,2.982811,2.289904,2.177515,0.449147,1.836695,2.236698,2.982803,0.631071,4.906840,1.807792,1.277279,2.049133,2.398504,1.714533,3.845084,4.765971,1.114562,0.226928,2.830023,3.198839,4.278725,4.523120,0.055832,0.899123,1.630821,1.557272,2.465919,0.700040,4.234391,2.603890,4.909712,3.111329,2.038346,1.657554,4.327038,4.390944,1.217766,2.451761,2.160474,4.330078,1.141225,0.754825,2.245829,2.265629,1.488256,4.059228,4.102725,3.465423,4.763602,0.450669,4.726156,0.764479,3.619693,2.226721,2.628650,1.907725,1.788497,3.011053,2.982594,3.568884,3.583130,0.148667,2.709259,3.329086,3.895854,4.443362,1.630029,1.969026,0.494264,2.222740,4.579109,1.476139,1.190315,0.825725,2.902884,2.617082,2.234381,1.337368,4.887139,0.804320,1.384887,1.570158,2.094039,0.901316,0.768362,1.211425,2.623179,3.823266,1.388113,3.942162,0.336110,1.171136,2.109666,1.717626,1.385350,1.856143,4.125520,0.919432,2.188466,3.230862,2.069973,4.517876,0.497895,2.050061,4.777199,2.330006,4.171850,0.342236,3.661728,1.391468,0.399581,3.161186,4.023588,0.657297,0.329974,4.648795,2.008312,1.047176,4.811653,4.682327,1.353551,0.957914,0.627766,2.045604,3.867428,1.735867,1.245254,3.904448,1.911446,0.313643,2.219264,4.300663,4.940175,2.887746,1.981157,2.803373,1.916845,1.438197,3.676573,1.044267,0.579488,4.105923,0.267141,0.428155,2.184693,4.999007,0.535197,1.897253,0.494453,2.205921,1.706737,3.141052,4.780194,0.985947,3.398924,4.743095,3.991583,4.327708,2.100144,4.864524,1.163004,0.904367,4.690251,1.687868,2.585363,3.627705,4.976130,0.825427,3.886439,1.268485,1.865067,2.748852,0.497649,4.508623,2.363525,2.361414,2.352387,0.431985,0.869783,1.392887,2.938552,4.980558,1.838420,4.241249,0.068993,3.865413,2.307449,3.330814,2.208060,1.826980,4.494268,2.998238,0.535754,0.284108,0.592486,0.942593,1.017061,4.787877,0.651074,3.570823,4.475761,2.163059,3.798454,4.062463,2.263169,3.822160,0.073934,0.804924,3.152393,1.481626,1.433915,1.961925,1.718339,1.415709,2.151072,2.322500,3.213384,2.907104,0.811368,3.928129,4.859432,1.525358,4.411263,3.196038,1.880504,4.295657,4.330825,2.419595,3.924800,2.899307,0.782578,2.863985,1.977686,3.202443,4.188793,3.465476,1.556478,0.218375,1.773379,0.911933,3.727650,0.045356,2.857837,0.337195,1.087361,1.944488,2.355924,0.171471,0.301665,3.683057,1.438031,2.668544,2.467603,2.371164,3.695065,2.801053,2.540281,0.750306,0.934412,4.597385,1.192383,1.043364,0.928846,2.541988,3.989646,3.689086,0.670213,0.588982,3.612075,2.871218,0.226658,3.861132,2.636703,1.566978,0.938461,4.309325,3.923052,2.628336,1.519538,0.764492,0.404698,3.699236,1.209145,1.892391,0.504788,4.643346,3.647877,4.409683,0.208289,0.395631,1.349976,0.040929,0.888161,1.503348,0.992333,3.140872,1.926247,1.150519,2.584047,1.361242,2.946244,2.412043,0.452537,2.013729,0.664212,1.529866,2.748441,3.002656,3.632189,3.279986,2.246520,3.794649,0.141023,4.737116,1.198786,3.472326,1.487312,3.451496,2.340103,1.260615,4.566524,1.168253,0.410757,0.261101,1.581669,0.701339,1.291377,4.959796,2.412948,3.196909,4.632762,0.131718,2.238027,4.047792,4.416337,4.235515,1.842652,1.092972,3.882301,1.308658,0.913925,0.404500,2.532484,4.616557,1.475029,3.831121,0.458317,0.849565,1.542451,1.390346,2.700920,0.326474,4.122860,2.333041,2.902974,1.721006,0.545598,1.104276,1.064049,1.395223,4.661726,1.227324,2.102062,2.731678,0.543503,1.001740,2.640478,0.363970,0.328240,1.974046,2.455429,0.764752,3.997767,3.198978,4.196706,1.926288,4.129632,0.158465,0.130224,0.422538,2.324425,2.762048,4.540454,4.205788,2.248804,2.893100,1.785358,2.661539,0.396423,2.586772,1.459014,1.211479,1.664083,1.833447,3.179721,4.143126,0.926377,1.084907,3.005586,3.622535,2.252617,3.484455,2.253783,4.466743,3.660982,2.375429,1.849310,2.003155,3.995102,1.526378,0.718470,0.186791,1.112429,4.281878,4.936930,0.868046,3.385511,0.851935,1.604709,3.284688,1.955530,3.212995,1.214800,4.230788,2.675962,2.243493,4.741678,1.758131,4.234474,0.337819,2.495620,4.416853,4.925291,3.910537,0.788924,3.206240,1.851819,1.325536,0.082318,3.760254,2.827709,0.126297,2.581930,3.472081,3.368457,2.966888,0.507397,1.074115,4.483555,0.189627,4.048447,1.603222,1.666853,2.680578,2.870919,2.020879,2.961791,4.965526,1.780422,2.704325,2.144338,3.546974,1.409992,3.958861,3.897856,4.403143,2.308818,0.456313,3.523998,4.984761,4.275264,0.938572,1.946945,4.663600,1.663832,1.977687,4.220087,0.752209,1.531547,0.472851,1.757388,0.048996,2.459668,4.887677,4.758366,2.345300,3.550115,2.071398,3.631079,0.546691,1.037065,0.799877,2.264339,4.197759,0.118821,3.986806,0.754646,4.303683,4.021608,4.988890,3.279701,0.946558,1.795305,1.892905,2.618347,2.509263,4.163552,2.114092,4.493707,3.703286,1.663419,2.524836,4.782749,3.833535,2.003918,2.046815,3.665994,1.369024,0.695806,2.234974,0.899882,1.418266,2.618295,3.904429,1.429329,1.771691,2.530669,4.449134,2.952929,3.517531,3.663743,0.991537,1.009250,0.305442,3.838270,4.313124,1.700874,1.566708,1.062636,1.007096,4.241573,2.786455,1.180413,3.985664,4.537077,1.562442,3.846706,4.560405,4.105889,0.401407,1.295453,4.571425,0.602383,4.565315,2.578370,4.457293,0.933269,4.479794,0.048302,0.569726,3.666035,4.726190,1.084827,3.793526,0.806646,1.793278,1.536835,4.364644,3.891786,1.999382,0.436832,4.918413,4.588396,1.850256,3.162212,0.628396,2.513568,1.652457,3.375886,1.738605,0.215395,1.545466,0.548171,4.883912,3.987589,4.784372,2.349910,2.326155,1.315228,0.876331,0.857896,2.079552,3.643687,3.382090,4.165692,4.107504,0.958452,4.848494,3.000823,4.014114,1.668957,1.511803,0.391360,2.275879,4.201819,3.407012,4.894112,4.783375,2.080670,2.137592,3.596461,0.776614,4.346489,4.749583,3.324066,0.556224,1.350189,1.858621,4.227843,1.832638,3.221822,4.508854,3.461924,0.760665,3.404139,1.791954,1.341360,4.423623,0.023612,3.472836,3.302999,3.296587,2.268271,4.534150,1.979620,0.030390,2.430285,3.567333,3.293997,2.516963,4.303560,4.256087,4.071517,2.236739,3.170664,4.039928,0.350271,0.469813,2.332668,0.142939,2.213234,1.104196,3.476345,2.805835,3.386952,1.921672,1.382290,1.358916,2.063581,1.864968,3.725987,0.962505,1.759997,0.106539,3.107211,4.751753,3.891139,4.770599,2.862781,0.011414,0.567560,1.412180,0.489633,2.073645,2.334643,1.049759,2.383170,1.659083,4.896779,4.917199,4.072814,2.875612,4.397956,4.183957,4.535027,0.215540,3.606656,0.958480,4.281463,3.222819,1.534206,0.786808,2.996998,0.139425,3.957736,1.607971,3.864034,0.421420,4.982035,3.566548,3.997050,4.374476,2.294761,1.570005,2.818233,0.642940,4.321883,0.254739,0.104594,3.037339,2.711399,4.962502,4.173317,2.685092,4.444087,0.256272,2.695045,2.011662,0.222055,0.706270,0.082716,2.617217,0.215572,2.204413,3.146655,4.775282,0.265671,2.284081,4.220863,4.948930,0.396272,0.434493,4.711071,4.921573,0.958697,0.362733,1.226737,2.237494,3.657283,3.493283,3.335137,4.712000,0.181944,3.023982,0.783014,4.043226,4.290752,3.140165,0.482687,0.744158,2.418939,4.615635,0.953178,4.483063,4.931357,0.090999,0.687505,1.259730,1.001384,3.513168,2.822050,0.874667,2.417551,2.363376,0.241866,3.646986,0.631303,0.774100,2.184586,3.190567,3.767057,4.985987,2.438979,4.927226,2.948185,3.375329,1.775476,1.629513,3.092269,4.237147,4.458636,2.988768,1.778620,1.501273,0.273060,4.773152,2.564822,2.505540,2.794332,0.874087,0.873176,0.298202,2.215482,1.389097,4.722492,0.526787,0.449683,0.277282,4.553463,0.875314,1.301592,1.368734,4.969548,0.229506,2.802059,0.107740,3.667484,2.272178,1.659416,0.796068,2.355436,0.214461,4.447539,3.667741,3.793579,2.943878,4.576509,4.851782,3.473933,3.910272,4.958101,0.252057,4.215193,1.752356,4.430109,3.475966,1.295495,1.530225,3.275574,3.184644,0.171008,3.028397,3.351315,0.747898,4.508415,1.213454,3.925748,0.072008,2.004087,0.989341,1.105089,1.915932,0.068854,2.335608,3.515521,3.310615,4.417912,0.497375,2.587293,2.271643,4.212617,3.890724,3.300086,4.051292,4.649272,1.921504,0.058484,4.192587,1.665180,4.427098,3.551982,2.616955,2.529109,4.948526,1.023750,1.886421,2.349747,2.282036,4.145875,4.000496,4.594720,1.069155,3.170341,2.614920,2.749241,2.180572,3.021732,3.145437,2.032385,2.641318,1.735346,1.086705,3.687550,3.783179,2.432873,4.028116,1.480930,2.773976,3.183438,0.067408,0.896135,4.193392,3.469889,4.471437,1.838321,4.305265,1.116215,2.772333,3.682525,4.692620,4.415291,4.945252,4.522631,3.025476,2.154873,0.173364,1.633407,1.282568,1.899554,1.627751,4.860307,0.616911,3.601868,2.107392,2.405751,0.540468,2.401616,1.840446,4.257308,0.323641,0.665408,1.733747,3.316326,2.260691,0.372306,1.647964,2.443508,1.924487,3.894821,0.913326,4.692917,2.279681,1.526392,1.978170,2.821068,0.176561,4.550272,0.136631,4.391481,1.355415,0.225658,2.981665,4.170409,4.673824,4.178086,0.309333,1.474589,4.036639,4.004061,1.208977,3.548110,4.554952,1.365668,0.671205,0.438452,3.303999,3.084204,2.722951,2.501481,3.987253,1.083624,0.608700,3.701438,3.198453,3.608044,2.323851,2.684857,0.429287,1.176650,3.410618,0.055013,4.554768,4.186707,3.586082,2.711839,1.496044,4.753521,1.313756,1.929825,3.151923,1.807246,2.650430,4.262583,2.605435,2.028841,2.878353,1.525922,4.930078,0.464951,2.668795,4.267858,1.458447,3.590412,4.950964,0.581185,1.954001,1.474278,2.252879,0.262753,2.356977,3.428819,2.363318,1.783533,2.878598,0.056869,1.949844,4.591178,0.230670,2.579968,2.544870,0.794693,0.489652,2.079515,2.744872,2.388221,0.301624,4.023834,4.676037,4.366247,2.572836,4.580029,3.629902,2.226000,4.997923,0.385320,2.649099,0.675078,0.535138,1.018762,2.842488,0.478423,0.546493,4.252774,2.096714,2.483836,1.237481,1.905994,4.843124,4.493671,3.834182,0.075942,2.737420,4.044688,4.942139,3.799461,3.765636,0.221631,4.686836,0.987200,1.875003,4.262240,3.488617,3.823209,2.937930,1.199136,4.697719,1.050390,0.224463,0.064570,0.793372,3.642476,0.269160,0.302942,0.948117,3.481652,4.454853,4.831397,3.628164,4.609775,2.750372,2.782386,3.959340,1.517030,2.146011,2.881977,0.310108,2.418424,1.530061,0.423492,1.247094,4.952472,3.645697,3.457332,2.037992,3.871855,4.187483,0.434881,1.760674,4.470946,2.118105,2.549244,0.840172,0.445042,4.757699,1.050590,0.675822,3.945975,0.437038,0.764551,4.280139,4.439756,3.268880,3.348384,0.807102,0.066581,3.223872,4.364444,0.513888,0.537567,0.706415,3.841438,4.029318,4.973067,3.291930,3.302449,4.558086,1.812546,3.893561,1.596303,2.005721,4.335958,0.814740,4.967663,2.457819,3.061998,3.280300,1.898790,4.251672,2.957437,4.625924,4.727662,3.504758,3.600529,2.186968,1.205765,3.372456,1.997069,3.367516,2.201969,1.392765,3.064975,0.457665,3.696188,4.314704,1.036187,1.244308,2.116854,1.821347,4.568623,1.755598,4.921803,3.315236,1.903726,0.314416,1.654601,0.385304,0.961621,0.566229,3.482756,1.780289,4.545250,1.563544,1.779555,1.297072,4.794887,0.728112,1.015861,2.945061,4.568961,1.804083,4.483599,4.695713,3.875606,2.696740,4.063351,4.573667,4.829570,0.736077,3.433383,1.256731,2.860015,0.448395,0.636233,0.627765,1.734752,2.253914,3.773373,4.526601,3.163134,1.576894,2.214584,1.733088,2.959389,3.140660,3.969291,1.031689,0.883209,2.606126,0.421373,1.453292,4.900167,4.031336,1.065246,0.575158,3.282602,1.033718,1.450868,2.870814,2.571050,0.112252,3.338194,4.793219,2.917709,1.281849,2.246320,1.610776,1.459883,3.689273,3.748221,0.866661,3.490698,3.931085,1.389756,4.923294,3.485849,2.925338,4.214565,3.633477,2.975681,3.352093,2.972065,4.314453,0.449511,0.432033,1.456772,2.429685,4.334678,3.127086,2.429072,0.674715,2.722749,0.717008,1.867148,2.081338,0.900092,4.631128,1.781484,2.004343,3.717312,2.796465,1.328675,2.335986,1.310174,2.021859,0.373647,4.592882,4.644246,1.032620,4.705171,2.554946,0.114051,0.984664,3.079912,2.542796,2.124289,1.417027,4.550835,1.620089,0.599292,3.145104,2.817262,4.098889,4.683865,4.731317,3.421189,0.510572,0.189532,1.848462,4.104781,3.686801,1.813782,4.477776,0.306674,1.090292,2.570210,0.846745,2.381602,4.173058,0.718554,4.154673,4.290201,3.349318,0.343430,0.421253,1.817195,2.100028,0.808344,3.050381,1.691718,3.405670,1.566948,2.552542,0.556572,4.535058,1.362710,4.024182,0.284851,4.251436,0.196290,4.363969,0.889560,2.540345,0.280878,0.752336,1.493927,0.969992,2.258911,4.039637,0.690183,3.099665,2.151897,0.305530,4.197110,3.620715,3.220857,0.896933,0.613964,4.531617,4.517259,1.073677,1.704364,1.289752,3.283152,1.380346,1.684789,2.323346,1.749556,3.679681,1.610179,3.307146,4.135755,4.394948,3.559566,0.675653,1.212008,3.394585,2.463045,3.085342,0.777590,0.849065,2.951317,0.724618,2.939693,1.513710,4.331433,2.255378,4.203739,4.912973,0.483753,0.594156,1.453655,0.210667,1.257580,4.305674,3.998177,0.971612,0.957261,1.667794,3.271656,3.504015,4.933396,2.198095,4.634010,0.546814,0.093831,4.104662,3.129981,0.324355,1.961056,4.030323,1.546341,4.826896,3.420208,3.620763,4.937237,3.818662,3.404857,3.208556,4.278353,3.286772,0.028893,3.414611,2.384016,3.000301,2.466180,0.112893,4.420934,4.574061,2.323312,4.412169,4.502900,4.037209,4.925341,0.796192,2.190226,2.034437,4.573850,0.885158,3.853582,0.828171,3.744868,3.636488,2.909591,1.267384,3.897240,4.354376,0.148579,3.996634,2.072552,2.546410,0.158669,0.467601,1.503521,2.812908,4.337891,4.325988,4.789956,0.035806,2.063611,4.946309,2.688590,1.542536,4.086026,2.443588,2.269976,3.468624,0.521845,1.925738,2.961825,3.480356,0.173431,0.426828,1.236086,2.401091,2.623937,1.967132,0.265467,2.610574,0.290391,1.660424,3.139815,1.562266,0.407345,2.678140,0.746890,4.583367,1.527774,2.097067,3.033469,2.944565,4.983381,0.053011,1.997132,0.701420,4.684870,4.832248,1.664588,3.089787,0.677210,4.413602,2.149970,2.601061,0.722411,4.286582,2.720027,3.686860,2.163426,2.678825,0.434616,2.784211,1.890555,4.511939,3.102528,1.370321,0.743938,3.438144,3.813761,1.489216,3.403394,4.942010,2.340002,1.148055,1.517203,0.270224,4.427093,1.692700,3.924778,4.018886,4.153532,1.264852,0.163468,4.542240,1.792809,4.022727,4.977432,0.438252,4.001601,2.208636,0.565223,3.720007,4.343517,0.177028,4.429354,2.030471,1.641454,0.108967,1.192692,2.732945,0.112549,2.704473,1.961977,0.866046,1.563334,3.395673,0.652203,0.216995,2.452491,2.052940,1.388959,3.272239,0.628216,0.281935,4.420724,0.545202,0.604243,0.231232,4.785626,2.707167,1.618285,1.294311,3.259639,2.682328,1.714888,0.573906,0.822449,2.455859,3.233963,4.643924,2.146197,0.256768,0.905584,1.825321,1.186372,1.479484,2.537217,4.018413,0.005563,3.216063,2.496939,0.566540,1.188167,3.510334,4.472319,4.509471,1.782392,2.991113,2.013950,2.157252,0.880344,2.737187,1.293595,3.601716,4.853042,1.405537,2.639074,3.586207,3.609609,3.266154,1.324056,2.779766,3.573295,2.497849,4.538857,3.748827,4.654452,2.829942,0.372280,4.431188,4.323530,1.035626,1.139973,2.766478,0.260158,0.592867,1.719686,2.637602,4.737787,2.994761,0.444703,2.979792,3.005176,4.493603,1.286021,2.647621,1.477572,0.890662,3.607548,3.678093,4.139311,1.161429,2.601127,2.252844,4.271349,3.058913,1.720223,4.724995,2.677324,4.164924,0.714686,1.717673,3.670244,2.818984,4.863571,0.356616,0.051121,4.777824,1.611906,0.442608,0.593517,4.281786,2.208261,1.490858,1.753008,4.265107,2.177394,2.271956,0.166683,1.418601,1.445198,3.249176,4.619541,3.661529,3.816874,2.105995,1.213351,1.340007,1.484611,3.811343,2.065861,2.800873,4.461556,1.429075,4.796129,4.820830,2.159414,0.477164,2.523117,2.166962,2.181026,0.475304,3.903029,3.765275,1.893335,0.228764,2.353700,0.044191,1.084346,3.643118,2.572774,4.598098,0.924558,2.522841,4.301070,4.690467,0.339313,4.161161,3.127667,1.561090,0.168973,2.920546,0.388890,3.284425,4.412628,4.979026,0.529660,1.550149,4.285438,4.345312,1.464761,3.934112,3.146804,1.948143,1.411011,1.099078,2.944683,1.159421,2.719726,0.180064,4.845885,0.010885,0.456778,4.737893,4.268916,2.687268,3.153043,4.594806,4.145545,3.065649,0.536595,4.635828,0.596997,0.814216,1.715775,0.042066,3.256731,0.781464,3.080899,2.723042,1.265701,0.639111,4.063195,1.908089,1.188576,3.280506,2.804582,1.989670,4.351174,3.577733,1.485276,0.830749,2.903660,2.123674,4.576598,3.780925,4.954737,2.870531,0.741399,3.361129,1.918899,2.895848,2.899272,0.748184,3.869740,4.262676,4.829481,1.395640,3.066986,2.131524,4.598155,4.127551,2.765690,3.014644,1.032342,2.175602,2.351983,0.822077,0.668362,2.346547,4.815454,1.762319,4.931036,3.114640,2.702057,4.216588,2.795321,0.132206,3.004444,0.731789,0.656254,3.233861,0.803900,0.813730,2.817819,1.188661,0.312633,4.548165,2.742229,1.525647,0.119746,4.152250,4.395614,3.138795,1.840570,2.710597,0.689303,2.613435,0.571841,0.016835,2.867324,2.297626,1.100338,4.512144,2.388702,3.420170,0.152871,1.495877,0.401822,1.497088,2.885900,2.533403,4.654704,4.555461,0.942004,2.091055,4.478988,4.583170,2.664122,4.796949,2.303230,4.796238,4.442551,1.401582,0.330057,0.944782,1.994987,1.929405,3.367352,2.006860,1.578275,0.731218,4.522297,1.824098,0.890320,2.709570,1.134067,4.790018,0.523997,2.507022,2.861603,1.332474,3.600725,4.654438,1.294634,2.919736,2.971930,3.056409,3.484186,0.041004,0.889035,2.391796,1.385514,3.657555,0.656426,2.493232,3.100910,0.988518,4.039454,4.693131,3.810297,2.331268,3.184984,4.091135,1.063061,3.746770,1.839870,1.544054,2.962556,4.171249,1.285743,1.601048,4.305326,0.353631,1.762047,4.898660,1.608964,1.217237,4.766235,1.214796,1.529527,3.334795,0.638459,2.412232,0.711827,3.077029,3.775886,2.480970,4.264236,1.597455,2.901246,2.243576,1.527300,1.691961,1.448808,0.934529,4.757471,1.705664,4.857554,3.083009,1.043286,0.350131,3.502055,3.623795,1.979450,2.990686,4.297179,4.438600,1.124308,1.182653,2.990485,3.589744,0.982465,0.004782,1.098823,4.748540,2.209479,4.651097,4.766868,3.161673,0.309010,0.680715,1.848313,3.819827,2.266605,0.237816,2.625909,0.063777,4.573935,3.374199,4.690329,2.783421,1.922834,3.981056,2.151981,4.674759,3.709803,0.445449,3.870937,4.020575,0.167066,0.213782,0.635597,3.809443,4.920451,4.103171,3.629830,2.187873,3.306270,1.462360,2.519304,1.856852,1.832888,0.509770,2.475719,1.047142,2.803541,1.554015,0.907592,4.012436,3.395940,4.421850,3.046770,0.860459,2.197308,4.108843,4.886654,3.562587,0.717724,3.486496,4.936992,3.398154,3.264259,4.605408,3.986622,3.871002,4.089254,0.445501,3.464111,4.269075,4.089057,0.726679,1.592317,2.550464,1.370374,1.199669,4.017661,3.967544,4.508350,2.806520,2.473170,4.297098,4.257479,1.755628,2.822988,4.680554,0.303878,0.144631,0.318378,1.404694,4.213177,2.284417,1.407803,3.713551,3.369237,0.092255,0.492733,1.384493,4.164530,4.752707,2.577131,0.971244,2.813350,0.161363,2.917993,1.736279,2.648015,3.703687,0.982063,4.653676,1.392982,3.030208,2.867305,1.420180,0.353099,3.229939,4.571583,1.782992,2.893573,1.121799,2.825751,1.311903,4.811101,0.475993,1.728600,1.291987,1.937354,2.635922,2.106249,3.276337,3.945497,0.881005,0.090480,4.694395,1.813923,2.961465,0.790264,3.855832,2.151316,3.347748,2.898944,3.978993,0.653905,3.064845,4.618889,0.818520,2.884274,4.800002,0.537357,0.216517,0.951129,0.109303,2.850022,3.413360,0.027625,2.243738,1.860781,3.845657,3.915424,3.679866,0.008426,0.940718,0.049167,4.951263,4.676044,2.595877,1.123399,2.979799,1.194942,2.127030,4.250312,2.536597,4.273642,4.341669,2.751782,4.219112,2.203090,4.398657,0.751712,1.961668,4.615849,0.969277,3.776592,1.988397,3.941195,1.550383,2.441611,0.472687,2.677774,1.158588,0.947674,1.168829,3.773795,2.454457,0.670922,2.397883,4.674115,4.520113,0.698443,2.458695,2.482549,3.760711,2.685708,0.515425,4.849429,4.573506,2.766583,1.570573,1.746378,3.472922,0.321700,0.429093,4.365193,2.281165,1.195914,2.729516,0.213054,3.017080,3.109259,4.713726,1.841631,3.590379,0.049094,0.670381,3.792296,4.129169,4.160341,3.957388,3.843715,0.186185,0.724898,2.013614,3.463917,4.230822,3.564808,0.665378,4.953359,1.000594,3.344393,0.286792,2.160803,3.652536,0.451632,4.659216,1.544814,1.086769,0.459171,3.046817,0.590687,4.272230,3.607550,0.408930,4.984109,4.648013,4.976358,0.570949,1.089487,2.499544,2.893996,0.927603,4.754201,4.870157,0.954373,2.406850,1.384322,2.649732,2.305479,2.381114,4.359991,4.905889,0.379996,0.142284,3.299983,0.856885,0.007547,3.588574,4.021854,2.950468,2.452974,0.221634,2.511635,3.128117,4.481088,2.189180,1.154274,0.135383,3.413286,4.163518,1.530976,3.085045,3.298406,0.116624,1.249588,3.491332,4.999070,1.497471,4.622785,2.409121,0.567290,2.457975,1.570539,3.386995,0.098633,3.624493,3.967289,2.040754,3.721519,4.211715,2.096417,3.309274,2.918709,3.889389,0.158315,3.446372,1.323235,2.978581,4.122263,2.676988,3.310686,4.053971,0.184008,2.665354,2.136402,3.853265,4.852931,2.122015,1.333158,3.141498,2.651241,2.290183,0.309222,1.977174,2.874571,1.034455,3.360914,2.495066,1.505414,4.880954,2.107093,2.980427,4.426268,3.047431,3.175392,2.231383,0.380489,1.490203,2.369332,2.165827,3.686258,1.879861,4.184453,1.694333,4.160362,2.990809,4.210625,4.546794,4.762971,3.903647,3.874864,0.511151,3.562178,3.124270,2.260784,2.783005,3.840261,1.815812,3.895040,0.601984,4.499366,1.204866,2.661396,2.081627,0.389905,4.142723,0.649459,2.553858,0.936393,4.847810,3.225490,1.286188,4.096230,0.165674,1.507354,2.893641,1.195399,3.981094,4.348293,2.712581,3.961316,4.421320,0.255070,2.658496,4.641566,0.239371,4.040975,0.261101,2.967913,4.942672,2.110777,4.018757,2.880521,3.085582,3.018441,3.305532,0.181670,2.606351,4.368296,0.980998,0.435799,2.151138,2.709495,2.032314,3.578945,0.121689,1.944067,0.778507,0.350905,0.182479,1.116179,2.063578,4.540808,0.583792,4.336598,2.724867,3.302475,4.443649,2.072616,1.900512,4.666790,3.292828,3.673608,1.635598,3.517174,0.609002,1.109195,3.738838,3.540249,1.899345,4.275496,1.359474,4.927075,0.485035,4.452289,1.650020,0.517818,4.847427,1.360250,4.700452,4.039907,3.005051,2.910585,1.071888,4.287607,4.321029,0.985269,2.554316,2.101351,0.630030,1.569336,0.442377,2.464615,2.176091,4.760875,1.863729,2.806138,4.389806,4.312996,1.189499,2.774499,3.875092,1.848152,3.853168,1.996121,2.759895,3.264675,1.442703,2.849335,0.254907,1.211005,4.596394,2.181019,4.773412,0.796500,2.451347,2.762961,1.396417,4.482624,4.357131,2.285615,0.753774,2.755953,3.056224,1.728519,2.109655,2.871149,3.580374,0.330290,0.123353,1.448401,2.665400,0.065798,4.434614,2.882692,4.988462,4.455135,2.860425,2.464234,0.896709,4.148087,0.313765,3.906080,4.145746,4.155539,2.391328,0.387474,0.302398,4.891237,3.380623,4.293251,4.245020,1.355233,4.768840,1.676370,0.798549,2.205673,4.928700,1.989434,2.640507,2.628116,1.106871,3.118346,2.240291,2.292000,4.714893,4.226592,4.406594,4.244211,2.516716,3.111219,0.129373,0.551596,4.138463,0.032251,0.323303,0.270420,0.883658,4.118846,3.368232,1.708987,2.757770,4.986146,0.657631,0.141199,4.291301,2.083040,0.167286,3.372630,3.249931,3.296278,3.373233,0.606604,3.219366,2.246513,1.778352,2.696896,4.258740,1.211013,0.214419,1.612467,3.766250,1.980345,3.160604,2.007256,4.368763,2.678054,1.772910,4.678905,4.070136,4.256686,2.155683,1.517282,2.383294,4.556323,0.300314,2.983969,1.687551,1.409135,3.087350,2.020626,1.540364,4.627270,3.610286,2.213695,0.233957,2.475831,4.411875,3.180501,3.501674,0.130262,0.888948,4.694882,4.357351,3.595992,1.624062,0.246804,3.734557,0.296413,4.771741,2.958978,2.926010,3.971926,1.974445,2.029677,0.115522,4.951829,1.865616,4.155632,1.082709,4.896495,2.734606,2.862070,1.175789,1.667063,0.094322,0.537790,0.038122,0.620325,4.894162,3.154286,4.298942,0.140616,0.827578,1.862008,0.053311,2.873752,0.455610,3.672147,2.469039,2.805828,3.970718,2.386321,3.793404,0.221372,3.702667,0.029364,2.627634,2.553141,0.128300,0.829160,2.825696,2.976405,1.587018,2.307826,0.318128,3.595088,4.265669,0.952341,1.378939,0.284027,0.669601,2.029698,4.008309,2.393647,0.921895,4.265363,3.020900,0.365626,3.528909,4.489462,1.327371,1.516823,1.430092,3.773045,4.588449,0.198019,0.541296,0.768792,1.838942,1.417292,2.682249,0.510426,4.205016,3.229842,4.887846,4.076198,0.529024,2.073540,1.747067,1.340099,0.292791,0.097621,1.985877,1.009071,3.351906,2.928339,3.265481,0.743102,2.781590,0.706903,1.655107,0.414868,3.010977,3.737528,4.974222,0.471564,3.938422,2.925973,0.244965,1.135660,1.962548,0.537143,4.114663,3.028512,3.208716,4.186613,1.796062,0.015034,3.093668,4.625802,3.885647,3.030866,1.410854,1.424824,3.815970,2.880949,0.552252,3.107410,2.292107,3.847810,1.552842,2.556983,4.655638,2.886932,4.489692,2.575569,3.610750,4.973763,1.366858,1.371405,3.741229,2.823936,2.801280,0.256805,3.237250,1.355590,2.998124,0.593076,0.511522,2.825715,1.640652,2.916753,1.509322,3.456734,2.712519,2.989998,1.230233,3.839040,0.899429,3.921242,3.637513,0.255447,4.155535,1.129652,3.406313,0.935533,2.505945,0.699985,0.862414,4.876603,4.345662,3.667170,3.978276,3.661462,0.317252,3.438407,4.000511,2.379149,4.154811,3.216596,3.709715,2.612500,4.629145,3.244453,3.735783,1.236349,3.573850,3.548637,0.861384,0.518312,1.049000,3.444168,1.063707,1.557222,3.762047,4.037834,4.173566,4.006491,0.650045,4.130522,0.721821,1.181285,3.962416,1.648509,3.991331,3.148740,2.596366,2.781553,3.448884,4.912809,4.821858,0.786266,3.703949,4.461984,4.682253,4.844556,3.852366,2.175867,3.487025,3.624005,1.795973,3.286356,3.557753,1.024634,2.721628,4.239845,3.326544,3.852387,4.581225,0.046209,1.148854,1.136844,3.804996,4.099088,2.769232,0.780931,1.506584,2.078727,4.400905,3.017792,3.051071,0.829975,4.880878,1.540092,3.945187,1.335119,3.944496,3.142126,1.278062,4.409721,2.857796,3.502938,2.259802,4.974279,3.467012,1.526304,0.868601,0.063719,0.417518,0.427054,1.068998,4.434264,3.020342,0.655922,1.832351,0.594642,2.555026,0.982288,4.882838,2.505137,1.480799,3.693011,0.580517,4.027926,1.214894,0.707265,0.901185,2.914466,4.397817,2.288241,2.358680,1.394032,1.549197,4.967611,1.389106,4.687054,1.612175,3.621062,1.289756,1.387231,4.632940,3.988036,4.378906,3.125615,2.063284,4.155386,0.312560,0.163352,3.463560,0.453190,0.158475,4.178886,1.277207,3.077522,4.985974,1.312038,4.491799,2.095709,3.806793,4.522492,0.744773,4.527775,2.093186,4.214281,1.793607,4.333300,3.467057,4.384189,0.829289,4.840056,1.056798,1.142642,1.126905,2.261388,4.463298,1.744949,0.886358,0.216666,4.447513,4.180838,0.871988,3.483844,0.937151,0.698379,4.434607,3.288627,4.704469,0.689283,4.610496,4.378474,1.531314,3.386114,3.612707,3.894954,4.768890,1.778181,4.036432,2.904282,4.235263,2.338120,1.500495,4.818416,0.804872,0.192452,4.421555,0.504991,3.891975,0.932124,2.683576,1.718493,0.454261,4.324986,1.498791,2.505862,1.992464,1.649360,1.146457,0.590570,0.453284,4.590274,1.282937,0.531395,0.055716,1.100642,3.712282,1.972876,4.734841,2.500334,3.909214,4.458649,0.073697,1.007941,3.586594,4.490945,0.213045,1.344011,3.777963,2.253506,0.417590,1.968464,2.665193,2.786533,1.875224,2.003347,3.791495,0.403180,4.794802,4.743929,0.853580,2.785050,2.519502,0.810441,1.240279,2.057395,2.889713,3.374123,3.527666,0.271217,1.259704,1.538979,3.028413,1.281591,0.203570,4.052480,4.297844,0.837179,0.962504,0.207988,3.766751,1.908256,3.036204,2.586024,3.475799,4.188128,4.481510,0.454664,4.224455,3.813952,4.379919,4.614833,4.896956,0.433643,1.822290,3.538976,1.342321,4.574891,1.430508,1.212574,4.672036,1.434597,1.431380,1.695034,4.862993,0.676379,2.426570,1.580388,0.682835,2.028903,3.211075,2.301841,1.523305,4.435327,1.545713,0.091683,2.807150,0.451315,4.094927,2.259413,0.375465,2.369540,2.164962,2.101886,3.332966,4.525970,3.391037,1.133951,0.854254,1.001454,2.573569,2.104173,0.708933,2.325468,0.014134,3.119407,2.222186,4.925327,0.800577,2.205940,0.093195,0.857110,4.830223,4.914869,0.082777,4.039562,2.173264,4.023917,2.401603,4.644768,0.810515,1.224595,1.380661,4.558203,1.643673,4.766924,3.155111,4.328790,4.238599,0.716041,1.191923,4.742162,0.558534,3.688125,4.478628,2.637678,1.830446,1.962413,1.242773,4.817335,2.151161,0.158001,0.685916,0.682844,1.150578,0.855057,1.863835,1.202669,3.802060,4.479256,1.031551,3.297257,2.944337,3.066595,0.177467,1.092063,1.466245,0.437544,4.798793,3.783737,0.777436,0.577451,4.011432,2.625444,0.400684,1.368821,0.629487,2.630058,2.646808,4.951395,0.362925,4.752411,2.991555,0.741961,2.402057,0.679444,4.290751,3.459386,4.574545,4.714600,0.684784,3.837006,1.388381,4.947883,1.060099,1.818201,1.469079,3.491291,1.566533,1.127053,0.700130,0.658912,4.810377,4.524042,3.352639,4.386908,4.930654,1.800109,3.892683,2.979288,0.572878,1.588501,0.110998,4.843047,1.814514,3.410850,4.813181,4.922336,2.279569,0.211269,4.807362,0.223687,3.938733,0.053388,4.040556,1.666448,2.500160,0.179551,0.379204,1.234779,2.559666,4.333402,0.190916,4.488271,0.856994,1.579609,3.451055,4.639954,1.175700,2.007216,1.396538,3.316213,3.991946,2.847725,1.209771,0.862263,0.587601,4.077425,0.346428,4.579451,1.667089,3.085666,3.662077,3.273003,1.353692,3.951683,1.395860,1.204416,1.758522,3.157599,3.087493,4.656297,1.006131,3.930506,0.534484,2.945541,4.808435,4.991826,0.657998,0.249718,2.362479,1.880969,2.945049,4.985143,0.877403,0.813527,2.988890,3.305635,1.769253,3.148577,4.301382,3.500060,0.051897,1.882844,0.019366,0.667452,2.931320,2.731254,0.441064,0.182216,2.451135,0.954199,4.451890,0.590753,0.685042,0.362681,1.878440,4.747658,2.464243,1.511051,1.553757,3.918745,0.007726,1.737543,2.117925,3.681196,4.040709,3.039163,2.649238,4.675096,2.091680,4.918711,3.629352,0.339582,1.831518,4.088788,2.197315,4.923493,1.151459,4.760938,3.222676,4.501395,1.210488,3.548559,3.202987,1.821786,1.728971,0.234794,1.099227,4.532279,1.776651,3.185150,2.008643,3.057243,4.556925,3.014839,3.986164,0.282561,1.542020,4.918082,3.004142,1.472774,3.893003,3.610310,4.709343,4.781248,3.781166,0.177226,0.115478,4.226975,4.041539,4.988562,2.735580,0.620951,0.201191,2.714025,0.450778,4.632545,0.985968,3.688061,3.714188,0.875026,3.383212,1.193808,2.160292,3.228859,4.291295,0.335853,0.092541,1.707865,3.627894,1.166786,2.475390,0.332712,3.985962,3.347117,4.487657,4.508167,3.670795,2.508263,4.985727,4.760493,2.146299,0.460885,2.540991,2.961556,4.985913,4.045603,0.802475,4.717919,1.566223,4.630199,2.928376,3.025486,4.330392,3.979544,3.813235,3.740291,2.782612,0.008202,3.104943,3.938716,0.553814,4.307292,0.025186,1.629912,2.545498,3.812637,1.442956,0.769338,0.155443,2.804785,0.371508,2.607176,4.602078,1.350753,2.882033,0.029462,4.111400,4.469398,3.945015,4.585543,2.186321,1.619947,0.088649,0.912570,2.980918,4.043909,3.627090,1.347037,1.186599,0.959048,2.446084,4.624399,1.151892,1.323480,0.088810,1.638471,4.820292,1.662689,0.262781,2.158301,4.266670,0.322485,2.547580,4.547510,1.252562,1.634764,2.673773,1.834798,0.730864,1.827975,1.394619,2.909607,1.259805,2.833724,0.084555,3.374846,1.033103,1.879538,2.191100,4.055296,4.444007,4.216647,1.476238,4.067215,3.248329,4.286919,0.876573,4.936615,0.668164,3.232499,0.072827,4.558672,1.187510,4.136932,4.029043,1.960796,2.923693,1.797066,4.042878,1.596714,3.296631,2.945155,3.582522,0.269154,4.004717,1.092593,3.176582,1.365010,0.081432,3.694671,0.344612,2.903922,2.557194,0.318556,4.029830,3.907482,2.019546,2.302995,0.367955,2.153817,2.254375,3.550876,4.669645,4.192630,1.714099,3.858833,4.244383,0.362472,1.410037,3.327708,4.641553,3.795397,1.127942,1.713161,1.843636,2.391220,2.125576,1.758844,2.885900,4.948042,3.303723,1.911700,3.544479,2.921016,4.551769,4.278531,1.042587,2.317330,2.019257,2.303304,0.222764,2.055343,0.495129,3.922315,4.607001,3.644073,3.262802,4.023941,2.468796,1.788621,0.518395,3.958170,4.086276,2.031460,1.493556,1.614859,0.624359,1.552165,4.983648,0.571867,4.375538,0.008577,3.660867,2.120586,0.947203,1.041482,3.836375,1.428185,3.747781,4.010459,0.890674,3.227030,4.945293,0.300048,2.550397,4.440673,3.209971,1.384369,1.250945,1.454112,0.211115,0.441069,4.758035,2.621369,0.401183,2.658493,1.531043,3.973256,0.072993,1.907543,3.276065,2.059485,3.454861,2.850267,2.774476,0.810344,1.751821,3.829686,0.374315,4.043146,1.206707,1.967117,2.335783,1.035880,4.569201,3.442176,0.006561,4.014441,0.961840,2.054252,4.140240,4.583141,4.623800,2.970372,1.607905,4.211973,2.636249,4.664703,2.778884,1.086407,3.080875,2.653605,3.724718,2.161915,4.806337,1.650712,0.137405,3.900973,2.292066,3.705120,1.054757,1.691265,0.562209,2.269262,0.182596,3.245675,2.907427,2.875670,2.299458,3.662646,1.865328,3.520307,0.541583,0.481292,1.899760,1.762745,4.973590,4.360485,1.020610,4.697398,3.366329,2.995194,3.643331,0.056984,3.452759,4.129891,0.108599,2.658173,4.314233,4.654649,0.894462,1.004221,1.207847,3.997928,3.621629,2.414293,3.144594,0.199526,4.274928,3.819880,0.276864,1.482280,1.641203,4.330766,3.465612,4.284707,0.767764,3.016896,1.538568,1.438785,4.744108,2.495102,0.086790,0.060014,2.261551,4.240640,0.459354,3.678957,1.379544,2.005765,4.260593,1.596234,3.942564,4.109374,3.340125,4.520580,3.382294,4.051416,0.772657,3.649464,3.127158,0.031888,4.966004,1.750023,0.313813,0.840423,1.259301,1.766174,3.535990,3.897812,4.970729,0.870863,1.434592,4.417798,3.861548,4.629424,4.396040,1.928890,4.766820,4.117974,4.538224,2.845227,3.575367,4.459139,2.715701,0.679180,3.914695,2.627697,0.086040,4.870223,0.644050,4.756020,4.459567,2.628409,0.097294,0.482348,1.623954,2.386294,4.466720,1.900672,3.985423,0.137433,2.598782,0.538922,4.506036,2.869283,1.066415,2.731106,3.361558,1.449067,2.181479,0.338669,3.759846,2.850477,4.950097,4.649906,3.469423,3.324972,2.345201,1.222480,2.397557,0.675042,4.330472,3.850665,3.706093,2.856565,1.393708,4.540825,4.863165,0.681330,1.424304,3.436934,3.527230,2.381602,1.714652,3.732343,2.331597,3.128799,3.321645,2.787792,1.987793,2.444324,1.588017,2.919856,1.096365,4.802934,1.938960,0.520009,3.533378,0.145551,0.418934,2.505492,2.514794,1.353403,4.858396,0.450563,3.258116,3.054143,4.821734,3.551890,1.601587,0.037491,1.942623,4.691717,3.348926,1.527369,0.139948,0.081552,3.800391,3.646166,0.984669,1.055300,0.743462,4.675960,3.743940,3.720634,4.508942,4.905411,3.275758,2.831694,2.671566,0.822072,4.655624,1.180688,3.230610,3.898253,2.853060,3.362090,0.779451,0.522592,0.360994,4.477508,1.764867,0.346874,2.615389,2.985522,4.190369,0.950760,0.163716,4.739847,3.347155,0.033252,4.359137,0.159405,3.985140,3.100736,1.733361,0.845327,0.322475,2.968669,0.245455,4.724848,1.498016,3.884677,1.450238,1.021751,4.587224,4.210118,2.917023,3.222067,3.544743,4.471109,2.382462,2.439443,2.032694,1.260099,2.270202,1.202775,4.498289,0.288786,0.076011,2.370544,2.954998,4.837655,2.228313,2.323105,3.968470,3.565599,3.908474,1.202243,2.715872,2.694812,2.846185,3.986963,1.970041,1.152376,2.440858,0.889359,0.036045,0.008157,2.036884,2.141768,1.081299,2.979595,2.237438,2.158365,4.949329,4.886707,3.715789,1.056705,4.237779,3.058395,3.939725,2.915480,2.161195,2.082445,4.815510,4.586298,4.993459,3.451865,3.489451,4.693241,1.220887,2.111597,0.697615,0.002885,0.871214,2.800939,4.656278,0.238629,4.322921,0.562760,1.151497,1.503561,3.406806,2.260009,2.081608,4.024724,4.326898,4.482872,4.041765,4.861032,0.641037,4.990506,4.428647,3.418686,3.676679,1.327914,2.787229,0.977451,3.739847,4.252668,0.669030,0.681408,2.682441,3.302379,4.135429,3.074043,3.822971,1.320453,1.817078,4.097874,3.337533,0.960583,4.646459,4.969186,2.782841,3.906631,4.760919,3.687955,3.077858,1.179283,4.149518,1.256985,2.614244,2.667513,2.882851,3.950855,1.523150,4.470537,3.965809,1.349871,4.075658,1.147878,3.866572,1.132901,0.928501,2.086939,4.914688,1.368028,1.805219,0.169744,2.795497,3.683512,0.056197,1.213231,1.217406,0.869776,0.321569,2.892271,0.789001,3.247903,2.245192,4.909456,4.532366,2.717467,0.191078,4.405664,2.809338,1.021735,0.777256,2.705788,2.803902,0.756332,2.250579,1.391903,0.112233,3.512988,4.412183,3.672900,2.611896,1.932162,3.299057,0.678230,2.450332,4.700140,1.327778,0.027258,0.975168,2.240246,2.567221,3.605062,1.892356,2.237608,3.048491,3.054903,4.363628,4.517121,3.819766,1.320082,0.556796,1.459877,2.770222,4.305731,1.045076,0.040649,3.249034,2.634651,2.398750,1.063784,0.888364,2.527678,0.083723,1.994303,1.499061,2.672506,4.297542,0.392587,3.986392,2.192742,4.634277,2.707028,3.385147,3.472214,2.894456,3.750399,3.768185,3.195075,1.618422,0.156391,3.598390,2.872586,0.176256,4.897926,1.245433,4.744298,4.318486,1.943981,3.396821,2.607382,1.989446,0.690281,0.582547,3.676732,0.448589,2.971191,2.499360,1.121868,3.380609,3.899901,2.806639,1.574726,1.780088,3.432511,1.643106,3.340473,1.681385,3.934040,0.153177,1.121379,0.573546,4.196366,1.825306,2.901409,3.361183,0.001153,2.669521,3.393577,3.584364,3.968036,0.982074,1.779119,1.333101,3.890682,3.655340,0.569515,3.699494,4.639011,4.425839,0.168971,4.622607,4.493687,4.823857,2.790745,0.933338,0.604353,2.453542,2.722879,0.562909,0.066284,0.852384,2.145278,2.009347,0.697867,1.417747,3.130340,1.580921,0.306505,2.357846,1.923086,3.888716,0.018807,1.991041,4.806995,1.334356,3.668452,4.986285,4.880252,3.119466,3.713949,4.902272,4.793767,2.658851,1.194307,3.236160,4.380958,4.257434,3.715811,0.217333,2.192283,0.841868,2.090060,1.823487,4.125852,2.671892,4.524560,0.858315,4.422840,1.889212,4.431407,2.408704,4.199949,1.943645,0.987434,3.782805,3.968899,1.215503,2.281757,1.708723,2.899208,3.942419,1.583792,1.890634,3.948002,0.075326,3.199597,3.547399,0.768646,2.103541,3.919241,1.631901,0.238693,0.586840,1.364587,4.246649,0.114580,0.965616,2.008814,1.449695,2.342999,4.998612,2.635240,1.151757,4.620541,1.570665,3.650772,3.351256,2.967647,3.416908,0.035870,2.624456,1.022609,1.517173,0.650680,1.008674,1.596875,0.912451,3.026044,0.576022,2.667182,2.440521,3.179769,1.620896,4.046493,0.187666,4.562763,4.465105,2.105556,2.191190,1.058819,3.438483,4.202924,0.961596,4.855829,0.135124,1.523917,3.410617,4.738760,1.661177,4.629377,4.196303,4.581678,1.029183,3.761756,0.347088,2.034203,2.993220,0.451415,4.712015,0.123532,0.263669,0.691603,3.719392,1.995953,2.768168,2.953388,3.499014,4.114868,1.107573,2.980606,2.383953,1.567090,3.094736,2.430970,2.940439,2.311263,2.536755,0.601237,4.229387,0.304679,2.987611,1.986180,0.992203,2.211267,2.151248,2.820204,1.123178,3.539729,4.206974,3.488296,4.284907,2.494312,0.014615,2.964075,4.932364,1.598827,4.979563,0.790942,0.256058,1.660914,1.877817,2.092773,2.671335,1.809678,4.150395,1.241905,2.956512,3.333151,1.866941,1.030753,4.001602,1.765818,1.289499,3.811523,2.143086,3.837048,3.697027,0.088029,3.633307,1.032510,3.243137,1.598968,2.641651,2.727761,4.218789,2.198149,0.047248,3.711682,2.940230,3.906322,1.896600,4.271549,4.848025,0.724216,4.709161,2.274914,3.805225,0.064958,3.785198,1.556237,3.562195,0.784685,4.024198,1.103350,2.361489,0.178726,3.403625,0.477942,3.498084,2.069287,2.291653,0.969238,3.364357,0.381294,4.785543,2.912010,0.814536,3.168158,2.426338,3.704869,3.066044,0.277376,4.419529,4.799586,3.568662,0.019130,1.933589,3.558917,4.693977,3.474340,1.797991,1.434728,0.244495,3.235032,1.868186,3.215194,4.757117,1.721735,1.732102,0.722309,0.313201,1.687696,4.251357,4.590765,1.924329,4.083048,4.895370,4.061203,4.940092,0.135029,0.436916,3.385626,2.271072,2.340200,2.505534,4.930403,2.504798,4.752867,0.297362,4.448203,1.821262,3.860687,1.729023,2.989342,0.487108,0.593456,0.723335,3.315697,3.072558,0.594661,2.943609,1.866329,3.023598,3.681496,4.195052,1.523114,2.416753,2.023974,4.933686,2.831135,0.447090,3.855799,3.463464,1.293895,1.065220,3.749611,4.563092,3.342821,4.036458,3.353686,4.713891,0.873067,1.364212,1.121489,4.946474,4.404353,3.687162,2.059959,1.525354,3.232141,4.827466,3.854197,1.931630,3.070916,0.185939,3.820410,0.704303,1.425205,3.094180,2.090430,3.590166,1.181064,0.491297,2.279910,1.117906,0.910772,4.480278,3.277906,3.909360,4.737103,0.010357,1.044621,4.603691,2.000780,4.705069,3.421909,3.344687,1.949471,2.042101,3.354574,3.852004,0.697176,4.413954,3.614853,4.335003,2.004614,0.685668,1.800166,0.640315,2.519481,0.272656,3.863282,1.805606,1.058290,3.706175,0.128149,0.316382,2.765872,0.309072,2.662290,4.832447,1.934221,3.514884,1.594307,4.236573,4.933029,3.983955,3.047154,4.933149,4.450260,4.078063,3.647365,0.325391,4.634013,0.243946,4.596628,2.418021,4.818827,0.308325,2.250835,4.375704,1.786664,4.712097,0.141442,1.856826,0.157787,3.519078,2.002218,0.416941,2.289805,2.948433,4.024041,1.757295,4.109223,3.984240,4.328268,3.294788,1.339972,4.919040,4.744747,0.461433,2.602811,0.332108,3.489505,3.327098,0.085105,4.185196,0.996750,0.290084,1.198866,4.150198,1.555954,4.552513,1.707770,3.063756,3.677028,4.853847,4.183953,4.183163,0.948943,0.359257,2.069637,2.598888,1.504852,2.760743,2.868212,1.936745,2.999880,2.029403,1.421030,1.314868,1.210780,0.244230,1.010185,3.611966,4.877962,4.351527,1.627936,4.519993,3.572558,2.622302,1.935879,0.285007,3.962605,4.737928,2.827363,3.354745,0.560469,2.073023,2.367826,0.794866,3.400722,4.542477,2.533095,4.322078,3.135993,2.240735,2.475106,3.643197,0.189794,1.679671,3.375179,3.444712,1.093868,0.985292,4.139087,2.973655,2.005557,0.555254,2.441607,3.639946,1.511039,4.222417,0.784535,0.802808,0.369948,4.079189,1.419783,3.624340,2.361110,3.809964,2.673050,0.321551,1.943154,2.178118,1.485320,2.570776,0.578686,1.620272,4.670717,4.963223,2.316478,2.127208,2.356518,2.552526,2.251310,3.577061,3.582530,0.618776,0.850984,2.677184,3.343909,1.796964,4.462635,0.475149,3.281248,0.830182,4.138894,2.684039,2.643571,3.034743,3.526518,4.767754,3.740873,1.491333,2.232279,1.800633,3.129433,1.960865,0.205783,4.616503,2.031175,4.721411,3.613622,4.591600,4.116338,3.234484,0.339695,4.194079,3.464112,4.789958,0.711112,0.438868,2.594400,1.799662,4.801368,3.518861,2.229970,0.961044,2.214407,2.331432,0.045713,1.286077,1.226858,1.905107,2.120192,1.337653,0.563231,0.693398,3.441011,4.779449,1.724272,0.713932,1.300289,0.760875,0.973698,3.310803,1.924637,1.252271,2.905790,4.489120,0.122145,2.983594,3.359980,2.165845,4.601759,0.850936,0.057929,4.201467,1.978888,4.149495,4.976852,0.575434,4.162729,3.802563,3.882774,2.197511,3.045537,1.238210,0.158251,3.638865,0.694165,1.498198,0.267614,2.828765,4.286176,0.364315,1.960662,4.162798,3.873266,1.068461,1.255047,3.157490,1.195664,1.715681,3.904927,3.083195,0.533611,1.925488,0.989813,2.727353,4.744415,2.495334,4.174090,3.397061,2.304419,4.571020,4.863988,4.734524,4.392594,3.702401,4.585481,0.969927,4.360523,2.503357,0.726636,2.466248,0.194096,4.531735,1.293117,1.334897,2.218595,0.945749,4.632089,3.447996,3.394224,4.584211,0.660863,1.301325,3.332779,3.440964,4.168484,3.638166,0.207795,3.117908,3.926425,4.342897,4.359006,0.970139,1.224794,3.015949,2.333191,1.798607,4.826337,1.073600,4.255425,3.026969,3.476988,3.869362,2.355735,4.872533,2.402088,1.413219,4.531089,2.415056,4.642441,2.654962,1.132645,1.719523,4.910417,1.050308,1.812258,1.442165,3.579995,1.158565,4.158735,4.793009,2.082457,2.467091,3.933812,2.207510,0.347692,2.718487,2.610979,2.096143,1.447460,1.221641,2.675339,0.782612,0.648382,2.452403,1.833572,3.909344,1.959561,4.540676,0.772637,4.564839,0.876507,1.154356,1.074848,3.918271,2.099599,4.261522,3.280276,0.538949,0.128585,2.948887,4.470532,1.117601,2.230520,0.223914,2.416081,3.998299,2.396673,2.169784,1.221012,2.673165,4.201503,2.742590,1.466299,3.938145,0.548821,0.178389,0.993486,2.652471,1.483024,3.412963,4.207974,1.588244,3.757686,1.219017,4.108077,4.618415,1.999508,0.443380,2.021350,1.865201,2.547209,2.490539,4.374741,3.097141,0.384698,3.277294,3.927214,0.774121,1.057224,4.550190,4.772582,0.478264,4.633542,4.996805,2.334286,4.149419,0.969673,2.391837,0.557045,3.495811,1.914658,0.731066,1.109610,0.656005,1.756420,4.217467,2.321079,3.345581,4.777969,3.481569,1.214121,0.405715,4.111949,1.396235,3.135274,4.588394,2.631532,2.576892,1.913785,2.441883,3.384953,3.099372,4.346492,4.948494,2.096275,4.900468,3.323558,3.704035,1.972493,3.560802,4.160452,3.006374,0.594064,2.921141,1.136155,2.084930,2.244904,3.524187,2.102333,2.519656,0.584958,3.410361,0.311678,1.563097,3.325390,1.506227,0.038452,2.216821,3.248851,4.233665,4.447502,1.226148,4.771428,1.860760,0.220553,1.545479,0.875268,1.357223,2.774099,2.977625,0.760391,1.966226,3.103896,2.620426,2.789413,4.572893,3.583515,1.508193,2.406138,0.504705,1.489504,4.689477,3.467375,4.956880,2.087978,2.629587,4.821365,3.107114,2.291166,3.653452,3.124468,4.847341,4.777247,3.984960,1.269175,2.963498,4.692461,0.008042,0.528572,2.340262,3.232132,0.641661,1.674243,0.065094,3.740808,1.009015,4.190080,2.805300,3.186651,0.896214,0.926705,1.703900,4.639303,0.614261,2.616834,1.246463,3.649825,1.551054,4.926979,2.559681,2.292126,4.035462,2.131243,4.306601,4.902128,1.601826,4.371917,3.513034,1.723588,4.909948,4.493722,1.762054,4.652049,3.620705,2.806308,1.375317,1.491449,1.764837,4.610319,2.821954,4.191855,1.260165,4.016268,0.021817,2.745408,4.382844,1.270646,2.320615,4.131303,0.137900,0.589672,3.080586,2.494286,4.093538,2.896178,0.280830,4.933511,0.057245,2.345831,2.296568,4.301703,3.614835,0.708341,2.356386,0.554123,4.778810,2.463749,2.849993,1.129370,0.425032,1.558928,4.430776,3.090744,1.697631,2.928977,3.757551,4.751305,4.794769,3.539335,4.230602,1.955254,4.154991,3.108261,2.571157,0.158035,2.871672,4.579355,3.944046,4.245379,2.547174,1.447941,4.609783,2.781166,1.361845,4.724646,0.929815,3.827808,1.120755,4.045001,3.041684,2.631211,2.414427,0.450049,2.098124,1.323529,4.991960,3.500606,3.648957,3.708602,2.810509,3.625426,0.883404,3.699482,0.243774,2.075374,2.812658,0.798277,1.157829,0.175418,0.463829,0.835431,0.430142,0.869962,3.039726,0.070725,2.720778,0.318147,3.164778,1.633269,2.081185,0.017178,4.627371,3.833169,0.207515,4.096001,2.297277,1.371621,2.736341,4.827450,2.190265,1.365167,2.821648,1.087283,2.404835,1.783032,1.966488,3.594071,0.534514,2.753936,1.220188,1.615513,2.776980,2.911789,2.194565,4.646636,0.672285,0.727177,2.186325,1.761857,2.237417,3.285329,4.067201,0.432474,4.732269,4.203289,1.434922,3.794892,0.819165,4.461493,3.241599,4.197469,2.124157,4.178743,2.477048,3.761333,0.012977,1.100750,2.964267,3.174802,0.536741,1.207548,3.660382,1.401287,3.411007,2.614465,4.235754,3.100826,2.783271,1.479931,1.010367,0.461807,3.985530,1.854125,2.129993,4.658971,1.026320,3.173966,1.847160,0.018448,3.423117,0.304721,3.352437,2.283892,3.108134,3.173882,3.193274,2.539929,4.375848,4.440590,3.860684,4.831157,3.408959,3.912074,1.434002,0.271461,2.317461,0.030909,3.803518,2.056287,1.762662,0.313523,4.805485,2.518462,3.058083,4.568451,4.270054,2.056410,2.603402,0.710255,4.797000,4.560404,3.013796,1.495173,4.522031,1.038431,0.023293,2.365442,4.045795,0.068591,3.449192,2.952848,0.475157,1.428857,4.168932,3.271606,1.944980,0.708044,2.564022,3.270637,0.338176,1.068258,1.408208,2.682382,4.598150,3.350157,0.041089,3.848019,0.251592,4.279381,2.123275,4.521611,2.911680,1.786155,3.125162,0.436854,0.017933,1.044533,4.272537,2.164500,4.157907,1.466685,3.499038,0.376229,4.715451,4.147694,0.753398,0.960756,0.085093,4.910161,4.371221,1.243278,3.083580,4.220989,4.014757,1.200761,2.669428,3.006563,0.813135,0.674013,0.721717,4.993746,3.558405,3.748554,0.809176,0.010643,3.170120,0.122474,4.428405,2.839603,0.436199,1.471729,0.398173,3.612492,3.391997,2.824841,3.197312,2.673995,0.076590,3.767821,1.129360,4.743346,0.797926,1.849051,1.968911,0.247592,0.736817,4.794303,4.908746,4.927377,1.323183,1.131045,2.267466,3.632825,0.841224,4.458443,1.879020,3.805794,0.186054,4.824866,2.766303,4.342063,3.155753,4.436048,3.212618,3.406841,2.212391,1.645857,3.886752,0.969227,4.708620,4.804058,4.749575,1.608288,0.421665,0.535437,3.491591,1.592726,0.043916,1.263414,4.388223,2.104412,0.761782,3.537696,4.388139,4.512057,1.532319,1.938043,2.568259,0.746081,0.076143,0.647092,4.413970,1.053400,0.041202,0.314098,0.088703,0.716933,2.453818,4.796784,2.856550,2.948878,2.209104,2.615322,2.689918,2.396917,2.601720,3.837519,4.144984,0.391100,0.462142,3.374297,2.085511,1.471809,1.703035,3.006273,3.512767,3.767328,0.557800,1.365212,1.321154,1.685856,3.947607,1.446174,0.246607,2.183338,3.980511,1.769617,2.956213,1.575667,2.948472,2.855035,3.077660,3.721638,0.841841,0.700590,0.376431,0.607379,1.996821,4.487518,3.892630,1.343822,1.518386,3.544904,2.757598,0.166485,4.550474,2.961995,1.224399,3.714867,4.415848,2.137354,4.541292,4.390317,2.248685,1.453260,4.559542,4.048965,0.068047,3.340236,3.342468,3.516662,0.573703,2.892281,3.478556,4.942923,4.773368,2.722646,1.542126,1.474953,0.221065,3.838667,2.664862,1.316771,0.299348,1.157254,2.649778,4.058516,2.546593,3.877529,4.884514,1.005286,0.792039,4.131001,4.894789,3.055279,2.969481,4.935601,3.634792,3.025456,0.923187,0.872681,3.257719,3.612396,0.560996,0.179578,3.931152,3.818388,2.951802,1.965601,1.403873,4.005410,1.733946,0.826524,1.424374,0.741120,4.960530,4.101245,4.942690,2.545165,4.026153,1.607835,1.615113,2.414714,1.652595,3.011658,0.529897,1.287233,3.168733,2.788966,0.375965,1.416305,4.875361,4.770590,1.135981,2.657342,3.123873,4.532935,4.453632,4.254217,4.869099,0.120594,1.691020,0.118177,1.647903,2.555211,1.209710,0.560352,0.833369,4.993918,3.677229,4.152578,4.559245,2.689134,4.789056,3.133479,4.229979,3.984406,1.054241,3.941816,4.433593,1.229414,4.245845,2.315965,4.830925,2.154346,0.395289,0.777406,0.109387,2.716547,4.726360,0.907494,4.373882,1.022980,4.773235,0.223040,0.198525,3.517841,0.928281,3.400306,4.145978,3.597358,3.382736,0.599856,0.762824,4.727409,3.366954,3.802810,4.517543,0.812373,4.040943,0.115029,4.144324,3.942746,4.766703,0.316824,0.472650,1.459537,4.851234,0.600524,2.883209,2.332146,0.843764,0.247751,0.822103,1.590353,3.389307,3.945846,3.065900,0.818690,3.388319,3.506849,4.584183,1.265618,3.407350,4.930719,2.229280,3.804332,0.584183,3.358453,0.655375,3.711255,2.495582,2.716912,4.407632,3.135029,2.064421,2.207949,2.711300,3.321285,0.385441,3.509996,2.279607,0.328152,1.990821,4.896637,0.707290,0.651900,2.068647,4.596839,3.701339,0.612466,3.593721,2.720688,3.900445,4.397418,2.626399,1.093868,0.260491,4.885378,4.081898,4.978410,4.269496,0.565723,4.565070,0.659591,1.787995,2.032760,0.099966,0.568058,4.562064,4.559224,4.312215,0.721414,1.543246,1.323880,3.240228,4.191047,4.676238,1.688951,1.827235,3.947390,2.397374,4.382133,2.151007,4.888384,2.674542,3.550599,1.874885,2.818648,4.698364,0.790168,4.887270,2.795196,4.238639,2.835151,2.731935,4.595334,1.839820,1.873085,4.397939,4.140500,1.652181,1.391565,0.614814,2.798207,2.514797,2.588479,4.066082,3.857453,2.855914,0.532422,2.064136,2.799231,2.524095,4.522555,4.205886,0.524132,4.913618,1.903278,4.397118,2.051196,1.452838,3.538453,2.346310,3.562249,0.813133,3.457615,3.835118,1.436052,4.389359,4.012751,3.336712,0.783373,4.936044,4.147661,2.517911,4.822589,1.635477,4.365475,1.903817,2.961898,0.405062,1.170383,1.374595,4.400810,4.205307,4.717994,2.964155,4.181915,3.662286,3.445793,0.560377,3.390991,0.275347,2.595656,0.051975,0.816594,3.430694,1.228765,0.405522,1.821917,4.075410,4.711500,1.067009,1.491451,1.841214,4.621991,3.452728,0.446694,4.812617,1.409928,2.228173,4.919037,2.130566,3.328029,3.731854,4.362616,2.251097,0.474967,1.787848,2.869848,3.705516,3.345527,2.895079,1.636380,1.728576,3.909503,2.983122,2.865442,2.977718,3.792188,4.753644,1.512958,4.913442,2.075940,4.944306,0.838459,4.414200,1.535752,3.578540,4.134101,0.845114,0.715474,1.035585,3.564804,4.887169,2.053267,0.487608,2.468819,0.565774,0.967135,1.910181,1.461698,4.129847,4.483827,4.412892,4.607375,1.044276,1.737050,3.510345,1.328684,1.267864,1.294607,3.090847,2.280767,4.067768,3.691260,1.429074,1.811479,3.372162,1.715763,3.289365,4.772106,2.415040,3.697256,2.602710,3.366618,4.024663,3.874909,0.653273,0.040499,3.300825,3.641763,1.168085,4.809259,3.791324,2.560887,0.484787,2.997037,0.601376,3.436914,2.112461,3.094785,4.962032,1.565369,3.659580,3.081238,4.280891,4.959151,4.519503,0.429984,3.046041,1.539214,4.679441,1.835841,3.458473,1.505798,2.457489,3.663534,4.917673,4.705212,3.455244,0.253625,0.563591,4.641078,2.068737,3.043010,4.294806,4.342802,1.932524,2.933268,3.442358,2.204280,2.808880,2.706193,3.934038,4.017325,4.660688,4.709071,4.722783,0.080843,1.005474,2.501698,0.379152,4.984817,4.332575,0.240799,4.439163,1.617748,4.833486,1.661430,1.128395,1.441535,2.930711,2.791359,2.663897,0.339862,3.564093,1.577436,2.660157,3.301394,4.195907,1.545121,2.384640,3.235410,3.055004,4.138525,1.386631,0.321359,1.349912,4.605212,2.574961,0.663744,4.686362,0.090795,1.979110,1.719280,4.214485,1.654859,3.021190,2.281062,1.381602,4.973504,2.121747,1.845238,3.087269,1.575525,2.528501,2.344005,3.410715,2.301546,1.329787,4.599675,1.262525,3.677459,0.469586,2.352206,2.853886,2.200801 \ No newline at end of file diff --git a/arpack/src/test/resources/geC.mat b/arpack/src/test/resources/geC.mat deleted file mode 100644 index c6c17489..00000000 --- a/arpack/src/test/resources/geC.mat +++ /dev/null @@ -1 +0,0 @@ -4.323773,3.546459,4.358712,3.871009,0.870356,4.142775,1.916142,0.345785,0.653794,4.989860,0.832172,1.639531,0.986640,3.195514,1.179658,1.323391,4.904651,1.611555,4.377888,4.638659,0.080146,4.530323,3.178469,0.473570,3.809564,1.350545,0.027802,3.941896,3.170014,0.387714,0.196646,3.245587,0.570243,3.651065,4.722636,4.887293,4.826329,1.320208,0.941955,0.198116,3.865749,1.039268,2.426914,3.306411,1.821082,0.063204,3.862440,2.005678,3.160546,2.024306,3.836489,2.783114,0.630367,3.395396,4.288362,0.372779,0.114135,4.999276,0.956155,0.808991,0.639050,0.584675,2.097964,4.431505,0.536952,0.814050,0.564889,3.927554,3.117116,3.660471,4.837592,3.852827,1.932502,4.545367,0.544295,2.223688,3.215414,1.687548,2.616630,4.743003,3.113471,3.193462,1.167730,1.498290,4.911271,3.163943,3.846086,1.828533,4.357467,2.515061,3.296193,3.742627,3.549873,2.737005,4.819027,4.654808,4.401407,1.655100,2.383325,0.996722,0.243578,4.784478,2.804727,4.095389,3.773228,4.660444,1.897328,4.350651,3.121078,0.169871,2.078024,4.491863,2.042073,4.750984,3.464362,2.322535,0.536022,3.648198,1.265534,0.770851,4.997515,2.638533,2.911683,2.653712,3.439864,4.909624,3.754567,2.502649,2.747741,0.714990,4.608471,3.696000,3.514410,0.106176,4.794566,4.432775,4.549788,4.296097,4.704688,1.477935,1.416648,0.479348,1.545478,3.663688,4.193746,1.524594,2.963240,4.312959,4.582136,2.427083,1.021536,4.879920,4.488839,2.508258,1.968751,1.551092,2.297454,2.912605,0.056069,0.846450,0.490753,2.646824,4.511124,1.159858,4.365251,2.907021,1.012213,2.227001,4.399300,4.292396,4.088489,2.675425,0.306448,4.740273,1.969469,0.474121,4.573014,4.797977,2.518829,3.022947,0.107632,3.168874,4.294902,1.549514,2.916664,4.165775,4.250579,0.752322,1.037485,2.461871,2.578203,0.914499,1.182743,1.386688,4.000247,2.858843,1.931369,1.162770,4.459071,3.222898,3.979575,0.178497,4.707668,0.011039,4.563618,3.739310,1.028658,2.616478,0.940441,2.063628,1.056595,4.775896,4.327504,0.838920,1.401448,3.841467,3.919922,3.173912,3.459373,2.013841,3.915239,4.866122,2.924291,1.513093,3.568847,1.512424,4.549622,0.283520,1.158421,0.630628,2.171482,2.315517,2.952456,0.479986,3.370114,2.842845,0.459588,0.140392,2.324232,1.045961,2.309001,1.430321,0.819922,2.144769,1.876557,0.762440,1.693673,1.749599,1.711939,3.980679,3.044960,0.967516,2.934836,2.955978,0.065762,2.305467,3.355996,4.103026,1.946713,4.195244,4.628001,0.751909,0.806262,3.812998,0.994524,3.452310,3.498367,1.243731,0.267467,3.729737,1.221480,4.154332,0.240746,3.016701,4.155027,0.942195,0.132827,1.566196,4.860305,3.075803,1.112310,4.949315,2.444880,1.029824,4.309569,3.317138,1.212031,3.853726,2.955572,0.144436,4.399468,2.876191,1.939590,2.224313,4.499099,3.120732,3.982460,4.854735,4.777107,2.459896,1.648554,1.874424,1.054916,4.123234,2.297275,2.500248,0.620542,4.604081,1.009708,1.890305,1.819506,4.361837,0.764461,4.101652,2.636700,1.458554,3.528973,0.885496,4.881295,0.012045,1.455058,1.412566,1.967369,0.708114,4.372576,1.892839,3.292766,1.894684,4.185496,3.288110,0.684989,0.467969,3.740531,3.242781,1.171511,2.153700,1.934461,1.360133,4.477700,1.877055,3.769510,3.986193,4.550378,0.249321,3.184591,0.566123,1.159504,3.798867,3.738236,3.317342,1.393831,1.355058,4.921314,3.987708,4.577233,1.227065,2.000684,1.458547,4.831157,2.816687,2.626712,3.984708,1.881431,3.909853,3.876873,2.943445,0.794039,1.004901,1.307686,4.678695,1.138341,4.090897,0.331727,1.793730,2.433102,1.466162,0.195348,1.575633,2.913790,3.022528,2.386718,4.872171,4.716416,4.238079,2.074261,4.606597,0.964934,3.020609,3.907413,1.870900,1.741643,2.174312,3.426669,0.435080,1.824185,4.174516,4.985277,3.198518,0.707850,1.243862,3.843925,3.473026,2.397756,4.220981,1.990307,0.599658,0.163314,1.661736,3.641003,3.099124,4.954285,4.381209,1.186375,2.856833,3.939418,3.050399,1.621201,0.807108,3.340716,2.788367,3.651964,2.529993,4.130834,2.191741,1.055266,2.588430,2.906832,0.399472,1.251443,2.938080,1.852624,3.078190,2.130011,2.058052,0.075177,4.458654,3.053358,2.287876,2.263784,3.971760,2.110555,3.685001,4.152922,3.593750,2.922805,1.311097,4.003072,2.840667,1.874201,0.403339,0.063730,4.194937,0.898965,2.188498,2.471085,3.501983,2.269900,3.209818,0.709094,2.809606,1.338626,4.597823,3.929526,3.602962,0.274433,3.313095,2.145595,0.103629,3.520453,3.278373,0.890924,4.672373,1.072188,3.280019,3.068518,0.835225,3.105310,4.197317,4.285161,3.499957,4.527358,2.448822,0.838278,1.410347,0.824473,1.426745,3.510879,4.032119,2.138515,1.764638,1.120273,2.061699,4.107012,3.274509,3.659926,2.152900,2.607424,2.478520,3.653824,4.286458,4.820981,0.971277,4.440760,0.422158,4.646909,2.430350,3.096066,1.133755,0.203874,1.468417,2.711894,2.861037,2.125422,1.063060,2.888467,0.635168,3.643097,4.538723,0.445885,2.864063,1.679905,2.376400,3.382392,4.311730,4.845762,0.117673,2.800207,1.403192,3.343806,2.967676,0.523502,0.456296,0.973200,1.389357,0.202505,2.620988,0.456596,3.859948,4.163172,3.660749,2.845087,0.832025,4.325201,2.952884,3.681756,1.992512,3.507713,1.878424,2.938959,1.815832,0.231679,3.967409,1.897162,2.333538,0.738275,3.028211,1.201914,4.172311,4.866109,1.123532,2.801854,2.068586,4.216746,0.036374,2.157967,3.423819,4.504153,3.997007,2.095204,3.719986,1.101677,3.030058,3.211052,3.263796,0.731166,1.069946,1.585159,2.907228,2.544118,0.654322,2.674546,3.488290,0.932143,2.820409,2.601223,3.298916,3.534086,2.212774,2.977549,0.363388,1.292886,2.126687,4.299700,4.701883,4.754055,2.151541,2.738047,2.209681,0.291639,4.419832,3.209139,0.745650,1.059965,3.480577,2.845850,2.593199,3.826397,0.710121,0.747765,4.050509,2.864565,3.586792,0.944054,0.109404,2.752826,3.866751,0.356934,4.326438,1.710674,2.873875,1.787701,1.856191,0.616959,1.355009,2.436634,1.865796,1.571428,4.007528,0.041222,2.677188,2.377267,3.427826,3.010272,0.998136,0.661166,0.167941,1.081960,1.522729,4.621685,1.915841,2.733625,1.590910,3.576682,4.514836,2.526697,3.120101,0.362779,3.569850,0.475194,4.620224,1.388137,4.694434,3.100100,1.066136,4.470721,0.724898,0.660492,2.242837,1.245515,2.669691,2.225062,4.666951,0.470668,0.429940,1.749001,3.733577,4.908182,0.913162,0.632247,0.125020,0.029586,1.485024,3.926450,4.623387,4.963475,4.617855,0.623429,3.639958,1.065012,1.172508,3.662797,4.749055,4.990298,0.214198,1.057015,0.062498,4.616830,2.175148,3.913364,2.954981,1.471295,0.358823,0.790079,3.553473,0.593146,4.485375,2.952637,1.341403,1.942471,4.123198,3.370633,2.426280,3.644053,3.469586,0.557017,2.184009,2.495732,1.093085,2.772602,2.744604,2.896497,1.929825,3.015199,0.751371,1.923477,1.261733,4.722236,2.105619,0.285386,0.761131,2.891282,4.146503,3.335293,4.393213,3.080866,2.181749,3.393380,4.068780,4.426880,0.556389,3.903320,4.107895,0.151169,1.086998,3.697595,1.020472,2.162194,1.601439,2.489887,4.930764,1.770213,2.804721,3.941545,1.264836,4.190961,4.459448,2.939830,0.090235,0.376771,3.020161,2.737454,1.665276,1.300270,0.671247,4.352213,2.063604,1.247666,1.607486,4.426930,2.525227,4.250230,2.841564,2.206406,1.240194,1.846951,2.456045,3.319856,3.031262,0.036781,0.502358,2.018093,1.862470,2.993368,2.729131,3.817698,4.942977,0.295192,3.224945,3.173678,4.139828,0.373185,3.452314,4.904688,1.398117,1.573764,4.158331,3.494663,1.217445,2.651180,0.161516,2.157859,1.270797,4.602696,0.166705,4.218580,4.806847,2.891880,0.757443,1.103819,1.693808,1.412476,4.691146,4.505223,2.832831,3.574906,0.287011,2.961529,0.176098,0.658866,1.594241,0.078065,2.412817,0.265017,1.467954,4.154553,1.121497,1.974697,2.778464,3.103773,4.659936,2.251953,4.963834,0.858586,2.367650,2.097157,1.771745,3.044158,2.066245,2.030812,4.699038,4.727909,0.297076,1.103852,3.598813,1.297175,2.644194,1.367499,1.917156,1.866804,2.538969,1.568538,2.938859,3.368185,2.927623,4.899460,1.076008,1.798350,1.721014,4.142680,1.362018,1.672765,3.595269,0.940085,1.937184,4.330827,2.927222,3.245753,1.180301,0.028737,0.111100,1.341863,4.787935,2.139321,1.521098,1.217182,4.962860,1.113224,0.694986,2.612882,1.606689,3.240513,1.359688,3.715647,2.938585,3.529676,3.816281,0.888937,1.838904,0.996308,3.194964,4.693735,0.808978,1.923068,2.576262,3.272033,0.828861,2.746278,0.803288,1.313271,1.738683,3.200063,1.396191,3.710070,4.942860,1.467785,1.689172,2.088739,4.392593,1.362356,2.148667,0.720489,1.825511,4.041079,2.837664,2.674340,4.218350,0.464918,3.629059,0.178906,4.471055,1.026245,2.978834,0.561597,2.743229,0.979189,4.031528,1.536681,1.426575,1.901523,1.117200,2.975531,4.379561,3.677056,3.917633,3.272659,1.507968,4.776863,2.414954,3.944327,1.080217,2.196089,2.603083,2.723026,4.671615,3.756744,3.633191,3.008844,0.846307,0.611911,0.979010,1.849443,4.676674,4.107899,0.544323,4.243472,2.046313,3.213919,0.882617,0.819024,4.145813,2.247471,3.887330,3.839880,4.726268,4.577843,3.255953,3.066516,4.256937,3.648886,2.170254,1.340488,1.763856,1.483932,2.140592,4.929993,4.543696,1.454053,1.064710,0.196779,4.889961,2.912821,4.829139,2.246705,0.713677,4.961975,0.633873,0.362937,0.672462,3.712115,0.661849,2.855783,1.211307,1.893556,1.757966,2.322254,1.407077,4.352867,4.906310,2.581843,2.436115,2.977129,0.466710,1.535978,3.770853,2.970169,4.160624,1.689582,1.658652,2.317639,1.440970,1.397589,2.004034,2.342378,3.173819,1.838205,3.654446,3.832742,4.560029,3.629043,0.889892,0.451470,0.254395,1.302290,1.685565,1.753566,0.037721,0.848134,0.262968,4.929286,1.840710,3.466993,2.944506,3.867356,4.078744,1.975079,2.347819,0.046120,3.299516,1.117920,1.857894,2.649122,2.199209,2.987305,4.797184,3.756050,4.398027,2.859907,4.629038,3.827468,3.239808,1.058228,1.319361,1.322787,1.237397,1.017838,3.646106,2.555435,1.509357,3.576405,3.486471,3.215685,3.734331,1.045997,3.262072,2.570672,4.758754,1.498911,0.168635,1.475741,3.180425,4.348067,0.638726,1.503879,4.985368,4.491893,0.736010,1.046137,1.749600,0.772814,4.667505,2.453309,0.012511,0.172070,0.848754,4.512290,0.616912,1.788689,1.085816,4.129902,4.541781,4.125123,2.303839,1.094954,0.957062,3.193598,2.486492,2.792828,4.307394,4.757288,4.524888,1.196640,2.098332,2.836678,2.444176,1.279335,1.248031,1.398492,2.835101,2.784711,3.625135,1.199222,4.654176,1.060832,3.424751,3.034463,0.493260,0.963843,4.088119,4.656424,2.155584,4.650609,0.008616,2.748124,4.190916,2.995261,4.272746,0.927330,1.309386,0.464492,0.482598,3.524631,0.439840,3.691917,3.745370,0.305678,0.582181,1.535956,0.322162,4.081171,2.311762,0.050239,3.817257,2.077926,2.197482,4.293182,2.265903,4.002028,2.007338,0.396405,1.744635,0.326716,1.037693,3.800939,1.202333,0.500337,1.695352,2.866864,1.275769,3.856208,4.960962,3.242782,3.415703,0.802384,4.145107,0.276959,4.570503,1.634445,1.285823,0.527288,2.717612,0.268664,2.447502,4.069898,3.790597,0.496527,2.416034,4.372535,3.490361,0.295557,0.964409,4.622708,3.321067,3.901239,2.747867,0.543946,2.428477,2.646121,2.227457,4.894819,1.439841,1.270799,2.236811,2.598775,1.600670,4.947341,0.577809,4.906823,4.583098,4.664954,1.916224,3.034037,2.908207,3.016519,0.298802,4.067786,1.836035,4.580344,0.925709,2.890244,2.992961,0.137494,0.953822,2.409440,2.983439,0.438759,1.546698,2.707435,3.393856,4.180835,3.801396,3.910484,1.402299,1.613764,3.143283,0.867876,4.544555,3.623519,0.289458,3.754408,2.614004,4.695679,2.522139,2.880484,4.196278,4.598141,4.456950,2.822342,3.133187,0.006523,2.859470,0.926542,2.906921,4.945087,1.729122,3.638405,2.406638,3.427764,4.191498,3.578248,1.409986,4.269387,4.893220,4.555609,2.983964,4.417183,0.788780,0.982343,1.286287,3.858425,1.204991,3.601663,4.184494,1.009167,2.746391,4.189847,0.377071,2.968313,0.971100,4.440389,4.391988,3.028553,1.812183,3.893210,1.400093,4.086360,1.002027,0.639617,3.440453,3.582565,1.485007,1.185148,4.637044,0.272260,2.958274,4.015000,4.786479,3.711573,4.047982,4.634441,2.220863,0.333536,1.232328,4.977277,0.938955,1.217686,2.017922,4.367973,3.971122,2.957755,2.504383,3.440082,0.854031,2.935130,2.502532,2.886262,4.028389,3.253353,4.578378,3.008487,1.305354,1.977135,1.823890,3.488716,3.323962,1.370078,4.635755,0.232547,4.367103,2.031649,4.761143,4.435452,2.947974,0.517617,3.600636,3.581022,3.184040,1.300635,3.313933,0.930035,3.673046,2.929662,0.021166,2.729598,1.401881,2.740063,3.098261,3.173821,0.323966,1.149409,3.983986,0.419542,4.229794,3.663323,0.345818,2.410228,1.026782,0.789410,2.485378,1.243597,4.696974,1.687749,0.630680,1.338353,1.107852,3.910434,1.057084,0.906981,2.611711,2.432205,1.508344,0.749510,4.441927,1.734593,2.863645,1.066149,1.369161,2.419242,1.943737,1.884850,2.811336,3.543431,0.127994,0.409722,1.846286,1.253434,4.456280,4.446138,4.944517,1.815119,4.110109,3.267897,2.033222,0.100325,1.636004,2.075255,0.314431,0.570696,0.764460,0.007857,1.805024,2.762167,3.078358,1.391293,4.056581,3.871888,3.468979,3.299849,1.456259,0.616844,0.803344,0.269463,1.485235,0.175458,2.656384,2.255307,0.483537,0.339622,4.016618,1.769898,4.442828,0.114220,1.711391,2.057775,4.624710,0.186191,0.837958,3.070619,1.841619,0.388853,4.007167,1.352769,3.402001,2.579010,0.741772,1.423691,1.257294,2.621604,3.870488,2.909907,2.699001,4.783382,2.161626,4.534315,1.149975,0.779520,3.826329,0.812219,2.409985,0.070482,1.665134,2.060961,1.757683,0.842093,4.766042,2.883733,3.896693,4.863189,3.132860,3.861266,3.135700,4.532897,1.700958,4.657748,1.275595,2.619303,1.752859,3.915622,0.641703,4.114728,2.691521,4.736604,2.280967,1.532881,4.573374,2.954653,0.633009,2.793575,1.347740,3.660331,2.792906,0.600153,2.191909,3.462621,0.643395,2.995911,0.120313,2.564201,0.033519,1.773819,1.866815,2.228883,4.382406,0.796964,2.867239,1.419986,4.536884,0.252389,0.803892,3.652693,4.142059,3.265644,4.870401,2.459838,1.681860,0.300210,3.232986,2.754321,1.170739,3.794334,0.688818,0.983415,1.015026,2.901587,0.170543,2.169281,4.857034,3.852198,3.961718,4.437874,2.059135,1.400580,4.799408,3.240118,0.767697,4.940605,3.359060,3.928571,1.252762,2.495475,0.708524,1.873951,2.738288,2.115238,0.342193,3.617420,3.888669,2.029479,1.195875,3.402812,2.852911,3.275289,1.875155,3.119963,2.027268,2.696127,1.390639,2.018451,1.403748,3.231583,0.811541,2.912760,2.908090,4.090941,3.750341,0.130369,3.012998,0.400486,0.368727,4.197036,1.305159,3.693145,4.925696,4.942005,3.498297,2.820367,4.053569,0.920922,4.950655,1.010295,3.492271,0.360257,0.748797,1.018285,2.160178,1.053928,3.736780,1.533849,1.799551,3.283729,0.155920,4.725340,1.879777,1.154153,3.933833,1.772336,1.778533,1.460759,0.492377,3.581033,3.051811,4.934622,3.126796,0.156601,2.370163,0.148551,1.634628,2.655737,4.766176,0.104621,4.836407,4.532202,3.377775,0.472938,4.824944,2.820303,0.004984,4.139423,1.109147,1.356616,2.979628,0.588073,4.621459,3.296807,1.717470,3.680562,4.315481,4.162930,2.945106,4.019141,0.805370,3.128842,1.768919,1.517706,0.725910,0.198824,0.094482,4.383962,3.425200,3.380513,3.003283,1.913292,1.765200,1.389334,1.714232,3.547161,2.465425,3.766188,0.465413,2.491093,1.934203,0.090021,0.827100,0.456186,1.781359,3.591313,3.227388,3.014366,2.483003,0.430715,2.739157,1.072809,4.242286,1.045109,4.133360,2.803711,1.902261,1.310067,2.581000,2.901758,0.733856,4.929660,0.882763,3.548966,4.888976,4.887168,3.795965,4.667605,3.824491,3.142907,1.068229,0.403399,0.205396,2.098746,2.946795,2.047442,3.682363,2.601587,1.414711,4.755175,1.946583,0.586221,3.947060,0.990782,0.490735,3.252763,3.752398,0.262233,3.303759,3.603396,3.128656,4.286385,0.182791,4.772005,3.141989,2.443587,0.432005,0.231787,4.376000,2.720724,0.699000,1.345026,2.663104,3.938339,1.950015,4.675890,0.922995,4.026559,1.041650,1.801384,4.523904,2.951275,0.619079,1.172875,0.007119,1.632743,2.644233,2.841737,4.714417,4.335764,4.366108,3.791407,2.563492,3.300249,3.076978,2.565980,3.675668,4.800003,2.212340,1.576373,4.931561,3.955680,4.897814,2.028804,4.977977,2.814883,2.159794,1.916497,1.758178,2.096572,2.473020,4.679584,3.120076,3.122450,2.515131,0.366019,1.515661,4.571638,1.426218,0.998473,0.060245,2.922963,0.286331,4.053605,2.748473,1.972794,3.992163,3.798943,1.968322,2.067289,1.222166,0.196621,1.159190,1.416856,3.482855,4.475451,1.254392,4.562029,1.135908,1.565200,4.388401,1.321021,0.809039,4.586656,3.094221,2.577620,3.823332,0.304470,0.396168,1.727060,2.233573,0.008827,4.015985,0.908802,1.922223,3.103509,4.130939,2.649100,1.917702,3.659230,2.296507,4.738146,3.782716,1.995016,2.225002,4.081852,2.084881,3.441114,2.119990,3.560589,2.079556,1.391609,1.240850,1.557032,0.520567,1.958920,1.686133,0.256442,1.220040,0.654701,2.571593,3.427578,3.191036,3.899767,0.600457,4.961853,0.593810,4.969127,0.610704,3.014428,3.893048,4.282371,2.470308,2.105438,3.398741,1.347642,4.048256,2.196576,3.302231,3.346346,4.162020,3.601568,0.223388,1.679040,4.677818,1.091162,3.990124,2.233254,1.018638,0.091066,2.505283,0.763541,4.177692,2.770859,1.217422,2.533164,2.672442,2.811354,4.597848,2.220361,4.975467,3.386478,0.178797,1.207125,0.136171,4.669689,2.517335,4.603315,3.326535,2.772671,0.603544,2.275902,4.432653,2.382262,1.791918,3.578811,0.077402,3.727536,3.851236,4.533924,4.951494,2.865568,0.837164,4.503318,0.438559,0.697524,4.324000,3.007707,2.853545,0.338525,1.783102,0.064202,4.955154,1.722716,4.004810,3.507685,2.847419,3.364709,0.578298,2.759972,1.496205,2.861417,1.358581,0.529659,0.626275,0.681141,4.001570,2.861221,2.862454,1.275855,4.124074,1.563724,1.630859,0.194736,2.065836,2.065837,2.464442,1.350588,0.809067,2.272887,1.589803,1.864036,1.174392,1.492793,1.929578,3.319312,3.230938,4.621188,4.959932,4.917859,4.654683,2.948101,0.666368,1.016368,4.891837,1.642301,1.702880,2.645496,0.015224,2.762344,0.746484,2.223143,0.431184,0.932933,1.882702,2.625523,3.147523,4.835813,0.527759,0.536201,0.010042,1.392223,4.009335,3.341454,4.092070,4.923420,4.646560,3.492002,0.114413,0.321292,4.952992,2.099680,4.043703,2.705204,4.663946,3.684027,2.899919,2.034098,2.348123,0.115866,1.051525,4.816879,1.973846,0.471859,1.969492,0.634352,4.312787,4.411763,4.519680,0.110045,4.163851,1.911826,0.882684,1.170956,2.339226,1.458287,4.339920,0.618866,2.870830,1.612408,0.587458,1.108942,3.082228,3.998720,3.036699,2.882997,2.275837,2.432604,1.562087,2.746761,3.238299,2.514129,0.741711,3.958124,4.118483,4.195076,1.385158,3.856048,3.527723,1.715492,4.086737,3.056614,3.242260,1.720171,1.158447,4.355425,1.005546,2.586796,0.099368,1.385516,0.058755,0.273839,1.722240,2.755229,3.984732,4.019386,0.297034,4.857054,3.779579,4.933186,0.410179,0.436993,2.517058,2.002568,4.814744,1.516631,1.767127,0.076214,4.567262,3.710413,1.211640,2.314082,0.630682,0.711099,3.428399,2.111191,2.945197,0.074343,2.270484,1.217887,2.961639,1.269659,0.288934,1.198040,0.087634,0.935412,3.568559,4.278933,3.952785,1.039126,3.261076,0.618389,0.862704,3.330992,2.220740,2.299635,1.653530,1.730135,2.238288,4.341697,0.756700,2.647863,0.028621,3.532582,4.123795,4.178636,3.463183,1.475270,0.427260,1.481532,4.284693,1.160412,3.527038,1.989807,0.552388,0.961172,3.965879,4.811399,2.679297,3.347875,2.690094,1.161182,4.252112,4.343696,1.318305,2.184888,0.099420,2.421957,4.630825,0.507934,1.100519,3.818080,0.765620,3.896456,2.972098,3.318801,2.648538,3.135903,2.358580,3.350537,4.353873,0.533414,0.937915,0.371031,2.883894,4.829827,3.879844,1.358393,1.976207,1.761985,0.614428,4.508504,1.770754,3.897351,3.247198,2.676061,0.088850,1.704812,2.569364,0.421816,0.940114,0.174562,1.635945,2.793414,3.739362,2.861004,0.492520,1.732593,4.222380,1.159474,3.530891,1.454856,2.488467,2.169434,4.039278,0.664103,3.593209,1.577819,2.249911,0.165555,2.102521,0.035078,3.172947,0.743602,4.650297,3.156163,3.489548,1.514315,0.900261,0.012519,2.155350,4.913388,0.589606,3.439597,1.465413,2.874442,1.008631,1.351875,4.242879,2.976652,1.532809,2.461492,3.694409,0.909606,3.011764,1.798549,4.996990,4.167165,2.476942,2.476159,1.881904,3.752791,1.967562,0.866174,0.239086,4.083569,0.685906,2.465544,3.955741,4.219491,4.366359,0.048219,1.517977,2.567880,4.077711,3.763539,3.189811,0.555801,1.153177,4.996995,4.943837,1.665277,3.375523,2.668545,1.178825,2.998883,3.091995,0.662226,0.052793,4.563526,3.230117,4.419347,4.377989,2.130353,2.229111,3.683738,1.533478,2.035696,2.325857,4.605683,1.648900,3.009238,2.787955,2.007559,0.667554,2.026041,4.195613,2.027924,1.623352,3.042941,0.673761,1.045375,4.246913,2.843540,4.435303,2.890739,0.172037,1.643617,1.432536,2.959435,1.250813,2.624602,0.899870,1.831327,4.836161,1.549872,0.678902,0.287155,2.987829,2.444428,0.141905,1.041490,1.073639,3.108368,2.779665,4.942903,3.922990,2.436859,3.776536,4.272519,3.827228,1.598896,3.644994,1.840182,1.243138,4.251819,4.739269,2.485815,4.597019,1.620319,2.541519,1.722039,0.034071,3.291168,0.362188,1.160953,4.578867,0.270256,1.954359,0.937653,4.897453,3.189629,0.884491,3.234187,3.524320,0.324116,3.122476,2.557690,1.429116,1.748025,2.044298,2.509344,4.048260,1.118985,4.462379,0.565740,0.638147,0.953008,0.807743,3.774210,1.643134,1.311118,1.791928,0.992167,4.084176,2.942641,1.398302,4.998255,4.596012,3.457878,1.469415,0.174157,2.610584,3.863473,1.632514,4.358874,3.894162,4.433694,2.705922,3.050594,1.551253,3.385236,0.188950,0.883216,2.285034,4.450724,2.832147,3.740569,3.523426,0.503900,0.384734,3.024749,4.511315,3.264333,1.069883,1.233605,3.376777,4.460509,1.016005,3.849887,2.439977,3.912186,0.996585,4.361119,3.039053,1.815531,3.522266,3.415415,1.097089,0.011725,0.250947,4.803966,2.604490,2.199826,1.732629,4.377852,3.351554,4.489942,0.994376,3.214162,4.521648,2.771603,1.246135,1.280721,1.805730,4.163091,3.761249,3.352759,2.901535,4.635338,1.130411,4.161933,3.827665,0.231518,4.039279,1.475051,4.853145,4.888521,1.778969,0.564504,2.275701,3.009060,3.836645,4.211602,2.622029,3.913211,1.015855,0.528678,1.744006,4.963354,4.483960,2.500287,1.576431,4.779510,0.855204,0.997851,0.746546,0.999893,0.568044,2.506954,3.103340,2.630627,0.052201,3.975384,0.567231,0.019080,3.892054,0.864608,1.956480,2.888017,3.598484,1.122368,0.460770,1.505161,3.957209,1.716294,0.909492,4.510062,2.342725,2.052436,4.305110,3.990265,2.510368,3.046134,1.420920,1.256436,1.037513,2.573144,4.577338,0.341625,4.765736,3.822778,3.932590,3.400707,0.897939,4.817952,1.710826,3.857543,3.740361,4.667791,3.737015,1.694196,0.104905,1.167207,3.301380,1.024063,2.656805,3.531265,1.017451,2.413457,2.951586,4.872174,0.826267,3.593732,0.523320,0.522375,1.016417,3.265230,4.019981,2.916124,4.143936,1.915252,3.062029,1.583872,0.321537,2.453321,4.896458,2.641014,2.432658,2.261400,3.373781,2.037578,4.592128,0.860715,1.695876,0.167396,4.370966,3.808057,0.484103,2.798866,3.091853,2.795869,0.505435,2.702915,1.080164,3.771858,0.769859,0.153787,4.199431,1.690201,3.278100,2.263619,0.152492,2.881634,1.038684,0.784138,2.215494,0.822031,0.909558,1.945070,0.510058,0.848731,1.514532,2.462068,1.793398,2.857449,0.507843,0.371331,0.429347,0.220704,1.881573,1.182020,2.349513,1.612400,4.403710,0.955575,0.916852,0.493905,3.070285,0.557012,0.379171,4.699668,0.361363,1.587565,2.021588,3.191835,3.183179,0.139142,0.714732,4.699943,2.042637,1.877159,0.078458,0.219786,0.416652,2.985553,1.570980,0.004515,0.987314,3.965921,1.365639,3.589971,1.415353,2.777230,0.863131,2.037549,1.260410,2.384438,2.405962,3.031376,4.537196,1.287368,3.486086,2.611228,1.373524,3.246741,1.365113,4.611453,2.329953,1.910545,0.485475,0.878888,0.653263,1.725537,0.791560,4.421704,4.008342,1.114708,4.218313,3.723341,4.416732,1.446866,0.295284,0.916577,2.047247,4.760320,3.656662,0.047327,1.665191,0.752310,1.101484,2.665282,0.578119,3.180873,0.016747,3.492391,3.867170,3.685164,0.051870,4.767349,4.958248,4.568650,4.598585,4.845358,3.506462,1.275914,1.331356,0.090636,0.335279,0.288142,1.647467,2.978037,4.488922,0.253391,1.248881,2.065560,3.026810,0.089549,3.899582,4.143919,4.200000,1.790153,1.547555,3.600738,4.433145,3.726804,0.929857,4.883500,4.677242,0.335154,0.485455,4.871314,3.742728,3.947187,3.573664,0.552123,4.231801,3.524434,1.152683,4.482490,1.288508,0.400937,0.869570,1.714831,2.008851,2.553587,3.160647,1.406422,2.202398,0.531637,2.370227,4.967054,0.518636,1.324233,3.528942,2.103172,2.607445,2.412603,4.506690,3.255364,2.470868,2.093478,4.566743,2.201727,2.349254,3.319584,0.107737,0.012145,4.273611,1.834946,0.722939,2.267243,2.631018,4.296437,2.725203,4.138601,0.765926,3.173216,0.747898,1.207225,0.222786,4.712137,4.856965,2.803510,0.447391,4.637416,0.136248,2.625766,2.533601,0.076346,2.061387,2.031531,1.818862,4.919480,2.806477,2.656614,3.888664,1.446300,4.626808,1.662397,4.998252,2.118113,3.734366,2.968102,3.049457,0.968807,2.749530,1.762442,4.744115,4.531405,0.318080,4.907727,1.052738,2.814746,1.014229,2.544798,1.057231,4.563925,2.663425,3.847544,0.664363,0.408589,3.484984,1.919353,4.330233,0.617153,4.471062,3.140955,3.118507,0.661636,4.334708,4.016943,2.776229,3.912274,1.518195,3.802794,0.126485,3.198578,4.236878,0.879229,1.606537,3.818095,3.423785,4.919911,0.979567,2.605721,3.015992,3.189707,2.689983,0.500976,1.705124,2.736604,4.958241,0.422728,3.378007,4.233264,3.916333,2.274939,2.112538,3.768250,2.562209,0.222119,3.901454,2.049808,1.548085,1.146032,0.809825,1.799910,3.316521,3.058453,1.263491,2.490962,1.123739,2.264456,3.030825,0.242144,1.372716,3.080115,1.398593,2.471864,0.352088,0.930474,4.582024,0.513872,0.727691,0.184839,2.078689,2.658328,4.663423,2.613017,2.374007,4.805337,1.213882,3.418923,1.805053,1.495626,2.345199,2.200465,0.167590,1.193477,1.623590,1.396173,0.824546,4.725249,2.735375,3.303098,3.164352,4.727537,4.865553,1.269146,4.305211,0.606120,2.244350,3.202956,4.734583,4.140591,0.755971,4.815986,2.681993,3.573753,2.017398,2.304475,0.052424,0.765981,0.164058,1.143976,2.496232,1.476947,3.238574,4.675890,3.584951,0.911173,1.345928,0.725077,1.122412,3.736175,4.453052,3.700395,3.307636,4.836265,2.178247,4.748943,4.642815,1.718950,1.031224,0.518793,4.941465,2.655236,1.188633,2.947007,2.228921,3.872841,0.729994,4.497309,3.950781,3.710123,4.593153,1.595843,3.617298,0.290600,1.790542,2.698085,4.658964,3.908578,0.548666,3.839196,0.632869,4.091902,4.062289,4.575657,4.989308,0.298659,0.116405,3.384196,0.631772,3.798737,1.156805,0.128719,0.255473,2.108858,4.367081,4.960027,3.760794,0.432366,4.957352,0.363819,0.962439,3.973305,1.095565,2.221841,2.164362,1.179371,3.462564,0.915485,2.614105,3.937923,2.249618,4.590532,2.909242,0.652486,4.098492,4.294115,3.107098,3.917049,3.718580,2.515568,2.809837,1.952232,3.471053,1.282300,2.678943,2.333663,0.605422,2.578700,1.818151,1.690181,0.479179,4.311053,3.643404,2.810285,4.154516,2.640110,1.376596,3.758420,1.918810,4.624600,1.629053,1.377195,1.588101,1.802324,2.320474,0.174632,0.280785,1.930726,1.480935,3.109615,3.102892,0.406359,1.136255,3.142121,4.487758,0.174452,2.161130,3.762234,1.817308,3.746424,0.944302,0.672385,3.506422,1.086976,0.198617,3.307665,3.640055,3.952382,0.106124,3.219514,3.733187,2.923258,3.767696,2.398511,3.806494,4.305420,0.004080,4.658516,4.301625,3.847710,1.185581,1.957045,3.477100,2.177035,3.760548,4.299675,3.036150,3.467480,0.554689,3.035177,0.444028,0.108235,3.688795,4.241859,3.471040,3.215261,3.424895,4.809112,1.452481,3.458491,2.219155,2.133023,3.618905,3.052763,4.140353,3.685715,4.153082,0.471383,2.867859,0.890193,1.845380,3.340617,0.159670,0.001725,4.805153,2.230819,0.251258,0.264310,4.761787,4.866362,1.729663,0.904885,2.159009,0.155365,2.821000,1.377506,2.370259,1.385238,2.060358,3.810394,1.907745,0.928695,4.557615,3.523245,0.540097,1.385953,2.413317,3.027351,1.811036,4.240294,1.848835,2.907247,2.043429,4.698514,0.981046,3.510540,4.016081,3.666177,0.596938,0.395618,4.491847,2.831151,3.694056,4.424928,1.234782,2.386446,4.738038,2.043258,2.402130,2.285519,2.742366,4.240149,2.031771,1.770424,3.134875,0.536091,4.745964,0.941656,1.813316,3.718899,2.909050,1.074470,3.456600,4.358846,0.490858,2.533802,1.417200,0.861149,2.856554,4.908663,4.653072,4.599517,4.491588,4.049227,3.601727,4.412932,0.170373,0.845976,4.164766,0.800397,3.008574,0.858921,2.707724,4.700474,3.050185,4.881734,2.061487,2.151518,2.452998,2.481293,0.682052,2.480654,4.033465,0.306515,1.706046,0.470855,0.072746,4.224933,1.719000,1.513533,1.039919,1.493907,4.906597,3.720035,2.480880,1.052349,0.092967,4.774962,3.543051,0.591831,0.903422,1.082005,1.025771,2.607604,1.999980,4.149154,4.765646,2.692276,0.697411,1.515250,2.944738,1.362027,4.012022,1.416747,2.854365,1.499411,0.332366,1.238828,4.795314,4.393460,1.668283,3.702743,4.164981,4.504386,2.246174,2.677467,1.751609,0.979612,2.015006,2.831982,2.990841,4.582538,3.239148,1.757062,3.327260,2.057277,0.744759,3.875661,0.794228,3.969535,4.287659,3.691236,3.118004,0.285021,4.667204,0.355728,3.972222,0.691504,0.163856,4.650472,0.930317,2.686391,0.567378,3.181294,4.341517,1.140152,1.499208,3.108285,3.052261,4.033696,4.128705,0.052090,4.144991,3.074072,1.485805,0.032113,2.298138,2.931953,1.863692,3.729451,0.386086,0.836833,4.333498,4.608439,2.250086,2.783325,3.446385,2.071994,3.899905,2.626173,4.221230,3.366203,3.706020,0.294120,3.765115,2.346470,1.673792,2.155450,0.868951,0.011569,3.346921,4.152125,4.652268,2.658081,2.516752,4.302142,1.878394,1.592102,4.361916,0.839289,3.928022,4.364852,3.855483,2.383562,4.598023,0.681999,2.175251,4.807630,0.566360,3.822633,2.029270,0.189105,0.262040,2.152221,4.291301,3.906398,2.983608,0.004538,1.924593,1.820390,0.272925,0.876509,4.219365,2.760267,0.622820,0.273284,3.551584,1.853229,4.781362,3.705461,2.916528,3.884010,3.960772,0.853996,2.743208,4.097443,1.775015,0.459097,0.916454,2.994713,4.486543,3.149536,3.334500,2.596080,0.299237,4.004616,3.029565,3.551561,4.352194,1.291433,3.726610,0.560508,3.902674,0.512461,1.564284,1.482388,3.325233,3.895982,2.043801,3.750099,3.681629,0.239339,3.108328,3.996497,2.817536,2.498657,2.482748,0.190400,4.164982,1.092698,0.641377,2.969439,3.822661,1.339719,0.504905,0.758241,1.091483,0.565966,2.737318,2.241458,4.933250,4.880065,3.024432,1.500000,1.840245,2.554699,1.847666,4.777577,1.080949,3.797621,2.551576,3.192399,1.523801,4.870732,3.741081,1.793858,2.662317,0.569993,3.693965,4.480988,3.344556,3.690103,0.603816,3.354918,1.482253,3.927735,2.562428,3.594640,1.384687,4.520626,1.349883,1.002804,1.282606,4.433059,1.904625,0.170341,1.049815,3.499338,0.256807,0.518344,1.372616,3.081791,0.002332,4.160810,0.606184,1.135961,4.405122,4.849064,1.560929,2.885484,3.858029,3.677022,1.510769,0.111176,0.080230,0.579342,2.758514,4.772257,4.764414,2.433538,2.470228,0.177962,0.136433,0.641000,0.509688,2.753496,2.181556,0.075867,2.949688,3.883862,2.900338,0.002845,3.230776,4.843306,4.459387,4.522291,4.812893,3.983118,1.812324,4.928240,2.592587,2.608726,0.991689,2.680571,1.411412,1.357366,4.301528,4.779601,3.388330,1.943499,1.522844,4.277511,3.454590,0.887210,2.420308,2.881264,2.595893,1.000237,1.584468,2.814263,3.393955,1.588631,0.311786,2.307173,3.962442,1.755123,0.978407,4.475356,0.178260,1.097742,0.075906,3.429578,4.798220,4.928197,2.744561,4.149499,4.139954,1.035606,2.591916,1.422603,3.867637,3.855960,1.392889,4.342050,1.946263,0.695206,4.607266,1.260188,4.190834,3.686724,3.902118,3.487517,4.292489,0.908035,4.930050,3.077782,2.777541,4.712595,4.713678,4.820992,4.541786,2.771078,4.969504,0.355972,0.173944,3.808528,4.028317,1.835111,0.338015,3.170783,0.703517,2.558955,3.886990,2.843544,2.643705,3.172404,0.398396,1.777517,4.221025,3.873303,4.418472,3.780032,2.350563,1.621832,2.668683,1.983795,4.787095,4.826565,3.299588,3.118179,4.559194,2.785064,2.429321,4.356691,4.276293,1.918074,4.863611,1.537617,3.196957,4.256739,2.929820,2.968315,0.492257,1.594697,2.086986,1.857363,1.533042,0.105976,1.616682,4.292899,3.594255,0.528968,0.524190,2.540748,2.981079,0.302965,4.081865,0.642008,4.392683,4.195145,3.481556,3.427796,2.763831,2.212585,3.393974,4.366122,1.051957,3.609553,0.983803,4.479011,2.936070,0.578774,0.011102,2.330513,3.225111,4.842968,1.818614,0.256724,3.007069,0.838512,4.895423,1.939841,2.724738,1.313105,4.529336,0.364538,1.216180,0.203346,4.701155,1.763408,1.568190,4.170066,4.419568,3.160573,4.308543,4.732784,2.154832,2.629503,0.926106,4.469786,3.171217,4.669712,1.885865,4.875683,2.812898,3.653748,3.166788,0.224031,1.390276,4.670540,2.845916,0.471631,3.196595,1.913113,4.100821,1.099579,4.973221,3.985047,0.345650,1.087053,4.250709,1.176995,4.912394,1.953308,0.035070,3.453910,1.957344,2.996035,2.518885,1.949846,4.133060,3.873840,4.833407,2.326670,1.588708,3.850906,2.079404,0.254224,3.805164,2.468849,3.165705,4.492063,1.079656,0.139107,0.432729,2.152563,0.921217,2.962263,3.822610,3.242309,1.771149,2.124015,0.542649,4.314980,4.049905,2.365244,1.163447,1.010085,4.845853,0.420459,4.965320,0.340684,4.707919,4.221545,1.087241,4.112091,3.397182,0.067881,2.917129,0.231218,2.645676,1.450954,2.240252,1.534625,1.545961,2.013366,1.232272,3.438941,0.824172,0.411050,0.230784,0.029211,1.009858,3.444794,0.269922,4.362256,3.183484,4.565607,0.119997,3.405594,4.930594,1.883889,2.129808,4.066460,1.895835,4.162267,3.011781,2.018584,0.729821,4.798064,1.267446,1.102721,0.411051,3.134476,1.908858,0.632687,3.331620,3.518791,0.625725,4.117316,4.022729,4.745812,0.572363,4.228309,0.372427,4.412529,2.900647,4.734461,0.900270,3.860163,3.044350,3.352765,1.968781,0.897248,4.984210,4.155589,1.456436,2.529652,3.513622,1.139341,1.502995,4.541170,2.036503,2.025368,4.909309,0.736966,0.548716,3.182423,4.115858,2.294421,1.980364,3.998555,3.032355,0.262773,1.065891,4.040539,0.251776,2.544652,4.027159,4.919601,0.828447,4.961356,3.506207,0.593386,4.761566,4.228997,3.403710,4.403113,4.461228,2.147024,1.605772,3.939219,2.382315,4.643109,2.289332,4.219334,3.690597,2.001189,1.468634,0.905533,4.920480,2.263529,2.364135,1.535246,1.877158,1.217766,0.812959,2.354539,4.731276,4.081291,1.782125,1.466886,2.984929,3.887170,3.092069,1.975554,1.636684,1.071786,2.111840,1.540850,2.318026,2.185918,0.913835,4.657029,3.817428,1.036229,1.972805,2.711784,0.195183,0.852976,1.265458,3.015745,4.084417,0.849741,2.818359,0.547990,3.825548,0.425278,3.933656,2.654433,2.442124,3.333295,2.861826,4.515706,2.348926,0.249788,0.820553,2.672922,3.101821,4.303678,0.327844,1.152639,1.507591,4.216329,0.915924,2.533093,2.610417,2.876308,0.821849,4.141118,2.920147,3.207375,1.230266,0.400638,3.360255,3.773499,3.289450,3.511197,0.206796,0.898684,2.877823,3.284990,1.042458,3.248336,0.068595,0.595836,0.214144,4.269264,3.362602,4.991366,4.294714,2.472020,4.417508,0.462492,4.305261,3.320837,2.733468,3.156115,2.416715,1.034095,1.413195,1.920443,4.160468,1.999859,0.370810,2.870528,2.031151,2.081114,3.694931,1.508798,2.286944,4.250420,2.413056,3.692208,1.841920,1.901746,3.524506,2.775631,0.797409,1.883227,3.610025,4.446240,4.669780,4.108947,2.350800,2.170930,2.552409,2.849138,1.343653,3.375343,3.589537,1.280995,1.699259,3.063080,3.330910,4.751256,0.965054,4.406017,2.656105,4.340287,3.887795,4.846606,4.628571,0.846378,2.899820,0.142817,3.441421,2.707528,0.713907,3.332031,1.835447,0.472958,0.014958,3.031599,3.950551,2.369972,1.819593,3.780152,0.031634,4.031247,0.731565,1.467099,3.069187,4.029949,0.735402,3.301458,2.042379,1.281921,1.968708,1.923190,4.178529,2.684953,4.208273,0.830072,4.187979,1.554509,3.583145,2.494714,2.993724,3.212789,3.200686,4.666845,3.402877,2.880579,1.352258,4.169617,1.456689,2.320353,1.931049,2.586175,4.842593,0.216941,2.617774,1.024635,0.635451,2.500594,2.682060,3.491930,1.416779,0.070977,2.117459,1.485127,4.735693,2.247909,4.012196,4.857090,0.350723,3.346399,4.106390,0.044955,0.423074,3.134590,2.770739,0.485606,4.842493,1.417404,4.379334,3.522869,4.396983,2.998723,4.420362,3.501291,2.302983,1.147056,4.679681,4.003449,2.641198,1.223408,0.984603,1.793352,2.063360,4.061643,0.693151,2.747955,1.367505,1.212542,0.491195,0.762738,4.842332,0.455972,0.592050,1.766390,4.720928,2.882299,1.135049,4.609573,2.224503,3.336413,2.365258,0.025494,0.255125,2.743513,0.404554,4.199369,4.159535,3.159152,0.149466,2.934294,3.736134,0.285078,0.103799,0.026732,0.010054,1.057215,2.807566,0.074191,1.344950,3.927342,2.047181,4.326106,2.467691,2.629820,2.003493,4.406097,1.393448,1.317689,4.695262,0.711983,0.031736,3.452401,0.580603,2.668013,1.299145,1.631188,3.700292,4.483235,1.134014,4.409334,3.903450,0.505457,3.714773,0.409196,1.029745,4.378268,1.427478,1.490394,1.598246,4.934344,1.572580,1.470580,4.737068,1.119134,4.247497,1.472886,0.880498,0.130905,2.018284,3.222355,0.534553,1.938161,3.326728,4.309102,0.144544,0.287763,3.744607,1.089085,2.535152,0.078641,2.547111,2.859327,4.748442,2.759309,3.830027,3.299299,3.738381,0.076611,0.863640,4.749186,2.176443,1.451102,2.326326,1.538929,0.251020,4.479342,4.296798,3.339682,0.349975,2.366854,1.235140,0.816356,3.784465,0.250094,4.346667,3.729079,1.733169,3.122028,2.215546,3.869077,4.048925,2.810836,1.709694,2.069241,3.213559,0.415361,4.425758,1.275074,4.952371,1.392986,3.008515,2.009369,1.368995,3.443523,3.180014,3.396190,0.808829,2.925994,0.599731,0.912307,2.683497,0.570074,3.259588,2.437381,0.348739,2.499699,1.696420,4.736884,1.629281,1.437108,0.493523,1.208223,0.408299,3.471115,4.080511,3.432581,2.038279,1.622273,1.581066,4.079369,3.905495,4.562795,0.926364,1.806741,4.270054,2.173680,3.329488,2.552769,3.012870,3.889142,2.343155,4.298627,3.465229,1.187332,4.189649,1.612643,0.810537,1.657629,3.859631,3.670005,4.030600,3.283433,1.216945,0.013759,0.267071,3.810712,4.803021,3.301004,1.292381,3.926255,0.088341,1.720476,3.565121,3.505246,4.369085,3.406437,4.840570,0.463322,1.315399,1.517752,3.653433,2.438363,0.950383,4.555325,0.536326,0.648363,4.897115,4.260380,3.355272,4.139533,0.354529,4.707383,2.154945,0.229395,3.701849,2.920457,0.792496,2.160091,4.090734,1.038236,4.327885,2.829471,3.553170,0.180667,3.841180,4.641972,3.034990,1.027769,3.249046,1.610321,4.122828,0.883209,0.733606,1.826384,1.979259,2.397333,4.939945,2.442024,2.073994,1.011280,4.815831,4.288625,1.711003,0.492029,0.449831,3.995482,0.103402,3.643782,3.604422,2.790720,4.925524,1.195324,2.579025,1.891682,1.300030,2.348529,4.808267,0.914939,4.961315,2.781342,2.322191,0.518551,2.135321,3.101841,1.351805,2.659538,3.190972,0.334170,0.571871,1.148902,0.578294,1.176279,1.373517,2.309456,2.883388,0.560198,2.569001,0.844416,4.247824,3.998664,2.325639,0.489166,1.874559,3.567605,3.355071,4.290116,3.200607,4.996293,1.192198,0.083681,3.455330,4.167561,1.462935,4.460136,2.894501,1.999594,0.444095,1.649649,1.603090,4.326459,1.017256,2.705915,1.819084,3.885190,0.373494,2.668545,3.202624,0.955844,4.835956,1.713903,0.964492,4.066571,3.614025,0.046128,2.901006,2.949452,1.728380,2.213582,1.834229,1.991298,0.528055,2.730812,2.903082,0.115996,1.450585,1.888481,2.134421,0.868905,3.246660,0.974566,2.323623,1.672722,0.287752,1.795095,1.170052,4.017635,2.287671,4.138274,4.221118,2.793027,3.208410,4.320541,1.781195,0.991073,4.876884,2.987291,3.267257,3.371913,1.497655,2.271576,4.511410,2.256710,4.513332,1.532495,1.439425,0.906536,1.222737,2.876109,4.305292,1.730799,4.577574,2.247682,0.909063,0.263122,2.986806,0.743225,2.678506,0.194835,4.425799,1.345167,3.447773,3.066661,3.812584,0.077025,0.429018,4.147281,1.379528,0.433411,0.914875,1.909012,0.249150,3.656200,3.322287,4.571797,0.816510,0.900494,2.157605,0.709173,4.032864,1.047737,0.613367,0.635537,1.544807,4.929474,1.481503,2.732281,1.566292,1.660917,2.887970,0.217471,1.448535,2.650342,2.131066,4.533538,1.353676,1.578311,2.546906,2.688132,2.605094,2.811304,4.810259,2.874497,3.760803,4.198000,4.993265,4.402521,2.003185,4.185547,4.015824,1.456354,2.256297,4.327480,0.671520,4.572225,1.125928,2.617240,1.699005,1.413314,3.423372,3.974140,0.550036,2.073888,2.769450,2.905572,1.980941,2.073417,0.476682,1.252857,1.438051,2.155107,3.502189,2.226037,4.109176,1.429609,3.482633,1.631333,4.590868,1.463960,0.296961,4.895850,4.499221,2.008666,4.445031,4.142720,1.155223,0.838128,0.290290,0.941608,1.247457,0.169549,2.213400,4.218362,3.259307,0.395580,4.222041,4.707201,3.568962,0.184875,3.382824,3.026235,4.347658,2.373911,3.488381,1.422594,1.760207,1.248521,2.517499,0.900502,3.655248,4.559846,3.735630,3.855179,1.385416,3.095970,3.360009,3.994243,4.690820,3.371968,2.166586,1.051024,3.626674,0.709623,0.032676,2.934182,2.322220,2.852933,2.789034,2.883965,2.509397,2.991873,0.665861,3.283832,4.950480,1.341745,0.295175,0.230388,4.819623,1.958067,0.742511,2.496462,4.932835,3.436761,4.289712,2.524970,1.981042,3.659073,4.055181,0.884279,4.526573,2.140343,0.470448,1.185287,0.287346,1.896933,0.113169,4.150699,3.650707,1.585733,2.034762,3.981387,3.539982,3.567874,4.620974,1.319642,1.739425,0.638942,2.085246,3.396647,0.495308,4.026770,3.714259,1.034328,3.011615,4.265201,0.025325,0.911058,1.213476,3.365281,3.075599,2.042436,2.155541,3.616127,2.853986,2.294406,0.090708,4.608714,0.792765,0.213122,3.652332,4.078674,2.037735,2.891314,1.435153,4.833338,3.370268,1.098260,1.858688,0.216983,1.947170,4.778346,1.099238,2.774657,4.394049,4.562131,2.430730,3.814521,4.607998,2.187794,4.514185,4.405970,4.643137,4.574773,1.549470,0.239588,4.495795,1.992647,3.132845,1.653838,2.445970,3.850903,4.175092,2.250693,3.239440,4.164212,4.119381,2.661111,4.218306,3.391596,1.885858,3.960113,1.961036,0.336127,4.586360,4.692722,4.888247,3.285049,3.413075,0.432076,3.775538,3.118698,3.560175,0.637360,1.351536,4.493657,4.214899,2.742154,2.995666,2.733311,4.295205,3.030765,0.719508,0.248674,1.025555,2.217933,4.462979,4.458527,2.826777,2.670193,4.270150,2.505636,0.813507,2.813037,2.173799,1.676321,3.377255,0.027246,1.909999,1.233367,1.500380,3.796204,0.509876,0.169951,3.118185,1.832932,3.251991,1.837288,0.447642,3.831609,2.446193,0.943288,3.374976,3.244397,1.972702,4.742076,2.503453,3.539023,2.202543,4.939701,3.338717,1.943117,0.122491,2.985707,0.085255,0.972181,2.438773,4.200219,1.837450,2.533283,1.766579,3.065723,2.167600,1.637865,2.154420,3.668105,2.244985,3.779846,0.486132,4.923054,0.901621,1.035524,1.622028,1.008920,2.091188,2.568670,4.130019,2.215687,0.749272,2.310211,1.340762,0.373614,1.013402,0.598885,3.449531,4.125163,3.865587,4.090703,2.570784,2.239538,3.568260,0.119642,4.192118,3.441913,0.081635,1.830456,4.569020,3.262255,1.909571,4.532116,3.130162,2.715647,1.790827,0.731971,0.498838,2.033056,1.172796,0.573196,2.140684,3.603700,3.336962,3.330831,0.673033,1.793033,1.253042,4.121297,2.748855,1.055469,0.511281,4.627208,1.855050,1.321136,4.734559,4.704976,3.390190,0.594345,1.131427,1.498435,0.774591,4.893780,4.273298,3.630845,3.342256,1.303489,3.416786,2.253408,4.351715,0.808075,4.909929,1.551439,1.986945,4.848684,2.912441,1.710312,2.549100,4.255965,0.654721,1.765361,0.672730,1.856953,1.468338,0.697377,3.708731,4.243886,0.635879,2.412448,4.430601,3.717018,0.012423,1.664588,1.347687,2.125509,2.632951,2.345877,3.224439,3.221669,2.116146,4.235773,1.755861,3.472284,2.224202,0.487891,1.180111,1.764692,2.242429,4.172807,1.239522,1.652677,3.512826,0.488251,3.490442,3.485577,2.941277,0.079592,4.493241,3.400445,2.940065,2.062906,2.082595,2.892641,3.549270,2.780369,0.828864,2.653854,3.643068,1.645251,4.420537,2.570031,0.028502,2.514987,4.003456,3.723304,0.507140,4.207422,4.591327,1.568285,1.754197,0.830857,2.269726,2.437851,0.457265,2.184758,4.023876,2.719213,4.403074,0.644687,4.382923,0.024356,1.325774,1.324273,0.425126,3.936177,4.345578,2.397426,2.510675,4.425045,2.452942,0.958886,3.579071,2.866142,3.152023,2.271220,4.385520,0.686504,2.234328,3.325769,2.809739,1.707513,0.496823,3.170175,4.885527,4.094547,2.693311,4.880930,4.807472,4.694504,1.216143,2.825740,1.926648,2.008048,4.260904,0.090528,4.535702,0.723778,0.525062,4.942541,2.368573,2.612969,0.477119,3.285554,0.722863,1.930761,0.670234,3.653136,4.782958,4.523546,3.323971,1.373274,2.587153,1.611300,3.119494,4.461676,3.758661,0.746945,0.218350,2.504639,2.897663,4.046190,2.526505,4.642784,1.643710,1.035260,2.406911,2.188020,3.716556,1.461561,0.779454,3.171803,2.724728,0.056222,2.262737,1.846880,0.274876,2.838697,4.537632,1.959049,4.088333,2.213703,0.724777,4.416135,0.927570,1.071030,1.724809,0.333157,0.335809,3.780254,0.914528,3.762223,4.575966,1.075051,4.112368,4.530585,2.533366,4.692447,0.141577,3.145661,2.470127,3.344988,1.752377,3.503513,4.516568,1.848661,4.769941,4.829610,2.522133,0.033365,3.466270,3.507676,2.048977,0.100190,1.509763,3.626040,3.286474,2.567216,3.926385,2.709499,4.516254,3.475032,1.198932,4.520447,3.043247,4.609877,3.824622,2.840644,3.834582,3.736676,2.254918,3.880564,4.338008,3.239011,4.830185,4.920351,4.742551,4.304553,2.512461,3.923382,0.493254,0.702230,2.239594,4.902884,0.773547,4.659346,3.744706,0.578708,4.004783,3.440825,3.804241,2.177224,2.034256,2.085298,3.060534,0.552049,1.034342,0.802239,1.041280,4.665276,0.280961,4.600847,4.740690,3.265588,4.933232,3.358367,1.346865,0.909622,4.481409,1.833964,3.640321,1.277463,3.029116,0.743346,2.122835,4.976154,4.840637,1.381596,0.956449,3.575717,2.306911,0.753953,2.030962,0.132385,0.754378,3.903033,2.474147,3.901510,0.386278,0.036438,3.820011,2.116801,4.848520,1.652665,1.603910,4.044913,0.941036,2.942967,1.394645,0.185904,4.531021,1.847066,3.950320,4.112097,3.407258,3.132199,0.918145,2.028080,2.560212,4.446482,2.605351,2.425984,1.918555,4.324071,4.668191,0.571881,1.918962,4.773899,2.116783,1.235174,4.023270,2.061694,3.808532,2.982800,1.626953,0.948374,0.694019,0.518475,3.094153,1.517692,3.699402,0.754632,0.011082,1.620931,4.253622,2.812066,1.091318,0.681235,0.037221,2.486630,0.262462,1.018117,2.775014,0.222313,1.149230,0.067871,2.666914,0.632850,0.297879,1.842415,3.579783,4.308580,3.851151,0.914410,3.654383,1.717222,0.952685,3.152037,1.498354,0.013444,4.132017,0.991475,1.213338,2.108917,3.464113,1.788427,4.983510,3.124252,0.561380,2.092555,3.052061,4.881507,3.647986,3.741380,2.625646,4.653045,0.309974,2.731658,1.086176,0.363848,4.605515,4.567030,2.286392,2.396960,0.719365,1.590157,2.598823,0.037579,2.553715,2.670885,3.637934,0.991816,3.850977,4.973209,0.566171,4.273463,1.095757,1.464060,2.260997,1.081813,4.200873,3.351706,1.966783,2.869157,2.986022,3.699633,4.460044,4.002962,3.901538,4.650078,1.584803,3.429584,2.968179,1.514993,0.811087,2.949043,2.486487,4.627123,2.545763,2.772187,3.365280,2.007635,1.981044,2.430286,4.225065,4.967855,0.226975,1.777893,2.732813,1.104626,4.510600,3.631885,2.831612,1.998963,2.349681,2.175871,3.549843,0.128402,1.913683,2.924938,1.201374,4.277918,3.166275,2.294059,4.798165,4.338379,3.071841,3.197476,0.128914,4.870055,2.381656,3.548019,0.713017,0.007137,4.013458,3.063416,3.203565,3.707904,2.946931,4.607309,0.551775,0.396458,2.536999,0.127857,2.225024,2.620203,4.198579,2.903040,4.853422,0.220234,2.117826,1.001447,0.914513,0.697611,2.678986,4.727212,0.808354,3.878857,1.362108,3.703441,0.747486,0.524881,0.176150,1.552621,0.508641,1.862256,0.992190,4.056530,3.432454,3.394304,0.100198,2.555917,0.214455,3.672969,0.130458,2.386215,2.364627,1.958054,2.842933,2.700793,0.969907,0.567586,0.467327,1.820871,3.835721,2.353149,2.778831,3.657794,2.630787,0.428372,3.824940,1.828644,3.324625,2.681324,3.068645,2.070235,2.099706,4.452013,0.665702,1.763249,3.800974,4.175616,3.256418,1.664125,4.565516,3.787736,3.546885,2.955907,2.369607,3.956548,2.394594,2.935915,2.280084,1.628724,2.584637,0.924622,4.108530,4.493237,1.532629,2.852976,0.598253,3.766677,4.860936,4.895907,4.688080,4.004414,2.714550,2.471315,2.482200,0.068836,3.458774,3.505730,0.311021,4.333176,0.541358,4.047731,3.810803,1.050008,0.030593,3.100687,0.186052,1.906295,3.248415,0.252351,1.650605,4.465660,4.096941,2.307382,0.609626,2.843339,1.596184,3.396535,2.520645,2.222803,3.459614,2.082758,3.260881,1.185014,1.421908,0.359974,4.118097,2.495476,3.863512,4.497955,4.888757,2.380623,3.804481,3.056288,4.050258,4.686236,2.596353,1.796252,0.325610,4.825671,2.040552,2.256538,3.915993,4.628304,3.866347,0.613987,4.616010,3.838566,2.932279,2.551214,2.136717,4.929145,3.773994,4.909237,4.087434,2.786210,2.158366,3.848914,3.495484,4.525628,1.835660,3.924409,3.163739,0.088434,1.401119,3.603626,3.264159,3.695709,1.964416,3.392588,4.366022,3.532979,4.455187,0.549960,4.537404,2.324520,0.089872,4.862351,1.597916,0.460177,1.842134,3.160943,2.688743,3.085716,2.828402,2.484270,1.153742,3.790023,1.401572,3.493528,1.422211,0.713933,4.691168,2.611002,3.943648,0.679878,3.851917,3.419943,4.463469,0.493524,3.106227,4.397543,4.892705,0.407621,3.226488,2.172599,3.344946,3.806181,4.338089,3.800371,3.869952,0.353430,4.679078,1.989340,1.880334,3.559299,1.110582,0.581773,1.068421,1.146504,2.410150,4.213395,2.425500,2.161047,1.977638,2.364129,4.341697,0.008861,1.225154,4.203311,2.325434,3.731603,3.357133,3.289845,2.314241,4.943682,1.616558,3.253310,0.896072,0.898850,4.370500,3.968137,4.859377,1.355204,2.697523,1.536290,4.919711,1.897667,1.084161,3.736676,0.796488,2.427792,4.134247,2.859979,4.305162,2.507010,0.425467,4.306063,1.670957,3.493904,3.360485,2.652735,4.356825,4.392504,3.605208,2.214645,0.328387,2.398670,2.906129,0.731971,2.364968,1.995611,0.428658,1.936230,4.794606,1.902300,0.772966,4.555070,0.363089,3.518846,1.825066,1.442110,4.652114,1.532344,0.752384,3.281822,0.330661,0.685544,2.221184,2.034028,3.305971,4.969080,2.581099,1.046025,1.883171,0.700630,1.562272,4.916640,3.534734,3.016693,3.531973,4.115805,0.438811,4.478663,4.629033,2.849236,1.463598,0.223267,2.953562,2.651902,1.781115,0.275351,1.326686,0.883104,1.396888,2.923237,0.110881,3.113296,1.712135,0.547844,1.964338,4.020101,4.975034,3.236498,4.860408,2.304149,2.241166,1.237054,2.207213,4.654211,0.922849,1.719568,2.103501,3.103997,0.590015,2.419235,3.484351,1.356803,2.126125,0.468922,2.534177,0.287096,1.650219,0.949994,1.330519,3.053143,4.938878,1.733934,3.324901,0.274568,2.327858,0.578140,4.772271,3.675938,1.888083,1.563167,3.380770,0.820402,4.263028,3.517265,4.734006,0.397107,3.437242,2.411991,1.724115,3.063671,0.997086,0.795087,4.478795,3.699947,0.893952,4.728321,0.206432,0.643761,4.618374,0.045850,3.598204,3.170563,3.729538,0.292462,1.167402,2.675827,3.578390,3.895924,3.572271,3.873198,0.866885,2.917560,2.897806,3.341259,3.640560,0.449879,0.386836,1.418897,1.795346,0.372422,1.759702,4.213229,0.726857,4.737448,1.600467,2.682627,0.591142,0.117945,3.820255,4.579252,1.956604,0.177116,2.936641,4.125917,1.748099,2.641967,1.760624,4.472311,3.035048,0.933324,2.400747,4.416606,3.485407,3.743265,0.426321,4.857496,3.655882,4.293118,3.794080,3.628357,2.896140,1.122937,0.440953,3.263861,1.057434,1.534586,2.100208,1.242401,3.881474,0.455034,2.910501,1.688590,3.611306,2.356790,1.108627,1.473744,0.315306,0.040723,1.142380,0.317560,1.766916,3.199005,3.437301,2.780185,2.476884,1.547991,1.710399,4.156213,3.243594,3.588693,0.018571,4.643296,1.472781,1.315732,3.990113,2.889129,4.112546,1.733104,3.913752,0.320663,0.007202,3.568679,1.528620,2.268861,4.005928,4.994513,2.636230,0.328246,4.951606,3.912231,0.168701,0.554707,4.761035,4.471042,3.656000,0.020207,2.231033,4.051089,2.846993,0.806582,3.416241,2.028915,0.368739,0.907258,3.199531,4.776359,2.839809,0.557025,0.204066,0.761196,4.302946,4.524620,3.627535,3.090649,0.402394,1.293269,1.103246,0.751720,0.097718,2.549033,4.833391,4.144256,4.036753,3.616979,2.136252,0.524600,1.314716,3.299363,3.362585,4.661696,1.617053,2.572422,1.906427,1.393373,2.915557,3.138146,3.821937,0.788682,1.033249,4.032718,3.478786,3.684127,1.994115,2.262197,1.937909,0.538885,0.946194,2.949864,2.009026,3.112667,4.154024,0.417573,3.994436,2.665341,4.915512,3.256115,3.027801,0.334716,4.751575,4.476172,4.183389,4.242530,2.652035,1.435660,0.664609,3.975606,4.842157,3.400878,3.710718,3.702818,1.681511,4.681438,1.753543,1.206498,2.510873,0.661840,1.681221,1.904377,2.075648,1.007661,4.940096,1.626844,3.885981,2.580279,0.028504,1.579832,1.859529,2.917862,3.715141,3.596886,4.265525,3.799288,2.636325,4.956175,4.016399,1.660693,2.005457,3.165355,2.940898,4.914467,3.107458,0.034986,4.932360,2.633231,3.873987,0.022155,0.877349,3.094620,1.131050,0.279091,3.783737,3.725806,1.495763,0.927973,0.105310,0.275527,1.333604,3.488334,1.810718,3.026005,2.155357,4.448565,1.926086,4.670220,3.374948,4.083779,3.282239,0.202131,1.102623,4.770122,3.318836,4.420490,0.517966,4.462439,4.935837,2.757720,0.155183,3.717804,3.871430,2.872149,4.031822,2.761803,0.436493,4.604845,2.630580,4.536762,4.300921,0.739591,2.054850,1.553914,0.169041,2.528031,0.614381,1.418279,1.117257,0.311867,3.637430,4.682927,3.723771,4.068481,0.111293,2.708275,2.144102,2.319989,3.888259,2.428921,4.394468,2.479784,4.908585,3.665998,3.631514,3.803528,0.262311,2.845737,3.693270,3.884104,2.265293,4.441523,4.540613,3.637287,4.281249,2.176166,0.607800,2.280137,1.347488,2.239625,1.722603,1.655860,2.793846,0.895625,2.094959,1.306523,4.997812,2.075889,2.254332,0.334997,0.314216,2.587341,4.678187,3.630057,4.847619,3.092612,2.763322,1.084985,0.172448,1.675248,1.014131,4.798475,0.183160,0.214752,4.409705,0.569513,3.504380,3.405266,1.791899,3.686167,1.775290,3.153387,4.318531,1.534650,0.264741,0.860521,0.122464,2.568282,4.678810,4.530437,0.492285,1.178113,3.155244,1.719982,1.576082,1.641037,0.024683,0.510842,1.200471,3.260262,4.709013,3.574195,3.967267,1.171628,0.675058,1.918410,0.596142,0.769413,1.597708,4.093117,3.897330,1.798034,3.641245,4.210613,3.517776,1.400210,3.993739,2.626201,3.024879,0.339053,2.375300,3.357223,4.146336,3.127679,2.889080,3.622922,2.937344,2.130868,1.690626,0.592099,3.808429,2.617765,4.584679,3.909220,4.336071,0.222617,0.634641,2.303662,0.700793,3.333010,0.744013,0.756174,1.927854,1.795238,2.594924,1.763847,0.958329,4.190568,0.318054,2.847708,1.971071,4.114896,3.513031,0.066433,1.496334,2.210105,4.219153,0.794193,0.576084,2.131993,2.155982,3.500446,2.788014,0.437372,1.452961,2.837935,1.080691,1.084841,3.742688,3.705303,4.141211,1.269067,3.575490,3.114384,0.683333,3.071138,3.575507,2.646789,4.607615,0.250732,1.789572,0.782427,1.290454,2.284260,4.858476,2.911933,3.037576,4.164944,4.997658,2.449126,0.623138,2.763086,0.262347,3.269189,0.319467,1.816444,0.043536,0.205204,0.882036,4.712523,1.771008,2.914126,2.062936,1.322052,0.793939,3.784173,3.548845,0.903426,0.591502,1.321867,3.032301,1.503465,0.625140,4.313211,4.263093,4.637923,2.014909,1.971293,4.068523,3.851863,4.347947,0.706502,3.638027,1.907155,2.564470,0.193725,2.841734,3.348061,0.238980,4.187418,1.795812,3.285777,0.076448,1.137436,3.447620,1.118884,2.147667,2.186669,4.635733,0.964330,4.414259,3.893472,3.115082,4.152013,3.338640,4.017951,3.380205,3.881507,2.113474,4.222963,1.656552,4.482535,4.114388,2.166686,2.174438,1.974521,4.655310,1.823859,0.042233,3.477222,1.473089,2.750323,1.746280,3.968330,2.690176,4.526269,0.700775,3.187678,4.331401,2.849723,1.538416,0.860139,2.959518,4.969814,0.238559,1.137307,1.627202,0.545363,3.897732,1.051222,2.291883,3.979997,3.050548,0.390961,2.618906,0.754339,1.179345,0.079985,2.573736,4.703279,4.797285,3.955951,2.070329,2.222308,1.652152,1.801996,2.236049,3.859903,1.433541,4.570186,0.456829,4.900417,0.573796,3.417600,4.387168,2.349847,1.833379,4.593000,3.863928,0.187574,1.042897,4.243884,2.953089,2.433848,2.435707,1.319725,4.426216,0.630892,1.068015,2.278350,2.527574,3.434029,2.484626,1.656548,2.459842,4.474276,4.847095,1.530558,3.104489,1.032346,4.666241,1.433007,0.682511,2.096157,1.362907,4.860008,4.308972,3.985412,2.843717,1.086528,4.672879,3.709474,2.678869,0.202228,0.863910,0.529309,3.665330,2.565124,1.216823,2.619446,0.039159,0.685109,1.655926,3.748519,4.297448,1.760587,4.984210,2.387462,3.825350,3.780145,1.249239,4.576652,1.873095,2.413784,2.624733,3.387688,1.409196,2.448003,1.791237,2.079469,1.237618,0.966836,2.780760,2.498659,3.820226,1.056261,2.571000,3.592894,1.831618,3.188617,0.846930,3.788016,0.526154,1.018148,0.101683,2.137053,4.333953,4.429116,4.067081,4.238034,0.729049,4.522177,0.145224,1.536683,2.175071,0.043506,3.817091,4.497281,1.413925,1.124750,4.189352,1.611152,0.585500,4.389093,2.927537,0.176313,2.866081,4.572168,2.196540,0.311156,1.547894,1.906346,0.927836,1.770747,3.398121,4.814085,3.838699,4.407596,3.577905,0.258150,4.852219,3.724010,2.270959,1.985047,4.482344,0.227348,0.542386,1.118670,4.906020,3.149569,3.179284,1.109892,0.254257,0.759830,4.809787,0.213507,1.314616,4.934408,0.320328,1.681108,2.589446,2.755328,4.507469,4.947706,2.249111,0.307870,1.918760,1.212788,0.375933,3.312283,2.209567,4.909924,2.833858,3.318792,3.428204,1.334536,3.306478,2.694178,2.308969,2.898857,4.216944,0.626151,1.172427,0.384504,0.524011,2.096185,0.828726,0.696138,0.654617,0.568019,0.969326,0.085933,0.254493,2.729300,4.464604,0.382336,2.074150,1.713108,4.891933,3.323803,2.105794,0.402069,2.996168,3.331102,2.514516,1.631629,0.966405,3.380562,3.320813,2.856291,0.046856,2.720479,0.922061,0.597843,0.294127,4.629014,3.081295,0.210418,2.184339,4.346411,2.888278,1.230245,1.721107,0.878659,1.660652,3.733115,1.591773,2.578248,0.365704,2.809280,1.622652,3.637450,3.091121,1.763266,4.756493,4.381571,1.385639,3.327934,0.200256,3.130980,4.952459,0.360180,2.782955,1.925595,4.113656,0.538906,4.807299,3.610989,1.425609,1.227387,4.201278,2.401600,0.278772,3.925797,3.131909,2.465497,4.167689,0.371807,2.518688,1.480151,2.558775,2.806207,3.597615,2.144631,4.504685,3.950496,0.040420,0.550858,3.569518,1.483634,0.724059,2.814185,2.969454,4.431863,0.661521,1.999340,2.517675,2.437390,3.094454,1.947350,1.162113,2.751228,2.031862,3.233262,2.920561,0.236032,3.906746,3.169763,3.616467,2.776372,0.287930,1.422165,4.450774,3.118894,4.942346,0.263191,0.410285,0.783465,3.227481,0.216553,3.214083,1.352066,2.690707,4.228741,3.559141,3.918622,0.860410,2.293402,3.191065,2.751095,2.050585,0.630083,2.411147,1.658529,2.731925,2.006788,4.429166,4.977480,0.653677,1.590125,0.725648,2.276715,3.861261,3.065634,0.937129,1.613499,0.611665,1.433736,1.174117,3.013528,3.200516,4.837240,2.220873,1.016463,2.002688,0.885613,3.088865,1.779000,1.642951,4.388189,2.901209,0.121296,1.833557,0.597065,2.264601,0.532531,4.999278,4.791303,1.673872,0.492887,1.202614,4.271773,0.905182,3.001521,2.887947,4.490038,4.733222,3.451546,2.604440,3.173372,4.611818,0.626518,2.343188,1.920533,3.318936,2.644677,0.824896,1.533439,4.572899,1.243567,2.912326,3.084081,4.555005,3.641630,4.310914,3.616435,0.525916,0.128502,3.582277,1.322716,4.138581,2.848955,4.976784,0.808438,3.659358,1.622829,0.837337,2.324130,4.095908,4.969708,0.869265,0.679243,0.683809,3.955527,4.603273,4.067217,4.034101,2.955960,2.865902,2.733988,0.713532,0.657749,1.891241,0.523340,0.415643,0.294277,1.954702,3.778754,3.631744,1.413739,0.311243,3.789266,0.519445,1.599815,2.018207,2.398838,0.212353,3.348151,0.900761,1.422618,1.959418,0.195729,2.314473,2.814973,2.548998,3.320134,1.005132,3.843897,4.094334,0.426563,3.234750,0.470999,3.482969,0.751081,1.266116,3.189049,0.658271,2.149999,0.028549,3.012501,4.305556,1.427791,3.879975,2.426044,0.144276,0.671939,3.128448,3.936055,3.906524,4.291454,4.823975,2.210105,4.798614,0.133667,1.300039,2.111471,3.481660,1.473704,4.838905,4.098591,2.407513,3.961391,3.645874,4.960164,2.985158,0.131392,0.949690,3.371079,2.111625,0.594758,1.997478,2.309485,0.942660,1.372869,0.259014,2.877217,2.915842,1.302904,0.153966,3.666962,0.550721,1.466236,1.939972,1.691397,0.063084,1.459615,3.686992,0.708997,4.890635,4.648678,0.643423,3.392809,1.763535,1.122857,2.739121,3.778651,2.472626,0.601145,2.111282,3.251241,0.547322,1.844162,2.230094,2.524307,4.623786,3.863634,1.403040,3.104114,3.365795,3.493680,1.325446,3.444355,3.118807,2.254857,0.531139,0.313455,2.657263,0.756706,3.772634,2.882197,0.564207,4.417247,3.811251,0.129660,3.256778,4.026124,3.005795,3.411480,0.618287,0.343808,1.620786,3.028956,4.141649,0.433977,4.554936,0.413259,4.206473,4.627804,1.287580,1.336233,1.069757,3.911700,0.042711,0.572733,2.005554,2.679718,1.348846,3.143944,1.376684,1.107517,4.021255,4.722230,3.549459,3.135103,1.448067,4.135568,0.138265,2.252974,3.856901,1.725928,1.683837,1.011381,4.581572,1.544133,4.009997,4.212140,2.796159,2.857010,4.699417,2.747513,4.140423,0.712530,0.018324,4.497476,1.507814,3.163062,2.538595,2.929259,0.094971,2.852819,3.904040,2.934968,2.170551,2.886694,3.451632,1.380651,0.256497,2.080016,4.908245,4.158923,0.842872,2.530066,0.912830,3.744016,0.994517,3.153355,3.521223,3.656795,3.859876,4.546857,0.218534,0.218774,1.732185,3.283721,0.611000,3.094934,3.554632,3.494689,3.560579,1.176014,1.885678,1.580688,3.752135,1.299228,3.567480,3.273840,4.176115,3.418513,1.347606,0.012922,3.127074,1.874598,2.866795,4.534932,3.480658,4.968599,3.179619,3.111868,3.129108,3.506504,3.849522,4.658017,4.472213,4.693558,1.179912,3.490710,4.042155,3.466316,4.025375,3.362146,3.572945,4.061051,1.627636,4.232240,0.878268,2.138144,1.784828,4.545163,3.543320,4.710022,3.900966,3.341552,1.180604,2.741250,4.133963,2.639842,1.892866,0.216843,2.503544,3.857604,2.302248,3.427630,1.891864,4.847027,4.964362,3.000131,2.654899,4.465309,1.371442,0.050820,2.851724,2.581442,4.388647,0.927836,4.554315,0.517450,2.274341,3.133748,2.753925,0.324643,1.098908,0.081268,1.611250,4.124833,1.138179,2.657561,0.147866,0.285281,2.982413,3.193453,3.801853,2.911762,3.001671,4.922024,2.296180,0.175465,4.028840,0.307401,1.158422,0.428886,3.968180,0.314641,2.650322,4.588076,1.975833,0.905234,2.890545,1.321927,4.471709,1.391594,4.167694,1.113397,2.902056,4.378059,3.332708,1.317733,3.034662,2.359326,1.895803,4.226475,4.329097,4.298664,4.785536,3.931115,4.828719,2.718890,0.246032,1.756074,0.696121,4.865177,2.374857,4.502463,1.989154,2.372901,3.196574,2.883826,4.101575,1.844513,2.368577,0.500997,3.399970,2.152965,4.145220,1.078191,3.548833,0.100272,1.869607,2.914845,2.987508,1.552401,3.604573,3.882633,4.161809,4.609716,2.433791,3.386165,3.088940,1.023778,4.076494,3.432280,4.202026,3.633651,4.741774,4.989893,1.944843,0.627305,0.773148,4.157128,3.979632,0.422620,4.600657,3.826925,0.033832,0.247191,3.746768,0.710050,4.833171,1.614030,2.137890,3.207081,1.400302,3.554005,3.570830,2.183686,0.303121,0.395974,3.345134,0.384506,0.851250,3.517296,1.806438,3.613615,4.367961,1.699767,4.171537,2.041871,1.382453,2.723415,0.479153,1.089981,0.938562,3.864371,4.068894,0.288461,4.099135,0.740282,3.643173,0.802952,3.585776,3.814141,0.285665,0.604540,3.702172,1.505750,3.973699,0.117073,2.205234,4.235098,2.389183,4.883928,0.378660,1.529255,3.070819,2.508817,1.098044,4.254278,3.922280,2.166753,1.837333,4.988637,2.886486,0.526591,4.867709,0.090323,2.527332,3.941581,4.850285,0.400443,4.248085,0.119407,0.473258,2.633249,3.810832,0.067143,0.344381,1.979768,4.191250,1.819814,4.518043,0.519199,4.797684,4.801820,1.741635,1.325726,2.351775,2.693018,1.902512,0.268144,3.408705,1.201945,3.488067,3.805107,2.815149,3.652988,4.691985,4.630804,2.050658,4.170675,2.730172,1.100640,2.761737,2.590902,2.504409,2.474341,1.101983,0.258464,4.879970,3.587057,1.615234,0.070845,1.210326,4.601823,0.056644,0.927079,4.340221,3.917028,1.576162,1.964237,4.087340,3.862077,1.283171,0.088597,0.909454,1.940020,0.758824,0.237641,0.527172,2.562591,4.077117,2.051984,1.331482,2.846048,4.246115,3.949206,2.294459,3.004489,0.594763,4.130319,1.554631,0.171414,2.573389,0.447860,0.322459,3.554536,0.366707,2.301423,4.163423,2.168416,3.517144,1.310151,0.895102,2.590433,1.687509,0.120114,4.057349,1.269079,4.553997,2.992680,3.423613,1.067721,3.614890,0.918948,1.735575,2.066735,2.395699,4.037403,4.935260,3.961331,4.710426,3.799017,0.234395,2.224135,2.543326,0.180783,1.418010,2.175977,0.305734,1.387591,1.444271,4.281154,2.383542,0.885050,1.582743,0.714947,0.226195,1.489424,3.216699,3.241537,1.259416,1.339143,3.587177,1.190557,1.409643,0.364703,3.116795,0.517675,4.196394,1.787347,4.839211,2.386509,3.945027,4.448233,0.640645,2.548084,2.400929,1.123903,0.905267,2.502206,0.976344,2.634612,0.521644,0.027659,2.412473,0.049259,4.115762,3.627097,1.047192,1.383311,0.511024,3.940963,1.241980,2.135210,3.004829,4.028887,2.446521,3.646608,4.571267,2.331244,4.997178,1.065689,1.647620,4.248970,2.144745,1.221176,1.190819,2.531402,3.277099,0.241012,4.947139,0.514521,1.462075,4.551965,0.847525,0.112407,4.287550,2.641153,4.863670,1.428609,2.716020,0.170931,0.223992,2.218550,0.508430,3.268010,3.754850,2.820536,3.966585,4.950560,1.564901,0.952383,1.688654,2.110536,1.260251,3.586398,4.347820,3.067162,3.698635,2.261091,1.128850,2.495129,4.883878,1.448492,3.532450,0.616375,0.014849,4.698972,0.843485,2.430876,1.190972,1.974943,2.127116,2.187543,0.344493,3.787859,4.146249,4.479812,2.487381,0.019948,0.422354,2.245112,4.650657,4.574235,2.819393,0.332657,2.140455,0.003874,4.437187,1.016682,4.404489,0.524055,4.762677,3.474544,1.717780,3.944489,4.153693,3.510964,3.014159,4.989097,3.019040,1.542933,2.492435,0.396626,2.655670,0.451047,3.760135,1.115414,1.517763,3.633031,4.758024,3.143354,2.966588,4.247063,4.344709,2.572100,2.865798,2.817865,2.037660,3.635623,1.021691,2.439317,0.109629,3.985279,1.496735,2.743757,4.783843,0.219653,0.456818,4.252731,3.029279,2.197225,0.872060,4.585059,4.499574,0.950452,2.219555,4.516813,0.541612,3.409358,4.113904,0.453425,2.034505,1.875566,2.932476,1.021187,2.405597,2.993053,4.937439,1.145629,1.489493,1.103985,3.540693,3.329872,3.853770,1.498460,3.277361,2.319957,3.668596,4.349790,4.207037,1.835446,1.899846,1.597288,1.007942,0.342113,3.523321,4.216234,3.984738,1.572230,0.318087,4.742114,4.231365,3.858634,3.654796,3.964945,2.779939,2.320901,2.962225,3.108922,0.629115,4.459206,0.161454,3.544194,3.341523,0.691162,3.385847,0.962440,4.005133,4.548107,4.889561,4.821360,3.155437,4.537661,4.969985,2.420468,2.306516,2.968195,3.266499,1.548200,3.154455,4.211807,0.415514,0.723135,0.417116,2.648601,1.811240,2.951907,2.447483,0.516615,2.891537,3.730753,4.121656,3.186013,4.464427,1.986661,3.400860,3.387669,2.885309,2.317805,2.379202,2.665048,2.525980,4.828984,1.131169,0.905707,1.705824,4.880251,2.680281,3.585808,3.230623,0.660779,3.958111,2.205309,2.925007,2.470238,0.878949,1.551659,0.607544,2.635823,4.016515,3.741066,2.435594,0.562405,0.773320,3.187570,2.696462,4.768090,2.164871,2.548713,0.820657,0.621423,2.695121,0.724304,3.143240,3.115245,1.369914,0.379652,4.621414,4.573547,0.304726,0.661484,4.149873,3.989795,2.838238,0.378640,4.275115,1.181865,4.254552,2.076037,4.245440,0.209742,1.639784,2.436454,4.533921,0.834958,0.685098,1.035687,0.446359,1.156435,0.788432,3.840961,2.448404,3.486687,1.387469,3.591247,3.829015,1.426541,4.551955,3.137667,0.727873,3.091514,0.425090,4.927934,3.652256,0.606068,4.907426,1.090908,2.238095,2.803060,1.938719,0.670796,3.278292,0.752700,2.410731,4.821502,2.555380,0.478177,4.178351,1.088074,3.954117,3.134750,4.608150,2.883716,2.432046,3.233400,4.220803,1.506749,1.838621,1.072788,2.946861,4.781144,2.098095,2.428416,4.364411,2.441707,2.964024,3.870813,2.905463,2.506896,0.103598,0.567247,3.433558,3.422474,2.517079,2.937070,0.650992,4.302299,4.504502,1.705994,2.233947,0.757251,4.680828,2.396434,3.282684,2.054648,2.609166,1.820456,2.583720,1.978341,3.654274,3.636440,4.114327,2.988946,0.160651,1.604077,1.541460,4.889390,0.725224,3.872753,4.341526,2.043311,4.735958,2.535761,1.572756,1.131901,2.573119,4.195759,3.708507,4.941266,3.044115,1.666242,2.239677,3.554936,3.853981,2.494318,3.053046,3.109985,1.744472,4.692142,0.317461,1.930836,0.445366,0.746436,4.933182,1.855904,1.034238,3.523443,1.605286,0.798620,2.580709,0.784173,3.470085,3.962055,1.718333,0.539003,1.546064,1.845363,4.319253,3.907799,1.905772,1.506882,4.441369,3.080360,0.027007,4.982035,3.508600,1.141583,2.606736,2.029108,1.716996,4.448181,3.226077,0.811936,3.753019,3.117960,1.747042,4.293477,3.933541,2.193985,0.353358,2.909628,0.759107,0.650127,1.624449,4.016657,2.549610,3.849328,2.631350,1.823138,3.083016,1.208151,2.284279,0.476244,2.570534,1.901086,0.511383,0.265273,2.978950,2.508472,1.575146,2.707973,1.398605,2.418788,0.998099,3.896904,1.735509,3.646326,0.917284,2.620945,1.016390,1.301921,1.712974,3.979297,3.481603,0.243513,3.870984,2.134046,4.146902,0.254418,2.165113,0.013962,0.017941,2.578411,2.839334,2.852612,0.150718,4.031273,2.483305,3.199824,4.449509,0.961059,1.481907,3.096791,2.468884,2.615524,2.021050,2.901511,1.119474,3.559588,4.793960,4.007392,0.775394,3.745039,4.627614,0.568464,0.925859,4.581639,3.304121,2.858430,0.477923,1.363815,1.848069,1.057361,3.236371,2.378365,2.908532,0.340105,3.445815,2.025046,2.154646,4.421534,3.612860,0.005496,3.983059,3.398039,3.734986,3.324521,2.265482,1.945521,2.929103,2.032420,2.669038,1.013698,3.368914,1.031645,3.878062,4.112166,3.717950,2.511650,1.475830,1.959344,0.447453,3.861245,2.848327,4.337593,3.600986,4.372122,0.306783,3.876602,1.847562,2.018978,2.353243,4.931649,3.910227,2.898584,2.291914,2.700917,2.470490,0.473582,3.530792,2.681486,4.382879,4.477978,3.329723,4.828518,3.850746,4.505136,3.469519,0.723594,0.461513,2.300158,2.097894,1.513617,0.749863,4.813024,1.158205,2.490085,4.096886,4.198489,2.585094,2.530948,0.714551,3.974524,0.394514,1.982028,3.052251,4.829756,3.283313,2.439840,1.502840,0.898548,0.047482,4.298909,1.561158,4.551189,2.669544,0.460149,4.075212,1.221685,4.885651,1.056209,3.882940,4.063461,0.814917,2.745993,0.278479,4.718973,0.812009,3.955459,3.068166,1.316788,2.341942,2.961116,2.311108,2.198218,0.498291,1.987584,2.604523,0.794739,2.278690,1.084858,3.711238,2.547435,4.505157,3.502668,2.832791,2.225097,0.355609,2.261891,3.248659,0.848843,1.517045,1.130086,2.306223,4.519036,2.763645,2.042228,2.080173,3.677166,0.463304,1.057850,1.360067,0.755431,1.874303,0.766062,3.961561,3.567416,1.916482,0.482797,0.252136,1.111190,3.923207,2.126187,4.805021,0.526376,2.160764,2.126249,3.631511,2.973657,4.337061,3.982810,2.000048,3.598956,3.603793,3.997081,3.681742,1.404374,0.154755,2.310704,4.322896,1.281175,2.430015,1.797682,3.699040,2.740156,2.030469,3.008158,1.074446,1.690696,0.808729,4.092886,2.582704,0.911759,2.335043,3.868545,3.210328,1.304474,0.774059,2.146925,1.966516,1.849342,3.980567,1.796868,1.303261,4.884052,2.288756,4.194905,3.096128,2.529074,2.557192,0.193199,1.683380,2.834551,0.437209,1.557067,4.393458,4.066471,4.304563,1.370107,4.125874,0.964634,1.957250,1.689852,4.773638,2.825180,2.925664,1.536610,0.163977,3.432101,3.833192,0.327305,0.541193,2.684231,4.794592,3.521749,2.872459,2.073862,4.472405,3.770317,4.783021,1.259874,0.195413,0.132720,2.580994,2.044802,2.261264,1.401976,4.130546,3.114393,4.124821,4.263518,1.215322,2.912916,0.239196,0.474205,1.268128,0.782634,4.809864,2.298122,2.989276,1.046470,1.607862,0.356241,2.592570,3.212365,2.862700,3.936057,4.472346,0.407448,1.542961,4.808453,0.447430,3.133977,0.923841,3.257797,2.674543,0.493502,0.460483,2.965364,1.408740,3.379568,4.211693,4.087985,1.457707,2.618615,4.672565,2.681524,1.918951,1.253828,2.657920,1.687606,1.286064,4.064568,0.658137,3.785587,3.875764,3.221130,1.730674,0.244943,1.689914,4.542144,1.022994,2.842838,1.070844,1.770681,2.168471,0.132881,1.289890,4.273929,4.966102,2.914997,3.894303,4.748204,4.770890,2.524305,4.934890,1.629098,0.283566,4.342482,1.289090,0.317329,4.609574,0.768574,4.914659,4.853461,3.197858,1.408809,0.775566,1.459491,2.723167,1.204144,4.174221,4.468551,3.273549,3.395824,2.620080,1.119907,4.436746,3.643060,0.217324,1.579824,1.253900,2.220099,4.216479,2.638426,1.324333,3.946150,0.925984,3.117702,1.564207,1.284544,1.370226,4.360130,3.584764,2.795628,3.153228,2.220336,1.922497,2.678328,3.346649,0.660678,4.649577,3.182259,1.361195,0.411703,2.867764,4.503160,1.799358,3.898982,0.557112,0.368545,1.542280,2.962807,2.991455,4.683351,3.366547,3.765408,2.034587,3.700344,4.843894,1.912358,1.192940,3.207791,1.230585,0.042810,4.670537,1.238703,1.232426,2.248024,0.701770,0.761993,3.657107,0.906929,0.138424,4.453589,0.923253,1.038522,4.298283,4.277107,4.564947,3.798845,1.744000,0.497214,2.785424,0.871197,0.622860,2.059129,4.946625,0.281223,2.102742,4.877069,0.010292,4.851281,4.613520,3.508381,3.369780,4.410862,3.125429,3.773414,0.005220,4.487461,4.653097,1.750657,1.716639,2.925918,2.443689,2.393079,0.006090,1.754362,0.433396,3.582767,3.106308,2.385400,1.158854,3.828879,2.362311,4.018414,2.617353,2.513941,1.217430,4.333739,0.559235,1.692738,2.984266,3.982466,2.577853,0.442962,3.297423,0.599574,1.986837,4.498924,0.967109,2.667089,1.489102,0.710759,3.476285,4.566119,1.390577,0.301583,4.836021,3.357898,1.107451,1.010399,2.379797,2.399538,1.967881,1.422020,1.586497,0.350603,1.057835,1.685573,1.046439,1.239589,4.888046,0.895332,1.967368,4.379636,3.310334,4.734269,0.511682,2.455379,4.840705,3.591350,4.237483,1.790732,3.100609,1.971914,4.600490,3.740142,1.826653,1.624136,3.818184,2.701822,0.051675,4.039921,0.432335,1.423724,1.107657,4.633011,4.228952,4.551147,4.530904,4.409943,0.890912,3.822369,1.620924,0.998028,0.879341,3.016468,3.515234,2.704405,2.764743,2.430631,1.926590,3.505623,3.593403,4.549877,3.530235,3.974820,0.876927,2.677625,2.157045,4.877936,4.605757,4.637261,3.189230,1.183064,3.264843,3.874843,0.720717,0.430965,3.412436,0.995109,1.526155,0.470617,3.025652,3.582449,4.194227,3.793818,2.453561,3.479899,2.458003,2.648256,3.590170,2.088744,2.574431,4.867464,2.151369,2.582374,2.227891,0.980400,2.891678,3.661058,0.298216,1.380580,1.171644,3.965468,3.923333,3.259879,0.045462,4.491889,1.332533,2.702233,1.352332,3.163044,0.464131,0.549555,1.163880,4.261101,2.619740,2.552319,2.220165,3.904084,4.135543,1.164032,2.037403,4.659384,0.100881,0.243801,4.011188,2.876291,2.882714,0.726927,1.792373,4.309709,0.830945,1.231838,4.232671,4.157434,0.943588,0.077419,0.225202,2.194273,1.766398,1.364245,0.613532,2.988093,2.348848,2.891291,2.679564,2.232584,4.932556,0.753874,2.214412,1.870401,4.146401,4.774129,3.247317,4.379968,2.205397,2.661855,1.361674,0.914622,3.228956,2.658544,4.133072,3.402172,0.861773,1.413505,4.144405,0.444452,3.227399,1.626904,2.963781,3.438023,4.853207,3.752147,2.612986,4.498085,1.544893,0.217512,2.180898,2.278213,4.287662,1.404333,4.247153,2.251440,4.411679,0.472083,1.484244,2.543923,2.295851,3.672348,0.515489,4.535669,4.267401,0.128943,0.168959,4.822918,1.991756,2.245574,0.622754,0.542194,4.049536,0.668153,4.742232,0.928641,0.039999,1.585447,2.283382,2.485910,1.632621,4.951055,1.734491,0.158264,0.066481,4.073524,2.608134,4.973343,2.186883,0.711461,2.958013,2.093103,1.037126,3.111729,3.178963,1.721852,0.555174,4.632189,2.977148,0.848483,1.488443,4.818595,2.822937,2.825639,2.562321,4.172300,4.854193,3.321176,3.950652,4.538733,1.522901,3.856314,3.645072,0.853680,4.886836,0.314473,2.897096,2.781318,2.679274,2.086259,4.554250,3.078698,0.272643,4.961939,2.376993,0.385707,4.200878,0.609939,3.961051,4.882765,2.688684,2.437626,3.110569,2.165190,1.861906,3.719241,0.271425,2.487974,2.550085,4.405818,4.636252,0.725572,4.434261,1.473414,2.091702,2.509263,4.259740,2.170945,4.476113,4.281046,4.650516,1.613964,0.655230,3.015659,4.997109,3.183656,4.623595,1.649491,2.563231,2.081049,1.678820,2.734672,4.921831,1.336466,1.363722,2.549813,4.577877,4.421762,3.767905,2.697089,2.878962,4.636492,4.262931,0.697054,4.223262,4.641824,4.684250,0.005567,1.075227,0.786897,2.688264,2.741371,4.486646,4.450456,2.950330,1.446389,1.787395,3.114760,0.512139,3.542814,3.745149,4.583828,0.377252,1.820000,3.966832,3.025301,4.244465,1.884888,3.694864,3.979402,4.458443,3.390748,0.345089,4.306633,0.353491,0.141958,1.463450,2.937037,4.680822,2.605504,4.501622,4.001330,2.390226,1.275804,2.615477,2.562914,3.400760,3.360336,2.312105,0.075305,1.521251,0.537109,2.548510,3.740693,1.417440,3.470604,1.921584,3.359347,3.660371,0.497636,1.242833,2.964929,1.452080,0.371558,2.804461,4.973836,1.064414,0.032105,1.143076,0.838428,2.692739,1.609917,1.320883,4.678173,1.095846,0.364453,1.460856,2.358243,0.875182,1.940980,1.721932,4.763891,3.388454,1.922044,2.507977,2.537350,2.604504,2.644817,3.440214,2.267136,3.688475,2.001478,3.706213,1.669418,2.935390,3.961930,3.051277,4.144968,3.472381,2.446686,0.119151,2.741005,3.832510,1.144597,3.172334,0.941455,2.305259,3.406656,2.698135,0.376159,4.655183,1.644817,3.017534,3.954068,0.382318,0.952528,0.277472,0.721972,0.462813,2.250931,0.137915,3.907762,4.975588,3.000026,1.864861,1.235417,1.226325,4.452101,4.211522,4.884005,1.016747,1.946247,0.772323,0.984908,4.129498,2.750781,0.332918,2.514140,1.190502,0.730031,4.820326,1.105672,0.056882,4.589472,2.474449,3.033293,0.837763,0.019456,2.171530,4.265336,1.552437,3.174548,3.974356,4.780249,2.850826,2.065783,1.270027,4.863407,3.747775,1.093495,0.891094,1.097208,4.581213,3.066702,4.307050,1.522756,0.871726,0.659214,0.349455,1.557798,4.067906,0.447091,0.633309,3.503528,1.591343,2.733171,3.470430,3.806867,2.296988,4.493316,0.503095,0.478920,1.236370,0.151320,2.526535,2.150091,4.974829,2.482379,4.604988,3.798097,4.637987,4.887306,0.305474,0.797838,3.663525,2.613024,4.271255,0.325509,2.785375,4.998279,0.647062,1.552417,2.973165,2.966902,4.694836,2.678229,4.698917,0.282053,4.489690,3.268570,3.919700,0.843724,2.416222,0.112995,3.808788,4.071222,1.424311,0.639318,3.362983,1.748524,3.614939,0.190967,2.467573,1.495091,4.664495,0.448134,2.106694,4.381850,3.104430,3.041608,3.682003,2.046838,4.763831,2.183663,3.561496,4.746785,4.634355,3.219498,0.421557,4.937607,0.756476,1.842243,0.262216,3.061960,4.062408,0.248567,4.144571,2.767344,3.673445,1.341028,4.379992,1.608662,2.787882,0.731580,0.055779,1.592112,3.967084,4.182022,3.525373,0.254405,3.763838,3.986315,4.435554,3.838909,4.648594,3.005460,1.455815,0.553594,4.157229,2.238692,3.672689,4.833727,1.955063,2.481701,3.763735,0.345094,1.190714,2.434440,4.086805,1.139982,3.336129,3.808199,4.862106,2.794597,1.756336,0.124742,0.770842,0.211419,2.965752,4.413389,4.997394,0.029932,3.860855,2.019689,0.287046,1.591588,2.038830,4.411448,2.556028,3.159947,1.866398,3.152419,3.473171,3.590677,1.491970,4.347751,1.267941,3.397390,1.113082,0.177447,2.763565,0.695338,1.762286,0.443890,4.820365,3.053039,2.486323,2.736311,2.153369,4.557909,0.067277,2.183838,0.836047,2.080117,0.892184,2.308308,1.014325,0.824032,4.430023,2.640746,3.597880,0.412170,1.057601,4.530182,3.774650,1.872542,4.883257,4.358118,4.219469,4.800075,1.968247,4.167953,4.998937,3.433563,3.644085,3.753141,2.660086,2.297098,0.906605,4.136110,1.155625,1.648913,3.117370,0.034272,3.410027,2.050556,4.053164,0.117853,2.082776,3.106285,0.520195,4.366509,1.722897,1.038054,1.677066,0.814415,3.482062,3.528560,4.611045,0.850225,0.521098,4.941163,4.676881,1.134597,0.108342,2.342128,1.042430,4.116945,2.003354,2.046314,4.038306,2.202691,0.489063,2.355028,1.724871,2.514898,4.016037,2.238102,2.801930,2.086619,2.498589,4.524866,1.517798,2.312207,2.971861,3.514590,1.427854,3.780667,3.696964,0.906107,0.895298,3.104366,0.531340,4.797047,3.967690,3.260620,4.834807,1.815000,2.559686,1.553686,2.338079,4.394952,0.838394,3.524777,0.014730,4.289471,4.902270,1.622279,3.081308,3.935113,0.735042,1.523760,3.975138,4.500569,2.971832,3.134830,4.360609,2.869927,4.890130,2.445262,2.909105,3.695911,1.727955,3.566121,2.966379,2.255627,1.335551,1.276888,4.640475,2.381172,2.502933,2.431308,0.150684,0.689230,3.238955,4.251105,4.641009,3.098986,1.392234,4.933244,4.868976,1.147089,3.308544,2.312739,3.925164,0.890137,2.467865,1.915179,2.505767,3.799876,0.836043,4.230297,4.067627,2.170515,4.167499,1.441251,4.448026,2.636529,3.555772,1.131592,0.525546,0.689012,2.153584,2.349973,1.797374,0.085357,3.179116,2.804738,3.152003,3.684451,4.839404,3.486999,1.779104,4.059670,0.327219,0.832183,0.281130,2.316876,3.662476,1.544846,2.004902,3.728209,1.703602,2.937417,1.874314,0.272140,4.156035,0.654373,1.502440,0.993462,4.583078,4.241548,1.082084,0.867760,2.613160,3.519861,0.622025,3.052143,2.743442,4.307706,3.619759,4.379262,4.483072,1.762278,4.549501,2.737450,1.380398,3.739901,4.814698,3.378785,3.795260,3.100871,0.897732,2.584328,3.133663,3.836901,0.844978,3.442944,2.840806,0.717429,3.890958,1.558854,2.424504,0.299907,4.201402,0.831521,4.574519,1.866541,0.150621,3.661089,1.372687,3.163834,0.114593,3.881712,4.874076,2.514662,4.657857,3.915132,4.067191,3.251563,1.602523,3.456074,1.637074,4.042473,4.723744,2.826691,4.648575,2.401521,1.685958,3.038227,1.351171,0.728056,0.436193,1.566913,3.892909,3.944502,0.729860,1.286039,4.057358,0.577685,4.221571,3.479685,0.074923,2.449570,0.615638,1.731387,3.561329,0.450412,1.289484,2.660379,0.514611,2.278793,4.641664,3.953180,2.745331,1.913394,3.160215,0.648507,0.133357,4.136907,3.668178,4.461827,2.892149,4.198942,2.892463,1.233595,3.447166,4.604305,4.709971,0.942475,4.115069,3.217689,3.147160,4.126941,1.171864,2.455243,3.758844,1.880385,1.487004,0.279780,2.829641,1.776333,1.912976,2.345021,3.721279,4.165011,0.886035,2.316090,2.907806,1.954920,3.819965,4.433054,2.675948,4.101640,3.111796,2.655702,4.264521,3.671148,3.194987,3.790627,2.516593,0.885083,4.162683,2.584124,4.634598,4.859033,3.375649,1.560501,2.878419,1.856432,1.345020,2.270899,2.068886,3.052946,4.268088,1.748169,2.244560,4.165665,0.954486,0.627353,2.720024,4.155571,1.866667,3.159556,0.049118,4.545475,3.016935,1.293076,0.391144,1.122228,3.143962,3.345844,3.551785,4.231899,2.677374,1.248634,4.851837,0.566359,1.468794,3.567365,3.028178,2.719323,0.572351,4.896886,0.739200,1.651224,1.908428,1.173036,1.453144,3.493675,3.842417,2.936869,4.313234,3.575988,2.313220,2.999659,2.210435,4.752958,2.468387,0.290681,0.171567,2.121601,0.379092,4.408588,4.689687,0.623934,2.616273,1.678289,4.375162,0.196463,4.826497,4.291374,0.440402,4.259373,3.435388,1.256949,2.977637,1.181321,1.198123,3.612692,1.146992,2.114469,4.978619,4.869941,3.302803,3.182147,1.103428,0.662596,0.322257,1.634699,1.705209,2.467008,1.402320,2.657973,1.198123,0.882478,1.990911,4.812078,1.144449,4.327120,2.369870,4.357135,3.706190,0.239705,4.859286,0.275567,3.618703,4.104993,1.333792,0.847156,3.160868,4.854715,4.237409,0.322425,4.344910,1.724285,4.136223,0.087213,3.001902,2.769170,0.049612,2.742184,1.178171,0.025633,2.749072,1.720604,3.930455,4.128002,0.398407,2.095612,2.094166,1.071870,2.948967,3.551963,0.434130,2.519470,2.346699,1.524551,1.409417,1.759035,2.451585,1.372253,2.694288,3.795089,1.984602,0.622684,3.264585,3.553231,1.269887,4.199118,1.376920,3.671084,1.132572,2.136007,3.847146,1.324280,3.711920,1.840674,4.999008,1.263116,0.534366,2.112181,3.600770,4.777832,3.335242,2.703202,3.812476,3.015268,3.412568,2.779733,1.388447,3.779804,2.277972,1.918259,0.010755,1.758411,4.540446,0.238659,0.704649,3.457451,3.186817,3.075264,2.740144,3.035192,3.393500,2.616001,3.142056,0.061785,2.378596,2.112321,3.879157,1.130596,3.845963,2.515654,3.334061,0.235885,4.080271,2.743251,2.931930,1.027348,4.229874,1.383483,4.173757,4.543564,3.991931,4.690086,0.921663,0.972457,4.357583,2.343728,0.629452,0.531097,2.511270,3.209740,4.084207,2.872800,0.219885,4.820316,2.722554,1.102767,1.913665,1.816109,2.789013,4.164988,4.772431,0.655075,2.210493,1.820306,1.511401,3.453485,2.343882,3.384287,4.930695,2.279548,4.840454,0.829800,4.039285,0.257056,1.045604,1.575941,0.799139,2.450076,1.567212,3.030704,1.314339,0.537329,0.940455,2.497733,0.369709,1.850360,2.525330,3.284342,3.615060,3.491601,4.895382,0.613017,3.237495,0.878254,4.249018,2.373656,3.008564,4.803005,1.830671,2.900654,1.206235,2.461784,1.083231,1.596418,4.867624,1.268300,0.120980,3.205438,3.561240,0.093931,2.679340,1.399464,2.154674,3.410713,4.348655,1.674022,4.637410,2.198482,3.845131,0.311008,3.978187,4.280911,1.474043,0.901474,4.068663,0.276228,0.086284,4.764417,2.749035,3.946248,0.761388,2.982131,1.963878,0.842598,2.663557,1.043033,0.036358,4.548248,0.559632,2.458318,4.920586,0.208751,3.107515,0.220053,2.754163,1.423132,1.335936,2.237835,3.552100,2.844852,2.974684,1.452025,3.802378,0.189101,4.519249,4.651368,0.090085,1.123907,1.722385,1.664949,2.389294,4.382299,4.407140,4.965336,0.637935,0.012399,4.391215,4.018740,2.872878,0.595703,1.894650,0.456246,3.449532,2.903945,4.147431,3.373436,1.035075,3.928556,4.377347,1.276086,0.574507,3.315137,3.534148,0.240438,1.911804,2.748822,4.311101,1.609079,3.361157,2.531952,3.209372,0.221214,1.667702,1.597643,0.087688,2.337189,1.105386,3.024115,1.033730,4.653629,0.667566,2.416373,1.019557,1.363792,4.726271,4.508237,0.841996,2.070143,1.612242,0.774616,0.453534,1.098458,2.484164,2.877423,0.979768,0.612467,1.146074,2.013607,2.199245,2.104233,1.073632,2.677953,1.599068,0.393903,3.247508,2.942263,4.241374,0.501930,2.788018,4.908887,0.305510,1.929571,3.701759,4.568676,2.836328,0.484536,2.122691,1.040705,3.660008,0.700023,1.584227,2.962155,4.902904,2.697178,0.947807,2.809838,3.935717,0.999046,1.114282,0.624217,3.976699,3.042866,4.303308,4.634818,0.398531,0.555493,3.240552,1.918443,1.354216,1.946801,2.093120,4.520537,0.839014,0.005095,2.162052,0.159090,2.868248,2.957551,2.716024,0.617080,2.933825,1.003571,1.102491,3.444884,4.820313,4.197029,3.522221,4.326557,4.390820,2.283242,2.667046,3.395232,4.457674,0.478686,1.927782,0.182419,1.242186,4.496999,4.669854,2.419955,2.193267,4.403102,1.011008,1.438383,2.310952,1.009877,0.211090,1.850071,3.530191,1.455119,0.219293,4.828167,4.695511,3.091828,4.904286,4.284340,0.124147,3.401747,2.947612,1.018023,4.269531,1.100504,1.655629,2.055340,3.887514,0.209374,3.606638,0.103732,0.643909,4.076962,0.450797,1.620148,0.776167,3.293809,0.265457,0.706088,4.760389,2.441822,3.181229,0.204439,2.966214,4.727831,2.890151,2.158387,0.137030,1.331942,1.587734,1.300078,1.476970,2.589503,0.717869,0.333155,0.931097,0.514835,4.608921,2.625975,3.971231,2.180067,2.081527,1.578032,2.158541,2.553988,1.209432,2.860176,0.943778,2.438910,4.252057,2.439515,2.364696,3.230398,4.118382,3.822578,2.884424,3.852406,0.788938,2.894216,0.270548,3.541402,0.643432,1.958591,3.431523,0.504042,0.639844,4.892606,3.359766,2.532390,2.066725,2.882868,2.097248,0.445276,0.403979,1.023332,4.048428,0.361353,1.516237,1.136845,2.970882,3.378512,1.799886,3.417569,2.449141,4.726636,2.515781,2.526616,0.148357,3.656494,0.962249,2.830189,3.524939,3.192902,0.356012,3.416722,4.713416,2.277613,0.328546,4.394692,2.156190,0.259863,4.581804,0.080355,2.341598,1.603711,1.142324,1.035898,1.022438,1.027568,4.625017,4.267682,2.179582,2.800322,3.023510,0.515762,1.985425,4.722190,0.346294,3.325679,0.524434,4.856998,2.849033,0.559407,1.158605,3.742065,3.495097,0.903474,0.990475,0.174713,1.005017,2.523398,2.951660,0.108378,2.989163,2.861312,0.436828,0.996279,3.950912,1.016266,2.848758,4.844930,1.693134,0.830385,3.389292,0.294979,1.511126,4.711183,1.082347,2.854723,1.911290,3.744001,2.291123,4.563324,1.154506,3.886020,1.300340,3.552880,0.251940,1.474080,3.912163,3.082179,0.153890,1.000110,0.290796,4.646813,3.841017,0.971064,1.972894,1.464246,2.792463,0.702305,4.325129,3.829189,0.239672,4.872232,4.396945,0.040094,4.364687,4.314782,1.407580,2.178613,4.839047,1.652370,4.069792,3.775975,2.225662,1.221542,1.800308,1.527465,4.719534,2.026267,4.432787,3.642128,3.092798,3.378478,4.963592,1.028494,3.459104,3.367332,0.486100,1.158322,2.170546,1.160228,2.701398,2.036480,1.078161,0.791964,4.355680,1.956930,3.365634,3.881535,3.653546,3.693748,4.734100,2.745255,4.574399,0.381622,1.600242,3.182811,4.835379,4.290117,1.691466,2.405776,0.781170,4.156449,3.882971,2.179011,2.165862,0.642729,4.671985,0.976217,2.860727,1.208619,0.605691,3.642922,2.373285,4.974652,2.933796,4.599096,3.378878,0.855297,0.417279,3.893139,4.684327,3.629479,2.482088,0.945655,2.302823,1.451318,3.660627,1.694701,0.463830,1.018631,1.540707,1.826393,3.728150,1.615475,4.475078,4.786478,2.899368,0.521732,2.526603,2.925453,4.779859,2.815737,3.032316,0.049551,4.717544,1.480861,3.038443,3.783809,2.649782,0.136092,2.180772,2.708764,2.859065,3.297779,4.515613,4.177924,1.561484,2.697878,4.965147,1.858322,4.347810,2.119577,3.841938,4.981807,4.917437,4.594119,0.306569,0.942569,4.568173,0.310926,1.288260,0.766230,4.795047,4.048706,1.150799,0.986439,4.871699,0.078345,2.702508,1.231069,2.956396,3.533294,1.615086,0.411091,3.307359,1.544273,3.902347,3.100254,0.290257,2.524898,4.378576,4.146110,2.395397,3.681805,3.526063,3.370108,4.631784,0.614838,3.463389,1.368711,0.702733,2.057362,0.591928,2.483837,2.153713,4.101452,2.335719,4.045453,0.810238,0.239405,3.627801,2.538262,2.105399,3.564817,4.742721,3.691596,3.296512,2.475069,0.607244,0.396154,0.235176,1.594210,1.760460,2.126622,3.846742,2.659791,0.685185,0.595610,3.236604,0.074760,3.679532,1.863521,4.997802,2.885636,4.325796,3.999673,1.807501,3.633476,4.692552,1.442303,1.289959,0.971602,4.488791,0.678424,2.025589,2.291425,2.472931,4.481274,1.465780,4.226436,2.778349,4.390086,1.694456,1.158879,1.264513,0.963284,0.180685,1.240221,3.152669,2.857399,0.400342,2.149889,4.598310,1.004410,0.739787,0.676664,4.176469,2.476978,1.172989,4.196196,3.232764,4.841449,1.732272,1.895363,0.097090,0.717661,0.188892,1.429335,2.664953,0.547490,1.602951,2.388182,0.691760,2.131467,3.264073,4.069007,0.837230,3.987368,3.432318,4.607254,0.713007,1.290775,1.404516,0.203623,0.297576,4.199441,3.545237,4.706788,1.368038,4.759686,0.373203,4.123716,3.907059,2.132538,4.796496,2.167928,3.782718,3.914466,1.101143,2.436232,4.932890,0.675057,1.763434,1.559564,0.350980,1.036419,3.781054,2.212489,4.602730,0.058734,2.655795,3.437775,3.718904,1.212811,1.440621,3.819075,2.286101,4.718166,4.869229,2.760719,0.394618,3.537026,1.504376,1.141227,4.299605,0.894329,0.244832,3.023225,0.719292,0.288111,0.055685,2.391616,1.372737,3.737325,0.468436,3.520032,1.652252,1.785099,0.390486,1.909909,3.246581,0.993855,3.332704,3.179373,0.854759,1.583011,3.340145,1.362834,4.900885,3.564826,0.116661,2.742575,0.572096,3.245560,1.306302,0.051378,1.030837,0.908576,3.810324,0.278026,0.300042,4.609405,0.948015,4.770921,2.392090,1.698702,4.550967,0.315390,3.050805,3.890195,1.965440,2.988225,4.960712,4.277722,4.641786,4.545747,2.171598,4.027717,4.825331,2.662657,4.647666,0.044383,1.400754,3.082128,1.806969,1.456843,4.486426,0.226301,1.745357,1.620947,1.496425,2.330697,2.405980,3.311002,3.326181,1.305311,2.323243,0.742848,2.165051,3.434011,3.529822,4.459499,0.203189,2.168039,4.923247,2.670295,2.449971,2.509641,2.247153,0.436407,1.580823,2.874605,3.322508,3.000557,2.855567,4.928697,3.995550,4.920550,1.255558,3.218200,0.619796,3.651374,3.659363,2.810172,3.079197,3.788212,3.986841,0.443399,2.783815,1.833684,2.958727,0.398366,2.971307,3.175473,1.774038,2.300497,3.173048,1.743361,0.965917,4.290858,0.924099,3.659946,1.420277,0.866139,1.228157,1.592174,1.906174,0.800409,4.327271,3.248888,2.727841,0.521635,1.265978,4.531992,2.908873,0.378242,0.240325,4.324487,2.425056,1.650625,4.740167,3.692717,1.646375,1.655488,4.347535,4.490398,3.185362,3.605165,3.476742,3.151750,1.433162,4.992540,4.710398,3.424823,3.416129,4.829058,2.029704,1.678152,4.720808,2.926389,4.123664,1.969846,1.156757,1.674243,4.538708,2.305028,0.571541,1.170560,3.026445,0.105680,1.044920,0.773288,4.687001,0.042889,0.878769,3.846373,2.500886,2.749624,4.870893,2.646143,2.606869,2.886177,2.550712,3.440984,3.956153,1.870242,3.206393,1.459697,3.676523,1.022320,2.370027,4.907268,0.730590,3.247461,3.744824,3.320197,4.310562,2.330627,3.169485,2.972061,2.713253,3.478968,2.167254,3.535006,0.786989,0.405959,1.872039,2.524026,3.984640,0.882194,4.053556,4.901872,1.371186,1.902176,4.766563,1.151434,3.027331,3.150123,1.201375,1.593602,0.921198,3.828241,3.311194,4.554787,2.240321,1.145110,2.520505,4.903745,3.266401,3.074347,0.502872,2.040623,0.109902,3.562741,4.460352,1.965509,2.935534,4.720419,2.670725,1.669678,1.447176,0.150010,4.006641,4.750958,4.884572,2.773967,3.528914,0.336331,4.961810,4.031202,0.188596,0.515435,0.731670,2.339940,4.365287,1.861093,4.252035,0.789520,0.489964,4.791142,3.264164,1.071352,2.420344,0.265822,2.329371,4.303040,4.711174,3.673102,2.305014,1.472508,0.554054,2.728203,1.533902,1.782007,0.708220,1.862911,0.716899,3.190215,0.362760,4.954628,0.474119,4.228099,1.217987,1.016913,2.234130,1.557689,4.737573,2.642671,1.546376,0.379792,2.062704,4.915684,4.761813,4.284342,3.888543,0.900958,3.775288,4.146945,1.181923,4.359638,0.598233,0.591532,3.246661,1.369600,2.033505,0.760127,3.823041,4.721193,0.703155,3.182470,3.494532,2.222481,2.473411,3.778170,4.430010,0.774620,1.577516,4.037162,2.128689,2.520998,4.271830,3.511293,2.015915,3.081751,0.421255,3.591351,1.204655,1.820895,0.086627,3.983967,2.025735,4.403686,2.396993,3.779239,3.496983,2.365780,4.765678,0.366466,2.787481,0.257261,3.786890,1.565036,2.923038,1.724394,0.820242,0.917958,4.977689,3.235232,0.896833,1.941052,2.619090,0.649869,4.647575,4.280894,3.063376,3.471900,1.486056,2.402871,3.211623,2.394377,4.931209,4.870677,3.043489,2.446731,3.557810,1.570170,2.417842,3.632515,3.178420,3.068553,3.919539,2.272264,2.314337,3.078946,4.546870,1.873521,0.032862,0.837886,4.370220,1.044815,0.078747,1.914158,3.824319,4.573908,2.002193,3.176967,0.973517,2.288722,2.091870,4.530678,3.842146,0.314830,1.878723,4.778730,2.501960,4.063513,4.953854,4.950409,0.912907,1.797634,2.384449,4.042896,1.445500,3.024493,0.435148,1.626697,4.852384,4.546390,0.956560,3.365771,0.035663,0.705084,3.406432,3.460695,2.523778,2.614587,1.229817,0.583865,0.360570,4.301813,3.188966,4.951121,0.596189,1.537710,1.431529,2.228116,1.118169,4.588798,2.310649,1.656101,2.490859,1.115784,4.295925,2.018548,4.166827,1.450425,1.591613,2.438076,2.990227,0.780884,0.369716,3.117162,4.820367,2.483466,3.995957,2.044040,0.231385,1.119469,1.399900,4.432893,4.070661,0.783504,1.899165,4.450988,1.782630,0.894692,4.855204,3.713833,3.488042,0.822492,1.684430,0.832129,1.001361,1.097777,0.641447,0.307804,4.016437,1.794516,1.191535,3.518494,1.351574,1.828609,2.846974,4.725246,0.342212,1.805309,0.109192,3.464396,1.266937,2.835801,1.328618,0.881577,2.661575,4.791385,3.583201,4.922601,3.522561,1.403011,4.284431,3.845931,0.081472,2.047052,1.505269,3.405110,2.081005,1.262451,3.515710,3.905039,3.989887,1.193584,0.130009,3.664712,2.358523,0.782798,1.738550,0.415488,2.542411,4.185431,2.109851,3.734005,1.781876,4.652489,0.690534,4.924494,1.626291,4.779414,1.183456,0.832311,0.986173,4.260385,2.293352,1.776458,1.696158,1.206343,4.370225,2.414486,1.924969,0.687635,0.432069,0.169667,2.890896,1.380942,1.139355,4.649525,4.570038,3.488582,2.707469,0.225299,2.904699,2.531805,0.386505,1.540925,4.139028,0.976583,3.745576,4.286168,4.986714,3.708433,1.950256,0.122015,1.673469,1.329102,4.679273,2.111847,0.469254,3.503336,4.255499,1.015765,2.450986,1.284920,4.777964,3.978063,4.767855,0.644422,0.572087,4.196899,4.675172,0.301727,1.768216,4.382507,0.367835,3.405374,4.352907,4.709862,4.125582,4.470620,3.621680,0.890445,3.198435,4.285662,4.784951,4.755709,0.023506,3.123327,0.830491,1.365323,1.164411,4.535398,2.543207,1.150602,2.995244,3.637362,4.144533,4.959026,0.769131,0.452929,2.761979,2.236854,0.280521,1.586668,2.364104,1.497947,3.994024,1.804979,3.821671,1.729339,2.673517,2.627626,3.601948,4.163749,0.972740,3.761595,0.799768,3.224634,1.007945,3.952914,4.879515,2.008177,2.092729,2.334405,3.726112,0.123118,3.380948,2.311061,0.176373,1.771389,1.253313,4.583949,2.734760,2.953325,4.003142,1.669665,2.990157,4.682503,0.875731,2.919679,0.766458,2.098373,1.449629,4.433065,4.508163,1.669770,4.131705,2.691133,4.429423,1.752686,0.118075,2.536232,3.262633,0.292559,4.086954,3.161739,1.973717,2.845684,4.975364,1.202949,1.194009,0.394334,0.930719,4.486663,4.068057,1.209500,1.561133,1.792676,4.832930,1.926089,1.970900,3.100944,0.753017,3.914051,1.012799,2.336503,0.431119,2.836296,1.872219,4.710747,4.108249,0.555322,0.618296,4.827536,4.675194,0.722879,2.653158,2.178515,1.208950,1.327640,0.287980,4.178755,4.022275,4.907703,1.870009,0.688338,1.706212,2.546108,2.479356,3.887816,2.633411,1.682238,0.964930,0.898621,2.260199,0.155128,2.290516,3.310337,1.977277,4.479775,1.198647,4.186262,2.897235,1.875533,2.420561,3.189400,0.796348,3.478947,2.899227,3.519405,3.734746,1.773786,0.091536,1.670516,2.422218,1.130470,4.798997,3.150116,0.701091,4.015539,3.717567,1.076981,1.553046,1.899007,3.469738,2.225767,1.779018,1.783534,0.389053,2.560305,3.417370,3.693745,3.139440,4.576526,0.849724,0.138684,0.751352,4.381844,4.649362,2.547753,2.324274,1.291489,3.232569,4.390370,4.645136,3.217199,4.725390,3.307790,1.923788,1.644469,1.079590,2.170371,3.316060,4.448403,1.256216,2.761273,0.474465,0.490909,3.646392,4.796384,0.669371,2.820387,4.061411,0.389955,1.816692,2.815095,0.969081,1.645534,3.736132,1.217191,0.204809,0.648386,4.659210,0.793571,3.433278,0.449386,3.342840,4.265888,4.962132,0.293289,2.236904,2.928607,3.750272,2.095666,0.317591,0.525639,1.732514,3.313779,0.675983,3.333812,3.300548,0.490440,3.589320,2.099317,4.141539,0.999739,3.865527,4.386133,2.357315,3.162070,3.089654,3.768522,2.284135,3.036599,0.935440,3.725311,4.806696,1.150529,0.271360,4.228510,1.166075,0.387357,4.115557,0.586837,0.989504,2.237999,0.840009,0.821112,0.394959,3.919287,0.788564,2.401678,1.702828,4.974722,1.967681,4.802450,2.561426,4.169802,4.353516,0.939275,2.916969,4.425106,3.681441,3.735025,2.468208,2.036053,0.412436,4.388892,1.381623,2.999279,1.775644,4.223056,3.461782,3.484300,3.710455,3.082311,4.465584,1.892583,3.106047,3.321168,2.975687,3.630549,3.799191,1.149409,2.798677,4.879463,4.069720,0.748502,0.175879,2.767869,0.091405,0.149368,3.006425,3.090956,1.780497,2.690762,4.144060,1.769532,3.703889,2.041189,2.253352,3.063507,0.739962,2.322476,4.822575,2.899075,3.903022,4.490068,2.164333,3.962295,1.846313,3.655559,1.640534,1.653083,3.019507,1.397614,3.354730,4.985032,4.099061,3.646705,0.847186,3.649826,1.636192,0.014812,3.729462,3.739875 \ No newline at end of file diff --git a/lapack/src/test/java/dev/ludovic/netlib/lapack/LAPACKTest.java b/lapack/src/test/java/dev/ludovic/netlib/lapack/LAPACKTest.java index 4c260142..2c13ecc1 100644 --- a/lapack/src/test/java/dev/ludovic/netlib/lapack/LAPACKTest.java +++ b/lapack/src/test/java/dev/ludovic/netlib/lapack/LAPACKTest.java @@ -50,141 +50,4 @@ private static Stream LAPACKImplementations() { return instances; } - - protected static final double[] readArray(String name) { - InputStream is = LAPACKTest.class.getResourceAsStream(name); - assert is != null; - try (BufferedReader reader = new BufferedReader(new InputStreamReader(is))) { - String[] values = reader.readLine().split(","); - double[] result = new double[values.length]; - for (int i = 0; i < values.length; i += 1) { - result[i] = Double.parseDouble(values[i]); - } - return result; - } catch (Throwable t) { - t.printStackTrace(); - throw new UnsupportedOperationException(t); - } - } - - protected static final double[] transpose(String trans, double[] arr, int m, int n) { - assert arr.length == m * n; - double[] result = new double[n * m]; - if (trans.equals("N")) { - for (int col = 0; col < n; col += 1) { - for (int row = 0; row < m; row += 1) { - result[col + row * n] = arr[row + col * m]; - } - } - } else { - for (int row = 0; row < m; row += 1) { - for (int col = 0; col < n; col += 1) { - result[row + col * m] = arr[col + row * n]; - } - } - } - return result; - } - - protected static final double[] extractUPLO(String uplo, double[] arr, int n, int ldarr) { - assert n <= ldarr; - double[] result = new double[n * (n + 1) / 2]; - int i = 0; - if (uplo.equals("U")) { - for (int col = 0; col < n; col += 1) { - for (int row = 0; row < col + 1; row += 1) { - result[i++] = arr[row + col * ldarr]; - } - } - } else { - for (int col = 0; col < n; col += 1) { - for (int row = col; row < n; row += 1) { - result[i++] = arr[row + col * ldarr]; - } - } - } - assert i == n * (n + 1) / 2; - return result; - } - - protected static final double[] extractSymmetric(double[] arr, int n, int ldarr) { - assert n <= ldarr; - double[] result = new double[n * n]; - for (int col = 0; col < n; col += 1) { - for (int row = 0; row < col + 1; row += 1) { - result[row + col * n] = result[col + row * n] = arr[row + col * ldarr]; - } - } - return result; - } - - protected static final float[] convertToFloat(double[] src) { - float[] result = new float[src.length]; - for (int i = 0; i < src.length; i += 1) { - result[i] = (float)src[i]; - } - return result; - } - - protected static final void dumpArray(String name, double[] arr) { - System.out.print(name + ": "); - for(double e : arr) { - System.out.print(String.format("%.3f,", e)); - } - System.out.println(); - } - - protected final int M = 103; - protected final int N = 103; - protected final int K = 103; - - // double[m, k] - protected final double[] dgeA = readArray("/geA.mat"); - // double[k, n] - protected final double[] dgeB = readArray("/geB.mat"); - // double[m, n] - protected final double[] dgeC = readArray("/geC.mat"); - - // double[m, m] - protected final double[] dsyA = extractSymmetric(dgeA, M, M); - - // double[m] - protected final double[] dX = readArray("/X.vec"); - // double[m] - protected final double[] dY = readArray("/Y.vec"); - - // double[k, m] - protected final double[] dgeAT = transpose("N", dgeA, M, K); - // double[n, k] - protected final double[] dgeBT = transpose("N", dgeB, K, N); - - // double[m, m][U] - protected final double[] dgeAU = extractUPLO("U", dgeA, M, M); - // double[m, m][L] - protected final double[] dgeAL = extractUPLO("L", dgeA, M, M); - - // float[m, k] - protected final float[] sgeA = convertToFloat(dgeA); - // float[k, n] - protected final float[] sgeB = convertToFloat(dgeB); - // float[m, n] - protected final float[] sgeC = convertToFloat(dgeC); - - // float[m, m] - protected final float[] ssyA = convertToFloat(dsyA); - - // double[m] - protected final float[] sX = convertToFloat(dX); - // double[m] - protected final float[] sY = convertToFloat(dY); - - // float[k, m] - protected final float[] sgeAT = convertToFloat(dgeAT); - // float[n, k] - protected final float[] sgeBT = convertToFloat(dgeBT); - - // float[m, k][U] - protected final float[] sgeAU = convertToFloat(dgeAU); - // float[m, k][L] - protected final float[] sgeAL = convertToFloat(dgeAL); } diff --git a/lapack/src/test/resources/X.vec b/lapack/src/test/resources/X.vec deleted file mode 100644 index 5785c50c..00000000 --- a/lapack/src/test/resources/X.vec +++ /dev/null @@ -1 +0,0 @@ -2.743770,0.835428,4.056319,1.057763,1.288122,0.743487,0.297624,0.720599,4.733356,3.985322,3.689118,2.863023,3.840879,3.841770,1.388431,0.829788,1.992641,2.361518,0.296504,4.544581,1.315937,4.071398,1.222224,1.040035,1.729134,3.159764,4.104973,1.944296,3.332840,1.263181,1.144171,2.119526,4.667703,0.206606,2.789823,4.867032,3.039553,4.559095,3.921917,2.396661,1.773202,3.193527,4.452662,0.225245,3.787477,1.748217,0.020557,0.204250,0.235989,3.295322,2.607994,1.661676,1.829283,1.057310,2.141564,1.248551,3.653989,1.368927,2.794324,3.996130,2.265062,1.857542,0.359007,3.256106,0.167688,4.232306,4.194821,2.420912,2.654466,3.646937,4.274297,2.150499,4.738874,2.725356,4.278588,0.194970,1.141882,2.705893,0.208498,2.530241,2.839940,2.587016,0.572437,3.994174,3.110979,3.714781,2.053858,4.077423,1.408685,4.629359,2.206141,1.299046,4.108358,2.764698,1.433918,0.779362,4.763679,3.561891,4.686232,3.660752,2.956290,2.539581,4.999594 \ No newline at end of file diff --git a/lapack/src/test/resources/Y.vec b/lapack/src/test/resources/Y.vec deleted file mode 100644 index 552ed8b5..00000000 --- a/lapack/src/test/resources/Y.vec +++ /dev/null @@ -1 +0,0 @@ -1.308161,1.859244,4.271887,2.385419,0.783308,2.460314,2.912655,3.497239,0.489631,3.916928,1.337877,1.423239,3.568072,0.908391,4.471557,3.271646,1.410359,4.456444,1.708393,0.214084,4.793527,1.225499,4.397703,2.923277,4.753397,4.167854,3.083996,1.381753,4.887306,3.264405,0.749737,1.044536,1.717942,2.491489,1.515707,0.776045,3.721097,0.231149,0.891569,2.305177,1.379286,4.388693,2.723391,4.880161,3.816186,0.423202,0.137105,2.338054,0.712574,2.400618,1.648705,2.011272,2.180356,0.231902,4.804938,4.918287,2.458577,1.178577,0.784749,4.442337,4.935286,1.406488,1.756818,0.117174,4.952333,2.184810,2.528438,1.194373,4.205853,0.549411,1.830910,1.753192,2.011837,1.913712,3.023300,1.184178,2.549540,1.210492,3.153036,2.182013,3.418065,2.688047,0.934378,0.334523,0.692445,1.470172,2.386988,3.844825,2.224413,0.769167,0.031627,1.589413,1.845898,0.842862,4.991723,4.275119,1.513772,2.301607,2.333696,0.082954,2.733651,3.399653,0.016225 \ No newline at end of file diff --git a/lapack/src/test/resources/geA.mat b/lapack/src/test/resources/geA.mat deleted file mode 100644 index d3b4b11e..00000000 --- a/lapack/src/test/resources/geA.mat +++ /dev/null @@ -1 +0,0 @@ -2.744068,3.575947,3.013817,2.724416,2.118274,3.229471,2.187936,4.458865,4.818314,1.917208,3.958625,2.644475,2.840223,4.627983,0.355180,0.435646,0.101092,4.163099,3.890784,4.350061,4.893092,3.995793,2.307397,3.902646,0.591372,3.199605,0.716766,4.723345,2.609242,2.073310,1.322778,3.871168,2.280752,2.842170,0.093949,3.088177,3.060479,3.084670,4.718740,3.409101,1.797540,2.185160,3.488156,0.301127,3.333834,3.353189,1.051913,0.644631,1.577142,1.818554,2.850984,2.193008,4.941869,0.510224,1.044384,0.806548,3.265542,1.266458,2.331554,1.222128,0.794848,0.551876,3.281648,0.690915,0.982912,1.843626,4.104966,0.485506,4.189725,0.480492,4.882297,2.343256,4.883805,3.024228,3.696318,0.195939,1.414035,0.600983,1.480701,0.593639,1.589916,2.071315,0.320737,3.462361,2.833007,1.326947,2.616240,0.469703,2.879732,4.646481,1.592845,3.337052,0.658989,3.581636,1.447030,0.915957,2.932565,0.100538,4.144700,0.023477,3.389083,1.350040,3.675970,4.810943,1.243766,2.880787,2.960210,2.861260,1.115408,4.763745,2.235627,4.232043,3.497396,1.487185,4.068989,1.982529,4.405516,2.906364,4.408677,3.462658,3.626271,2.506622,4.780418,3.219951,2.119275,3.031966,0.095966,1.507874,3.300868,1.450388,3.090077,2.143844,0.677370,1.491412,2.849825,2.954364,2.871626,3.266004,3.260516,2.157092,4.482733,1.837809,2.179325,4.459617,4.030970,3.519443,0.501134,4.597413,3.571206,4.994235,0.747242,4.340630,0.812465,3.077798,0.619100,4.240041,4.036595,2.845504,2.035916,0.345835,3.487144,2.267713,3.610278,4.331912,4.877608,4.279017,0.058570,1.799890,3.649953,0.858148,2.605183,0.271690,0.999983,0.092609,3.968489,1.119623,1.726758,4.640406,3.522072,0.159195,0.823471,3.107392,2.886143,1.189464,4.671070,3.069830,2.678164,2.949550,3.650610,1.559725,1.991105,1.049219,0.930965,4.721862,3.697754,2.452294,1.137073,1.271782,0.290146,2.172083,1.558979,3.481717,1.888759,0.898018,0.123394,0.336248,3.396964,2.268484,2.682896,4.483356,4.951695,1.084485,3.315391,1.316612,0.103255,3.791893,1.600086,1.917319,2.941586,4.155242,3.144909,4.363253,1.367710,3.990234,0.928180,4.763958,3.437441,1.077538,4.736853,3.654279,1.269708,1.066560,2.591004,0.128314,1.037350,2.123427,1.870850,2.317877,1.388144,2.933922,4.319278,0.587659,2.586896,0.660341,3.584298,1.980299,2.827107,0.916399,0.724239,2.440281,1.778064,4.702160,3.826626,3.743318,4.518599,0.417112,2.760962,2.922380,4.809682,1.460738,1.204144,0.501470,0.082148,4.647647,3.349583,3.925765,1.408651,2.932051,0.319776,2.428138,4.887476,4.382526,1.690795,4.807851,1.158508,4.746594,4.706889,3.996013,3.152240,4.371440,1.465101,4.244718,3.089383,0.066184,1.736168,0.740704,4.909147,2.391852,2.486957,3.197363,1.842923,0.684501,4.110589,0.949240,2.556595,1.121585,0.489222,4.310958,4.864597,4.804173,4.532777,3.870237,1.665726,0.405507,2.036206,1.161171,0.662438,0.267136,3.627972,0.057137,3.852904,0.734733,0.397610,0.448015,3.360239,1.226836,2.102697,2.786844,4.302756,3.635221,1.351640,0.657414,0.276872,1.507993,1.310591,2.280703,3.416407,3.478127,1.417594,1.899635,0.905755,3.942728,0.284240,3.484986,3.893477,3.887038,1.297113,1.869066,2.937998,1.364110,1.854264,0.985271,2.299279,0.223062,3.998979,0.384782,2.594176,1.534050,2.887715,4.797167,3.227851,0.176812,2.152012,2.550084,2.680887,3.406963,1.387980,0.644303,1.963378,4.782029,0.935654,4.519920,2.719030,2.284557,4.410207,2.293020,3.620838,1.995127,4.520222,3.450125,3.498110,1.638602,3.783893,3.180305,1.200101,0.802694,3.981957,4.795833,2.290694,2.954921,4.288613,2.286117,4.759372,2.878756,4.103836,4.544219,4.077619,0.797072,3.144492,1.992171,0.313565,2.120161,1.293420,4.245192,0.166523,4.794914,1.776844,1.783534,0.081643,0.926162,2.006298,4.646457,0.498075,4.726508,4.347443,2.270812,1.633504,1.163721,3.072324,0.165373,0.078030,2.143979,0.340370,1.259705,1.105805,1.265956,0.655276,0.060181,0.577421,3.092401,4.871281,4.951725,2.045270,0.814772,3.193809,2.451527,4.947049,0.326521,3.916172,1.441992,1.207093,3.312523,1.230316,3.329296,2.586543,2.120445,2.773439,1.435258,3.532874,2.074284,1.802728,4.143285,4.624835,0.230037,1.163135,1.742597,4.074832,4.927457,4.844859,4.524742,1.482781,4.960056,1.247100,0.529531,4.754763,1.167101,3.448841,0.291782,3.653545,4.408601,1.362184,1.895284,1.871481,3.743941,1.189036,0.859265,2.246458,1.522342,4.195946,1.188709,2.511947,4.712918,3.169988,4.336447,4.701048,3.753824,3.497875,4.839828,4.972004,2.259108,0.354349,1.463970,0.761774,2.087432,0.656447,3.020589,1.914040,4.476929,4.838973,2.734425,1.374118,2.961152,4.483806,2.033667,2.760391,1.358264,2.277221,2.008568,1.242067,2.529332,1.551904,1.865174,2.624852,3.752975,1.667537,4.620794,4.311593,0.243451,1.268213,2.230678,0.523139,1.742380,3.700488,3.402572,3.111922,3.552642,1.024618,1.708491,3.381212,4.396174,2.718390,1.413498,0.151176,3.551684,0.039421,1.863395,2.652686,4.610557,0.447473,2.029712,0.121566,1.713055,3.111155,1.395340,1.048750,0.578516,2.885701,3.476350,3.359786,4.744305,0.013516,3.235983,3.001961,2.943698,4.813852,0.084358,3.482412,4.068393,2.549036,1.669824,3.954201,0.486215,2.210178,2.599762,3.469782,0.454429,1.138798,2.051508,3.116473,4.434804,3.094131,0.667307,4.902901,4.358929,2.513604,4.611740,2.706904,4.616530,4.149487,4.841432,4.598914,0.180169,0.873860,1.945673,4.760713,1.500145,0.802338,4.431523,2.231972,4.539378,0.801152,3.305588,2.201319,0.382434,3.482316,1.236994,0.198078,0.299721,0.305393,4.538665,3.699420,4.490312,3.362912,2.644700,1.522232,4.989811,1.810945,2.353245,1.891226,4.897635,0.873292,1.639940,3.401743,0.316038,3.036247,2.388233,1.420000,1.192066,2.572564,1.839638,2.282599,1.687387,4.852468,0.667197,0.484020,1.716959,2.955135,3.295882,1.986284,4.996390,1.759465,3.607033,3.187913,4.065269,4.881128,4.448968,3.822810,3.491242,1.677491,0.738428,0.313180,1.209509,2.161407,2.609981,3.865418,4.793705,0.586602,0.535021,2.948474,3.726990,4.240752,4.679160,4.917131,1.999008,1.901676,0.739043,3.424672,3.283810,4.310313,0.486290,2.488885,2.905410,1.207785,0.845127,4.297904,0.292675,2.353105,0.579170,2.285294,4.899812,2.118532,4.285625,0.586578,1.356260,2.018964,1.999061,3.356917,1.723591,3.568834,3.195934,1.995806,2.158801,3.072638,0.350211,4.112034,3.267106,3.631712,2.684615,0.552386,2.025178,2.026868,1.605215,0.149752,3.686271,0.548922,3.031541,3.516087,3.173932,4.795711,0.516491,4.335836,0.145951,2.674584,2.021218,2.620919,1.825499,0.952835,0.095614,2.590749,4.213884,1.866080,1.114319,0.402660,0.426555,1.106982,0.500070,1.325198,0.330747,0.328024,4.281381,0.810601,2.798412,3.867278,2.282048,0.766844,0.997981,2.164921,2.641170,1.747201,3.907398,3.755108,4.636059,0.144763,4.478456,1.962844,4.391862,3.453924,4.936744,3.796412,1.822723,2.505316,1.881946,1.824559,1.304522,2.479851,3.408700,1.386701,2.621899,0.586901,0.799226,0.234032,4.853657,0.019302,0.892900,3.064334,0.406848,4.409483,3.598101,4.831950,2.538178,1.502018,2.747503,4.654094,2.603807,1.336035,4.386994,1.859594,0.006917,1.238425,1.591168,4.293887,2.292516,2.222936,1.680511,4.403391,4.725134,4.959452,1.883706,4.830737,3.959398,3.378446,1.224447,1.082286,0.830239,4.613783,1.470383,2.265471,2.469789,3.890858,4.221175,0.695364,2.134522,4.214274,4.090167,0.512069,0.781917,1.520993,0.376795,2.123315,0.538089,2.841088,1.232785,2.982165,0.587628,4.879419,4.662806,1.958985,1.210893,1.251991,2.416968,0.199964,3.198526,2.041515,1.887033,4.046825,3.545177,4.771669,1.759681,4.487714,3.849836,1.787123,3.108327,1.442850,4.372000,0.562137,1.062172,0.915166,2.015130,3.726165,2.634537,2.438382,0.002730,2.127009,0.317769,1.041266,4.661970,1.076991,4.291688,4.014467,0.795731,3.028560,0.578309,3.639441,3.187311,4.059693,2.396923,4.574315,0.246745,1.464443,3.575263,2.090546,0.864757,0.536054,4.086696,2.365715,4.411418,3.666446,2.048631,1.867555,2.578192,4.445300,3.686393,0.025765,3.470789,4.597537,3.552279,0.885029,2.417591,0.701580,1.794976,4.685585,4.616527,1.414184,1.698155,3.001064,4.815986,0.739007,1.284583,4.367784,2.459461,4.494805,0.927589,2.663343,1.631348,1.582713,2.234385,2.165387,1.786734,4.574854,3.658721,3.637735,1.449567,2.888547,3.895897,3.977952,1.722652,3.854364,3.679469,0.707532,4.329727,2.206607,2.432052,2.241846,2.839230,3.105846,2.490898,4.333943,3.138674,2.007140,2.083459,4.054193,1.740960,1.057274,0.296916,4.380134,4.592732,0.600601,1.672369,0.876860,0.579492,4.499334,0.284386,4.902428,0.482254,4.317353,2.832531,1.839587,1.711712,3.786821,1.572866,3.286595,2.586630,2.424828,4.505811,2.773225,4.134308,3.627868,0.192786,3.865550,1.084351,4.515748,0.214621,1.665360,0.498665,2.377946,4.100112,1.490937,0.754674,1.651335,4.069401,0.701920,1.136812,0.344260,3.528550,1.976166,1.554200,3.593132,1.679888,3.638856,4.075997,1.088314,4.869093,0.811790,1.454205,0.898976,1.727528,2.400304,2.610879,4.268030,4.447240,1.100519,3.114470,0.557480,2.294849,1.611668,1.582504,2.412921,3.649138,0.345913,4.395867,3.674069,0.882497,4.695805,2.531561,4.999043,0.986297,2.674541,1.451240,1.520868,2.955327,4.608595,4.026319,3.619707,2.795869,4.611493,2.461807,4.369161,4.169908,1.069177,3.856127,0.060856,1.614148,1.147837,2.534315,3.684266,0.488382,2.574611,4.692060,1.143233,3.385706,2.964401,0.050318,2.379131,3.543852,0.219877,4.397607,2.600407,0.153305,1.122068,4.768378,2.911599,0.537363,1.437723,2.283518,0.104750,2.058078,2.447293,1.218389,2.943195,3.766201,1.179171,3.102500,3.198111,4.742702,3.891381,4.241726,2.452100,0.926743,4.979076,0.646779,2.357287,0.340465,4.719254,4.824625,3.596945,1.749964,1.271912,1.326517,0.636470,2.629045,0.709086,1.583653,3.133532,3.637718,0.121364,2.150580,3.260623,4.266230,2.376624,4.846029,1.328163,0.067544,2.418764,1.280569,4.118588,1.163863,1.553146,3.956137,3.575716,2.790256,3.524740,2.093184,0.026550,0.056776,2.556109,0.416455,0.255377,4.827583,4.295013,0.760136,0.003321,4.708339,1.391626,0.929488,3.457541,0.544519,1.323248,4.875473,3.197314,2.603389,1.989593,3.872505,0.704787,4.836689,4.305615,3.088285,0.214531,3.504278,4.566422,2.622885,1.771124,0.601387,3.774506,4.425109,0.501259,3.794923,0.085302,4.835275,3.075290,2.762195,1.479749,4.646458,1.329528,4.140733,4.925543,3.916983,2.594950,0.330371,2.362069,2.191280,1.013980,2.117938,1.788789,0.818421,2.206871,1.314000,2.610312,0.175800,4.531157,4.081822,2.762907,4.259043,4.811975,0.552611,3.154159,4.989970,4.939446,3.016615,0.640104,2.915964,0.010323,0.994557,4.780616,1.652203,3.191951,1.404297,4.739109,3.642794,1.648256,3.958807,0.540828,1.961595,1.106091,3.418632,0.512231,1.985129,1.383249,2.531715,1.749488,3.532053,0.122885,3.169935,1.152856,1.343545,4.001278,4.777842,1.582751,4.134026,0.519954,3.169908,3.755161,0.779890,2.130012,4.463536,0.517892,0.090482,2.952927,2.177658,3.993446,4.617278,1.495768,1.942021,2.431360,2.940757,4.919269,3.486651,1.947743,1.318838,4.723129,0.677742,3.601329,4.626975,3.323328,2.115272,0.994955,1.837377,3.534359,3.247671,4.639881,4.334305,4.080754,4.557254,1.381686,1.847618,1.899470,2.802253,3.341091,1.433583,0.097312,1.996112,1.542640,4.710924,4.441325,4.301553,3.264999,1.721446,2.744246,4.076125,0.493052,4.005374,0.205899,4.082105,4.037819,0.255037,3.135804,2.512265,0.849098,0.741895,3.866296,2.838464,4.914996,4.911239,4.963335,0.593078,4.691281,1.222848,2.291061,3.787033,1.018105,2.831558,0.929084,0.523681,0.582793,1.788195,0.023274,2.124270,3.320986,2.008441,0.428973,0.313444,1.390583,0.846563,4.825475,0.756151,4.027312,2.930540,2.846435,2.560404,4.858815,1.819224,3.939579,2.776471,1.978168,4.777330,2.991580,0.594585,2.087696,3.907909,3.468735,4.581702,1.296887,3.790969,2.299376,2.868049,4.775233,4.896432,4.307955,1.795485,4.438504,3.193046,2.149984,0.178713,3.850641,2.510528,3.930942,3.740114,3.967837,1.503256,4.003993,2.744232,2.366631,3.375630,0.106793,0.511584,1.460887,4.914951,0.698729,1.652982,0.255265,1.656344,1.601631,4.734036,4.225770,1.913821,0.123845,4.155156,3.302681,0.761822,4.980356,0.501167,4.335573,1.471331,2.176767,3.977283,3.387542,4.689322,3.105702,0.489051,4.421802,3.845778,3.559352,0.268668,1.981114,0.837179,4.109520,3.502643,4.415388,4.832876,3.873738,4.971165,3.073849,0.185648,0.071258,1.710519,4.117359,4.330674,4.804063,0.325607,0.222856,4.566418,1.525233,2.789937,4.912224,2.002243,3.329357,2.004398,3.840973,2.638574,1.187616,1.356531,1.290296,2.661602,3.515945,4.746400,3.470437,3.905964,0.844631,1.870313,2.068901,3.431901,1.479460,1.516460,1.779446,4.051510,2.887950,0.376386,0.391230,1.856435,3.832955,3.443417,3.539912,3.836050,1.435764,2.741281,2.716763,3.698163,4.784353,1.389950,3.966408,3.299853,2.901189,3.874399,4.720162,0.183457,0.737001,3.781436,0.418957,2.580619,1.099304,1.371479,3.509202,0.150964,4.366597,2.222395,2.511966,2.700240,3.227721,1.724283,0.505537,1.591895,0.840711,2.780666,1.590143,4.790336,4.828671,3.100629,3.087486,4.926893,4.436416,3.825350,1.567953,1.827695,1.006334,2.435741,4.951843,4.560755,0.591747,0.125951,4.493188,2.685851,1.000949,3.368266,3.221116,0.610428,1.298001,0.300390,1.049302,0.661528,0.966181,3.427336,0.247499,0.509273,0.670868,1.582706,1.493752,1.275319,3.752683,4.990114,2.669890,4.721014,1.983051,0.533412,2.043869,1.480639,2.467035,3.285218,2.305251,4.675803,4.423824,3.509888,2.448425,0.658436,1.985068,3.522008,1.424428,0.519940,4.539492,3.545254,3.076382,3.962495,4.178230,2.417295,4.405941,4.582095,1.357755,3.037727,2.632920,2.689729,4.688315,1.525944,4.917170,4.510656,2.293614,4.087266,3.845235,3.389475,1.599169,0.982255,3.357638,4.214866,0.081264,3.214017,2.214365,4.490439,1.607365,2.370924,2.573836,0.702198,3.564462,4.152382,0.289546,1.456944,0.190223,4.782721,3.335844,4.821002,2.657471,4.010343,1.872070,1.769095,1.891339,3.289311,1.797266,4.501837,4.916374,0.152133,0.968116,0.561250,0.211820,1.138705,2.233967,4.184952,1.109120,2.469726,4.648094,3.336074,3.990395,2.754970,4.902332,2.943311,0.227554,0.989914,2.023868,3.006386,3.859654,2.065431,3.550292,3.949348,1.586301,4.896351,3.248282,4.404990,2.779688,3.708016,3.852720,4.541242,0.751749,2.791417,2.141893,4.615795,0.525473,4.912869,4.377257,0.369131,2.454832,3.587798,3.690758,4.532471,3.999327,1.554652,2.492174,3.508929,0.692184,0.969954,2.405212,1.491229,4.312796,2.931387,1.743326,4.244165,4.024392,4.991774,4.236538,2.072283,0.637494,4.203205,0.298790,1.751356,4.598690,4.803832,3.202823,3.443242,0.212272,2.572402,2.734341,1.700504,0.342984,1.144538,1.789920,2.175710,2.954634,3.611958,1.588159,1.644769,0.098458,0.204374,1.289108,3.701225,3.141569,3.848945,3.844597,4.282837,3.601596,4.895055,4.494126,2.933586,2.940788,0.171335,4.992633,0.657880,3.701736,4.105076,1.865273,0.984260,0.493799,3.743030,2.263268,3.568589,4.577038,0.732919,4.595855,2.058132,1.526335,4.715311,4.953258,0.994461,3.284192,0.532477,3.254570,4.136566,3.422493,2.086666,1.915332,1.965612,2.948559,4.407836,4.645331,0.267648,0.908112,0.561122,0.966673,1.733039,2.532658,3.147306,3.660711,4.450558,4.945442,3.314282,4.226823,3.890194,1.537660,4.378461,0.213816,0.001837,1.368663,2.310488,3.191814,0.508851,3.365051,4.009079,0.926565,2.075626,2.599925,2.259035,3.999150,4.802612,3.994766,0.389964,4.024678,0.332982,1.179852,0.765484,0.987596,2.641576,3.358449,2.351606,4.798478,1.201462,3.815701,4.350911,2.810331,2.281113,2.980922,2.144049,2.775969,2.084670,2.002349,3.476732,0.464256,0.832710,4.255992,3.855387,1.407269,1.886345,4.630133,4.090386,3.071731,1.107451,0.221260,2.156289,3.363136,4.142402,4.263445,0.163880,1.220785,1.695473,0.943661,4.014877,3.837329,2.584165,4.914632,0.720293,4.498259,0.582316,0.815909,3.481096,0.547848,2.829225,2.101168,3.642370,4.503376,3.849358,4.248449,0.164727,1.550977,2.577165,2.079767,1.156275,1.539370,4.727155,1.470904,1.769521,0.018549,4.225388,0.774204,1.020721,1.276323,4.423110,1.032257,3.987632,4.040247,4.635103,0.577807,1.086395,3.714491,0.980004,1.431648,0.833708,0.863483,2.407767,0.548415,1.608488,2.132970,0.122741,1.941666,0.470612,2.467893,4.128691,4.092111,0.402243,3.006139,4.172932,1.189863,3.809633,4.453822,4.030621,0.536505,0.045300,0.958621,1.352387,3.080915,1.921366,3.517035,1.765375,0.772127,1.563449,4.421621,4.792662,1.037564,3.942342,1.366744,4.435658,0.827728,3.329800,0.421056,4.869467,3.503167,4.209079,2.833347,2.384007,3.109412,2.643708,2.346922,3.797251,0.891005,0.855860,2.159213,1.603740,0.370623,4.222352,3.858014,2.719607,4.896623,0.363000,3.833347,1.331852,1.842995,1.096397,3.945189,0.721201,4.200083,3.307888,0.295116,4.054909,3.138779,4.524912,3.743612,2.805605,4.182736,1.390251,2.734750,1.468084,4.841022,1.130982,0.078691,1.629274,2.512547,0.141815,2.796242,4.371414,3.523661,3.114842,4.779809,4.791397,4.121332,3.038709,2.438823,0.066581,3.031310,4.945440,4.090505,1.703023,0.760235,3.920293,3.719689,4.835234,4.374212,2.778313,0.506421,2.417503,1.568475,2.562042,1.508508,4.309115,4.221635,1.577326,2.997907,2.150904,4.545464,0.936805,3.488642,4.851877,0.876378,1.009832,3.468617,3.895770,2.452745,3.048432,1.063412,2.383071,0.560359,1.607110,1.423899,2.223127,4.650632,0.906338,2.006941,3.077986,4.732785,0.665741,4.589383,0.405269,2.403707,2.272949,1.048014,1.737298,2.270826,4.326057,4.775321,2.594628,4.350499,3.040858,1.745437,0.970971,2.065674,2.614121,0.222217,0.729206,3.000922,1.125008,4.186632,1.634711,0.524171,0.417653,4.685615,0.590102,0.704549,4.313330,1.271441,3.329757,4.083628,3.035903,4.787443,3.544414,0.563758,2.792050,3.590933,4.009786,0.131607,3.594395,4.128404,3.734169,2.561746,2.290105,2.747093,3.523218,4.614571,3.085176,4.439172,3.506284,0.341682,2.504141,1.432432,1.425875,1.779638,1.573664,2.893050,3.418008,1.343747,0.648813,0.294044,2.878764,0.930651,0.046240,4.638765,2.685702,0.462241,4.214606,4.916014,2.243003,0.212448,0.587730,1.908269,4.427613,0.740193,4.119950,0.074881,2.286943,3.221986,0.301897,3.073814,4.722021,0.801300,3.648057,3.045469,0.925582,0.031017,0.046422,2.660462,4.713897,3.221493,3.571499,2.469327,2.909445,0.631838,4.384103,3.803963,4.990995,1.488615,1.135089,0.625808,4.821049,3.904426,0.831623,2.763432,2.068841,0.757430,0.810365,4.817350,1.524821,4.707196,0.378053,2.304015,0.648095,0.023937,2.768830,0.569471,3.610123,3.490582,0.881665,4.708711,3.605217,1.489851,3.546169,3.659651,1.711132,1.877943,1.795533,3.083092,4.502051,0.865966,4.375998,0.138266,3.301693,2.072194,3.956408,3.605991,2.400539,3.219320,2.508866,4.057592,2.380420,2.615780,1.252603,3.025215,1.514524,2.886420,0.848391,0.797345,2.085149,2.134098,1.340546,0.657984,0.196053,0.126159,1.357751,2.309267,3.631216,2.374359,4.520254,0.176099,0.903303,1.692572,2.887481,4.263681,1.751010,1.339943,0.309446,4.106517,1.898332,2.857751,4.917777,0.007973,0.727251,3.895555,4.025637,3.846236,2.684994,4.894285,1.980923,3.009718,0.316845,2.049287,3.612500,1.193694,4.719138,3.433917,1.437877,3.844995,0.415824,4.873872,0.246426,4.667279,1.264269,3.789121,0.000368,1.271200,3.745503,2.661680,0.574761,1.968149,1.877747,2.840811,3.339885,4.204151,2.486157,1.960109,0.719883,4.024115,3.566852,2.043387,2.592162,3.325914,0.824028,0.135989,1.587518,2.977925,2.433030,3.462773,4.098449,2.442212,0.671335,4.253140,2.874952,3.699687,3.523323,4.841059,1.476537,3.526534,1.828382,1.977054,1.152973,1.720051,4.741484,1.462854,1.229953,2.915690,1.290180,2.366929,4.170881,1.152002,2.133457,3.052449,2.728145,4.873616,3.401851,3.699731,4.834780,2.072190,1.776899,0.219312,0.921022,1.185948,0.917522,3.773919,2.679415,3.338169,4.102311,1.153870,1.629620,3.541801,1.963795,0.146355,2.174776,4.541365,2.045108,1.661245,4.947625,3.222078,1.829990,0.510098,3.939247,3.540375,4.609579,1.086378,0.574622,3.620363,1.016979,0.880519,1.599037,4.084126,2.697683,0.229252,2.319473,3.419898,2.691842,2.862251,1.123887,4.238697,2.806994,3.566230,4.909321,2.140993,4.405333,0.036405,0.167036,2.951400,1.557247,1.241383,1.389677,1.592015,3.644738,2.845980,3.945180,4.150983,4.214674,2.073221,2.106367,4.631329,3.308818,0.402336,2.710935,1.780036,4.937175,0.068277,3.060904,3.618115,1.444534,4.868208,4.297683,4.578264,0.096160,2.849361,1.473251,4.245143,3.164248,2.694385,0.572941,2.701114,3.159521,4.779562,2.925255,4.837003,4.808031,3.251002,2.529540,2.330109,4.451893,0.141283,0.569041,0.510359,3.784677,1.698255,3.189843,3.018915,1.929140,2.657839,3.225693,4.704752,2.878170,3.071838,0.339279,4.761079,2.640410,4.006367,0.251455,2.104551,1.284877,1.334879,3.957269,3.119334,2.198727,0.052929,4.824640,4.810116,1.087761,0.206732,2.650997,4.757054,4.551979,2.923314,1.517744,1.649804,4.489568,2.458920,0.655581,1.242127,1.383975,0.617733,2.315222,4.580255,3.343913,0.362370,0.027474,1.381238,1.813465,3.883748,4.835028,1.937836,3.433450,4.974510,3.728333,3.180948,0.390374,1.616076,4.566961,1.005027,4.217952,3.481618,1.831622,2.645871,2.714032,3.570269,2.582780,0.665380,3.867273,2.031362,4.815469,1.417569,1.315394,1.667537,2.861585,4.474349,0.881408,1.398394,2.908399,2.271671,2.236614,4.103671,4.619392,2.406535,3.436759,4.005294,2.591832,1.471582,3.190423,2.925546,4.507814,0.262035,4.550657,2.672160,0.078381,1.723511,3.621668,2.442165,4.900795,2.113050,1.633176,4.108360,2.739533,3.411633,4.028512,3.357138,2.112037,0.623982,2.901241,4.487167,2.094462,4.553626,2.517639,3.104208,4.164942,2.822986,0.454847,4.904897,1.229247,3.552527,2.525567,2.393863,1.219704,3.610754,0.563941,4.952267,4.226868,2.672545,2.122765,1.432323,2.507957,4.397087,1.375032,2.502687,1.172750,1.685746,0.951303,4.952696,2.857487,3.664076,0.491250,1.830588,4.463199,0.422192,0.827416,3.127088,3.113945,4.191135,4.677464,0.709932,1.296869,2.137307,0.004516,0.349072,1.132456,2.405510,1.257614,4.383409,1.621364,4.623114,4.873936,2.249308,1.135644,1.458331,3.881668,1.366749,1.902914,2.392879,2.875556,4.980502,1.161049,1.767119,1.314456,1.805567,0.504023,1.799049,4.439325,1.492949,1.859674,4.722371,3.641895,2.583694,3.885964,0.615898,2.322452,0.591181,1.168091,0.709336,1.809006,1.908197,4.736543,1.320629,2.362144,4.056897,4.078088,3.751716,1.439169,2.474858,0.931058,0.941998,2.179206,3.692961,2.632921,4.433416,4.154544,0.158027,2.842095,3.045806,4.807876,0.116183,2.655519,1.023907,0.268315,2.937443,3.863021,3.874327,0.151442,2.034732,0.222548,1.239193,0.964404,1.075913,1.695592,1.387090,4.811400,1.762036,4.470863,0.905208,3.818734,0.306728,2.313806,0.027552,4.051454,4.752430,0.175537,4.669232,3.869269,1.794308,4.544383,1.481286,2.046477,0.483556,3.284695,0.148004,2.424526,3.415959,4.106188,0.749707,3.770452,3.595385,2.797853,2.923223,0.456354,3.002355,1.907611,4.337904,1.565494,2.882975,2.132857,4.381310,1.269583,0.394012,3.743279,2.064483,2.945492,0.131947,4.760549,4.388092,3.119340,0.085149,1.889882,4.893983,3.406652,0.804939,2.302984,4.833689,2.673541,0.123073,3.098860,1.356083,0.494230,2.014542,2.792615,0.085204,2.795234,2.556016,3.969542,2.117749,2.767252,3.710047,4.485729,1.900173,3.008167,3.473055,0.216353,4.003803,1.887151,3.351195,2.358320,3.511696,3.621655,0.957855,3.310871,4.256617,1.177836,3.790917,3.169126,4.775630,1.301233,0.771389,1.560605,1.289794,3.784164,3.665547,3.348425,1.081896,4.309034,4.782858,2.658029,3.246864,2.503460,1.417789,1.430738,1.567103,0.954250,4.509618,4.291991,2.308197,1.836257,4.695392,1.111867,2.767710,0.272491,0.956011,3.020135,3.310918,2.904979,4.348007,4.967026,3.819309,2.325459,4.169673,0.601937,3.416353,2.591689,0.890329,4.864668,1.692187,3.077117,4.392971,2.533444,0.575689,4.093695,1.766069,4.915334,4.419127,4.267247,1.781266,3.785649,4.931645,2.631608,2.353661,0.073329,3.501019,4.292388,1.237286,1.575123,2.503385,0.360401,0.448212,2.105554,1.306095,2.030187,2.271931,4.881367,4.721299,0.698651,4.412930,0.401033,2.538177,0.819550,1.829461,3.716701,2.122527,4.034756,3.594079,4.714197,2.670780,4.010740,1.614536,1.728729,2.002552,2.054579,0.516266,2.595495,0.484016,4.448811,0.309224,2.248472,1.423470,0.774347,3.919183,3.574662,0.729739,3.163828,3.962776,3.866661,0.461398,3.427564,3.580120,4.310831,2.540222,2.305470,4.825582,3.982561,2.793655,1.653085,4.226190,2.277182,0.463426,2.274521,4.359842,2.241411,0.071746,3.057427,4.979150,4.086243,3.086190,4.571994,4.067908,2.493197,2.956101,3.656464,4.232131,0.290882,3.874019,2.237517,3.303993,3.823165,2.697510,0.792574,2.047634,0.384365,3.446503,4.768531,3.976264,1.948932,2.921457,1.521003,2.705228,1.503635,3.691624,1.296708,4.820102,3.309744,0.343889,0.053889,4.985232,1.102528,1.562814,1.042070,4.640509,3.260064,2.521932,2.788254,1.589364,3.070875,2.098002,0.996141,3.283025,1.869203,3.925332,2.076975,2.541357,3.937332,2.239390,4.831106,3.965143,4.132152,4.769602,1.944253,2.900401,3.467959,3.367292,4.764684,1.441743,1.456808,4.590022,3.996528,1.016783,2.850234,3.728819,1.765182,2.171911,2.876983,2.335543,3.765212,0.029694,2.173163,1.687907,3.045820,3.879792,0.380726,0.790299,3.325408,3.692012,2.941009,4.914017,2.497307,0.681462,3.431455,3.010378,2.952107,2.729268,4.695479,0.645782,0.365986,0.770586,1.224951,2.964732,3.062126,1.163009,2.446127,2.410309,2.265554,4.017726,2.358465,3.791827,0.832406,2.659837,4.120524,0.888583,2.324611,3.045397,0.923873,3.783828,0.394981,4.732078,2.341107,1.680615,0.584035,2.162983,3.299020,0.472436,1.531345,4.180088,3.230905,1.031865,0.804549,4.522425,1.435101,0.897501,4.999820,1.545959,0.623701,2.308788,2.171726,4.634012,0.671025,0.455682,0.464893,4.521437,2.246846,0.753033,2.969150,2.688117,0.992034,3.015191,1.701156,1.191854,2.552003,1.458246,1.110700,4.398612,0.778813,1.402950,1.930692,1.368192,1.053553,3.855730,1.645081,0.562565,2.704476,0.627442,1.787598,4.409134,1.845806,3.162545,2.573128,0.688624,3.245348,4.280175,0.466062,3.768400,3.451056,4.333303,0.520460,1.528477,3.471457,0.110090,3.670378,4.289893,2.266520,2.171650,1.392345,0.025259,0.931518,4.899321,4.336430,1.332523,4.818744,1.838563,1.487927,0.764038,4.508055,4.934962,1.637057,3.517152,1.676517,0.524954,1.963462,2.757850,0.615084,4.091364,2.486816,1.171915,2.963798,3.966297,1.638122,3.507382,2.139296,4.820256,3.854700,1.781755,0.088740,3.287599,0.989361,0.609396,4.658882,4.999745,1.349444,1.508843,0.824945,2.288424,4.329219,3.507530,4.231658,1.142408,3.652280,4.592633,1.407081,3.453268,2.003287,1.451133,4.848117,1.743166,0.539248,1.942946,2.238391,3.761054,4.749571,4.085285,4.654707,2.375301,3.596583,1.545248,0.347936,1.827368,3.489576,1.373111,4.307029,3.953864,0.970213,1.654184,4.126513,1.219689,1.658011,1.715335,4.005210,0.185151,0.368935,2.892258,1.985560,3.164427,1.332306,4.547913,3.804709,0.338731,3.919527,4.847912,4.712178,3.677419,0.617969,2.880384,1.421164,4.851065,3.587429,3.053828,3.475440,2.189896,1.863684,4.678998,1.659636,0.207181,2.004201,3.951702,3.242342,4.810854,0.531009,4.557732,1.844246,2.370013,2.142411,0.582261,1.238982,3.711358,0.115038,0.669439,0.126051,4.286940,3.086624,0.849643,3.843861,4.834003,4.672802,4.607738,0.039051,2.945067,1.283163,2.823236,1.590151,0.768333,2.222469,2.475482,4.948828,0.211939,1.505776,4.259469,3.298477,4.133415,3.301455,3.797682,2.464609,1.024388,4.050019,2.839103,0.697526,4.024470,4.792930,1.730819,1.467561,0.408876,3.322456,4.794808,0.679963,2.425798,0.491191,0.170550,3.322505,4.338436,1.687853,4.378826,0.585265,1.189803,4.508034,2.542549,3.040962,0.190091,0.641950,0.278954,4.525004,0.673975,4.248364,1.755173,4.002987,1.825218,1.338420,0.468304,1.403533,2.357399,4.087544,2.262575,4.857178,2.708165,0.124728,2.076837,3.444496,1.171458,3.493150,2.518487,0.128689,3.871765,2.801869,0.412468,2.376070,1.436464,4.398408,1.424635,4.708435,2.730664,1.618069,4.067725,3.487002,2.069812,3.148092,3.892921,4.257789,4.082064,0.830385,4.141948,0.293145,1.000853,3.114634,0.573463,3.016738,1.539828,2.147333,1.575758,0.350868,2.503794,4.817997,3.058917,1.500159,4.780749,1.946186,3.487589,3.170564,4.764554,4.573013,0.740020,0.428429,4.048212,4.524716,2.464868,3.453806,0.348941,1.099022,0.746881,3.005803,0.987699,0.299232,1.511036,3.386062,2.889319,1.653625,4.167394,1.381346,1.302738,2.799737,2.391078,2.229863,0.778928,2.523231,1.295095,1.960899,3.667852,4.684314,3.869315,2.028169,2.965166,3.732489,2.071105,1.801241,0.676216,3.681304,4.192543,1.582922,3.917539,3.051065,3.920415,2.056687,3.737882,2.042546,0.443790,2.752895,2.271644,1.264399,4.460567,1.914267,0.195631,1.910679,2.122549,4.308189,3.995916,0.999833,4.195146,1.239636,1.709671,0.384092,0.276782,3.404301,4.616705,2.465084,4.220469,3.968756,3.323394,4.891145,4.010940,1.374222,3.945071,3.463308,1.997602,0.383987,1.071798,3.986189,1.242426,4.989290,3.469941,2.386112,2.852183,3.054364,4.844724,0.808706,1.361979,3.547955,1.199290,4.356486,1.732671,0.904197,0.238104,2.977975,4.126411,1.368966,4.587697,3.788671,0.306503,2.863165,2.837205,1.011862,1.672722,2.291394,0.240389,0.748882,0.820022,1.896179,3.736787,4.156518,0.814245,3.759530,3.353550,4.453437,4.843956,0.622303,0.403369,3.998651,0.810854,0.972873,4.410180,4.694824,1.592356,4.210841,4.294285,3.026952,2.830442,2.879192,1.506446,3.094335,1.217901,0.888161,2.064752,3.528902,3.107138,4.824410,3.232280,0.706570,0.806091,0.465336,0.955869,2.989755,4.191432,4.469338,2.000219,2.792915,4.045998,1.560353,2.978345,0.870413,2.382702,0.865361,2.312132,1.984098,2.166324,1.218561,0.680217,1.378327,1.197900,3.671481,3.584875,2.922415,0.456669,2.831309,0.396185,0.090865,1.762981,1.202725,2.973238,4.643212,3.599260,3.836804,4.754466,3.170455,2.888655,3.009340,4.329026,1.940495,3.976681,3.261285,1.522858,0.068442,1.049600,3.499944,2.898452,1.372973,2.171512,3.305744,0.635431,2.161398,2.083121,2.713005,2.609568,1.838633,3.813668,0.336145,0.177692,2.101297,4.483471,1.387847,0.861547,4.641042,0.841116,1.874203,3.645078,1.304620,1.149248,1.988336,3.936824,4.554917,0.156463,0.825541,4.793006,2.963956,2.757051,4.067718,0.198916,0.069181,4.837470,4.142853,3.736909,0.778504,2.383020,4.686468,4.667998,0.046236,3.762457,0.031189,4.921509,2.084836,4.867594,1.838734,1.465936,1.581460,3.653395,0.998364,4.320288,2.952863,4.849555,4.935425,0.925910,4.778910,0.232692,0.139319,4.719323,4.811984,0.736238,2.212079,2.470463,4.301406,3.139586,3.872832,2.425484,3.242069,3.677047,3.689406,0.008689,0.499540,1.818302,0.305987,1.914949,1.947834,4.601168,2.835359,3.531756,4.435993,2.210647,0.009811,1.426680,4.070794,4.509206,1.757548,1.469956,4.622526,1.755369,3.261226,1.401546,0.489594,2.506182,4.616159,3.093204,1.044133,3.412148,3.841806,1.603803,2.796047,3.409766,0.801766,4.820505,2.256260,4.898322,0.947869,2.418868,0.829268,0.050904,1.189376,2.015937,2.155654,4.432526,3.178386,2.172208,4.939988,3.071122,1.613315,3.456554,2.478500,4.405838,4.482556,1.836752,2.811695,1.328867,3.133184,4.961735,4.162943,1.832050,0.476902,4.833410,1.947924,1.466904,1.581677,2.449617,4.783757,4.933112,1.480634,1.757344,2.559033,0.040936,0.874183,4.680295,0.147176,0.504881,2.103235,3.657251,1.344391,1.529828,1.527365,4.363010,1.130488,2.812009,4.999656,3.642327,1.681753,3.827295,4.769579,1.867689,3.540056,0.379021,4.476484,0.481284,1.864625,2.712529,1.317888,3.246347,2.772144,3.585926,1.770697,2.730069,4.060927,4.053482,3.571200,2.709679,3.366306,0.434401,2.356586,4.300718,3.036824,4.708416,1.310893,0.481509,3.133067,0.454630,3.910677,1.283712,2.693759,4.056885,3.940177,2.479875,4.879232,2.488166,1.393957,1.512156,3.718214,2.185535,2.093942,0.102433,1.526391,4.301915,4.017522,3.732554,0.115642,0.134951,1.557325,2.372266,4.548706,1.923149,1.442625,2.855765,4.573471,3.693194,4.283331,0.910988,0.628322,2.720356,3.486854,4.774940,1.857672,1.732784,2.579271,3.424690,2.830119,3.615153,1.901575,4.310988,0.914878,1.579523,3.868388,1.678361,3.340773,1.438988,0.935522,1.503663,4.434966,2.304416,1.127076,1.607193,0.013855,3.779041,1.128387,2.989605,0.125548,4.172492,0.937224,0.023842,1.505939,4.602436,1.313071,2.517394,2.036149,1.471246,4.636768,3.944975,3.809567,2.630536,4.124308,2.292143,2.325948,2.468870,1.184551,4.618259,1.293753,0.990797,1.218759,4.086761,3.842728,2.135534,0.068910,4.878675,0.662655,4.257113,3.908615,4.690379,3.866993,1.656858,1.159570,1.888454,1.015436,3.597874,4.132593,3.232194,0.930464,0.186924,2.902006,2.313366,0.998520,1.840420,2.707331,3.164586,2.383219,4.856964,0.231132,3.291040,4.547790,1.182821,1.068536,3.811164,2.431869,4.960888,2.945618,4.617210,0.061053,0.772698,3.422095,2.082332,4.179823,2.144490,3.564983,2.830800,0.599518,3.589756,3.531859,0.578591,2.809557,1.678250,2.294249,2.113793,0.523872,0.790115,0.434043,0.962235,4.262222,0.122613,2.158086,4.004682,0.501291,1.138568,3.637199,3.237762,2.815119,0.858204,3.972655,0.707071,0.673989,3.975175,1.846117,1.563086,1.393360,1.624861,1.702938,3.481838,1.201311,1.626632,3.881058,4.565753,3.064180,0.525591,2.707923,3.138894,1.570263,4.140002,3.910394,2.876534,0.725078,3.486907,4.476743,1.250506,4.793429,3.856512,1.501608,3.084106,1.539240,0.497339,4.120743,3.329035,3.070003,0.710864,1.886886,4.383180,0.816522,0.239514,0.955757,1.250900,3.918213,3.240707,0.086714,0.086448,2.834482,3.166462,0.627109,3.052311,1.201760,1.683607,2.044158,0.580974,4.815468,4.868822,2.225008,1.287332,4.792972,4.090287,3.621143,2.309059,2.052894,3.896746,2.598068,3.302911,2.830965,3.560927,0.470525,1.888105,0.835446,1.210220,1.004121,2.516611,0.094965,4.819838,2.594819,0.262858,3.410269,1.344440,0.533838,4.151518,0.989538,0.523771,0.284532,3.642789,3.276356,0.040996,1.107403,3.523410,0.760704,2.883754,1.065782,2.246171,4.337115,1.512982,3.429862,2.191406,0.480776,1.803175,4.206400,4.865231,4.225408,0.811142,1.727546,4.155941,2.769480,3.880929,3.888916,0.355440,1.712033,2.395108,4.726124,4.491144,2.115160,0.478330,2.022711,2.679517,4.521986,1.474396,1.544321,3.135916,2.525958,0.979345,0.723636,2.447486,3.896955,3.894156,4.879018,1.913591,1.959947,0.009097,4.149587,3.233142,3.849611,2.353116,4.600967,0.145569,0.576406,1.880087,0.425530,0.439439,2.834363,1.080610,3.132676,4.646999,4.119411,1.242152,0.448315,4.750962,4.972480,1.872474,2.303386,0.726668,3.550904,2.109168,4.015076,2.886484,0.213919,1.674773,4.042981,3.440569,3.162660,3.362523,3.025184,3.205622,3.102106,2.667140,3.788736,1.847463,2.376192,2.007248,1.046052,1.609445,0.275075,1.627638,1.952915,0.466920,1.102276,1.247709,1.137351,1.751109,0.724381,3.657507,1.713274,0.611826,2.967999,0.898241,0.290282,0.816461,2.099974,3.467545,3.207504,0.026030,3.966453,1.678439,3.398578,0.163366,1.968941,0.098053,4.081728,0.934836,3.372740,1.385331,0.676756,4.651477,2.975123,4.453155,1.532997,4.149177,4.708412,1.975919,4.520655,1.675429,1.623000,4.978663,4.762052,1.143092,4.186010,1.712289,4.896217,4.249088,4.524597,2.868368,1.470757,0.987625,2.639360,3.357579,3.708943,0.851916,2.679440,2.180549,1.041121,2.764812,1.379569,2.675273,1.000547,4.499713,1.690514,3.051673,0.609665,3.150086,1.360202,4.782658,1.970771,3.037033,1.079067,4.307381,4.021665,1.228177,4.555243,0.200775,3.762866,2.289344,4.177297,2.327430,0.327910,1.132728,4.971874,1.670888,0.801526,4.029154,0.225349,0.332044,1.487594,0.237005,4.978563,3.455644,2.597932,4.025832,3.312434,0.866325,1.098169,4.338471,1.684807,2.238202,1.955679,0.260149,3.522869,2.700370,3.380700,1.391157,2.034570,0.963249,2.098413,3.267457,4.723445,3.317286,2.625799,2.081836,0.527748,2.385371,0.775540,2.910936,3.651235,4.732478,1.484264,1.984528,0.914760,4.389703,4.120386,3.874799,0.286450,2.783597,1.175068,0.598426,3.908066,1.057907,2.504058,2.630482,1.066410,2.461306,0.264099,0.000362,4.401610,2.077944,4.537099,2.481537,2.155541,1.479561,0.408445,1.548473,3.042351,3.813932,2.704128,3.791279,0.788758,2.916200,4.413016,1.089801,1.138345,3.742163,4.060284,1.240232,1.657849,3.158847,1.992159,3.120055,2.482150,3.868257,4.229443,4.319136,3.057625,3.062921,2.248234,0.138070,1.495901,0.318489,2.188926,4.247426,2.984010,3.377663,0.940040,1.309766,0.815661,4.213444,1.401565,2.811632,0.705643,0.619945,1.737917,1.651766,1.644266,3.004664,1.579951,3.843679,0.453354,1.623929,3.345966,3.014661,0.597578,2.197367,1.546107,3.159352,0.649351,3.352830,2.319163,1.374450,3.737220,0.939549,0.761190,0.076780,4.306502,2.461828,2.583578,0.573813,0.538881,1.668917,2.581153,3.504361,2.496352,4.157792,1.886962,0.140440,2.130761,0.425013,1.610272,4.925773,4.286771,1.182279,1.879812,2.155826,3.819342,0.167286,0.193114,0.585589,3.141625,2.072733,4.244628,1.420289,2.446260,3.533929,2.726006,1.584000,0.762714,2.703017,0.710783,4.696522,2.699453,0.874577,3.603213,0.517736,3.858224,2.286446,0.663310,0.186055,4.966890,1.371841,4.761243,2.509182,2.515077,0.455349,4.753529,3.664479,2.593639,0.601286,0.878383,2.160833,1.811294,2.790690,0.381720,0.201730,2.555515,0.142507,0.297760,1.881707,0.308895,1.927348,1.208753,0.938851,2.023399,0.599520,1.748197,2.174368,4.150015,4.664031,1.541692,1.463210,2.832591,0.687072,1.748561,0.266082,1.895341,0.570757,2.809065,3.207969,4.935458,0.975693,1.036011,4.737098,4.323204,3.080270,4.207036,1.048461,4.370144,4.336538,1.240561,2.541867,4.648871,3.395750,3.302596,2.798823,1.344158,4.892077,2.237548,1.557250,3.642904,3.038524,1.711207,1.518958,1.072533,0.392432,3.128555,2.528468,1.174242,0.275623,0.094505,3.692480,0.941266,1.333218,0.070561,0.753195,4.372229,1.210304,4.769791,0.821734,1.266307,4.338550,2.133042,1.339145,3.464069,0.256142,4.453026,4.207808,0.428985,3.993094,4.805852,2.460348,2.840767,3.398984,1.333635,3.248306,2.374338,2.027709,4.514008,3.989516,4.673038,4.183259,0.209053,3.032647,3.488184,3.324287,1.359782,2.128152,0.195146,0.470471,2.802560,2.912059,1.006146,2.241014,2.360386,0.056684,0.712604,3.121500,4.964101,3.251959,0.601083,4.107201,2.157689,0.418501,2.999123,1.140230,2.083909,1.591471,3.214270,2.155173,0.519910,1.078378,2.502226,3.945921,0.048716,3.062136,0.579409,3.020247,4.184038,1.142415,2.477574,3.870265,0.877887,0.762806,4.525229,3.473233,3.682867,4.219843,2.697129,2.442027,2.781287,3.585090,1.954687,0.475841,0.677984,4.869515,0.258588,3.558097,4.718408,0.646298,3.611322,1.512283,1.184825,4.263113,4.546768,1.735253,3.163238,0.879688,3.948797,4.406199,1.593362,3.264835,4.382088,0.076875,4.278676,2.860572,2.070077,2.613079,4.120310,3.610648,2.506324,2.438262,4.496289,1.161711,0.478508,3.393191,3.511059,2.841930,1.312683,1.479765,3.085216,1.364792,2.498106,1.660372,2.552191,1.146819,0.990302,3.669992,1.928638,1.162831,4.292102,2.008502,0.579351,3.540240,1.399860,2.826211,3.118465,4.812872,0.955506,1.420860,4.661099,3.591465,2.246655,3.673867,2.066926,2.050258,0.782084,2.610241,1.313322,3.167967,1.993031,4.268605,3.856813,0.739666,2.955460,3.568703,2.572205,0.569736,2.516237,2.164495,1.628772,2.912678,1.624362,1.177783,3.679506,1.066855,4.026441,4.895805,2.206194,4.061962,0.841839,3.986518,4.812336,2.585117,1.278599,0.804131,4.583134,1.622863,2.485019,2.167158,2.176078,3.826291,4.675792,3.183873,4.785691,0.952223,2.819686,3.427535,3.574882,3.779237,1.665751,4.410973,0.658528,1.392679,2.343570,2.959990,1.476421,4.539128,2.259234,0.501687,4.095259,4.827269,1.731638,2.773218,2.915353,4.008105,0.759191,4.206270,3.608048,0.174600,2.834576,0.140169,2.482200,2.997066,3.174399,4.634393,1.485285,4.222829,2.261106,3.334699,4.039717,3.620206,3.977503,3.180348,4.003903,4.545067,4.522094,1.639441,4.859864,0.288335,3.082013,2.476123,1.152380,2.675740,0.329773,2.768571,4.272327,0.704862,1.626761,3.155616,1.796506,2.075015,1.692254,2.413349,1.865980,0.721242,0.994064,0.396233,2.338285,4.227020,0.452755,3.293627,2.101116,4.356905,1.816568,3.472217,1.995561,2.709742,3.874728,4.839285,0.674437,2.645485,0.661343,0.152519,3.739753,4.916357,2.977016,0.362163,0.308640,1.572737,1.904420,0.019332,4.213415,2.342899,4.978538,4.420735,2.503882,3.135291,1.572760,1.516781,0.651025,2.727001,0.408356,2.234298,1.608622,3.952667,1.907228,4.507477,0.947652,4.652733,2.966433,0.601208,2.510751,1.339591,3.745182,3.256547,0.313683,2.087731,4.435681,2.039135,3.718153,0.566913,4.334583,2.512159,4.737861,2.686606,3.846128,4.860569,3.646735,2.886367,1.833541,0.212625,2.162729,2.062402,4.115311,0.946264,3.713224,0.187818,4.431827,3.339713,2.112219,1.327539,0.922005,2.928226,2.051193,3.715114,4.533873,1.478258,3.249502,2.113611,0.213695,3.077163,1.818513,0.068630,2.361400,0.458345,3.140848,2.632482,2.501744,4.684396,4.402137,3.569670,2.887704,1.261847,0.040814,0.598174,1.601471,0.983639,2.850019,2.674749,1.948957,4.002723,3.655786,3.439414,2.513376,0.217226,2.140139,2.495909,2.239238,0.022373,3.262144,1.286964,0.223294,2.517343,4.602737,0.147201,0.068708,2.938740,2.714931,0.078532,0.515344,4.181973,2.263192,0.621936,0.779602,3.057114,1.643330,0.128526,3.180092,0.161765,0.551400,0.793841,0.716390,3.807815,0.467227,0.743208,2.235078,0.700418,3.734680,2.438729,4.398217,0.190579,4.275992,0.769055,4.628174,1.630206,2.553915,0.118470,3.645695,1.068856,4.583084,3.308935,1.418096,1.304543,0.852396,4.009353,2.192384,1.384728,4.764098,4.011204,2.931515,4.012243,0.600634,3.360819,1.620758,3.437545,4.808286,3.901798,2.827794,3.727666,2.341658,1.399726,0.203170,3.386015,0.712957,2.296740,3.333773,4.456470,3.046818,1.088623,2.370278,3.338100,0.976588,3.660859,3.819121,2.612647,4.294006,1.123699,2.688687,4.470821,3.520758,4.034372,1.110465,2.863903,1.620214,3.294582,2.613048,3.127444,3.088350,3.682179,3.994411,0.309389,4.741884,2.032225,0.850485,4.609901,3.919957,2.101769,2.999573,1.130986,2.065652,2.004700,3.770202,2.158615,3.774356,3.950397,1.928099,2.200317,2.603580,0.017553,0.975275,4.235686,3.804702,0.385758,3.174488,0.103677,2.671018,0.807408,4.267262,3.074076,0.319911,3.206269,4.460991,3.668532,0.576012,3.325466,3.053513,3.156759,3.975811,1.522096,1.777343,1.009081,2.285880,2.049217,0.420509,1.213033,0.599638,2.772542,0.936333,1.628011,4.085267,2.859246,2.597916,4.721814,2.186757,4.418205,2.889270,2.026677,1.730360,4.516890,2.826227,1.258568,2.597344,1.248854,1.203344,0.645707,3.446546,3.905218,1.618060,2.046483,3.965340,0.081516,1.664155,1.537972,2.717258,4.474346,0.202584,4.213857,2.785639,2.938335,4.784828,0.641416,1.383218,1.150259,2.344200,2.899149,3.639315,0.265196,2.130647,4.621372,2.312964,4.088114,0.559899,1.448408,3.676984,3.106771,2.215763,3.344570,3.854842,4.487544,2.201776,3.213048,1.907301,4.635249,2.403418,2.052615,4.697356,0.009806,1.659855,4.191028,2.257242,1.741932,2.939082,2.023379,1.647518,1.329867,1.565227,4.620810,4.798365,0.494153,3.677069,3.288813,3.154843,0.164217,1.367270,3.730514,2.479034,0.119442,2.632578,4.239024,4.392101,4.493130,2.636662,2.334838,1.221723,4.330388,3.999286,4.317874,1.129725,0.489515,3.492225,4.565756,4.582884,2.643157,3.210526,0.560406,1.376439,2.688755,4.403844,2.420699,2.963541,0.277682,4.823270,2.462136,0.801352,1.694855,2.566537,0.692572,0.983234,4.579485,4.362763,0.611511,1.394990,3.177922,1.298768,0.010419,3.506073,0.965393,1.624778,1.419682,0.761846,0.678426,0.724567,4.837458,3.634254,4.700377,2.857700,1.655044,0.819634,2.416781,2.466993,3.887349,2.642197,0.974252,4.070954,0.739580,2.644570,0.212346,1.845905,3.359366,0.693543,2.624400,2.694196,4.546776,2.333147,0.391754,0.729686,1.378043,3.994770,1.275542,3.047146,0.391908,1.010727,3.095714,0.490694,3.577713,2.245501,1.397876,4.369501,3.365791,0.320922,3.350988,0.991896,4.601295,0.768660,3.083448,1.212033,4.710832,1.622336,2.948183,0.647547,2.396860,3.044181,3.853481,2.785337,3.517994,4.295408,1.492784,1.700835,0.147869,2.771309,4.857655,3.680513,4.962928,2.271760,3.737368,0.806041,2.110032,3.218069,2.251560,0.148611,1.584213,3.380339,1.975969,2.242025,4.280896,1.346954,3.079658,4.228853,4.035753,1.193618,0.255449,1.384139,0.882017,0.138554,1.521808,2.604057,3.251595,1.889476,1.021415,2.846530,3.761832,3.474758,4.284923,1.319335,2.515049,2.442187,1.607913,3.432105,0.671171,4.025746,0.183096,1.940899,3.036602,2.121820,3.278461,0.194003,4.335803,0.388286,1.438732,1.466845,0.059068,0.470119,4.259420,3.879074,3.689967,3.446481,0.372650,1.493287,0.032866,0.302605,0.189438,0.994670,0.281418,0.084419,1.224574,3.994270,0.281555,4.922746,3.287916,4.334104,3.303505,3.884369,1.503894,1.286623,3.322125,2.815772,2.528316,0.886276,1.153243,2.748626,2.049590,4.812561,2.764112,2.158558,4.752994,0.458069,1.358910,1.731972,4.267513,3.832060,1.523571,4.362817,0.312783,2.467335,3.273421,1.560972,0.345855,1.285802,2.418859,1.590532,2.078359,0.465623,0.071368,4.388063,0.390559,1.464123,3.320227,4.222522,1.606314,3.260343,2.360656,0.255065,2.041815,0.149240,4.820951,3.810919,1.696462,1.173702,2.001636,1.580822,1.853972,4.593572,2.022626,3.706997,0.784065,2.668405,2.468670,2.956160,3.399437,4.305097,1.149836,1.907671,0.285914,3.120906,4.673800,1.980986,4.858755,2.989376,1.056234,2.647645,3.200228,3.331364,3.190209,0.948070,1.041553,1.207315,3.664970,2.496773,3.356278,3.996817,2.820348,2.355705,2.012575,2.681314,0.747892,3.932228,4.563796,4.061825,4.109478,4.147007,0.878246,4.979064,3.285929,2.104635,4.440119,2.911756,4.968123,3.760368,1.837554,3.712811,3.650550,1.564954,4.420876,0.703825,1.826368,3.181371,2.395696,3.390779,4.986768,0.389983,3.794844,4.087123,1.411007,1.275780,2.206788,1.969284,2.539095,1.057921,2.469002,4.063762,4.414417,3.333811,1.440652,4.366226,2.106140,1.159036,0.672987,4.808344,0.439896,2.648802,1.010886,4.341402,0.972633,3.682399,0.825580,4.690561,3.316625,2.075604,4.812413,2.620254,1.920369,0.812378,3.605447,2.981665,1.114464,1.249809,1.101911,2.479209,0.236447,1.446237,3.683120,3.106150,4.092981,3.724125,0.106387,2.847846,2.192084,1.806500,4.961908,3.284817,1.255350,2.664330,0.476160,3.726366,1.738259,0.844417,0.812107,0.076144,3.889401,3.643499,2.425129,1.529824,1.958058,4.420442,0.606499,0.147824,1.078622,2.603428,0.038415,0.521324,3.489320,2.240314,4.743195,4.553833,1.382289,1.888580,4.590859,2.896288,1.848610,4.002034,4.622521,3.367465,1.154518,4.096303,2.102631,3.490233,2.431768,4.704325,0.341876,0.778984,0.972841,1.105003,1.177138,0.764251,3.464588,1.090779,1.177267,0.986941,1.993436,4.792966,1.833901,1.488121,0.342998,1.762638,1.160980,3.814637,0.558141,0.718405,1.392552,1.440134,4.231525,3.956418,2.893178,1.442943,1.594392,2.961091,3.699333,1.920490,2.547810,4.440166,3.248954,2.677751,0.356112,0.880076,1.004958,3.115741,0.540564,0.144974,1.801753,3.594296,3.466247,3.963352,3.481241,3.066428,2.430810,1.042492,2.842740,3.183124,0.618717,2.825737,0.488744,2.735384,0.794594,0.595068,0.565500,4.555127,2.990437,1.250794,0.357244,2.680907,0.724015,3.892015,2.480548,3.632244,1.978633,3.511614,3.423072,2.807081,4.228698,2.912368,2.890552,1.539916,4.657531,2.585698,1.958573,2.708211,0.726211,1.325626,1.533409,2.575794,3.477554,1.436012,0.678830,2.796091,4.273249,2.091160,2.378865,1.446043,4.044171,0.603325,0.855444,4.999783,3.411079,2.740262,3.975540,4.984412,0.954371,3.956965,1.710810,3.656163,3.538299,4.991650,0.559360,0.010627,3.738922,2.843885,3.454371,3.767625,2.467533,1.782673,3.851879,1.900650,3.110961,4.467030,0.791957,0.044531,1.283783,3.987360,2.834128,4.730804,2.739370,1.328907,3.829427,3.287752,4.103417,3.339992,2.259745,1.385413,0.278002,1.539681,0.231292,2.150135,1.129000,3.518238,1.100893,0.407159,4.193986,0.300164,3.754792,4.647127,0.535646,2.798340,2.258634,3.993550,3.117400,1.391367,0.007345,2.414339,4.470544,4.526816,0.626485,4.303385,0.172156,0.461746,4.831104,1.934837,0.353919,2.352277,0.230685,0.081851,2.808751,1.056031,3.109563,1.673496,0.662385,4.922009,1.249707,0.309886,1.394183,1.258500,1.498232,1.778371,4.025826,0.298922,1.772663,0.518728,4.910983,0.719859,2.395175,2.400217,3.905891,1.360729,3.688869,0.131693,4.635752,0.494778,2.404148,0.867149,1.843084,3.210103,0.712361,1.445543,3.395912,4.222723,2.964489,2.614923,0.548045,0.732702,4.790957,0.013124,2.422093,3.781712,1.049815,2.297819,2.465306,1.301986,4.393756,4.625781,3.746684,0.043183,3.144628,1.160559,1.335923,0.919020,2.862057,2.233593,0.967821,4.663205,1.196116,3.893695,0.123455,0.917401,4.094330,2.682133,3.230538,2.144492,2.178161,0.627020,0.854963,4.594985,2.288161,2.362275,3.331654,0.070635,2.663471,4.426678,2.086523,2.063018,2.266551,4.275510,3.050005,3.736755,3.590751,0.254299,4.883498,3.531041,2.900626,0.225883,4.590406,2.347784,4.555962,2.092035,2.886525,4.468590,2.304155,0.897657,2.125325,1.908133,3.654315,4.203668,0.056661,2.474076,1.336335,0.822163,3.328528,4.177728,2.722029,0.968971,3.756427,2.606663,4.023191,4.823614,2.096755,1.595010,1.410398,3.454932,4.859387,1.429095,2.311391,2.881655,4.769618,1.235726,4.808165,2.620130,3.641935,3.906704,0.823046,4.873723,4.880603,4.330850,4.216774,1.631322,4.260332,4.441640,1.332632,0.853281,3.784894,2.888676,0.539316,1.997528,1.660000,3.303454,2.102026,3.243381,3.996940,3.535363,3.087677,4.532339,1.238909,2.537782,3.780558,1.120172,1.058468,3.421365,3.903196,4.431824,2.241568,3.581480,0.854748,1.573796,3.160604,0.739418,4.778412,0.639287,3.883821,1.593069,3.664526,2.023789,3.738144,4.501692,2.980717,0.819640,4.755347,2.662428,1.197137,2.042137,3.605463,4.676502,4.532932,0.701446,4.358948,2.950836,2.048397,2.321835,3.973059,4.223875,3.289484,0.292306,4.042318,0.128721,1.938841,2.220837,2.530533,1.279767,2.095331,3.936492,1.356332,4.066254,0.062879,0.713994,4.626503,2.352000,0.253988,3.052216,2.280035,0.442938,1.739812,3.072130,3.138543,4.434515,2.462530,0.523689,0.567766,2.084017,0.926606,4.604769,1.060391,1.881849,2.561909,1.652011,3.322981,3.026278,4.696838,4.159795,3.014808,2.233559,3.073873,3.115330,1.347888,0.890088,2.595038,1.536316,1.926152,0.008318,3.408390,0.290077,3.677357,1.039799,0.823825,3.002781,4.917365,2.110348,4.346596,0.309204,2.543341,3.408829,1.876946,0.647348,0.077032,1.933712,3.713692,4.952759,2.315363,1.474586,1.733334,0.459655,2.250566,3.135643,3.117887,0.063845,3.168660,3.328432,2.510123,4.724396,1.290224,4.259580,0.871108,1.309776,1.024494,4.426597,3.967628,2.252419,1.890115,0.064506,3.509698,4.824691,3.892597,1.165383,1.322510,2.114014,2.038658,1.161688,3.958089,3.930428,3.532354,0.024803,4.586891,1.687791,0.144094,3.187095,3.687996,3.354805,1.954581,4.305830,1.782543,2.691291,4.608783,3.639477,0.473342,3.885693,4.508455,4.126941,2.383826,4.125739,0.378145,1.271133,4.334334,0.206939,1.990270,4.302349,2.229274,0.423104,2.295563,3.661080,1.581960,4.532655,4.703982,0.838828,0.466932,1.496784,2.345213,0.785070,1.207842,4.666494,3.574400,2.989730,3.539779,0.013629,0.727607,3.458751,3.574842,4.264865,2.927751,2.786250,1.988189,4.082780,4.260115,2.257965,1.877964,0.252025,3.960383,3.365285,2.196010,2.523427,4.480261,4.388370,0.895418,4.245047,2.548695,0.530590,1.557419,3.434729,4.467170,0.541749,3.048266,3.390645,1.380885,3.783203,0.516642,1.198384,0.002455,2.513690,1.317180,0.390337,4.404407,0.993325,2.836599,1.357327,2.987498,3.271483,3.627956,1.478630,0.236276,4.286358,4.846469,4.431124,0.413050,3.925681,2.430017,3.160607,3.058576,2.675156,3.375390,3.081607,2.884204,0.714123,4.324687,3.767477,4.821846,3.958715,2.912606,4.585838,3.271314,1.550648,0.877517,3.021539,3.680871,4.120811,1.426440,4.510001,2.889856,3.615465,4.040664,4.656410,1.449952,1.962333,4.499837,4.172381,1.995681,2.336691,3.585738,0.306248,1.836593,1.031151,2.593976,3.860512,0.649624,4.933672,2.335559,3.865083,1.762082,2.440684,4.824321,3.451311,0.128266,1.159911,1.296304,4.794535,3.847843,3.393153,0.348254,4.019073,0.908366,0.743902,4.344250,0.025186,0.316399,4.597030,1.257777,3.871691,3.285866,0.561162,3.974645,1.036955,3.477133,1.904267,2.723799,4.731032,1.295899,1.505497,1.462627,1.850114,2.883117,4.001256,4.465568,0.305944,3.250483,2.962023,3.004695,3.966667,4.689281,3.741281,0.858124,4.773256,4.326030,1.498277,0.611262,4.029953,4.881759,0.637436,3.256797,0.049184,0.177465,3.925911,4.077918,1.746731,2.239802,3.897386,4.288523,1.380504,3.921439,1.004390,2.236711,3.594486,3.428992,2.511445,3.349367,0.252664,1.441336,1.081365,0.408965,1.038446,4.300151,4.481397,2.665531,2.421976,2.315838,4.795225,4.704093,1.082440,0.474959,0.271916,1.788317,2.087714,1.238379,4.601125,4.185770,3.722315,2.419482,4.432479,4.725937,4.438360,1.306806,4.321137,1.751836,0.616341,3.718112,4.044423,4.933904,2.404787,1.255113,0.326958,2.065918,2.887143,2.482490,0.813938,1.857727,4.589532,2.296469,2.561117,2.359558,1.923576,0.303135,1.145923,2.499989,2.922164,2.390690,1.819464,4.017487,3.473828,4.727101,0.138678,3.720397,0.306879,1.454897,4.585510,3.876776,3.310096,1.998482,0.249138,1.301264,2.404344,2.113892,2.290663,0.151555,3.165371,2.254828,0.083944,4.696067,0.988502,0.847948,3.775470,1.743316,3.057742,0.029831,2.157169,0.124170,1.047809,0.973587,4.854634,1.512065,4.196257,2.103783,4.310647,3.313936,0.035462,0.558001,0.156725,0.452225,1.101570,3.927913,3.668403,1.223568,1.952115,4.297440,0.361606,2.824079,0.575140,4.970274,2.208231,4.576356,0.764914,4.951531,0.296520,0.294612,4.116186,3.882961,1.239684,1.234230,2.363275,4.718013,3.129433,4.162648,4.335517,0.672247,2.894043,4.934704,0.478226,2.217732,3.824267,4.947885,0.598581,2.022197,3.764803,2.970400,4.393265,0.510733,2.712563,3.045970,4.071323,4.228113,2.370825,3.021625,0.039264,3.445145,0.077230,3.235442,2.529480,4.770299,0.815370,1.918884,4.286488,2.570477,4.073122,2.537127,3.412010,4.407713,0.274079,4.404290,0.894803,3.776485,2.829156,1.664612,4.792549,4.207167,1.427786,1.013416,1.794953,1.660579,0.798786,4.687038,4.438125,4.374225,2.278557,3.948001,1.801788,4.302994,4.532225,2.691500,2.380961,2.663495,1.190611,0.459293,1.934600,3.920373,3.408759,4.204364,2.257341,0.621360,2.613126,0.197450,2.154342,1.007084,4.221240,0.644630,2.373187,1.925688,4.226925,2.808124,2.374773,2.980970,1.160706,2.606918,1.750188,0.544590,3.957493,1.803977,1.394556,0.002848,0.190022,1.259222,1.647651,3.495638,1.842280,3.982624,2.935831,1.752835,0.786987,0.006847,1.915571,2.033602,1.819456,4.012020,0.477776,0.574511,1.167317,2.568664,3.629507,4.518319,1.335474,0.638997,2.546072,1.497962,4.922460,0.199213,0.954475,3.767794,1.931888,2.811191,4.077259,3.334316,3.017755,3.409118,0.321223,0.488996,3.037745,1.839222,4.978571,4.103295,4.632392,0.902316,3.123651,0.139387,3.675712,0.211108,3.370398,1.061844,2.955955,1.379873,0.112014,3.427685,2.243296,3.621153,0.281422,2.651017,0.271332,0.719235,3.922066,1.143362,0.466618,0.709044,0.707161,4.219119,2.949713,3.961745,1.286095,3.131704,4.494538,2.669777,4.353670,1.090229,4.834634,0.398462,3.805542,1.008594,0.584439,2.795130,1.585111,1.112600,2.195616,4.942107,3.163388,1.393015,4.929511,1.395833,3.598258,1.316664,3.871532,3.219921,2.863534,2.294474,1.214216,3.047136,4.371738,0.156527,3.663349,4.399613,3.084439,1.292153,1.757375,3.744024,1.834112,0.040366,0.527591,1.426702,1.965849,1.821624,4.032139,1.107914,2.051567,4.071134,3.967186,1.026127,1.820365,0.781566,0.450500,2.770966,1.597461,2.568446,2.939549,3.030961,4.703826,1.173246,4.490426,0.256543,0.151914,0.543840,3.218446,2.651468,0.810616,0.739525,2.647147,4.795029,0.913650,1.295648,0.602916,2.973009,4.633846,1.190076,2.362106,4.538073,3.541416,2.641433,3.196534,3.654198,3.642392,2.424886,1.407380,1.030873,4.593069,0.291233,1.685366,3.450251,3.000345,2.166093,0.521164,0.697640,3.482614,2.418483,1.697754,1.873968,2.143430,3.415283,3.004739,0.352415,0.787389,0.352778,0.172951,3.880025,4.254795,2.080889,4.844204,4.317989,4.301925,1.835922,4.771736,3.744649,1.768462,4.444164,0.020561,2.857955,2.600864,0.408950,4.311782,1.408556,1.881750,2.375767,4.084674,2.974690,2.819786,1.811888,1.398423,2.390601,1.278668,1.697557,2.201882,4.217504,4.652553,4.148707,2.628499,3.557786,1.676043,2.295985,4.702448,1.774737,0.864928,2.360470,3.262958,0.632571,0.610507,1.518474,4.538246,3.373019,1.109671,3.017438,3.301199,2.615273,3.796912,0.123695,0.955586,4.831859,2.488700,0.382574,1.540898,0.008862,2.897071,4.997391,2.950497,3.050365,1.638633,1.185163,2.540783,4.498931,0.048756,2.848254,2.142555,3.105897,4.199790,2.245220,1.088414,1.883035,0.752757,0.424496,1.879382,3.128493,1.314177,4.578421,3.444756,3.431567,3.458553,0.008422,4.065034,4.588043,0.096990,2.991470,3.382879,0.981213,4.191056,3.129157,1.125275,4.835951,1.079328,3.392939,2.369449,3.616424,0.488796,4.762726,1.022445,1.101920,2.770143,1.748666,2.210648,0.185492,1.174422,3.867666,4.511076,1.167387,3.866745,0.144733,0.223621,1.965046,0.739556,0.830693,3.136985,4.290821,3.894836,1.682469,4.376080,4.206730,2.621058,2.379380,0.292312,0.752625,0.427066,2.633863,3.383192,3.093910,4.364426,3.293512,4.148538,0.702126,0.858240,4.592061,1.773523,1.084994,4.560346,4.850523,3.188848,1.941693,3.441929,0.077789,0.723561,1.843572,4.161123,1.521580,0.289359,1.893676,1.206271,0.280300,1.994621,1.757107,3.669200,0.316024,1.895272,1.712168,3.234108,4.439604,0.714949,4.081269,3.048617,0.146213,3.834443,2.688440,3.999644,2.044340,3.327514,0.994021,0.959223,1.701312,2.597203,3.582634,3.334024,4.106723,2.131985,4.562646,0.545839,0.936017,3.418588,1.268863,0.822953,4.432469,0.342004,4.957356,4.312947,4.341289,3.143565,1.124278,3.990458,0.269003,2.910577,2.195798,3.752034,0.118841,1.933928,2.385472,0.761796,2.073601,4.552388,2.343171,1.258881,2.661675,0.304212,1.471343,3.918184,3.209571,0.119924,2.849380,1.086700,4.878749,3.918435,0.639540,1.927728,2.449848,0.911859,3.521419,4.206894,0.022323,0.666117,1.417314,4.920551,2.022639,0.851260,0.604636,4.506781,4.051220,3.096503,2.698478,3.885769,1.590753,3.199273,3.684227,2.878244,0.843660,4.929524,4.055978,2.453135,3.099851,3.800380,2.292926,3.695581,3.864639,2.295037,0.938841,2.988835,2.771444,2.502468,0.292910,3.887816,2.693541,2.153257,4.074461,0.984423,1.358407,3.198635,1.950290,1.515346,1.273080,2.428654,3.877684,4.026630,3.952849,4.428226,0.253709,4.911084,2.132307,0.964911,4.850114,4.125912,4.648618,2.615769,3.738709,2.597320,2.697251,4.757505,3.691785,2.833889,1.963676,0.821638,0.578652,1.498331,3.464022,0.957763,0.657311,0.388787,4.231247,1.205949,1.004252,1.954269,3.147431,2.931299,4.618289,3.409861,2.809858,3.557991,3.318617,3.837392,2.862132,4.036454,4.500287,3.482384,1.788099,1.399891,3.185928,3.157146,0.119553,3.735547,1.109372,0.272451,0.765996,3.283904,2.615273,4.234689,0.531264,4.147583,3.254589,1.074648,3.684528,3.706666,0.540008,1.332234,3.194325,1.902873,3.826225,2.680212,4.284985,0.555130,3.668734,2.323200,2.596955,1.420228,1.345316,0.949019,1.866728,1.194939,0.948640,4.808980,2.237071,3.390612,1.870741,2.848969,2.496011,3.063441,3.613644,3.319546,3.810517,0.731522,0.470156,1.694497,2.409139,1.122013,3.866123,3.597780,4.567895,3.644801,0.535727,3.324974,2.060297,1.298074,3.009757,1.510951,2.654282,2.879887,2.645335,0.053433,1.743695,3.952311,1.734478,2.546897,1.733160,0.996190,0.998767,3.744298,3.139763,4.660285,2.105023,3.182836,2.342698,2.369689,4.270437,2.271514,4.640834,3.102536,0.427121,0.339915,4.911571,1.996797,2.937294,2.157930,0.794482,0.627759,1.063481,3.026689,2.732668,1.642942,0.220871,1.620140,1.991517,3.782119,3.687420,1.107040,1.138370,3.139414,3.258882,2.805514,0.559857,1.428601,0.158516,3.807971,4.032517,4.602403,0.439578,4.531065,4.592126,4.988530,3.889443,1.313189,1.322794,3.441084,3.398663,3.301646,1.765604,2.598986,1.507487,2.983954,3.862011,3.493481,2.162527,2.623642,3.862092,1.164265,1.106493,2.424934,2.470682,0.117364,2.909732,2.088707,2.881899,4.574118,1.665590,0.539179,1.032593,1.532685,4.317350,2.745371,4.975410,1.425160,0.343634,1.505941,4.962975,3.715496,4.575307,2.974224,1.376817,4.772157,1.145782,1.985570,1.466939,3.217295,2.090049,4.785541,4.837100,0.484570,4.641665,3.989980,3.561687,1.813930,3.397786,4.053332,4.152124,4.028878,1.600118,0.925065,2.718877,1.271130,3.924926,0.223350,2.127043,3.892940,0.402796,3.434896,1.155316,0.636969,1.539434,0.096681,3.150112,1.664544,4.968556,0.489197,4.474421,2.489789,0.588504,4.280587,0.555228,3.229296,1.226088,2.245588,2.865100,4.598377,1.422569,1.938474,0.997979,1.718108,0.629059,2.740417,2.796158,3.116866,1.151762,2.161778,0.207145,0.201283,1.547314,2.445715,3.464870,3.793367,2.008905,3.778032,3.638020,3.162371,0.708149,1.436220,2.669384,4.069660,2.016569,4.835331,3.327003,1.565278,2.807170,1.875368,4.559906,0.241736,1.144578,0.482833,4.028098,0.955397,3.714237,2.807982,4.151080,4.974744,0.771184,0.752087,3.181078,0.181522,4.087090,1.883196,1.994674,2.860229,1.710477,1.501176,1.024846,3.594107,3.843063,3.040513,1.180169,3.473795,0.789295,4.391412,2.231630,2.379306,1.020741,3.077556,4.925244,2.945502,3.261726,1.442446,1.629257,0.981778,2.573008,0.739873,3.092406,2.326551,3.121559,0.353604,4.420285,1.892907,1.034657,2.503919,4.649104,3.471431,1.700434,1.519218,3.306433,0.444023,1.827051,2.393389,3.802587,1.627587,3.960759,3.913437,0.097316,0.952066,3.266971,2.480210,0.138182,1.798244,3.128868,4.958432,1.034372,0.763595,1.821842,2.754563,3.322497,1.804074,1.142208,0.026122,0.917235,0.500318,1.210549,1.612872,0.393692,2.029230,0.838130,2.906838,1.889387,3.198260,3.880772,0.423515,1.912393,4.888876,0.011548,2.294555,2.344548,4.118608,1.451135,3.880153,0.011001,2.453750,1.596602,4.040778,2.014736,0.349392,3.541935,0.066115,1.672083,2.491650,3.708712,1.565320,0.520487,4.126283,0.049113,4.365656,0.532488,0.628505,0.831144,0.741715,3.973895,4.054907,0.847340,0.562588,2.862403,3.498535,2.795199,0.138449,3.830441,3.570951,3.586298,1.036066,0.351414,4.986422,2.388986,3.631214,0.482087,2.524661,2.520483,0.614290,1.758038,4.457317,3.451075,3.658354,4.391444,1.551428,3.949724,0.482694,2.887744,2.670740,2.155961,1.045846,2.137633,4.221416,3.653517,2.203016,4.837943,3.926460,0.221303,3.753683,3.592689,0.246103,4.632786,2.335194,1.195637,2.241129,4.168902,1.252529,4.570464,0.323699,0.446785,2.996620,2.548985,3.357525,0.217230,1.301212,3.515723,1.722008,1.523273,4.098885,3.980315,3.724955,3.138127,4.772026,0.105285,0.763215,2.299441,1.403449,1.466797,4.901481,0.221102,0.129489,4.675724,0.800450,0.214886,2.292726,4.409453,1.530324,4.661257,4.326381,1.402089,2.177196,4.618690,0.616434,0.309467,0.943598,1.128106,0.896945,0.158560,3.588295,0.809760,2.276945,0.601942,1.827591,1.987338,4.564930,3.526584,4.530711,2.445482,0.846708,2.048166,2.968392,2.706226,4.481527,2.961889,1.283154,4.762932,0.869631,2.382191,4.438253,3.549609,2.676912,3.439140,2.188967,1.984029,3.139190,3.685041,4.687301,4.182728,4.803463,0.579431,4.947367,1.001509,0.404520,3.284053,3.367436,4.869111,3.855118,1.963292,3.000527,3.047272,3.827094,2.905490,1.932203,3.407291,1.200508,1.747756,0.358156,4.081151,0.354995,1.493984,4.628165,2.797048,1.089400,4.964436,4.403647,0.340901,1.151425,3.211303,0.994016,2.685890,0.829304,3.363528,2.656181,4.847161,0.669066,2.653606,1.558619,3.063444,1.016278,4.626962,2.189609,2.158857,3.931625,4.537591,2.469869,3.856446,0.719705,1.262046,3.464952,4.633736,0.586044,0.671936,4.876136,0.456182,0.214479,2.658772,1.122057,1.488133,3.089468,1.756232,4.978271,1.141105,4.326377,4.376114,2.187932,4.986682,1.414001,0.455319,2.835975,0.037359,2.370819,4.184019,2.098535,1.019962,1.278278,4.569041,3.311064,0.806559,2.315967,3.072969,2.525702,3.925444,0.031462,1.405322,2.872954,2.694499,0.520401,0.876081,3.764794,2.673927,3.199837,4.083761,2.919133,1.569747,2.616251,0.651958,1.360386,3.275652,0.205555,0.004255,4.435362,4.821644,4.528063,1.077308,3.773289,2.282340,0.354719,3.974931,4.040874,3.609888,4.982754,4.960586,0.897102,3.977062,3.299120,3.632340,4.954503,4.183096,1.957586,4.687328,4.375827,3.531168,4.684797,2.311334,3.566281,0.020436,2.842905,3.618445,1.915059,4.339591,2.425339,1.412757,2.747225,4.527579,3.412244,4.750397,2.238096,3.292397,3.141968,1.195616,3.722878,0.339958,2.875621,0.890075,0.941718,4.899158,1.922603,2.598057,3.325569,2.491455,3.629382,0.130151,3.383508,1.621967,4.396820,0.717040,0.153217,0.304755,2.610926,1.076243,3.765888,0.277630,1.174144,4.151208,0.228206,3.938064,0.558825,4.213795,3.920211,1.093779,2.009862,2.290023,1.968883,1.055158,1.130789,3.453479,0.757786,1.409933,0.315129,1.090542,0.189043,3.491694,2.022145,1.888341,2.428191,1.306473,1.801668,2.954828,1.122619,2.309840,2.874613,0.690470,1.534850,2.761061,2.006299,3.579973,1.156609,2.353619,4.105230,0.713847,4.474640,2.236229,2.399201,3.179542,2.709168,4.116251,0.933200,0.649523,1.317423,4.989067,0.494322,2.652259,3.866904,4.162981,4.787123,4.975835,2.761281,1.203934,2.599482,3.680161,2.383339,1.361551,4.110465,4.145574,2.753239,3.007800,2.567671,3.910687,4.435391,0.010060,4.868135,1.720604,1.995637,1.838416,4.221817,3.683963,0.894554,2.040468,0.013634,4.015567,1.181402,0.415083,3.303845,1.095478,2.745038,0.806025,3.950542,4.909868,0.537460,4.207063,2.448948,0.257054,2.606538,2.409615,4.457065,1.701959,3.787461,0.661530,1.942516,2.696794,0.907612,0.988850,1.226704,3.713982,4.717455,0.635776,2.739700,0.735519,0.271279,0.197285,2.144532,2.126614,3.320962,1.949659,1.148582,0.481517,2.855789,1.086693,1.885753,0.087652,1.245210,3.255014,0.615689,3.306777,4.302104,4.346845,0.786979,2.336663,4.472818,3.649631,4.331932,1.934465,2.495063,4.475570,2.145069,3.350839,2.122954,3.540032,3.066124,2.208017,2.745110,2.990744,4.395291,3.384356,3.568772,4.849633,0.338309,0.938068,1.590611,4.730337,1.142775,2.825473,0.588806,1.353336,1.380549,3.542331,0.544145,3.784922,1.517731,3.667352,1.832806,2.132005,0.629154,0.534210,2.709209,3.185351,0.460653,0.697161,0.162214,0.812043,1.112888,3.453515,0.326073,3.437033,2.027142,0.714769,4.911646,2.521345,1.470921,0.277526,1.571608,3.062281,1.228865,2.846207,1.391391,0.222272,2.065831,1.783101,1.229451,2.644859,1.948114,4.749727,3.106146,1.790771,1.071683,3.325619,4.600644,3.135566,4.146961,3.421143,4.735908,2.036045,3.863626,2.545930,0.247457,0.066311,2.125617,3.299872,4.316363,0.163116,4.709221,4.423803,4.368086,3.213349,2.333290,4.019970,1.030871,1.461458,0.863466,4.989909,0.960906,3.503755,2.310361,0.166476,0.406318,4.647142,3.722713,2.730049,1.047324,0.031781,3.863250,1.561493,1.070203,0.861558,4.043982,3.103165,3.206504,4.627186,4.458995,3.402306,4.805135,1.144805,0.098011,4.608534,1.321640,4.865515,1.120195,1.392298,4.547249,4.063276,0.486956,2.877356,0.788758,0.358358,3.061909,0.390263,2.359475,3.072564,4.695513,4.606361,3.037287,2.513563,3.251956,4.624827,4.954702,0.165452,4.847760,4.015930,0.375024,4.000839,3.313165,4.528690,2.288986,2.516692,4.186567,2.418939,2.631840,1.221794,1.652113,1.438242,0.228316,2.915169,4.213258,3.851563,1.232928,2.931548,2.452153,4.082770,1.767400,0.182985,4.436379,3.351402,0.909292,1.028521,1.990999,2.381941,1.651501,2.578352,4.462251,3.149804,1.847646,4.302215,3.478615,2.968619,2.582591,0.439185,2.964676,1.991296,2.751645,0.620325,3.930888,2.559780,4.154653,1.034061,4.690421,2.890923,0.378429,1.568588,4.913425,3.066671,2.098735,4.578457,1.806423,3.735729,0.731325,3.485798,2.457199,2.123146,1.158046,4.937279,0.618097,1.017459,1.887057,0.655602,4.676622,4.551907,2.190964,2.462003,0.310453,4.196864,3.902438,1.966445,2.385436,3.296809,2.327895,1.365952,1.487427,2.586565,4.972655,2.449628,0.278987,4.693477,1.529854,0.199127,0.361429,0.855673,3.170782,1.839930,4.586500,3.966368,1.604184,4.930579,3.332494,0.087194,2.315441,4.551619,1.479802,4.634332,3.076816,2.915218,1.829136,4.784618,2.153081,3.171931,3.185427,3.216967,1.530214,4.323707,2.968018,1.942228,1.611372,0.568424,3.051212,3.913037,2.112329,4.578304,0.627678,2.439446,3.212129,2.848021,4.447472,3.420167,4.125166,3.310630,1.721217,1.362919,1.749807,2.040891,4.134037,3.554680,4.134212,4.625682,4.073986,4.811388,4.749307,1.604809,1.961535,2.876029,3.452731,2.323528,3.938845,3.160034,2.979351,0.726976,0.856572,1.566436,4.812375,0.381052,4.801256,2.385536,2.179806,4.234399,4.157381,0.669920,4.058722,2.553517,1.615635,0.541896,2.961139,3.901658,4.428373,4.858096,0.615943,1.983920,0.243382,3.178720,4.438348,3.436315,1.943546,3.799619,4.983065,0.005610,4.140279,1.631358,3.735332,1.185204,1.009102,4.047991,3.836941,4.056102,3.786701,0.479310,4.414392,1.888088,1.098323,2.837835,1.729324,3.549349,3.473093,4.250537,4.967793,3.997820,0.707745,3.813214,2.834498,2.815906,1.686228,0.803665,0.865260,0.287998,4.026749,3.719742,4.283643,3.520716,0.838930,3.679795,2.789260,0.543365,4.525612,4.511586,3.139321,2.098206,1.189621,0.488003,4.029997,4.833765,0.070203,2.396806,0.530179,2.092695,2.903064,2.145503,0.086117,4.939224,4.629021,3.861866,2.003404,3.447451,3.548842,1.701273,0.198433,3.111573,4.740419,3.738936,1.139937,2.779052,1.951074,2.732503,3.620297,2.433586,4.561581,3.460573,1.761594,3.061669,2.276884,3.960154,0.037248,2.927828,0.117457,4.896672,2.537663,1.393998,0.553498,1.708476,3.170396,4.864442,0.472002,1.051185,1.384717,3.830021,0.394867,4.471987,1.094935,3.590138,3.802759,4.465419,1.037695,3.616338,1.765380,1.941435,2.541560,0.655869,1.793623,4.702447,0.903144,1.575820,4.036392,1.249893,0.823952,0.952572,4.928382,2.066538,1.979837,3.785090,0.313698,0.847689,3.599401,1.598256,3.508392,0.114302,2.951798,2.721229,0.724282,0.593679,4.640771,2.525085,0.249503,0.742789,3.362764,2.383822,2.988314,2.291375,4.627575,4.126244,4.900722,4.696165,3.643489,0.262652,4.995509,2.366593,0.304985,4.957117,2.851884,2.295020,0.098947,2.142006,0.916354,3.594745,0.039335,2.665178,0.218581,3.574150,4.765097,0.216603,0.515421,2.577965,4.912311,2.057284,3.077865,3.808267,4.639600,0.885083,4.557130,3.132121,4.028035,1.477776,2.500505,1.044796,4.273021,1.022895,2.741634,2.089566,0.247948,2.060738,3.921987,2.644663,1.523984,2.227067,3.871328,3.340769,0.554516,2.656233,0.993476,4.892037,3.693127,0.405004,1.241146,0.390628,1.850482,4.113423,0.333778,0.826786,1.337226,3.120402,4.873417,4.113660,1.004633,3.550314,2.781939,2.458139,4.541929,2.940649,0.686048,0.824839,4.609867,0.401026,0.689571,3.265568,1.121687,4.130496,2.080032,2.411999,0.643191,0.140818,3.796181,0.369949,3.200795,2.687657,2.592453,1.498425,3.780143,2.003068,0.756273,0.280216,1.712740,3.040275,1.101610,3.711024,0.543629,2.359824,2.683521,4.105060,0.589738,0.008375,2.668549,0.753625,2.858467,0.164514,2.453375,1.953700,0.781237,2.339236,2.385847,0.339407,3.384539,4.568500,3.067214,3.135956,3.742015,4.680353,4.912385,2.463424,4.725039,1.796213,3.638224,4.683978,0.081164,4.602716,4.425251,1.027429,2.048568,0.614598,3.735934,3.887068,4.404710,2.207260,3.150307,4.218238,0.466892,0.595791,4.088923,2.209847,4.014347,0.000752,0.575140,1.841716,1.988286,4.168789,2.548912,4.589823,2.123489,0.334819,2.289810,2.055044,2.747286,3.199146,0.294522,3.087647,0.661368,2.159066,4.461651,0.669183,1.043798,2.115094,0.301969,1.431383,0.387346,2.385218,2.866894,3.746412,4.616197,2.188104,3.139050,0.300341,2.376569,4.350037,2.961393,1.875507,0.446231,2.492929,4.593517,0.369471,2.654357,2.131616,3.797319,0.755752,0.855976,3.580022,3.399788,2.588414,0.022790,4.278324,4.936988,3.337221,4.666140,3.789073,3.420810,1.756317,0.398298,0.160854,2.252808,2.297679,1.930926,0.149615,0.996726,0.682572,0.063693,3.095668,0.494730,0.741948,0.495566,3.823327,4.416892,0.593970,3.078325,3.098443,1.406632,2.942566,2.166409,0.538226,4.791235,3.393177,4.769798,0.755117,3.970768,2.103129,4.648431,3.434955,0.735827,0.162373,0.628111,3.563449,0.052709,2.391323,2.765267,4.061338,2.232974,0.027433,1.093911,0.237771,4.904762,3.192112,0.009600,0.192646,1.127610,3.894278,1.995096,2.526813,4.362544,4.456215,2.139191,3.800797,1.170879,0.875932,4.881471,3.191005,3.286437,4.389189,0.135172,1.429442,3.595850,2.273116,4.714345,2.252872,0.635161,4.536501,0.025584,3.793817,0.041688,2.316075,1.027733,4.758314,1.983702,0.154764,3.883972,1.582920,3.197292,2.026140,2.192570,1.318982,3.941663,2.318602,0.198087,4.723836,2.484604,2.429860,1.732253,3.175739,2.007713,3.747397,4.382913,2.448657,3.262762,1.477685,3.127014,3.176197,2.559875,0.799230,3.626549,1.598321,1.941074,4.257719,3.405625,0.413354,2.826895,0.434601,3.227282,1.973262,4.064995,3.900894,4.998542,1.495851,0.875394,0.926591,2.994595,1.672721,4.534274,0.396781,3.824084,2.448553,3.187167,2.939121,2.651293,3.491737,2.728532,4.612358,2.758388,4.598329,4.031675,4.237739,4.486437,1.012782,1.712773,4.496870,0.746074,2.450724,0.523743,0.762734,2.944446,1.980508,2.118461,2.540657,3.303640,2.496647,1.708862,0.964042,2.322366,1.877765,4.077226,0.076486,2.851989,3.092296,4.939483,4.426821,2.587836,1.442577,0.050925,1.203904,4.237177,4.866281,3.505271,3.019271,3.031171,3.249538,0.008946,1.849792,1.646394,4.889666,0.003633,3.681724,2.026435,0.323802,1.804764,0.639244,0.186800,3.417265,0.123423,0.059821,2.129920,0.652827,2.230638,1.830172,0.511387,3.198536,3.248611,3.223390,4.323150,0.033869,0.138675,2.615826,2.330078,4.952837,1.787680,1.945521,4.178532,3.115461,0.355376,0.288296,2.642759,1.983862,3.677157,3.140311,0.001533,0.084388,4.198572,0.822926,2.847978,4.702484,4.833033,4.221264,4.444616,4.525294,0.382779,4.286214,2.078661,0.213328,2.665856,0.583520,0.395572,2.337894,1.573845,4.406588,1.577954,4.112882,0.024456,4.746043,0.271645,1.314417,0.124433,4.796775,0.258426,1.745015,3.319201,1.610079,0.037434,1.202863,3.573463,1.891392,4.101427,3.694900,2.929933,0.472377,4.909997,2.603364,1.300896,3.010673,3.533899,2.337522,3.209155,0.540201,4.370328,3.403626,3.864935,0.568675,2.596513,3.462974,2.611414,0.496045,0.303296,3.080081,3.984456,4.983145,2.841087,1.147487,2.025383,0.533198,2.069353,4.200836,1.950999,0.258668,0.829557,3.348389,3.456128,0.990209,4.050708,1.404278,2.778576,1.538528,3.465585,1.878376,3.809035,2.417130,3.201351,4.630266,2.176724,2.753225,0.945589,3.467161,1.063537,3.449791,4.615917,4.706504,4.009141,2.695723,4.186093,2.288798,1.884589,3.511676,1.036621,0.371398,1.830133,1.703177,0.602621,4.272811,3.340739,0.128956,2.700798,0.769016,2.556101,3.856263,2.065268,2.984324,2.732195,2.888029,2.390586,0.835160,1.208071,4.470247,3.691032,4.914329,0.270650,1.582861,4.796438,2.196894,3.021687,2.848707,0.703447,3.655521,0.291563,2.689814,2.763189,1.009242,3.752121,4.480884,4.895340,0.134085,1.548625,4.624119,0.252527,1.360126,2.666943,3.700986,1.140282,1.501721,0.972692,2.215310,2.521730,4.496135,3.853772,3.576725,2.863349,1.642901,0.350385,1.294038,0.973436,1.139486,1.133874,2.152733,1.903574,1.685234,4.406188,1.013687,0.818268,0.380014,4.624301,0.971732,2.861340,1.868589,2.776499,3.212832,4.200385,2.536315,1.636204,0.905400,3.034085,0.660022,4.279036,0.138947,4.226499,1.096233,2.439289,3.652604,3.920834,2.008899,2.497274,0.147863,1.720130,1.307894,1.950345,1.504467,0.798699,4.708652,2.146394,3.189014,4.633806,2.862369,0.634996,3.942907,3.873320,2.023049,2.696968,2.124430,1.121222,3.814609,3.722175,3.235279,2.278202,2.324030,1.492219,1.328623,4.244857,4.296871,0.076724,3.598032,1.649611,4.596737,1.210601,1.677016,3.736680,0.370497,3.540195,3.373394,1.520108,3.563847,4.514624,4.019706,2.589212,0.662228,4.461696,2.448590,2.039388,2.738766,1.067738,1.680956,3.677528,2.817372,3.811394,3.809823,3.767897,0.720943,3.251007,2.400900,0.310455,4.175269,1.098576,0.064701,3.217184,0.860527,0.308533,4.668855,0.742393,2.600247,1.836496,0.223703,1.571769,1.752352,2.467188,3.533673,4.999890,2.592856,4.713766,2.637255,2.968412,0.695335,2.854129,1.302810,1.370242,2.169388,3.268691,3.086649,1.531378,0.143758,1.220233,2.264155,4.547577,3.051814,4.387540,2.970137,2.215837,1.642909,4.850466,2.391244,1.796233,4.538641,4.059322,2.943697,2.830321,2.486753,0.481588,3.437486,1.877668,0.085111,3.630278,0.646535,3.989583,1.297828,2.932038,2.848821,0.884351,2.195187,4.095188,4.859899,0.090825,0.733271,3.087198,0.012566,3.789950,2.915065,3.364323,3.121204,2.995069,0.512062,1.176124,2.319587,1.671952,3.915303,3.376365,1.557352,4.755446,3.221210,4.233126,4.522926,0.988166,1.988656,0.304845,0.739106,2.937331,2.585666,2.187617,3.584812,1.329533,2.072235,4.691081,2.835452,3.407167,3.727486,2.233572,2.154047,2.351022,4.310098,1.818078,4.426410,0.204584,1.264176,4.486944,4.663855,1.038375,1.085799,3.771230,1.807327,1.028279,1.136177,1.520921,4.164940,2.281888,0.635443,1.857680,1.615839,0.380509,4.116458,3.656753,2.177810,3.507714,1.693547,4.679180,2.503909,0.556015,2.375910,1.800654,0.170521,1.748549,4.881704,1.298247,3.620014,0.770699,0.846602,1.482455,0.073074,2.418227,4.849128,1.407655,3.349138,4.221406,4.697280,0.126632,4.225592,0.406998,1.566933,3.713261,1.841198,0.282578,3.716225,2.783830,2.326301,2.067784,3.140778,4.585248,2.102298,1.938070,1.806334,0.995954,4.163816,1.150808,2.772058,3.906707,0.128972,2.517571,2.011092,0.363915,4.093622,2.014931,1.863514,3.367084,2.217382,1.860421,2.812208,1.806179,3.768184,3.791426,3.775203,3.951729,2.717363,4.100338,1.342418,4.571971,2.010182,2.651079,0.831226,0.175220,0.458774,0.010891,3.853129,3.798161,2.083783,3.043169,0.750221,4.222747,3.105331,1.761831,4.281446,3.553142,2.091385,1.815607,1.007576,0.873944,2.257420,1.849879,0.306940,1.550745,0.668697,4.010421,2.391081,0.920747,0.807157,4.093163,2.783944,2.514583,2.239995,3.722511,2.751590,0.596631,0.347288,1.339367,4.866320,0.408365,2.689952,4.604296,0.384282,0.951292,3.104941,0.069157,4.631259,0.536805,0.302131,0.961149,3.051724,4.705319,2.395375,2.676350,2.215402,2.681737,1.346764,3.474634,3.549643,2.604205,4.297542,3.303984,2.467478,4.210566,2.921603,0.380012,4.013041,4.227952,0.240380,3.852079,4.904294,3.953666,1.989397,3.588647,1.460871,3.288733,2.587605,3.311137,2.069179,0.770838,2.105215,2.387046,3.389309,1.422568,3.228254,1.169187,3.824543,3.610558,0.588742,2.963275,0.440250,4.845622,1.696198,0.101306,2.518075,0.609313,3.254714,3.655030,4.296330,4.443218,1.547248,1.788799,4.872364,2.169609,2.023529,4.626803,0.936512,2.370379,2.427130,3.712641,2.177068,4.316111,3.351235,4.654838,1.310106,4.062013,0.583866,4.009650,4.243646,2.032982,3.500069,4.843512,0.924670,3.090705,0.237153,1.693018,0.705934,2.683915,3.016079,4.947029,4.834012,4.413307,2.837406,4.430314,1.774589,1.004656,2.630227,2.656046,4.550358,0.028681,4.277757,3.041177,4.698222,3.726080,1.831297,3.173996,1.848598,4.607827,0.098424,2.773951,2.536657,0.950698,2.140733,1.484460,3.352049,3.765644,3.856978,1.971760,0.956947,1.470251,2.673671,3.076513,3.974365,3.598682,0.871850,3.719955,0.575554,4.588772,3.448850,0.559567,4.182889,3.392095,3.559486,2.437144,3.023526,2.140568,2.837548,3.948956,0.998822,4.379480,1.530045,0.737833,3.172745,2.622049,1.457667,3.140854,3.571759,1.362940,0.583204,2.551526,1.414897,1.626126,2.469845,3.656002,0.074800,2.391087,0.617451,4.266139,1.298884,2.020017,0.237117,0.745714,0.008949,1.800177,4.053439,2.878892,4.199531,0.877292,3.386708,3.729288,1.720004,0.571488,3.711014,2.607353,2.348657,4.185550,2.464531,1.474877,3.742159,1.349236,1.381427,1.043674,0.516937,4.007878,3.503425,1.916066,3.624922,4.806229,2.331243,2.441427,2.645304,1.332801,1.240020,2.441924,2.503652,1.446410,2.911565,3.853957,3.447893,0.735542,3.211959,0.017091,1.963484,2.305139,3.977784,4.400469,3.590989,3.876261,4.658069,2.422736,1.398601,1.850704,2.143119,1.580766,1.518571,4.913449,4.961634,3.214640,4.048969,3.605724,3.410559,0.732541,0.683609,4.429199,0.071336,3.398819,4.023927,3.589565,0.722046,3.202520,0.617434,2.311236,3.274163,1.859350,2.586229,4.734773,1.551948,0.875050,4.537826,2.416269,2.481783,4.767813,1.339038,3.982388,2.800780,3.450089,2.353218,1.919294,0.720301,4.937501,3.636005,2.275347,2.464589,0.001269,0.148038,4.037883,0.230848,3.858563,3.566820,3.396620,2.722529,1.736641,4.862991,4.553688,2.371575,0.877100,1.172888,0.070081,4.361376,1.817069,2.429099,2.632266,3.965666,3.075649,0.346405,1.885480,2.281343,3.591180,3.920213,0.025814,2.993322,0.148725,4.177276,1.200197,1.665656,1.164707,4.338865,1.503422,3.710607,3.064843,4.313607,0.988806,2.586108,4.168351,3.052990,0.061274,1.267820,3.421738,3.057946,4.482413,4.627590,4.001578,0.918195,1.859980,4.823428,2.419130,1.669994,4.809987,3.497596,3.482213,2.061823,0.467563,4.917478,0.424004,3.329844,0.255546,0.071615,0.049692,4.712172,2.310810,3.010149,0.706604,2.438664,2.594017,0.763217,2.290133,4.432590,2.875989,0.929767,4.776607,4.464237,4.635034,3.904586,2.806798,3.878839,3.097068,0.028472,0.581411,0.547728,2.769316,3.478675,4.696763,4.506138,2.989172,2.856068,0.341573,3.856058,1.329795,4.589582,1.106028,3.481612,0.561468,2.469412,0.744904,4.213427,3.070036,4.886202,0.705123,4.280506,3.671551,1.936064,0.089511,3.679842,0.490740,4.044717,3.992470,1.078636,4.829543,3.964510,3.022950,3.674757,2.341569,0.464235,3.184651,2.081143,4.894290,0.316725,0.802560,4.501748,2.434963,0.965677,1.563334,0.381500,3.169556,4.600403,2.850990,3.209909,1.464022,3.542095,4.575848,0.231859,1.086404,4.683144,4.024866,0.351286,1.164660,1.825970,1.596454,0.256339,0.853583,1.411850,0.765668,4.137259,2.602062,1.107237,4.238624,3.803333,1.931387,4.206046,3.187243,3.117297,0.519591,2.041024,0.357072,2.004564,0.297240,0.964384,2.281905,3.090411,0.904838,0.411968,4.368603,0.417272,2.843602,3.956262,0.837703,3.231584,3.653110,3.535957,0.258549,3.207943,0.785581,1.509831,4.644069,0.261158,4.308643,2.756138,0.156616,3.769983,4.287510,2.287758,3.959196,4.552354,2.841149,4.583456,2.084875,4.059326,3.903330,3.594649,2.057230,2.341135,1.046972,1.390432,3.411301,1.627194,3.621482,3.122052,1.782318,0.838091,1.598765,1.826149,3.228911,0.309111,4.330575,3.126501,0.265888,1.257279,0.753031,2.909203,2.845082,1.821035,3.798885,0.308861,4.136849,4.442641,0.929380,4.702222,3.661826,4.467229,3.957409,0.339560,1.234467,4.254433,0.240432,3.546044,3.406727,2.220058,2.874127,1.302670,2.953296,3.440411,1.928101,0.740147,4.724772,4.947519,0.349596,0.278263,1.813387,4.697346,1.899838,1.144064,4.881095,1.167778,3.423404,0.558548,3.160705,0.724762,1.393530,2.182496,3.825084,2.775792,0.900378,3.774489,3.188621,0.096131,0.327995,0.460585,1.247532,1.383599,3.387441,3.251643,4.360016,4.076573,3.942754,2.944533,0.533163,3.438743,1.511607,3.916974,1.833434,0.672030,3.026542,4.414027,0.879291,1.472130,1.322170,3.911386,0.760897,2.201948,1.883014,3.846654,2.197063,1.244527,0.403082,2.429097,1.245085,3.427534,1.200416,2.684956,3.182848,4.503389,4.526925,3.342492,1.067130,0.301125,3.761087,1.799899,0.603387,4.176160,2.685325,4.745062,2.894372,4.756401,2.742654,0.859940,4.819850,0.449002,0.913271,4.979514,3.892984,4.204134,2.357429,1.893398,1.357586,0.269170,0.236587,1.639940,1.119385,3.333945,0.848105,4.545253,4.838633,2.374461,0.255581,0.853172,1.335875,4.379890,4.441345,4.831485,1.313228,0.879108,2.624139,1.721793,1.990657,2.261955,0.304504,1.622998,3.716065,2.393291,3.827454,3.361697,4.705794,3.451752,2.797747,0.785857,4.605529,4.983601,4.212389,0.467395,0.557112,1.824577,3.480117,4.134522,0.904076,3.126202,0.797832,0.560520,2.354861,4.305219,3.138528,3.407718,1.965831,1.334402,4.660482,2.057042,2.567023,0.361110,0.345757,3.790320,4.660030,3.183477,4.500228,3.869764,0.644327,0.333287,4.710446,0.808021,3.145781,1.178828,2.577741,2.437619,3.593646,4.102686,4.994274,1.042638,2.183317,1.880042,0.168972,1.184135,2.732244,4.384717,1.568989,3.507114,4.700489,0.896834,0.542853,4.932689,0.250129,1.405035,4.346699,1.377101,0.877654,3.909156,3.628521,0.538864,2.508960,4.467384,2.120331,1.110877,3.471932,1.139709,4.539771,2.094103,2.438927,3.472528,1.797579,4.710204,1.364540,4.828712,1.941025,3.901523,4.049947,3.105159,4.059356,2.953724,3.011737,0.703386,4.452320,0.770019,2.526829,1.591707,1.442615,0.848163,2.738959,4.222698,2.484605,1.799492,4.635554,0.669248,2.401596,3.807056,4.489616,4.638902,0.560023,2.702724,1.057628,0.885843,4.327989,1.845368,0.530318,1.091271,1.904548,3.248256,3.121134,4.622504,1.576469,1.985551,1.415378,0.582986,4.804846,0.480226,2.363869,2.850051,3.501036,1.360354,2.580349,1.938248,0.484790,0.602538,2.018408,0.017620,0.124852,0.266323,3.827010,4.446989,4.521335,0.040615,3.270929,1.432126,0.349397,0.518782,0.333665,2.751338,1.534378,0.831386,0.727381,4.197055,0.112754,2.476287,0.363707,0.729764,2.326470,1.034490,3.183473,1.894915,3.922399,3.289473,4.889575,1.785182,2.230768,3.340992,2.110408,1.195284,0.033386,1.378029,4.320983,2.947696,0.023251,3.939637,0.078058,4.765848,2.569049,4.540460,4.429629,4.426334,1.879011,0.929391,1.755955,0.671383,4.171962,2.842952,1.242912,4.099913,2.304428,0.054397,0.766484,2.108781,0.388057,3.216747,0.986632,2.970555,0.047087,0.724003,1.629656,0.438410,4.917661,1.160086,4.493426,3.431841,4.792831,4.552478,4.393306,2.888866,4.823212,0.904100,2.270961,3.905633,2.417559,4.972112,3.665741,1.031777,4.056978,4.437309,2.697086,4.952701,2.679517,3.865655,1.620143,1.194150,3.918802,0.964853,1.419649,1.841077,3.122536,1.711181,1.604626,2.215322,2.248910,0.104834,1.582382,2.348313,1.177444,2.385021,2.846443,4.197592,3.873732,1.283142,0.643617,0.006485,1.993095,4.276825,0.806964,1.433598,2.716014,2.969091,2.736131,0.012681,3.853584,4.501512,1.263894,0.666081,3.842329,3.650163,3.965244,4.594720,0.221204,2.685166,3.945369,2.506170,2.760711,2.833116,0.051948,4.521443,1.053938,0.127290,3.167195,2.800870,0.638796,4.991473,1.957475,1.329971,0.505985,2.672686,0.821378,0.728377,3.637541,0.334303,3.565759,0.348226,1.971568,0.624693,4.923294,1.181228,1.822311,1.056656,2.719420,4.611342,2.413293,3.710666,1.774443,1.411946,0.492996,4.849494,1.892561,4.368065,3.098482,3.391063,2.286333,1.636228,2.368450,3.831901,4.560472,2.476456,2.654313,3.662291,4.796732,3.289112,4.250241,2.020591,0.897434,3.523574,1.225321,4.429171,0.393618,2.379667,2.181941,4.311771,4.843932,4.768131,0.274649,4.953831,3.339833,1.261431,1.885220,4.443488,4.580263,0.609447,0.716577,0.220978,1.969232,1.725678,3.363574,0.808225,3.984889,2.900740,0.555042,4.484263,4.247134,3.770496,2.398707,3.051897,0.988875,3.798994,3.469724,3.994559,4.689481,4.444340,4.477021,2.149958,3.942992,4.847893,1.330396,3.826010,1.215591,1.426578,2.138413,2.210800,3.504001,0.523701,4.208128,0.680637,0.127883,2.015979,3.875301,1.742118,4.251441,3.316850,3.544496,2.584592,2.946953,0.818978,4.437494,2.128797,2.194471,3.392361,4.441969,3.720224,2.206739,2.311888,1.391778,0.291960,4.698423,0.498114,1.352629,4.737242,2.888875,4.265349,3.475624,0.232017,0.749104,0.587690,2.406417,4.082048,3.590922,1.035696,2.084032,3.491493,4.471934,4.580621,2.523166,2.081006,3.258632,3.312762,4.866410,2.490274,2.688071,2.295904,3.585350,1.676182,0.178311,2.780779,1.406441,3.740018,0.858821,4.225524,3.804549,1.882974,0.861246,4.275899,1.708481,0.520754,2.540535,0.201599,0.803984,0.662032,2.494800,1.641182,3.623379,0.540886,1.528310,1.493489,3.736447,4.398873,2.463574,2.808386,3.984488,4.356048,3.818650,1.294983,0.364842,1.054597,3.097832,2.744435,2.539124,0.365909,2.054348,0.130946,3.266951,1.229352,3.535249,2.661239,0.270870,0.696069,4.558888,4.378924,4.078771,2.855764,1.800946,4.793820,4.547204,0.085137,0.605331,2.715246,3.452626,2.324193,0.910334,2.101403,1.026809,4.021004,2.711114,2.044263,0.708331,2.572191,2.831952,3.265524,3.527775,0.209139,1.888986,1.860188,0.852458,1.611090,0.220689,2.310716,2.569096,2.446015,0.709920,0.529325,3.795822,3.744378,1.484822,3.400140,4.707575,4.195120,1.477093,0.666152,0.256139,2.518642,2.287682,3.755692,3.841770,0.349894,4.857158,1.289571,1.870512,2.881435,0.191413,3.564421,0.960999,4.584995,1.233692,2.066538,1.121626,3.230495,1.886514,1.195876,4.219607,3.514726,2.358243,1.429677,4.361466,2.096919,2.326984,0.959965,4.169602,2.749525,3.284489,2.094086,0.096887,1.502559,0.103361,0.149643,4.925642,0.473734,2.254984,4.193597,2.107752,1.243762,2.070008,4.119444,0.224457,2.443889,0.967530,0.301347,3.927772,0.072413,2.074790,2.727514,0.864419,4.497283,2.043403,0.910519,3.055898,3.197243,1.943357,0.157342,3.308230,1.188833,0.749628,4.104686,2.521207,2.239649,3.774211,2.353446,3.059199,2.031203,4.437611,2.827828,4.512555,4.494148,3.792854,2.740256,3.271098,1.110424,4.595637,4.298680,3.935716,0.127405,0.972636,4.583487,4.045270,4.230798,2.022848,1.281874,4.453489,1.864777,1.494353,1.504312,4.412162,0.884650,4.164787,2.387839,1.305719,2.921156,1.394957,2.574443,3.068379,2.915119,4.081186,3.093834,1.103198,1.474466,2.010889,3.847437,4.520912,0.122662,4.967091,2.457310,0.658720,2.827208,2.292667,0.246608,2.888121,4.657856,2.363153,1.146013,3.354702,1.338127,4.575955,2.385228,3.922772,0.245688,3.662444,0.739881,1.088589,4.306542,0.619626,1.473554,1.849536,4.550053,0.714448,3.084675,1.014539,1.444045,2.225300,2.736133,0.876868,2.977610,3.036222,2.042676,1.003601,1.669636,0.490183,3.724189,0.073087,1.658954,4.621703,0.937597,2.617578,0.746225,4.748842,4.102897,1.563127,3.759729,2.836761,1.108261,0.671936,1.246224,3.144953,4.773875,3.884376,4.517304,0.970392,4.572947,0.423410,4.720934,0.706078,1.807649,1.727777,1.649285,3.683077,4.197360,2.852367,2.730375,1.306540,4.516625,2.823887,2.056561,2.797496,0.522333,0.557171,4.636426,1.092779,1.351406,2.786211,2.434310,2.778664,1.827146,2.026076,0.843994,2.485086,2.114781,4.700419,0.648936,3.078702,4.832630,0.489809,3.605593,4.327580,1.661165,2.846817,0.448151,1.685283,1.244157,3.426840,0.278439,2.416145,2.769229,4.656273,4.605611,0.032965,2.905155,1.998941,2.681281,3.248000,1.371884,3.805754,4.602598,4.443930,3.776714,2.622283,2.425963,3.724993,3.863651,0.060597,0.189139,2.387800,4.331782,1.075032,0.717884,4.665811,4.455562,1.343371,4.201425,3.785051,4.976955,0.816872,4.486968,0.284902,3.365323,3.345789,4.578470,1.139378,0.858162,2.567557,4.762859,1.394330,3.983325,1.599711,1.275609,3.420529,3.857030,0.065317,2.918004,2.654516,1.945036,3.926589,1.779604,2.720140,2.139291,2.240258,2.428088,0.780905,4.017294,1.452962,2.581479,1.365341,4.296417,4.158435,4.753099,1.821321,4.434768,4.294287,2.869022,0.737872,3.520743,4.723939,4.096525,0.382655,0.112617,2.303180,4.565044,3.611814,4.996928,3.136493,4.411150,4.060125,2.693045,0.452253,0.654165,4.077410,1.846869,3.013205,1.458558,4.457646,4.579982,4.778527,4.643184,2.820085,3.009399,4.811238,1.863173,3.154185,2.198591,1.723609,4.647211,2.848221,2.325531,0.270644,0.777444,2.703717,4.973092,2.297182,3.125958,4.258462,4.591986,1.830650,0.817969,4.856515,2.637448,4.428896,1.492531,0.443317,4.392011,2.082817,2.202888,4.917693,2.044213,2.868398,3.686456,1.125992,1.348490,3.694127,4.035724,1.002982,1.543696,0.043606,1.924164,4.505575,2.006702,3.795075,0.286935,2.939474,4.770220,4.921920,2.892019,0.071595,4.199478,3.673576,0.123406,3.783309,3.597492,0.482964,2.681886,2.744380,4.474275,2.215611,2.795788,2.754732,2.596880,4.265792,4.733147,4.574610,0.982258,4.339999,1.588774,0.064058,2.665621,0.471366,2.496541,3.698877,4.228875,1.614067,4.194019,0.285651,3.078107,1.747849,2.743760,0.959739,1.156176,4.181929,3.987969,4.271634,2.391940,3.310658,2.290958,1.245621,0.030989,4.599034,3.485517,3.909159,0.370568,4.414552,0.733673,4.215205,3.823601,3.694091,3.435988,1.012509,3.288955,0.542952,4.298087,1.001854,2.198027,4.530222,3.977137,0.190611,2.442531,2.625731,4.176416,2.984826,0.329622,2.098654,3.301002,4.940172,1.920422,4.922966,2.744304,2.318770,2.077170,2.896697,2.142683,1.917378,4.890845,2.472542,3.900943,2.531492,1.159658,4.741840,4.406535,0.709667,4.424912,0.985070,2.843067,4.655076,2.822466,1.058143,1.324770,3.392854,3.735198,2.958761,1.407129,0.933854,3.273233,1.146656,0.813895,0.655706,3.694223,3.559558,4.637373,1.308563,2.947273,4.598081,1.117528,2.269845,4.829088,4.774412,2.557931,2.243344,4.724134,2.997283,1.234707,2.586633,2.862765,2.761459,2.028396,0.732102,4.340281,0.561640,0.697341,0.746241,0.197053,4.288659,4.458542,0.612818,2.307844,1.965923,0.630769,4.321963,4.320337,3.704092,0.832829,1.318148,0.961521,4.162343,2.338093,0.752231,0.050476,1.392553,4.870653,0.158454,4.557258,0.289702,3.358851,1.748485,2.277492,1.105694,1.692629,1.540531,3.544501,4.356268,2.046583,4.081106,0.057746,3.938488,2.629769,4.168645,1.120203,1.883714,3.488543,4.242102,2.391583,4.231800,2.741597,4.956855,4.523556,1.928140,4.777413,3.826709,2.627514,4.955216,3.474917,0.973034,0.570184,1.310579,3.677511,2.752234,1.985757,3.792148,0.118937,4.067875,3.741340,0.901014,1.945116,0.188001,0.058939,4.981339,2.440983,1.860124,0.980860,4.035961,3.528764,0.007781,3.856133,0.557414,4.743163,1.663680,2.255514,0.024905,4.121963,1.540841,2.782234,4.633004,0.781112,4.336648,2.501195,4.622281,4.111775,2.214900,0.443559,0.150987,4.371154,2.371425,3.318475,4.408242,1.523295,4.478815,0.137662,1.399628,4.058832,4.266102,4.724177,1.515056,3.901178,4.925652,2.635030,1.262981,0.194812,3.798265,0.694227,1.934713,1.546389,2.084253,4.529995,2.129739,4.563722,4.027004,1.441892,1.590445,1.849221,3.028236,3.370313,4.861149,4.632580,3.059359,0.231194,2.726538,2.018201,2.723894,0.200882,4.978811,0.284792,1.363400,0.360620,2.738056,1.759091,1.876499,3.945838,4.520101,0.828485,1.394885,2.363643,0.564408,1.932690,1.510440,4.609882,0.992671,3.606057,1.079466,3.128292,2.909954,2.293621,4.084537,1.113586,2.386401,4.912088,0.916309,2.727162,1.465529,0.619030,4.257965,2.888394,2.894146,2.726674,0.922341,2.843166,0.456945,3.413209,0.257286,0.945756,1.471089,1.394656,4.060511,1.438753,0.369790,0.339913,0.747068,1.970960,0.984071,1.175112,0.919878,1.493677,2.524294,4.856735,3.959952,0.862604,4.014253,3.550465,4.528992,2.173534,4.335493,3.490451,1.365463,1.948881,4.192393,4.038561,1.227530,4.181369,4.728785,4.388847,1.906440,2.705809,4.229803,3.582002,3.545525,1.426257,3.054009,0.272306,1.485737,1.013944,1.935073,3.691148,1.302706,0.894575,4.210178,4.575490,2.231083,1.222489,1.261830,2.080899,4.012215,2.807408,2.886680,4.890787,0.388376,2.375067,2.397011,2.769870,0.839701,0.844611,2.077243,3.031086,1.514013,2.487596,4.933786,0.152155,2.329336,2.369523,3.459032,1.332001,3.999670,2.004967,0.475812,3.150302,0.131966,3.584011,0.060701,2.983351,4.354460,3.492042,3.121719,2.158956,1.680978,1.851478,1.875132,2.649418,0.716650,4.409410,3.129378,1.872181,4.911061,4.362638,3.034081,1.858744,1.845469,0.333534,1.712605,1.228421,3.042756,3.600817,1.462124,2.730737,3.935398,3.209519,3.718307,1.090398,3.175249,1.368922,1.153753,1.354686,1.832628,2.354702,1.146307,1.749817,4.482484,0.673135,1.078620,0.303463,3.544406,2.647054,2.371602,0.172076,4.806713,4.220387,4.101871,4.376087,3.885126,0.697188,4.857462,4.668592,3.480386,1.460053,0.005556,2.429309,2.974017,4.969907,0.664575,0.444100,2.131592,3.754781,1.700352,3.311801,4.447192,3.965810,0.507979,2.230377,0.189963,0.843192,3.853555,0.870466,2.794070,3.074892,0.783182,4.574111,0.292509,4.596173,0.568997,4.504350,1.839455,3.949204,1.971188,3.665782,4.261954,2.627194,2.010698,1.973163,0.282959,0.074079,3.717851,2.076997,0.755464,4.357685,3.188859,2.372522,1.784925,1.723732,1.857101,4.432772,1.893021,0.096582,0.724668,1.731041,0.831761,4.114907,4.993658,1.670815,2.425932,0.238091,0.972321,1.145303,1.937415,4.132083,1.996051,3.707143,2.642949,3.318246,0.986119,0.194059,1.233352,0.506163,3.513341,2.846128,3.968442,2.012982,1.302461,4.305204,2.827653,2.364494,4.456719,1.739063,2.044511,1.287223,0.663538,2.854480,4.606711,3.244012,3.319302,4.292119,3.500605,1.879702,4.016626,0.619987,4.357345,2.545709,2.729107,4.613378,3.413399,0.390842,1.264530,3.553833,0.465605,1.306484,1.318435,3.538543,0.258116,1.724906,2.131865,0.366464,2.292008,2.657039,4.854093,4.367591,4.652766,1.353650,0.750836,3.192462,1.007624,2.932410,0.978624,0.325720,2.244621,3.182249,0.470673,2.748590,2.184174,1.276209,0.859389,1.171630,4.483058,0.159352,0.737423,2.590849,3.413205,2.051598,1.201789,1.371737,3.246993,3.564509,4.851428,3.517539,2.109577,1.227698,2.673194,3.632831,0.582960,0.299046,1.120791,2.096237,3.335872,0.045718,2.692781,1.454373,1.675078,2.166150,2.300124,2.008903,0.436965,0.795719,2.466797,1.932784,4.983508,3.848098,2.914256,2.739175,0.249980,3.383658,2.827151,2.579501,3.832223,3.914952,1.083453,0.923246,3.298333,1.654012,2.273896,0.221887,2.114695,4.709245,3.438343,4.097027,3.137624,2.925542,4.854275,2.448569,3.951510,1.157055,0.509806,0.906635,1.711521,2.303414,4.446935,2.963128,3.213050,1.924745,3.348100,2.020580,3.040346,2.679050,1.539533,0.418012,0.613020,2.874528,0.365557,2.265278,4.495305,2.913195,4.883315,1.439404,3.249567,4.673774,1.747021,2.667903,4.235892,1.656673,0.044768,4.951128,2.030613,0.547375,3.680137,1.625297,0.842284,0.592453,3.487868,4.966311,1.959573,3.818693,3.271202,2.104808,0.244670,2.047145,0.146328,4.761208,2.046941,2.896201,4.703674,2.880123,0.861645,4.758068,0.939699,0.640731,1.812257,2.174254,4.886863,2.770275,4.029203,3.844919,2.011131,0.373246,0.598656,4.963586,4.299726,1.728591,4.163901,4.499337,4.616975,4.376030,0.931100,3.967325,0.278176,4.032635,2.884543,3.674681,2.748528,2.987595,0.185107,0.157279,4.060653,1.455282,4.036071,3.517521,2.824738,0.524805,0.330212,1.919907,4.626259,1.131317,2.111204,3.208439,2.483509,0.125480,3.476433,4.592038,2.998471,2.902063,4.176491,4.164192,0.933783,2.111496,4.096349,3.674170,4.221940,0.647217,2.197335,3.544766,3.650806,0.359025,3.559702,3.131142,1.744565,1.520543,0.145047,1.959949,1.534976,2.157507,3.543728,0.727410,2.399812,3.964266,1.243173,4.318422,4.664797,0.564198,0.578502,3.226010,2.585950,4.517888,4.009760,2.509463,0.343453,0.494352,2.242455,1.522858,4.715647,3.329229,1.352653,1.784793,0.403914,1.248440,1.593857,3.209742,0.862769,3.385918,0.588247,4.470631,3.132183,2.887363,0.936358,3.704353,1.180261,3.990216,3.894773,4.696979,3.913466,1.824726,2.553261,3.134345,1.337590,4.000258,1.645490,0.650680,0.297607,3.300047,1.323557,4.257878,3.862159,0.576040,2.776406,4.836869,4.146155,4.361198,1.313783,3.627392,1.699408,4.140313,0.513261,3.425570,3.224522,1.306591,3.160807,4.554405 \ No newline at end of file diff --git a/lapack/src/test/resources/geB.mat b/lapack/src/test/resources/geB.mat deleted file mode 100644 index c58fe294..00000000 --- a/lapack/src/test/resources/geB.mat +++ /dev/null @@ -1 +0,0 @@ -3.075829,0.920215,1.530812,1.757792,1.555847,3.422037,4.750014,2.519551,3.951285,4.721925,1.872222,0.231393,3.766508,3.674952,1.516258,1.345649,3.516641,0.782026,4.217241,4.303145,2.831742,1.094025,4.745015,1.176408,1.545005,2.209160,2.603650,2.277587,0.001035,4.310982,0.118693,4.407753,4.114089,4.683496,1.569817,0.898535,0.271433,3.438713,0.782794,0.839157,1.151965,1.393095,1.067983,3.037086,2.555580,3.253433,3.210241,4.275779,0.183633,2.788558,1.929708,3.946323,1.142774,3.044759,1.347967,1.173356,1.639185,0.317879,3.731931,4.406550,0.084926,3.262212,2.814503,4.526970,3.426801,2.092925,2.890980,0.636072,0.810751,1.119185,2.415450,1.334121,0.502722,2.592542,3.489149,0.482195,3.644764,0.118341,3.494703,4.765426,2.283834,0.329454,1.413410,0.737569,2.504683,0.904017,4.981908,2.097829,1.936706,0.320820,2.992951,0.621517,1.308707,1.495696,0.490580,4.150069,0.552645,2.415025,1.445313,1.182723,1.116479,3.349322,3.968988,2.044567,1.592642,3.655178,1.345821,4.352304,1.469388,0.256263,2.351713,1.499527,2.329769,1.460132,4.935073,4.872680,3.087676,4.532801,1.564680,3.939464,3.825263,1.776573,3.607359,0.468087,1.162906,1.049509,3.128857,1.008811,1.417786,1.361797,4.716747,4.739999,4.158233,2.257610,2.450330,1.872886,2.304148,0.707519,1.354922,0.925507,4.404531,3.449866,0.666674,2.152048,1.628213,0.074714,3.697138,2.201049,1.808299,0.910756,2.441446,1.358195,2.538882,1.251967,1.463226,2.125815,3.054557,4.212815,1.393273,1.636871,3.223375,4.974227,1.153830,1.103868,4.101527,3.990348,1.645059,0.073750,2.147590,2.717418,3.800772,3.304735,3.360633,4.016903,3.874359,2.366270,0.524063,4.071678,3.008870,0.165067,3.942455,1.966697,1.570564,2.575242,3.357802,4.624232,0.130089,1.523358,0.202225,4.215657,3.517689,1.352851,3.846921,3.166899,3.300653,3.752149,0.804886,3.002299,2.588215,1.702393,3.653119,2.171201,2.350340,1.046172,3.694770,0.053002,2.486163,2.688224,1.337923,0.842617,1.739806,0.529340,3.605915,2.905666,0.208845,4.769149,3.858811,4.871949,3.213851,4.710569,4.015770,1.543322,3.770739,0.608033,2.531747,4.543861,2.623102,4.733560,1.908855,2.620768,2.847477,4.802488,3.538408,2.974076,0.328545,1.115284,0.616819,2.555792,4.954087,4.187772,2.444176,2.571967,0.206545,4.176446,1.909155,0.138259,4.621481,2.199384,3.372858,2.700237,3.948270,4.811896,3.104828,0.584596,2.941110,0.158539,1.724206,0.369940,1.428552,4.493644,1.059235,3.912550,1.981957,1.846033,4.221970,2.063323,4.912035,0.994245,4.397451,1.355436,2.776574,0.599137,0.234364,1.863837,0.896418,2.441016,1.214960,0.194369,3.591466,1.669001,0.861510,4.739868,2.442796,2.814792,4.811118,0.590772,0.911347,3.551024,2.803941,2.076359,0.560775,2.919800,2.207227,3.355331,1.502109,2.012550,1.540082,1.004660,2.540070,4.145694,0.172161,2.426895,3.760507,3.170272,4.965128,0.286194,0.808711,1.598399,0.031136,2.597331,3.203173,2.093682,2.086701,4.386394,3.059510,1.317512,1.598230,1.004123,1.323215,3.350811,3.188820,1.308233,2.698659,4.303158,1.341897,0.124481,1.380431,4.703615,0.102562,0.607763,0.868621,3.531543,4.893432,2.941546,0.442490,2.289983,3.915352,0.895444,1.479202,3.337873,1.589173,3.644290,3.975737,4.153910,2.756336,1.893975,3.092315,0.931355,1.022826,4.093522,4.086389,2.034313,2.337031,2.148766,2.261919,1.138956,1.091442,4.163896,3.335410,4.878894,0.801124,4.617227,3.827887,2.637874,3.266259,4.188134,2.638138,3.236912,4.883850,3.601481,0.392371,3.584022,4.869380,1.953647,0.217141,3.636628,1.545730,4.589628,0.912694,1.883343,0.118385,2.193512,0.950019,2.985462,3.730933,1.399199,0.668656,0.598718,1.273684,4.142107,2.165346,0.964821,1.418186,1.749623,1.019784,2.697641,2.847384,3.897904,3.477573,1.229021,0.787531,4.519399,4.128175,0.037199,0.117135,2.444137,4.191700,4.626696,0.969803,4.046730,2.080040,3.259858,1.577711,0.629859,3.537727,1.540347,0.148616,4.833965,2.143976,0.496539,4.062133,4.243022,1.506750,3.413825,0.601183,1.935404,1.107585,1.227917,4.823929,0.173379,2.753662,3.182017,1.669243,1.215069,3.981985,0.855072,3.252699,4.998971,4.189009,2.118588,3.408506,2.942346,3.260548,1.557177,2.524934,0.382243,1.159934,1.998697,0.783629,0.797439,0.891374,2.757598,2.262099,3.110307,4.904938,3.034905,1.126328,1.327035,0.987164,3.884156,2.483999,0.567985,4.368588,1.978487,3.048051,4.873086,2.918009,2.540404,4.539169,4.477362,2.279188,3.412821,3.389036,1.482270,0.816425,2.843969,0.180378,4.114471,3.803135,3.544162,4.640774,4.789952,2.336082,3.374087,4.872877,4.267262,3.270687,2.197458,3.712733,0.292441,0.115907,3.768086,0.647619,4.059428,1.972334,4.757597,0.319922,2.514432,1.349031,0.505431,2.705715,0.031428,1.051103,2.259024,1.730843,4.315854,1.429502,1.610667,4.553730,0.857326,3.122900,1.979370,0.325698,3.984570,4.990543,2.112280,2.991496,4.185531,3.928694,2.525262,1.420949,1.259295,4.346273,0.383753,2.951622,2.445663,2.458582,4.024404,0.760212,4.942612,1.572908,4.130097,0.833382,3.797002,3.378242,3.975354,4.995713,3.416875,2.578876,3.493327,3.792165,2.302115,1.144348,1.090405,0.109379,3.792475,1.747783,3.792958,0.651148,3.361084,0.215132,2.968788,0.128900,3.486822,3.959861,2.061967,1.780561,1.160579,4.269403,2.337225,3.780966,3.099278,0.728940,0.850710,1.311195,4.290845,1.619700,4.444700,3.148847,3.541560,1.402402,0.240964,2.269459,3.203055,1.676150,4.763622,3.193984,4.968320,4.006459,2.551404,0.821625,3.249670,0.756127,2.028524,2.467923,2.473374,1.239116,0.114985,2.766429,2.258744,0.319078,2.588017,0.575002,4.959124,3.700300,1.819176,4.198649,0.510917,4.388904,3.294368,0.408047,2.187231,2.983794,3.118664,3.685033,3.295568,3.218442,4.102231,0.102795,4.798566,2.151306,1.421983,2.448088,4.701484,4.594520,4.088595,1.116290,1.429858,4.145092,3.261052,1.229695,4.345607,4.520672,3.174576,4.923153,2.757673,4.290719,1.516111,4.760337,1.810732,0.497748,0.775671,3.167260,3.785924,0.273630,2.347563,3.921035,2.634921,2.094352,0.884714,0.568197,1.665232,1.424745,1.838640,0.380914,1.130096,2.576583,4.958065,2.078815,2.065460,1.420610,2.788605,4.299349,3.346928,4.993418,4.726382,4.216793,0.208763,3.773843,3.079418,3.729073,4.887271,1.102374,1.806905,2.762946,1.680434,4.323124,2.712687,0.026266,4.555013,2.610959,3.430174,2.543606,3.070553,4.904975,2.208982,3.489842,4.297146,0.522541,2.906700,2.292862,4.960874,4.684867,0.931019,0.488025,2.268192,0.095759,2.484817,3.692213,4.416334,4.816191,4.584390,4.569724,1.674365,1.932933,4.071070,2.335731,0.752807,2.271343,1.849599,0.426611,1.752065,4.796103,4.632371,4.845690,2.858414,0.529475,1.134942,0.931827,0.943268,4.441714,1.020089,1.894827,0.465335,0.182540,4.739254,3.812076,2.174469,0.844084,4.902019,2.170816,2.722770,0.377119,1.397717,1.311670,0.695120,4.470922,0.969096,0.154013,4.929299,4.697868,3.614732,4.207205,0.781199,0.399887,4.321088,1.792424,1.613881,3.443475,3.785203,3.068429,0.476439,1.826363,0.065789,0.487297,3.641852,1.363023,0.798102,4.902278,4.101774,3.410733,1.627977,0.838915,4.080514,4.632697,4.318470,1.263110,0.445923,2.520989,3.865608,4.908215,4.579359,0.159990,0.110352,3.158620,0.639011,3.036897,0.047018,3.708507,1.935760,3.789404,3.463606,2.388200,2.543164,0.451025,3.241801,3.203775,4.079160,0.245845,0.938868,3.314792,2.758663,2.074356,0.134826,4.170098,1.450639,1.823945,2.277655,2.724635,1.204705,2.493556,4.626904,1.008522,2.752821,4.865551,2.398834,4.525603,0.189901,2.619587,0.014373,1.354938,4.583164,2.077235,2.315192,2.015369,3.697346,1.990870,2.554979,0.317136,3.566478,2.671607,4.867841,4.355635,1.727228,1.862288,3.301391,2.292233,2.773057,4.854831,0.453288,2.973928,3.387950,1.096854,2.930474,3.874748,1.427539,4.885055,0.651328,2.369636,3.644355,2.200954,2.572454,2.374079,0.268065,1.607412,0.414567,3.801576,2.387948,2.035808,3.804645,3.285596,2.066368,0.669490,2.412986,0.962185,2.097422,4.403759,1.379438,2.168542,0.157403,4.470150,0.397665,3.172317,4.857129,4.565571,0.154792,1.351036,0.538530,2.027552,2.263712,0.836001,3.872690,1.744690,1.995828,1.486114,1.432749,2.099950,2.051240,2.575852,3.544496,0.558856,0.465110,0.777152,0.480886,0.813153,0.156175,4.135156,4.005483,0.119119,1.625000,3.132469,0.766111,0.858270,0.336670,0.787449,3.235623,3.148735,1.335188,1.290308,2.078116,2.393838,4.587950,3.387457,1.599877,3.827761,2.213284,2.947008,3.281490,1.625651,2.503144,0.505317,4.235222,4.762083,4.509193,0.223768,4.264368,4.210370,0.653345,3.604789,0.269247,4.059304,4.010136,4.838243,2.169734,2.484503,2.155539,2.551872,4.076830,4.341866,0.076822,3.341184,3.120973,3.059353,3.747956,3.665006,0.537034,3.551475,4.145559,0.061318,1.598635,1.000796,0.093975,4.343428,2.688094,3.684679,1.088011,0.623288,0.779391,4.229570,1.292284,3.088326,1.772305,2.201978,4.275869,3.671407,1.678327,4.486002,1.578977,3.751244,3.949162,1.803721,2.622464,2.297160,3.122623,3.649290,4.560704,2.919279,4.511797,4.964570,2.728671,1.260600,3.212567,3.645954,3.241378,0.278544,0.943222,1.192918,1.225109,4.695536,3.340074,1.160968,0.827815,0.241622,1.415060,1.683534,1.403477,3.599096,2.834944,0.516513,3.246805,1.552710,3.706800,2.444846,0.704481,0.914717,2.757375,1.422418,1.910353,3.927836,2.779925,4.386301,3.440192,0.769072,0.497757,3.216607,2.677825,3.671484,2.772750,4.938161,4.908209,1.360796,3.959348,3.830578,4.202307,2.101694,4.639007,1.883881,3.566622,3.011890,1.819736,1.139416,3.426768,4.511659,1.992491,0.482343,1.403038,2.003268,2.035288,3.188375,0.575751,0.563032,0.867716,0.828666,0.878797,0.026126,1.371016,2.828456,4.960959,2.055339,4.230278,1.047357,4.698849,0.085101,0.135666,1.810344,4.376577,2.834622,0.175673,4.201752,0.810906,1.879990,0.427002,4.656046,0.031187,4.392283,0.841810,1.011289,1.103577,0.711733,0.715484,4.357948,2.085418,1.813383,1.227318,4.524552,2.924976,1.726165,0.988385,4.564596,1.024052,0.326645,3.152679,1.385472,0.889461,3.025456,2.281860,0.785351,2.872282,3.336158,3.468883,1.260719,2.594274,1.687569,4.633369,2.406108,2.852766,2.656933,4.990066,4.479693,4.937037,1.201938,2.411830,2.264035,3.507460,3.612926,2.091780,2.633444,2.328259,3.827980,2.472052,3.390175,4.115642,3.391400,1.820858,2.392215,2.331173,4.796346,2.178713,4.567919,4.548205,3.732735,1.010246,2.125745,3.225188,1.283924,0.802041,2.411218,2.999158,3.236722,3.057671,1.457077,1.740993,1.914601,1.022676,1.034661,2.292846,0.641974,0.549845,2.527450,0.238186,2.012367,3.743415,4.871285,2.499384,1.285699,3.139772,0.724706,4.652490,3.775219,0.753293,0.488363,4.631417,4.780268,1.256714,0.859329,3.448070,4.968510,1.288831,1.804301,1.799352,2.327122,1.312000,2.794533,4.158194,2.001805,1.400875,4.672445,2.748730,1.163516,1.735718,2.504713,0.444667,0.169162,3.553522,3.710018,2.351856,4.321581,2.942031,3.786813,4.679913,3.951818,1.552743,0.594857,0.198853,1.952740,0.037265,3.689525,2.258838,3.661150,2.488721,0.074471,4.360631,4.602662,3.005298,3.495831,0.303353,3.478583,0.420002,1.603939,1.492654,4.207151,2.314483,0.313619,1.210999,2.221804,4.737461,1.206611,3.876993,0.874713,3.211680,1.127921,3.859935,2.712602,4.462967,0.533907,0.946418,3.831239,1.679836,0.347380,3.515442,0.678601,0.595969,2.514245,2.059952,0.869984,3.352834,2.077440,3.425801,1.914095,4.129313,2.870366,4.059150,3.130113,1.808450,1.938747,4.037230,0.146134,0.865719,3.147686,3.717109,4.261776,3.855055,4.907416,4.599283,2.104708,3.942544,1.480100,4.643712,4.985817,3.672894,1.672738,4.814978,0.204749,2.050008,2.550174,2.573134,1.124379,2.011186,3.555740,3.887913,3.591601,0.083775,3.377745,1.205890,3.228562,1.900396,2.867503,1.123691,3.386913,4.513132,1.672952,0.318308,4.697065,2.745226,4.158894,4.731007,4.374350,2.601888,4.886553,2.188749,1.248643,4.341144,4.410106,0.296918,3.683919,1.675665,4.300488,1.214660,2.901513,0.651237,4.416650,0.680062,3.239565,1.127867,3.783196,0.920970,3.791425,2.529951,3.543431,2.603039,2.782711,3.022161,1.141719,2.878740,1.319197,1.497299,2.495117,1.141278,3.094901,1.497840,0.930207,4.493600,2.179112,4.714638,2.073600,0.052940,0.996090,4.176752,1.800931,4.231885,1.941045,1.483619,4.003634,0.361443,4.379758,2.099332,1.643551,1.099603,2.972037,4.739730,1.762095,1.153343,1.238260,0.455159,1.183574,3.221000,3.567245,2.083019,4.718216,0.834817,3.578547,2.025727,1.196880,0.973243,0.838065,4.889277,1.947123,3.040691,2.161848,4.054819,3.792935,0.233694,3.206853,4.844106,4.252125,1.478371,3.054676,2.251824,2.922876,2.808841,3.666141,1.604095,2.161609,2.895513,0.040443,1.358301,2.430738,0.902538,3.595365,0.526124,3.614258,4.111076,3.427964,4.586319,3.558388,1.105941,4.110047,1.216400,4.157692,2.944260,2.563266,2.894917,1.967979,1.352352,2.301968,0.690283,3.098191,2.734296,3.365392,3.191333,4.619802,2.585734,0.062380,4.401659,0.604879,3.645972,0.987120,0.616498,4.773728,0.178554,0.150997,2.241692,2.928513,0.883050,3.623390,4.696011,2.492402,0.608809,4.217405,4.714546,4.164112,2.823452,4.198730,1.884418,2.498380,0.406512,1.620776,4.578257,4.267262,2.970783,4.526828,2.134639,4.688054,4.729354,2.849839,0.251016,4.423310,4.556942,4.715268,2.360098,1.456466,0.437565,4.396674,3.615101,4.009028,3.845332,4.086827,0.554948,1.691390,4.070852,3.671381,3.833782,3.798054,0.334600,4.130368,0.429563,4.112027,1.585441,1.060621,0.979530,0.386132,2.491315,3.923012,3.252206,4.960217,3.855134,3.641447,2.056606,0.604046,1.898792,4.298250,1.679234,0.612582,2.656775,3.037238,0.591568,3.831553,2.539515,2.935688,0.192014,1.078951,2.202344,0.520443,3.649393,1.083890,1.806399,0.166972,1.265508,4.245271,2.667584,3.660650,1.037938,0.980890,2.919133,0.960009,0.988615,0.496104,3.797794,0.440903,4.444884,4.352768,0.806309,4.836971,1.704639,4.444984,0.361373,0.718855,2.206979,0.238360,1.347568,2.994183,0.658145,0.622340,2.005933,0.515602,3.264206,3.952128,2.369196,0.326522,3.061536,1.199172,1.900174,0.963898,3.202384,4.094630,4.292715,3.859043,2.733037,2.779124,1.015016,0.075975,2.796250,3.488272,1.980113,3.214622,1.624976,1.764548,1.896340,4.231832,1.017757,4.839369,1.301376,2.453378,1.283494,2.387155,1.996332,1.873896,1.497570,0.109864,4.037890,2.255004,1.298803,0.941172,0.789541,4.745137,2.983474,1.312113,1.306249,4.967372,3.223418,0.816246,3.984175,2.184550,3.344527,2.938898,0.713279,0.616244,3.776547,1.198279,3.564000,0.115280,4.879407,2.502451,2.143559,3.974908,2.050782,3.435797,0.120237,4.588290,2.740781,3.643147,4.708740,2.101554,0.521562,0.168701,2.366068,2.876501,1.759345,2.440032,0.633799,0.809456,4.517640,0.885167,2.686369,1.640872,4.745640,0.487770,1.151088,1.496138,1.806206,0.482274,0.773361,4.327923,2.403950,0.799688,4.585893,3.617939,1.270055,4.382664,3.689760,4.973432,0.394200,3.097453,1.301496,0.762859,1.449818,3.634059,3.143583,1.568580,0.523209,0.619085,3.051045,2.375408,1.854397,0.483743,2.466762,1.323550,4.368029,3.470007,2.087165,4.597568,2.795249,4.145722,2.966873,4.716247,0.444131,3.890005,0.207252,0.536427,4.040641,3.630768,2.973939,4.582183,1.977020,0.027282,0.358271,3.620093,1.296853,2.925791,2.198109,1.160688,3.717346,0.152270,3.433016,3.745832,0.417574,1.397517,4.619796,2.317518,2.916284,3.869173,4.276560,0.514982,2.663556,1.032187,3.468852,4.721209,0.234218,3.228438,3.208562,2.073545,3.135724,1.949361,4.934990,2.399358,4.124496,4.648535,3.706026,3.375389,3.519365,0.646376,1.360936,2.287280,2.119495,0.813759,1.614118,3.574456,0.269999,3.165030,1.827697,4.677249,1.448991,4.844719,4.263646,1.054032,4.485361,1.553377,2.211560,2.169322,0.816075,2.554401,0.260429,4.846001,2.108273,4.168938,1.537730,1.435635,3.020014,3.860453,1.642115,3.681942,0.528917,0.367684,0.448613,1.411791,2.607433,1.499436,1.502649,2.514246,0.208863,4.158942,2.843751,0.590259,4.887878,1.440462,1.162748,4.337340,3.743651,2.466474,4.390397,2.316448,0.132208,3.609113,1.318354,1.616518,4.648922,3.109558,3.819055,2.667904,2.952424,3.833628,4.731425,3.549385,0.140694,1.784971,3.868047,0.166864,4.399792,3.362817,1.185738,2.181970,0.145353,0.352598,2.751347,1.134687,0.894797,4.732053,3.264702,0.216428,1.481330,0.914765,4.791044,1.531208,3.043550,2.599086,4.535554,0.025077,1.629947,0.871908,3.908850,1.945301,4.184943,2.640863,4.750033,2.212530,1.750676,3.682488,0.916648,3.203424,0.297764,3.627862,3.870931,0.660183,4.417428,0.454079,3.726703,4.574578,3.225597,2.835699,3.599274,1.107914,1.509447,4.167587,0.452480,2.936695,4.427393,0.410074,0.850082,0.517484,0.532679,4.012089,3.128278,1.118453,2.153888,2.883673,3.492770,1.792938,1.798188,1.958945,0.812820,0.209814,3.100869,2.300392,1.414831,2.242110,0.474519,1.930010,3.089294,4.655705,2.491443,1.227758,2.223911,1.074828,4.540111,4.653897,0.261840,3.737064,2.196055,4.127900,2.951257,1.562524,0.127675,4.400793,2.973227,1.490352,0.573596,2.774872,3.506257,3.105476,0.082711,4.451710,2.175650,0.361027,3.556113,2.361777,1.927035,2.760120,1.633828,1.191576,4.538362,4.022857,1.664782,1.451601,3.779015,3.861311,0.030426,4.255968,2.235095,0.483744,3.103567,1.603926,4.645427,4.018978,0.839726,3.867941,1.266310,1.438017,4.919151,0.574724,3.723037,3.725090,1.047048,4.411657,0.445522,3.584315,0.001704,3.554410,3.092752,1.894638,3.250316,3.331978,3.061171,1.007819,1.539457,4.372385,4.177582,1.682519,4.942260,4.734557,3.561257,1.029579,1.157091,2.385553,0.374192,4.490359,2.041118,1.785204,2.266722,4.614634,4.554786,1.282387,2.745349,2.163342,0.229592,2.622879,3.837776,3.864161,3.669764,1.017057,0.366042,0.845239,0.049575,3.778932,1.022831,2.177197,0.463057,2.691870,2.042212,1.365656,4.750134,1.552084,3.348362,4.818889,3.489932,3.436936,3.916947,3.249688,2.045775,1.169948,4.783375,3.228654,0.034865,1.879938,0.205960,4.286360,1.103817,2.695536,1.003143,3.191882,3.259411,3.823839,2.628999,4.162765,3.809594,2.583794,4.261829,0.613554,0.701233,4.949411,0.653937,3.153422,3.195062,1.935388,2.178259,2.585092,2.383595,3.152134,0.317611,1.147785,2.834367,2.813124,1.207737,0.464828,1.047757,2.648248,1.910568,1.479080,0.242158,0.263180,4.063362,2.748975,4.666971,1.228561,0.694192,0.150275,2.967484,2.967722,1.076062,2.043020,0.598666,0.737342,3.155728,1.577575,1.511001,3.000356,1.233398,0.080157,1.527563,4.370014,4.378674,4.593216,0.966391,3.349228,2.461023,1.315843,3.218489,3.050105,0.724193,3.804857,4.553206,1.544943,0.495856,1.817488,4.245601,2.311350,3.819611,2.926852,4.878801,2.785450,3.913450,1.923528,2.245473,1.351398,1.268281,2.765143,3.356035,0.178888,0.195704,0.139216,2.666002,2.916119,2.745601,2.420028,2.802560,1.505013,4.571923,4.254688,2.503890,3.057799,3.048818,1.204211,0.797112,4.449728,1.956976,4.543769,3.467145,3.658154,0.913380,4.438593,3.969769,0.292404,4.497926,2.726975,3.482916,4.132127,1.151640,1.716355,4.033710,1.856077,3.269729,4.093949,3.874047,3.023562,4.621733,1.489255,2.142966,3.863439,3.809464,3.298041,0.627934,2.892310,4.829505,1.319614,0.344864,0.073837,3.017183,0.260732,4.625544,4.420920,4.506044,3.241224,0.155130,2.809218,0.387605,0.410705,0.278439,0.607221,2.644178,2.834372,3.884378,3.916206,1.491104,2.223161,2.542824,0.026330,4.386452,2.489809,2.895596,1.159362,3.880196,1.807051,3.421659,2.579065,4.221442,2.658391,4.218077,1.648893,1.750431,3.542386,3.457782,0.555968,1.544898,0.643496,1.166324,1.860353,4.901400,1.856094,2.235600,0.381996,1.856233,1.513249,1.829872,0.592647,3.284498,0.388375,3.481284,1.179696,3.484141,2.242527,4.802163,1.949044,4.089567,4.695862,0.186708,2.998234,1.299310,1.171177,2.557444,4.703994,0.309623,4.795683,4.032965,4.501040,0.251785,1.503671,0.611139,2.007736,0.867759,0.345685,3.234835,2.669978,4.409770,0.780203,1.739384,2.913624,0.404848,4.461266,4.829622,2.690918,4.139555,2.458420,0.478333,2.009604,2.627751,3.661661,0.676394,2.201153,3.478259,3.164438,0.420184,1.682184,0.239245,0.748086,1.045131,2.075917,2.504204,4.114403,3.888507,2.499822,1.547279,0.664430,4.416867,2.281402,3.092345,3.477416,3.724686,4.117052,2.452845,2.166241,3.764546,1.806750,0.272935,4.079726,3.265901,2.295528,4.901469,3.380985,0.669624,1.753869,2.674973,3.961906,4.261765,2.956545,0.386423,1.874800,1.690280,4.400925,0.767690,1.317639,0.236421,2.329491,0.807210,4.882624,2.157164,4.529543,1.013021,2.857924,3.705445,3.973972,3.327626,4.995099,3.581461,3.058804,4.373967,3.591089,0.651556,3.845049,0.753352,0.743369,1.452300,3.732892,2.921558,1.730248,4.004824,0.470219,1.486195,4.241257,1.812028,1.631287,2.675651,4.542907,4.810448,0.396393,4.742349,4.803876,1.746855,0.090393,1.764067,3.852301,0.612588,1.223637,0.598033,0.170820,4.188253,2.984098,4.383579,0.616882,3.400234,2.875227,4.188956,2.401808,1.437401,2.540912,2.385881,3.430618,4.720789,1.833058,2.854024,1.776024,2.788900,4.563009,1.647654,4.661910,3.843361,3.633414,4.028778,2.719651,1.028530,4.948450,1.416358,1.416108,2.638052,2.056052,0.434193,2.292553,1.698119,4.573383,4.470749,3.028164,3.563576,2.940429,1.155103,3.782382,1.358158,1.828146,4.214526,1.825240,0.240744,0.118909,3.656188,0.226308,4.978565,4.963993,2.097965,1.237900,4.037981,3.651348,4.700213,1.086213,4.738669,2.992911,2.763920,3.121446,1.354880,1.854875,4.421833,3.291607,4.321075,1.434865,0.366853,0.675783,1.291591,2.471260,0.958772,3.392922,3.890833,3.565376,3.639172,2.850926,3.722364,4.423892,3.195202,4.716959,2.799737,3.337378,2.379572,2.755012,3.772623,4.991698,0.238010,2.734144,2.046900,4.647256,0.774581,4.118574,0.652094,3.864287,4.463741,3.732553,4.747227,3.001572,1.404818,4.337122,3.748622,4.192174,2.645344,4.211442,0.575875,4.598181,1.129607,3.927644,0.004912,4.648667,4.758047,4.680659,2.743681,0.885669,0.376173,3.111269,2.666999,2.361374,0.511611,4.372936,3.639144,4.372149,1.950886,3.081703,2.397111,4.915993,1.949910,4.078017,2.948906,1.573203,2.058978,1.761665,3.824835,3.332551,0.581142,3.869435,2.306740,1.632599,1.869454,0.650420,1.561579,0.866207,2.288032,2.639564,4.950098,3.844486,2.644469,1.871641,0.795035,1.896488,2.722900,0.889048,4.499570,3.195586,2.025166,3.971281,0.672745,4.188923,0.094615,1.975421,2.793970,0.839631,3.349074,4.805544,0.404589,0.046179,3.541309,3.966780,2.081385,1.729671,1.758175,4.192692,0.289010,3.980948,0.708483,4.104001,2.707323,4.179615,0.730037,0.723432,1.075488,2.587629,2.215153,1.308003,1.400085,3.830445,0.389364,4.490950,1.971835,3.765013,0.773054,3.944201,1.271773,0.012333,3.885669,2.951493,3.357282,2.993131,1.161592,1.645523,0.037070,4.560410,2.194329,0.840402,0.002118,3.925938,1.718709,1.422153,2.657486,2.462802,3.094413,0.021062,1.824327,4.872911,1.036025,1.640765,0.570327,2.502002,2.003361,2.021917,2.107642,3.510473,2.259566,1.302904,2.465583,4.728445,2.355836,0.695058,4.117257,4.587394,1.702451,0.110348,4.028530,1.625506,2.738700,3.923189,2.383992,1.461992,4.283134,4.615406,3.584709,0.060485,0.215711,2.888618,3.879011,0.707177,4.512598,4.585090,3.960986,3.242517,1.836633,0.463227,4.694793,1.421651,0.914516,4.740143,2.984859,4.774512,4.147748,1.454905,3.329660,3.038837,1.987377,2.710318,2.639500,0.324114,0.897811,2.727837,0.217516,4.050686,1.961761,0.378067,4.206815,0.342971,0.842650,3.833319,4.668295,0.172955,0.302489,2.413137,2.099417,4.817037,2.237147,3.551537,1.751992,0.921328,3.447830,2.276322,2.846217,4.023276,1.767194,2.462596,2.534269,0.341429,3.437563,2.219389,2.995819,4.434779,1.311161,3.368437,2.787900,2.705355,4.682423,1.795444,0.341650,1.711394,0.030677,4.113102,4.944672,4.063953,3.969063,3.226125,2.877568,2.838948,2.026617,0.866509,3.264254,0.125888,1.158789,0.021193,2.495872,1.782184,2.135595,2.866710,0.380250,1.313954,1.150081,4.431642,3.706197,0.929468,4.191747,2.463636,4.062289,3.657923,1.808309,3.008791,2.997642,4.600340,0.480835,4.197712,1.968133,0.702981,1.430672,0.871382,0.446103,1.307782,2.223734,3.565116,4.764352,0.940627,0.452980,1.979320,3.681680,4.127143,1.009305,1.661838,0.445188,1.842550,1.624866,2.776486,3.509134,2.241429,0.006595,3.689839,1.007466,3.255958,4.453670,2.045589,0.154319,4.661451,1.463160,3.642642,1.712034,4.208075,3.260311,1.465084,0.682712,0.816817,3.888480,0.506499,0.728905,2.956465,0.632528,0.267040,0.970146,1.458083,2.006932,3.472470,3.790043,3.135828,2.604133,0.322722,2.277759,0.530920,4.158319,1.462799,2.018377,0.291579,2.110854,3.224336,2.484530,4.116329,1.987680,4.746442,4.139760,3.935649,0.767110,1.202283,1.748328,0.902651,0.373666,0.129227,2.062689,0.189182,0.874572,4.606132,2.492726,0.516731,4.432611,0.928389,2.475076,4.214342,4.940038,0.632454,3.491891,0.385331,2.903403,3.855475,1.687594,3.034103,1.617719,1.553172,1.662268,3.242983,3.089612,4.564037,4.096979,2.904095,3.080385,2.762748,3.388346,2.122395,4.825000,0.061759,0.766101,0.933800,0.737797,2.956544,0.092981,0.509885,0.642505,4.030384,4.212976,3.304523,1.961886,3.709838,4.251957,1.860172,3.370828,3.468241,1.899150,0.177958,2.412905,1.913505,4.552969,0.367226,4.925847,3.449731,4.564273,1.068515,3.299636,0.957703,3.796248,0.144880,2.100687,1.506905,3.867664,4.588577,0.115178,4.197672,0.770588,3.297484,3.279259,3.374320,3.464290,4.608832,1.559886,2.185534,3.058361,2.489942,2.176155,4.472902,4.016147,2.546219,1.581104,3.676624,4.238129,1.539834,4.623627,2.117335,1.605702,3.069497,0.705384,4.556203,3.956667,0.604923,4.584500,4.382892,3.143410,4.671864,3.867576,3.447794,4.402457,1.478583,1.479075,0.406823,3.844668,4.428098,3.471883,4.319044,4.343309,2.275220,3.590203,1.884757,1.419829,4.810685,2.110084,4.294660,3.013716,1.737628,1.890810,4.203513,0.997125,2.287143,0.324733,1.289827,0.682034,1.713617,3.578167,1.884377,2.294836,2.367952,3.021235,0.811022,0.413708,4.734558,1.441373,3.808199,2.669562,3.422322,0.230072,3.404947,4.219286,3.815870,2.735328,0.185391,2.467077,1.355333,2.808952,2.893283,1.978918,3.765784,1.744369,1.148102,3.135352,0.471196,1.560515,2.003219,0.378195,0.458797,2.724167,3.561413,4.501321,4.444904,1.958161,3.088218,0.561600,0.444719,1.305160,3.337909,0.591715,1.635733,4.979687,1.241428,3.793640,0.297491,3.563435,2.092461,3.287793,0.102868,3.821305,0.821702,1.254088,3.572536,3.038280,1.271953,4.218572,0.282756,1.038619,0.895604,0.217236,2.993152,4.882849,4.461944,3.305349,1.206844,3.786163,4.636489,3.367882,3.776916,3.964111,3.151041,2.360849,2.616242,4.641389,4.891420,4.209313,1.785163,2.731853,0.346109,1.188845,4.284136,0.246968,3.069992,2.892243,0.124431,0.681041,2.951313,2.686960,0.151874,2.580222,0.108727,1.455322,1.226075,0.376434,3.368531,2.144828,1.236763,1.344105,4.552119,2.750880,1.268514,2.564701,1.893578,4.476734,1.135947,0.825635,4.486919,1.044872,0.011321,2.493932,4.495811,0.892663,4.170658,4.767841,4.301012,3.893205,1.455075,1.710630,0.785394,2.563898,4.138157,2.483122,4.116790,2.399931,1.742377,0.635509,0.063935,1.765462,4.110278,1.729924,4.094876,3.450333,2.196611,0.213257,3.547611,2.838376,2.325463,4.880643,3.741968,1.725009,1.703023,3.073449,0.774426,2.707043,2.788732,3.295384,4.258264,3.297552,4.518264,0.105764,3.028979,0.155168,4.203866,0.634715,2.462641,0.536573,3.214962,2.743859,0.199736,3.753887,2.658665,2.264369,4.468459,3.922241,4.358252,1.021123,2.454677,1.844230,1.592442,1.509492,1.413556,3.040584,2.750090,0.307753,1.558626,1.756804,0.567634,2.786727,3.575219,0.680059,1.218550,2.438131,0.877313,4.448909,1.488626,3.791177,2.589664,2.995532,3.523904,0.901258,2.657858,1.264198,0.545615,4.246686,1.649256,3.839503,3.615294,2.975722,3.055725,2.579347,2.011998,0.116612,2.970597,2.735414,3.601160,1.226265,2.283047,3.649737,4.252771,2.619008,3.065694,1.389178,2.268608,2.480872,0.714830,0.345794,0.929049,4.172307,2.397890,0.593662,4.788416,0.682532,2.903848,2.696833,1.049978,0.667817,4.603996,0.616566,1.470410,2.775966,3.508168,1.433490,0.185980,3.123909,2.713779,0.288442,2.772783,1.636026,4.052043,1.773120,2.810205,2.598924,4.709860,2.966189,3.254098,2.129968,0.678445,2.352317,3.615572,2.550756,3.022746,3.987102,0.041393,2.767143,3.588804,4.849009,4.234230,3.883802,1.649936,2.464245,3.192468,4.748474,4.969678,3.959201,3.024698,4.979205,4.181634,2.579620,2.652463,1.601895,1.672653,3.981462,1.001410,2.480745,3.307386,4.332354,3.432471,1.129632,1.832517,1.186386,2.302619,0.174114,2.259595,0.543039,3.030563,4.076930,4.320459,4.679651,4.871386,0.228186,4.512719,2.707400,4.055878,2.132324,0.564237,2.560431,2.621800,2.178518,0.606657,0.178657,0.182700,0.562708,0.140716,3.440118,4.686193,1.056256,4.391898,2.621344,0.378502,4.367382,2.360911,4.797873,0.035765,1.691176,1.023370,0.085456,1.689338,2.483509,2.617633,3.898062,1.604487,0.244786,3.187351,4.543093,2.936313,1.183952,1.328228,1.794106,4.354834,4.141129,0.417257,0.722695,3.449286,3.364282,4.400072,2.306694,2.829088,4.370372,1.422621,3.721692,1.216576,0.359456,2.251970,0.092967,3.678369,1.239770,4.492458,0.124439,1.936449,2.059489,4.946670,1.983389,3.444197,0.069012,2.693335,2.080084,1.238278,2.465128,4.430323,4.379707,3.352218,1.763327,3.872333,3.868054,4.454154,4.531654,1.532626,2.714634,2.887558,1.003044,4.733992,3.486069,3.814484,2.322705,4.330668,4.329517,0.343084,4.217684,4.251013,4.126951,1.944877,2.912485,2.773314,3.752275,4.912304,0.304251,3.947846,2.089156,1.875900,2.966587,1.030051,4.346839,0.263661,0.516774,4.069170,3.453369,3.657194,1.901525,3.565390,1.533283,3.909949,0.676259,4.636828,4.301580,0.005088,1.936521,1.373575,3.885680,0.903628,1.390077,0.329315,1.308136,0.963994,4.649903,4.034866,4.696390,1.329679,1.052251,2.848992,3.182027,4.671586,3.108150,1.234664,2.314019,1.909434,0.537279,1.741327,2.822408,2.416099,0.796204,1.089897,4.710687,0.951135,2.643277,4.840735,3.804053,3.747166,3.646316,4.776272,4.569839,2.198778,0.927971,1.105164,4.639203,4.957149,4.928726,1.483929,0.259599,2.950114,4.403531,3.617829,2.710598,1.320237,0.055025,3.279686,3.556389,1.062315,3.859676,1.998140,4.453286,3.784288,0.485116,2.780055,0.815021,2.829397,2.856589,1.466429,3.006414,0.633410,4.078682,4.012361,3.348919,0.672668,3.301032,1.876299,2.714188,2.092898,3.680182,0.202065,0.821017,2.160229,3.005176,0.107709,3.858799,1.018775,0.374372,3.481313,0.828125,0.340571,0.302742,2.791798,2.585188,2.597201,2.945685,3.532929,2.037872,2.023436,2.230596,4.388498,3.901437,3.780031,1.259365,0.252013,0.108601,3.348190,4.951243,3.729055,1.732338,0.336434,2.380695,3.204419,2.292245,4.053653,0.950707,4.436740,3.415142,4.883718,1.529274,3.915617,1.654396,2.614724,1.435983,0.516383,0.614503,1.830987,0.074981,4.682488,2.623839,1.900335,4.704483,3.668552,1.558455,2.970157,2.776374,2.046441,0.028923,4.306895,2.785126,0.561374,1.152757,1.665560,1.620365,1.243756,0.004865,0.294995,2.848655,2.746570,3.553345,3.016380,0.940520,2.702832,3.806999,0.089604,2.865776,3.415224,0.337061,1.573634,0.891916,2.862052,4.126202,4.191489,0.809998,3.443102,3.157177,1.153802,1.198747,2.978362,0.484835,1.429635,3.330438,0.354457,4.884002,3.674821,2.993718,2.712419,3.174283,3.949195,0.632844,2.561346,0.316795,3.641004,2.932339,3.280219,4.718267,2.245218,1.597585,1.901050,4.531007,2.880982,4.905066,4.775073,2.990775,1.818957,4.513543,2.233176,3.583089,2.361926,0.450220,4.536187,0.373268,2.535582,3.139826,4.781851,0.848771,1.464108,2.327391,4.282035,0.056232,3.855040,2.832783,4.384424,0.736707,4.262945,3.996940,3.900754,4.747861,2.364568,1.908267,3.167333,0.527299,3.384066,1.695114,2.107045,1.088369,4.386594,0.542121,0.051243,4.824074,2.166372,3.038268,4.761537,2.393525,3.144956,4.078144,4.699222,3.765919,0.512281,1.602975,1.249334,0.155364,4.269614,0.371304,0.681491,4.597270,2.308000,4.249426,4.498548,0.453169,1.475009,3.955415,0.976544,2.133152,4.959531,2.059914,2.151230,2.048495,4.377997,2.675146,4.087957,4.599635,1.834619,1.790886,0.466379,2.055323,4.827922,1.659421,1.600273,2.178385,4.431402,2.609629,2.209905,0.135687,1.302434,2.819658,1.305920,0.269087,0.535151,1.776625,3.254386,4.868521,4.382332,3.977588,0.125823,0.536350,3.462509,2.626026,3.759341,1.421077,2.492215,1.357346,1.364651,3.546299,1.014299,0.682778,0.381722,4.417507,4.247989,4.205198,2.645205,0.259026,1.344918,0.714141,0.844975,4.713435,3.970405,1.843008,1.015124,4.635089,3.042701,4.583773,3.561227,0.945548,1.338397,1.548915,2.204474,0.930205,0.877226,0.350580,0.996630,1.871581,3.711296,3.120414,2.017677,3.555992,1.129122,1.694889,2.740109,2.463442,3.915357,1.139341,4.321489,4.078608,2.000048,4.369202,3.177576,2.752606,2.935491,2.572436,3.237256,2.173577,2.268409,1.140347,2.559801,1.519515,1.781807,0.519242,2.867250,4.895406,1.350613,4.429143,0.100325,2.175201,4.304443,1.510673,0.846738,3.294251,4.748234,3.141517,0.451538,3.745454,0.029675,2.709315,4.245618,2.148784,1.098045,4.384715,0.773090,1.990433,2.302528,0.157339,2.625487,3.015462,2.078590,0.175525,0.551528,1.961355,2.120057,4.566978,1.862401,3.622308,3.076822,0.192308,2.300743,3.362728,1.549336,3.680120,4.674364,1.352243,2.938420,0.069980,3.165050,2.556168,1.903877,4.520137,4.704881,1.695058,2.661194,0.447480,2.661164,4.398601,1.002916,0.240733,1.961915,0.998469,1.434215,4.628930,4.374606,1.662541,4.507802,4.201143,4.900933,2.634339,2.609546,4.721356,4.408671,4.782932,1.738530,2.197150,3.972713,3.137482,0.263698,4.433041,2.648089,2.004976,3.789931,0.512722,2.405442,2.827655,1.465439,3.915761,4.689790,3.155412,3.272331,4.623479,2.590938,0.639072,4.213411,4.720198,1.163003,1.031430,2.661603,1.495588,4.248769,2.292231,1.171765,0.003166,0.514679,1.786995,4.410424,1.851857,0.675104,4.718389,3.428864,2.081369,3.522307,4.532186,0.884699,2.777556,3.706792,4.896298,1.045381,2.289899,0.687573,2.857387,2.577060,3.399518,2.587573,1.136250,2.214183,0.857374,1.055751,1.602914,4.257126,2.425508,0.075356,4.772927,0.629560,4.427163,2.784420,3.113326,3.399999,2.011455,1.822709,0.171945,4.802169,4.755352,2.306995,2.535766,1.681117,0.938573,0.417838,4.697045,0.104544,2.561481,3.403367,4.544192,3.536267,1.947541,0.235492,0.273572,3.821744,4.710701,3.974253,2.241948,1.696783,0.937056,2.712735,2.142540,3.422929,4.147272,0.443423,1.241374,0.537287,1.146989,0.990988,0.297844,0.292198,0.656486,2.429573,1.429524,4.369328,0.229274,1.872227,2.529325,3.988554,4.669316,4.649673,4.252534,3.343745,1.742310,1.305660,4.285774,2.847123,1.503836,3.466413,4.356383,2.120549,4.960333,2.777178,4.463122,2.438360,1.705762,0.811586,1.870223,2.706291,4.029137,0.525619,3.161109,3.910803,3.169497,3.488591,3.996762,4.397293,0.365701,3.106768,0.700391,1.083687,0.248548,0.204551,0.241570,1.958602,0.365330,4.102196,4.525545,1.504732,1.623931,1.959245,2.223716,4.807704,1.284104,0.670516,0.111952,0.207528,4.195915,1.561740,2.422808,2.480275,2.055026,0.753769,3.411894,2.536449,0.869340,3.755578,3.971925,1.123734,0.451448,4.084427,2.570423,1.319747,0.983717,0.269071,1.582126,1.277956,0.834428,2.221023,2.864172,0.291979,3.155089,4.484042,1.615084,1.207576,0.529183,1.859377,3.388634,0.577990,3.915073,3.385918,1.938995,0.873849,2.019066,2.455799,0.707652,1.440777,0.033602,0.038239,3.466207,2.883245,3.671698,1.545770,3.004355,3.588537,0.508854,3.619407,2.756604,0.833672,2.019875,0.216047,1.236370,4.573646,4.587738,3.987756,0.113453,3.916157,1.302490,2.170740,3.115953,2.243692,0.203076,4.619941,0.162105,1.161307,1.913349,4.698815,2.401907,1.092888,3.936985,3.044911,4.038020,0.964144,1.683528,2.474575,2.640831,1.267963,3.654362,0.223151,3.789089,2.557301,4.489938,2.150452,0.126572,3.236838,0.377707,0.637862,4.967666,3.396686,3.300379,1.676407,2.709212,1.920460,2.228013,1.142946,2.487727,0.172006,3.614238,3.548366,4.029215,0.312819,2.692038,1.408500,0.839637,1.272816,1.931568,1.587287,1.780408,0.553507,4.797060,2.986690,0.030428,4.370891,1.014962,0.808011,2.500787,0.009044,4.171407,0.433114,1.156473,1.674888,1.698448,3.608688,0.700599,4.480269,0.775156,3.385956,4.908951,3.695676,3.815217,1.630828,2.971416,0.085421,3.309265,2.966349,3.081388,4.134720,2.470876,4.696059,2.671688,1.408302,0.159173,3.878112,0.630510,3.902961,3.083341,2.371591,2.402293,0.463290,1.113904,3.214236,4.365491,1.186013,0.423885,0.745174,1.248793,0.162119,1.270054,1.550790,3.229415,4.017756,2.285464,1.665157,1.963746,3.065748,0.048751,1.522386,2.755564,4.244111,0.375339,4.695750,1.314607,2.396565,0.544693,3.932600,3.919630,4.611882,3.064039,4.635121,4.114930,2.074875,4.567463,1.458326,2.229192,4.114397,3.073784,1.655949,4.473488,0.037001,4.255448,1.247300,4.919149,0.203680,0.734759,1.353694,0.659123,1.507770,2.918737,0.639341,3.521032,2.200686,3.346347,2.001705,2.711226,0.849300,4.097774,3.611560,1.121786,1.162236,1.145212,0.750898,2.764868,0.955310,2.212228,0.776322,2.889503,0.319120,4.105848,1.711984,0.500757,2.493026,4.499449,2.610814,3.091339,3.692764,0.162449,4.093689,0.266187,0.516704,0.492026,4.798885,2.657763,0.006464,4.575771,4.798861,4.854402,1.961371,1.604175,3.330552,1.591523,2.792571,0.502064,1.421181,4.559163,0.102807,2.517714,0.890576,4.250422,2.620917,4.810754,2.593735,1.452136,0.629130,0.061848,2.362897,2.933033,0.799801,1.689047,1.903257,1.759164,2.977851,2.617756,2.505488,1.338424,4.012588,4.889803,3.837833,0.478315,4.887652,3.353698,0.419817,4.845338,3.087130,0.124515,1.122682,2.596412,4.718003,0.252943,2.264145,0.452670,2.068826,0.681826,4.138498,1.545968,3.831614,0.566316,4.804493,2.804117,1.184936,4.010823,2.886761,1.213734,3.305921,3.164700,4.808243,3.592669,3.320128,1.559146,3.881365,0.435296,0.585631,0.903589,3.034645,0.956434,0.000832,2.914290,1.419348,3.194121,2.399804,4.316399,0.117752,2.835070,2.370655,3.375601,2.845924,4.793098,1.257927,3.366228,3.966954,2.623745,1.402847,1.757926,2.273530,0.542605,1.593767,0.348542,2.256252,1.192186,2.837911,4.328526,0.991863,1.903724,0.659277,2.434056,2.341118,2.395420,4.939868,0.116740,1.748398,3.274996,0.972528,3.584536,0.638611,2.250367,3.343061,0.583067,4.591940,1.769524,4.392303,3.644238,0.871033,4.631225,1.576059,2.449884,3.594211,4.643305,1.577487,4.375485,0.730439,4.409117,4.009102,1.639670,1.441834,3.757875,1.617879,3.730195,3.291654,2.989005,1.411431,3.216646,2.592474,0.136755,4.559607,2.442619,4.389332,0.084334,3.917706,4.770037,1.688418,3.022779,0.009520,1.822500,1.849924,4.551399,1.680015,3.845397,4.416877,4.467529,2.173366,4.819684,4.867668,4.124355,4.464465,0.422637,2.154239,1.926185,0.996383,1.628676,1.291254,3.194502,1.560650,1.492210,0.856012,1.234446,2.979944,3.167373,2.115329,3.491334,0.826602,2.766361,3.335660,3.178438,2.627500,0.613503,0.338881,1.644346,2.109619,1.011198,1.229457,0.007691,0.823538,0.230778,2.462535,3.544356,4.008426,3.229595,1.335382,1.951521,2.475545,1.469557,2.934030,2.467841,3.972403,4.509665,1.911333,4.388927,2.688839,1.316633,4.389546,4.637151,4.515435,2.227713,2.693540,0.781402,4.689474,0.178000,4.118781,1.016092,1.567326,3.571467,0.330383,3.870330,0.264475,4.142949,2.509636,4.590174,2.791856,1.092240,1.176653,2.340394,4.960264,1.820802,4.059448,2.876663,4.692332,3.752263,0.090469,0.487090,0.847553,2.442436,4.109590,4.327810,2.623073,3.068920,1.147076,0.399452,0.347010,0.529893,1.556044,1.820274,4.322121,4.659551,0.780639,3.582139,2.832213,2.820614,2.651106,0.442574,0.812678,1.704661,2.053741,0.101911,0.184657,0.468570,0.328284,4.663364,1.095762,4.803038,0.365473,4.148524,2.951648,1.998830,2.555671,4.966958,0.738238,2.252955,4.949604,3.221013,4.952371,0.565006,0.761020,1.423056,3.156506,1.556071,3.146767,0.252885,1.113830,2.211174,2.364015,2.277183,2.664771,2.088777,4.517094,4.031505,2.114712,4.110790,3.922520,2.685950,2.834706,2.396369,2.751693,2.550372,1.380528,1.697322,4.871888,4.863179,0.372452,4.202395,4.223698,3.289382,4.557591,4.690168,1.790203,4.666115,1.935850,2.096938,2.715362,4.508270,1.587786,3.319944,2.009669,3.294275,4.167980,1.643766,1.183671,4.399228,1.985185,3.486682,2.977539,4.061332,0.254886,0.604605,2.260111,0.896893,2.510272,1.614741,3.597723,3.937684,3.464584,1.240242,1.509389,0.223388,4.073882,2.526185,1.495890,3.379029,4.795526,0.412707,3.740195,2.178326,1.596343,2.179988,1.008929,0.964066,1.591731,4.487341,0.272873,1.506320,1.238576,3.006399,1.035373,0.053403,0.769270,1.809668,4.017345,4.234592,3.232994,2.069247,3.257779,0.976284,3.955354,2.216412,4.827373,1.290554,3.197203,4.267695,1.231504,0.110048,2.185130,2.559368,1.080205,4.022759,3.644770,2.826745,4.916018,2.830752,2.069355,0.755858,4.842150,2.255021,1.672757,3.849769,4.010191,0.458241,0.436678,0.442892,0.167087,2.808362,0.919499,3.342230,4.240147,2.633358,4.146056,1.834287,3.956396,4.167909,1.178526,4.951195,3.620832,0.248498,0.822266,4.180902,3.055302,2.203958,2.698042,1.426765,2.877112,0.117772,4.822246,4.999810,1.134952,1.786269,1.642010,1.239204,0.547875,3.444690,1.671411,0.977492,2.662150,1.870584,0.533560,1.930689,3.562383,2.904927,2.315689,4.718230,3.711982,4.722333,4.013030,0.770262,1.034351,0.330396,1.983772,2.469690,4.948803,4.520096,1.062701,1.992701,2.573405,2.863758,1.185166,1.442729,3.078730,1.688396,3.598606,1.491765,1.052105,2.688249,0.530024,4.673576,1.113784,2.308084,3.578301,3.021788,1.456470,4.679412,2.281587,3.406531,0.725286,1.311479,0.816922,3.065566,0.395236,2.111550,2.040772,0.912019,0.907836,1.641349,2.588216,3.065527,3.539093,4.053478,2.008178,2.061269,2.784942,3.995224,2.873013,0.776705,0.710812,0.386079,0.014654,3.754411,0.776060,0.252979,3.515930,2.034132,3.876119,3.283906,2.140892,4.922741,0.479566,0.243763,1.655460,4.816509,0.066547,0.300738,4.505294,4.446759,4.146224,3.433403,4.629085,3.248321,1.651804,4.619588,0.683281,3.929826,0.058869,1.842875,4.892724,0.574653,3.166642,4.478026,1.245243,0.996255,3.919192,0.839811,4.349045,3.217299,4.350959,4.903703,3.342917,4.461976,3.443470,0.255061,0.312316,0.970630,2.937031,2.377213,3.310437,1.544416,0.197697,1.965277,1.221883,1.747217,4.742623,4.691969,1.545292,1.433388,0.911985,4.650756,1.159331,2.099584,3.481668,3.697679,4.963415,0.681263,2.006307,2.829065,4.059997,1.729714,4.518013,4.754177,4.892212,0.653301,0.821554,1.588274,2.098294,4.988014,3.861090,3.240149,3.597343,1.758017,3.209771,0.196338,1.379322,4.918661,2.760540,3.815204,3.102349,3.750972,2.482881,4.991053,4.622851,4.263124,0.361194,0.058055,1.832823,2.739064,1.602222,3.416860,1.024966,2.053507,3.609740,1.839065,4.957027,2.569671,4.005037,2.820471,3.379422,3.214803,0.240544,3.894415,1.164037,1.527561,0.625235,2.416185,2.226472,1.495223,4.962774,4.582009,0.525687,3.695237,1.685101,3.282144,4.374485,3.626923,0.097438,4.435287,2.998101,4.286777,4.735437,3.846845,2.505695,0.747084,3.928279,2.549715,4.590907,4.685213,0.447935,3.418388,3.199824,2.518675,1.187970,1.510547,3.026118,4.661200,4.740342,3.474450,0.010150,0.905700,0.126487,0.552218,1.732833,1.230156,3.570024,0.374860,4.342909,0.738689,2.305000,4.930842,0.157690,4.550087,4.531975,2.981103,4.046937,1.137972,2.338331,4.698308,2.713753,4.947933,2.863459,1.430027,2.648980,1.613520,1.443902,3.208254,4.641027,1.241832,1.873868,0.920300,0.550967,1.933937,4.587173,2.382940,2.254797,4.761635,4.823401,2.579451,3.455616,3.159567,1.843924,4.346443,2.606280,3.275740,2.133611,0.206312,1.682629,1.473764,0.641931,0.701510,4.480436,3.332036,2.190816,4.071175,1.619539,1.491403,4.363836,2.363032,0.532045,0.060349,3.692558,3.314082,3.912583,0.024715,1.420708,3.342360,3.426254,2.461567,0.459233,2.095924,2.811310,4.943523,2.151735,3.280637,4.245230,2.199416,0.774892,3.949992,4.705891,3.408038,3.047580,4.400033,4.622659,1.367860,4.126343,1.075845,1.127244,1.971382,1.182203,3.945822,2.833491,4.841725,1.756734,3.768717,4.408769,3.137014,3.395735,2.065290,2.415413,2.900937,1.078423,0.279602,0.378133,4.716759,2.981817,0.026816,0.595233,3.953615,1.630640,3.594269,3.630536,3.607723,0.114595,1.332122,1.487497,0.542303,2.227474,4.580892,0.464603,0.999954,2.258123,2.029983,3.404676,0.993704,1.989794,4.081056,3.079026,2.343154,2.838621,2.662206,2.810141,0.104361,4.888252,0.312222,1.632353,4.836554,2.778998,2.297945,3.440686,0.405018,4.198325,2.864459,4.663865,4.933275,4.649016,4.987857,1.863405,2.922746,4.656094,1.007646,0.324450,2.248971,4.220114,0.557858,0.554348,1.379471,3.803146,3.908949,1.720155,3.457038,1.166920,0.952691,2.339853,2.425203,2.652524,0.179686,2.074892,3.765629,1.337366,0.379795,1.885841,2.866550,4.267591,2.136306,0.634988,2.565418,1.780541,4.096381,2.558934,0.943316,0.158529,0.764970,3.648631,4.929578,3.621613,3.420511,0.977780,1.453172,0.217556,2.639637,1.437916,2.998469,2.545990,2.127742,1.087333,2.660288,3.768768,3.647080,4.327901,0.447370,1.894875,4.349831,2.344140,0.448889,1.538284,1.541594,2.042790,3.202651,0.600467,2.589068,0.522972,0.940238,1.776007,2.784687,2.516437,2.300285,2.146050,1.714940,0.303807,2.989515,2.496856,2.436032,3.641802,3.268971,2.620362,0.059728,4.764283,3.041399,0.217352,0.911982,2.200772,4.148299,0.424230,2.145129,1.570741,3.251405,4.423514,2.832810,3.285840,2.258152,4.629104,3.136842,0.128525,0.829183,4.128687,0.447109,3.747440,0.400065,2.870041,0.830121,4.984992,3.873496,3.021855,3.990871,1.302502,4.020170,0.658999,3.875889,4.154736,1.093629,4.864679,0.767380,3.506681,3.526377,4.927266,0.688182,3.363090,1.730725,1.266231,4.674367,0.090346,4.467525,1.723707,2.540079,2.048737,4.116577,2.576299,0.517913,0.376578,3.986684,1.710247,1.960722,4.946449,0.888785,0.374157,2.005151,4.293128,0.509130,3.014484,0.489774,2.524886,0.873599,0.432678,2.268917,2.711537,4.114304,2.881918,2.931735,1.588892,1.487340,1.494136,0.235778,1.415060,3.960058,3.965816,3.721764,3.211543,4.390775,4.327293,1.911634,3.326345,4.426679,3.699247,4.625822,4.886574,2.539281,2.982811,2.289904,2.177515,0.449147,1.836695,2.236698,2.982803,0.631071,4.906840,1.807792,1.277279,2.049133,2.398504,1.714533,3.845084,4.765971,1.114562,0.226928,2.830023,3.198839,4.278725,4.523120,0.055832,0.899123,1.630821,1.557272,2.465919,0.700040,4.234391,2.603890,4.909712,3.111329,2.038346,1.657554,4.327038,4.390944,1.217766,2.451761,2.160474,4.330078,1.141225,0.754825,2.245829,2.265629,1.488256,4.059228,4.102725,3.465423,4.763602,0.450669,4.726156,0.764479,3.619693,2.226721,2.628650,1.907725,1.788497,3.011053,2.982594,3.568884,3.583130,0.148667,2.709259,3.329086,3.895854,4.443362,1.630029,1.969026,0.494264,2.222740,4.579109,1.476139,1.190315,0.825725,2.902884,2.617082,2.234381,1.337368,4.887139,0.804320,1.384887,1.570158,2.094039,0.901316,0.768362,1.211425,2.623179,3.823266,1.388113,3.942162,0.336110,1.171136,2.109666,1.717626,1.385350,1.856143,4.125520,0.919432,2.188466,3.230862,2.069973,4.517876,0.497895,2.050061,4.777199,2.330006,4.171850,0.342236,3.661728,1.391468,0.399581,3.161186,4.023588,0.657297,0.329974,4.648795,2.008312,1.047176,4.811653,4.682327,1.353551,0.957914,0.627766,2.045604,3.867428,1.735867,1.245254,3.904448,1.911446,0.313643,2.219264,4.300663,4.940175,2.887746,1.981157,2.803373,1.916845,1.438197,3.676573,1.044267,0.579488,4.105923,0.267141,0.428155,2.184693,4.999007,0.535197,1.897253,0.494453,2.205921,1.706737,3.141052,4.780194,0.985947,3.398924,4.743095,3.991583,4.327708,2.100144,4.864524,1.163004,0.904367,4.690251,1.687868,2.585363,3.627705,4.976130,0.825427,3.886439,1.268485,1.865067,2.748852,0.497649,4.508623,2.363525,2.361414,2.352387,0.431985,0.869783,1.392887,2.938552,4.980558,1.838420,4.241249,0.068993,3.865413,2.307449,3.330814,2.208060,1.826980,4.494268,2.998238,0.535754,0.284108,0.592486,0.942593,1.017061,4.787877,0.651074,3.570823,4.475761,2.163059,3.798454,4.062463,2.263169,3.822160,0.073934,0.804924,3.152393,1.481626,1.433915,1.961925,1.718339,1.415709,2.151072,2.322500,3.213384,2.907104,0.811368,3.928129,4.859432,1.525358,4.411263,3.196038,1.880504,4.295657,4.330825,2.419595,3.924800,2.899307,0.782578,2.863985,1.977686,3.202443,4.188793,3.465476,1.556478,0.218375,1.773379,0.911933,3.727650,0.045356,2.857837,0.337195,1.087361,1.944488,2.355924,0.171471,0.301665,3.683057,1.438031,2.668544,2.467603,2.371164,3.695065,2.801053,2.540281,0.750306,0.934412,4.597385,1.192383,1.043364,0.928846,2.541988,3.989646,3.689086,0.670213,0.588982,3.612075,2.871218,0.226658,3.861132,2.636703,1.566978,0.938461,4.309325,3.923052,2.628336,1.519538,0.764492,0.404698,3.699236,1.209145,1.892391,0.504788,4.643346,3.647877,4.409683,0.208289,0.395631,1.349976,0.040929,0.888161,1.503348,0.992333,3.140872,1.926247,1.150519,2.584047,1.361242,2.946244,2.412043,0.452537,2.013729,0.664212,1.529866,2.748441,3.002656,3.632189,3.279986,2.246520,3.794649,0.141023,4.737116,1.198786,3.472326,1.487312,3.451496,2.340103,1.260615,4.566524,1.168253,0.410757,0.261101,1.581669,0.701339,1.291377,4.959796,2.412948,3.196909,4.632762,0.131718,2.238027,4.047792,4.416337,4.235515,1.842652,1.092972,3.882301,1.308658,0.913925,0.404500,2.532484,4.616557,1.475029,3.831121,0.458317,0.849565,1.542451,1.390346,2.700920,0.326474,4.122860,2.333041,2.902974,1.721006,0.545598,1.104276,1.064049,1.395223,4.661726,1.227324,2.102062,2.731678,0.543503,1.001740,2.640478,0.363970,0.328240,1.974046,2.455429,0.764752,3.997767,3.198978,4.196706,1.926288,4.129632,0.158465,0.130224,0.422538,2.324425,2.762048,4.540454,4.205788,2.248804,2.893100,1.785358,2.661539,0.396423,2.586772,1.459014,1.211479,1.664083,1.833447,3.179721,4.143126,0.926377,1.084907,3.005586,3.622535,2.252617,3.484455,2.253783,4.466743,3.660982,2.375429,1.849310,2.003155,3.995102,1.526378,0.718470,0.186791,1.112429,4.281878,4.936930,0.868046,3.385511,0.851935,1.604709,3.284688,1.955530,3.212995,1.214800,4.230788,2.675962,2.243493,4.741678,1.758131,4.234474,0.337819,2.495620,4.416853,4.925291,3.910537,0.788924,3.206240,1.851819,1.325536,0.082318,3.760254,2.827709,0.126297,2.581930,3.472081,3.368457,2.966888,0.507397,1.074115,4.483555,0.189627,4.048447,1.603222,1.666853,2.680578,2.870919,2.020879,2.961791,4.965526,1.780422,2.704325,2.144338,3.546974,1.409992,3.958861,3.897856,4.403143,2.308818,0.456313,3.523998,4.984761,4.275264,0.938572,1.946945,4.663600,1.663832,1.977687,4.220087,0.752209,1.531547,0.472851,1.757388,0.048996,2.459668,4.887677,4.758366,2.345300,3.550115,2.071398,3.631079,0.546691,1.037065,0.799877,2.264339,4.197759,0.118821,3.986806,0.754646,4.303683,4.021608,4.988890,3.279701,0.946558,1.795305,1.892905,2.618347,2.509263,4.163552,2.114092,4.493707,3.703286,1.663419,2.524836,4.782749,3.833535,2.003918,2.046815,3.665994,1.369024,0.695806,2.234974,0.899882,1.418266,2.618295,3.904429,1.429329,1.771691,2.530669,4.449134,2.952929,3.517531,3.663743,0.991537,1.009250,0.305442,3.838270,4.313124,1.700874,1.566708,1.062636,1.007096,4.241573,2.786455,1.180413,3.985664,4.537077,1.562442,3.846706,4.560405,4.105889,0.401407,1.295453,4.571425,0.602383,4.565315,2.578370,4.457293,0.933269,4.479794,0.048302,0.569726,3.666035,4.726190,1.084827,3.793526,0.806646,1.793278,1.536835,4.364644,3.891786,1.999382,0.436832,4.918413,4.588396,1.850256,3.162212,0.628396,2.513568,1.652457,3.375886,1.738605,0.215395,1.545466,0.548171,4.883912,3.987589,4.784372,2.349910,2.326155,1.315228,0.876331,0.857896,2.079552,3.643687,3.382090,4.165692,4.107504,0.958452,4.848494,3.000823,4.014114,1.668957,1.511803,0.391360,2.275879,4.201819,3.407012,4.894112,4.783375,2.080670,2.137592,3.596461,0.776614,4.346489,4.749583,3.324066,0.556224,1.350189,1.858621,4.227843,1.832638,3.221822,4.508854,3.461924,0.760665,3.404139,1.791954,1.341360,4.423623,0.023612,3.472836,3.302999,3.296587,2.268271,4.534150,1.979620,0.030390,2.430285,3.567333,3.293997,2.516963,4.303560,4.256087,4.071517,2.236739,3.170664,4.039928,0.350271,0.469813,2.332668,0.142939,2.213234,1.104196,3.476345,2.805835,3.386952,1.921672,1.382290,1.358916,2.063581,1.864968,3.725987,0.962505,1.759997,0.106539,3.107211,4.751753,3.891139,4.770599,2.862781,0.011414,0.567560,1.412180,0.489633,2.073645,2.334643,1.049759,2.383170,1.659083,4.896779,4.917199,4.072814,2.875612,4.397956,4.183957,4.535027,0.215540,3.606656,0.958480,4.281463,3.222819,1.534206,0.786808,2.996998,0.139425,3.957736,1.607971,3.864034,0.421420,4.982035,3.566548,3.997050,4.374476,2.294761,1.570005,2.818233,0.642940,4.321883,0.254739,0.104594,3.037339,2.711399,4.962502,4.173317,2.685092,4.444087,0.256272,2.695045,2.011662,0.222055,0.706270,0.082716,2.617217,0.215572,2.204413,3.146655,4.775282,0.265671,2.284081,4.220863,4.948930,0.396272,0.434493,4.711071,4.921573,0.958697,0.362733,1.226737,2.237494,3.657283,3.493283,3.335137,4.712000,0.181944,3.023982,0.783014,4.043226,4.290752,3.140165,0.482687,0.744158,2.418939,4.615635,0.953178,4.483063,4.931357,0.090999,0.687505,1.259730,1.001384,3.513168,2.822050,0.874667,2.417551,2.363376,0.241866,3.646986,0.631303,0.774100,2.184586,3.190567,3.767057,4.985987,2.438979,4.927226,2.948185,3.375329,1.775476,1.629513,3.092269,4.237147,4.458636,2.988768,1.778620,1.501273,0.273060,4.773152,2.564822,2.505540,2.794332,0.874087,0.873176,0.298202,2.215482,1.389097,4.722492,0.526787,0.449683,0.277282,4.553463,0.875314,1.301592,1.368734,4.969548,0.229506,2.802059,0.107740,3.667484,2.272178,1.659416,0.796068,2.355436,0.214461,4.447539,3.667741,3.793579,2.943878,4.576509,4.851782,3.473933,3.910272,4.958101,0.252057,4.215193,1.752356,4.430109,3.475966,1.295495,1.530225,3.275574,3.184644,0.171008,3.028397,3.351315,0.747898,4.508415,1.213454,3.925748,0.072008,2.004087,0.989341,1.105089,1.915932,0.068854,2.335608,3.515521,3.310615,4.417912,0.497375,2.587293,2.271643,4.212617,3.890724,3.300086,4.051292,4.649272,1.921504,0.058484,4.192587,1.665180,4.427098,3.551982,2.616955,2.529109,4.948526,1.023750,1.886421,2.349747,2.282036,4.145875,4.000496,4.594720,1.069155,3.170341,2.614920,2.749241,2.180572,3.021732,3.145437,2.032385,2.641318,1.735346,1.086705,3.687550,3.783179,2.432873,4.028116,1.480930,2.773976,3.183438,0.067408,0.896135,4.193392,3.469889,4.471437,1.838321,4.305265,1.116215,2.772333,3.682525,4.692620,4.415291,4.945252,4.522631,3.025476,2.154873,0.173364,1.633407,1.282568,1.899554,1.627751,4.860307,0.616911,3.601868,2.107392,2.405751,0.540468,2.401616,1.840446,4.257308,0.323641,0.665408,1.733747,3.316326,2.260691,0.372306,1.647964,2.443508,1.924487,3.894821,0.913326,4.692917,2.279681,1.526392,1.978170,2.821068,0.176561,4.550272,0.136631,4.391481,1.355415,0.225658,2.981665,4.170409,4.673824,4.178086,0.309333,1.474589,4.036639,4.004061,1.208977,3.548110,4.554952,1.365668,0.671205,0.438452,3.303999,3.084204,2.722951,2.501481,3.987253,1.083624,0.608700,3.701438,3.198453,3.608044,2.323851,2.684857,0.429287,1.176650,3.410618,0.055013,4.554768,4.186707,3.586082,2.711839,1.496044,4.753521,1.313756,1.929825,3.151923,1.807246,2.650430,4.262583,2.605435,2.028841,2.878353,1.525922,4.930078,0.464951,2.668795,4.267858,1.458447,3.590412,4.950964,0.581185,1.954001,1.474278,2.252879,0.262753,2.356977,3.428819,2.363318,1.783533,2.878598,0.056869,1.949844,4.591178,0.230670,2.579968,2.544870,0.794693,0.489652,2.079515,2.744872,2.388221,0.301624,4.023834,4.676037,4.366247,2.572836,4.580029,3.629902,2.226000,4.997923,0.385320,2.649099,0.675078,0.535138,1.018762,2.842488,0.478423,0.546493,4.252774,2.096714,2.483836,1.237481,1.905994,4.843124,4.493671,3.834182,0.075942,2.737420,4.044688,4.942139,3.799461,3.765636,0.221631,4.686836,0.987200,1.875003,4.262240,3.488617,3.823209,2.937930,1.199136,4.697719,1.050390,0.224463,0.064570,0.793372,3.642476,0.269160,0.302942,0.948117,3.481652,4.454853,4.831397,3.628164,4.609775,2.750372,2.782386,3.959340,1.517030,2.146011,2.881977,0.310108,2.418424,1.530061,0.423492,1.247094,4.952472,3.645697,3.457332,2.037992,3.871855,4.187483,0.434881,1.760674,4.470946,2.118105,2.549244,0.840172,0.445042,4.757699,1.050590,0.675822,3.945975,0.437038,0.764551,4.280139,4.439756,3.268880,3.348384,0.807102,0.066581,3.223872,4.364444,0.513888,0.537567,0.706415,3.841438,4.029318,4.973067,3.291930,3.302449,4.558086,1.812546,3.893561,1.596303,2.005721,4.335958,0.814740,4.967663,2.457819,3.061998,3.280300,1.898790,4.251672,2.957437,4.625924,4.727662,3.504758,3.600529,2.186968,1.205765,3.372456,1.997069,3.367516,2.201969,1.392765,3.064975,0.457665,3.696188,4.314704,1.036187,1.244308,2.116854,1.821347,4.568623,1.755598,4.921803,3.315236,1.903726,0.314416,1.654601,0.385304,0.961621,0.566229,3.482756,1.780289,4.545250,1.563544,1.779555,1.297072,4.794887,0.728112,1.015861,2.945061,4.568961,1.804083,4.483599,4.695713,3.875606,2.696740,4.063351,4.573667,4.829570,0.736077,3.433383,1.256731,2.860015,0.448395,0.636233,0.627765,1.734752,2.253914,3.773373,4.526601,3.163134,1.576894,2.214584,1.733088,2.959389,3.140660,3.969291,1.031689,0.883209,2.606126,0.421373,1.453292,4.900167,4.031336,1.065246,0.575158,3.282602,1.033718,1.450868,2.870814,2.571050,0.112252,3.338194,4.793219,2.917709,1.281849,2.246320,1.610776,1.459883,3.689273,3.748221,0.866661,3.490698,3.931085,1.389756,4.923294,3.485849,2.925338,4.214565,3.633477,2.975681,3.352093,2.972065,4.314453,0.449511,0.432033,1.456772,2.429685,4.334678,3.127086,2.429072,0.674715,2.722749,0.717008,1.867148,2.081338,0.900092,4.631128,1.781484,2.004343,3.717312,2.796465,1.328675,2.335986,1.310174,2.021859,0.373647,4.592882,4.644246,1.032620,4.705171,2.554946,0.114051,0.984664,3.079912,2.542796,2.124289,1.417027,4.550835,1.620089,0.599292,3.145104,2.817262,4.098889,4.683865,4.731317,3.421189,0.510572,0.189532,1.848462,4.104781,3.686801,1.813782,4.477776,0.306674,1.090292,2.570210,0.846745,2.381602,4.173058,0.718554,4.154673,4.290201,3.349318,0.343430,0.421253,1.817195,2.100028,0.808344,3.050381,1.691718,3.405670,1.566948,2.552542,0.556572,4.535058,1.362710,4.024182,0.284851,4.251436,0.196290,4.363969,0.889560,2.540345,0.280878,0.752336,1.493927,0.969992,2.258911,4.039637,0.690183,3.099665,2.151897,0.305530,4.197110,3.620715,3.220857,0.896933,0.613964,4.531617,4.517259,1.073677,1.704364,1.289752,3.283152,1.380346,1.684789,2.323346,1.749556,3.679681,1.610179,3.307146,4.135755,4.394948,3.559566,0.675653,1.212008,3.394585,2.463045,3.085342,0.777590,0.849065,2.951317,0.724618,2.939693,1.513710,4.331433,2.255378,4.203739,4.912973,0.483753,0.594156,1.453655,0.210667,1.257580,4.305674,3.998177,0.971612,0.957261,1.667794,3.271656,3.504015,4.933396,2.198095,4.634010,0.546814,0.093831,4.104662,3.129981,0.324355,1.961056,4.030323,1.546341,4.826896,3.420208,3.620763,4.937237,3.818662,3.404857,3.208556,4.278353,3.286772,0.028893,3.414611,2.384016,3.000301,2.466180,0.112893,4.420934,4.574061,2.323312,4.412169,4.502900,4.037209,4.925341,0.796192,2.190226,2.034437,4.573850,0.885158,3.853582,0.828171,3.744868,3.636488,2.909591,1.267384,3.897240,4.354376,0.148579,3.996634,2.072552,2.546410,0.158669,0.467601,1.503521,2.812908,4.337891,4.325988,4.789956,0.035806,2.063611,4.946309,2.688590,1.542536,4.086026,2.443588,2.269976,3.468624,0.521845,1.925738,2.961825,3.480356,0.173431,0.426828,1.236086,2.401091,2.623937,1.967132,0.265467,2.610574,0.290391,1.660424,3.139815,1.562266,0.407345,2.678140,0.746890,4.583367,1.527774,2.097067,3.033469,2.944565,4.983381,0.053011,1.997132,0.701420,4.684870,4.832248,1.664588,3.089787,0.677210,4.413602,2.149970,2.601061,0.722411,4.286582,2.720027,3.686860,2.163426,2.678825,0.434616,2.784211,1.890555,4.511939,3.102528,1.370321,0.743938,3.438144,3.813761,1.489216,3.403394,4.942010,2.340002,1.148055,1.517203,0.270224,4.427093,1.692700,3.924778,4.018886,4.153532,1.264852,0.163468,4.542240,1.792809,4.022727,4.977432,0.438252,4.001601,2.208636,0.565223,3.720007,4.343517,0.177028,4.429354,2.030471,1.641454,0.108967,1.192692,2.732945,0.112549,2.704473,1.961977,0.866046,1.563334,3.395673,0.652203,0.216995,2.452491,2.052940,1.388959,3.272239,0.628216,0.281935,4.420724,0.545202,0.604243,0.231232,4.785626,2.707167,1.618285,1.294311,3.259639,2.682328,1.714888,0.573906,0.822449,2.455859,3.233963,4.643924,2.146197,0.256768,0.905584,1.825321,1.186372,1.479484,2.537217,4.018413,0.005563,3.216063,2.496939,0.566540,1.188167,3.510334,4.472319,4.509471,1.782392,2.991113,2.013950,2.157252,0.880344,2.737187,1.293595,3.601716,4.853042,1.405537,2.639074,3.586207,3.609609,3.266154,1.324056,2.779766,3.573295,2.497849,4.538857,3.748827,4.654452,2.829942,0.372280,4.431188,4.323530,1.035626,1.139973,2.766478,0.260158,0.592867,1.719686,2.637602,4.737787,2.994761,0.444703,2.979792,3.005176,4.493603,1.286021,2.647621,1.477572,0.890662,3.607548,3.678093,4.139311,1.161429,2.601127,2.252844,4.271349,3.058913,1.720223,4.724995,2.677324,4.164924,0.714686,1.717673,3.670244,2.818984,4.863571,0.356616,0.051121,4.777824,1.611906,0.442608,0.593517,4.281786,2.208261,1.490858,1.753008,4.265107,2.177394,2.271956,0.166683,1.418601,1.445198,3.249176,4.619541,3.661529,3.816874,2.105995,1.213351,1.340007,1.484611,3.811343,2.065861,2.800873,4.461556,1.429075,4.796129,4.820830,2.159414,0.477164,2.523117,2.166962,2.181026,0.475304,3.903029,3.765275,1.893335,0.228764,2.353700,0.044191,1.084346,3.643118,2.572774,4.598098,0.924558,2.522841,4.301070,4.690467,0.339313,4.161161,3.127667,1.561090,0.168973,2.920546,0.388890,3.284425,4.412628,4.979026,0.529660,1.550149,4.285438,4.345312,1.464761,3.934112,3.146804,1.948143,1.411011,1.099078,2.944683,1.159421,2.719726,0.180064,4.845885,0.010885,0.456778,4.737893,4.268916,2.687268,3.153043,4.594806,4.145545,3.065649,0.536595,4.635828,0.596997,0.814216,1.715775,0.042066,3.256731,0.781464,3.080899,2.723042,1.265701,0.639111,4.063195,1.908089,1.188576,3.280506,2.804582,1.989670,4.351174,3.577733,1.485276,0.830749,2.903660,2.123674,4.576598,3.780925,4.954737,2.870531,0.741399,3.361129,1.918899,2.895848,2.899272,0.748184,3.869740,4.262676,4.829481,1.395640,3.066986,2.131524,4.598155,4.127551,2.765690,3.014644,1.032342,2.175602,2.351983,0.822077,0.668362,2.346547,4.815454,1.762319,4.931036,3.114640,2.702057,4.216588,2.795321,0.132206,3.004444,0.731789,0.656254,3.233861,0.803900,0.813730,2.817819,1.188661,0.312633,4.548165,2.742229,1.525647,0.119746,4.152250,4.395614,3.138795,1.840570,2.710597,0.689303,2.613435,0.571841,0.016835,2.867324,2.297626,1.100338,4.512144,2.388702,3.420170,0.152871,1.495877,0.401822,1.497088,2.885900,2.533403,4.654704,4.555461,0.942004,2.091055,4.478988,4.583170,2.664122,4.796949,2.303230,4.796238,4.442551,1.401582,0.330057,0.944782,1.994987,1.929405,3.367352,2.006860,1.578275,0.731218,4.522297,1.824098,0.890320,2.709570,1.134067,4.790018,0.523997,2.507022,2.861603,1.332474,3.600725,4.654438,1.294634,2.919736,2.971930,3.056409,3.484186,0.041004,0.889035,2.391796,1.385514,3.657555,0.656426,2.493232,3.100910,0.988518,4.039454,4.693131,3.810297,2.331268,3.184984,4.091135,1.063061,3.746770,1.839870,1.544054,2.962556,4.171249,1.285743,1.601048,4.305326,0.353631,1.762047,4.898660,1.608964,1.217237,4.766235,1.214796,1.529527,3.334795,0.638459,2.412232,0.711827,3.077029,3.775886,2.480970,4.264236,1.597455,2.901246,2.243576,1.527300,1.691961,1.448808,0.934529,4.757471,1.705664,4.857554,3.083009,1.043286,0.350131,3.502055,3.623795,1.979450,2.990686,4.297179,4.438600,1.124308,1.182653,2.990485,3.589744,0.982465,0.004782,1.098823,4.748540,2.209479,4.651097,4.766868,3.161673,0.309010,0.680715,1.848313,3.819827,2.266605,0.237816,2.625909,0.063777,4.573935,3.374199,4.690329,2.783421,1.922834,3.981056,2.151981,4.674759,3.709803,0.445449,3.870937,4.020575,0.167066,0.213782,0.635597,3.809443,4.920451,4.103171,3.629830,2.187873,3.306270,1.462360,2.519304,1.856852,1.832888,0.509770,2.475719,1.047142,2.803541,1.554015,0.907592,4.012436,3.395940,4.421850,3.046770,0.860459,2.197308,4.108843,4.886654,3.562587,0.717724,3.486496,4.936992,3.398154,3.264259,4.605408,3.986622,3.871002,4.089254,0.445501,3.464111,4.269075,4.089057,0.726679,1.592317,2.550464,1.370374,1.199669,4.017661,3.967544,4.508350,2.806520,2.473170,4.297098,4.257479,1.755628,2.822988,4.680554,0.303878,0.144631,0.318378,1.404694,4.213177,2.284417,1.407803,3.713551,3.369237,0.092255,0.492733,1.384493,4.164530,4.752707,2.577131,0.971244,2.813350,0.161363,2.917993,1.736279,2.648015,3.703687,0.982063,4.653676,1.392982,3.030208,2.867305,1.420180,0.353099,3.229939,4.571583,1.782992,2.893573,1.121799,2.825751,1.311903,4.811101,0.475993,1.728600,1.291987,1.937354,2.635922,2.106249,3.276337,3.945497,0.881005,0.090480,4.694395,1.813923,2.961465,0.790264,3.855832,2.151316,3.347748,2.898944,3.978993,0.653905,3.064845,4.618889,0.818520,2.884274,4.800002,0.537357,0.216517,0.951129,0.109303,2.850022,3.413360,0.027625,2.243738,1.860781,3.845657,3.915424,3.679866,0.008426,0.940718,0.049167,4.951263,4.676044,2.595877,1.123399,2.979799,1.194942,2.127030,4.250312,2.536597,4.273642,4.341669,2.751782,4.219112,2.203090,4.398657,0.751712,1.961668,4.615849,0.969277,3.776592,1.988397,3.941195,1.550383,2.441611,0.472687,2.677774,1.158588,0.947674,1.168829,3.773795,2.454457,0.670922,2.397883,4.674115,4.520113,0.698443,2.458695,2.482549,3.760711,2.685708,0.515425,4.849429,4.573506,2.766583,1.570573,1.746378,3.472922,0.321700,0.429093,4.365193,2.281165,1.195914,2.729516,0.213054,3.017080,3.109259,4.713726,1.841631,3.590379,0.049094,0.670381,3.792296,4.129169,4.160341,3.957388,3.843715,0.186185,0.724898,2.013614,3.463917,4.230822,3.564808,0.665378,4.953359,1.000594,3.344393,0.286792,2.160803,3.652536,0.451632,4.659216,1.544814,1.086769,0.459171,3.046817,0.590687,4.272230,3.607550,0.408930,4.984109,4.648013,4.976358,0.570949,1.089487,2.499544,2.893996,0.927603,4.754201,4.870157,0.954373,2.406850,1.384322,2.649732,2.305479,2.381114,4.359991,4.905889,0.379996,0.142284,3.299983,0.856885,0.007547,3.588574,4.021854,2.950468,2.452974,0.221634,2.511635,3.128117,4.481088,2.189180,1.154274,0.135383,3.413286,4.163518,1.530976,3.085045,3.298406,0.116624,1.249588,3.491332,4.999070,1.497471,4.622785,2.409121,0.567290,2.457975,1.570539,3.386995,0.098633,3.624493,3.967289,2.040754,3.721519,4.211715,2.096417,3.309274,2.918709,3.889389,0.158315,3.446372,1.323235,2.978581,4.122263,2.676988,3.310686,4.053971,0.184008,2.665354,2.136402,3.853265,4.852931,2.122015,1.333158,3.141498,2.651241,2.290183,0.309222,1.977174,2.874571,1.034455,3.360914,2.495066,1.505414,4.880954,2.107093,2.980427,4.426268,3.047431,3.175392,2.231383,0.380489,1.490203,2.369332,2.165827,3.686258,1.879861,4.184453,1.694333,4.160362,2.990809,4.210625,4.546794,4.762971,3.903647,3.874864,0.511151,3.562178,3.124270,2.260784,2.783005,3.840261,1.815812,3.895040,0.601984,4.499366,1.204866,2.661396,2.081627,0.389905,4.142723,0.649459,2.553858,0.936393,4.847810,3.225490,1.286188,4.096230,0.165674,1.507354,2.893641,1.195399,3.981094,4.348293,2.712581,3.961316,4.421320,0.255070,2.658496,4.641566,0.239371,4.040975,0.261101,2.967913,4.942672,2.110777,4.018757,2.880521,3.085582,3.018441,3.305532,0.181670,2.606351,4.368296,0.980998,0.435799,2.151138,2.709495,2.032314,3.578945,0.121689,1.944067,0.778507,0.350905,0.182479,1.116179,2.063578,4.540808,0.583792,4.336598,2.724867,3.302475,4.443649,2.072616,1.900512,4.666790,3.292828,3.673608,1.635598,3.517174,0.609002,1.109195,3.738838,3.540249,1.899345,4.275496,1.359474,4.927075,0.485035,4.452289,1.650020,0.517818,4.847427,1.360250,4.700452,4.039907,3.005051,2.910585,1.071888,4.287607,4.321029,0.985269,2.554316,2.101351,0.630030,1.569336,0.442377,2.464615,2.176091,4.760875,1.863729,2.806138,4.389806,4.312996,1.189499,2.774499,3.875092,1.848152,3.853168,1.996121,2.759895,3.264675,1.442703,2.849335,0.254907,1.211005,4.596394,2.181019,4.773412,0.796500,2.451347,2.762961,1.396417,4.482624,4.357131,2.285615,0.753774,2.755953,3.056224,1.728519,2.109655,2.871149,3.580374,0.330290,0.123353,1.448401,2.665400,0.065798,4.434614,2.882692,4.988462,4.455135,2.860425,2.464234,0.896709,4.148087,0.313765,3.906080,4.145746,4.155539,2.391328,0.387474,0.302398,4.891237,3.380623,4.293251,4.245020,1.355233,4.768840,1.676370,0.798549,2.205673,4.928700,1.989434,2.640507,2.628116,1.106871,3.118346,2.240291,2.292000,4.714893,4.226592,4.406594,4.244211,2.516716,3.111219,0.129373,0.551596,4.138463,0.032251,0.323303,0.270420,0.883658,4.118846,3.368232,1.708987,2.757770,4.986146,0.657631,0.141199,4.291301,2.083040,0.167286,3.372630,3.249931,3.296278,3.373233,0.606604,3.219366,2.246513,1.778352,2.696896,4.258740,1.211013,0.214419,1.612467,3.766250,1.980345,3.160604,2.007256,4.368763,2.678054,1.772910,4.678905,4.070136,4.256686,2.155683,1.517282,2.383294,4.556323,0.300314,2.983969,1.687551,1.409135,3.087350,2.020626,1.540364,4.627270,3.610286,2.213695,0.233957,2.475831,4.411875,3.180501,3.501674,0.130262,0.888948,4.694882,4.357351,3.595992,1.624062,0.246804,3.734557,0.296413,4.771741,2.958978,2.926010,3.971926,1.974445,2.029677,0.115522,4.951829,1.865616,4.155632,1.082709,4.896495,2.734606,2.862070,1.175789,1.667063,0.094322,0.537790,0.038122,0.620325,4.894162,3.154286,4.298942,0.140616,0.827578,1.862008,0.053311,2.873752,0.455610,3.672147,2.469039,2.805828,3.970718,2.386321,3.793404,0.221372,3.702667,0.029364,2.627634,2.553141,0.128300,0.829160,2.825696,2.976405,1.587018,2.307826,0.318128,3.595088,4.265669,0.952341,1.378939,0.284027,0.669601,2.029698,4.008309,2.393647,0.921895,4.265363,3.020900,0.365626,3.528909,4.489462,1.327371,1.516823,1.430092,3.773045,4.588449,0.198019,0.541296,0.768792,1.838942,1.417292,2.682249,0.510426,4.205016,3.229842,4.887846,4.076198,0.529024,2.073540,1.747067,1.340099,0.292791,0.097621,1.985877,1.009071,3.351906,2.928339,3.265481,0.743102,2.781590,0.706903,1.655107,0.414868,3.010977,3.737528,4.974222,0.471564,3.938422,2.925973,0.244965,1.135660,1.962548,0.537143,4.114663,3.028512,3.208716,4.186613,1.796062,0.015034,3.093668,4.625802,3.885647,3.030866,1.410854,1.424824,3.815970,2.880949,0.552252,3.107410,2.292107,3.847810,1.552842,2.556983,4.655638,2.886932,4.489692,2.575569,3.610750,4.973763,1.366858,1.371405,3.741229,2.823936,2.801280,0.256805,3.237250,1.355590,2.998124,0.593076,0.511522,2.825715,1.640652,2.916753,1.509322,3.456734,2.712519,2.989998,1.230233,3.839040,0.899429,3.921242,3.637513,0.255447,4.155535,1.129652,3.406313,0.935533,2.505945,0.699985,0.862414,4.876603,4.345662,3.667170,3.978276,3.661462,0.317252,3.438407,4.000511,2.379149,4.154811,3.216596,3.709715,2.612500,4.629145,3.244453,3.735783,1.236349,3.573850,3.548637,0.861384,0.518312,1.049000,3.444168,1.063707,1.557222,3.762047,4.037834,4.173566,4.006491,0.650045,4.130522,0.721821,1.181285,3.962416,1.648509,3.991331,3.148740,2.596366,2.781553,3.448884,4.912809,4.821858,0.786266,3.703949,4.461984,4.682253,4.844556,3.852366,2.175867,3.487025,3.624005,1.795973,3.286356,3.557753,1.024634,2.721628,4.239845,3.326544,3.852387,4.581225,0.046209,1.148854,1.136844,3.804996,4.099088,2.769232,0.780931,1.506584,2.078727,4.400905,3.017792,3.051071,0.829975,4.880878,1.540092,3.945187,1.335119,3.944496,3.142126,1.278062,4.409721,2.857796,3.502938,2.259802,4.974279,3.467012,1.526304,0.868601,0.063719,0.417518,0.427054,1.068998,4.434264,3.020342,0.655922,1.832351,0.594642,2.555026,0.982288,4.882838,2.505137,1.480799,3.693011,0.580517,4.027926,1.214894,0.707265,0.901185,2.914466,4.397817,2.288241,2.358680,1.394032,1.549197,4.967611,1.389106,4.687054,1.612175,3.621062,1.289756,1.387231,4.632940,3.988036,4.378906,3.125615,2.063284,4.155386,0.312560,0.163352,3.463560,0.453190,0.158475,4.178886,1.277207,3.077522,4.985974,1.312038,4.491799,2.095709,3.806793,4.522492,0.744773,4.527775,2.093186,4.214281,1.793607,4.333300,3.467057,4.384189,0.829289,4.840056,1.056798,1.142642,1.126905,2.261388,4.463298,1.744949,0.886358,0.216666,4.447513,4.180838,0.871988,3.483844,0.937151,0.698379,4.434607,3.288627,4.704469,0.689283,4.610496,4.378474,1.531314,3.386114,3.612707,3.894954,4.768890,1.778181,4.036432,2.904282,4.235263,2.338120,1.500495,4.818416,0.804872,0.192452,4.421555,0.504991,3.891975,0.932124,2.683576,1.718493,0.454261,4.324986,1.498791,2.505862,1.992464,1.649360,1.146457,0.590570,0.453284,4.590274,1.282937,0.531395,0.055716,1.100642,3.712282,1.972876,4.734841,2.500334,3.909214,4.458649,0.073697,1.007941,3.586594,4.490945,0.213045,1.344011,3.777963,2.253506,0.417590,1.968464,2.665193,2.786533,1.875224,2.003347,3.791495,0.403180,4.794802,4.743929,0.853580,2.785050,2.519502,0.810441,1.240279,2.057395,2.889713,3.374123,3.527666,0.271217,1.259704,1.538979,3.028413,1.281591,0.203570,4.052480,4.297844,0.837179,0.962504,0.207988,3.766751,1.908256,3.036204,2.586024,3.475799,4.188128,4.481510,0.454664,4.224455,3.813952,4.379919,4.614833,4.896956,0.433643,1.822290,3.538976,1.342321,4.574891,1.430508,1.212574,4.672036,1.434597,1.431380,1.695034,4.862993,0.676379,2.426570,1.580388,0.682835,2.028903,3.211075,2.301841,1.523305,4.435327,1.545713,0.091683,2.807150,0.451315,4.094927,2.259413,0.375465,2.369540,2.164962,2.101886,3.332966,4.525970,3.391037,1.133951,0.854254,1.001454,2.573569,2.104173,0.708933,2.325468,0.014134,3.119407,2.222186,4.925327,0.800577,2.205940,0.093195,0.857110,4.830223,4.914869,0.082777,4.039562,2.173264,4.023917,2.401603,4.644768,0.810515,1.224595,1.380661,4.558203,1.643673,4.766924,3.155111,4.328790,4.238599,0.716041,1.191923,4.742162,0.558534,3.688125,4.478628,2.637678,1.830446,1.962413,1.242773,4.817335,2.151161,0.158001,0.685916,0.682844,1.150578,0.855057,1.863835,1.202669,3.802060,4.479256,1.031551,3.297257,2.944337,3.066595,0.177467,1.092063,1.466245,0.437544,4.798793,3.783737,0.777436,0.577451,4.011432,2.625444,0.400684,1.368821,0.629487,2.630058,2.646808,4.951395,0.362925,4.752411,2.991555,0.741961,2.402057,0.679444,4.290751,3.459386,4.574545,4.714600,0.684784,3.837006,1.388381,4.947883,1.060099,1.818201,1.469079,3.491291,1.566533,1.127053,0.700130,0.658912,4.810377,4.524042,3.352639,4.386908,4.930654,1.800109,3.892683,2.979288,0.572878,1.588501,0.110998,4.843047,1.814514,3.410850,4.813181,4.922336,2.279569,0.211269,4.807362,0.223687,3.938733,0.053388,4.040556,1.666448,2.500160,0.179551,0.379204,1.234779,2.559666,4.333402,0.190916,4.488271,0.856994,1.579609,3.451055,4.639954,1.175700,2.007216,1.396538,3.316213,3.991946,2.847725,1.209771,0.862263,0.587601,4.077425,0.346428,4.579451,1.667089,3.085666,3.662077,3.273003,1.353692,3.951683,1.395860,1.204416,1.758522,3.157599,3.087493,4.656297,1.006131,3.930506,0.534484,2.945541,4.808435,4.991826,0.657998,0.249718,2.362479,1.880969,2.945049,4.985143,0.877403,0.813527,2.988890,3.305635,1.769253,3.148577,4.301382,3.500060,0.051897,1.882844,0.019366,0.667452,2.931320,2.731254,0.441064,0.182216,2.451135,0.954199,4.451890,0.590753,0.685042,0.362681,1.878440,4.747658,2.464243,1.511051,1.553757,3.918745,0.007726,1.737543,2.117925,3.681196,4.040709,3.039163,2.649238,4.675096,2.091680,4.918711,3.629352,0.339582,1.831518,4.088788,2.197315,4.923493,1.151459,4.760938,3.222676,4.501395,1.210488,3.548559,3.202987,1.821786,1.728971,0.234794,1.099227,4.532279,1.776651,3.185150,2.008643,3.057243,4.556925,3.014839,3.986164,0.282561,1.542020,4.918082,3.004142,1.472774,3.893003,3.610310,4.709343,4.781248,3.781166,0.177226,0.115478,4.226975,4.041539,4.988562,2.735580,0.620951,0.201191,2.714025,0.450778,4.632545,0.985968,3.688061,3.714188,0.875026,3.383212,1.193808,2.160292,3.228859,4.291295,0.335853,0.092541,1.707865,3.627894,1.166786,2.475390,0.332712,3.985962,3.347117,4.487657,4.508167,3.670795,2.508263,4.985727,4.760493,2.146299,0.460885,2.540991,2.961556,4.985913,4.045603,0.802475,4.717919,1.566223,4.630199,2.928376,3.025486,4.330392,3.979544,3.813235,3.740291,2.782612,0.008202,3.104943,3.938716,0.553814,4.307292,0.025186,1.629912,2.545498,3.812637,1.442956,0.769338,0.155443,2.804785,0.371508,2.607176,4.602078,1.350753,2.882033,0.029462,4.111400,4.469398,3.945015,4.585543,2.186321,1.619947,0.088649,0.912570,2.980918,4.043909,3.627090,1.347037,1.186599,0.959048,2.446084,4.624399,1.151892,1.323480,0.088810,1.638471,4.820292,1.662689,0.262781,2.158301,4.266670,0.322485,2.547580,4.547510,1.252562,1.634764,2.673773,1.834798,0.730864,1.827975,1.394619,2.909607,1.259805,2.833724,0.084555,3.374846,1.033103,1.879538,2.191100,4.055296,4.444007,4.216647,1.476238,4.067215,3.248329,4.286919,0.876573,4.936615,0.668164,3.232499,0.072827,4.558672,1.187510,4.136932,4.029043,1.960796,2.923693,1.797066,4.042878,1.596714,3.296631,2.945155,3.582522,0.269154,4.004717,1.092593,3.176582,1.365010,0.081432,3.694671,0.344612,2.903922,2.557194,0.318556,4.029830,3.907482,2.019546,2.302995,0.367955,2.153817,2.254375,3.550876,4.669645,4.192630,1.714099,3.858833,4.244383,0.362472,1.410037,3.327708,4.641553,3.795397,1.127942,1.713161,1.843636,2.391220,2.125576,1.758844,2.885900,4.948042,3.303723,1.911700,3.544479,2.921016,4.551769,4.278531,1.042587,2.317330,2.019257,2.303304,0.222764,2.055343,0.495129,3.922315,4.607001,3.644073,3.262802,4.023941,2.468796,1.788621,0.518395,3.958170,4.086276,2.031460,1.493556,1.614859,0.624359,1.552165,4.983648,0.571867,4.375538,0.008577,3.660867,2.120586,0.947203,1.041482,3.836375,1.428185,3.747781,4.010459,0.890674,3.227030,4.945293,0.300048,2.550397,4.440673,3.209971,1.384369,1.250945,1.454112,0.211115,0.441069,4.758035,2.621369,0.401183,2.658493,1.531043,3.973256,0.072993,1.907543,3.276065,2.059485,3.454861,2.850267,2.774476,0.810344,1.751821,3.829686,0.374315,4.043146,1.206707,1.967117,2.335783,1.035880,4.569201,3.442176,0.006561,4.014441,0.961840,2.054252,4.140240,4.583141,4.623800,2.970372,1.607905,4.211973,2.636249,4.664703,2.778884,1.086407,3.080875,2.653605,3.724718,2.161915,4.806337,1.650712,0.137405,3.900973,2.292066,3.705120,1.054757,1.691265,0.562209,2.269262,0.182596,3.245675,2.907427,2.875670,2.299458,3.662646,1.865328,3.520307,0.541583,0.481292,1.899760,1.762745,4.973590,4.360485,1.020610,4.697398,3.366329,2.995194,3.643331,0.056984,3.452759,4.129891,0.108599,2.658173,4.314233,4.654649,0.894462,1.004221,1.207847,3.997928,3.621629,2.414293,3.144594,0.199526,4.274928,3.819880,0.276864,1.482280,1.641203,4.330766,3.465612,4.284707,0.767764,3.016896,1.538568,1.438785,4.744108,2.495102,0.086790,0.060014,2.261551,4.240640,0.459354,3.678957,1.379544,2.005765,4.260593,1.596234,3.942564,4.109374,3.340125,4.520580,3.382294,4.051416,0.772657,3.649464,3.127158,0.031888,4.966004,1.750023,0.313813,0.840423,1.259301,1.766174,3.535990,3.897812,4.970729,0.870863,1.434592,4.417798,3.861548,4.629424,4.396040,1.928890,4.766820,4.117974,4.538224,2.845227,3.575367,4.459139,2.715701,0.679180,3.914695,2.627697,0.086040,4.870223,0.644050,4.756020,4.459567,2.628409,0.097294,0.482348,1.623954,2.386294,4.466720,1.900672,3.985423,0.137433,2.598782,0.538922,4.506036,2.869283,1.066415,2.731106,3.361558,1.449067,2.181479,0.338669,3.759846,2.850477,4.950097,4.649906,3.469423,3.324972,2.345201,1.222480,2.397557,0.675042,4.330472,3.850665,3.706093,2.856565,1.393708,4.540825,4.863165,0.681330,1.424304,3.436934,3.527230,2.381602,1.714652,3.732343,2.331597,3.128799,3.321645,2.787792,1.987793,2.444324,1.588017,2.919856,1.096365,4.802934,1.938960,0.520009,3.533378,0.145551,0.418934,2.505492,2.514794,1.353403,4.858396,0.450563,3.258116,3.054143,4.821734,3.551890,1.601587,0.037491,1.942623,4.691717,3.348926,1.527369,0.139948,0.081552,3.800391,3.646166,0.984669,1.055300,0.743462,4.675960,3.743940,3.720634,4.508942,4.905411,3.275758,2.831694,2.671566,0.822072,4.655624,1.180688,3.230610,3.898253,2.853060,3.362090,0.779451,0.522592,0.360994,4.477508,1.764867,0.346874,2.615389,2.985522,4.190369,0.950760,0.163716,4.739847,3.347155,0.033252,4.359137,0.159405,3.985140,3.100736,1.733361,0.845327,0.322475,2.968669,0.245455,4.724848,1.498016,3.884677,1.450238,1.021751,4.587224,4.210118,2.917023,3.222067,3.544743,4.471109,2.382462,2.439443,2.032694,1.260099,2.270202,1.202775,4.498289,0.288786,0.076011,2.370544,2.954998,4.837655,2.228313,2.323105,3.968470,3.565599,3.908474,1.202243,2.715872,2.694812,2.846185,3.986963,1.970041,1.152376,2.440858,0.889359,0.036045,0.008157,2.036884,2.141768,1.081299,2.979595,2.237438,2.158365,4.949329,4.886707,3.715789,1.056705,4.237779,3.058395,3.939725,2.915480,2.161195,2.082445,4.815510,4.586298,4.993459,3.451865,3.489451,4.693241,1.220887,2.111597,0.697615,0.002885,0.871214,2.800939,4.656278,0.238629,4.322921,0.562760,1.151497,1.503561,3.406806,2.260009,2.081608,4.024724,4.326898,4.482872,4.041765,4.861032,0.641037,4.990506,4.428647,3.418686,3.676679,1.327914,2.787229,0.977451,3.739847,4.252668,0.669030,0.681408,2.682441,3.302379,4.135429,3.074043,3.822971,1.320453,1.817078,4.097874,3.337533,0.960583,4.646459,4.969186,2.782841,3.906631,4.760919,3.687955,3.077858,1.179283,4.149518,1.256985,2.614244,2.667513,2.882851,3.950855,1.523150,4.470537,3.965809,1.349871,4.075658,1.147878,3.866572,1.132901,0.928501,2.086939,4.914688,1.368028,1.805219,0.169744,2.795497,3.683512,0.056197,1.213231,1.217406,0.869776,0.321569,2.892271,0.789001,3.247903,2.245192,4.909456,4.532366,2.717467,0.191078,4.405664,2.809338,1.021735,0.777256,2.705788,2.803902,0.756332,2.250579,1.391903,0.112233,3.512988,4.412183,3.672900,2.611896,1.932162,3.299057,0.678230,2.450332,4.700140,1.327778,0.027258,0.975168,2.240246,2.567221,3.605062,1.892356,2.237608,3.048491,3.054903,4.363628,4.517121,3.819766,1.320082,0.556796,1.459877,2.770222,4.305731,1.045076,0.040649,3.249034,2.634651,2.398750,1.063784,0.888364,2.527678,0.083723,1.994303,1.499061,2.672506,4.297542,0.392587,3.986392,2.192742,4.634277,2.707028,3.385147,3.472214,2.894456,3.750399,3.768185,3.195075,1.618422,0.156391,3.598390,2.872586,0.176256,4.897926,1.245433,4.744298,4.318486,1.943981,3.396821,2.607382,1.989446,0.690281,0.582547,3.676732,0.448589,2.971191,2.499360,1.121868,3.380609,3.899901,2.806639,1.574726,1.780088,3.432511,1.643106,3.340473,1.681385,3.934040,0.153177,1.121379,0.573546,4.196366,1.825306,2.901409,3.361183,0.001153,2.669521,3.393577,3.584364,3.968036,0.982074,1.779119,1.333101,3.890682,3.655340,0.569515,3.699494,4.639011,4.425839,0.168971,4.622607,4.493687,4.823857,2.790745,0.933338,0.604353,2.453542,2.722879,0.562909,0.066284,0.852384,2.145278,2.009347,0.697867,1.417747,3.130340,1.580921,0.306505,2.357846,1.923086,3.888716,0.018807,1.991041,4.806995,1.334356,3.668452,4.986285,4.880252,3.119466,3.713949,4.902272,4.793767,2.658851,1.194307,3.236160,4.380958,4.257434,3.715811,0.217333,2.192283,0.841868,2.090060,1.823487,4.125852,2.671892,4.524560,0.858315,4.422840,1.889212,4.431407,2.408704,4.199949,1.943645,0.987434,3.782805,3.968899,1.215503,2.281757,1.708723,2.899208,3.942419,1.583792,1.890634,3.948002,0.075326,3.199597,3.547399,0.768646,2.103541,3.919241,1.631901,0.238693,0.586840,1.364587,4.246649,0.114580,0.965616,2.008814,1.449695,2.342999,4.998612,2.635240,1.151757,4.620541,1.570665,3.650772,3.351256,2.967647,3.416908,0.035870,2.624456,1.022609,1.517173,0.650680,1.008674,1.596875,0.912451,3.026044,0.576022,2.667182,2.440521,3.179769,1.620896,4.046493,0.187666,4.562763,4.465105,2.105556,2.191190,1.058819,3.438483,4.202924,0.961596,4.855829,0.135124,1.523917,3.410617,4.738760,1.661177,4.629377,4.196303,4.581678,1.029183,3.761756,0.347088,2.034203,2.993220,0.451415,4.712015,0.123532,0.263669,0.691603,3.719392,1.995953,2.768168,2.953388,3.499014,4.114868,1.107573,2.980606,2.383953,1.567090,3.094736,2.430970,2.940439,2.311263,2.536755,0.601237,4.229387,0.304679,2.987611,1.986180,0.992203,2.211267,2.151248,2.820204,1.123178,3.539729,4.206974,3.488296,4.284907,2.494312,0.014615,2.964075,4.932364,1.598827,4.979563,0.790942,0.256058,1.660914,1.877817,2.092773,2.671335,1.809678,4.150395,1.241905,2.956512,3.333151,1.866941,1.030753,4.001602,1.765818,1.289499,3.811523,2.143086,3.837048,3.697027,0.088029,3.633307,1.032510,3.243137,1.598968,2.641651,2.727761,4.218789,2.198149,0.047248,3.711682,2.940230,3.906322,1.896600,4.271549,4.848025,0.724216,4.709161,2.274914,3.805225,0.064958,3.785198,1.556237,3.562195,0.784685,4.024198,1.103350,2.361489,0.178726,3.403625,0.477942,3.498084,2.069287,2.291653,0.969238,3.364357,0.381294,4.785543,2.912010,0.814536,3.168158,2.426338,3.704869,3.066044,0.277376,4.419529,4.799586,3.568662,0.019130,1.933589,3.558917,4.693977,3.474340,1.797991,1.434728,0.244495,3.235032,1.868186,3.215194,4.757117,1.721735,1.732102,0.722309,0.313201,1.687696,4.251357,4.590765,1.924329,4.083048,4.895370,4.061203,4.940092,0.135029,0.436916,3.385626,2.271072,2.340200,2.505534,4.930403,2.504798,4.752867,0.297362,4.448203,1.821262,3.860687,1.729023,2.989342,0.487108,0.593456,0.723335,3.315697,3.072558,0.594661,2.943609,1.866329,3.023598,3.681496,4.195052,1.523114,2.416753,2.023974,4.933686,2.831135,0.447090,3.855799,3.463464,1.293895,1.065220,3.749611,4.563092,3.342821,4.036458,3.353686,4.713891,0.873067,1.364212,1.121489,4.946474,4.404353,3.687162,2.059959,1.525354,3.232141,4.827466,3.854197,1.931630,3.070916,0.185939,3.820410,0.704303,1.425205,3.094180,2.090430,3.590166,1.181064,0.491297,2.279910,1.117906,0.910772,4.480278,3.277906,3.909360,4.737103,0.010357,1.044621,4.603691,2.000780,4.705069,3.421909,3.344687,1.949471,2.042101,3.354574,3.852004,0.697176,4.413954,3.614853,4.335003,2.004614,0.685668,1.800166,0.640315,2.519481,0.272656,3.863282,1.805606,1.058290,3.706175,0.128149,0.316382,2.765872,0.309072,2.662290,4.832447,1.934221,3.514884,1.594307,4.236573,4.933029,3.983955,3.047154,4.933149,4.450260,4.078063,3.647365,0.325391,4.634013,0.243946,4.596628,2.418021,4.818827,0.308325,2.250835,4.375704,1.786664,4.712097,0.141442,1.856826,0.157787,3.519078,2.002218,0.416941,2.289805,2.948433,4.024041,1.757295,4.109223,3.984240,4.328268,3.294788,1.339972,4.919040,4.744747,0.461433,2.602811,0.332108,3.489505,3.327098,0.085105,4.185196,0.996750,0.290084,1.198866,4.150198,1.555954,4.552513,1.707770,3.063756,3.677028,4.853847,4.183953,4.183163,0.948943,0.359257,2.069637,2.598888,1.504852,2.760743,2.868212,1.936745,2.999880,2.029403,1.421030,1.314868,1.210780,0.244230,1.010185,3.611966,4.877962,4.351527,1.627936,4.519993,3.572558,2.622302,1.935879,0.285007,3.962605,4.737928,2.827363,3.354745,0.560469,2.073023,2.367826,0.794866,3.400722,4.542477,2.533095,4.322078,3.135993,2.240735,2.475106,3.643197,0.189794,1.679671,3.375179,3.444712,1.093868,0.985292,4.139087,2.973655,2.005557,0.555254,2.441607,3.639946,1.511039,4.222417,0.784535,0.802808,0.369948,4.079189,1.419783,3.624340,2.361110,3.809964,2.673050,0.321551,1.943154,2.178118,1.485320,2.570776,0.578686,1.620272,4.670717,4.963223,2.316478,2.127208,2.356518,2.552526,2.251310,3.577061,3.582530,0.618776,0.850984,2.677184,3.343909,1.796964,4.462635,0.475149,3.281248,0.830182,4.138894,2.684039,2.643571,3.034743,3.526518,4.767754,3.740873,1.491333,2.232279,1.800633,3.129433,1.960865,0.205783,4.616503,2.031175,4.721411,3.613622,4.591600,4.116338,3.234484,0.339695,4.194079,3.464112,4.789958,0.711112,0.438868,2.594400,1.799662,4.801368,3.518861,2.229970,0.961044,2.214407,2.331432,0.045713,1.286077,1.226858,1.905107,2.120192,1.337653,0.563231,0.693398,3.441011,4.779449,1.724272,0.713932,1.300289,0.760875,0.973698,3.310803,1.924637,1.252271,2.905790,4.489120,0.122145,2.983594,3.359980,2.165845,4.601759,0.850936,0.057929,4.201467,1.978888,4.149495,4.976852,0.575434,4.162729,3.802563,3.882774,2.197511,3.045537,1.238210,0.158251,3.638865,0.694165,1.498198,0.267614,2.828765,4.286176,0.364315,1.960662,4.162798,3.873266,1.068461,1.255047,3.157490,1.195664,1.715681,3.904927,3.083195,0.533611,1.925488,0.989813,2.727353,4.744415,2.495334,4.174090,3.397061,2.304419,4.571020,4.863988,4.734524,4.392594,3.702401,4.585481,0.969927,4.360523,2.503357,0.726636,2.466248,0.194096,4.531735,1.293117,1.334897,2.218595,0.945749,4.632089,3.447996,3.394224,4.584211,0.660863,1.301325,3.332779,3.440964,4.168484,3.638166,0.207795,3.117908,3.926425,4.342897,4.359006,0.970139,1.224794,3.015949,2.333191,1.798607,4.826337,1.073600,4.255425,3.026969,3.476988,3.869362,2.355735,4.872533,2.402088,1.413219,4.531089,2.415056,4.642441,2.654962,1.132645,1.719523,4.910417,1.050308,1.812258,1.442165,3.579995,1.158565,4.158735,4.793009,2.082457,2.467091,3.933812,2.207510,0.347692,2.718487,2.610979,2.096143,1.447460,1.221641,2.675339,0.782612,0.648382,2.452403,1.833572,3.909344,1.959561,4.540676,0.772637,4.564839,0.876507,1.154356,1.074848,3.918271,2.099599,4.261522,3.280276,0.538949,0.128585,2.948887,4.470532,1.117601,2.230520,0.223914,2.416081,3.998299,2.396673,2.169784,1.221012,2.673165,4.201503,2.742590,1.466299,3.938145,0.548821,0.178389,0.993486,2.652471,1.483024,3.412963,4.207974,1.588244,3.757686,1.219017,4.108077,4.618415,1.999508,0.443380,2.021350,1.865201,2.547209,2.490539,4.374741,3.097141,0.384698,3.277294,3.927214,0.774121,1.057224,4.550190,4.772582,0.478264,4.633542,4.996805,2.334286,4.149419,0.969673,2.391837,0.557045,3.495811,1.914658,0.731066,1.109610,0.656005,1.756420,4.217467,2.321079,3.345581,4.777969,3.481569,1.214121,0.405715,4.111949,1.396235,3.135274,4.588394,2.631532,2.576892,1.913785,2.441883,3.384953,3.099372,4.346492,4.948494,2.096275,4.900468,3.323558,3.704035,1.972493,3.560802,4.160452,3.006374,0.594064,2.921141,1.136155,2.084930,2.244904,3.524187,2.102333,2.519656,0.584958,3.410361,0.311678,1.563097,3.325390,1.506227,0.038452,2.216821,3.248851,4.233665,4.447502,1.226148,4.771428,1.860760,0.220553,1.545479,0.875268,1.357223,2.774099,2.977625,0.760391,1.966226,3.103896,2.620426,2.789413,4.572893,3.583515,1.508193,2.406138,0.504705,1.489504,4.689477,3.467375,4.956880,2.087978,2.629587,4.821365,3.107114,2.291166,3.653452,3.124468,4.847341,4.777247,3.984960,1.269175,2.963498,4.692461,0.008042,0.528572,2.340262,3.232132,0.641661,1.674243,0.065094,3.740808,1.009015,4.190080,2.805300,3.186651,0.896214,0.926705,1.703900,4.639303,0.614261,2.616834,1.246463,3.649825,1.551054,4.926979,2.559681,2.292126,4.035462,2.131243,4.306601,4.902128,1.601826,4.371917,3.513034,1.723588,4.909948,4.493722,1.762054,4.652049,3.620705,2.806308,1.375317,1.491449,1.764837,4.610319,2.821954,4.191855,1.260165,4.016268,0.021817,2.745408,4.382844,1.270646,2.320615,4.131303,0.137900,0.589672,3.080586,2.494286,4.093538,2.896178,0.280830,4.933511,0.057245,2.345831,2.296568,4.301703,3.614835,0.708341,2.356386,0.554123,4.778810,2.463749,2.849993,1.129370,0.425032,1.558928,4.430776,3.090744,1.697631,2.928977,3.757551,4.751305,4.794769,3.539335,4.230602,1.955254,4.154991,3.108261,2.571157,0.158035,2.871672,4.579355,3.944046,4.245379,2.547174,1.447941,4.609783,2.781166,1.361845,4.724646,0.929815,3.827808,1.120755,4.045001,3.041684,2.631211,2.414427,0.450049,2.098124,1.323529,4.991960,3.500606,3.648957,3.708602,2.810509,3.625426,0.883404,3.699482,0.243774,2.075374,2.812658,0.798277,1.157829,0.175418,0.463829,0.835431,0.430142,0.869962,3.039726,0.070725,2.720778,0.318147,3.164778,1.633269,2.081185,0.017178,4.627371,3.833169,0.207515,4.096001,2.297277,1.371621,2.736341,4.827450,2.190265,1.365167,2.821648,1.087283,2.404835,1.783032,1.966488,3.594071,0.534514,2.753936,1.220188,1.615513,2.776980,2.911789,2.194565,4.646636,0.672285,0.727177,2.186325,1.761857,2.237417,3.285329,4.067201,0.432474,4.732269,4.203289,1.434922,3.794892,0.819165,4.461493,3.241599,4.197469,2.124157,4.178743,2.477048,3.761333,0.012977,1.100750,2.964267,3.174802,0.536741,1.207548,3.660382,1.401287,3.411007,2.614465,4.235754,3.100826,2.783271,1.479931,1.010367,0.461807,3.985530,1.854125,2.129993,4.658971,1.026320,3.173966,1.847160,0.018448,3.423117,0.304721,3.352437,2.283892,3.108134,3.173882,3.193274,2.539929,4.375848,4.440590,3.860684,4.831157,3.408959,3.912074,1.434002,0.271461,2.317461,0.030909,3.803518,2.056287,1.762662,0.313523,4.805485,2.518462,3.058083,4.568451,4.270054,2.056410,2.603402,0.710255,4.797000,4.560404,3.013796,1.495173,4.522031,1.038431,0.023293,2.365442,4.045795,0.068591,3.449192,2.952848,0.475157,1.428857,4.168932,3.271606,1.944980,0.708044,2.564022,3.270637,0.338176,1.068258,1.408208,2.682382,4.598150,3.350157,0.041089,3.848019,0.251592,4.279381,2.123275,4.521611,2.911680,1.786155,3.125162,0.436854,0.017933,1.044533,4.272537,2.164500,4.157907,1.466685,3.499038,0.376229,4.715451,4.147694,0.753398,0.960756,0.085093,4.910161,4.371221,1.243278,3.083580,4.220989,4.014757,1.200761,2.669428,3.006563,0.813135,0.674013,0.721717,4.993746,3.558405,3.748554,0.809176,0.010643,3.170120,0.122474,4.428405,2.839603,0.436199,1.471729,0.398173,3.612492,3.391997,2.824841,3.197312,2.673995,0.076590,3.767821,1.129360,4.743346,0.797926,1.849051,1.968911,0.247592,0.736817,4.794303,4.908746,4.927377,1.323183,1.131045,2.267466,3.632825,0.841224,4.458443,1.879020,3.805794,0.186054,4.824866,2.766303,4.342063,3.155753,4.436048,3.212618,3.406841,2.212391,1.645857,3.886752,0.969227,4.708620,4.804058,4.749575,1.608288,0.421665,0.535437,3.491591,1.592726,0.043916,1.263414,4.388223,2.104412,0.761782,3.537696,4.388139,4.512057,1.532319,1.938043,2.568259,0.746081,0.076143,0.647092,4.413970,1.053400,0.041202,0.314098,0.088703,0.716933,2.453818,4.796784,2.856550,2.948878,2.209104,2.615322,2.689918,2.396917,2.601720,3.837519,4.144984,0.391100,0.462142,3.374297,2.085511,1.471809,1.703035,3.006273,3.512767,3.767328,0.557800,1.365212,1.321154,1.685856,3.947607,1.446174,0.246607,2.183338,3.980511,1.769617,2.956213,1.575667,2.948472,2.855035,3.077660,3.721638,0.841841,0.700590,0.376431,0.607379,1.996821,4.487518,3.892630,1.343822,1.518386,3.544904,2.757598,0.166485,4.550474,2.961995,1.224399,3.714867,4.415848,2.137354,4.541292,4.390317,2.248685,1.453260,4.559542,4.048965,0.068047,3.340236,3.342468,3.516662,0.573703,2.892281,3.478556,4.942923,4.773368,2.722646,1.542126,1.474953,0.221065,3.838667,2.664862,1.316771,0.299348,1.157254,2.649778,4.058516,2.546593,3.877529,4.884514,1.005286,0.792039,4.131001,4.894789,3.055279,2.969481,4.935601,3.634792,3.025456,0.923187,0.872681,3.257719,3.612396,0.560996,0.179578,3.931152,3.818388,2.951802,1.965601,1.403873,4.005410,1.733946,0.826524,1.424374,0.741120,4.960530,4.101245,4.942690,2.545165,4.026153,1.607835,1.615113,2.414714,1.652595,3.011658,0.529897,1.287233,3.168733,2.788966,0.375965,1.416305,4.875361,4.770590,1.135981,2.657342,3.123873,4.532935,4.453632,4.254217,4.869099,0.120594,1.691020,0.118177,1.647903,2.555211,1.209710,0.560352,0.833369,4.993918,3.677229,4.152578,4.559245,2.689134,4.789056,3.133479,4.229979,3.984406,1.054241,3.941816,4.433593,1.229414,4.245845,2.315965,4.830925,2.154346,0.395289,0.777406,0.109387,2.716547,4.726360,0.907494,4.373882,1.022980,4.773235,0.223040,0.198525,3.517841,0.928281,3.400306,4.145978,3.597358,3.382736,0.599856,0.762824,4.727409,3.366954,3.802810,4.517543,0.812373,4.040943,0.115029,4.144324,3.942746,4.766703,0.316824,0.472650,1.459537,4.851234,0.600524,2.883209,2.332146,0.843764,0.247751,0.822103,1.590353,3.389307,3.945846,3.065900,0.818690,3.388319,3.506849,4.584183,1.265618,3.407350,4.930719,2.229280,3.804332,0.584183,3.358453,0.655375,3.711255,2.495582,2.716912,4.407632,3.135029,2.064421,2.207949,2.711300,3.321285,0.385441,3.509996,2.279607,0.328152,1.990821,4.896637,0.707290,0.651900,2.068647,4.596839,3.701339,0.612466,3.593721,2.720688,3.900445,4.397418,2.626399,1.093868,0.260491,4.885378,4.081898,4.978410,4.269496,0.565723,4.565070,0.659591,1.787995,2.032760,0.099966,0.568058,4.562064,4.559224,4.312215,0.721414,1.543246,1.323880,3.240228,4.191047,4.676238,1.688951,1.827235,3.947390,2.397374,4.382133,2.151007,4.888384,2.674542,3.550599,1.874885,2.818648,4.698364,0.790168,4.887270,2.795196,4.238639,2.835151,2.731935,4.595334,1.839820,1.873085,4.397939,4.140500,1.652181,1.391565,0.614814,2.798207,2.514797,2.588479,4.066082,3.857453,2.855914,0.532422,2.064136,2.799231,2.524095,4.522555,4.205886,0.524132,4.913618,1.903278,4.397118,2.051196,1.452838,3.538453,2.346310,3.562249,0.813133,3.457615,3.835118,1.436052,4.389359,4.012751,3.336712,0.783373,4.936044,4.147661,2.517911,4.822589,1.635477,4.365475,1.903817,2.961898,0.405062,1.170383,1.374595,4.400810,4.205307,4.717994,2.964155,4.181915,3.662286,3.445793,0.560377,3.390991,0.275347,2.595656,0.051975,0.816594,3.430694,1.228765,0.405522,1.821917,4.075410,4.711500,1.067009,1.491451,1.841214,4.621991,3.452728,0.446694,4.812617,1.409928,2.228173,4.919037,2.130566,3.328029,3.731854,4.362616,2.251097,0.474967,1.787848,2.869848,3.705516,3.345527,2.895079,1.636380,1.728576,3.909503,2.983122,2.865442,2.977718,3.792188,4.753644,1.512958,4.913442,2.075940,4.944306,0.838459,4.414200,1.535752,3.578540,4.134101,0.845114,0.715474,1.035585,3.564804,4.887169,2.053267,0.487608,2.468819,0.565774,0.967135,1.910181,1.461698,4.129847,4.483827,4.412892,4.607375,1.044276,1.737050,3.510345,1.328684,1.267864,1.294607,3.090847,2.280767,4.067768,3.691260,1.429074,1.811479,3.372162,1.715763,3.289365,4.772106,2.415040,3.697256,2.602710,3.366618,4.024663,3.874909,0.653273,0.040499,3.300825,3.641763,1.168085,4.809259,3.791324,2.560887,0.484787,2.997037,0.601376,3.436914,2.112461,3.094785,4.962032,1.565369,3.659580,3.081238,4.280891,4.959151,4.519503,0.429984,3.046041,1.539214,4.679441,1.835841,3.458473,1.505798,2.457489,3.663534,4.917673,4.705212,3.455244,0.253625,0.563591,4.641078,2.068737,3.043010,4.294806,4.342802,1.932524,2.933268,3.442358,2.204280,2.808880,2.706193,3.934038,4.017325,4.660688,4.709071,4.722783,0.080843,1.005474,2.501698,0.379152,4.984817,4.332575,0.240799,4.439163,1.617748,4.833486,1.661430,1.128395,1.441535,2.930711,2.791359,2.663897,0.339862,3.564093,1.577436,2.660157,3.301394,4.195907,1.545121,2.384640,3.235410,3.055004,4.138525,1.386631,0.321359,1.349912,4.605212,2.574961,0.663744,4.686362,0.090795,1.979110,1.719280,4.214485,1.654859,3.021190,2.281062,1.381602,4.973504,2.121747,1.845238,3.087269,1.575525,2.528501,2.344005,3.410715,2.301546,1.329787,4.599675,1.262525,3.677459,0.469586,2.352206,2.853886,2.200801 \ No newline at end of file diff --git a/lapack/src/test/resources/geC.mat b/lapack/src/test/resources/geC.mat deleted file mode 100644 index c6c17489..00000000 --- a/lapack/src/test/resources/geC.mat +++ /dev/null @@ -1 +0,0 @@ -4.323773,3.546459,4.358712,3.871009,0.870356,4.142775,1.916142,0.345785,0.653794,4.989860,0.832172,1.639531,0.986640,3.195514,1.179658,1.323391,4.904651,1.611555,4.377888,4.638659,0.080146,4.530323,3.178469,0.473570,3.809564,1.350545,0.027802,3.941896,3.170014,0.387714,0.196646,3.245587,0.570243,3.651065,4.722636,4.887293,4.826329,1.320208,0.941955,0.198116,3.865749,1.039268,2.426914,3.306411,1.821082,0.063204,3.862440,2.005678,3.160546,2.024306,3.836489,2.783114,0.630367,3.395396,4.288362,0.372779,0.114135,4.999276,0.956155,0.808991,0.639050,0.584675,2.097964,4.431505,0.536952,0.814050,0.564889,3.927554,3.117116,3.660471,4.837592,3.852827,1.932502,4.545367,0.544295,2.223688,3.215414,1.687548,2.616630,4.743003,3.113471,3.193462,1.167730,1.498290,4.911271,3.163943,3.846086,1.828533,4.357467,2.515061,3.296193,3.742627,3.549873,2.737005,4.819027,4.654808,4.401407,1.655100,2.383325,0.996722,0.243578,4.784478,2.804727,4.095389,3.773228,4.660444,1.897328,4.350651,3.121078,0.169871,2.078024,4.491863,2.042073,4.750984,3.464362,2.322535,0.536022,3.648198,1.265534,0.770851,4.997515,2.638533,2.911683,2.653712,3.439864,4.909624,3.754567,2.502649,2.747741,0.714990,4.608471,3.696000,3.514410,0.106176,4.794566,4.432775,4.549788,4.296097,4.704688,1.477935,1.416648,0.479348,1.545478,3.663688,4.193746,1.524594,2.963240,4.312959,4.582136,2.427083,1.021536,4.879920,4.488839,2.508258,1.968751,1.551092,2.297454,2.912605,0.056069,0.846450,0.490753,2.646824,4.511124,1.159858,4.365251,2.907021,1.012213,2.227001,4.399300,4.292396,4.088489,2.675425,0.306448,4.740273,1.969469,0.474121,4.573014,4.797977,2.518829,3.022947,0.107632,3.168874,4.294902,1.549514,2.916664,4.165775,4.250579,0.752322,1.037485,2.461871,2.578203,0.914499,1.182743,1.386688,4.000247,2.858843,1.931369,1.162770,4.459071,3.222898,3.979575,0.178497,4.707668,0.011039,4.563618,3.739310,1.028658,2.616478,0.940441,2.063628,1.056595,4.775896,4.327504,0.838920,1.401448,3.841467,3.919922,3.173912,3.459373,2.013841,3.915239,4.866122,2.924291,1.513093,3.568847,1.512424,4.549622,0.283520,1.158421,0.630628,2.171482,2.315517,2.952456,0.479986,3.370114,2.842845,0.459588,0.140392,2.324232,1.045961,2.309001,1.430321,0.819922,2.144769,1.876557,0.762440,1.693673,1.749599,1.711939,3.980679,3.044960,0.967516,2.934836,2.955978,0.065762,2.305467,3.355996,4.103026,1.946713,4.195244,4.628001,0.751909,0.806262,3.812998,0.994524,3.452310,3.498367,1.243731,0.267467,3.729737,1.221480,4.154332,0.240746,3.016701,4.155027,0.942195,0.132827,1.566196,4.860305,3.075803,1.112310,4.949315,2.444880,1.029824,4.309569,3.317138,1.212031,3.853726,2.955572,0.144436,4.399468,2.876191,1.939590,2.224313,4.499099,3.120732,3.982460,4.854735,4.777107,2.459896,1.648554,1.874424,1.054916,4.123234,2.297275,2.500248,0.620542,4.604081,1.009708,1.890305,1.819506,4.361837,0.764461,4.101652,2.636700,1.458554,3.528973,0.885496,4.881295,0.012045,1.455058,1.412566,1.967369,0.708114,4.372576,1.892839,3.292766,1.894684,4.185496,3.288110,0.684989,0.467969,3.740531,3.242781,1.171511,2.153700,1.934461,1.360133,4.477700,1.877055,3.769510,3.986193,4.550378,0.249321,3.184591,0.566123,1.159504,3.798867,3.738236,3.317342,1.393831,1.355058,4.921314,3.987708,4.577233,1.227065,2.000684,1.458547,4.831157,2.816687,2.626712,3.984708,1.881431,3.909853,3.876873,2.943445,0.794039,1.004901,1.307686,4.678695,1.138341,4.090897,0.331727,1.793730,2.433102,1.466162,0.195348,1.575633,2.913790,3.022528,2.386718,4.872171,4.716416,4.238079,2.074261,4.606597,0.964934,3.020609,3.907413,1.870900,1.741643,2.174312,3.426669,0.435080,1.824185,4.174516,4.985277,3.198518,0.707850,1.243862,3.843925,3.473026,2.397756,4.220981,1.990307,0.599658,0.163314,1.661736,3.641003,3.099124,4.954285,4.381209,1.186375,2.856833,3.939418,3.050399,1.621201,0.807108,3.340716,2.788367,3.651964,2.529993,4.130834,2.191741,1.055266,2.588430,2.906832,0.399472,1.251443,2.938080,1.852624,3.078190,2.130011,2.058052,0.075177,4.458654,3.053358,2.287876,2.263784,3.971760,2.110555,3.685001,4.152922,3.593750,2.922805,1.311097,4.003072,2.840667,1.874201,0.403339,0.063730,4.194937,0.898965,2.188498,2.471085,3.501983,2.269900,3.209818,0.709094,2.809606,1.338626,4.597823,3.929526,3.602962,0.274433,3.313095,2.145595,0.103629,3.520453,3.278373,0.890924,4.672373,1.072188,3.280019,3.068518,0.835225,3.105310,4.197317,4.285161,3.499957,4.527358,2.448822,0.838278,1.410347,0.824473,1.426745,3.510879,4.032119,2.138515,1.764638,1.120273,2.061699,4.107012,3.274509,3.659926,2.152900,2.607424,2.478520,3.653824,4.286458,4.820981,0.971277,4.440760,0.422158,4.646909,2.430350,3.096066,1.133755,0.203874,1.468417,2.711894,2.861037,2.125422,1.063060,2.888467,0.635168,3.643097,4.538723,0.445885,2.864063,1.679905,2.376400,3.382392,4.311730,4.845762,0.117673,2.800207,1.403192,3.343806,2.967676,0.523502,0.456296,0.973200,1.389357,0.202505,2.620988,0.456596,3.859948,4.163172,3.660749,2.845087,0.832025,4.325201,2.952884,3.681756,1.992512,3.507713,1.878424,2.938959,1.815832,0.231679,3.967409,1.897162,2.333538,0.738275,3.028211,1.201914,4.172311,4.866109,1.123532,2.801854,2.068586,4.216746,0.036374,2.157967,3.423819,4.504153,3.997007,2.095204,3.719986,1.101677,3.030058,3.211052,3.263796,0.731166,1.069946,1.585159,2.907228,2.544118,0.654322,2.674546,3.488290,0.932143,2.820409,2.601223,3.298916,3.534086,2.212774,2.977549,0.363388,1.292886,2.126687,4.299700,4.701883,4.754055,2.151541,2.738047,2.209681,0.291639,4.419832,3.209139,0.745650,1.059965,3.480577,2.845850,2.593199,3.826397,0.710121,0.747765,4.050509,2.864565,3.586792,0.944054,0.109404,2.752826,3.866751,0.356934,4.326438,1.710674,2.873875,1.787701,1.856191,0.616959,1.355009,2.436634,1.865796,1.571428,4.007528,0.041222,2.677188,2.377267,3.427826,3.010272,0.998136,0.661166,0.167941,1.081960,1.522729,4.621685,1.915841,2.733625,1.590910,3.576682,4.514836,2.526697,3.120101,0.362779,3.569850,0.475194,4.620224,1.388137,4.694434,3.100100,1.066136,4.470721,0.724898,0.660492,2.242837,1.245515,2.669691,2.225062,4.666951,0.470668,0.429940,1.749001,3.733577,4.908182,0.913162,0.632247,0.125020,0.029586,1.485024,3.926450,4.623387,4.963475,4.617855,0.623429,3.639958,1.065012,1.172508,3.662797,4.749055,4.990298,0.214198,1.057015,0.062498,4.616830,2.175148,3.913364,2.954981,1.471295,0.358823,0.790079,3.553473,0.593146,4.485375,2.952637,1.341403,1.942471,4.123198,3.370633,2.426280,3.644053,3.469586,0.557017,2.184009,2.495732,1.093085,2.772602,2.744604,2.896497,1.929825,3.015199,0.751371,1.923477,1.261733,4.722236,2.105619,0.285386,0.761131,2.891282,4.146503,3.335293,4.393213,3.080866,2.181749,3.393380,4.068780,4.426880,0.556389,3.903320,4.107895,0.151169,1.086998,3.697595,1.020472,2.162194,1.601439,2.489887,4.930764,1.770213,2.804721,3.941545,1.264836,4.190961,4.459448,2.939830,0.090235,0.376771,3.020161,2.737454,1.665276,1.300270,0.671247,4.352213,2.063604,1.247666,1.607486,4.426930,2.525227,4.250230,2.841564,2.206406,1.240194,1.846951,2.456045,3.319856,3.031262,0.036781,0.502358,2.018093,1.862470,2.993368,2.729131,3.817698,4.942977,0.295192,3.224945,3.173678,4.139828,0.373185,3.452314,4.904688,1.398117,1.573764,4.158331,3.494663,1.217445,2.651180,0.161516,2.157859,1.270797,4.602696,0.166705,4.218580,4.806847,2.891880,0.757443,1.103819,1.693808,1.412476,4.691146,4.505223,2.832831,3.574906,0.287011,2.961529,0.176098,0.658866,1.594241,0.078065,2.412817,0.265017,1.467954,4.154553,1.121497,1.974697,2.778464,3.103773,4.659936,2.251953,4.963834,0.858586,2.367650,2.097157,1.771745,3.044158,2.066245,2.030812,4.699038,4.727909,0.297076,1.103852,3.598813,1.297175,2.644194,1.367499,1.917156,1.866804,2.538969,1.568538,2.938859,3.368185,2.927623,4.899460,1.076008,1.798350,1.721014,4.142680,1.362018,1.672765,3.595269,0.940085,1.937184,4.330827,2.927222,3.245753,1.180301,0.028737,0.111100,1.341863,4.787935,2.139321,1.521098,1.217182,4.962860,1.113224,0.694986,2.612882,1.606689,3.240513,1.359688,3.715647,2.938585,3.529676,3.816281,0.888937,1.838904,0.996308,3.194964,4.693735,0.808978,1.923068,2.576262,3.272033,0.828861,2.746278,0.803288,1.313271,1.738683,3.200063,1.396191,3.710070,4.942860,1.467785,1.689172,2.088739,4.392593,1.362356,2.148667,0.720489,1.825511,4.041079,2.837664,2.674340,4.218350,0.464918,3.629059,0.178906,4.471055,1.026245,2.978834,0.561597,2.743229,0.979189,4.031528,1.536681,1.426575,1.901523,1.117200,2.975531,4.379561,3.677056,3.917633,3.272659,1.507968,4.776863,2.414954,3.944327,1.080217,2.196089,2.603083,2.723026,4.671615,3.756744,3.633191,3.008844,0.846307,0.611911,0.979010,1.849443,4.676674,4.107899,0.544323,4.243472,2.046313,3.213919,0.882617,0.819024,4.145813,2.247471,3.887330,3.839880,4.726268,4.577843,3.255953,3.066516,4.256937,3.648886,2.170254,1.340488,1.763856,1.483932,2.140592,4.929993,4.543696,1.454053,1.064710,0.196779,4.889961,2.912821,4.829139,2.246705,0.713677,4.961975,0.633873,0.362937,0.672462,3.712115,0.661849,2.855783,1.211307,1.893556,1.757966,2.322254,1.407077,4.352867,4.906310,2.581843,2.436115,2.977129,0.466710,1.535978,3.770853,2.970169,4.160624,1.689582,1.658652,2.317639,1.440970,1.397589,2.004034,2.342378,3.173819,1.838205,3.654446,3.832742,4.560029,3.629043,0.889892,0.451470,0.254395,1.302290,1.685565,1.753566,0.037721,0.848134,0.262968,4.929286,1.840710,3.466993,2.944506,3.867356,4.078744,1.975079,2.347819,0.046120,3.299516,1.117920,1.857894,2.649122,2.199209,2.987305,4.797184,3.756050,4.398027,2.859907,4.629038,3.827468,3.239808,1.058228,1.319361,1.322787,1.237397,1.017838,3.646106,2.555435,1.509357,3.576405,3.486471,3.215685,3.734331,1.045997,3.262072,2.570672,4.758754,1.498911,0.168635,1.475741,3.180425,4.348067,0.638726,1.503879,4.985368,4.491893,0.736010,1.046137,1.749600,0.772814,4.667505,2.453309,0.012511,0.172070,0.848754,4.512290,0.616912,1.788689,1.085816,4.129902,4.541781,4.125123,2.303839,1.094954,0.957062,3.193598,2.486492,2.792828,4.307394,4.757288,4.524888,1.196640,2.098332,2.836678,2.444176,1.279335,1.248031,1.398492,2.835101,2.784711,3.625135,1.199222,4.654176,1.060832,3.424751,3.034463,0.493260,0.963843,4.088119,4.656424,2.155584,4.650609,0.008616,2.748124,4.190916,2.995261,4.272746,0.927330,1.309386,0.464492,0.482598,3.524631,0.439840,3.691917,3.745370,0.305678,0.582181,1.535956,0.322162,4.081171,2.311762,0.050239,3.817257,2.077926,2.197482,4.293182,2.265903,4.002028,2.007338,0.396405,1.744635,0.326716,1.037693,3.800939,1.202333,0.500337,1.695352,2.866864,1.275769,3.856208,4.960962,3.242782,3.415703,0.802384,4.145107,0.276959,4.570503,1.634445,1.285823,0.527288,2.717612,0.268664,2.447502,4.069898,3.790597,0.496527,2.416034,4.372535,3.490361,0.295557,0.964409,4.622708,3.321067,3.901239,2.747867,0.543946,2.428477,2.646121,2.227457,4.894819,1.439841,1.270799,2.236811,2.598775,1.600670,4.947341,0.577809,4.906823,4.583098,4.664954,1.916224,3.034037,2.908207,3.016519,0.298802,4.067786,1.836035,4.580344,0.925709,2.890244,2.992961,0.137494,0.953822,2.409440,2.983439,0.438759,1.546698,2.707435,3.393856,4.180835,3.801396,3.910484,1.402299,1.613764,3.143283,0.867876,4.544555,3.623519,0.289458,3.754408,2.614004,4.695679,2.522139,2.880484,4.196278,4.598141,4.456950,2.822342,3.133187,0.006523,2.859470,0.926542,2.906921,4.945087,1.729122,3.638405,2.406638,3.427764,4.191498,3.578248,1.409986,4.269387,4.893220,4.555609,2.983964,4.417183,0.788780,0.982343,1.286287,3.858425,1.204991,3.601663,4.184494,1.009167,2.746391,4.189847,0.377071,2.968313,0.971100,4.440389,4.391988,3.028553,1.812183,3.893210,1.400093,4.086360,1.002027,0.639617,3.440453,3.582565,1.485007,1.185148,4.637044,0.272260,2.958274,4.015000,4.786479,3.711573,4.047982,4.634441,2.220863,0.333536,1.232328,4.977277,0.938955,1.217686,2.017922,4.367973,3.971122,2.957755,2.504383,3.440082,0.854031,2.935130,2.502532,2.886262,4.028389,3.253353,4.578378,3.008487,1.305354,1.977135,1.823890,3.488716,3.323962,1.370078,4.635755,0.232547,4.367103,2.031649,4.761143,4.435452,2.947974,0.517617,3.600636,3.581022,3.184040,1.300635,3.313933,0.930035,3.673046,2.929662,0.021166,2.729598,1.401881,2.740063,3.098261,3.173821,0.323966,1.149409,3.983986,0.419542,4.229794,3.663323,0.345818,2.410228,1.026782,0.789410,2.485378,1.243597,4.696974,1.687749,0.630680,1.338353,1.107852,3.910434,1.057084,0.906981,2.611711,2.432205,1.508344,0.749510,4.441927,1.734593,2.863645,1.066149,1.369161,2.419242,1.943737,1.884850,2.811336,3.543431,0.127994,0.409722,1.846286,1.253434,4.456280,4.446138,4.944517,1.815119,4.110109,3.267897,2.033222,0.100325,1.636004,2.075255,0.314431,0.570696,0.764460,0.007857,1.805024,2.762167,3.078358,1.391293,4.056581,3.871888,3.468979,3.299849,1.456259,0.616844,0.803344,0.269463,1.485235,0.175458,2.656384,2.255307,0.483537,0.339622,4.016618,1.769898,4.442828,0.114220,1.711391,2.057775,4.624710,0.186191,0.837958,3.070619,1.841619,0.388853,4.007167,1.352769,3.402001,2.579010,0.741772,1.423691,1.257294,2.621604,3.870488,2.909907,2.699001,4.783382,2.161626,4.534315,1.149975,0.779520,3.826329,0.812219,2.409985,0.070482,1.665134,2.060961,1.757683,0.842093,4.766042,2.883733,3.896693,4.863189,3.132860,3.861266,3.135700,4.532897,1.700958,4.657748,1.275595,2.619303,1.752859,3.915622,0.641703,4.114728,2.691521,4.736604,2.280967,1.532881,4.573374,2.954653,0.633009,2.793575,1.347740,3.660331,2.792906,0.600153,2.191909,3.462621,0.643395,2.995911,0.120313,2.564201,0.033519,1.773819,1.866815,2.228883,4.382406,0.796964,2.867239,1.419986,4.536884,0.252389,0.803892,3.652693,4.142059,3.265644,4.870401,2.459838,1.681860,0.300210,3.232986,2.754321,1.170739,3.794334,0.688818,0.983415,1.015026,2.901587,0.170543,2.169281,4.857034,3.852198,3.961718,4.437874,2.059135,1.400580,4.799408,3.240118,0.767697,4.940605,3.359060,3.928571,1.252762,2.495475,0.708524,1.873951,2.738288,2.115238,0.342193,3.617420,3.888669,2.029479,1.195875,3.402812,2.852911,3.275289,1.875155,3.119963,2.027268,2.696127,1.390639,2.018451,1.403748,3.231583,0.811541,2.912760,2.908090,4.090941,3.750341,0.130369,3.012998,0.400486,0.368727,4.197036,1.305159,3.693145,4.925696,4.942005,3.498297,2.820367,4.053569,0.920922,4.950655,1.010295,3.492271,0.360257,0.748797,1.018285,2.160178,1.053928,3.736780,1.533849,1.799551,3.283729,0.155920,4.725340,1.879777,1.154153,3.933833,1.772336,1.778533,1.460759,0.492377,3.581033,3.051811,4.934622,3.126796,0.156601,2.370163,0.148551,1.634628,2.655737,4.766176,0.104621,4.836407,4.532202,3.377775,0.472938,4.824944,2.820303,0.004984,4.139423,1.109147,1.356616,2.979628,0.588073,4.621459,3.296807,1.717470,3.680562,4.315481,4.162930,2.945106,4.019141,0.805370,3.128842,1.768919,1.517706,0.725910,0.198824,0.094482,4.383962,3.425200,3.380513,3.003283,1.913292,1.765200,1.389334,1.714232,3.547161,2.465425,3.766188,0.465413,2.491093,1.934203,0.090021,0.827100,0.456186,1.781359,3.591313,3.227388,3.014366,2.483003,0.430715,2.739157,1.072809,4.242286,1.045109,4.133360,2.803711,1.902261,1.310067,2.581000,2.901758,0.733856,4.929660,0.882763,3.548966,4.888976,4.887168,3.795965,4.667605,3.824491,3.142907,1.068229,0.403399,0.205396,2.098746,2.946795,2.047442,3.682363,2.601587,1.414711,4.755175,1.946583,0.586221,3.947060,0.990782,0.490735,3.252763,3.752398,0.262233,3.303759,3.603396,3.128656,4.286385,0.182791,4.772005,3.141989,2.443587,0.432005,0.231787,4.376000,2.720724,0.699000,1.345026,2.663104,3.938339,1.950015,4.675890,0.922995,4.026559,1.041650,1.801384,4.523904,2.951275,0.619079,1.172875,0.007119,1.632743,2.644233,2.841737,4.714417,4.335764,4.366108,3.791407,2.563492,3.300249,3.076978,2.565980,3.675668,4.800003,2.212340,1.576373,4.931561,3.955680,4.897814,2.028804,4.977977,2.814883,2.159794,1.916497,1.758178,2.096572,2.473020,4.679584,3.120076,3.122450,2.515131,0.366019,1.515661,4.571638,1.426218,0.998473,0.060245,2.922963,0.286331,4.053605,2.748473,1.972794,3.992163,3.798943,1.968322,2.067289,1.222166,0.196621,1.159190,1.416856,3.482855,4.475451,1.254392,4.562029,1.135908,1.565200,4.388401,1.321021,0.809039,4.586656,3.094221,2.577620,3.823332,0.304470,0.396168,1.727060,2.233573,0.008827,4.015985,0.908802,1.922223,3.103509,4.130939,2.649100,1.917702,3.659230,2.296507,4.738146,3.782716,1.995016,2.225002,4.081852,2.084881,3.441114,2.119990,3.560589,2.079556,1.391609,1.240850,1.557032,0.520567,1.958920,1.686133,0.256442,1.220040,0.654701,2.571593,3.427578,3.191036,3.899767,0.600457,4.961853,0.593810,4.969127,0.610704,3.014428,3.893048,4.282371,2.470308,2.105438,3.398741,1.347642,4.048256,2.196576,3.302231,3.346346,4.162020,3.601568,0.223388,1.679040,4.677818,1.091162,3.990124,2.233254,1.018638,0.091066,2.505283,0.763541,4.177692,2.770859,1.217422,2.533164,2.672442,2.811354,4.597848,2.220361,4.975467,3.386478,0.178797,1.207125,0.136171,4.669689,2.517335,4.603315,3.326535,2.772671,0.603544,2.275902,4.432653,2.382262,1.791918,3.578811,0.077402,3.727536,3.851236,4.533924,4.951494,2.865568,0.837164,4.503318,0.438559,0.697524,4.324000,3.007707,2.853545,0.338525,1.783102,0.064202,4.955154,1.722716,4.004810,3.507685,2.847419,3.364709,0.578298,2.759972,1.496205,2.861417,1.358581,0.529659,0.626275,0.681141,4.001570,2.861221,2.862454,1.275855,4.124074,1.563724,1.630859,0.194736,2.065836,2.065837,2.464442,1.350588,0.809067,2.272887,1.589803,1.864036,1.174392,1.492793,1.929578,3.319312,3.230938,4.621188,4.959932,4.917859,4.654683,2.948101,0.666368,1.016368,4.891837,1.642301,1.702880,2.645496,0.015224,2.762344,0.746484,2.223143,0.431184,0.932933,1.882702,2.625523,3.147523,4.835813,0.527759,0.536201,0.010042,1.392223,4.009335,3.341454,4.092070,4.923420,4.646560,3.492002,0.114413,0.321292,4.952992,2.099680,4.043703,2.705204,4.663946,3.684027,2.899919,2.034098,2.348123,0.115866,1.051525,4.816879,1.973846,0.471859,1.969492,0.634352,4.312787,4.411763,4.519680,0.110045,4.163851,1.911826,0.882684,1.170956,2.339226,1.458287,4.339920,0.618866,2.870830,1.612408,0.587458,1.108942,3.082228,3.998720,3.036699,2.882997,2.275837,2.432604,1.562087,2.746761,3.238299,2.514129,0.741711,3.958124,4.118483,4.195076,1.385158,3.856048,3.527723,1.715492,4.086737,3.056614,3.242260,1.720171,1.158447,4.355425,1.005546,2.586796,0.099368,1.385516,0.058755,0.273839,1.722240,2.755229,3.984732,4.019386,0.297034,4.857054,3.779579,4.933186,0.410179,0.436993,2.517058,2.002568,4.814744,1.516631,1.767127,0.076214,4.567262,3.710413,1.211640,2.314082,0.630682,0.711099,3.428399,2.111191,2.945197,0.074343,2.270484,1.217887,2.961639,1.269659,0.288934,1.198040,0.087634,0.935412,3.568559,4.278933,3.952785,1.039126,3.261076,0.618389,0.862704,3.330992,2.220740,2.299635,1.653530,1.730135,2.238288,4.341697,0.756700,2.647863,0.028621,3.532582,4.123795,4.178636,3.463183,1.475270,0.427260,1.481532,4.284693,1.160412,3.527038,1.989807,0.552388,0.961172,3.965879,4.811399,2.679297,3.347875,2.690094,1.161182,4.252112,4.343696,1.318305,2.184888,0.099420,2.421957,4.630825,0.507934,1.100519,3.818080,0.765620,3.896456,2.972098,3.318801,2.648538,3.135903,2.358580,3.350537,4.353873,0.533414,0.937915,0.371031,2.883894,4.829827,3.879844,1.358393,1.976207,1.761985,0.614428,4.508504,1.770754,3.897351,3.247198,2.676061,0.088850,1.704812,2.569364,0.421816,0.940114,0.174562,1.635945,2.793414,3.739362,2.861004,0.492520,1.732593,4.222380,1.159474,3.530891,1.454856,2.488467,2.169434,4.039278,0.664103,3.593209,1.577819,2.249911,0.165555,2.102521,0.035078,3.172947,0.743602,4.650297,3.156163,3.489548,1.514315,0.900261,0.012519,2.155350,4.913388,0.589606,3.439597,1.465413,2.874442,1.008631,1.351875,4.242879,2.976652,1.532809,2.461492,3.694409,0.909606,3.011764,1.798549,4.996990,4.167165,2.476942,2.476159,1.881904,3.752791,1.967562,0.866174,0.239086,4.083569,0.685906,2.465544,3.955741,4.219491,4.366359,0.048219,1.517977,2.567880,4.077711,3.763539,3.189811,0.555801,1.153177,4.996995,4.943837,1.665277,3.375523,2.668545,1.178825,2.998883,3.091995,0.662226,0.052793,4.563526,3.230117,4.419347,4.377989,2.130353,2.229111,3.683738,1.533478,2.035696,2.325857,4.605683,1.648900,3.009238,2.787955,2.007559,0.667554,2.026041,4.195613,2.027924,1.623352,3.042941,0.673761,1.045375,4.246913,2.843540,4.435303,2.890739,0.172037,1.643617,1.432536,2.959435,1.250813,2.624602,0.899870,1.831327,4.836161,1.549872,0.678902,0.287155,2.987829,2.444428,0.141905,1.041490,1.073639,3.108368,2.779665,4.942903,3.922990,2.436859,3.776536,4.272519,3.827228,1.598896,3.644994,1.840182,1.243138,4.251819,4.739269,2.485815,4.597019,1.620319,2.541519,1.722039,0.034071,3.291168,0.362188,1.160953,4.578867,0.270256,1.954359,0.937653,4.897453,3.189629,0.884491,3.234187,3.524320,0.324116,3.122476,2.557690,1.429116,1.748025,2.044298,2.509344,4.048260,1.118985,4.462379,0.565740,0.638147,0.953008,0.807743,3.774210,1.643134,1.311118,1.791928,0.992167,4.084176,2.942641,1.398302,4.998255,4.596012,3.457878,1.469415,0.174157,2.610584,3.863473,1.632514,4.358874,3.894162,4.433694,2.705922,3.050594,1.551253,3.385236,0.188950,0.883216,2.285034,4.450724,2.832147,3.740569,3.523426,0.503900,0.384734,3.024749,4.511315,3.264333,1.069883,1.233605,3.376777,4.460509,1.016005,3.849887,2.439977,3.912186,0.996585,4.361119,3.039053,1.815531,3.522266,3.415415,1.097089,0.011725,0.250947,4.803966,2.604490,2.199826,1.732629,4.377852,3.351554,4.489942,0.994376,3.214162,4.521648,2.771603,1.246135,1.280721,1.805730,4.163091,3.761249,3.352759,2.901535,4.635338,1.130411,4.161933,3.827665,0.231518,4.039279,1.475051,4.853145,4.888521,1.778969,0.564504,2.275701,3.009060,3.836645,4.211602,2.622029,3.913211,1.015855,0.528678,1.744006,4.963354,4.483960,2.500287,1.576431,4.779510,0.855204,0.997851,0.746546,0.999893,0.568044,2.506954,3.103340,2.630627,0.052201,3.975384,0.567231,0.019080,3.892054,0.864608,1.956480,2.888017,3.598484,1.122368,0.460770,1.505161,3.957209,1.716294,0.909492,4.510062,2.342725,2.052436,4.305110,3.990265,2.510368,3.046134,1.420920,1.256436,1.037513,2.573144,4.577338,0.341625,4.765736,3.822778,3.932590,3.400707,0.897939,4.817952,1.710826,3.857543,3.740361,4.667791,3.737015,1.694196,0.104905,1.167207,3.301380,1.024063,2.656805,3.531265,1.017451,2.413457,2.951586,4.872174,0.826267,3.593732,0.523320,0.522375,1.016417,3.265230,4.019981,2.916124,4.143936,1.915252,3.062029,1.583872,0.321537,2.453321,4.896458,2.641014,2.432658,2.261400,3.373781,2.037578,4.592128,0.860715,1.695876,0.167396,4.370966,3.808057,0.484103,2.798866,3.091853,2.795869,0.505435,2.702915,1.080164,3.771858,0.769859,0.153787,4.199431,1.690201,3.278100,2.263619,0.152492,2.881634,1.038684,0.784138,2.215494,0.822031,0.909558,1.945070,0.510058,0.848731,1.514532,2.462068,1.793398,2.857449,0.507843,0.371331,0.429347,0.220704,1.881573,1.182020,2.349513,1.612400,4.403710,0.955575,0.916852,0.493905,3.070285,0.557012,0.379171,4.699668,0.361363,1.587565,2.021588,3.191835,3.183179,0.139142,0.714732,4.699943,2.042637,1.877159,0.078458,0.219786,0.416652,2.985553,1.570980,0.004515,0.987314,3.965921,1.365639,3.589971,1.415353,2.777230,0.863131,2.037549,1.260410,2.384438,2.405962,3.031376,4.537196,1.287368,3.486086,2.611228,1.373524,3.246741,1.365113,4.611453,2.329953,1.910545,0.485475,0.878888,0.653263,1.725537,0.791560,4.421704,4.008342,1.114708,4.218313,3.723341,4.416732,1.446866,0.295284,0.916577,2.047247,4.760320,3.656662,0.047327,1.665191,0.752310,1.101484,2.665282,0.578119,3.180873,0.016747,3.492391,3.867170,3.685164,0.051870,4.767349,4.958248,4.568650,4.598585,4.845358,3.506462,1.275914,1.331356,0.090636,0.335279,0.288142,1.647467,2.978037,4.488922,0.253391,1.248881,2.065560,3.026810,0.089549,3.899582,4.143919,4.200000,1.790153,1.547555,3.600738,4.433145,3.726804,0.929857,4.883500,4.677242,0.335154,0.485455,4.871314,3.742728,3.947187,3.573664,0.552123,4.231801,3.524434,1.152683,4.482490,1.288508,0.400937,0.869570,1.714831,2.008851,2.553587,3.160647,1.406422,2.202398,0.531637,2.370227,4.967054,0.518636,1.324233,3.528942,2.103172,2.607445,2.412603,4.506690,3.255364,2.470868,2.093478,4.566743,2.201727,2.349254,3.319584,0.107737,0.012145,4.273611,1.834946,0.722939,2.267243,2.631018,4.296437,2.725203,4.138601,0.765926,3.173216,0.747898,1.207225,0.222786,4.712137,4.856965,2.803510,0.447391,4.637416,0.136248,2.625766,2.533601,0.076346,2.061387,2.031531,1.818862,4.919480,2.806477,2.656614,3.888664,1.446300,4.626808,1.662397,4.998252,2.118113,3.734366,2.968102,3.049457,0.968807,2.749530,1.762442,4.744115,4.531405,0.318080,4.907727,1.052738,2.814746,1.014229,2.544798,1.057231,4.563925,2.663425,3.847544,0.664363,0.408589,3.484984,1.919353,4.330233,0.617153,4.471062,3.140955,3.118507,0.661636,4.334708,4.016943,2.776229,3.912274,1.518195,3.802794,0.126485,3.198578,4.236878,0.879229,1.606537,3.818095,3.423785,4.919911,0.979567,2.605721,3.015992,3.189707,2.689983,0.500976,1.705124,2.736604,4.958241,0.422728,3.378007,4.233264,3.916333,2.274939,2.112538,3.768250,2.562209,0.222119,3.901454,2.049808,1.548085,1.146032,0.809825,1.799910,3.316521,3.058453,1.263491,2.490962,1.123739,2.264456,3.030825,0.242144,1.372716,3.080115,1.398593,2.471864,0.352088,0.930474,4.582024,0.513872,0.727691,0.184839,2.078689,2.658328,4.663423,2.613017,2.374007,4.805337,1.213882,3.418923,1.805053,1.495626,2.345199,2.200465,0.167590,1.193477,1.623590,1.396173,0.824546,4.725249,2.735375,3.303098,3.164352,4.727537,4.865553,1.269146,4.305211,0.606120,2.244350,3.202956,4.734583,4.140591,0.755971,4.815986,2.681993,3.573753,2.017398,2.304475,0.052424,0.765981,0.164058,1.143976,2.496232,1.476947,3.238574,4.675890,3.584951,0.911173,1.345928,0.725077,1.122412,3.736175,4.453052,3.700395,3.307636,4.836265,2.178247,4.748943,4.642815,1.718950,1.031224,0.518793,4.941465,2.655236,1.188633,2.947007,2.228921,3.872841,0.729994,4.497309,3.950781,3.710123,4.593153,1.595843,3.617298,0.290600,1.790542,2.698085,4.658964,3.908578,0.548666,3.839196,0.632869,4.091902,4.062289,4.575657,4.989308,0.298659,0.116405,3.384196,0.631772,3.798737,1.156805,0.128719,0.255473,2.108858,4.367081,4.960027,3.760794,0.432366,4.957352,0.363819,0.962439,3.973305,1.095565,2.221841,2.164362,1.179371,3.462564,0.915485,2.614105,3.937923,2.249618,4.590532,2.909242,0.652486,4.098492,4.294115,3.107098,3.917049,3.718580,2.515568,2.809837,1.952232,3.471053,1.282300,2.678943,2.333663,0.605422,2.578700,1.818151,1.690181,0.479179,4.311053,3.643404,2.810285,4.154516,2.640110,1.376596,3.758420,1.918810,4.624600,1.629053,1.377195,1.588101,1.802324,2.320474,0.174632,0.280785,1.930726,1.480935,3.109615,3.102892,0.406359,1.136255,3.142121,4.487758,0.174452,2.161130,3.762234,1.817308,3.746424,0.944302,0.672385,3.506422,1.086976,0.198617,3.307665,3.640055,3.952382,0.106124,3.219514,3.733187,2.923258,3.767696,2.398511,3.806494,4.305420,0.004080,4.658516,4.301625,3.847710,1.185581,1.957045,3.477100,2.177035,3.760548,4.299675,3.036150,3.467480,0.554689,3.035177,0.444028,0.108235,3.688795,4.241859,3.471040,3.215261,3.424895,4.809112,1.452481,3.458491,2.219155,2.133023,3.618905,3.052763,4.140353,3.685715,4.153082,0.471383,2.867859,0.890193,1.845380,3.340617,0.159670,0.001725,4.805153,2.230819,0.251258,0.264310,4.761787,4.866362,1.729663,0.904885,2.159009,0.155365,2.821000,1.377506,2.370259,1.385238,2.060358,3.810394,1.907745,0.928695,4.557615,3.523245,0.540097,1.385953,2.413317,3.027351,1.811036,4.240294,1.848835,2.907247,2.043429,4.698514,0.981046,3.510540,4.016081,3.666177,0.596938,0.395618,4.491847,2.831151,3.694056,4.424928,1.234782,2.386446,4.738038,2.043258,2.402130,2.285519,2.742366,4.240149,2.031771,1.770424,3.134875,0.536091,4.745964,0.941656,1.813316,3.718899,2.909050,1.074470,3.456600,4.358846,0.490858,2.533802,1.417200,0.861149,2.856554,4.908663,4.653072,4.599517,4.491588,4.049227,3.601727,4.412932,0.170373,0.845976,4.164766,0.800397,3.008574,0.858921,2.707724,4.700474,3.050185,4.881734,2.061487,2.151518,2.452998,2.481293,0.682052,2.480654,4.033465,0.306515,1.706046,0.470855,0.072746,4.224933,1.719000,1.513533,1.039919,1.493907,4.906597,3.720035,2.480880,1.052349,0.092967,4.774962,3.543051,0.591831,0.903422,1.082005,1.025771,2.607604,1.999980,4.149154,4.765646,2.692276,0.697411,1.515250,2.944738,1.362027,4.012022,1.416747,2.854365,1.499411,0.332366,1.238828,4.795314,4.393460,1.668283,3.702743,4.164981,4.504386,2.246174,2.677467,1.751609,0.979612,2.015006,2.831982,2.990841,4.582538,3.239148,1.757062,3.327260,2.057277,0.744759,3.875661,0.794228,3.969535,4.287659,3.691236,3.118004,0.285021,4.667204,0.355728,3.972222,0.691504,0.163856,4.650472,0.930317,2.686391,0.567378,3.181294,4.341517,1.140152,1.499208,3.108285,3.052261,4.033696,4.128705,0.052090,4.144991,3.074072,1.485805,0.032113,2.298138,2.931953,1.863692,3.729451,0.386086,0.836833,4.333498,4.608439,2.250086,2.783325,3.446385,2.071994,3.899905,2.626173,4.221230,3.366203,3.706020,0.294120,3.765115,2.346470,1.673792,2.155450,0.868951,0.011569,3.346921,4.152125,4.652268,2.658081,2.516752,4.302142,1.878394,1.592102,4.361916,0.839289,3.928022,4.364852,3.855483,2.383562,4.598023,0.681999,2.175251,4.807630,0.566360,3.822633,2.029270,0.189105,0.262040,2.152221,4.291301,3.906398,2.983608,0.004538,1.924593,1.820390,0.272925,0.876509,4.219365,2.760267,0.622820,0.273284,3.551584,1.853229,4.781362,3.705461,2.916528,3.884010,3.960772,0.853996,2.743208,4.097443,1.775015,0.459097,0.916454,2.994713,4.486543,3.149536,3.334500,2.596080,0.299237,4.004616,3.029565,3.551561,4.352194,1.291433,3.726610,0.560508,3.902674,0.512461,1.564284,1.482388,3.325233,3.895982,2.043801,3.750099,3.681629,0.239339,3.108328,3.996497,2.817536,2.498657,2.482748,0.190400,4.164982,1.092698,0.641377,2.969439,3.822661,1.339719,0.504905,0.758241,1.091483,0.565966,2.737318,2.241458,4.933250,4.880065,3.024432,1.500000,1.840245,2.554699,1.847666,4.777577,1.080949,3.797621,2.551576,3.192399,1.523801,4.870732,3.741081,1.793858,2.662317,0.569993,3.693965,4.480988,3.344556,3.690103,0.603816,3.354918,1.482253,3.927735,2.562428,3.594640,1.384687,4.520626,1.349883,1.002804,1.282606,4.433059,1.904625,0.170341,1.049815,3.499338,0.256807,0.518344,1.372616,3.081791,0.002332,4.160810,0.606184,1.135961,4.405122,4.849064,1.560929,2.885484,3.858029,3.677022,1.510769,0.111176,0.080230,0.579342,2.758514,4.772257,4.764414,2.433538,2.470228,0.177962,0.136433,0.641000,0.509688,2.753496,2.181556,0.075867,2.949688,3.883862,2.900338,0.002845,3.230776,4.843306,4.459387,4.522291,4.812893,3.983118,1.812324,4.928240,2.592587,2.608726,0.991689,2.680571,1.411412,1.357366,4.301528,4.779601,3.388330,1.943499,1.522844,4.277511,3.454590,0.887210,2.420308,2.881264,2.595893,1.000237,1.584468,2.814263,3.393955,1.588631,0.311786,2.307173,3.962442,1.755123,0.978407,4.475356,0.178260,1.097742,0.075906,3.429578,4.798220,4.928197,2.744561,4.149499,4.139954,1.035606,2.591916,1.422603,3.867637,3.855960,1.392889,4.342050,1.946263,0.695206,4.607266,1.260188,4.190834,3.686724,3.902118,3.487517,4.292489,0.908035,4.930050,3.077782,2.777541,4.712595,4.713678,4.820992,4.541786,2.771078,4.969504,0.355972,0.173944,3.808528,4.028317,1.835111,0.338015,3.170783,0.703517,2.558955,3.886990,2.843544,2.643705,3.172404,0.398396,1.777517,4.221025,3.873303,4.418472,3.780032,2.350563,1.621832,2.668683,1.983795,4.787095,4.826565,3.299588,3.118179,4.559194,2.785064,2.429321,4.356691,4.276293,1.918074,4.863611,1.537617,3.196957,4.256739,2.929820,2.968315,0.492257,1.594697,2.086986,1.857363,1.533042,0.105976,1.616682,4.292899,3.594255,0.528968,0.524190,2.540748,2.981079,0.302965,4.081865,0.642008,4.392683,4.195145,3.481556,3.427796,2.763831,2.212585,3.393974,4.366122,1.051957,3.609553,0.983803,4.479011,2.936070,0.578774,0.011102,2.330513,3.225111,4.842968,1.818614,0.256724,3.007069,0.838512,4.895423,1.939841,2.724738,1.313105,4.529336,0.364538,1.216180,0.203346,4.701155,1.763408,1.568190,4.170066,4.419568,3.160573,4.308543,4.732784,2.154832,2.629503,0.926106,4.469786,3.171217,4.669712,1.885865,4.875683,2.812898,3.653748,3.166788,0.224031,1.390276,4.670540,2.845916,0.471631,3.196595,1.913113,4.100821,1.099579,4.973221,3.985047,0.345650,1.087053,4.250709,1.176995,4.912394,1.953308,0.035070,3.453910,1.957344,2.996035,2.518885,1.949846,4.133060,3.873840,4.833407,2.326670,1.588708,3.850906,2.079404,0.254224,3.805164,2.468849,3.165705,4.492063,1.079656,0.139107,0.432729,2.152563,0.921217,2.962263,3.822610,3.242309,1.771149,2.124015,0.542649,4.314980,4.049905,2.365244,1.163447,1.010085,4.845853,0.420459,4.965320,0.340684,4.707919,4.221545,1.087241,4.112091,3.397182,0.067881,2.917129,0.231218,2.645676,1.450954,2.240252,1.534625,1.545961,2.013366,1.232272,3.438941,0.824172,0.411050,0.230784,0.029211,1.009858,3.444794,0.269922,4.362256,3.183484,4.565607,0.119997,3.405594,4.930594,1.883889,2.129808,4.066460,1.895835,4.162267,3.011781,2.018584,0.729821,4.798064,1.267446,1.102721,0.411051,3.134476,1.908858,0.632687,3.331620,3.518791,0.625725,4.117316,4.022729,4.745812,0.572363,4.228309,0.372427,4.412529,2.900647,4.734461,0.900270,3.860163,3.044350,3.352765,1.968781,0.897248,4.984210,4.155589,1.456436,2.529652,3.513622,1.139341,1.502995,4.541170,2.036503,2.025368,4.909309,0.736966,0.548716,3.182423,4.115858,2.294421,1.980364,3.998555,3.032355,0.262773,1.065891,4.040539,0.251776,2.544652,4.027159,4.919601,0.828447,4.961356,3.506207,0.593386,4.761566,4.228997,3.403710,4.403113,4.461228,2.147024,1.605772,3.939219,2.382315,4.643109,2.289332,4.219334,3.690597,2.001189,1.468634,0.905533,4.920480,2.263529,2.364135,1.535246,1.877158,1.217766,0.812959,2.354539,4.731276,4.081291,1.782125,1.466886,2.984929,3.887170,3.092069,1.975554,1.636684,1.071786,2.111840,1.540850,2.318026,2.185918,0.913835,4.657029,3.817428,1.036229,1.972805,2.711784,0.195183,0.852976,1.265458,3.015745,4.084417,0.849741,2.818359,0.547990,3.825548,0.425278,3.933656,2.654433,2.442124,3.333295,2.861826,4.515706,2.348926,0.249788,0.820553,2.672922,3.101821,4.303678,0.327844,1.152639,1.507591,4.216329,0.915924,2.533093,2.610417,2.876308,0.821849,4.141118,2.920147,3.207375,1.230266,0.400638,3.360255,3.773499,3.289450,3.511197,0.206796,0.898684,2.877823,3.284990,1.042458,3.248336,0.068595,0.595836,0.214144,4.269264,3.362602,4.991366,4.294714,2.472020,4.417508,0.462492,4.305261,3.320837,2.733468,3.156115,2.416715,1.034095,1.413195,1.920443,4.160468,1.999859,0.370810,2.870528,2.031151,2.081114,3.694931,1.508798,2.286944,4.250420,2.413056,3.692208,1.841920,1.901746,3.524506,2.775631,0.797409,1.883227,3.610025,4.446240,4.669780,4.108947,2.350800,2.170930,2.552409,2.849138,1.343653,3.375343,3.589537,1.280995,1.699259,3.063080,3.330910,4.751256,0.965054,4.406017,2.656105,4.340287,3.887795,4.846606,4.628571,0.846378,2.899820,0.142817,3.441421,2.707528,0.713907,3.332031,1.835447,0.472958,0.014958,3.031599,3.950551,2.369972,1.819593,3.780152,0.031634,4.031247,0.731565,1.467099,3.069187,4.029949,0.735402,3.301458,2.042379,1.281921,1.968708,1.923190,4.178529,2.684953,4.208273,0.830072,4.187979,1.554509,3.583145,2.494714,2.993724,3.212789,3.200686,4.666845,3.402877,2.880579,1.352258,4.169617,1.456689,2.320353,1.931049,2.586175,4.842593,0.216941,2.617774,1.024635,0.635451,2.500594,2.682060,3.491930,1.416779,0.070977,2.117459,1.485127,4.735693,2.247909,4.012196,4.857090,0.350723,3.346399,4.106390,0.044955,0.423074,3.134590,2.770739,0.485606,4.842493,1.417404,4.379334,3.522869,4.396983,2.998723,4.420362,3.501291,2.302983,1.147056,4.679681,4.003449,2.641198,1.223408,0.984603,1.793352,2.063360,4.061643,0.693151,2.747955,1.367505,1.212542,0.491195,0.762738,4.842332,0.455972,0.592050,1.766390,4.720928,2.882299,1.135049,4.609573,2.224503,3.336413,2.365258,0.025494,0.255125,2.743513,0.404554,4.199369,4.159535,3.159152,0.149466,2.934294,3.736134,0.285078,0.103799,0.026732,0.010054,1.057215,2.807566,0.074191,1.344950,3.927342,2.047181,4.326106,2.467691,2.629820,2.003493,4.406097,1.393448,1.317689,4.695262,0.711983,0.031736,3.452401,0.580603,2.668013,1.299145,1.631188,3.700292,4.483235,1.134014,4.409334,3.903450,0.505457,3.714773,0.409196,1.029745,4.378268,1.427478,1.490394,1.598246,4.934344,1.572580,1.470580,4.737068,1.119134,4.247497,1.472886,0.880498,0.130905,2.018284,3.222355,0.534553,1.938161,3.326728,4.309102,0.144544,0.287763,3.744607,1.089085,2.535152,0.078641,2.547111,2.859327,4.748442,2.759309,3.830027,3.299299,3.738381,0.076611,0.863640,4.749186,2.176443,1.451102,2.326326,1.538929,0.251020,4.479342,4.296798,3.339682,0.349975,2.366854,1.235140,0.816356,3.784465,0.250094,4.346667,3.729079,1.733169,3.122028,2.215546,3.869077,4.048925,2.810836,1.709694,2.069241,3.213559,0.415361,4.425758,1.275074,4.952371,1.392986,3.008515,2.009369,1.368995,3.443523,3.180014,3.396190,0.808829,2.925994,0.599731,0.912307,2.683497,0.570074,3.259588,2.437381,0.348739,2.499699,1.696420,4.736884,1.629281,1.437108,0.493523,1.208223,0.408299,3.471115,4.080511,3.432581,2.038279,1.622273,1.581066,4.079369,3.905495,4.562795,0.926364,1.806741,4.270054,2.173680,3.329488,2.552769,3.012870,3.889142,2.343155,4.298627,3.465229,1.187332,4.189649,1.612643,0.810537,1.657629,3.859631,3.670005,4.030600,3.283433,1.216945,0.013759,0.267071,3.810712,4.803021,3.301004,1.292381,3.926255,0.088341,1.720476,3.565121,3.505246,4.369085,3.406437,4.840570,0.463322,1.315399,1.517752,3.653433,2.438363,0.950383,4.555325,0.536326,0.648363,4.897115,4.260380,3.355272,4.139533,0.354529,4.707383,2.154945,0.229395,3.701849,2.920457,0.792496,2.160091,4.090734,1.038236,4.327885,2.829471,3.553170,0.180667,3.841180,4.641972,3.034990,1.027769,3.249046,1.610321,4.122828,0.883209,0.733606,1.826384,1.979259,2.397333,4.939945,2.442024,2.073994,1.011280,4.815831,4.288625,1.711003,0.492029,0.449831,3.995482,0.103402,3.643782,3.604422,2.790720,4.925524,1.195324,2.579025,1.891682,1.300030,2.348529,4.808267,0.914939,4.961315,2.781342,2.322191,0.518551,2.135321,3.101841,1.351805,2.659538,3.190972,0.334170,0.571871,1.148902,0.578294,1.176279,1.373517,2.309456,2.883388,0.560198,2.569001,0.844416,4.247824,3.998664,2.325639,0.489166,1.874559,3.567605,3.355071,4.290116,3.200607,4.996293,1.192198,0.083681,3.455330,4.167561,1.462935,4.460136,2.894501,1.999594,0.444095,1.649649,1.603090,4.326459,1.017256,2.705915,1.819084,3.885190,0.373494,2.668545,3.202624,0.955844,4.835956,1.713903,0.964492,4.066571,3.614025,0.046128,2.901006,2.949452,1.728380,2.213582,1.834229,1.991298,0.528055,2.730812,2.903082,0.115996,1.450585,1.888481,2.134421,0.868905,3.246660,0.974566,2.323623,1.672722,0.287752,1.795095,1.170052,4.017635,2.287671,4.138274,4.221118,2.793027,3.208410,4.320541,1.781195,0.991073,4.876884,2.987291,3.267257,3.371913,1.497655,2.271576,4.511410,2.256710,4.513332,1.532495,1.439425,0.906536,1.222737,2.876109,4.305292,1.730799,4.577574,2.247682,0.909063,0.263122,2.986806,0.743225,2.678506,0.194835,4.425799,1.345167,3.447773,3.066661,3.812584,0.077025,0.429018,4.147281,1.379528,0.433411,0.914875,1.909012,0.249150,3.656200,3.322287,4.571797,0.816510,0.900494,2.157605,0.709173,4.032864,1.047737,0.613367,0.635537,1.544807,4.929474,1.481503,2.732281,1.566292,1.660917,2.887970,0.217471,1.448535,2.650342,2.131066,4.533538,1.353676,1.578311,2.546906,2.688132,2.605094,2.811304,4.810259,2.874497,3.760803,4.198000,4.993265,4.402521,2.003185,4.185547,4.015824,1.456354,2.256297,4.327480,0.671520,4.572225,1.125928,2.617240,1.699005,1.413314,3.423372,3.974140,0.550036,2.073888,2.769450,2.905572,1.980941,2.073417,0.476682,1.252857,1.438051,2.155107,3.502189,2.226037,4.109176,1.429609,3.482633,1.631333,4.590868,1.463960,0.296961,4.895850,4.499221,2.008666,4.445031,4.142720,1.155223,0.838128,0.290290,0.941608,1.247457,0.169549,2.213400,4.218362,3.259307,0.395580,4.222041,4.707201,3.568962,0.184875,3.382824,3.026235,4.347658,2.373911,3.488381,1.422594,1.760207,1.248521,2.517499,0.900502,3.655248,4.559846,3.735630,3.855179,1.385416,3.095970,3.360009,3.994243,4.690820,3.371968,2.166586,1.051024,3.626674,0.709623,0.032676,2.934182,2.322220,2.852933,2.789034,2.883965,2.509397,2.991873,0.665861,3.283832,4.950480,1.341745,0.295175,0.230388,4.819623,1.958067,0.742511,2.496462,4.932835,3.436761,4.289712,2.524970,1.981042,3.659073,4.055181,0.884279,4.526573,2.140343,0.470448,1.185287,0.287346,1.896933,0.113169,4.150699,3.650707,1.585733,2.034762,3.981387,3.539982,3.567874,4.620974,1.319642,1.739425,0.638942,2.085246,3.396647,0.495308,4.026770,3.714259,1.034328,3.011615,4.265201,0.025325,0.911058,1.213476,3.365281,3.075599,2.042436,2.155541,3.616127,2.853986,2.294406,0.090708,4.608714,0.792765,0.213122,3.652332,4.078674,2.037735,2.891314,1.435153,4.833338,3.370268,1.098260,1.858688,0.216983,1.947170,4.778346,1.099238,2.774657,4.394049,4.562131,2.430730,3.814521,4.607998,2.187794,4.514185,4.405970,4.643137,4.574773,1.549470,0.239588,4.495795,1.992647,3.132845,1.653838,2.445970,3.850903,4.175092,2.250693,3.239440,4.164212,4.119381,2.661111,4.218306,3.391596,1.885858,3.960113,1.961036,0.336127,4.586360,4.692722,4.888247,3.285049,3.413075,0.432076,3.775538,3.118698,3.560175,0.637360,1.351536,4.493657,4.214899,2.742154,2.995666,2.733311,4.295205,3.030765,0.719508,0.248674,1.025555,2.217933,4.462979,4.458527,2.826777,2.670193,4.270150,2.505636,0.813507,2.813037,2.173799,1.676321,3.377255,0.027246,1.909999,1.233367,1.500380,3.796204,0.509876,0.169951,3.118185,1.832932,3.251991,1.837288,0.447642,3.831609,2.446193,0.943288,3.374976,3.244397,1.972702,4.742076,2.503453,3.539023,2.202543,4.939701,3.338717,1.943117,0.122491,2.985707,0.085255,0.972181,2.438773,4.200219,1.837450,2.533283,1.766579,3.065723,2.167600,1.637865,2.154420,3.668105,2.244985,3.779846,0.486132,4.923054,0.901621,1.035524,1.622028,1.008920,2.091188,2.568670,4.130019,2.215687,0.749272,2.310211,1.340762,0.373614,1.013402,0.598885,3.449531,4.125163,3.865587,4.090703,2.570784,2.239538,3.568260,0.119642,4.192118,3.441913,0.081635,1.830456,4.569020,3.262255,1.909571,4.532116,3.130162,2.715647,1.790827,0.731971,0.498838,2.033056,1.172796,0.573196,2.140684,3.603700,3.336962,3.330831,0.673033,1.793033,1.253042,4.121297,2.748855,1.055469,0.511281,4.627208,1.855050,1.321136,4.734559,4.704976,3.390190,0.594345,1.131427,1.498435,0.774591,4.893780,4.273298,3.630845,3.342256,1.303489,3.416786,2.253408,4.351715,0.808075,4.909929,1.551439,1.986945,4.848684,2.912441,1.710312,2.549100,4.255965,0.654721,1.765361,0.672730,1.856953,1.468338,0.697377,3.708731,4.243886,0.635879,2.412448,4.430601,3.717018,0.012423,1.664588,1.347687,2.125509,2.632951,2.345877,3.224439,3.221669,2.116146,4.235773,1.755861,3.472284,2.224202,0.487891,1.180111,1.764692,2.242429,4.172807,1.239522,1.652677,3.512826,0.488251,3.490442,3.485577,2.941277,0.079592,4.493241,3.400445,2.940065,2.062906,2.082595,2.892641,3.549270,2.780369,0.828864,2.653854,3.643068,1.645251,4.420537,2.570031,0.028502,2.514987,4.003456,3.723304,0.507140,4.207422,4.591327,1.568285,1.754197,0.830857,2.269726,2.437851,0.457265,2.184758,4.023876,2.719213,4.403074,0.644687,4.382923,0.024356,1.325774,1.324273,0.425126,3.936177,4.345578,2.397426,2.510675,4.425045,2.452942,0.958886,3.579071,2.866142,3.152023,2.271220,4.385520,0.686504,2.234328,3.325769,2.809739,1.707513,0.496823,3.170175,4.885527,4.094547,2.693311,4.880930,4.807472,4.694504,1.216143,2.825740,1.926648,2.008048,4.260904,0.090528,4.535702,0.723778,0.525062,4.942541,2.368573,2.612969,0.477119,3.285554,0.722863,1.930761,0.670234,3.653136,4.782958,4.523546,3.323971,1.373274,2.587153,1.611300,3.119494,4.461676,3.758661,0.746945,0.218350,2.504639,2.897663,4.046190,2.526505,4.642784,1.643710,1.035260,2.406911,2.188020,3.716556,1.461561,0.779454,3.171803,2.724728,0.056222,2.262737,1.846880,0.274876,2.838697,4.537632,1.959049,4.088333,2.213703,0.724777,4.416135,0.927570,1.071030,1.724809,0.333157,0.335809,3.780254,0.914528,3.762223,4.575966,1.075051,4.112368,4.530585,2.533366,4.692447,0.141577,3.145661,2.470127,3.344988,1.752377,3.503513,4.516568,1.848661,4.769941,4.829610,2.522133,0.033365,3.466270,3.507676,2.048977,0.100190,1.509763,3.626040,3.286474,2.567216,3.926385,2.709499,4.516254,3.475032,1.198932,4.520447,3.043247,4.609877,3.824622,2.840644,3.834582,3.736676,2.254918,3.880564,4.338008,3.239011,4.830185,4.920351,4.742551,4.304553,2.512461,3.923382,0.493254,0.702230,2.239594,4.902884,0.773547,4.659346,3.744706,0.578708,4.004783,3.440825,3.804241,2.177224,2.034256,2.085298,3.060534,0.552049,1.034342,0.802239,1.041280,4.665276,0.280961,4.600847,4.740690,3.265588,4.933232,3.358367,1.346865,0.909622,4.481409,1.833964,3.640321,1.277463,3.029116,0.743346,2.122835,4.976154,4.840637,1.381596,0.956449,3.575717,2.306911,0.753953,2.030962,0.132385,0.754378,3.903033,2.474147,3.901510,0.386278,0.036438,3.820011,2.116801,4.848520,1.652665,1.603910,4.044913,0.941036,2.942967,1.394645,0.185904,4.531021,1.847066,3.950320,4.112097,3.407258,3.132199,0.918145,2.028080,2.560212,4.446482,2.605351,2.425984,1.918555,4.324071,4.668191,0.571881,1.918962,4.773899,2.116783,1.235174,4.023270,2.061694,3.808532,2.982800,1.626953,0.948374,0.694019,0.518475,3.094153,1.517692,3.699402,0.754632,0.011082,1.620931,4.253622,2.812066,1.091318,0.681235,0.037221,2.486630,0.262462,1.018117,2.775014,0.222313,1.149230,0.067871,2.666914,0.632850,0.297879,1.842415,3.579783,4.308580,3.851151,0.914410,3.654383,1.717222,0.952685,3.152037,1.498354,0.013444,4.132017,0.991475,1.213338,2.108917,3.464113,1.788427,4.983510,3.124252,0.561380,2.092555,3.052061,4.881507,3.647986,3.741380,2.625646,4.653045,0.309974,2.731658,1.086176,0.363848,4.605515,4.567030,2.286392,2.396960,0.719365,1.590157,2.598823,0.037579,2.553715,2.670885,3.637934,0.991816,3.850977,4.973209,0.566171,4.273463,1.095757,1.464060,2.260997,1.081813,4.200873,3.351706,1.966783,2.869157,2.986022,3.699633,4.460044,4.002962,3.901538,4.650078,1.584803,3.429584,2.968179,1.514993,0.811087,2.949043,2.486487,4.627123,2.545763,2.772187,3.365280,2.007635,1.981044,2.430286,4.225065,4.967855,0.226975,1.777893,2.732813,1.104626,4.510600,3.631885,2.831612,1.998963,2.349681,2.175871,3.549843,0.128402,1.913683,2.924938,1.201374,4.277918,3.166275,2.294059,4.798165,4.338379,3.071841,3.197476,0.128914,4.870055,2.381656,3.548019,0.713017,0.007137,4.013458,3.063416,3.203565,3.707904,2.946931,4.607309,0.551775,0.396458,2.536999,0.127857,2.225024,2.620203,4.198579,2.903040,4.853422,0.220234,2.117826,1.001447,0.914513,0.697611,2.678986,4.727212,0.808354,3.878857,1.362108,3.703441,0.747486,0.524881,0.176150,1.552621,0.508641,1.862256,0.992190,4.056530,3.432454,3.394304,0.100198,2.555917,0.214455,3.672969,0.130458,2.386215,2.364627,1.958054,2.842933,2.700793,0.969907,0.567586,0.467327,1.820871,3.835721,2.353149,2.778831,3.657794,2.630787,0.428372,3.824940,1.828644,3.324625,2.681324,3.068645,2.070235,2.099706,4.452013,0.665702,1.763249,3.800974,4.175616,3.256418,1.664125,4.565516,3.787736,3.546885,2.955907,2.369607,3.956548,2.394594,2.935915,2.280084,1.628724,2.584637,0.924622,4.108530,4.493237,1.532629,2.852976,0.598253,3.766677,4.860936,4.895907,4.688080,4.004414,2.714550,2.471315,2.482200,0.068836,3.458774,3.505730,0.311021,4.333176,0.541358,4.047731,3.810803,1.050008,0.030593,3.100687,0.186052,1.906295,3.248415,0.252351,1.650605,4.465660,4.096941,2.307382,0.609626,2.843339,1.596184,3.396535,2.520645,2.222803,3.459614,2.082758,3.260881,1.185014,1.421908,0.359974,4.118097,2.495476,3.863512,4.497955,4.888757,2.380623,3.804481,3.056288,4.050258,4.686236,2.596353,1.796252,0.325610,4.825671,2.040552,2.256538,3.915993,4.628304,3.866347,0.613987,4.616010,3.838566,2.932279,2.551214,2.136717,4.929145,3.773994,4.909237,4.087434,2.786210,2.158366,3.848914,3.495484,4.525628,1.835660,3.924409,3.163739,0.088434,1.401119,3.603626,3.264159,3.695709,1.964416,3.392588,4.366022,3.532979,4.455187,0.549960,4.537404,2.324520,0.089872,4.862351,1.597916,0.460177,1.842134,3.160943,2.688743,3.085716,2.828402,2.484270,1.153742,3.790023,1.401572,3.493528,1.422211,0.713933,4.691168,2.611002,3.943648,0.679878,3.851917,3.419943,4.463469,0.493524,3.106227,4.397543,4.892705,0.407621,3.226488,2.172599,3.344946,3.806181,4.338089,3.800371,3.869952,0.353430,4.679078,1.989340,1.880334,3.559299,1.110582,0.581773,1.068421,1.146504,2.410150,4.213395,2.425500,2.161047,1.977638,2.364129,4.341697,0.008861,1.225154,4.203311,2.325434,3.731603,3.357133,3.289845,2.314241,4.943682,1.616558,3.253310,0.896072,0.898850,4.370500,3.968137,4.859377,1.355204,2.697523,1.536290,4.919711,1.897667,1.084161,3.736676,0.796488,2.427792,4.134247,2.859979,4.305162,2.507010,0.425467,4.306063,1.670957,3.493904,3.360485,2.652735,4.356825,4.392504,3.605208,2.214645,0.328387,2.398670,2.906129,0.731971,2.364968,1.995611,0.428658,1.936230,4.794606,1.902300,0.772966,4.555070,0.363089,3.518846,1.825066,1.442110,4.652114,1.532344,0.752384,3.281822,0.330661,0.685544,2.221184,2.034028,3.305971,4.969080,2.581099,1.046025,1.883171,0.700630,1.562272,4.916640,3.534734,3.016693,3.531973,4.115805,0.438811,4.478663,4.629033,2.849236,1.463598,0.223267,2.953562,2.651902,1.781115,0.275351,1.326686,0.883104,1.396888,2.923237,0.110881,3.113296,1.712135,0.547844,1.964338,4.020101,4.975034,3.236498,4.860408,2.304149,2.241166,1.237054,2.207213,4.654211,0.922849,1.719568,2.103501,3.103997,0.590015,2.419235,3.484351,1.356803,2.126125,0.468922,2.534177,0.287096,1.650219,0.949994,1.330519,3.053143,4.938878,1.733934,3.324901,0.274568,2.327858,0.578140,4.772271,3.675938,1.888083,1.563167,3.380770,0.820402,4.263028,3.517265,4.734006,0.397107,3.437242,2.411991,1.724115,3.063671,0.997086,0.795087,4.478795,3.699947,0.893952,4.728321,0.206432,0.643761,4.618374,0.045850,3.598204,3.170563,3.729538,0.292462,1.167402,2.675827,3.578390,3.895924,3.572271,3.873198,0.866885,2.917560,2.897806,3.341259,3.640560,0.449879,0.386836,1.418897,1.795346,0.372422,1.759702,4.213229,0.726857,4.737448,1.600467,2.682627,0.591142,0.117945,3.820255,4.579252,1.956604,0.177116,2.936641,4.125917,1.748099,2.641967,1.760624,4.472311,3.035048,0.933324,2.400747,4.416606,3.485407,3.743265,0.426321,4.857496,3.655882,4.293118,3.794080,3.628357,2.896140,1.122937,0.440953,3.263861,1.057434,1.534586,2.100208,1.242401,3.881474,0.455034,2.910501,1.688590,3.611306,2.356790,1.108627,1.473744,0.315306,0.040723,1.142380,0.317560,1.766916,3.199005,3.437301,2.780185,2.476884,1.547991,1.710399,4.156213,3.243594,3.588693,0.018571,4.643296,1.472781,1.315732,3.990113,2.889129,4.112546,1.733104,3.913752,0.320663,0.007202,3.568679,1.528620,2.268861,4.005928,4.994513,2.636230,0.328246,4.951606,3.912231,0.168701,0.554707,4.761035,4.471042,3.656000,0.020207,2.231033,4.051089,2.846993,0.806582,3.416241,2.028915,0.368739,0.907258,3.199531,4.776359,2.839809,0.557025,0.204066,0.761196,4.302946,4.524620,3.627535,3.090649,0.402394,1.293269,1.103246,0.751720,0.097718,2.549033,4.833391,4.144256,4.036753,3.616979,2.136252,0.524600,1.314716,3.299363,3.362585,4.661696,1.617053,2.572422,1.906427,1.393373,2.915557,3.138146,3.821937,0.788682,1.033249,4.032718,3.478786,3.684127,1.994115,2.262197,1.937909,0.538885,0.946194,2.949864,2.009026,3.112667,4.154024,0.417573,3.994436,2.665341,4.915512,3.256115,3.027801,0.334716,4.751575,4.476172,4.183389,4.242530,2.652035,1.435660,0.664609,3.975606,4.842157,3.400878,3.710718,3.702818,1.681511,4.681438,1.753543,1.206498,2.510873,0.661840,1.681221,1.904377,2.075648,1.007661,4.940096,1.626844,3.885981,2.580279,0.028504,1.579832,1.859529,2.917862,3.715141,3.596886,4.265525,3.799288,2.636325,4.956175,4.016399,1.660693,2.005457,3.165355,2.940898,4.914467,3.107458,0.034986,4.932360,2.633231,3.873987,0.022155,0.877349,3.094620,1.131050,0.279091,3.783737,3.725806,1.495763,0.927973,0.105310,0.275527,1.333604,3.488334,1.810718,3.026005,2.155357,4.448565,1.926086,4.670220,3.374948,4.083779,3.282239,0.202131,1.102623,4.770122,3.318836,4.420490,0.517966,4.462439,4.935837,2.757720,0.155183,3.717804,3.871430,2.872149,4.031822,2.761803,0.436493,4.604845,2.630580,4.536762,4.300921,0.739591,2.054850,1.553914,0.169041,2.528031,0.614381,1.418279,1.117257,0.311867,3.637430,4.682927,3.723771,4.068481,0.111293,2.708275,2.144102,2.319989,3.888259,2.428921,4.394468,2.479784,4.908585,3.665998,3.631514,3.803528,0.262311,2.845737,3.693270,3.884104,2.265293,4.441523,4.540613,3.637287,4.281249,2.176166,0.607800,2.280137,1.347488,2.239625,1.722603,1.655860,2.793846,0.895625,2.094959,1.306523,4.997812,2.075889,2.254332,0.334997,0.314216,2.587341,4.678187,3.630057,4.847619,3.092612,2.763322,1.084985,0.172448,1.675248,1.014131,4.798475,0.183160,0.214752,4.409705,0.569513,3.504380,3.405266,1.791899,3.686167,1.775290,3.153387,4.318531,1.534650,0.264741,0.860521,0.122464,2.568282,4.678810,4.530437,0.492285,1.178113,3.155244,1.719982,1.576082,1.641037,0.024683,0.510842,1.200471,3.260262,4.709013,3.574195,3.967267,1.171628,0.675058,1.918410,0.596142,0.769413,1.597708,4.093117,3.897330,1.798034,3.641245,4.210613,3.517776,1.400210,3.993739,2.626201,3.024879,0.339053,2.375300,3.357223,4.146336,3.127679,2.889080,3.622922,2.937344,2.130868,1.690626,0.592099,3.808429,2.617765,4.584679,3.909220,4.336071,0.222617,0.634641,2.303662,0.700793,3.333010,0.744013,0.756174,1.927854,1.795238,2.594924,1.763847,0.958329,4.190568,0.318054,2.847708,1.971071,4.114896,3.513031,0.066433,1.496334,2.210105,4.219153,0.794193,0.576084,2.131993,2.155982,3.500446,2.788014,0.437372,1.452961,2.837935,1.080691,1.084841,3.742688,3.705303,4.141211,1.269067,3.575490,3.114384,0.683333,3.071138,3.575507,2.646789,4.607615,0.250732,1.789572,0.782427,1.290454,2.284260,4.858476,2.911933,3.037576,4.164944,4.997658,2.449126,0.623138,2.763086,0.262347,3.269189,0.319467,1.816444,0.043536,0.205204,0.882036,4.712523,1.771008,2.914126,2.062936,1.322052,0.793939,3.784173,3.548845,0.903426,0.591502,1.321867,3.032301,1.503465,0.625140,4.313211,4.263093,4.637923,2.014909,1.971293,4.068523,3.851863,4.347947,0.706502,3.638027,1.907155,2.564470,0.193725,2.841734,3.348061,0.238980,4.187418,1.795812,3.285777,0.076448,1.137436,3.447620,1.118884,2.147667,2.186669,4.635733,0.964330,4.414259,3.893472,3.115082,4.152013,3.338640,4.017951,3.380205,3.881507,2.113474,4.222963,1.656552,4.482535,4.114388,2.166686,2.174438,1.974521,4.655310,1.823859,0.042233,3.477222,1.473089,2.750323,1.746280,3.968330,2.690176,4.526269,0.700775,3.187678,4.331401,2.849723,1.538416,0.860139,2.959518,4.969814,0.238559,1.137307,1.627202,0.545363,3.897732,1.051222,2.291883,3.979997,3.050548,0.390961,2.618906,0.754339,1.179345,0.079985,2.573736,4.703279,4.797285,3.955951,2.070329,2.222308,1.652152,1.801996,2.236049,3.859903,1.433541,4.570186,0.456829,4.900417,0.573796,3.417600,4.387168,2.349847,1.833379,4.593000,3.863928,0.187574,1.042897,4.243884,2.953089,2.433848,2.435707,1.319725,4.426216,0.630892,1.068015,2.278350,2.527574,3.434029,2.484626,1.656548,2.459842,4.474276,4.847095,1.530558,3.104489,1.032346,4.666241,1.433007,0.682511,2.096157,1.362907,4.860008,4.308972,3.985412,2.843717,1.086528,4.672879,3.709474,2.678869,0.202228,0.863910,0.529309,3.665330,2.565124,1.216823,2.619446,0.039159,0.685109,1.655926,3.748519,4.297448,1.760587,4.984210,2.387462,3.825350,3.780145,1.249239,4.576652,1.873095,2.413784,2.624733,3.387688,1.409196,2.448003,1.791237,2.079469,1.237618,0.966836,2.780760,2.498659,3.820226,1.056261,2.571000,3.592894,1.831618,3.188617,0.846930,3.788016,0.526154,1.018148,0.101683,2.137053,4.333953,4.429116,4.067081,4.238034,0.729049,4.522177,0.145224,1.536683,2.175071,0.043506,3.817091,4.497281,1.413925,1.124750,4.189352,1.611152,0.585500,4.389093,2.927537,0.176313,2.866081,4.572168,2.196540,0.311156,1.547894,1.906346,0.927836,1.770747,3.398121,4.814085,3.838699,4.407596,3.577905,0.258150,4.852219,3.724010,2.270959,1.985047,4.482344,0.227348,0.542386,1.118670,4.906020,3.149569,3.179284,1.109892,0.254257,0.759830,4.809787,0.213507,1.314616,4.934408,0.320328,1.681108,2.589446,2.755328,4.507469,4.947706,2.249111,0.307870,1.918760,1.212788,0.375933,3.312283,2.209567,4.909924,2.833858,3.318792,3.428204,1.334536,3.306478,2.694178,2.308969,2.898857,4.216944,0.626151,1.172427,0.384504,0.524011,2.096185,0.828726,0.696138,0.654617,0.568019,0.969326,0.085933,0.254493,2.729300,4.464604,0.382336,2.074150,1.713108,4.891933,3.323803,2.105794,0.402069,2.996168,3.331102,2.514516,1.631629,0.966405,3.380562,3.320813,2.856291,0.046856,2.720479,0.922061,0.597843,0.294127,4.629014,3.081295,0.210418,2.184339,4.346411,2.888278,1.230245,1.721107,0.878659,1.660652,3.733115,1.591773,2.578248,0.365704,2.809280,1.622652,3.637450,3.091121,1.763266,4.756493,4.381571,1.385639,3.327934,0.200256,3.130980,4.952459,0.360180,2.782955,1.925595,4.113656,0.538906,4.807299,3.610989,1.425609,1.227387,4.201278,2.401600,0.278772,3.925797,3.131909,2.465497,4.167689,0.371807,2.518688,1.480151,2.558775,2.806207,3.597615,2.144631,4.504685,3.950496,0.040420,0.550858,3.569518,1.483634,0.724059,2.814185,2.969454,4.431863,0.661521,1.999340,2.517675,2.437390,3.094454,1.947350,1.162113,2.751228,2.031862,3.233262,2.920561,0.236032,3.906746,3.169763,3.616467,2.776372,0.287930,1.422165,4.450774,3.118894,4.942346,0.263191,0.410285,0.783465,3.227481,0.216553,3.214083,1.352066,2.690707,4.228741,3.559141,3.918622,0.860410,2.293402,3.191065,2.751095,2.050585,0.630083,2.411147,1.658529,2.731925,2.006788,4.429166,4.977480,0.653677,1.590125,0.725648,2.276715,3.861261,3.065634,0.937129,1.613499,0.611665,1.433736,1.174117,3.013528,3.200516,4.837240,2.220873,1.016463,2.002688,0.885613,3.088865,1.779000,1.642951,4.388189,2.901209,0.121296,1.833557,0.597065,2.264601,0.532531,4.999278,4.791303,1.673872,0.492887,1.202614,4.271773,0.905182,3.001521,2.887947,4.490038,4.733222,3.451546,2.604440,3.173372,4.611818,0.626518,2.343188,1.920533,3.318936,2.644677,0.824896,1.533439,4.572899,1.243567,2.912326,3.084081,4.555005,3.641630,4.310914,3.616435,0.525916,0.128502,3.582277,1.322716,4.138581,2.848955,4.976784,0.808438,3.659358,1.622829,0.837337,2.324130,4.095908,4.969708,0.869265,0.679243,0.683809,3.955527,4.603273,4.067217,4.034101,2.955960,2.865902,2.733988,0.713532,0.657749,1.891241,0.523340,0.415643,0.294277,1.954702,3.778754,3.631744,1.413739,0.311243,3.789266,0.519445,1.599815,2.018207,2.398838,0.212353,3.348151,0.900761,1.422618,1.959418,0.195729,2.314473,2.814973,2.548998,3.320134,1.005132,3.843897,4.094334,0.426563,3.234750,0.470999,3.482969,0.751081,1.266116,3.189049,0.658271,2.149999,0.028549,3.012501,4.305556,1.427791,3.879975,2.426044,0.144276,0.671939,3.128448,3.936055,3.906524,4.291454,4.823975,2.210105,4.798614,0.133667,1.300039,2.111471,3.481660,1.473704,4.838905,4.098591,2.407513,3.961391,3.645874,4.960164,2.985158,0.131392,0.949690,3.371079,2.111625,0.594758,1.997478,2.309485,0.942660,1.372869,0.259014,2.877217,2.915842,1.302904,0.153966,3.666962,0.550721,1.466236,1.939972,1.691397,0.063084,1.459615,3.686992,0.708997,4.890635,4.648678,0.643423,3.392809,1.763535,1.122857,2.739121,3.778651,2.472626,0.601145,2.111282,3.251241,0.547322,1.844162,2.230094,2.524307,4.623786,3.863634,1.403040,3.104114,3.365795,3.493680,1.325446,3.444355,3.118807,2.254857,0.531139,0.313455,2.657263,0.756706,3.772634,2.882197,0.564207,4.417247,3.811251,0.129660,3.256778,4.026124,3.005795,3.411480,0.618287,0.343808,1.620786,3.028956,4.141649,0.433977,4.554936,0.413259,4.206473,4.627804,1.287580,1.336233,1.069757,3.911700,0.042711,0.572733,2.005554,2.679718,1.348846,3.143944,1.376684,1.107517,4.021255,4.722230,3.549459,3.135103,1.448067,4.135568,0.138265,2.252974,3.856901,1.725928,1.683837,1.011381,4.581572,1.544133,4.009997,4.212140,2.796159,2.857010,4.699417,2.747513,4.140423,0.712530,0.018324,4.497476,1.507814,3.163062,2.538595,2.929259,0.094971,2.852819,3.904040,2.934968,2.170551,2.886694,3.451632,1.380651,0.256497,2.080016,4.908245,4.158923,0.842872,2.530066,0.912830,3.744016,0.994517,3.153355,3.521223,3.656795,3.859876,4.546857,0.218534,0.218774,1.732185,3.283721,0.611000,3.094934,3.554632,3.494689,3.560579,1.176014,1.885678,1.580688,3.752135,1.299228,3.567480,3.273840,4.176115,3.418513,1.347606,0.012922,3.127074,1.874598,2.866795,4.534932,3.480658,4.968599,3.179619,3.111868,3.129108,3.506504,3.849522,4.658017,4.472213,4.693558,1.179912,3.490710,4.042155,3.466316,4.025375,3.362146,3.572945,4.061051,1.627636,4.232240,0.878268,2.138144,1.784828,4.545163,3.543320,4.710022,3.900966,3.341552,1.180604,2.741250,4.133963,2.639842,1.892866,0.216843,2.503544,3.857604,2.302248,3.427630,1.891864,4.847027,4.964362,3.000131,2.654899,4.465309,1.371442,0.050820,2.851724,2.581442,4.388647,0.927836,4.554315,0.517450,2.274341,3.133748,2.753925,0.324643,1.098908,0.081268,1.611250,4.124833,1.138179,2.657561,0.147866,0.285281,2.982413,3.193453,3.801853,2.911762,3.001671,4.922024,2.296180,0.175465,4.028840,0.307401,1.158422,0.428886,3.968180,0.314641,2.650322,4.588076,1.975833,0.905234,2.890545,1.321927,4.471709,1.391594,4.167694,1.113397,2.902056,4.378059,3.332708,1.317733,3.034662,2.359326,1.895803,4.226475,4.329097,4.298664,4.785536,3.931115,4.828719,2.718890,0.246032,1.756074,0.696121,4.865177,2.374857,4.502463,1.989154,2.372901,3.196574,2.883826,4.101575,1.844513,2.368577,0.500997,3.399970,2.152965,4.145220,1.078191,3.548833,0.100272,1.869607,2.914845,2.987508,1.552401,3.604573,3.882633,4.161809,4.609716,2.433791,3.386165,3.088940,1.023778,4.076494,3.432280,4.202026,3.633651,4.741774,4.989893,1.944843,0.627305,0.773148,4.157128,3.979632,0.422620,4.600657,3.826925,0.033832,0.247191,3.746768,0.710050,4.833171,1.614030,2.137890,3.207081,1.400302,3.554005,3.570830,2.183686,0.303121,0.395974,3.345134,0.384506,0.851250,3.517296,1.806438,3.613615,4.367961,1.699767,4.171537,2.041871,1.382453,2.723415,0.479153,1.089981,0.938562,3.864371,4.068894,0.288461,4.099135,0.740282,3.643173,0.802952,3.585776,3.814141,0.285665,0.604540,3.702172,1.505750,3.973699,0.117073,2.205234,4.235098,2.389183,4.883928,0.378660,1.529255,3.070819,2.508817,1.098044,4.254278,3.922280,2.166753,1.837333,4.988637,2.886486,0.526591,4.867709,0.090323,2.527332,3.941581,4.850285,0.400443,4.248085,0.119407,0.473258,2.633249,3.810832,0.067143,0.344381,1.979768,4.191250,1.819814,4.518043,0.519199,4.797684,4.801820,1.741635,1.325726,2.351775,2.693018,1.902512,0.268144,3.408705,1.201945,3.488067,3.805107,2.815149,3.652988,4.691985,4.630804,2.050658,4.170675,2.730172,1.100640,2.761737,2.590902,2.504409,2.474341,1.101983,0.258464,4.879970,3.587057,1.615234,0.070845,1.210326,4.601823,0.056644,0.927079,4.340221,3.917028,1.576162,1.964237,4.087340,3.862077,1.283171,0.088597,0.909454,1.940020,0.758824,0.237641,0.527172,2.562591,4.077117,2.051984,1.331482,2.846048,4.246115,3.949206,2.294459,3.004489,0.594763,4.130319,1.554631,0.171414,2.573389,0.447860,0.322459,3.554536,0.366707,2.301423,4.163423,2.168416,3.517144,1.310151,0.895102,2.590433,1.687509,0.120114,4.057349,1.269079,4.553997,2.992680,3.423613,1.067721,3.614890,0.918948,1.735575,2.066735,2.395699,4.037403,4.935260,3.961331,4.710426,3.799017,0.234395,2.224135,2.543326,0.180783,1.418010,2.175977,0.305734,1.387591,1.444271,4.281154,2.383542,0.885050,1.582743,0.714947,0.226195,1.489424,3.216699,3.241537,1.259416,1.339143,3.587177,1.190557,1.409643,0.364703,3.116795,0.517675,4.196394,1.787347,4.839211,2.386509,3.945027,4.448233,0.640645,2.548084,2.400929,1.123903,0.905267,2.502206,0.976344,2.634612,0.521644,0.027659,2.412473,0.049259,4.115762,3.627097,1.047192,1.383311,0.511024,3.940963,1.241980,2.135210,3.004829,4.028887,2.446521,3.646608,4.571267,2.331244,4.997178,1.065689,1.647620,4.248970,2.144745,1.221176,1.190819,2.531402,3.277099,0.241012,4.947139,0.514521,1.462075,4.551965,0.847525,0.112407,4.287550,2.641153,4.863670,1.428609,2.716020,0.170931,0.223992,2.218550,0.508430,3.268010,3.754850,2.820536,3.966585,4.950560,1.564901,0.952383,1.688654,2.110536,1.260251,3.586398,4.347820,3.067162,3.698635,2.261091,1.128850,2.495129,4.883878,1.448492,3.532450,0.616375,0.014849,4.698972,0.843485,2.430876,1.190972,1.974943,2.127116,2.187543,0.344493,3.787859,4.146249,4.479812,2.487381,0.019948,0.422354,2.245112,4.650657,4.574235,2.819393,0.332657,2.140455,0.003874,4.437187,1.016682,4.404489,0.524055,4.762677,3.474544,1.717780,3.944489,4.153693,3.510964,3.014159,4.989097,3.019040,1.542933,2.492435,0.396626,2.655670,0.451047,3.760135,1.115414,1.517763,3.633031,4.758024,3.143354,2.966588,4.247063,4.344709,2.572100,2.865798,2.817865,2.037660,3.635623,1.021691,2.439317,0.109629,3.985279,1.496735,2.743757,4.783843,0.219653,0.456818,4.252731,3.029279,2.197225,0.872060,4.585059,4.499574,0.950452,2.219555,4.516813,0.541612,3.409358,4.113904,0.453425,2.034505,1.875566,2.932476,1.021187,2.405597,2.993053,4.937439,1.145629,1.489493,1.103985,3.540693,3.329872,3.853770,1.498460,3.277361,2.319957,3.668596,4.349790,4.207037,1.835446,1.899846,1.597288,1.007942,0.342113,3.523321,4.216234,3.984738,1.572230,0.318087,4.742114,4.231365,3.858634,3.654796,3.964945,2.779939,2.320901,2.962225,3.108922,0.629115,4.459206,0.161454,3.544194,3.341523,0.691162,3.385847,0.962440,4.005133,4.548107,4.889561,4.821360,3.155437,4.537661,4.969985,2.420468,2.306516,2.968195,3.266499,1.548200,3.154455,4.211807,0.415514,0.723135,0.417116,2.648601,1.811240,2.951907,2.447483,0.516615,2.891537,3.730753,4.121656,3.186013,4.464427,1.986661,3.400860,3.387669,2.885309,2.317805,2.379202,2.665048,2.525980,4.828984,1.131169,0.905707,1.705824,4.880251,2.680281,3.585808,3.230623,0.660779,3.958111,2.205309,2.925007,2.470238,0.878949,1.551659,0.607544,2.635823,4.016515,3.741066,2.435594,0.562405,0.773320,3.187570,2.696462,4.768090,2.164871,2.548713,0.820657,0.621423,2.695121,0.724304,3.143240,3.115245,1.369914,0.379652,4.621414,4.573547,0.304726,0.661484,4.149873,3.989795,2.838238,0.378640,4.275115,1.181865,4.254552,2.076037,4.245440,0.209742,1.639784,2.436454,4.533921,0.834958,0.685098,1.035687,0.446359,1.156435,0.788432,3.840961,2.448404,3.486687,1.387469,3.591247,3.829015,1.426541,4.551955,3.137667,0.727873,3.091514,0.425090,4.927934,3.652256,0.606068,4.907426,1.090908,2.238095,2.803060,1.938719,0.670796,3.278292,0.752700,2.410731,4.821502,2.555380,0.478177,4.178351,1.088074,3.954117,3.134750,4.608150,2.883716,2.432046,3.233400,4.220803,1.506749,1.838621,1.072788,2.946861,4.781144,2.098095,2.428416,4.364411,2.441707,2.964024,3.870813,2.905463,2.506896,0.103598,0.567247,3.433558,3.422474,2.517079,2.937070,0.650992,4.302299,4.504502,1.705994,2.233947,0.757251,4.680828,2.396434,3.282684,2.054648,2.609166,1.820456,2.583720,1.978341,3.654274,3.636440,4.114327,2.988946,0.160651,1.604077,1.541460,4.889390,0.725224,3.872753,4.341526,2.043311,4.735958,2.535761,1.572756,1.131901,2.573119,4.195759,3.708507,4.941266,3.044115,1.666242,2.239677,3.554936,3.853981,2.494318,3.053046,3.109985,1.744472,4.692142,0.317461,1.930836,0.445366,0.746436,4.933182,1.855904,1.034238,3.523443,1.605286,0.798620,2.580709,0.784173,3.470085,3.962055,1.718333,0.539003,1.546064,1.845363,4.319253,3.907799,1.905772,1.506882,4.441369,3.080360,0.027007,4.982035,3.508600,1.141583,2.606736,2.029108,1.716996,4.448181,3.226077,0.811936,3.753019,3.117960,1.747042,4.293477,3.933541,2.193985,0.353358,2.909628,0.759107,0.650127,1.624449,4.016657,2.549610,3.849328,2.631350,1.823138,3.083016,1.208151,2.284279,0.476244,2.570534,1.901086,0.511383,0.265273,2.978950,2.508472,1.575146,2.707973,1.398605,2.418788,0.998099,3.896904,1.735509,3.646326,0.917284,2.620945,1.016390,1.301921,1.712974,3.979297,3.481603,0.243513,3.870984,2.134046,4.146902,0.254418,2.165113,0.013962,0.017941,2.578411,2.839334,2.852612,0.150718,4.031273,2.483305,3.199824,4.449509,0.961059,1.481907,3.096791,2.468884,2.615524,2.021050,2.901511,1.119474,3.559588,4.793960,4.007392,0.775394,3.745039,4.627614,0.568464,0.925859,4.581639,3.304121,2.858430,0.477923,1.363815,1.848069,1.057361,3.236371,2.378365,2.908532,0.340105,3.445815,2.025046,2.154646,4.421534,3.612860,0.005496,3.983059,3.398039,3.734986,3.324521,2.265482,1.945521,2.929103,2.032420,2.669038,1.013698,3.368914,1.031645,3.878062,4.112166,3.717950,2.511650,1.475830,1.959344,0.447453,3.861245,2.848327,4.337593,3.600986,4.372122,0.306783,3.876602,1.847562,2.018978,2.353243,4.931649,3.910227,2.898584,2.291914,2.700917,2.470490,0.473582,3.530792,2.681486,4.382879,4.477978,3.329723,4.828518,3.850746,4.505136,3.469519,0.723594,0.461513,2.300158,2.097894,1.513617,0.749863,4.813024,1.158205,2.490085,4.096886,4.198489,2.585094,2.530948,0.714551,3.974524,0.394514,1.982028,3.052251,4.829756,3.283313,2.439840,1.502840,0.898548,0.047482,4.298909,1.561158,4.551189,2.669544,0.460149,4.075212,1.221685,4.885651,1.056209,3.882940,4.063461,0.814917,2.745993,0.278479,4.718973,0.812009,3.955459,3.068166,1.316788,2.341942,2.961116,2.311108,2.198218,0.498291,1.987584,2.604523,0.794739,2.278690,1.084858,3.711238,2.547435,4.505157,3.502668,2.832791,2.225097,0.355609,2.261891,3.248659,0.848843,1.517045,1.130086,2.306223,4.519036,2.763645,2.042228,2.080173,3.677166,0.463304,1.057850,1.360067,0.755431,1.874303,0.766062,3.961561,3.567416,1.916482,0.482797,0.252136,1.111190,3.923207,2.126187,4.805021,0.526376,2.160764,2.126249,3.631511,2.973657,4.337061,3.982810,2.000048,3.598956,3.603793,3.997081,3.681742,1.404374,0.154755,2.310704,4.322896,1.281175,2.430015,1.797682,3.699040,2.740156,2.030469,3.008158,1.074446,1.690696,0.808729,4.092886,2.582704,0.911759,2.335043,3.868545,3.210328,1.304474,0.774059,2.146925,1.966516,1.849342,3.980567,1.796868,1.303261,4.884052,2.288756,4.194905,3.096128,2.529074,2.557192,0.193199,1.683380,2.834551,0.437209,1.557067,4.393458,4.066471,4.304563,1.370107,4.125874,0.964634,1.957250,1.689852,4.773638,2.825180,2.925664,1.536610,0.163977,3.432101,3.833192,0.327305,0.541193,2.684231,4.794592,3.521749,2.872459,2.073862,4.472405,3.770317,4.783021,1.259874,0.195413,0.132720,2.580994,2.044802,2.261264,1.401976,4.130546,3.114393,4.124821,4.263518,1.215322,2.912916,0.239196,0.474205,1.268128,0.782634,4.809864,2.298122,2.989276,1.046470,1.607862,0.356241,2.592570,3.212365,2.862700,3.936057,4.472346,0.407448,1.542961,4.808453,0.447430,3.133977,0.923841,3.257797,2.674543,0.493502,0.460483,2.965364,1.408740,3.379568,4.211693,4.087985,1.457707,2.618615,4.672565,2.681524,1.918951,1.253828,2.657920,1.687606,1.286064,4.064568,0.658137,3.785587,3.875764,3.221130,1.730674,0.244943,1.689914,4.542144,1.022994,2.842838,1.070844,1.770681,2.168471,0.132881,1.289890,4.273929,4.966102,2.914997,3.894303,4.748204,4.770890,2.524305,4.934890,1.629098,0.283566,4.342482,1.289090,0.317329,4.609574,0.768574,4.914659,4.853461,3.197858,1.408809,0.775566,1.459491,2.723167,1.204144,4.174221,4.468551,3.273549,3.395824,2.620080,1.119907,4.436746,3.643060,0.217324,1.579824,1.253900,2.220099,4.216479,2.638426,1.324333,3.946150,0.925984,3.117702,1.564207,1.284544,1.370226,4.360130,3.584764,2.795628,3.153228,2.220336,1.922497,2.678328,3.346649,0.660678,4.649577,3.182259,1.361195,0.411703,2.867764,4.503160,1.799358,3.898982,0.557112,0.368545,1.542280,2.962807,2.991455,4.683351,3.366547,3.765408,2.034587,3.700344,4.843894,1.912358,1.192940,3.207791,1.230585,0.042810,4.670537,1.238703,1.232426,2.248024,0.701770,0.761993,3.657107,0.906929,0.138424,4.453589,0.923253,1.038522,4.298283,4.277107,4.564947,3.798845,1.744000,0.497214,2.785424,0.871197,0.622860,2.059129,4.946625,0.281223,2.102742,4.877069,0.010292,4.851281,4.613520,3.508381,3.369780,4.410862,3.125429,3.773414,0.005220,4.487461,4.653097,1.750657,1.716639,2.925918,2.443689,2.393079,0.006090,1.754362,0.433396,3.582767,3.106308,2.385400,1.158854,3.828879,2.362311,4.018414,2.617353,2.513941,1.217430,4.333739,0.559235,1.692738,2.984266,3.982466,2.577853,0.442962,3.297423,0.599574,1.986837,4.498924,0.967109,2.667089,1.489102,0.710759,3.476285,4.566119,1.390577,0.301583,4.836021,3.357898,1.107451,1.010399,2.379797,2.399538,1.967881,1.422020,1.586497,0.350603,1.057835,1.685573,1.046439,1.239589,4.888046,0.895332,1.967368,4.379636,3.310334,4.734269,0.511682,2.455379,4.840705,3.591350,4.237483,1.790732,3.100609,1.971914,4.600490,3.740142,1.826653,1.624136,3.818184,2.701822,0.051675,4.039921,0.432335,1.423724,1.107657,4.633011,4.228952,4.551147,4.530904,4.409943,0.890912,3.822369,1.620924,0.998028,0.879341,3.016468,3.515234,2.704405,2.764743,2.430631,1.926590,3.505623,3.593403,4.549877,3.530235,3.974820,0.876927,2.677625,2.157045,4.877936,4.605757,4.637261,3.189230,1.183064,3.264843,3.874843,0.720717,0.430965,3.412436,0.995109,1.526155,0.470617,3.025652,3.582449,4.194227,3.793818,2.453561,3.479899,2.458003,2.648256,3.590170,2.088744,2.574431,4.867464,2.151369,2.582374,2.227891,0.980400,2.891678,3.661058,0.298216,1.380580,1.171644,3.965468,3.923333,3.259879,0.045462,4.491889,1.332533,2.702233,1.352332,3.163044,0.464131,0.549555,1.163880,4.261101,2.619740,2.552319,2.220165,3.904084,4.135543,1.164032,2.037403,4.659384,0.100881,0.243801,4.011188,2.876291,2.882714,0.726927,1.792373,4.309709,0.830945,1.231838,4.232671,4.157434,0.943588,0.077419,0.225202,2.194273,1.766398,1.364245,0.613532,2.988093,2.348848,2.891291,2.679564,2.232584,4.932556,0.753874,2.214412,1.870401,4.146401,4.774129,3.247317,4.379968,2.205397,2.661855,1.361674,0.914622,3.228956,2.658544,4.133072,3.402172,0.861773,1.413505,4.144405,0.444452,3.227399,1.626904,2.963781,3.438023,4.853207,3.752147,2.612986,4.498085,1.544893,0.217512,2.180898,2.278213,4.287662,1.404333,4.247153,2.251440,4.411679,0.472083,1.484244,2.543923,2.295851,3.672348,0.515489,4.535669,4.267401,0.128943,0.168959,4.822918,1.991756,2.245574,0.622754,0.542194,4.049536,0.668153,4.742232,0.928641,0.039999,1.585447,2.283382,2.485910,1.632621,4.951055,1.734491,0.158264,0.066481,4.073524,2.608134,4.973343,2.186883,0.711461,2.958013,2.093103,1.037126,3.111729,3.178963,1.721852,0.555174,4.632189,2.977148,0.848483,1.488443,4.818595,2.822937,2.825639,2.562321,4.172300,4.854193,3.321176,3.950652,4.538733,1.522901,3.856314,3.645072,0.853680,4.886836,0.314473,2.897096,2.781318,2.679274,2.086259,4.554250,3.078698,0.272643,4.961939,2.376993,0.385707,4.200878,0.609939,3.961051,4.882765,2.688684,2.437626,3.110569,2.165190,1.861906,3.719241,0.271425,2.487974,2.550085,4.405818,4.636252,0.725572,4.434261,1.473414,2.091702,2.509263,4.259740,2.170945,4.476113,4.281046,4.650516,1.613964,0.655230,3.015659,4.997109,3.183656,4.623595,1.649491,2.563231,2.081049,1.678820,2.734672,4.921831,1.336466,1.363722,2.549813,4.577877,4.421762,3.767905,2.697089,2.878962,4.636492,4.262931,0.697054,4.223262,4.641824,4.684250,0.005567,1.075227,0.786897,2.688264,2.741371,4.486646,4.450456,2.950330,1.446389,1.787395,3.114760,0.512139,3.542814,3.745149,4.583828,0.377252,1.820000,3.966832,3.025301,4.244465,1.884888,3.694864,3.979402,4.458443,3.390748,0.345089,4.306633,0.353491,0.141958,1.463450,2.937037,4.680822,2.605504,4.501622,4.001330,2.390226,1.275804,2.615477,2.562914,3.400760,3.360336,2.312105,0.075305,1.521251,0.537109,2.548510,3.740693,1.417440,3.470604,1.921584,3.359347,3.660371,0.497636,1.242833,2.964929,1.452080,0.371558,2.804461,4.973836,1.064414,0.032105,1.143076,0.838428,2.692739,1.609917,1.320883,4.678173,1.095846,0.364453,1.460856,2.358243,0.875182,1.940980,1.721932,4.763891,3.388454,1.922044,2.507977,2.537350,2.604504,2.644817,3.440214,2.267136,3.688475,2.001478,3.706213,1.669418,2.935390,3.961930,3.051277,4.144968,3.472381,2.446686,0.119151,2.741005,3.832510,1.144597,3.172334,0.941455,2.305259,3.406656,2.698135,0.376159,4.655183,1.644817,3.017534,3.954068,0.382318,0.952528,0.277472,0.721972,0.462813,2.250931,0.137915,3.907762,4.975588,3.000026,1.864861,1.235417,1.226325,4.452101,4.211522,4.884005,1.016747,1.946247,0.772323,0.984908,4.129498,2.750781,0.332918,2.514140,1.190502,0.730031,4.820326,1.105672,0.056882,4.589472,2.474449,3.033293,0.837763,0.019456,2.171530,4.265336,1.552437,3.174548,3.974356,4.780249,2.850826,2.065783,1.270027,4.863407,3.747775,1.093495,0.891094,1.097208,4.581213,3.066702,4.307050,1.522756,0.871726,0.659214,0.349455,1.557798,4.067906,0.447091,0.633309,3.503528,1.591343,2.733171,3.470430,3.806867,2.296988,4.493316,0.503095,0.478920,1.236370,0.151320,2.526535,2.150091,4.974829,2.482379,4.604988,3.798097,4.637987,4.887306,0.305474,0.797838,3.663525,2.613024,4.271255,0.325509,2.785375,4.998279,0.647062,1.552417,2.973165,2.966902,4.694836,2.678229,4.698917,0.282053,4.489690,3.268570,3.919700,0.843724,2.416222,0.112995,3.808788,4.071222,1.424311,0.639318,3.362983,1.748524,3.614939,0.190967,2.467573,1.495091,4.664495,0.448134,2.106694,4.381850,3.104430,3.041608,3.682003,2.046838,4.763831,2.183663,3.561496,4.746785,4.634355,3.219498,0.421557,4.937607,0.756476,1.842243,0.262216,3.061960,4.062408,0.248567,4.144571,2.767344,3.673445,1.341028,4.379992,1.608662,2.787882,0.731580,0.055779,1.592112,3.967084,4.182022,3.525373,0.254405,3.763838,3.986315,4.435554,3.838909,4.648594,3.005460,1.455815,0.553594,4.157229,2.238692,3.672689,4.833727,1.955063,2.481701,3.763735,0.345094,1.190714,2.434440,4.086805,1.139982,3.336129,3.808199,4.862106,2.794597,1.756336,0.124742,0.770842,0.211419,2.965752,4.413389,4.997394,0.029932,3.860855,2.019689,0.287046,1.591588,2.038830,4.411448,2.556028,3.159947,1.866398,3.152419,3.473171,3.590677,1.491970,4.347751,1.267941,3.397390,1.113082,0.177447,2.763565,0.695338,1.762286,0.443890,4.820365,3.053039,2.486323,2.736311,2.153369,4.557909,0.067277,2.183838,0.836047,2.080117,0.892184,2.308308,1.014325,0.824032,4.430023,2.640746,3.597880,0.412170,1.057601,4.530182,3.774650,1.872542,4.883257,4.358118,4.219469,4.800075,1.968247,4.167953,4.998937,3.433563,3.644085,3.753141,2.660086,2.297098,0.906605,4.136110,1.155625,1.648913,3.117370,0.034272,3.410027,2.050556,4.053164,0.117853,2.082776,3.106285,0.520195,4.366509,1.722897,1.038054,1.677066,0.814415,3.482062,3.528560,4.611045,0.850225,0.521098,4.941163,4.676881,1.134597,0.108342,2.342128,1.042430,4.116945,2.003354,2.046314,4.038306,2.202691,0.489063,2.355028,1.724871,2.514898,4.016037,2.238102,2.801930,2.086619,2.498589,4.524866,1.517798,2.312207,2.971861,3.514590,1.427854,3.780667,3.696964,0.906107,0.895298,3.104366,0.531340,4.797047,3.967690,3.260620,4.834807,1.815000,2.559686,1.553686,2.338079,4.394952,0.838394,3.524777,0.014730,4.289471,4.902270,1.622279,3.081308,3.935113,0.735042,1.523760,3.975138,4.500569,2.971832,3.134830,4.360609,2.869927,4.890130,2.445262,2.909105,3.695911,1.727955,3.566121,2.966379,2.255627,1.335551,1.276888,4.640475,2.381172,2.502933,2.431308,0.150684,0.689230,3.238955,4.251105,4.641009,3.098986,1.392234,4.933244,4.868976,1.147089,3.308544,2.312739,3.925164,0.890137,2.467865,1.915179,2.505767,3.799876,0.836043,4.230297,4.067627,2.170515,4.167499,1.441251,4.448026,2.636529,3.555772,1.131592,0.525546,0.689012,2.153584,2.349973,1.797374,0.085357,3.179116,2.804738,3.152003,3.684451,4.839404,3.486999,1.779104,4.059670,0.327219,0.832183,0.281130,2.316876,3.662476,1.544846,2.004902,3.728209,1.703602,2.937417,1.874314,0.272140,4.156035,0.654373,1.502440,0.993462,4.583078,4.241548,1.082084,0.867760,2.613160,3.519861,0.622025,3.052143,2.743442,4.307706,3.619759,4.379262,4.483072,1.762278,4.549501,2.737450,1.380398,3.739901,4.814698,3.378785,3.795260,3.100871,0.897732,2.584328,3.133663,3.836901,0.844978,3.442944,2.840806,0.717429,3.890958,1.558854,2.424504,0.299907,4.201402,0.831521,4.574519,1.866541,0.150621,3.661089,1.372687,3.163834,0.114593,3.881712,4.874076,2.514662,4.657857,3.915132,4.067191,3.251563,1.602523,3.456074,1.637074,4.042473,4.723744,2.826691,4.648575,2.401521,1.685958,3.038227,1.351171,0.728056,0.436193,1.566913,3.892909,3.944502,0.729860,1.286039,4.057358,0.577685,4.221571,3.479685,0.074923,2.449570,0.615638,1.731387,3.561329,0.450412,1.289484,2.660379,0.514611,2.278793,4.641664,3.953180,2.745331,1.913394,3.160215,0.648507,0.133357,4.136907,3.668178,4.461827,2.892149,4.198942,2.892463,1.233595,3.447166,4.604305,4.709971,0.942475,4.115069,3.217689,3.147160,4.126941,1.171864,2.455243,3.758844,1.880385,1.487004,0.279780,2.829641,1.776333,1.912976,2.345021,3.721279,4.165011,0.886035,2.316090,2.907806,1.954920,3.819965,4.433054,2.675948,4.101640,3.111796,2.655702,4.264521,3.671148,3.194987,3.790627,2.516593,0.885083,4.162683,2.584124,4.634598,4.859033,3.375649,1.560501,2.878419,1.856432,1.345020,2.270899,2.068886,3.052946,4.268088,1.748169,2.244560,4.165665,0.954486,0.627353,2.720024,4.155571,1.866667,3.159556,0.049118,4.545475,3.016935,1.293076,0.391144,1.122228,3.143962,3.345844,3.551785,4.231899,2.677374,1.248634,4.851837,0.566359,1.468794,3.567365,3.028178,2.719323,0.572351,4.896886,0.739200,1.651224,1.908428,1.173036,1.453144,3.493675,3.842417,2.936869,4.313234,3.575988,2.313220,2.999659,2.210435,4.752958,2.468387,0.290681,0.171567,2.121601,0.379092,4.408588,4.689687,0.623934,2.616273,1.678289,4.375162,0.196463,4.826497,4.291374,0.440402,4.259373,3.435388,1.256949,2.977637,1.181321,1.198123,3.612692,1.146992,2.114469,4.978619,4.869941,3.302803,3.182147,1.103428,0.662596,0.322257,1.634699,1.705209,2.467008,1.402320,2.657973,1.198123,0.882478,1.990911,4.812078,1.144449,4.327120,2.369870,4.357135,3.706190,0.239705,4.859286,0.275567,3.618703,4.104993,1.333792,0.847156,3.160868,4.854715,4.237409,0.322425,4.344910,1.724285,4.136223,0.087213,3.001902,2.769170,0.049612,2.742184,1.178171,0.025633,2.749072,1.720604,3.930455,4.128002,0.398407,2.095612,2.094166,1.071870,2.948967,3.551963,0.434130,2.519470,2.346699,1.524551,1.409417,1.759035,2.451585,1.372253,2.694288,3.795089,1.984602,0.622684,3.264585,3.553231,1.269887,4.199118,1.376920,3.671084,1.132572,2.136007,3.847146,1.324280,3.711920,1.840674,4.999008,1.263116,0.534366,2.112181,3.600770,4.777832,3.335242,2.703202,3.812476,3.015268,3.412568,2.779733,1.388447,3.779804,2.277972,1.918259,0.010755,1.758411,4.540446,0.238659,0.704649,3.457451,3.186817,3.075264,2.740144,3.035192,3.393500,2.616001,3.142056,0.061785,2.378596,2.112321,3.879157,1.130596,3.845963,2.515654,3.334061,0.235885,4.080271,2.743251,2.931930,1.027348,4.229874,1.383483,4.173757,4.543564,3.991931,4.690086,0.921663,0.972457,4.357583,2.343728,0.629452,0.531097,2.511270,3.209740,4.084207,2.872800,0.219885,4.820316,2.722554,1.102767,1.913665,1.816109,2.789013,4.164988,4.772431,0.655075,2.210493,1.820306,1.511401,3.453485,2.343882,3.384287,4.930695,2.279548,4.840454,0.829800,4.039285,0.257056,1.045604,1.575941,0.799139,2.450076,1.567212,3.030704,1.314339,0.537329,0.940455,2.497733,0.369709,1.850360,2.525330,3.284342,3.615060,3.491601,4.895382,0.613017,3.237495,0.878254,4.249018,2.373656,3.008564,4.803005,1.830671,2.900654,1.206235,2.461784,1.083231,1.596418,4.867624,1.268300,0.120980,3.205438,3.561240,0.093931,2.679340,1.399464,2.154674,3.410713,4.348655,1.674022,4.637410,2.198482,3.845131,0.311008,3.978187,4.280911,1.474043,0.901474,4.068663,0.276228,0.086284,4.764417,2.749035,3.946248,0.761388,2.982131,1.963878,0.842598,2.663557,1.043033,0.036358,4.548248,0.559632,2.458318,4.920586,0.208751,3.107515,0.220053,2.754163,1.423132,1.335936,2.237835,3.552100,2.844852,2.974684,1.452025,3.802378,0.189101,4.519249,4.651368,0.090085,1.123907,1.722385,1.664949,2.389294,4.382299,4.407140,4.965336,0.637935,0.012399,4.391215,4.018740,2.872878,0.595703,1.894650,0.456246,3.449532,2.903945,4.147431,3.373436,1.035075,3.928556,4.377347,1.276086,0.574507,3.315137,3.534148,0.240438,1.911804,2.748822,4.311101,1.609079,3.361157,2.531952,3.209372,0.221214,1.667702,1.597643,0.087688,2.337189,1.105386,3.024115,1.033730,4.653629,0.667566,2.416373,1.019557,1.363792,4.726271,4.508237,0.841996,2.070143,1.612242,0.774616,0.453534,1.098458,2.484164,2.877423,0.979768,0.612467,1.146074,2.013607,2.199245,2.104233,1.073632,2.677953,1.599068,0.393903,3.247508,2.942263,4.241374,0.501930,2.788018,4.908887,0.305510,1.929571,3.701759,4.568676,2.836328,0.484536,2.122691,1.040705,3.660008,0.700023,1.584227,2.962155,4.902904,2.697178,0.947807,2.809838,3.935717,0.999046,1.114282,0.624217,3.976699,3.042866,4.303308,4.634818,0.398531,0.555493,3.240552,1.918443,1.354216,1.946801,2.093120,4.520537,0.839014,0.005095,2.162052,0.159090,2.868248,2.957551,2.716024,0.617080,2.933825,1.003571,1.102491,3.444884,4.820313,4.197029,3.522221,4.326557,4.390820,2.283242,2.667046,3.395232,4.457674,0.478686,1.927782,0.182419,1.242186,4.496999,4.669854,2.419955,2.193267,4.403102,1.011008,1.438383,2.310952,1.009877,0.211090,1.850071,3.530191,1.455119,0.219293,4.828167,4.695511,3.091828,4.904286,4.284340,0.124147,3.401747,2.947612,1.018023,4.269531,1.100504,1.655629,2.055340,3.887514,0.209374,3.606638,0.103732,0.643909,4.076962,0.450797,1.620148,0.776167,3.293809,0.265457,0.706088,4.760389,2.441822,3.181229,0.204439,2.966214,4.727831,2.890151,2.158387,0.137030,1.331942,1.587734,1.300078,1.476970,2.589503,0.717869,0.333155,0.931097,0.514835,4.608921,2.625975,3.971231,2.180067,2.081527,1.578032,2.158541,2.553988,1.209432,2.860176,0.943778,2.438910,4.252057,2.439515,2.364696,3.230398,4.118382,3.822578,2.884424,3.852406,0.788938,2.894216,0.270548,3.541402,0.643432,1.958591,3.431523,0.504042,0.639844,4.892606,3.359766,2.532390,2.066725,2.882868,2.097248,0.445276,0.403979,1.023332,4.048428,0.361353,1.516237,1.136845,2.970882,3.378512,1.799886,3.417569,2.449141,4.726636,2.515781,2.526616,0.148357,3.656494,0.962249,2.830189,3.524939,3.192902,0.356012,3.416722,4.713416,2.277613,0.328546,4.394692,2.156190,0.259863,4.581804,0.080355,2.341598,1.603711,1.142324,1.035898,1.022438,1.027568,4.625017,4.267682,2.179582,2.800322,3.023510,0.515762,1.985425,4.722190,0.346294,3.325679,0.524434,4.856998,2.849033,0.559407,1.158605,3.742065,3.495097,0.903474,0.990475,0.174713,1.005017,2.523398,2.951660,0.108378,2.989163,2.861312,0.436828,0.996279,3.950912,1.016266,2.848758,4.844930,1.693134,0.830385,3.389292,0.294979,1.511126,4.711183,1.082347,2.854723,1.911290,3.744001,2.291123,4.563324,1.154506,3.886020,1.300340,3.552880,0.251940,1.474080,3.912163,3.082179,0.153890,1.000110,0.290796,4.646813,3.841017,0.971064,1.972894,1.464246,2.792463,0.702305,4.325129,3.829189,0.239672,4.872232,4.396945,0.040094,4.364687,4.314782,1.407580,2.178613,4.839047,1.652370,4.069792,3.775975,2.225662,1.221542,1.800308,1.527465,4.719534,2.026267,4.432787,3.642128,3.092798,3.378478,4.963592,1.028494,3.459104,3.367332,0.486100,1.158322,2.170546,1.160228,2.701398,2.036480,1.078161,0.791964,4.355680,1.956930,3.365634,3.881535,3.653546,3.693748,4.734100,2.745255,4.574399,0.381622,1.600242,3.182811,4.835379,4.290117,1.691466,2.405776,0.781170,4.156449,3.882971,2.179011,2.165862,0.642729,4.671985,0.976217,2.860727,1.208619,0.605691,3.642922,2.373285,4.974652,2.933796,4.599096,3.378878,0.855297,0.417279,3.893139,4.684327,3.629479,2.482088,0.945655,2.302823,1.451318,3.660627,1.694701,0.463830,1.018631,1.540707,1.826393,3.728150,1.615475,4.475078,4.786478,2.899368,0.521732,2.526603,2.925453,4.779859,2.815737,3.032316,0.049551,4.717544,1.480861,3.038443,3.783809,2.649782,0.136092,2.180772,2.708764,2.859065,3.297779,4.515613,4.177924,1.561484,2.697878,4.965147,1.858322,4.347810,2.119577,3.841938,4.981807,4.917437,4.594119,0.306569,0.942569,4.568173,0.310926,1.288260,0.766230,4.795047,4.048706,1.150799,0.986439,4.871699,0.078345,2.702508,1.231069,2.956396,3.533294,1.615086,0.411091,3.307359,1.544273,3.902347,3.100254,0.290257,2.524898,4.378576,4.146110,2.395397,3.681805,3.526063,3.370108,4.631784,0.614838,3.463389,1.368711,0.702733,2.057362,0.591928,2.483837,2.153713,4.101452,2.335719,4.045453,0.810238,0.239405,3.627801,2.538262,2.105399,3.564817,4.742721,3.691596,3.296512,2.475069,0.607244,0.396154,0.235176,1.594210,1.760460,2.126622,3.846742,2.659791,0.685185,0.595610,3.236604,0.074760,3.679532,1.863521,4.997802,2.885636,4.325796,3.999673,1.807501,3.633476,4.692552,1.442303,1.289959,0.971602,4.488791,0.678424,2.025589,2.291425,2.472931,4.481274,1.465780,4.226436,2.778349,4.390086,1.694456,1.158879,1.264513,0.963284,0.180685,1.240221,3.152669,2.857399,0.400342,2.149889,4.598310,1.004410,0.739787,0.676664,4.176469,2.476978,1.172989,4.196196,3.232764,4.841449,1.732272,1.895363,0.097090,0.717661,0.188892,1.429335,2.664953,0.547490,1.602951,2.388182,0.691760,2.131467,3.264073,4.069007,0.837230,3.987368,3.432318,4.607254,0.713007,1.290775,1.404516,0.203623,0.297576,4.199441,3.545237,4.706788,1.368038,4.759686,0.373203,4.123716,3.907059,2.132538,4.796496,2.167928,3.782718,3.914466,1.101143,2.436232,4.932890,0.675057,1.763434,1.559564,0.350980,1.036419,3.781054,2.212489,4.602730,0.058734,2.655795,3.437775,3.718904,1.212811,1.440621,3.819075,2.286101,4.718166,4.869229,2.760719,0.394618,3.537026,1.504376,1.141227,4.299605,0.894329,0.244832,3.023225,0.719292,0.288111,0.055685,2.391616,1.372737,3.737325,0.468436,3.520032,1.652252,1.785099,0.390486,1.909909,3.246581,0.993855,3.332704,3.179373,0.854759,1.583011,3.340145,1.362834,4.900885,3.564826,0.116661,2.742575,0.572096,3.245560,1.306302,0.051378,1.030837,0.908576,3.810324,0.278026,0.300042,4.609405,0.948015,4.770921,2.392090,1.698702,4.550967,0.315390,3.050805,3.890195,1.965440,2.988225,4.960712,4.277722,4.641786,4.545747,2.171598,4.027717,4.825331,2.662657,4.647666,0.044383,1.400754,3.082128,1.806969,1.456843,4.486426,0.226301,1.745357,1.620947,1.496425,2.330697,2.405980,3.311002,3.326181,1.305311,2.323243,0.742848,2.165051,3.434011,3.529822,4.459499,0.203189,2.168039,4.923247,2.670295,2.449971,2.509641,2.247153,0.436407,1.580823,2.874605,3.322508,3.000557,2.855567,4.928697,3.995550,4.920550,1.255558,3.218200,0.619796,3.651374,3.659363,2.810172,3.079197,3.788212,3.986841,0.443399,2.783815,1.833684,2.958727,0.398366,2.971307,3.175473,1.774038,2.300497,3.173048,1.743361,0.965917,4.290858,0.924099,3.659946,1.420277,0.866139,1.228157,1.592174,1.906174,0.800409,4.327271,3.248888,2.727841,0.521635,1.265978,4.531992,2.908873,0.378242,0.240325,4.324487,2.425056,1.650625,4.740167,3.692717,1.646375,1.655488,4.347535,4.490398,3.185362,3.605165,3.476742,3.151750,1.433162,4.992540,4.710398,3.424823,3.416129,4.829058,2.029704,1.678152,4.720808,2.926389,4.123664,1.969846,1.156757,1.674243,4.538708,2.305028,0.571541,1.170560,3.026445,0.105680,1.044920,0.773288,4.687001,0.042889,0.878769,3.846373,2.500886,2.749624,4.870893,2.646143,2.606869,2.886177,2.550712,3.440984,3.956153,1.870242,3.206393,1.459697,3.676523,1.022320,2.370027,4.907268,0.730590,3.247461,3.744824,3.320197,4.310562,2.330627,3.169485,2.972061,2.713253,3.478968,2.167254,3.535006,0.786989,0.405959,1.872039,2.524026,3.984640,0.882194,4.053556,4.901872,1.371186,1.902176,4.766563,1.151434,3.027331,3.150123,1.201375,1.593602,0.921198,3.828241,3.311194,4.554787,2.240321,1.145110,2.520505,4.903745,3.266401,3.074347,0.502872,2.040623,0.109902,3.562741,4.460352,1.965509,2.935534,4.720419,2.670725,1.669678,1.447176,0.150010,4.006641,4.750958,4.884572,2.773967,3.528914,0.336331,4.961810,4.031202,0.188596,0.515435,0.731670,2.339940,4.365287,1.861093,4.252035,0.789520,0.489964,4.791142,3.264164,1.071352,2.420344,0.265822,2.329371,4.303040,4.711174,3.673102,2.305014,1.472508,0.554054,2.728203,1.533902,1.782007,0.708220,1.862911,0.716899,3.190215,0.362760,4.954628,0.474119,4.228099,1.217987,1.016913,2.234130,1.557689,4.737573,2.642671,1.546376,0.379792,2.062704,4.915684,4.761813,4.284342,3.888543,0.900958,3.775288,4.146945,1.181923,4.359638,0.598233,0.591532,3.246661,1.369600,2.033505,0.760127,3.823041,4.721193,0.703155,3.182470,3.494532,2.222481,2.473411,3.778170,4.430010,0.774620,1.577516,4.037162,2.128689,2.520998,4.271830,3.511293,2.015915,3.081751,0.421255,3.591351,1.204655,1.820895,0.086627,3.983967,2.025735,4.403686,2.396993,3.779239,3.496983,2.365780,4.765678,0.366466,2.787481,0.257261,3.786890,1.565036,2.923038,1.724394,0.820242,0.917958,4.977689,3.235232,0.896833,1.941052,2.619090,0.649869,4.647575,4.280894,3.063376,3.471900,1.486056,2.402871,3.211623,2.394377,4.931209,4.870677,3.043489,2.446731,3.557810,1.570170,2.417842,3.632515,3.178420,3.068553,3.919539,2.272264,2.314337,3.078946,4.546870,1.873521,0.032862,0.837886,4.370220,1.044815,0.078747,1.914158,3.824319,4.573908,2.002193,3.176967,0.973517,2.288722,2.091870,4.530678,3.842146,0.314830,1.878723,4.778730,2.501960,4.063513,4.953854,4.950409,0.912907,1.797634,2.384449,4.042896,1.445500,3.024493,0.435148,1.626697,4.852384,4.546390,0.956560,3.365771,0.035663,0.705084,3.406432,3.460695,2.523778,2.614587,1.229817,0.583865,0.360570,4.301813,3.188966,4.951121,0.596189,1.537710,1.431529,2.228116,1.118169,4.588798,2.310649,1.656101,2.490859,1.115784,4.295925,2.018548,4.166827,1.450425,1.591613,2.438076,2.990227,0.780884,0.369716,3.117162,4.820367,2.483466,3.995957,2.044040,0.231385,1.119469,1.399900,4.432893,4.070661,0.783504,1.899165,4.450988,1.782630,0.894692,4.855204,3.713833,3.488042,0.822492,1.684430,0.832129,1.001361,1.097777,0.641447,0.307804,4.016437,1.794516,1.191535,3.518494,1.351574,1.828609,2.846974,4.725246,0.342212,1.805309,0.109192,3.464396,1.266937,2.835801,1.328618,0.881577,2.661575,4.791385,3.583201,4.922601,3.522561,1.403011,4.284431,3.845931,0.081472,2.047052,1.505269,3.405110,2.081005,1.262451,3.515710,3.905039,3.989887,1.193584,0.130009,3.664712,2.358523,0.782798,1.738550,0.415488,2.542411,4.185431,2.109851,3.734005,1.781876,4.652489,0.690534,4.924494,1.626291,4.779414,1.183456,0.832311,0.986173,4.260385,2.293352,1.776458,1.696158,1.206343,4.370225,2.414486,1.924969,0.687635,0.432069,0.169667,2.890896,1.380942,1.139355,4.649525,4.570038,3.488582,2.707469,0.225299,2.904699,2.531805,0.386505,1.540925,4.139028,0.976583,3.745576,4.286168,4.986714,3.708433,1.950256,0.122015,1.673469,1.329102,4.679273,2.111847,0.469254,3.503336,4.255499,1.015765,2.450986,1.284920,4.777964,3.978063,4.767855,0.644422,0.572087,4.196899,4.675172,0.301727,1.768216,4.382507,0.367835,3.405374,4.352907,4.709862,4.125582,4.470620,3.621680,0.890445,3.198435,4.285662,4.784951,4.755709,0.023506,3.123327,0.830491,1.365323,1.164411,4.535398,2.543207,1.150602,2.995244,3.637362,4.144533,4.959026,0.769131,0.452929,2.761979,2.236854,0.280521,1.586668,2.364104,1.497947,3.994024,1.804979,3.821671,1.729339,2.673517,2.627626,3.601948,4.163749,0.972740,3.761595,0.799768,3.224634,1.007945,3.952914,4.879515,2.008177,2.092729,2.334405,3.726112,0.123118,3.380948,2.311061,0.176373,1.771389,1.253313,4.583949,2.734760,2.953325,4.003142,1.669665,2.990157,4.682503,0.875731,2.919679,0.766458,2.098373,1.449629,4.433065,4.508163,1.669770,4.131705,2.691133,4.429423,1.752686,0.118075,2.536232,3.262633,0.292559,4.086954,3.161739,1.973717,2.845684,4.975364,1.202949,1.194009,0.394334,0.930719,4.486663,4.068057,1.209500,1.561133,1.792676,4.832930,1.926089,1.970900,3.100944,0.753017,3.914051,1.012799,2.336503,0.431119,2.836296,1.872219,4.710747,4.108249,0.555322,0.618296,4.827536,4.675194,0.722879,2.653158,2.178515,1.208950,1.327640,0.287980,4.178755,4.022275,4.907703,1.870009,0.688338,1.706212,2.546108,2.479356,3.887816,2.633411,1.682238,0.964930,0.898621,2.260199,0.155128,2.290516,3.310337,1.977277,4.479775,1.198647,4.186262,2.897235,1.875533,2.420561,3.189400,0.796348,3.478947,2.899227,3.519405,3.734746,1.773786,0.091536,1.670516,2.422218,1.130470,4.798997,3.150116,0.701091,4.015539,3.717567,1.076981,1.553046,1.899007,3.469738,2.225767,1.779018,1.783534,0.389053,2.560305,3.417370,3.693745,3.139440,4.576526,0.849724,0.138684,0.751352,4.381844,4.649362,2.547753,2.324274,1.291489,3.232569,4.390370,4.645136,3.217199,4.725390,3.307790,1.923788,1.644469,1.079590,2.170371,3.316060,4.448403,1.256216,2.761273,0.474465,0.490909,3.646392,4.796384,0.669371,2.820387,4.061411,0.389955,1.816692,2.815095,0.969081,1.645534,3.736132,1.217191,0.204809,0.648386,4.659210,0.793571,3.433278,0.449386,3.342840,4.265888,4.962132,0.293289,2.236904,2.928607,3.750272,2.095666,0.317591,0.525639,1.732514,3.313779,0.675983,3.333812,3.300548,0.490440,3.589320,2.099317,4.141539,0.999739,3.865527,4.386133,2.357315,3.162070,3.089654,3.768522,2.284135,3.036599,0.935440,3.725311,4.806696,1.150529,0.271360,4.228510,1.166075,0.387357,4.115557,0.586837,0.989504,2.237999,0.840009,0.821112,0.394959,3.919287,0.788564,2.401678,1.702828,4.974722,1.967681,4.802450,2.561426,4.169802,4.353516,0.939275,2.916969,4.425106,3.681441,3.735025,2.468208,2.036053,0.412436,4.388892,1.381623,2.999279,1.775644,4.223056,3.461782,3.484300,3.710455,3.082311,4.465584,1.892583,3.106047,3.321168,2.975687,3.630549,3.799191,1.149409,2.798677,4.879463,4.069720,0.748502,0.175879,2.767869,0.091405,0.149368,3.006425,3.090956,1.780497,2.690762,4.144060,1.769532,3.703889,2.041189,2.253352,3.063507,0.739962,2.322476,4.822575,2.899075,3.903022,4.490068,2.164333,3.962295,1.846313,3.655559,1.640534,1.653083,3.019507,1.397614,3.354730,4.985032,4.099061,3.646705,0.847186,3.649826,1.636192,0.014812,3.729462,3.739875 \ No newline at end of file